49367b37b6284876dedcd070e468d8a09d6d476d
[openafs.git] / src / afs / VNOPS / afs_vnop_write.c
1 /*
2  * Copyright 2000, International Business Machines Corporation and others.
3  * All Rights Reserved.
4  * 
5  * This software has been released under the terms of the IBM Public
6  * License.  For details, see the LICENSE file in the top-level source
7  * directory or online at http://www.openafs.org/dl/license10.html
8  */
9
10 /*
11  * Implements:
12  * afs_UFSWrite
13  * afs_MemWrite
14  * afs_StoreOnLastReference
15  * afs_close
16  * afs_fsync
17  */
18
19 #include <afsconfig.h>
20 #include "afs/param.h"
21
22
23 #include "afs/sysincludes.h"    /* Standard vendor system headers */
24 #include "afsincludes.h"        /* Afs-based standard headers */
25 #include "afs/afs_stats.h"      /* statistics */
26 #include "afs/afs_cbqueue.h"
27 #include "afs/nfsclient.h"
28 #include "afs/afs_osidnlc.h"
29
30
31 extern unsigned char *afs_indexFlags;
32
33 /* Called by all write-on-close routines: regular afs_close,
34  * store via background daemon and store via the
35  * afs_FlushActiveVCaches routine (when CCORE is on).
36  * avc->lock must be write-locked.
37  */
38 int
39 afs_StoreOnLastReference(struct vcache *avc,
40                          struct vrequest *treq)
41 {
42     int code = 0;
43
44     AFS_STATCNT(afs_StoreOnLastReference);
45     /* if CCore flag is set, we clear it and do the extra decrement
46      * ourselves now. If we're called by the CCore clearer, the CCore
47      * flag will already be clear, so we don't have to worry about
48      * clearing it twice. */
49     if (avc->f.states & CCore) {
50         avc->f.states &= ~CCore;
51 #if defined(AFS_SGI_ENV)
52         osi_Assert(avc->opens > 0 && avc->execsOrWriters > 0);
53 #endif
54         /* WARNING: Our linux cm code treats the execsOrWriters counter differently 
55          * depending on the flags the file was opened with. So, if you make any 
56          * changes to the way the execsOrWriters flag is handled check with the 
57          * top level code.  */
58         avc->opens--;
59         avc->execsOrWriters--;
60         AFS_RELE(AFSTOV(avc));  /* VN_HOLD at set CCore(afs_FakeClose) */
61         crfree((afs_ucred_t *)avc->linkData);   /* "crheld" in afs_FakeClose */
62         avc->linkData = NULL;
63     }
64
65     if (!AFS_IS_DISCONNECTED) {
66         /* Connected. */
67
68         /* Now, send the file back.  Used to require 0 writers left, but now do
69          * it on every close for write, since two closes in a row are harmless
70          * since first will clean all chunks, and second will be noop.  Note that
71          * this will also save confusion when someone keeps a file open
72          * inadvertently, since with old system, writes to the server would never
73          * happen again.
74          */
75         code = afs_StoreAllSegments(avc, treq, AFS_LASTSTORE /*!sync-to-disk */ );
76         /*
77          * We have to do these after the above store in done: in some systems
78          * like aix they'll need to flush all the vm dirty pages to the disk via
79          * the strategy routine. During that all procedure (done under no avc
80          * locks) opens, refcounts would be zero, since it didn't reach the
81          * afs_{rd,wr} routines which means the vcache is a perfect candidate
82          * for flushing!
83          */
84      } else if (AFS_IS_DISCON_RW) {
85         afs_DisconAddDirty(avc, VDisconWriteClose, 0);
86      }          /* if not disconnected */
87
88 #if defined(AFS_SGI_ENV)
89     osi_Assert(avc->opens > 0 && avc->execsOrWriters > 0);
90 #endif
91
92     avc->opens--;
93     avc->execsOrWriters--;
94     return code;
95 }
96
97 int
98 afs_MemWrite(struct vcache *avc, struct uio *auio, int aio,
99              afs_ucred_t *acred, int noLock)
100 {
101     afs_size_t totalLength;
102     afs_size_t transferLength;
103     afs_size_t filePos;
104     afs_size_t offset, len;
105     afs_int32 tlen, trimlen;
106     afs_int32 startDate;
107     afs_int32 max;
108     struct dcache *tdc;
109 #ifdef _HIGHC_
110     volatile
111 #endif
112     afs_int32 error;
113 #ifdef AFS_DARWIN80_ENV
114     uio_t tuiop = NULL;
115 #else
116     struct uio tuio;
117     struct uio *tuiop = &tuio;
118     struct iovec *tvec;         /* again, should have define */
119 #endif
120     afs_int32 code;
121     struct vrequest treq;
122
123     AFS_STATCNT(afs_MemWrite);
124     if (avc->vc_error)
125         return avc->vc_error;
126
127     startDate = osi_Time();
128     if ((code = afs_InitReq(&treq, acred)))
129         return code;
130     /* otherwise we read */
131     totalLength = AFS_UIO_RESID(auio);
132     filePos = AFS_UIO_OFFSET(auio);
133     error = 0;
134     transferLength = 0;
135     afs_Trace4(afs_iclSetp, CM_TRACE_WRITE, ICL_TYPE_POINTER, avc,
136                ICL_TYPE_OFFSET, ICL_HANDLE_OFFSET(filePos), ICL_TYPE_OFFSET,
137                ICL_HANDLE_OFFSET(totalLength), ICL_TYPE_OFFSET,
138                ICL_HANDLE_OFFSET(avc->f.m.Length));
139     if (!noLock) {
140         afs_MaybeWakeupTruncateDaemon();
141         ObtainWriteLock(&avc->lock, 126);
142     }
143 #if defined(AFS_SGI_ENV)
144     {
145         off_t diff;
146         /*
147          * afs_xwrite handles setting m.Length
148          * and handles APPEND mode.
149          * Since we are called via strategy, we need to trim the write to
150          * the actual size of the file
151          */
152         osi_Assert(filePos <= avc->f.m.Length);
153         diff = avc->f.m.Length - filePos;
154         AFS_UIO_SETRESID(auio, MIN(totalLength, diff));
155         totalLength = AFS_UIO_RESID(auio);
156     }
157 #else
158     if (aio & IO_APPEND) {
159         /* append mode, start it at the right spot */
160 #if     defined(AFS_SUN56_ENV)
161         auio->uio_loffset = 0;
162 #endif
163         filePos = avc->f.m.Length;
164         AFS_UIO_SETOFFSET(auio, filePos);
165     }
166 #endif
167     /*
168      * Note that we use startDate rather than calling osi_Time() here.
169      * This is to avoid counting lock-waiting time in file date (for ranlib).
170      */
171     avc->f.m.Date = startDate;
172
173 #if     defined(AFS_HPUX_ENV)
174 #if     defined(AFS_HPUX101_ENV)
175     if ((totalLength + filePos) >> 9 >
176         (p_rlimit(u.u_procp))[RLIMIT_FSIZE].rlim_cur) {
177 #else
178     if ((totalLength + filePos) >> 9 > u.u_rlimit[RLIMIT_FSIZE].rlim_cur) {
179 #endif
180         if (!noLock)
181             ReleaseWriteLock(&avc->lock);
182         return (EFBIG);
183     }
184 #endif
185 #ifdef AFS_VM_RDWR_ENV
186     /*
187      * If write is implemented via VM, afs_FakeOpen() is called from the
188      * high-level write op.
189      */
190     if (avc->execsOrWriters <= 0) {
191         afs_warn("WARNING: afs_ufswr vp=%lx, exOrW=%d\n", (unsigned long)avc,
192                avc->execsOrWriters);
193     }
194 #else
195     afs_FakeOpen(avc);
196 #endif
197     avc->f.states |= CDirty;
198 #ifndef AFS_DARWIN80_ENV
199     tvec = (struct iovec *)osi_AllocSmallSpace(sizeof(struct iovec));
200 #endif
201     while (totalLength > 0) {
202         tdc = afs_ObtainDCacheForWriting(avc, filePos, totalLength, &treq, 
203                                          noLock);
204         if (!tdc) {
205             error = EIO;
206             break;
207         }
208
209         len = totalLength;      /* write this amount by default */
210         offset = filePos - AFS_CHUNKTOBASE(tdc->f.chunk);
211         max = AFS_CHUNKTOSIZE(tdc->f.chunk);    /* max size of this chunk */
212         if (max <= len + offset) {      /*if we'd go past the end of this chunk */
213             /* it won't all fit in this chunk, so write as much
214              * as will fit */
215             len = max - offset;
216         }
217
218 #ifdef  AFS_DARWIN80_ENV
219         if (tuiop)
220             uio_free(tuiop);
221         trimlen = len;
222         tuiop = afsio_darwin_partialcopy(auio, trimlen);
223 #else
224         /* mung uio structure to be right for this transfer */
225         afsio_copy(auio, &tuio, tvec);
226         trimlen = len;
227         afsio_trim(&tuio, trimlen);
228 #endif
229         AFS_UIO_SETOFFSET(tuiop, offset);
230
231         code = afs_MemWriteUIO(&tdc->f.inode, tuiop);
232         if (code) {
233             void *mep;          /* XXX in prototype world is struct memCacheEntry * */
234             error = code;
235             ZapDCE(tdc);        /* bad data */
236             mep = afs_MemCacheOpen(&tdc->f.inode);
237             afs_MemCacheTruncate(mep, 0);
238             afs_MemCacheClose(mep);
239             afs_stats_cmperf.cacheCurrDirtyChunks--;
240             afs_indexFlags[tdc->index] &= ~IFDataMod;   /* so it does disappear */
241             ReleaseWriteLock(&tdc->lock);
242             afs_PutDCache(tdc);
243             break;
244         }
245         /* otherwise we've written some, fixup length, etc and continue with next seg */
246         len = len - AFS_UIO_RESID(tuiop);       /* compute amount really transferred */
247         tlen = len;
248         afsio_skip(auio, tlen); /* advance auio over data written */
249         /* compute new file size */
250         if (offset + len > tdc->f.chunkBytes) {
251             afs_int32 tlength = offset + len;
252             afs_AdjustSize(tdc, tlength);
253             if (tdc->validPos < filePos + len)
254                 tdc->validPos = filePos + len;
255         }
256         totalLength -= len;
257         transferLength += len;
258         filePos += len;
259 #if defined(AFS_SGI_ENV)
260         /* afs_xwrite handles setting m.Length */
261         osi_Assert(filePos <= avc->f.m.Length);
262 #else
263         if (filePos > avc->f.m.Length) {
264             if (AFS_IS_DISCON_RW)
265                 afs_PopulateDCache(avc, filePos, &treq);
266             afs_Trace4(afs_iclSetp, CM_TRACE_SETLENGTH, ICL_TYPE_STRING,
267                        __FILE__, ICL_TYPE_LONG, __LINE__, ICL_TYPE_OFFSET,
268                        ICL_HANDLE_OFFSET(avc->f.m.Length), ICL_TYPE_OFFSET,
269                        ICL_HANDLE_OFFSET(filePos));
270             avc->f.m.Length = filePos;
271         }
272 #endif
273         ReleaseWriteLock(&tdc->lock);
274         afs_PutDCache(tdc);
275 #if !defined(AFS_VM_RDWR_ENV)
276         /*
277          * If write is implemented via VM, afs_DoPartialWrite() is called from
278          * the high-level write op.
279          */
280         if (!noLock) {
281             code = afs_DoPartialWrite(avc, &treq);
282             if (code) {
283                 error = code;
284                 break;
285             }
286         }
287 #endif
288     }
289 #ifndef AFS_VM_RDWR_ENV
290     afs_FakeClose(avc, acred);
291 #endif
292     if (error && !avc->vc_error)
293         avc->vc_error = error;
294     if (!noLock)
295         ReleaseWriteLock(&avc->lock);
296 #ifdef AFS_DARWIN80_ENV
297     uio_free(tuiop);
298 #else
299     osi_FreeSmallSpace(tvec);
300 #endif
301     error = afs_CheckCode(error, &treq, 6);
302     return error;
303 }
304
305
306 /* called on writes */
307 int
308 afs_UFSWrite(struct vcache *avc, struct uio *auio, int aio,
309              afs_ucred_t *acred, int noLock)
310 {
311     afs_size_t totalLength;
312     afs_size_t transferLength;
313     afs_size_t filePos;
314     afs_size_t offset, len;
315     afs_int32 tlen;
316     afs_int32 trimlen;
317     afs_int32 startDate;
318     afs_int32 max;
319     struct dcache *tdc;
320 #ifdef _HIGHC_
321     volatile
322 #endif
323     afs_int32 error;
324 #ifdef AFS_DARWIN80_ENV
325     uio_t tuiop = NULL;
326 #else
327     struct uio tuio;
328     struct uio *tuiop = &tuio;
329     struct iovec *tvec;         /* again, should have define */
330 #endif
331     struct osi_file *tfile;
332     afs_int32 code;
333     struct vrequest treq;
334
335     AFS_STATCNT(afs_UFSWrite);
336     if (avc->vc_error)
337         return avc->vc_error;
338
339     if (AFS_IS_DISCONNECTED && !AFS_IS_DISCON_RW)
340         return ENETDOWN;
341     
342     startDate = osi_Time();
343     if ((code = afs_InitReq(&treq, acred)))
344         return code;
345     /* otherwise we read */
346     totalLength = AFS_UIO_RESID(auio);
347     filePos = AFS_UIO_OFFSET(auio);
348     error = 0;
349     transferLength = 0;
350     afs_Trace4(afs_iclSetp, CM_TRACE_WRITE, ICL_TYPE_POINTER, avc,
351                ICL_TYPE_OFFSET, ICL_HANDLE_OFFSET(filePos), ICL_TYPE_OFFSET,
352                ICL_HANDLE_OFFSET(totalLength), ICL_TYPE_OFFSET,
353                ICL_HANDLE_OFFSET(avc->f.m.Length));
354     if (!noLock) {
355         afs_MaybeWakeupTruncateDaemon();
356         ObtainWriteLock(&avc->lock, 556);
357     }
358 #if defined(AFS_SGI_ENV)
359     {
360         off_t diff;
361         /*
362          * afs_xwrite handles setting m.Length
363          * and handles APPEND mode.
364          * Since we are called via strategy, we need to trim the write to
365          * the actual size of the file
366          */
367         osi_Assert(filePos <= avc->f.m.Length);
368         diff = avc->f.m.Length - filePos;
369         AFS_UIO_SETRESID(auio, MIN(totalLength, diff));
370         totalLength = AFS_UIO_RESID(auio);
371     }
372 #else
373     if (aio & IO_APPEND) {
374         /* append mode, start it at the right spot */
375 #if     defined(AFS_SUN56_ENV)
376         auio->uio_loffset = 0;
377 #endif
378         filePos = avc->f.m.Length;
379         AFS_UIO_SETOFFSET(auio, avc->f.m.Length);
380     }
381 #endif
382     /*
383      * Note that we use startDate rather than calling osi_Time() here.
384      * This is to avoid counting lock-waiting time in file date (for ranlib).
385      */
386     avc->f.m.Date = startDate;
387
388 #if     defined(AFS_HPUX_ENV)
389 #if     defined(AFS_HPUX101_ENV)
390     if ((totalLength + filePos) >> 9 >
391         p_rlimit(u.u_procp)[RLIMIT_FSIZE].rlim_cur) {
392 #else
393     if ((totalLength + filePos) >> 9 > u.u_rlimit[RLIMIT_FSIZE].rlim_cur) {
394 #endif
395         if (!noLock)
396             ReleaseWriteLock(&avc->lock);
397         return (EFBIG);
398     }
399 #endif
400 #ifdef  AFS_VM_RDWR_ENV
401     /*
402      * If write is implemented via VM, afs_FakeOpen() is called from the
403      * high-level write op.
404      */
405     if (avc->execsOrWriters <= 0) {
406         afs_warn("WARNING: afs_ufswr vcp=%lx, exOrW=%d\n", (unsigned long)avc,
407                avc->execsOrWriters);
408     }
409 #else
410     afs_FakeOpen(avc);
411 #endif
412     avc->f.states |= CDirty;
413 #ifndef AFS_DARWIN80_ENV
414     tvec = (struct iovec *)osi_AllocSmallSpace(sizeof(struct iovec));
415 #endif
416     while (totalLength > 0) {
417         tdc = afs_ObtainDCacheForWriting(avc, filePos, totalLength, &treq, 
418                                          noLock);
419         if (!tdc) {
420             error = EIO;
421             break;
422         }
423         tfile = (struct osi_file *)osi_UFSOpen(&tdc->f.inode);
424         len = totalLength;      /* write this amount by default */
425         offset = filePos - AFS_CHUNKTOBASE(tdc->f.chunk);
426         max = AFS_CHUNKTOSIZE(tdc->f.chunk);    /* max size of this chunk */
427         if (max <= len + offset) {      /*if we'd go past the end of this chunk */
428             /* it won't all fit in this chunk, so write as much
429              * as will fit */
430             len = max - offset;
431         }
432
433 #ifdef  AFS_DARWIN80_ENV
434         if (tuiop)
435             uio_free(tuiop);
436         trimlen = len;
437         tuiop = afsio_darwin_partialcopy(auio, trimlen);
438 #else
439         /* mung uio structure to be right for this transfer */
440         afsio_copy(auio, &tuio, tvec);
441         trimlen = len;
442         afsio_trim(&tuio, trimlen);
443 #endif
444         AFS_UIO_SETOFFSET(tuiop, offset);
445
446 #if defined(AFS_AIX41_ENV)
447         AFS_GUNLOCK();
448         code =
449             VNOP_RDWR(tfile->vnode, UIO_WRITE, FWRITE, &tuio, NULL, NULL,
450                       NULL, afs_osi_credp);
451         AFS_GLOCK();
452 #elif defined(AFS_AIX32_ENV)
453         code = VNOP_RDWR(tfile->vnode, UIO_WRITE, FWRITE, &tuio, NULL, NULL);
454 #elif defined(AFS_AIX_ENV)
455         code =
456             VNOP_RDWR(tfile->vnode, UIO_WRITE, FWRITE, (off_t) & offset,
457                       &tuio, NULL, NULL, -1);
458 #elif defined(AFS_SUN5_ENV)
459         AFS_GUNLOCK();
460 #ifdef AFS_SUN510_ENV
461         {
462             caller_context_t ct;
463
464             VOP_RWLOCK(tfile->vnode, 1, &ct);
465             code = VOP_WRITE(tfile->vnode, &tuio, 0, afs_osi_credp, &ct);
466             VOP_RWUNLOCK(tfile->vnode, 1, &ct);
467         }
468 #else
469         VOP_RWLOCK(tfile->vnode, 1);
470         code = VOP_WRITE(tfile->vnode, &tuio, 0, afs_osi_credp);
471         VOP_RWUNLOCK(tfile->vnode, 1);
472 #endif
473         AFS_GLOCK();
474         if (code == ENOSPC)
475             afs_warnuser
476                 ("\n\n\n*** Cache partition is full - decrease cachesize!!! ***\n\n\n");
477 #elif defined(AFS_SGI_ENV)
478         AFS_GUNLOCK();
479         avc->f.states |= CWritingUFS;
480         AFS_VOP_RWLOCK(tfile->vnode, VRWLOCK_WRITE);
481         AFS_VOP_WRITE(tfile->vnode, &tuio, IO_ISLOCKED, afs_osi_credp, code);
482         AFS_VOP_RWUNLOCK(tfile->vnode, VRWLOCK_WRITE);
483         avc->f.states &= ~CWritingUFS;
484         AFS_GLOCK();
485 #elif defined(AFS_HPUX100_ENV)
486         {
487             AFS_GUNLOCK();
488             code = VOP_RDWR(tfile->vnode, &tuio, UIO_WRITE, 0, afs_osi_credp);
489             AFS_GLOCK();
490         }
491 #elif defined(AFS_LINUX20_ENV)
492         AFS_GUNLOCK();
493         code = osi_rdwr(tfile, &tuio, UIO_WRITE);
494         AFS_GLOCK();
495 #elif defined(AFS_DARWIN80_ENV)
496         AFS_GUNLOCK();
497         code = VNOP_WRITE(tfile->vnode, tuiop, 0, afs_osi_ctxtp);
498         AFS_GLOCK();
499 #elif defined(AFS_DARWIN_ENV)
500         AFS_GUNLOCK();
501         VOP_LOCK(tfile->vnode, LK_EXCLUSIVE, current_proc());
502         code = VOP_WRITE(tfile->vnode, &tuio, 0, afs_osi_credp);
503         VOP_UNLOCK(tfile->vnode, 0, current_proc());
504         AFS_GLOCK();
505 #elif defined(AFS_FBSD80_ENV)
506         AFS_GUNLOCK();
507         VOP_LOCK(tfile->vnode, LK_EXCLUSIVE);
508         code = VOP_WRITE(tfile->vnode, &tuio, 0, afs_osi_credp);
509         VOP_UNLOCK(tfile->vnode, 0);
510         AFS_GLOCK();
511 #elif defined(AFS_FBSD_ENV)
512         AFS_GUNLOCK();
513         VOP_LOCK(tfile->vnode, LK_EXCLUSIVE, curthread);
514         code = VOP_WRITE(tfile->vnode, &tuio, 0, afs_osi_credp);
515         VOP_UNLOCK(tfile->vnode, 0, curthread);
516         AFS_GLOCK();
517 #elif defined(AFS_NBSD_ENV)
518         AFS_GUNLOCK();
519         VOP_LOCK(tfile->vnode, LK_EXCLUSIVE);
520         code = VOP_WRITE(tfile->vnode, &tuio, 0, afs_osi_credp);
521         VOP_UNLOCK(tfile->vnode, 0);
522         AFS_GLOCK();
523 #elif defined(AFS_XBSD_ENV)
524         AFS_GUNLOCK();
525         VOP_LOCK(tfile->vnode, LK_EXCLUSIVE, curproc);
526         code = VOP_WRITE(tfile->vnode, &tuio, 0, afs_osi_credp);
527         VOP_UNLOCK(tfile->vnode, 0, curproc);
528         AFS_GLOCK();
529 #else
530 #ifdef  AFS_HPUX_ENV
531         tuio.uio_fpflags &= ~FSYNCIO;   /* don't do sync io */
532 #endif
533         code = VOP_RDWR(tfile->vnode, &tuio, UIO_WRITE, 0, afs_osi_credp);
534 #endif
535         if (code) {
536             error = code;
537             ZapDCE(tdc);        /* bad data */
538             osi_UFSTruncate(tfile, 0);  /* fake truncate the segment */
539             afs_AdjustSize(tdc, 0);     /* sets f.chunkSize to 0 */
540             afs_stats_cmperf.cacheCurrDirtyChunks--;
541             afs_indexFlags[tdc->index] &= ~IFDataMod;   /* so it does disappear */
542             afs_CFileClose(tfile);
543             ReleaseWriteLock(&tdc->lock);
544             afs_PutDCache(tdc);
545             break;
546         }
547         /* otherwise we've written some, fixup length, etc and continue with next seg */
548         len = len - AFS_UIO_RESID(tuiop);       /* compute amount really transferred */
549         tlen = len;
550         afsio_skip(auio, tlen); /* advance auio over data written */
551         /* compute new file size */
552         if (offset + len > tdc->f.chunkBytes) {
553             afs_int32 tlength = offset + len;
554             afs_AdjustSize(tdc, tlength);
555             if (tdc->validPos < filePos + len)
556                 tdc->validPos = filePos + len;
557         }
558         totalLength -= len;
559         transferLength += len;
560         filePos += len;
561 #if defined(AFS_SGI_ENV)
562         /* afs_xwrite handles setting m.Length */
563         osi_Assert(filePos <= avc->f.m.Length);
564 #else
565         if (filePos > avc->f.m.Length) {
566             if (AFS_IS_DISCON_RW)
567                 afs_PopulateDCache(avc, filePos, &treq);
568             afs_Trace4(afs_iclSetp, CM_TRACE_SETLENGTH, ICL_TYPE_STRING,
569                        __FILE__, ICL_TYPE_LONG, __LINE__, ICL_TYPE_OFFSET,
570                        ICL_HANDLE_OFFSET(avc->f.m.Length), ICL_TYPE_OFFSET,
571                        ICL_HANDLE_OFFSET(filePos));
572             avc->f.m.Length = filePos;
573         }
574 #endif
575         osi_UFSClose(tfile);
576         ReleaseWriteLock(&tdc->lock);
577         afs_PutDCache(tdc);
578 #if !defined(AFS_VM_RDWR_ENV)
579         /*
580          * If write is implemented via VM, afs_DoPartialWrite() is called from
581          * the high-level write op.
582          */
583         if (!noLock) {
584             code = afs_DoPartialWrite(avc, &treq);
585             if (code) {
586                 error = code;
587                 break;
588             }
589         }
590 #endif
591     }
592 #ifndef AFS_VM_RDWR_ENV
593     afs_FakeClose(avc, acred);
594 #endif
595     error = afs_CheckCode(error, &treq, 7);
596     /* This set is here so we get the CheckCode. */
597     if (error && !avc->vc_error)
598         avc->vc_error = error;
599     if (!noLock)
600         ReleaseWriteLock(&avc->lock);
601 #ifdef AFS_DARWIN80_ENV
602     uio_free(tuiop);
603 #else
604     osi_FreeSmallSpace(tvec);
605 #endif
606 #ifndef AFS_VM_RDWR_ENV
607     /*
608      * If write is implemented via VM, afs_fsync() is called from the high-level
609      * write op.
610      */
611 #if defined(AFS_DARWIN_ENV) || defined(AFS_XBSD_ENV)
612     if (noLock && (aio & IO_SYNC)) {
613 #else
614 #ifdef  AFS_HPUX_ENV
615     /* On hpux on synchronous writes syncio will be set to IO_SYNC. If
616      * we're doing them because the file was opened with O_SYNCIO specified,
617      * we have to look in the u area. No single mechanism here!!
618      */
619     if (noLock && ((aio & IO_SYNC) | (auio->uio_fpflags & FSYNCIO))) {
620 #else
621     if (noLock && (aio & FSYNC)) {
622 #endif
623 #endif
624         if (!AFS_NFSXLATORREQ(acred))
625             afs_fsync(avc, acred);
626     }
627 #endif
628     return error;
629 }
630
631 /* do partial write if we're low on unmodified chunks */
632 int
633 afs_DoPartialWrite(struct vcache *avc, struct vrequest *areq)
634 {
635     afs_int32 code;
636
637     if (afs_stats_cmperf.cacheCurrDirtyChunks <=
638         afs_stats_cmperf.cacheMaxDirtyChunks
639         || AFS_IS_DISCONNECTED)
640         return 0;               /* nothing to do */
641     /* otherwise, call afs_StoreDCache (later try to do this async, if possible) */
642     afs_Trace2(afs_iclSetp, CM_TRACE_PARTIALWRITE, ICL_TYPE_POINTER, avc,
643                ICL_TYPE_OFFSET, ICL_HANDLE_OFFSET(avc->f.m.Length));
644
645 #if     defined(AFS_SUN5_ENV)
646     code = afs_StoreAllSegments(avc, areq, AFS_ASYNC | AFS_VMSYNC_INVAL);
647 #else
648     code = afs_StoreAllSegments(avc, areq, AFS_ASYNC);
649 #endif
650     return code;
651 }
652
653 /* handle any closing cleanup stuff */
654 int
655 #if defined(AFS_SGI65_ENV)
656 afs_close(OSI_VC_DECL(avc), afs_int32 aflags, lastclose_t lastclose,
657           afs_ucred_t *acred)
658 #elif defined(AFS_SGI64_ENV)
659 afs_close(OSI_VC_DECL(avc), afs_int32 aflags, lastclose_t lastclose,
660           off_t offset, afs_ucred_t *acred, struct flid *flp)
661 #elif defined(AFS_SGI_ENV)
662 afs_close(OSI_VC_DECL(avc), afs_int32 aflags, lastclose_t lastclose
663           off_t offset, afs_ucred_t *acred)
664 #elif defined(AFS_SUN5_ENV)
665 afs_close(OSI_VC_DECL(avc), afs_int32 aflags, int count, offset_t offset, 
666          afs_ucred_t *acred)
667 #else
668 afs_close(OSI_VC_DECL(avc), afs_int32 aflags, afs_ucred_t *acred)
669 #endif
670 {
671     afs_int32 code;
672     struct brequest *tb;
673     struct vrequest treq;
674 #ifdef AFS_SGI65_ENV
675     struct flid flid;
676 #endif
677     struct afs_fakestat_state fakestat;
678     OSI_VC_CONVERT(avc);
679
680     AFS_STATCNT(afs_close);
681     afs_Trace2(afs_iclSetp, CM_TRACE_CLOSE, ICL_TYPE_POINTER, avc,
682                ICL_TYPE_INT32, aflags);
683     code = afs_InitReq(&treq, acred);
684     if (code)
685         return code;
686     afs_InitFakeStat(&fakestat);
687     code = afs_EvalFakeStat(&avc, &fakestat, &treq);
688     if (code) {
689         afs_PutFakeStat(&fakestat);
690         return code;
691     }
692     AFS_DISCON_LOCK();
693 #ifdef  AFS_SUN5_ENV
694     if (avc->flockCount) {
695         HandleFlock(avc, LOCK_UN, &treq, 0, 1 /*onlymine */ );
696     }
697 #endif
698 #if defined(AFS_SGI_ENV)
699     if (!lastclose) {
700         afs_PutFakeStat(&fakestat);
701         AFS_DISCON_UNLOCK();
702         return 0;
703     }
704     /* unlock any locks for pid - could be wrong for child .. */
705     AFS_RWLOCK((vnode_t *) avc, VRWLOCK_WRITE);
706 # ifdef AFS_SGI65_ENV
707     get_current_flid(&flid);
708     cleanlocks((vnode_t *) avc, flid.fl_pid, flid.fl_sysid);
709     HandleFlock(avc, LOCK_UN, &treq, flid.fl_pid, 1 /*onlymine */ );
710 # else
711 #  ifdef AFS_SGI64_ENV
712     cleanlocks((vnode_t *) avc, flp);
713 #  else /* AFS_SGI64_ENV */
714     cleanlocks((vnode_t *) avc, u.u_procp->p_epid, u.u_procp->p_sysid);
715 #  endif /* AFS_SGI64_ENV */
716     HandleFlock(avc, LOCK_UN, &treq, OSI_GET_CURRENT_PID(), 1 /*onlymine */ );
717 # endif /* AFS_SGI65_ENV */
718     /* afs_chkpgoob will drop and re-acquire the global lock. */
719     afs_chkpgoob(&avc->v, btoc(avc->f.m.Length));
720 #elif defined(AFS_SUN5_ENV)
721     if (count > 1) {
722         /* The vfs layer may call this repeatedly with higher "count"; only
723          * on the last close (i.e. count = 1) we should actually proceed
724          * with the close. */
725         afs_PutFakeStat(&fakestat);
726         AFS_DISCON_UNLOCK();
727         return 0;
728     }
729 #else
730     if (avc->flockCount) {      /* Release Lock */
731         HandleFlock(avc, LOCK_UN, &treq, 0, 1 /*onlymine */ );
732     }
733 #endif
734     if (aflags & (FWRITE | FTRUNC)) {
735         if (afs_BBusy() || (AFS_NFSXLATORREQ(acred)) || AFS_IS_DISCONNECTED) {
736             /* do it yourself if daemons are all busy */
737             ObtainWriteLock(&avc->lock, 124);
738             code = afs_StoreOnLastReference(avc, &treq);
739             ReleaseWriteLock(&avc->lock);
740 #if defined(AFS_SGI_ENV)
741             AFS_RWUNLOCK((vnode_t *) avc, VRWLOCK_WRITE);
742 #endif
743         } else {
744 #if defined(AFS_SGI_ENV)
745             AFS_RWUNLOCK((vnode_t *) avc, VRWLOCK_WRITE);
746 #endif
747             /* at least one daemon is idle, so ask it to do the store.
748              * Also, note that  we don't lock it any more... */
749             tb = afs_BQueue(BOP_STORE, avc, 0, 1, acred,
750                             (afs_size_t) afs_cr_uid(acred), (afs_size_t) 0,
751                             (void *)0, (void *)0, (void *)0);
752             /* sleep waiting for the store to start, then retrieve error code */
753             while ((tb->flags & BUVALID) == 0) {
754                 tb->flags |= BUWAIT;
755                 afs_osi_Sleep(tb);
756             }
757             code = tb->code;
758             afs_BRelease(tb);
759         }
760
761         /* VNOVNODE is "acceptable" error code from close, since
762          * may happen when deleting a file on another machine while
763          * it is open here. We do the same for ENOENT since in afs_CheckCode we map VNOVNODE -> ENOENT */
764         if (code == VNOVNODE || code == ENOENT)
765             code = 0;
766
767         /* Ensure last closer gets the error. If another thread caused
768          * DoPartialWrite and this thread does not actually store the data,
769          * it may not see the quota error.
770          */
771         ObtainWriteLock(&avc->lock, 406);
772         if (avc->vc_error) {
773 #ifdef AFS_AIX32_ENV
774             osi_ReleaseVM(avc, acred);
775 #endif
776             /* printf("avc->vc_error=%d\n", avc->vc_error); */
777             code = avc->vc_error;
778             avc->vc_error = 0;
779         }
780         ReleaseWriteLock(&avc->lock);
781
782         /* some codes merit specific complaint */
783         if (code < 0) {
784             afs_warnuser("afs: failed to store file (network problems)\n");
785         }
786 #ifdef  AFS_SUN5_ENV
787         else if (code == ENOSPC) {
788             afs_warnuser
789                 ("afs: failed to store file (over quota or partition full)\n");
790         }
791 #else
792         else if (code == ENOSPC) {
793             afs_warnuser("afs: failed to store file (partition full)\n");
794         } else if (code == EDQUOT) {
795             afs_warnuser("afs: failed to store file (over quota)\n");
796         }
797 #endif
798         else if (code != 0)
799             afs_warnuser("afs: failed to store file (%d)\n", code);
800
801         /* finally, we flush any text pages lying around here */
802         hzero(avc->flushDV);
803         osi_FlushText(avc);
804     } else {
805 #if defined(AFS_SGI_ENV)
806         AFS_RWUNLOCK((vnode_t *) avc, VRWLOCK_WRITE);
807         osi_Assert(avc->opens > 0);
808 #endif
809         /* file open for read */
810         ObtainWriteLock(&avc->lock, 411);
811         if (avc->vc_error) {
812 #ifdef AFS_AIX32_ENV
813             osi_ReleaseVM(avc, acred);
814 #endif
815             code = avc->vc_error;
816             avc->vc_error = 0;
817         }
818         avc->opens--;
819         ReleaseWriteLock(&avc->lock);
820     }
821     AFS_DISCON_UNLOCK();
822     afs_PutFakeStat(&fakestat);
823     code = afs_CheckCode(code, &treq, 5);
824     return code;
825 }
826
827
828 int
829 #if defined(AFS_SGI_ENV) || defined(AFS_SUN53_ENV)
830 afs_fsync(OSI_VC_DECL(avc), int flag, afs_ucred_t *acred
831 # ifdef AFS_SGI65_ENV
832           , off_t start, off_t stop
833 # endif /* AFS_SGI65_ENV */
834     )
835 #else /* !SUN53 && !SGI */
836 afs_fsync(OSI_VC_DECL(avc), afs_ucred_t *acred)
837 #endif 
838 {
839     afs_int32 code;
840     struct vrequest treq;
841     OSI_VC_CONVERT(avc);
842
843     if (avc->vc_error)
844         return avc->vc_error;
845
846 #if defined(AFS_SUN5_ENV)
847     /* back out if called from NFS server */
848     if (curthread->t_flag & T_DONTPEND)
849         return 0;
850 #endif
851
852     AFS_STATCNT(afs_fsync);
853     afs_Trace1(afs_iclSetp, CM_TRACE_FSYNC, ICL_TYPE_POINTER, avc);
854     if ((code = afs_InitReq(&treq, acred)))
855         return code;
856     AFS_DISCON_LOCK();
857 #if defined(AFS_SGI_ENV)
858     AFS_RWLOCK((vnode_t *) avc, VRWLOCK_WRITE);
859     if (flag & FSYNC_INVAL)
860         osi_VM_FSyncInval(avc);
861 #endif /* AFS_SGI_ENV */
862
863     ObtainSharedLock(&avc->lock, 18);
864     code = 0;
865     if (avc->execsOrWriters > 0) {
866         if (!AFS_IS_DISCONNECTED && !AFS_IS_DISCON_RW) {
867             /* Your average flush. */
868             
869             /* put the file back */
870             UpgradeSToWLock(&avc->lock, 41);
871             code = afs_StoreAllSegments(avc, &treq, AFS_SYNC);
872             ConvertWToSLock(&avc->lock);
873         } else {
874             UpgradeSToWLock(&avc->lock, 711);
875             afs_DisconAddDirty(avc, VDisconWriteFlush, 1);
876             ConvertWToSLock(&avc->lock);
877         }               /* if not disconnected */
878     }                   /* if (avc->execsOrWriters > 0) */
879
880 #if defined(AFS_SGI_ENV)
881     AFS_RWUNLOCK((vnode_t *) avc, VRWLOCK_WRITE);
882     if (code == VNOVNODE) {
883         /* syncing an unlinked file! - non-informative to pass an errno
884          * 102 (== VNOVNODE) to user
885          */
886         code = ENOENT;
887     }
888 #endif
889     AFS_DISCON_UNLOCK();
890     code = afs_CheckCode(code, &treq, 33);
891     ReleaseSharedLock(&avc->lock);
892     return code;
893 }