prefetch-pioctls-overflow-20001104
[openafs.git] / src / afs / afs_daemons.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 #include "../afs/param.h"       /* Should be always first */
11 #include "../afs/sysincludes.h" /* Standard vendor system headers */
12 #include "../afs/afsincludes.h" /* Afs-based standard headers */
13 #include "../afs/afs_stats.h"   /* statistics gathering code */
14 #include "../afs/afs_cbqueue.h" 
15 #ifdef AFS_AIX_ENV
16 #include <sys/adspace.h>        /* for vm_att(), vm_det() */
17 #endif
18
19
20 /* background request queue size */
21 afs_lock_t afs_xbrs;            /* lock for brs */
22 static int brsInit = 0;
23 short afs_brsWaiters = 0;       /* number of users waiting for brs buffers */
24 short afs_brsDaemons = 0;       /* number of daemons waiting for brs requests */
25 struct brequest afs_brs[NBRS];  /* request structures */
26 struct afs_osi_WaitHandle AFS_WaitHandler, AFS_CSWaitHandler;
27
28 static int rxepoch_checked=0;
29 #define afs_CheckRXEpoch() {if (rxepoch_checked == 0 && rxkad_EpochWasSet) { \
30         rxepoch_checked = 1; afs_GCUserData(/* force flag */ 1);  } }
31
32 extern char afs_rootVolumeName[];
33 extern struct vcache *afs_globalVp;
34 extern struct VenusFid afs_rootFid;
35 extern struct osi_dev cacheDev;
36 extern char *afs_indexFlags;
37 extern afs_rwlock_t afs_xvcache;
38 extern struct afs_exporter *afs_nfsexporter;
39 extern int cacheDiskType;
40 extern int afs_BumpBase();
41 extern void afs_CheckCallbacks();
42
43 /* PAG garbage collection */
44 /* We induce a compile error if param.h does not define AFS_GCPAGS */
45 afs_int32 afs_gcpags=AFS_GCPAGS;
46 afs_int32 afs_gcpags_procsize;
47
48 afs_int32 afs_CheckServerDaemonStarted = 0;
49 afs_int32 PROBE_INTERVAL=180;   /* default to 3 min */
50
51 #define PROBE_WAIT() (1000 * (PROBE_INTERVAL - ((afs_random() & 0x7fffffff) \
52                       % (PROBE_INTERVAL/2))))
53
54 afs_CheckServerDaemon()
55 {
56     afs_int32 now, delay, lastCheck, last10MinCheck;
57
58     afs_CheckServerDaemonStarted = 1;
59
60     while (afs_initState < 101) afs_osi_Sleep(&afs_initState);
61     afs_osi_Wait(PROBE_WAIT(), &AFS_CSWaitHandler, 0);  
62     
63     last10MinCheck = lastCheck = osi_Time();
64     while ( 1 ) {
65         if (afs_termState == AFSOP_STOP_CS) {
66             afs_termState = AFSOP_STOP_BKG;
67             afs_osi_Wakeup(&afs_termState);
68             break;
69         }
70
71         now = osi_Time();
72         if (PROBE_INTERVAL + lastCheck <= now) {
73             afs_CheckServers(1, (struct cell *) 0); /* check down servers */
74             lastCheck = now = osi_Time();
75         }
76
77         if (600 + last10MinCheck <= now) {
78             afs_Trace1(afs_iclSetp, CM_TRACE_PROBEUP, ICL_TYPE_INT32, 600);
79             afs_CheckServers(0, (struct cell *) 0);
80             last10MinCheck = now = osi_Time();
81         }
82         /* shutdown check. */
83         if (afs_termState == AFSOP_STOP_CS) {
84             afs_termState = AFSOP_STOP_BKG;
85             afs_osi_Wakeup(&afs_termState);
86             break;
87         }
88
89         /* Compute time to next probe. */
90         delay = PROBE_INTERVAL + lastCheck;
91         if (delay > 600 + last10MinCheck)
92             delay = 600 + last10MinCheck;
93         delay -= now;
94         if (delay < 1)
95             delay = 1;
96         afs_osi_Wait(delay * 1000,  &AFS_CSWaitHandler, 0);  
97     }
98     afs_CheckServerDaemonStarted = 0;
99 }
100
101 void afs_Daemon() {
102     afs_int32 code;
103     extern struct afs_exporter *root_exported;
104     struct afs_exporter *exporter;
105     afs_int32 now;
106     afs_int32 last3MinCheck, last10MinCheck, last60MinCheck, lastNMinCheck;
107     afs_int32 last1MinCheck;
108     afs_uint32 lastCBSlotBump;
109     char cs_warned = 0;
110
111     AFS_STATCNT(afs_Daemon);
112     last1MinCheck = last3MinCheck = last60MinCheck = last10MinCheck = lastNMinCheck = 0;
113
114     afs_rootFid.Fid.Volume = 0;
115     while (afs_initState < 101) afs_osi_Sleep(&afs_initState);
116
117     now = osi_Time();
118     lastCBSlotBump = now;
119
120     /* when a lot of clients are booted simultaneously, they develop
121      * annoying synchronous VL server bashing behaviors.  So we stagger them.
122      */
123     last1MinCheck = now + ((afs_random() & 0x7fffffff) % 60); /* an extra 30 */
124     last3MinCheck = now - 90 + ((afs_random() & 0x7fffffff) % 180);
125     last60MinCheck = now - 1800 + ((afs_random() & 0x7fffffff) % 3600);
126     last10MinCheck = now - 300 + ((afs_random() & 0x7fffffff) % 600);
127     lastNMinCheck = now - 90 + ((afs_random() & 0x7fffffff) % 180);
128
129     /* start off with afs_initState >= 101 (basic init done) */
130     while(1) {
131         afs_CheckCallbacks(20);  /* unstat anything which will expire soon */
132         
133         /* things to do every 20 seconds or less - required by protocol spec */
134         if (afs_nfsexporter) 
135             afs_FlushActiveVcaches(0);  /* flush NFS writes */
136         afs_FlushVCBs(1);               /* flush queued callbacks */
137         afs_MaybeWakeupTruncateDaemon();        /* free cache space if have too */
138         rx_CheckPackets();              /* Does RX need more packets? */
139 #if     defined(AFS_AIX32_ENV) || defined(AFS_HPUX_ENV)
140         /* 
141          * Hack: We always want to make sure there are plenty free
142          * entries in the small free pool so that we don't have to
143          * worry about rx (with disabled interrupts) to have to call
144          * malloc). So we do the dummy call below...
145          */
146         if (((afs_stats_cmperf.SmallBlocksAlloced - afs_stats_cmperf.SmallBlocksActive) 
147              <= AFS_SALLOC_LOW_WATER))
148             osi_FreeSmallSpace(osi_AllocSmallSpace(AFS_SMALLOCSIZ));
149         if (((afs_stats_cmperf.MediumBlocksAlloced - afs_stats_cmperf.MediumBlocksActive) 
150              <= AFS_MALLOC_LOW_WATER+50)) 
151             osi_AllocMoreMSpace(AFS_MALLOC_LOW_WATER * 2); 
152 #endif
153         
154         now = osi_Time();
155         if (lastCBSlotBump + CBHTSLOTLEN < now) {  /* pretty time-dependant */
156             lastCBSlotBump = now;
157             if (afs_BumpBase()) {
158                 afs_CheckCallbacks(20);  /* unstat anything which will expire soon */
159             }
160         }
161         
162         if (last1MinCheck + 60 < now) {
163             /* things to do every minute */
164             DFlush();                   /* write out dir buffers */
165             afs_WriteThroughDSlots();   /* write through cacheinfo entries */
166             afs_FlushActiveVcaches(1);/* keep flocks held & flush nfs writes */
167             afs_CheckRXEpoch();
168             last1MinCheck = now;
169         }
170         
171         if (last3MinCheck + 180 < now) {
172             afs_CheckTokenCache();      /* check for access cache resets due to expired
173                                            tickets */
174             last3MinCheck = now;
175         }
176         if (!afs_CheckServerDaemonStarted) {
177             /* Do the check here if the correct afsd is not installed. */
178             if (!cs_warned) {
179                 cs_warned = 1;
180                 printf("Please install afsd with check server daemon.\n");
181             }
182             if (lastNMinCheck + PROBE_INTERVAL < now) {
183                 /* only check down servers */
184                 afs_CheckServers(1, (struct cell *) 0);
185                 lastNMinCheck = now;
186             }
187         }
188         if (last10MinCheck + 600 < now) {
189 #ifdef AFS_USERSPACE_IP_ADDR    
190             extern int rxi_GetcbiInfo(void);
191 #endif
192             afs_Trace1(afs_iclSetp, CM_TRACE_PROBEUP,
193                        ICL_TYPE_INT32, 600);
194 #ifdef AFS_USERSPACE_IP_ADDR    
195             if (rxi_GetcbiInfo()) { /* addresses changed from last time */
196                 afs_FlushCBs();
197             }
198 #else  /* AFS_USERSPACE_IP_ADDR */
199             if (rxi_GetIFInfo()) { /* addresses changed from last time */
200                 afs_FlushCBs();
201             }
202 #endif /* else AFS_USERSPACE_IP_ADDR */
203             if (!afs_CheckServerDaemonStarted)
204                 afs_CheckServers(0, (struct cell *) 0);
205             afs_GCUserData(0);      /* gc old conns */
206             /* This is probably the wrong way of doing GC for the various exporters but it will suffice for a while */
207             for (exporter = root_exported; exporter; exporter = exporter->exp_next) {
208                 (void) EXP_GC(exporter, 0);     /* Generalize params */
209             }
210             {
211                 static int cnt=0;
212                 if (++cnt < 12) {
213                     afs_CheckVolumeNames(AFS_VOLCHECK_EXPIRED |
214                                          AFS_VOLCHECK_BUSY);
215                 } else {
216                     cnt = 0;
217                     afs_CheckVolumeNames(AFS_VOLCHECK_EXPIRED |
218                                          AFS_VOLCHECK_BUSY |
219                                          AFS_VOLCHECK_MTPTS);
220                 }
221             }
222             last10MinCheck = now;
223         }
224         if (last60MinCheck + 3600 < now) {
225             afs_Trace1(afs_iclSetp, CM_TRACE_PROBEVOLUME,
226                        ICL_TYPE_INT32, 3600);
227             afs_CheckRootVolume();
228 #if AFS_GCPAGS
229             if (afs_gcpags == AFS_GCPAGS_OK) {
230                 afs_int32 didany;
231                 afs_GCPAGs(&didany);
232             }
233 #endif
234             last60MinCheck = now;
235         }
236         if (afs_initState < 300) {      /* while things ain't rosy */
237             code = afs_CheckRootVolume();
238             if (code == 0) afs_initState = 300;             /* succeeded */
239             if (afs_initState < 200) afs_initState = 200;   /* tried once */
240             afs_osi_Wakeup(&afs_initState);
241         }
242         
243         /* 18285 is because we're trying to divide evenly into 128, that is,
244          * CBSlotLen, while staying just under 20 seconds.  If CBSlotLen
245          * changes, should probably change this interval, too. 
246          * Some of the preceding actions may take quite some time, so we
247          * might not want to wait the entire interval */
248         now = 18285 - (osi_Time() - now);
249         if (now > 0) {
250             afs_osi_Wait(now, &AFS_WaitHandler, 0);  
251         }
252         
253         if (afs_termState == AFSOP_STOP_AFS) {
254             if (afs_CheckServerDaemonStarted)
255                 afs_termState = AFSOP_STOP_CS;
256             else
257                 afs_termState = AFSOP_STOP_BKG;
258             afs_osi_Wakeup(&afs_termState);
259             return;
260         }
261     }
262 }
263
264 afs_CheckRootVolume () {
265     char rootVolName[32];
266     register struct volume *tvp;
267
268     AFS_STATCNT(afs_CheckRootVolume);
269     if (*afs_rootVolumeName == 0) {
270         strcpy(rootVolName, "root.afs");
271     }
272     else {
273         strcpy(rootVolName, afs_rootVolumeName);
274     }
275     tvp = afs_GetVolumeByName(rootVolName, LOCALCELL, 1, (struct vrequest *) 0, READ_LOCK);
276     if (!tvp) {
277         char buf[128];
278         int len = strlen(rootVolName);
279
280         if ((len < 9) || strcmp(&rootVolName[len - 9], ".readonly")) {
281             strcpy(buf, rootVolName);
282             afs_strcat(buf, ".readonly");
283             tvp = afs_GetVolumeByName(buf, LOCALCELL, 1, (struct vrequest *) 0, READ_LOCK);
284         }
285     }
286     if (tvp) {
287         int volid = (tvp->roVol? tvp->roVol : tvp->volume);
288         afs_rootFid.Cell = LOCALCELL;
289         if (afs_rootFid.Fid.Volume && afs_rootFid.Fid.Volume != volid
290             && afs_globalVp) {
291             /* If we had a root fid before and it changed location we reset
292              * the afs_globalVp so that it will be reevaluated.
293              * Just decrement the reference count. This only occurs during
294              * initial cell setup and can panic the machine if we set the
295              * count to zero and fs checkv is executed when the current
296              * directory is /afs.
297              */
298             AFS_FAST_RELE(afs_globalVp);
299             afs_globalVp = 0;
300         }
301         afs_rootFid.Fid.Volume = volid;
302         afs_rootFid.Fid.Vnode = 1;
303         afs_rootFid.Fid.Unique = 1;
304         afs_initState = 300;    /* won */
305         afs_osi_Wakeup(&afs_initState);
306         afs_PutVolume(tvp, READ_LOCK);
307     }
308 #ifdef AFS_DEC_ENV
309 /* This is to make sure that we update the root gnode */
310 /* every time root volume gets released */
311     {
312         extern struct vfs *afs_globalVFS;
313         extern int afs_root();
314         struct gnode *rootgp;
315         struct mount *mp;
316         int code;
317
318         /* Only do this if afs_globalVFS is properly set due to race conditions
319            this routine could be called before the gfs_mount is performed!
320            Furthermore, afs_root (called below) *waits* until
321            initState >= 200, so we don't try this until we've gotten
322            at least that far */
323         if (afs_globalVFS && afs_initState >= 200) {
324             if (code = afs_root(afs_globalVFS, &rootgp))
325                 return code;
326             mp = (struct mount *) afs_globalVFS->vfs_data ;
327             mp->m_rootgp = gget(mp, 0, 0, (char *)rootgp);
328             afs_unlock(mp->m_rootgp);   /* unlock basic gnode */
329             afs_vrele((struct vcache *) rootgp);  /* zap afs_root's vnode hold */
330         }
331     }
332 #endif
333     if (afs_rootFid.Fid.Volume) return 0;
334     else return ENOENT;
335 }
336
337 /* parm 0 is the pathname, parm 1 to the fetch is the chunk number */
338 void BPath(ab)
339     register struct brequest *ab; {
340     register struct dcache *tdc;
341     struct vcache *tvc;
342     struct vnode *tvn;
343 #ifdef AFS_LINUX22_ENV
344     struct dentry *dp = NULL;
345 #endif
346     afs_int32 offset, len;
347     struct vrequest treq;
348     afs_int32 code;
349
350     AFS_STATCNT(BPath);
351     if (code = afs_InitReq(&treq, ab->cred)) return;
352     AFS_GUNLOCK();
353 #ifdef AFS_LINUX22_ENV
354     code = gop_lookupname((char *)ab->parm[0], AFS_UIOSYS, 1,  (struct vnode **) 0, &dp);
355     if (dp)
356         tvn = (struct vcache*)dp->d_inode;
357 #else
358     code = gop_lookupname((char *)ab->parm[0], AFS_UIOSYS, 1,  (struct vnode **) 0, (struct vnode **)&tvn);
359 #endif
360     AFS_GLOCK();
361     osi_FreeLargeSpace((char *)ab->parm[0]); /* free path name buffer here */
362     if (code) return;
363     /* now path may not have been in afs, so check that before calling our cache manager */
364     if (!tvn || !IsAfsVnode((struct vnode *) tvn)) {
365         /* release it and give up */
366         if (tvn) {
367 #ifdef AFS_DEC_ENV
368             grele(tvn);
369 #else
370 #ifdef AFS_LINUX22_ENV
371             dput(dp);
372 #else
373             AFS_RELE((struct vnode *) tvn);
374 #endif
375 #endif
376         }
377         return;
378     }
379 #ifdef AFS_DEC_ENV
380     tvc = (struct vcache *) afs_gntovn(tvn);
381 #else
382     tvc = (struct vcache *) tvn;
383 #endif
384     /* here we know its an afs vnode, so we can get the data for the chunk */
385     tdc = afs_GetDCache(tvc, ab->parm[1], &treq, &offset, &len, 1);
386     if (tdc) {
387         afs_PutDCache(tdc);
388     }
389 #ifdef AFS_DEC_ENV
390     grele(tvn);
391 #else
392 #ifdef AFS_LINUX22_ENV
393     dput(dp);
394 #else
395     AFS_RELE((struct vnode *) tvn);
396 #endif
397 #endif
398 }
399
400 /* parm 0 to the fetch is the chunk number; parm 1 is the dcache entry to wakeup,
401  * parm 2 is true iff we should release the dcache entry here.
402  */
403 void BPrefetch(ab)
404     register struct brequest *ab; {
405     register struct dcache *tdc;
406     register struct vcache *tvc;
407     afs_int32 offset, len;
408     struct vrequest treq;
409
410     AFS_STATCNT(BPrefetch);
411     if (len = afs_InitReq(&treq, ab->cred)) return;
412     tvc = ab->vnode;
413     tdc = afs_GetDCache(tvc, (afs_int32)ab->parm[0], &treq, &offset, &len, 1);
414     if (tdc) {
415         afs_PutDCache(tdc);
416     }
417     /* now, dude may be waiting for us to clear DFFetchReq bit; do so.  Can't
418      * use tdc from GetDCache since afs_GetDCache may fail, but someone may
419      * be waiting for our wakeup anyway.
420      */
421     tdc = (struct dcache *) (ab->parm[1]);
422     tdc->flags &= ~DFFetchReq;
423     afs_osi_Wakeup(&tdc->validPos);
424     if (ab->parm[2]) {
425 #ifdef  AFS_SUN5_ENVX
426         mutex_enter(&tdc->lock);
427         tdc->refCount--;
428         mutex_exit(&tdc->lock);
429 #else
430         afs_PutDCache(tdc);     /* put this one back, too */
431 #endif
432     }
433 }
434
435
436 void BStore(ab)
437     register struct brequest *ab; {
438     register struct vcache *tvc;
439     register afs_int32 code;
440     struct vrequest treq;
441 #if defined(AFS_SGI_ENV)
442     struct cred *tmpcred;
443 #endif
444
445     AFS_STATCNT(BStore);
446     if (code = afs_InitReq(&treq, ab->cred)) return;
447     code = 0;
448     tvc = ab->vnode;
449 #if defined(AFS_SGI_ENV)
450     /*
451      * Since StoreOnLastReference can end up calling osi_SyncVM which
452      * calls into VM code that assumes that u.u_cred has the
453      * correct credentials, we set our to theirs for this xaction
454      */
455     tmpcred = OSI_GET_CURRENT_CRED();
456     OSI_SET_CURRENT_CRED(ab->cred);
457
458     /*
459      * To avoid recursion since the WriteLock may be released during VM
460      * operations, we hold the VOP_RWLOCK across this transaction as
461      * do the other callers of StoreOnLastReference
462      */
463     AFS_RWLOCK((vnode_t *)tvc, 1);
464 #endif
465     ObtainWriteLock(&tvc->lock,209);
466     code = afs_StoreOnLastReference(tvc, &treq);
467     ReleaseWriteLock(&tvc->lock);
468 #if defined(AFS_SGI_ENV)
469     OSI_SET_CURRENT_CRED(tmpcred);
470     AFS_RWUNLOCK((vnode_t *)tvc, 1);
471 #endif
472     /* now set final return code, and wakeup anyone waiting */
473     if ((ab->flags & BUVALID) == 0) {
474         ab->code = afs_CheckCode(code, &treq, 43);    /* set final code, since treq doesn't go across processes */
475         ab->flags |= BUVALID;
476         if (ab->flags & BUWAIT) {
477             ab->flags &= ~BUWAIT;
478             afs_osi_Wakeup(ab);
479         }
480     }
481 }
482
483 /* release a held request buffer */
484 void afs_BRelease(ab)
485     register struct brequest *ab; {
486
487     AFS_STATCNT(afs_BRelease);
488     MObtainWriteLock(&afs_xbrs,294);
489     if (--ab->refCount <= 0) {
490         ab->flags = 0;
491     }
492     if (afs_brsWaiters) afs_osi_Wakeup(&afs_brsWaiters);
493     MReleaseWriteLock(&afs_xbrs);
494 }
495
496 /* return true if bkg fetch daemons are all busy */
497 int afs_BBusy() {
498     AFS_STATCNT(afs_BBusy);
499     if (afs_brsDaemons > 0) return 0;
500     return 1;
501 }
502
503 struct brequest *afs_BQueue(aopcode, avc, dontwait, ause, acred, aparm0, aparm1, aparm2, aparm3)
504     register short aopcode;
505     afs_int32 ause, dontwait;
506     register struct vcache *avc;
507     struct AFS_UCRED *acred;
508     /* On 64 bit platforms, "long" does the right thing. */
509     long aparm0, aparm1, aparm2, aparm3;
510 {
511     register int i;
512     register struct brequest *tb;
513
514     AFS_STATCNT(afs_BQueue);
515     MObtainWriteLock(&afs_xbrs,296);
516     while (1) {
517         tb = afs_brs;
518         for(i=0;i<NBRS;i++,tb++) {
519             if (tb->refCount == 0) break;
520         }
521         if (i < NBRS) {
522             /* found a buffer */
523             tb->opcode = aopcode;
524             tb->vnode = avc;
525             tb->cred = acred;
526             crhold(tb->cred);
527             if (avc) {
528 #ifdef  AFS_DEC_ENV
529                 avc->vrefCount++;
530 #else
531                 VN_HOLD((struct vnode *)avc);
532 #endif
533             }
534             tb->refCount = ause+1;
535             tb->parm[0] = aparm0;
536             tb->parm[1] = aparm1;
537             tb->parm[2] = aparm2;
538             tb->parm[3] = aparm3;
539             tb->flags = 0;
540             tb->code = 0;
541             /* if daemons are waiting for work, wake them up */
542             if (afs_brsDaemons > 0) {
543                 afs_osi_Wakeup(&afs_brsDaemons);
544             }
545             MReleaseWriteLock(&afs_xbrs);
546             return tb;
547         }
548         if (dontwait) {
549             MReleaseWriteLock(&afs_xbrs);
550             return (struct brequest *)0;
551         }
552         /* no free buffers, sleep a while */
553         afs_brsWaiters++;
554         MReleaseWriteLock(&afs_xbrs);
555         afs_osi_Sleep(&afs_brsWaiters);
556         MObtainWriteLock(&afs_xbrs,301);
557         afs_brsWaiters--;
558     }
559 }
560
561 #ifdef  AFS_AIX32_ENV
562 #ifdef AFS_AIX41_ENV
563 /* AIX 4.1 has a much different sleep/wakeup mechanism available for use. 
564  * The modifications here will work for either a UP or MP machine.
565  */
566 struct buf *afs_asyncbuf = (struct buf*)0;
567 afs_int32 afs_asyncbuf_cv = EVENT_NULL;
568 afs_int32 afs_biodcnt = 0;
569
570 /* in implementing this, I assumed that all external linked lists were
571  * null-terminated.  
572  *
573  * Several places in this code traverse a linked list.  The algorithm
574  * used here is probably unfamiliar to most people.  Careful examination
575  * will show that it eliminates an assignment inside the loop, as compared
576  * to the standard algorithm, at the cost of occasionally using an extra
577  * variable.
578  */
579
580 /* get_bioreq()
581  *
582  * This function obtains, and returns, a pointer to a buffer for
583  * processing by a daemon.  It sleeps until such a buffer is available.
584  * The source of buffers for it is the list afs_asyncbuf (see also 
585  * naix_vm_strategy).  This function may be invoked concurrently by
586  * several processes, that is, several instances of the same daemon.
587  * naix_vm_strategy, which adds buffers to the list, runs at interrupt
588  * level, while get_bioreq runs at process level.
589  *
590  * Since AIX 4.1 can wake just one process at a time, the separate sleep
591  * addresses have been removed.
592  * Note that the kernel_lock is held until the e_sleep_thread() occurs. 
593  * The afs_asyncbuf_lock is primarily used to serialize access between
594  * process and interrupts.
595  */
596 Simple_lock afs_asyncbuf_lock;
597 /*static*/ struct buf *afs_get_bioreq()
598 {
599     struct buf *bp = (struct buf *) 0;
600     struct buf *bestbp;
601     struct buf **bestlbpP, **lbpP;
602     int bestage, stop;
603     struct buf *t1P, *t2P;      /* temp pointers for list manipulation */
604     int oldPriority;
605     afs_uint32 wait_ret;
606     struct afs_bioqueue *s;
607
608     /* ??? Does the forward pointer of the returned buffer need to be NULL?
609     */
610     
611     /* Disable interrupts from the strategy function, and save the 
612      * prior priority level and lock access to the afs_asyncbuf.
613      */
614     AFS_GUNLOCK();
615     oldPriority = disable_lock(INTMAX, &afs_asyncbuf_lock) ;
616
617     while(1) {
618         if (afs_asyncbuf) {
619             /* look for oldest buffer */
620             bp = bestbp = afs_asyncbuf;
621             bestage = (int) bestbp->av_back;
622             bestlbpP = &afs_asyncbuf;
623             while (1) {
624                 lbpP = &bp->av_forw;
625                 bp = *lbpP;
626                 if (!bp) break;
627                 if ((int) bp->av_back - bestage < 0) {
628                     bestbp = bp;
629                     bestlbpP = lbpP;
630                     bestage = (int) bp->av_back;
631                 }
632             }
633             bp = bestbp;
634             *bestlbpP = bp->av_forw;
635             break;
636         }
637         else {
638             /* If afs_asyncbuf is null, it is necessary to go to sleep.
639              * e_wakeup_one() ensures that only one thread wakes.
640              */
641             int interrupted;
642             /* The LOCK_HANDLER indicates to e_sleep_thread to only drop the
643              * lock on an MP machine.
644              */
645             interrupted = e_sleep_thread(&afs_asyncbuf_cv,
646                                          &afs_asyncbuf_lock,
647                                          LOCK_HANDLER|INTERRUPTIBLE);
648             if (interrupted==THREAD_INTERRUPTED) {
649                 /* re-enable interrupts from strategy */
650                 unlock_enable(oldPriority, &afs_asyncbuf_lock);
651                 AFS_GLOCK();
652                 return(NULL);
653             }
654         }  /* end of "else asyncbuf is empty" */
655     } /* end of "inner loop" */
656     
657     /*assert (bp);*/
658     
659     unlock_enable(oldPriority, &afs_asyncbuf_lock);
660     AFS_GLOCK();
661
662     /* For the convenience of other code, replace the gnodes in
663      * the b_vp field of bp and the other buffers on the b_work
664      * chain with the corresponding vnodes.   
665      *
666      * ??? what happens to the gnodes?  They're not just cut loose,
667      * are they?
668      */
669     for(t1P=bp;;) {
670         t2P = (struct buf *) t1P->b_work;
671         t1P->b_vp = ((struct gnode *) t1P->b_vp)->gn_vnode;
672         if (!t2P) 
673             break;
674
675         t1P = (struct buf *) t2P->b_work;
676         t2P->b_vp = ((struct gnode *) t2P->b_vp)->gn_vnode;
677         if (!t1P)
678             break;
679     }
680
681     /* If the buffer does not specify I/O, it may immediately
682      * be returned to the caller.  This condition is detected
683      * by examining the buffer's flags (the b_flags field).  If
684      * the B_PFPROT bit is set, the buffer represents a protection
685      * violation, rather than a request for I/O.  The remainder
686      * of the outer loop handles the case where the B_PFPROT bit is clear.
687      */
688     if (bp->b_flags & B_PFPROT)  {
689         return (bp);
690     }
691     return (bp);
692
693 } /* end of function get_bioreq() */
694
695
696 /* afs_BioDaemon
697  *
698  * This function is the daemon.  It is called from the syscall
699  * interface.  Ordinarily, a script or an administrator will run a
700  * daemon startup utility, specifying the number of I/O daemons to
701  * run.  The utility will fork off that number of processes,
702  * each making the appropriate syscall, which will cause this
703  * function to be invoked.
704  */
705 static int afs_initbiod = 0;            /* this is self-initializing code */
706 int DOvmlock = 0;
707 afs_BioDaemon (nbiods)
708     afs_int32 nbiods;
709 {
710     afs_int32 code, s, pflg = 0;
711     label_t jmpbuf;
712     struct buf *bp, *bp1, *tbp1, *tbp2;         /* temp pointers only */
713     caddr_t tmpaddr;
714     struct vnode *vp;
715     struct vcache *vcp;
716     char tmperr;
717     if (!afs_initbiod) {
718         /* XXX ###1 XXX */
719         afs_initbiod = 1;
720         /* pin lock, since we'll be using it in an interrupt. */
721         lock_alloc(&afs_asyncbuf_lock, LOCK_ALLOC_PIN, 2, 1);
722         simple_lock_init(&afs_asyncbuf_lock);
723         pin (&afs_asyncbuf, sizeof(struct buf*));
724         pin (&afs_asyncbuf_cv, sizeof(afs_int32));
725     }
726
727     /* Ignore HUP signals... */
728 #ifdef AFS_AIX41_ENV
729     {
730         sigset_t sigbits, osigbits;
731         /*
732          * add SIGHUP to the set of already masked signals
733          */
734         SIGFILLSET(sigbits);                    /* allow all signals    */
735         SIGDELSET(sigbits, SIGHUP);             /*   except SIGHUP      */
736         limit_sigs(&sigbits, &osigbits);        /*   and already masked */
737     }
738 #else
739     SIGDELSET(u.u_procp->p_sig, SIGHUP);
740     SIGADDSET(u.u_procp->p_sigignore, SIGHUP);
741     SIGDELSET(u.u_procp->p_sigcatch, SIGHUP);
742 #endif
743     /* Main body starts here -- this is an intentional infinite loop, and
744      * should NEVER exit 
745      *
746      * Now, the loop will exit if get_bioreq() returns NULL, indicating 
747      * that we've been interrupted.
748      */
749     while (1) {
750         bp = afs_get_bioreq();
751         if (!bp)
752             break;      /* we were interrupted */
753         if (code = setjmpx(&jmpbuf)) {
754             /* This should not have happend, maybe a lack of resources  */
755             AFS_GUNLOCK();
756             s = disable_lock(INTMAX, &afs_asyncbuf_lock);
757             for (bp1 = bp; bp ; bp = bp1) {
758                 if (bp1)
759                     bp1 = (struct buf *) bp1->b_work;
760                 bp->b_actf = 0;
761                 bp->b_error = code;
762                 bp->b_flags |= B_ERROR;
763                 iodone(bp);
764             }
765             unlock_enable(s, &afs_asyncbuf_lock);
766             AFS_GLOCK();
767             continue;
768         }
769         vcp = (struct vcache *)bp->b_vp;
770         if (bp->b_flags & B_PFSTORE) {  /* XXXX */
771             ObtainWriteLock(&vcp->lock,404);        
772             if (vcp->v.v_gnode->gn_mwrcnt) {
773                 if (vcp->m.Length < bp->b_bcount + (u_int)dbtob(bp->b_blkno))
774                     vcp->m.Length = bp->b_bcount + (u_int)dbtob(bp->b_blkno);
775             }
776             ReleaseWriteLock(&vcp->lock);
777         }
778         /* If the buffer represents a protection violation, rather than
779          * an actual request for I/O, no special action need be taken.  
780          */
781         if ( bp->b_flags & B_PFPROT ) {   
782             iodone (bp);    /* Notify all users of the buffer that we're done */
783             clrjmpx(&jmpbuf);
784             continue;
785         }
786 if (DOvmlock)
787         ObtainWriteLock(&vcp->pvmlock,211);     
788         /*
789          * First map its data area to a region in the current address space
790          * by calling vm_att with the subspace identifier, and a pointer to
791          * the data area.  vm_att returns  a new data area pointer, but we
792          * also want to hang onto the old one.
793          */
794         tmpaddr = bp->b_baddr;
795         bp->b_baddr = vm_att (bp->b_xmemd.subspace_id, tmpaddr);
796         tmperr = afs_ustrategy(bp);     /* temp variable saves offset calculation */
797         if (tmperr) {                   /* in non-error case */
798             bp->b_flags |= B_ERROR;             /* should other flags remain set ??? */
799             bp->b_error = tmperr;
800         }
801
802         /* Unmap the buffer's data area by calling vm_det.  Reset data area
803          * to the value that we saved above.
804          */
805         vm_det(bp->b_un.b_addr);
806         bp->b_baddr = tmpaddr;
807
808         /*
809          * buffer may be linked with other buffers via the b_work field.
810          * See also naix_vm_strategy.  For each buffer in the chain (including
811          * bp) notify all users of the buffer that the daemon is finished
812          * using it by calling iodone.  
813          * assumes iodone can modify the b_work field.
814          */
815         for(tbp1=bp;;) {
816             tbp2 = (struct buf *) tbp1->b_work;
817             iodone(tbp1);
818             if (!tbp2) 
819                 break;
820
821             tbp1 = (struct buf *) tbp2->b_work;
822             iodone(tbp2);
823             if (!tbp1)
824                 break;
825         }
826 if (DOvmlock)
827         ReleaseWriteLock(&vcp->pvmlock);     /* Unlock the vnode.  */
828         clrjmpx(&jmpbuf);
829     } /* infinite loop (unless we're interrupted) */
830 } /* end of afs_BioDaemon() */
831
832 #else /* AFS_AIX41_ENV */
833
834
835 #define squeue afs_q
836 struct afs_bioqueue {
837     struct squeue lruq;
838     int sleeper;
839     int cnt;
840 };
841 struct afs_bioqueue afs_bioqueue;
842 struct buf *afs_busyq = NULL;
843 struct buf *afs_asyncbuf;
844 afs_int32 afs_biodcnt = 0;
845
846 /* in implementing this, I assumed that all external linked lists were
847  * null-terminated.  
848  *
849  * Several places in this code traverse a linked list.  The algorithm
850  * used here is probably unfamiliar to most people.  Careful examination
851  * will show that it eliminates an assignment inside the loop, as compared
852  * to the standard algorithm, at the cost of occasionally using an extra
853  * variable.
854  */
855
856 /* get_bioreq()
857  *
858  * This function obtains, and returns, a pointer to a buffer for
859  * processing by a daemon.  It sleeps until such a buffer is available.
860  * The source of buffers for it is the list afs_asyncbuf (see also 
861  * naix_vm_strategy).  This function may be invoked concurrently by
862  * several processes, that is, several instances of the same daemon.
863  * naix_vm_strategy, which adds buffers to the list, runs at interrupt
864  * level, while get_bioreq runs at process level.
865  *
866  * The common kernel paradigm of sleeping and waking up, in which all the
867  * competing processes sleep waiting for wakeups on one address, is not
868  * followed here.  Instead, the following paradigm is used:  when a daemon
869  * goes to sleep, it checks for other sleeping daemons.  If there aren't any,
870  * it sleeps on the address of variable afs_asyncbuf.  But if there is
871  * already a daemon sleeping on that address, it threads its own unique
872  * address onto a list, and sleeps on that address.  This way, every 
873  * sleeper is sleeping on a different address, and every wakeup wakes up
874  * exactly one daemon.  This prevents a whole bunch of daemons from waking
875  * up and then immediately having to go back to sleep.  This provides a
876  * performance gain and makes the I/O scheduling a bit more deterministic.
877  * The list of sleepers is variable afs_bioqueue.  The unique address
878  * on which to sleep is passed to get_bioreq as its parameter.
879  */
880 /*static*/ struct buf *afs_get_bioreq(self)
881     struct afs_bioqueue *self;      /* address on which to sleep */
882
883 {
884     struct buf *bp = (struct buf *) 0;
885     struct buf *bestbp;
886     struct buf **bestlbpP, **lbpP;
887     int bestage, stop;
888     struct buf *t1P, *t2P;      /* temp pointers for list manipulation */
889     int oldPriority;
890     afs_uint32 wait_ret;
891 struct afs_bioqueue *s;
892
893     /* ??? Does the forward pointer of the returned buffer need to be NULL?
894     */
895     
896         /* Disable interrupts from the strategy function, and save the 
897          * prior priority level
898          */
899         oldPriority = i_disable ( INTMAX ) ;
900
901         /* Each iteration of following loop either pulls
902          * a buffer off afs_asyncbuf, or sleeps.  
903          */
904         while (1) {   /* inner loop */
905                 if (afs_asyncbuf) {
906                         /* look for oldest buffer */
907                         bp = bestbp = afs_asyncbuf;
908                         bestage = (int) bestbp->av_back;
909                         bestlbpP = &afs_asyncbuf;
910                         while (1) {
911                                 lbpP = &bp->av_forw;
912                                 bp = *lbpP;
913                                 if (!bp) break;
914                                 if ((int) bp->av_back - bestage < 0) {
915                                         bestbp = bp;
916                                         bestlbpP = lbpP;
917                                         bestage = (int) bp->av_back;
918                                 }
919                         }
920                         bp = bestbp;
921                         *bestlbpP = bp->av_forw;
922                         break;  
923                         }
924                 else {
925                         int interrupted;
926
927                 /* If afs_asyncbuf is null, it is necessary to go to sleep.
928                  * There are two possibilities:  either there is already a
929                  * daemon that is sleeping on the address of afs_asyncbuf,
930                  * or there isn't. 
931                  */
932                         if (afs_bioqueue.sleeper) {
933                                 /* enqueue */
934                                 QAdd (&(afs_bioqueue.lruq), &(self->lruq));
935                                 interrupted = sleep ((caddr_t) self, PCATCH|(PZERO + 1));
936                                 if (self->lruq.next != &self->lruq) {   /* XXX ##3 XXX */
937                                     QRemove (&(self->lruq));            /* dequeue */
938                                 }
939 self->cnt++;
940                                 afs_bioqueue.sleeper = FALSE;
941                                 if (interrupted) {
942                                     /* re-enable interrupts from strategy */
943                                     i_enable (oldPriority);
944                                     return(NULL);
945                                 }
946                                 continue;
947                         } else {
948                                 afs_bioqueue.sleeper = TRUE;
949                                 interrupted = sleep ((caddr_t) &afs_asyncbuf, PCATCH|(PZERO + 1));
950                                 afs_bioqueue.sleeper = FALSE;
951                                 if (interrupted)
952                                 {
953                                     /*
954                                      * We need to wakeup another daemon if present
955                                      * since we were waiting on afs_asyncbuf.
956                                      */
957 #ifdef  notdef  /* The following doesn't work as advertised */                              
958                                      if (afs_bioqueue.lruq.next != &afs_bioqueue.lruq)
959                                      {
960                                          struct squeue *bq = afs_bioqueue.lruq.next;
961                                          QRemove (bq);
962                                          wakeup (bq);
963                                      }
964 #endif
965                                     /* re-enable interrupts from strategy */
966                                      i_enable (oldPriority);
967                                      return(NULL);
968                                  }
969                                 continue;
970                                 }
971
972                         }  /* end of "else asyncbuf is empty" */
973                 } /* end of "inner loop" */
974
975         /*assert (bp);*/
976
977         i_enable (oldPriority);     /* re-enable interrupts from strategy */
978
979         /* For the convenience of other code, replace the gnodes in
980          * the b_vp field of bp and the other buffers on the b_work
981          * chain with the corresponding vnodes.   
982          *
983          * ??? what happens to the gnodes?  They're not just cut loose,
984          * are they?
985          */
986         for(t1P=bp;;) {
987                 t2P = (struct buf *) t1P->b_work;
988                 t1P->b_vp = ((struct gnode *) t1P->b_vp)->gn_vnode;
989                 if (!t2P) 
990                         break;
991
992                 t1P = (struct buf *) t2P->b_work;
993                 t2P->b_vp = ((struct gnode *) t2P->b_vp)->gn_vnode;
994                 if (!t1P)
995                         break;
996                 }
997
998         /* If the buffer does not specify I/O, it may immediately
999          * be returned to the caller.  This condition is detected
1000          * by examining the buffer's flags (the b_flags field).  If
1001          * the B_PFPROT bit is set, the buffer represents a protection
1002          * violation, rather than a request for I/O.  The remainder
1003          * of the outer loop handles the case where the B_PFPROT bit is clear.
1004          */
1005          if (bp->b_flags & B_PFPROT)  {
1006                 return (bp);
1007             }
1008
1009         /* wake up another process to handle the next buffer, and return
1010          * bp to the caller.
1011          */
1012         oldPriority = i_disable ( INTMAX ) ;
1013
1014         /* determine where to find the sleeping process. 
1015          * There are two cases: either it is sleeping on
1016          * afs_asyncbuf, or it is sleeping on its own unique
1017          * address.  These cases are distinguished by examining
1018          * the sleeper field of afs_bioqueue.
1019          */
1020         if (afs_bioqueue.sleeper) {
1021                 wakeup (&afs_asyncbuf);
1022                 }
1023         else {
1024                 if (afs_bioqueue.lruq.next == &afs_bioqueue.lruq) {
1025                         /* queue is empty, what now? ???*/
1026                         /* Should this be impossible, or does    */
1027                         /* it just mean that nobody is sleeping? */;
1028                         }
1029                 else {
1030                         struct squeue *bq = afs_bioqueue.lruq.next;
1031                         QRemove (bq);
1032                         QInit (bq);
1033                         wakeup (bq);
1034                         afs_bioqueue.sleeper = TRUE; 
1035                         }
1036                 }
1037         i_enable (oldPriority);     /* re-enable interrupts from strategy */
1038         return (bp);
1039
1040 } /* end of function get_bioreq() */
1041
1042
1043 /* afs_BioDaemon
1044  *
1045  * This function is the daemon.  It is called from the syscall
1046  * interface.  Ordinarily, a script or an administrator will run a
1047  * daemon startup utility, specifying the number of I/O daemons to
1048  * run.  The utility will fork off that number of processes,
1049  * each making the appropriate syscall, which will cause this
1050  * function to be invoked.
1051  */
1052 static int afs_initbiod = 0;            /* this is self-initializing code */
1053 int DOvmlock = 0;
1054 afs_BioDaemon (nbiods)
1055     afs_int32 nbiods;
1056 {
1057     struct afs_bioqueue *self;
1058     afs_int32 code, s, pflg = 0;
1059     label_t jmpbuf;
1060     struct buf *bp, *bp1, *tbp1, *tbp2;         /* temp pointers only */
1061     caddr_t tmpaddr;
1062     struct vnode *vp;
1063     struct vcache *vcp;
1064     char tmperr;
1065     if (!afs_initbiod) {
1066         /* XXX ###1 XXX */
1067         afs_initbiod = 1;
1068         /* Initialize the queue of waiting processes, afs_bioqueue.  */
1069         QInit (&(afs_bioqueue.lruq));           
1070     }
1071
1072     /* establish ourself as a kernel process so shutdown won't kill us */
1073 /*    u.u_procp->p_flag |= SKPROC;*/
1074
1075     /* Initialize a token (self) to use in the queue of sleeping processes.   */
1076     self = (struct afs_bioqueue *) afs_osi_Alloc (sizeof (struct afs_bioqueue));
1077     pin (self, sizeof (struct afs_bioqueue)); /* fix in memory */
1078     bzero(self, sizeof(*self));
1079     QInit (&(self->lruq));              /* initialize queue entry pointers */
1080
1081
1082     /* Ignore HUP signals... */
1083 #ifdef AFS_AIX41_ENV
1084     {
1085         sigset_t sigbits, osigbits;
1086         /*
1087          * add SIGHUP to the set of already masked signals
1088          */
1089         SIGFILLSET(sigbits);                    /* allow all signals    */
1090         SIGDELSET(sigbits, SIGHUP);             /*   except SIGHUP      */
1091         limit_sigs(&sigbits, &osigbits);        /*   and already masked */
1092     }
1093 #else
1094     SIGDELSET(u.u_procp->p_sig, SIGHUP);
1095     SIGADDSET(u.u_procp->p_sigignore, SIGHUP);
1096     SIGDELSET(u.u_procp->p_sigcatch, SIGHUP);
1097 #endif
1098     /* Main body starts here -- this is an intentional infinite loop, and
1099      * should NEVER exit 
1100      *
1101      * Now, the loop will exit if get_bioreq() returns NULL, indicating 
1102      * that we've been interrupted.
1103      */
1104     while (1) {
1105         bp = afs_get_bioreq(self);
1106         if (!bp)
1107             break;      /* we were interrupted */
1108         if (code = setjmpx(&jmpbuf)) {
1109             /* This should not have happend, maybe a lack of resources  */
1110             s = splimp();
1111             for (bp1 = bp; bp ; bp = bp1) {
1112                 if (bp1)
1113                     bp1 = bp1->b_work;
1114                 bp->b_actf = 0;
1115                 bp->b_error = code;
1116                 bp->b_flags |= B_ERROR;
1117                 iodone(bp);
1118             }
1119             splx(s);
1120             continue;
1121         }
1122         vcp = (struct vcache *)bp->b_vp;
1123         if (bp->b_flags & B_PFSTORE) {
1124             ObtainWriteLock(&vcp->lock,210);        
1125             if (vcp->v.v_gnode->gn_mwrcnt) {
1126                 if (vcp->m.Length < bp->b_bcount + (u_int)dbtob(bp->b_blkno))
1127                     vcp->m.Length = bp->b_bcount + (u_int)dbtob(bp->b_blkno);
1128             }
1129             ReleaseWriteLock(&vcp->lock);
1130         }
1131         /* If the buffer represents a protection violation, rather than
1132          * an actual request for I/O, no special action need be taken.  
1133          */
1134         if ( bp->b_flags & B_PFPROT ) {   
1135             iodone (bp);    /* Notify all users of the buffer that we're done */
1136             continue;
1137         }
1138 if (DOvmlock)
1139         ObtainWriteLock(&vcp->pvmlock,558);     
1140         /*
1141          * First map its data area to a region in the current address space
1142          * by calling vm_att with the subspace identifier, and a pointer to
1143          * the data area.  vm_att returns  a new data area pointer, but we
1144          * also want to hang onto the old one.
1145          */
1146         tmpaddr = bp->b_baddr;
1147         bp->b_baddr = vm_att (bp->b_xmemd.subspace_id, tmpaddr);
1148         tmperr = afs_ustrategy(bp);     /* temp variable saves offset calculation */
1149         if (tmperr) {                   /* in non-error case */
1150             bp->b_flags |= B_ERROR;             /* should other flags remain set ??? */
1151             bp->b_error = tmperr;
1152         }
1153
1154         /* Unmap the buffer's data area by calling vm_det.  Reset data area
1155          * to the value that we saved above.
1156          */
1157         vm_det(bp->b_un.b_addr);
1158         bp->b_baddr = tmpaddr;
1159
1160         /*
1161          * buffer may be linked with other buffers via the b_work field.
1162          * See also naix_vm_strategy.  For each buffer in the chain (including
1163          * bp) notify all users of the buffer that the daemon is finished
1164          * using it by calling iodone.  
1165          * assumes iodone can modify the b_work field.
1166          */
1167         for(tbp1=bp;;) {
1168             tbp2 = (struct buf *) tbp1->b_work;
1169             iodone(tbp1);
1170             if (!tbp2) 
1171                 break;
1172
1173             tbp1 = (struct buf *) tbp2->b_work;
1174             iodone(tbp2);
1175             if (!tbp1)
1176                 break;
1177         }
1178 if (DOvmlock)
1179         ReleaseWriteLock(&vcp->pvmlock);     /* Unlock the vnode.  */
1180         clrjmpx(&jmpbuf);
1181     } /* infinite loop (unless we're interrupted) */
1182     unpin (self, sizeof (struct afs_bioqueue));
1183     afs_osi_Free (self, sizeof (struct afs_bioqueue));
1184 } /* end of afs_BioDaemon() */
1185 #endif /* AFS_AIX41_ENV */ 
1186 #endif /* AFS_AIX32_ENV */
1187
1188
1189 int afs_nbrs = 0;
1190 void afs_BackgroundDaemon() {
1191     struct brequest *tb;
1192     int i, foundAny;
1193     afs_int32 pid;
1194
1195     AFS_STATCNT(afs_BackgroundDaemon);
1196     /* initialize subsystem */
1197     if (brsInit == 0) {
1198         LOCK_INIT(&afs_xbrs, "afs_xbrs");
1199         bzero((char *)afs_brs, sizeof(afs_brs));
1200         brsInit = 1;
1201 #if defined (AFS_SGI_ENV) && defined(AFS_SGI_SHORTSTACK)
1202         /*
1203          * steal the first daemon for doing delayed DSlot flushing
1204          * (see afs_GetDownDSlot)
1205          */
1206         AFS_GUNLOCK();
1207         afs_sgidaemon();
1208         return;
1209 #endif
1210     }
1211     afs_nbrs++;
1212
1213     MObtainWriteLock(&afs_xbrs,302);
1214     while (1) {
1215         if (afs_termState == AFSOP_STOP_BKG) {
1216             if (--afs_nbrs <= 0)
1217                 afs_termState = AFSOP_STOP_TRUNCDAEMON;
1218             MReleaseWriteLock(&afs_xbrs);
1219             afs_osi_Wakeup(&afs_termState);
1220             return;
1221         }
1222         
1223         /* find a request */
1224         tb = afs_brs;
1225         foundAny = 0;
1226         for(i=0;i<NBRS;i++,tb++) {
1227             /* look for request */
1228             if ((tb->refCount > 0) && !(tb->flags & BSTARTED)) {
1229                 /* new request, not yet picked up */
1230                 tb->flags |= BSTARTED;
1231                 MReleaseWriteLock(&afs_xbrs);
1232                 foundAny = 1;
1233                 afs_Trace1(afs_iclSetp, CM_TRACE_BKG1,
1234                            ICL_TYPE_INT32, tb->opcode);
1235                 if (tb->opcode == BOP_FETCH)
1236                     BPrefetch(tb);
1237                 else if (tb->opcode == BOP_STORE)
1238                     BStore(tb);
1239                 else if (tb->opcode == BOP_PATH)
1240                     BPath(tb);
1241                 else panic("background bop");
1242                 if (tb->vnode) {
1243 #ifdef  AFS_DEC_ENV
1244                     tb->vnode->vrefCount--;         /* fix up reference count */
1245 #else
1246                     AFS_RELE((struct vnode *)(tb->vnode));      /* MUST call vnode layer or could lose vnodes */
1247 #endif
1248                     tb->vnode = (struct vcache *) 0;
1249                 }
1250                 if (tb->cred) {
1251                     crfree(tb->cred);
1252                     tb->cred = (struct AFS_UCRED *) 0;
1253                 }
1254                 afs_BRelease(tb);   /* this grabs and releases afs_xbrs lock */
1255                 MObtainWriteLock(&afs_xbrs,305);
1256             }
1257         }
1258         if (!foundAny) {
1259             /* wait for new request */
1260             afs_brsDaemons++;
1261             MReleaseWriteLock(&afs_xbrs);
1262             afs_osi_Sleep(&afs_brsDaemons);
1263             MObtainWriteLock(&afs_xbrs,307);
1264             afs_brsDaemons--;
1265         }
1266     }
1267 }
1268
1269
1270 void shutdown_daemons()
1271 {
1272   extern int afs_cold_shutdown;
1273   register int i;
1274   register struct brequest *tb;
1275
1276   AFS_STATCNT(shutdown_daemons);
1277   if (afs_cold_shutdown) {
1278       afs_brsDaemons = brsInit = 0;
1279       rxepoch_checked = afs_nbrs = 0;
1280       bzero((char *)afs_brs, sizeof(afs_brs));
1281       bzero((char *)&afs_xbrs, sizeof(afs_lock_t));
1282       afs_brsWaiters = 0;
1283 #ifdef AFS_AIX32_ENV
1284 #ifdef AFS_AIX41_ENV
1285       lock_free(&afs_asyncbuf_lock);
1286       unpin(&afs_asyncbuf, sizeof(struct buf*));
1287       pin (&afs_asyncbuf_cv, sizeof(afs_int32));
1288 #else /* AFS_AIX41_ENV */
1289       afs_busyq = NULL;
1290       afs_biodcnt = 0;
1291       bzero((char *)&afs_bioqueue, sizeof(struct afs_bioqueue));
1292 #endif
1293       afs_initbiod = 0;
1294 #endif
1295   }
1296 }
1297
1298 #if defined(AFS_SGI_ENV) && defined(AFS_SGI_SHORTSTACK)
1299 /*
1300  * sgi - daemon - handles certain operations that otherwise
1301  * would use up too much kernel stack space
1302  *
1303  * This all assumes that since the caller must have the xdcache lock
1304  * exclusively that the list will never be more than one long
1305  * and noone else can attempt to add anything until we're done.
1306  */
1307 SV_TYPE afs_sgibksync;
1308 SV_TYPE afs_sgibkwait;
1309 lock_t afs_sgibklock;
1310 struct dcache *afs_sgibklist;
1311
1312 int
1313 afs_sgidaemon(void)
1314 {
1315         int s;
1316         struct dcache *tdc;
1317
1318         if (afs_sgibklock == NULL) {
1319                 SV_INIT(&afs_sgibksync, "bksync", 0, 0);
1320                 SV_INIT(&afs_sgibkwait, "bkwait", 0, 0);
1321                 SPINLOCK_INIT(&afs_sgibklock, "bklock");
1322         }
1323         s = SPLOCK(afs_sgibklock);
1324         for (;;) {
1325                 /* wait for something to do */
1326                 SP_WAIT(afs_sgibklock, s, &afs_sgibksync, PINOD);
1327                 osi_Assert(afs_sgibklist);
1328
1329                 /* XX will probably need to generalize to real list someday */
1330                 s = SPLOCK(afs_sgibklock);
1331                 while (afs_sgibklist) {
1332                         tdc = afs_sgibklist;
1333                         afs_sgibklist = NULL;
1334                         SPUNLOCK(afs_sgibklock, s);
1335                         AFS_GLOCK();
1336                         tdc->flags &= ~DFEntryMod;
1337                         afs_WriteDCache(tdc, 1);
1338                         AFS_GUNLOCK();
1339                         s = SPLOCK(afs_sgibklock);
1340                 }
1341
1342                 /* done all the work - wake everyone up */
1343                 while (SV_SIGNAL(&afs_sgibkwait))
1344                         ;
1345         }
1346 }
1347 #endif