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 "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 static int afs_brs_count = 0;   /* request counter, to service reqs in order */
  32
  33 static int rxepoch_checked=0;
  34 #define afs_CheckRXEpoch() {if (rxepoch_checked == 0 && rxkad_EpochWasSet) { \
  35         rxepoch_checked = 1; afs_GCUserData(/* force flag */ 1);  } }
  36
  37 /* PAG garbage collection */
  38 /* We induce a compile error if param.h does not define AFS_GCPAGS */
  39 afs_int32 afs_gcpags=AFS_GCPAGS;
  40 afs_int32 afs_gcpags_procsize = 0;
  41
  42 afs_int32 afs_CheckServerDaemonStarted = 0;
  43 #ifdef DEFAULT_PROBE_INTERVAL
  44 afs_int32 PROBE_INTERVAL=DEFAULT_PROBE_INTERVAL;  /* overridding during compile */
  45 #else
  46 afs_int32 PROBE_INTERVAL=180;   /* default to 3 min */
  47 #endif
  48
  49 #define PROBE_WAIT() (1000 * (PROBE_INTERVAL - ((afs_random() & 0x7fffffff) \
  50                       % (PROBE_INTERVAL/2))))
  51
  52 void afs_CheckServerDaemon(void)
  53 {
  54     afs_int32 now, delay, lastCheck, last10MinCheck;
  55
  56     afs_CheckServerDaemonStarted = 1;
  57
  58     while (afs_initState < 101) afs_osi_Sleep(&afs_initState);
  59     afs_osi_Wait(PROBE_WAIT(), &AFS_CSWaitHandler, 0);
  60
  61     last10MinCheck = lastCheck = osi_Time();
  62     while ( 1 ) {
  63         if (afs_termState == AFSOP_STOP_CS) {
  64             afs_termState = AFSOP_STOP_BKG;
  65             afs_osi_Wakeup(&afs_termState);
  66             break;
  67         }
  68
  69         now = osi_Time();
  70         if (PROBE_INTERVAL + lastCheck <= now) {
  71             afs_CheckServers(1, NULL); /* check down servers */
  72             lastCheck = now = osi_Time();
  73         }
  74
  75         if (600 + last10MinCheck <= now) {
  76             afs_Trace1(afs_iclSetp, CM_TRACE_PROBEUP, ICL_TYPE_INT32, 600);
  77             afs_CheckServers(0, NULL);
  78             last10MinCheck = now = osi_Time();
  79         }
  80         /* shutdown check. */
  81         if (afs_termState == AFSOP_STOP_CS) {
  82             afs_termState = AFSOP_STOP_BKG;
  83             afs_osi_Wakeup(&afs_termState);
  84             break;
  85         }
  86
  87         /* Compute time to next probe. */
  88         delay = PROBE_INTERVAL + lastCheck;
  89         if (delay > 600 + last10MinCheck)
  90             delay = 600 + last10MinCheck;
  91         delay -= now;
  92         if (delay < 1)
  93             delay = 1;
  94         afs_osi_Wait(delay * 1000,  &AFS_CSWaitHandler, 0);
  95     }
  96     afs_CheckServerDaemonStarted = 0;
  97 }
  98
  99 void afs_Daemon(void)
 100 {
 101     afs_int32 code;
 102     struct afs_exporter *exporter;
 103     afs_int32 now;
 104     afs_int32 last3MinCheck, last10MinCheck, last60MinCheck, lastNMinCheck;
 105     afs_int32 last1MinCheck;
 106     afs_uint32 lastCBSlotBump;
 107     char cs_warned = 0;
 108
 109     AFS_STATCNT(afs_Daemon);
 110     last1MinCheck = last3MinCheck = last60MinCheck = last10MinCheck = lastNMinCheck = 0;
 111
 112     afs_rootFid.Fid.Volume = 0;
 113     while (afs_initState < 101) afs_osi_Sleep(&afs_initState);
 114
 115     now = osi_Time();
 116     lastCBSlotBump = now;
 117
 118     /* when a lot of clients are booted simultaneously, they develop
 119      * annoying synchronous VL server bashing behaviors.  So we stagger them.
 120      */
 121     last1MinCheck = now + ((afs_random() & 0x7fffffff) % 60); /* an extra 30 */
 122     last3MinCheck = now - 90 + ((afs_random() & 0x7fffffff) % 180);
 123     last60MinCheck = now - 1800 + ((afs_random() & 0x7fffffff) % 3600);
 124     last10MinCheck = now - 300 + ((afs_random() & 0x7fffffff) % 600);
 125     lastNMinCheck = now - 90 + ((afs_random() & 0x7fffffff) % 180);
 126
 127     /* start off with afs_initState >= 101 (basic init done) */
 128     while(1) {
 129         afs_CheckCallbacks(20);  /* unstat anything which will expire soon */
 130
 131         /* things to do every 20 seconds or less - required by protocol spec */
 132         if (afs_nfsexporter)
 133             afs_FlushActiveVcaches(0);  /* flush NFS writes */
 134         afs_FlushVCBs(1);               /* flush queued callbacks */
 135         afs_MaybeWakeupTruncateDaemon();        /* free cache space if have too */
 136         rx_CheckPackets();              /* Does RX need more packets? */
 137 #if     defined(AFS_AIX32_ENV) || defined(AFS_HPUX_ENV)
 138         /*
 139          * Hack: We always want to make sure there are plenty free
 140          * entries in the small free pool so that we don't have to
 141          * worry about rx (with disabled interrupts) to have to call
 142          * malloc). So we do the dummy call below...
 143          */
 144         if (((afs_stats_cmperf.SmallBlocksAlloced - afs_stats_cmperf.SmallBlocksActive)
 145              <= AFS_SALLOC_LOW_WATER))
 146             osi_FreeSmallSpace(osi_AllocSmallSpace(AFS_SMALLOCSIZ));
 147         if (((afs_stats_cmperf.MediumBlocksAlloced - afs_stats_cmperf.MediumBlocksActive)
 148              <= AFS_MALLOC_LOW_WATER+50))
 149             osi_AllocMoreMSpace(AFS_MALLOC_LOW_WATER * 2);
 150 #endif
 151
 152         now = osi_Time();
 153         if (lastCBSlotBump + CBHTSLOTLEN < now) {  /* pretty time-dependant */
 154             lastCBSlotBump = now;
 155             if (afs_BumpBase()) {
 156                 afs_CheckCallbacks(20);  /* unstat anything which will expire soon */
 157             }
 158         }
 159
 160         if (last1MinCheck + 60 < now) {
 161             /* things to do every minute */
 162             DFlush();                   /* write out dir buffers */
 163             afs_WriteThroughDSlots();   /* write through cacheinfo entries */
 164             afs_FlushActiveVcaches(1);/* keep flocks held & flush nfs writes */
 165             afs_CheckRXEpoch();
 166             last1MinCheck = now;
 167         }
 168
 169         if (last3MinCheck + 180 < now) {
 170             afs_CheckTokenCache();      /* check for access cache resets due to expired
 171                                            tickets */
 172             last3MinCheck = now;
 173         }
 174         if (!afs_CheckServerDaemonStarted) {
 175             /* Do the check here if the correct afsd is not installed. */
 176             if (!cs_warned) {
 177                 cs_warned = 1;
 178                 printf("Please install afsd with check server daemon.\n");
 179             }
 180             if (lastNMinCheck + PROBE_INTERVAL < now) {
 181                 /* only check down servers */
 182                 afs_CheckServers(1, NULL);
 183                 lastNMinCheck = now;
 184             }
 185         }
 186         if (last10MinCheck + 600 < now) {
 187 #ifdef AFS_USERSPACE_IP_ADDR
 188             extern int rxi_GetcbiInfo(void);
 189 #endif
 190             afs_Trace1(afs_iclSetp, CM_TRACE_PROBEUP,
 191                        ICL_TYPE_INT32, 600);
 192 #ifdef AFS_USERSPACE_IP_ADDR
 193             if (rxi_GetcbiInfo()) { /* addresses changed from last time */
 194                 afs_FlushCBs();
 195             }
 196 #else  /* AFS_USERSPACE_IP_ADDR */
 197             if (rxi_GetIFInfo()) { /* addresses changed from last time */
 198                 afs_FlushCBs();
 199             }
 200 #endif /* else AFS_USERSPACE_IP_ADDR */
 201             if (!afs_CheckServerDaemonStarted)
 202                 afs_CheckServers(0, NULL);
 203             afs_GCUserData(0);      /* gc old conns */
 204             /* This is probably the wrong way of doing GC for the various exporters but it will suffice for a while */
 205             for (exporter = root_exported; exporter; exporter = exporter->exp_next) {
 206                 (void) EXP_GC(exporter, 0);     /* Generalize params */
 207             }
 208             {
 209                 static int cnt=0;
 210                 if (++cnt < 12) {
 211                     afs_CheckVolumeNames(AFS_VOLCHECK_EXPIRED |
 212                                          AFS_VOLCHECK_BUSY);
 213                 } else {
 214                     cnt = 0;
 215                     afs_CheckVolumeNames(AFS_VOLCHECK_EXPIRED |
 216                                          AFS_VOLCHECK_BUSY |
 217                                          AFS_VOLCHECK_MTPTS);
 218                 }
 219             }
 220             last10MinCheck = now;
 221         }
 222         if (last60MinCheck + 3600 < now) {
 223             afs_Trace1(afs_iclSetp, CM_TRACE_PROBEVOLUME,
 224                        ICL_TYPE_INT32, 3600);
 225             afs_CheckRootVolume();
 226 #if AFS_GCPAGS
 227             if (afs_gcpags == AFS_GCPAGS_OK) {
 228                 afs_int32 didany;
 229                 afs_GCPAGs(&didany);
 230             }
 231 #endif
 232             last60MinCheck = now;
 233         }
 234         if (afs_initState < 300) {      /* while things ain't rosy */
 235             code = afs_CheckRootVolume();
 236             if (code == 0) afs_initState = 300;             /* succeeded */
 237             if (afs_initState < 200) afs_initState = 200;   /* tried once */
 238             afs_osi_Wakeup(&afs_initState);
 239         }
 240
 241         /* 18285 is because we're trying to divide evenly into 128, that is,
 242          * CBSlotLen, while staying just under 20 seconds.  If CBSlotLen
 243          * changes, should probably change this interval, too.
 244          * Some of the preceding actions may take quite some time, so we
 245          * might not want to wait the entire interval */
 246         now = 18285 - (osi_Time() - now);
 247         if (now > 0) {
 248             afs_osi_Wait(now, &AFS_WaitHandler, 0);
 249         }
 250
 251         if (afs_termState == AFSOP_STOP_AFS) {
 252             if (afs_CheckServerDaemonStarted)
 253                 afs_termState = AFSOP_STOP_CS;
 254             else
 255                 afs_termState = AFSOP_STOP_BKG;
 256             afs_osi_Wakeup(&afs_termState);
 257             return;
 258         }
 259     }
 260 }
 261
 262 int afs_CheckRootVolume (void)
 263 {
 264     char rootVolName[32];
 265     struct volume *tvp = NULL;
 266     int usingDynroot = afs_GetDynrootEnable();
 267     int localcell;
 268
 269     AFS_STATCNT(afs_CheckRootVolume);
 270     if (*afs_rootVolumeName == 0) {
 271         strcpy(rootVolName, "root.afs");
 272     } else {
 273         strcpy(rootVolName, afs_rootVolumeName);
 274     }
 275
 276     if (!usingDynroot) {
 277         struct cell *lc = afs_GetPrimaryCell(READ_LOCK);
 278
 279         if (!lc)
 280             return ENOENT;
 281         localcell = lc->cellNum;
 282         afs_PutCell(lc, READ_LOCK);
 283     }
 284
 285     if (usingDynroot) {
 286         afs_GetDynrootFid(&afs_rootFid);
 287         tvp = afs_GetVolume(&afs_rootFid, NULL, READ_LOCK);
 288     } else {
 289         tvp = afs_GetVolumeByName(rootVolName, localcell, 1, NULL, READ_LOCK);
 290     }
 291     if (!tvp && !usingDynroot) {
 292         char buf[128];
 293         int len = strlen(rootVolName);
 294
 295         if ((len < 9) || strcmp(&rootVolName[len - 9], ".readonly")) {
 296             strcpy(buf, rootVolName);
 297             afs_strcat(buf, ".readonly");
 298             tvp = afs_GetVolumeByName(buf, localcell, 1, NULL, READ_LOCK);
 299         }
 300     }
 301     if (tvp) {
 302         if (!usingDynroot) {
 303             int volid = (tvp->roVol? tvp->roVol : tvp->volume);
 304             afs_rootFid.Cell = localcell;
 305             if (afs_rootFid.Fid.Volume && afs_rootFid.Fid.Volume != volid
 306                 && afs_globalVp) {
 307                 /* If we had a root fid before and it changed location we reset
 308                  * the afs_globalVp so that it will be reevaluated.
 309                  * Just decrement the reference count. This only occurs during
 310                  * initial cell setup and can panic the machine if we set the
 311                  * count to zero and fs checkv is executed when the current
 312                  * directory is /afs.
 313                  */
 314                 AFS_FAST_RELE(afs_globalVp);
 315                 afs_globalVp = 0;
 316             }
 317             afs_rootFid.Fid.Volume = volid;
 318             afs_rootFid.Fid.Vnode = 1;
 319             afs_rootFid.Fid.Unique = 1;
 320         }
 321         afs_initState = 300;    /* won */
 322         afs_osi_Wakeup(&afs_initState);
 323         afs_PutVolume(tvp, READ_LOCK);
 324     }
 325 #ifdef AFS_DEC_ENV
 326 /* This is to make sure that we update the root gnode */
 327 /* every time root volume gets released */
 328     {
 329         struct gnode *rootgp;
 330         struct mount *mp;
 331         int code;
 332
 333         /* Only do this if afs_globalVFS is properly set due to race conditions
 334            this routine could be called before the gfs_mount is performed!
 335            Furthermore, afs_root (called below) *waits* until
 336            initState >= 200, so we don't try this until we've gotten
 337            at least that far */
 338         if (afs_globalVFS && afs_initState >= 200) {
 339             if (code = afs_root(afs_globalVFS, &rootgp))
 340                 return code;
 341             mp = (struct mount *) afs_globalVFS->vfs_data ;
 342             mp->m_rootgp = gget(mp, 0, 0, (char *)rootgp);
 343             afs_unlock(mp->m_rootgp);   /* unlock basic gnode */
 344             afs_vrele(VTOAFS(rootgp));  /* zap afs_root's vnode hold */
 345         }
 346     }
 347 #endif
 348     if (afs_rootFid.Fid.Volume) return 0;
 349     else return ENOENT;
 350 }
 351
 352 /* ptr_parm 0 is the pathname, size_parm 0 to the fetch is the chunk number */
 353 static void BPath(register struct brequest *ab)
 354 {
 355     register struct dcache *tdc = NULL;
 356     struct vcache *tvc = NULL;
 357     struct vnode *tvn = NULL;
 358 #ifdef AFS_LINUX22_ENV
 359     struct dentry *dp = NULL;
 360 #endif
 361     afs_size_t offset, len;
 362     struct vrequest treq;
 363     afs_int32 code;
 364
 365     AFS_STATCNT(BPath);
 366     if ((code = afs_InitReq(&treq, ab->cred))) return;
 367     AFS_GUNLOCK();
 368 #ifdef AFS_LINUX22_ENV
 369     code = gop_lookupname((char *)ab->ptr_parm[0], AFS_UIOSYS, 1,  NULL, &dp);
 370     if (dp)
 371         tvn = (struct vnode*)dp->d_inode;
 372 #else
 373     code = gop_lookupname((char *)ab->ptr_parm[0], AFS_UIOSYS, 1,  NULL, (struct vnode **)&tvn);
 374 #endif
 375     AFS_GLOCK();
 376     osi_FreeLargeSpace((char *)ab->ptr_parm[0]); /* free path name buffer here */
 377     if (code) return;
 378     /* now path may not have been in afs, so check that before calling our cache manager */
 379     if (!tvn || !IsAfsVnode((struct vnode *) tvn)) {
 380         /* release it and give up */
 381         if (tvn) {
 382 #ifdef AFS_DEC_ENV
 383             grele(tvn);
 384 #else
 385 #ifdef AFS_LINUX22_ENV
 386             dput(dp);
 387 #else
 388             AFS_RELE((struct vnode *) tvn);
 389 #endif
 390 #endif
 391         }
 392         return;
 393     }
 394 #ifdef AFS_DEC_ENV
 395     tvc = VTOAFS(afs_gntovn(tvn));
 396 #else
 397     tvc = VTOAFS(tvn);
 398 #endif
 399     /* here we know its an afs vnode, so we can get the data for the chunk */
 400     tdc = afs_GetDCache(tvc, ab->size_parm[0], &treq, &offset, &len, 1);
 401     if (tdc) {
 402         afs_PutDCache(tdc);
 403     }
 404 #ifdef AFS_DEC_ENV
 405     grele(tvn);
 406 #else
 407 #ifdef AFS_LINUX22_ENV
 408     dput(dp);
 409 #else
 410     AFS_RELE((struct vnode *) tvn);
 411 #endif
 412 #endif
 413 }
 414
 415 /* size_parm 0 to the fetch is the chunk number,
 416  * ptr_parm 0 is the dcache entry to wakeup,
 417  * size_parm 1 is true iff we should release the dcache entry here.
 418  */
 419 static void BPrefetch(register struct brequest *ab)
 420 {
 421     register struct dcache *tdc;
 422     register struct vcache *tvc;
 423     afs_size_t offset, len;
 424     struct vrequest treq;
 425
 426     AFS_STATCNT(BPrefetch);
 427     if ((len = afs_InitReq(&treq, ab->cred))) return;
 428     tvc = ab->vnode;
 429     tdc = afs_GetDCache(tvc, ab->size_parm[0], &treq, &offset, &len, 1);
 430     if (tdc) {
 431         afs_PutDCache(tdc);
 432     }
 433     /* now, dude may be waiting for us to clear DFFetchReq bit; do so.  Can't
 434      * use tdc from GetDCache since afs_GetDCache may fail, but someone may
 435      * be waiting for our wakeup anyway.
 436      */
 437     tdc = (struct dcache *) (ab->ptr_parm[0]);
 438     ObtainSharedLock(&tdc->lock, 640);
 439     if (tdc->mflags & DFFetchReq) {
 440         UpgradeSToWLock(&tdc->lock, 641);
 441         tdc->mflags &= ~DFFetchReq;
 442         ReleaseWriteLock(&tdc->lock);
 443     } else {
 444         ReleaseSharedLock(&tdc->lock);
 445     }
 446     afs_osi_Wakeup(&tdc->validPos);
 447     if (ab->size_parm[1]) {
 448         afs_PutDCache(tdc);     /* put this one back, too */
 449     }
 450 }
 451
 452
 453 static void BStore(register struct brequest *ab)
 454 {
 455     register struct vcache *tvc;
 456     register afs_int32 code;
 457     struct vrequest treq;
 458 #if defined(AFS_SGI_ENV)
 459     struct cred *tmpcred;
 460 #endif
 461
 462     AFS_STATCNT(BStore);
 463     if ((code = afs_InitReq(&treq, ab->cred))) return;
 464     code = 0;
 465     tvc = ab->vnode;
 466 #if defined(AFS_SGI_ENV)
 467     /*
 468      * Since StoreOnLastReference can end up calling osi_SyncVM which
 469      * calls into VM code that assumes that u.u_cred has the
 470      * correct credentials, we set our to theirs for this xaction
 471      */
 472     tmpcred = OSI_GET_CURRENT_CRED();
 473     OSI_SET_CURRENT_CRED(ab->cred);
 474
 475     /*
 476      * To avoid recursion since the WriteLock may be released during VM
 477      * operations, we hold the VOP_RWLOCK across this transaction as
 478      * do the other callers of StoreOnLastReference
 479      */
 480     AFS_RWLOCK((vnode_t *)tvc, 1);
 481 #endif
 482     ObtainWriteLock(&tvc->lock,209);
 483     code = afs_StoreOnLastReference(tvc, &treq);
 484     ReleaseWriteLock(&tvc->lock);
 485 #if defined(AFS_SGI_ENV)
 486     OSI_SET_CURRENT_CRED(tmpcred);
 487     AFS_RWUNLOCK((vnode_t *)tvc, 1);
 488 #endif
 489     /* now set final return code, and wakeup anyone waiting */
 490     if ((ab->flags & BUVALID) == 0) {
 491         ab->code = afs_CheckCode(code, &treq, 43);    /* set final code, since treq doesn't go across processes */
 492         ab->flags |= BUVALID;
 493         if (ab->flags & BUWAIT) {
 494             ab->flags &= ~BUWAIT;
 495             afs_osi_Wakeup(ab);
 496         }
 497     }
 498 }
 499
 500 /* release a held request buffer */
 501 void afs_BRelease(register struct brequest *ab)
 502 {
 503
 504     AFS_STATCNT(afs_BRelease);
 505     MObtainWriteLock(&afs_xbrs,294);
 506     if (--ab->refCount <= 0) {
 507         ab->flags = 0;
 508     }
 509     if (afs_brsWaiters) afs_osi_Wakeup(&afs_brsWaiters);
 510     MReleaseWriteLock(&afs_xbrs);
 511 }
 512
 513 /* return true if bkg fetch daemons are all busy */
 514 int afs_BBusy(void)
 515 {
 516     AFS_STATCNT(afs_BBusy);
 517     if (afs_brsDaemons > 0) return 0;
 518     return 1;
 519 }
 520
 521 struct brequest *afs_BQueue(register short aopcode, register struct vcache *avc,
 522         afs_int32 dontwait, afs_int32 ause, struct AFS_UCRED *acred,
 523         afs_size_t asparm0, afs_size_t asparm1, void *apparm0)
 524 {
 525     register int i;
 526     register struct brequest *tb;
 527
 528     AFS_STATCNT(afs_BQueue);
 529     MObtainWriteLock(&afs_xbrs,296);
 530     while (1) {
 531         tb = afs_brs;
 532         for(i=0;i<NBRS;i++,tb++) {
 533             if (tb->refCount == 0) break;
 534         }
 535         if (i < NBRS) {
 536             /* found a buffer */
 537             tb->opcode = aopcode;
 538             tb->vnode = avc;
 539             tb->cred = acred;
 540             crhold(tb->cred);
 541             if (avc) {
 542 #ifdef  AFS_DEC_ENV
 543                 avc->vrefCount++;
 544 #else
 545 #if defined(AFS_NETBSD_ENV) || defined(AFS_OBSD_ENV)
 546                 AFS_HOLD(AFSTOV(avc));
 547 #else
 548                 VN_HOLD(AFSTOV(avc));
 549 #endif
 550 #endif
 551             }
 552             tb->refCount = ause+1;
 553             tb->size_parm[0] = asparm0;
 554             tb->size_parm[1] = asparm1;
 555             tb->ptr_parm[0]  = apparm0;
 556             tb->flags = 0;
 557             tb->code = 0;
 558             tb->ts = afs_brs_count++;
 559             /* if daemons are waiting for work, wake them up */
 560             if (afs_brsDaemons > 0) {
 561                 afs_osi_Wakeup(&afs_brsDaemons);
 562             }
 563             MReleaseWriteLock(&afs_xbrs);
 564             return tb;
 565         }
 566         if (dontwait) {
 567             MReleaseWriteLock(&afs_xbrs);
 568             return NULL;
 569         }
 570         /* no free buffers, sleep a while */
 571         afs_brsWaiters++;
 572         MReleaseWriteLock(&afs_xbrs);
 573         afs_osi_Sleep(&afs_brsWaiters);
 574         MObtainWriteLock(&afs_xbrs,301);
 575         afs_brsWaiters--;
 576     }
 577 }
 578
 579 #ifdef  AFS_AIX32_ENV
 580 #ifdef AFS_AIX41_ENV
 581 /* AIX 4.1 has a much different sleep/wakeup mechanism available for use.
 582  * The modifications here will work for either a UP or MP machine.
 583  */
 584 struct buf *afs_asyncbuf = (struct buf*)0;
 585 afs_int32 afs_asyncbuf_cv = EVENT_NULL;
 586 afs_int32 afs_biodcnt = 0;
 587
 588 /* in implementing this, I assumed that all external linked lists were
 589  * null-terminated.
 590  *
 591  * Several places in this code traverse a linked list.  The algorithm
 592  * used here is probably unfamiliar to most people.  Careful examination
 593  * will show that it eliminates an assignment inside the loop, as compared
 594  * to the standard algorithm, at the cost of occasionally using an extra
 595  * variable.
 596  */
 597
 598 /* get_bioreq()
 599  *
 600  * This function obtains, and returns, a pointer to a buffer for
 601  * processing by a daemon.  It sleeps until such a buffer is available.
 602  * The source of buffers for it is the list afs_asyncbuf (see also
 603  * naix_vm_strategy).  This function may be invoked concurrently by
 604  * several processes, that is, several instances of the same daemon.
 605  * naix_vm_strategy, which adds buffers to the list, runs at interrupt
 606  * level, while get_bioreq runs at process level.
 607  *
 608  * Since AIX 4.1 can wake just one process at a time, the separate sleep
 609  * addresses have been removed.
 610  * Note that the kernel_lock is held until the e_sleep_thread() occurs.
 611  * The afs_asyncbuf_lock is primarily used to serialize access between
 612  * process and interrupts.
 613  */
 614 Simple_lock afs_asyncbuf_lock;
 615 /*static*/ struct buf *afs_get_bioreq()
 616 {
 617     struct buf *bp = NULL;
 618     struct buf *bestbp;
 619     struct buf **bestlbpP, **lbpP;
 620     int bestage, stop;
 621     struct buf *t1P, *t2P;      /* temp pointers for list manipulation */
 622     int oldPriority;
 623     afs_uint32 wait_ret;
 624     struct afs_bioqueue *s;
 625
 626     /* ??? Does the forward pointer of the returned buffer need to be NULL?
 627     */
 628
 629     /* Disable interrupts from the strategy function, and save the
 630      * prior priority level and lock access to the afs_asyncbuf.
 631      */
 632     AFS_GUNLOCK();
 633     oldPriority = disable_lock(INTMAX, &afs_asyncbuf_lock) ;
 634
 635     while(1) {
 636         if (afs_asyncbuf) {
 637             /* look for oldest buffer */
 638             bp = bestbp = afs_asyncbuf;
 639             bestage = (int) bestbp->av_back;
 640             bestlbpP = &afs_asyncbuf;
 641             while (1) {
 642                 lbpP = &bp->av_forw;
 643                 bp = *lbpP;
 644                 if (!bp) break;
 645                 if ((int) bp->av_back - bestage < 0) {
 646                     bestbp = bp;
 647                     bestlbpP = lbpP;
 648                     bestage = (int) bp->av_back;
 649                 }
 650             }
 651             bp = bestbp;
 652             *bestlbpP = bp->av_forw;
 653             break;
 654         }
 655         else {
 656             /* If afs_asyncbuf is null, it is necessary to go to sleep.
 657              * e_wakeup_one() ensures that only one thread wakes.
 658              */
 659             int interrupted;
 660             /* The LOCK_HANDLER indicates to e_sleep_thread to only drop the
 661              * lock on an MP machine.
 662              */
 663             interrupted = e_sleep_thread(&afs_asyncbuf_cv,
 664                                          &afs_asyncbuf_lock,
 665                                          LOCK_HANDLER|INTERRUPTIBLE);
 666             if (interrupted==THREAD_INTERRUPTED) {
 667                 /* re-enable interrupts from strategy */
 668                 unlock_enable(oldPriority, &afs_asyncbuf_lock);
 669                 AFS_GLOCK();
 670                 return(NULL);
 671             }
 672         }  /* end of "else asyncbuf is empty" */
 673     } /* end of "inner loop" */
 674
 675     /*assert (bp);*/
 676
 677     unlock_enable(oldPriority, &afs_asyncbuf_lock);
 678     AFS_GLOCK();
 679
 680     /* For the convenience of other code, replace the gnodes in
 681      * the b_vp field of bp and the other buffers on the b_work
 682      * chain with the corresponding vnodes.
 683      *
 684      * ??? what happens to the gnodes?  They're not just cut loose,
 685      * are they?
 686      */
 687     for(t1P=bp;;) {
 688         t2P = (struct buf *) t1P->b_work;
 689         t1P->b_vp = ((struct gnode *) t1P->b_vp)->gn_vnode;
 690         if (!t2P)
 691             break;
 692
 693         t1P = (struct buf *) t2P->b_work;
 694         t2P->b_vp = ((struct gnode *) t2P->b_vp)->gn_vnode;
 695         if (!t1P)
 696             break;
 697     }
 698
 699     /* If the buffer does not specify I/O, it may immediately
 700      * be returned to the caller.  This condition is detected
 701      * by examining the buffer's flags (the b_flags field).  If
 702      * the B_PFPROT bit is set, the buffer represents a protection
 703      * violation, rather than a request for I/O.  The remainder
 704      * of the outer loop handles the case where the B_PFPROT bit is clear.
 705      */
 706     if (bp->b_flags & B_PFPROT)  {
 707         return (bp);
 708     }
 709     return (bp);
 710
 711 } /* end of function get_bioreq() */
 712
 713
 714 /* afs_BioDaemon
 715  *
 716  * This function is the daemon.  It is called from the syscall
 717  * interface.  Ordinarily, a script or an administrator will run a
 718  * daemon startup utility, specifying the number of I/O daemons to
 719  * run.  The utility will fork off that number of processes,
 720  * each making the appropriate syscall, which will cause this
 721  * function to be invoked.
 722  */
 723 static int afs_initbiod = 0;            /* this is self-initializing code */
 724 int DOvmlock = 0;
 725 int afs_BioDaemon (afs_int32 nbiods)
 726 {
 727     afs_int32 code, s, pflg = 0;
 728     label_t jmpbuf;
 729     struct buf *bp, *bp1, *tbp1, *tbp2;         /* temp pointers only */
 730     caddr_t tmpaddr;
 731     struct vnode *vp;
 732     struct vcache *vcp;
 733     char tmperr;
 734     if (!afs_initbiod) {
 735         /* XXX ###1 XXX */
 736         afs_initbiod = 1;
 737         /* pin lock, since we'll be using it in an interrupt. */
 738         lock_alloc(&afs_asyncbuf_lock, LOCK_ALLOC_PIN, 2, 1);
 739         simple_lock_init(&afs_asyncbuf_lock);
 740         pin (&afs_asyncbuf, sizeof(struct buf*));
 741         pin (&afs_asyncbuf_cv, sizeof(afs_int32));
 742     }
 743
 744     /* Ignore HUP signals... */
 745     {
 746         sigset_t sigbits, osigbits;
 747         /*
 748          * add SIGHUP to the set of already masked signals
 749          */
 750         SIGFILLSET(sigbits);                    /* allow all signals    */
 751         SIGDELSET(sigbits, SIGHUP);             /*   except SIGHUP      */
 752         limit_sigs(&sigbits, &osigbits);        /*   and already masked */
 753     }
 754     /* Main body starts here -- this is an intentional infinite loop, and
 755      * should NEVER exit
 756      *
 757      * Now, the loop will exit if get_bioreq() returns NULL, indicating
 758      * that we've been interrupted.
 759      */
 760     while (1) {
 761         bp = afs_get_bioreq();
 762         if (!bp)
 763             break;      /* we were interrupted */
 764         if (code = setjmpx(&jmpbuf)) {
 765             /* This should not have happend, maybe a lack of resources  */
 766             AFS_GUNLOCK();
 767             s = disable_lock(INTMAX, &afs_asyncbuf_lock);
 768             for (bp1 = bp; bp ; bp = bp1) {
 769                 if (bp1)
 770                     bp1 = (struct buf *) bp1->b_work;
 771                 bp->b_actf = 0;
 772                 bp->b_error = code;
 773                 bp->b_flags |= B_ERROR;
 774                 iodone(bp);
 775             }
 776             unlock_enable(s, &afs_asyncbuf_lock);
 777             AFS_GLOCK();
 778             continue;
 779         }
 780         vcp = VTOAFS(bp->b_vp);
 781         if (bp->b_flags & B_PFSTORE) {  /* XXXX */
 782             ObtainWriteLock(&vcp->lock,404);
 783             if (vcp->v.v_gnode->gn_mwrcnt) {
 784                 afs_offs_t newlength =
 785                         (afs_offs_t) dbtob(bp->b_blkno) + bp->b_bcount;
 786                 if (vcp->m.Length < newlength) {
 787                     afs_Trace4(afs_iclSetp, CM_TRACE_SETLENGTH,
 788                         ICL_TYPE_STRING, __FILE__,
 789                         ICL_TYPE_LONG, __LINE__,
 790                         ICL_TYPE_OFFSET, ICL_HANDLE_OFFSET(vcp->m.Length),
 791                         ICL_TYPE_OFFSET, ICL_HANDLE_OFFSET(newlength));
 792                     vcp->m.Length = newlength;
 793                 }
 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 = NULL;
 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     SIGDELSET(u.u_procp->p_sig, SIGHUP);
1103     SIGADDSET(u.u_procp->p_sigignore, SIGHUP);
1104     SIGDELSET(u.u_procp->p_sigcatch, SIGHUP);
1105     /* Main body starts here -- this is an intentional infinite loop, and
1106      * should NEVER exit
1107      *
1108      * Now, the loop will exit if get_bioreq() returns NULL, indicating
1109      * that we've been interrupted.
1110      */
1111     while (1) {
1112         bp = afs_get_bioreq(self);
1113         if (!bp)
1114             break;      /* we were interrupted */
1115         if (code = setjmpx(&jmpbuf)) {
1116             /* This should not have happend, maybe a lack of resources  */
1117             s = splimp();
1118             for (bp1 = bp; bp ; bp = bp1) {
1119                 if (bp1)
1120                     bp1 = bp1->b_work;
1121                 bp->b_actf = 0;
1122                 bp->b_error = code;
1123                 bp->b_flags |= B_ERROR;
1124                 iodone(bp);
1125             }
1126             splx(s);
1127             continue;
1128         }
1129         vcp = VTOAFS(bp->b_vp);
1130         if (bp->b_flags & B_PFSTORE) {
1131             ObtainWriteLock(&vcp->lock,210);
1132             if (vcp->v.v_gnode->gn_mwrcnt) {
1133                 afs_offs_t newlength =
1134                         (afs_offs_t) dbtob(bp->b_blkno) + bp->b_bcount;
1135                 if (vcp->m.Length < newlength) {
1136                     afs_Trace4(afs_iclSetp, CM_TRACE_SETLENGTH,
1137                         ICL_TYPE_STRING, __FILE__,
1138                         ICL_TYPE_LONG, __LINE__,
1139                         ICL_TYPE_OFFSET, ICL_HANDLE_OFFSET(vcp->m.Length),
1140                         ICL_TYPE_OFFSET, ICL_HANDLE_OFFSET(newlength));
1141                     vcp->m.Length = newlength;
1142                 }
1143             }
1144             ReleaseWriteLock(&vcp->lock);
1145         }
1146         /* If the buffer represents a protection violation, rather than
1147          * an actual request for I/O, no special action need be taken.
1148          */
1149         if ( bp->b_flags & B_PFPROT ) {
1150             iodone (bp);    /* Notify all users of the buffer that we're done */
1151             continue;
1152         }
1153 if (DOvmlock)
1154         ObtainWriteLock(&vcp->pvmlock,558);
1155         /*
1156          * First map its data area to a region in the current address space
1157          * by calling vm_att with the subspace identifier, and a pointer to
1158          * the data area.  vm_att returns  a new data area pointer, but we
1159          * also want to hang onto the old one.
1160          */
1161         tmpaddr = bp->b_baddr;
1162         bp->b_baddr = vm_att (bp->b_xmemd.subspace_id, tmpaddr);
1163         tmperr = afs_ustrategy(bp);     /* temp variable saves offset calculation */
1164         if (tmperr) {                   /* in non-error case */
1165             bp->b_flags |= B_ERROR;             /* should other flags remain set ??? */
1166             bp->b_error = tmperr;
1167         }
1168
1169         /* Unmap the buffer's data area by calling vm_det.  Reset data area
1170          * to the value that we saved above.
1171          */
1172         vm_det(bp->b_un.b_addr);
1173         bp->b_baddr = tmpaddr;
1174
1175         /*
1176          * buffer may be linked with other buffers via the b_work field.
1177          * See also naix_vm_strategy.  For each buffer in the chain (including
1178          * bp) notify all users of the buffer that the daemon is finished
1179          * using it by calling iodone.
1180          * assumes iodone can modify the b_work field.
1181          */
1182         for(tbp1=bp;;) {
1183             tbp2 = (struct buf *) tbp1->b_work;
1184             iodone(tbp1);
1185             if (!tbp2)
1186                 break;
1187
1188             tbp1 = (struct buf *) tbp2->b_work;
1189             iodone(tbp2);
1190             if (!tbp1)
1191                 break;
1192         }
1193 if (DOvmlock)
1194         ReleaseWriteLock(&vcp->pvmlock);     /* Unlock the vnode.  */
1195         clrjmpx(&jmpbuf);
1196     } /* infinite loop (unless we're interrupted) */
1197     unpin (self, sizeof (struct afs_bioqueue));
1198     afs_osi_Free (self, sizeof (struct afs_bioqueue));
1199 } /* end of afs_BioDaemon() */
1200 #endif /* AFS_AIX41_ENV */
1201 #endif /* AFS_AIX32_ENV */
1202
1203
1204 int afs_nbrs = 0;
1205 void afs_BackgroundDaemon(void)
1206 {
1207     struct brequest *tb;
1208     int i, foundAny;
1209
1210     AFS_STATCNT(afs_BackgroundDaemon);
1211     /* initialize subsystem */
1212     if (brsInit == 0) {
1213         LOCK_INIT(&afs_xbrs, "afs_xbrs");
1214         memset((char *)afs_brs, 0, sizeof(afs_brs));
1215         brsInit = 1;
1216 #if defined (AFS_SGI_ENV) && defined(AFS_SGI_SHORTSTACK)
1217         /*
1218          * steal the first daemon for doing delayed DSlot flushing
1219          * (see afs_GetDownDSlot)
1220          */
1221         AFS_GUNLOCK();
1222         afs_sgidaemon();
1223         return;
1224 #endif
1225     }
1226     afs_nbrs++;
1227
1228     MObtainWriteLock(&afs_xbrs,302);
1229     while (1) {
1230         int min_ts = 0;
1231         struct brequest *min_tb = NULL;
1232
1233         if (afs_termState == AFSOP_STOP_BKG) {
1234             if (--afs_nbrs <= 0)
1235                 afs_termState = AFSOP_STOP_TRUNCDAEMON;
1236             MReleaseWriteLock(&afs_xbrs);
1237             afs_osi_Wakeup(&afs_termState);
1238             return;
1239         }
1240
1241         /* find a request */
1242         tb = afs_brs;
1243         foundAny = 0;
1244         for(i=0; i<NBRS; i++, tb++) {
1245             /* look for request with smallest ts */
1246             if ((tb->refCount > 0) && !(tb->flags & BSTARTED)) {
1247                 /* new request, not yet picked up */
1248                 if ((min_tb && (min_ts - tb->ts > 0)) || !min_tb) {
1249                     min_tb = tb;
1250                     min_ts = tb->ts;
1251                 }
1252             }
1253         }
1254         if ((tb = min_tb)) {
1255             /* claim and process this request */
1256             tb->flags |= BSTARTED;
1257             MReleaseWriteLock(&afs_xbrs);
1258             foundAny = 1;
1259             afs_Trace1(afs_iclSetp, CM_TRACE_BKG1,
1260                        ICL_TYPE_INT32, tb->opcode);
1261             if (tb->opcode == BOP_FETCH)
1262                 BPrefetch(tb);
1263             else if (tb->opcode == BOP_STORE)
1264                 BStore(tb);
1265             else if (tb->opcode == BOP_PATH)
1266                 BPath(tb);
1267             else panic("background bop");
1268             if (tb->vnode) {
1269 #ifdef  AFS_DEC_ENV
1270                 tb->vnode->vrefCount--;     /* fix up reference count */
1271 #else
1272                 AFS_RELE((struct vnode *)(tb->vnode));  /* MUST call vnode layer or could lose vnodes */
1273 #endif
1274                 tb->vnode = NULL;
1275             }
1276             if (tb->cred) {
1277                 crfree(tb->cred);
1278                 tb->cred = (struct AFS_UCRED *) 0;
1279             }
1280             afs_BRelease(tb);   /* this grabs and releases afs_xbrs lock */
1281             MObtainWriteLock(&afs_xbrs,305);
1282         }
1283         if (!foundAny) {
1284             /* wait for new request */
1285             afs_brsDaemons++;
1286             MReleaseWriteLock(&afs_xbrs);
1287             afs_osi_Sleep(&afs_brsDaemons);
1288             MObtainWriteLock(&afs_xbrs,307);
1289             afs_brsDaemons--;
1290         }
1291     }
1292 }
1293
1294
1295 void shutdown_daemons(void)
1296 {
1297   AFS_STATCNT(shutdown_daemons);
1298   if (afs_cold_shutdown) {
1299       afs_brsDaemons = brsInit = 0;
1300       rxepoch_checked = afs_nbrs = 0;
1301       memset((char *)afs_brs, 0, sizeof(afs_brs));
1302       memset((char *)&afs_xbrs, 0, sizeof(afs_lock_t));
1303       afs_brsWaiters = 0;
1304 #ifdef AFS_AIX32_ENV
1305 #ifdef AFS_AIX41_ENV
1306       lock_free(&afs_asyncbuf_lock);
1307       unpin(&afs_asyncbuf, sizeof(struct buf*));
1308       pin (&afs_asyncbuf_cv, sizeof(afs_int32));
1309 #else /* AFS_AIX41_ENV */
1310       afs_busyq = NULL;
1311       afs_biodcnt = 0;
1312       memset((char *)&afs_bioqueue, 0, sizeof(struct afs_bioqueue));
1313 #endif
1314       afs_initbiod = 0;
1315 #endif
1316   }
1317 }
1318
1319 #if defined(AFS_SGI_ENV) && defined(AFS_SGI_SHORTSTACK)
1320 /*
1321  * sgi - daemon - handles certain operations that otherwise
1322  * would use up too much kernel stack space
1323  *
1324  * This all assumes that since the caller must have the xdcache lock
1325  * exclusively that the list will never be more than one long
1326  * and noone else can attempt to add anything until we're done.
1327  */
1328 SV_TYPE afs_sgibksync;
1329 SV_TYPE afs_sgibkwait;
1330 lock_t afs_sgibklock;
1331 struct dcache *afs_sgibklist;
1332
1333 int afs_sgidaemon(void)
1334 {
1335         int s;
1336         struct dcache *tdc;
1337
1338         if (afs_sgibklock == NULL) {
1339                 SV_INIT(&afs_sgibksync, "bksync", 0, 0);
1340                 SV_INIT(&afs_sgibkwait, "bkwait", 0, 0);
1341                 SPINLOCK_INIT(&afs_sgibklock, "bklock");
1342         }
1343         s = SPLOCK(afs_sgibklock);
1344         for (;;) {
1345                 /* wait for something to do */
1346                 SP_WAIT(afs_sgibklock, s, &afs_sgibksync, PINOD);
1347                 osi_Assert(afs_sgibklist);
1348
1349                 /* XX will probably need to generalize to real list someday */
1350                 s = SPLOCK(afs_sgibklock);
1351                 while (afs_sgibklist) {
1352                         tdc = afs_sgibklist;
1353                         afs_sgibklist = NULL;
1354                         SPUNLOCK(afs_sgibklock, s);
1355                         AFS_GLOCK();
1356                         tdc->dflags &= ~DFEntryMod;
1357                         afs_WriteDCache(tdc, 1);
1358                         AFS_GUNLOCK();
1359                         s = SPLOCK(afs_sgibklock);
1360                 }
1361
1362                 /* done all the work - wake everyone up */
1363                 while (SV_SIGNAL(&afs_sgibkwait))
1364                         ;
1365         }
1366 }
1367 #endif