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