src/afs/afs_dcache.c

   1 /*
   2  * Copyright 2000, International Business Machines Corporation and others.
   3  * All Rights Reserved.
   4  *
   5  * This software has been released under the terms of the IBM Public
   6  * License.  For details, see the LICENSE file in the top-level source
   7  * directory or online at http://www.openafs.org/dl/license10.html
   8  */
   9
  10 /*
  11  * Implements:
  12  */
  13 #include <afsconfig.h>
  14 #include "afs/param.h"
  15
  16
  17 #include "afs/sysincludes.h"    /*Standard vendor system headers */
  18 #include "afsincludes.h"        /*AFS-based standard headers */
  19 #include "afs/afs_stats.h"      /* statistics */
  20 #include "afs/afs_cbqueue.h"
  21 #include "afs/afs_osidnlc.h"
  22
  23 #include <opr/ffs.h>
  24
  25 /* Forward declarations. */
  26 static void afs_GetDownD(int anumber, int *aneedSpace, afs_int32 buckethint);
  27 static int afs_FreeDiscardedDCache(void);
  28 static void afs_DiscardDCache(struct dcache *);
  29 static void afs_FreeDCache(struct dcache *);
  30 /* For split cache */
  31 static afs_int32 afs_DCGetBucket(struct vcache *);
  32 static void afs_DCAdjustSize(struct dcache *, afs_int32, afs_int32);
  33 static void afs_DCMoveBucket(struct dcache *, afs_int32, afs_int32);
  34 static void afs_DCSizeInit(void);
  35 static afs_int32 afs_DCWhichBucket(afs_int32, afs_int32);
  36
  37 /*
  38  * --------------------- Exported definitions ---------------------
  39  */
  40 /* For split cache */
  41 afs_int32 afs_blocksUsed_0;    /*!< 1K blocks in cache - in theory is zero */
  42 afs_int32 afs_blocksUsed_1;    /*!< 1K blocks in cache */
  43 afs_int32 afs_blocksUsed_2;    /*!< 1K blocks in cache */
  44 afs_int32 afs_pct1 = -1;
  45 afs_int32 afs_pct2 = -1;
  46 afs_uint32 afs_tpct1 = 0;
  47 afs_uint32 afs_tpct2 = 0;
  48 afs_uint32 splitdcache = 0;
  49
  50 afs_lock_t afs_xdcache;         /*!< Lock: alloc new disk cache entries */
  51 afs_int32 afs_freeDCList;       /*!< Free list for disk cache entries */
  52 afs_int32 afs_freeDCCount;      /*!< Count of elts in freeDCList */
  53 afs_int32 afs_discardDCList;    /*!< Discarded disk cache entries */
  54 afs_int32 afs_discardDCCount;   /*!< Count of elts in discardDCList */
  55 struct dcache *afs_freeDSList;  /*!< Free list for disk slots */
  56 struct dcache *afs_Initial_freeDSList;  /*!< Initial list for above */
  57 afs_dcache_id_t cacheInode;               /*!< Inode for CacheItems file */
  58 struct osi_file *afs_cacheInodep = 0;   /*!< file for CacheItems inode */
  59 struct afs_q afs_DLRU;          /*!< dcache LRU */
  60 afs_int32 afs_dhashsize = 1024;
  61 afs_int32 *afs_dvhashTbl;       /*!< Data cache hash table: hashed by FID + chunk number. */
  62 afs_int32 *afs_dchashTbl;       /*!< Data cache hash table: hashed by FID. */
  63 afs_int32 *afs_dvnextTbl;       /*!< Dcache hash table links */
  64 afs_int32 *afs_dcnextTbl;       /*!< Dcache hash table links */
  65 struct dcache **afs_indexTable; /*!< Pointers to dcache entries */
  66 afs_hyper_t *afs_indexTimes;    /*!< Dcache entry Access times */
  67 afs_int32 *afs_indexUnique;     /*!< dcache entry Fid.Unique */
  68 unsigned char *afs_indexFlags;  /*!< (only one) Is there data there? */
  69 afs_hyper_t afs_indexCounter;   /*!< Fake time for marking index
  70                                  * entries */
  71 afs_int32 afs_cacheFiles = 0;   /*!< Size of afs_indexTable */
  72 afs_int32 afs_cacheBlocks;      /*!< 1K blocks in cache */
  73 afs_int32 afs_cacheStats;       /*!< Stat entries in cache */
  74 afs_int32 afs_blocksUsed;       /*!< Number of blocks in use */
  75 afs_int32 afs_blocksDiscarded;  /*!<Blocks freed but not truncated */
  76 afs_int32 afs_fsfragsize = AFS_MIN_FRAGSIZE;    /*!< Underlying Filesystem minimum unit
  77                                          *of disk allocation usually 1K
  78                                          *this value is (truefrag -1 ) to
  79                                          *save a bunch of subtracts... */
  80 #ifdef AFS_64BIT_CLIENT
  81 #ifdef AFS_VM_RDWR_ENV
  82 afs_size_t afs_vmMappingEnd;    /* !< For large files (>= 2GB) the VM
  83                                  * mapping an 32bit addressing machines
  84                                  * can only be used below the 2 GB
  85                                  * line. From this point upwards we
  86                                  * must do direct I/O into the cache
  87                                  * files. The value should be on a
  88                                  * chunk boundary. */
  89 #endif /* AFS_VM_RDWR_ENV */
  90 #endif /* AFS_64BIT_CLIENT */
  91
  92 /* The following is used to ensure that new dcache's aren't obtained when
  93  * the cache is nearly full.
  94  */
  95 int afs_WaitForCacheDrain = 0;
  96 int afs_TruncateDaemonRunning = 0;
  97 int afs_CacheTooFull = 0;
  98
  99 afs_int32 afs_dcentries;        /*!< In-memory dcache entries */
 100
 101
 102 int dcacheDisabled = 0;
 103
 104 struct afs_cacheOps afs_UfsCacheOps = {
 105 #ifndef HAVE_STRUCT_LABEL_SUPPORT
 106     osi_UFSOpen,
 107     osi_UFSTruncate,
 108     afs_osi_Read,
 109     afs_osi_Write,
 110     osi_UFSClose,
 111     afs_UFSReadUIO,
 112     afs_UFSWriteUIO,
 113     afs_UFSGetDSlot,
 114     afs_UFSGetVolSlot,
 115     afs_UFSHandleLink,
 116 #else
 117     .open       = osi_UFSOpen,
 118     .truncate   = osi_UFSTruncate,
 119     .fread      = afs_osi_Read,
 120     .fwrite     = afs_osi_Write,
 121     .close      = osi_UFSClose,
 122     .vreadUIO   = afs_UFSReadUIO,
 123     .vwriteUIO  = afs_UFSWriteUIO,
 124     .GetDSlot   = afs_UFSGetDSlot,
 125     .GetVolSlot = afs_UFSGetVolSlot,
 126     .HandleLink = afs_UFSHandleLink,
 127 #endif
 128 };
 129
 130 struct afs_cacheOps afs_MemCacheOps = {
 131 #ifndef HAVE_STRUCT_LABEL_SUPPORT
 132     afs_MemCacheOpen,
 133     afs_MemCacheTruncate,
 134     afs_MemReadBlk,
 135     afs_MemWriteBlk,
 136     afs_MemCacheClose,
 137     afs_MemReadUIO,
 138     afs_MemWriteUIO,
 139     afs_MemGetDSlot,
 140     afs_MemGetVolSlot,
 141     afs_MemHandleLink,
 142 #else
 143     .open       = afs_MemCacheOpen,
 144     .truncate   = afs_MemCacheTruncate,
 145     .fread      = afs_MemReadBlk,
 146     .fwrite     = afs_MemWriteBlk,
 147     .close      = afs_MemCacheClose,
 148     .vreadUIO   = afs_MemReadUIO,
 149     .vwriteUIO  = afs_MemWriteUIO,
 150     .GetDSlot   = afs_MemGetDSlot,
 151     .GetVolSlot = afs_MemGetVolSlot,
 152     .HandleLink = afs_MemHandleLink,
 153 #endif
 154 };
 155
 156 int cacheDiskType;              /*Type of backing disk for cache */
 157 struct afs_cacheOps *afs_cacheType;
 158
 159
 160 /*
 161  * The PFlush algorithm makes use of the fact that Fid.Unique is not used in
 162  * below hash algorithms.  Change it if need be so that flushing algorithm
 163  * doesn't move things from one hash chain to another.
 164  */
 165 /*Vnode, Chunk -> Hash table index */
 166 int DCHash(struct VenusFid *fid, afs_int32 chunk)
 167 {
 168     afs_uint32 buf[3];
 169
 170     buf[0] = fid->Fid.Volume;
 171     buf[1] = fid->Fid.Vnode;
 172     buf[2] = chunk;
 173     return opr_jhash(buf, 3, 0) & (afs_dhashsize - 1);
 174 }
 175 /*Vnode -> Other hash table index */
 176 int DVHash(struct VenusFid *fid)
 177 {
 178     return opr_jhash_int2(fid->Fid.Volume, fid->Fid.Vnode, 0) &
 179         (afs_dhashsize - 1);
 180 }
 181
 182 /*!
 183  * Where is this vcache's entry associated dcache located/
 184  * \param avc The vcache entry.
 185  * \return Bucket index:
 186  *      1 : main
 187  *      2 : RO
 188  */
 189 static afs_int32
 190 afs_DCGetBucket(struct vcache *avc)
 191 {
 192     if (!splitdcache)
 193         return 1;
 194
 195     /* This should be replaced with some sort of user configurable function */
 196     if (avc->f.states & CRO) {
 197         return 2;
 198     } else if (avc->f.states & CBackup) {
 199         return 1;
 200     } else {
 201         /* RW */
 202     }
 203     /* main bucket */
 204     return 1;
 205 }
 206
 207 /*!
 208  * Readjust a dcache's size.
 209  *
 210  * \param adc The dcache to be adjusted.
 211  * \param oldSize Old size for the dcache.
 212  * \param newSize The new size to be adjusted to.
 213  *
 214  */
 215 static void
 216 afs_DCAdjustSize(struct dcache *adc, afs_int32 oldSize, afs_int32 newSize)
 217 {
 218     afs_int32 adjustSize = newSize - oldSize;
 219
 220     if (!splitdcache)
 221         return;
 222
 223     switch (adc->bucket)
 224     {
 225     case 0:
 226         afs_blocksUsed_0 += adjustSize;
 227         afs_stats_cmperf.cacheBucket0_Discarded += oldSize;
 228         break;
 229     case 1:
 230         afs_blocksUsed_1 += adjustSize;
 231         afs_stats_cmperf.cacheBucket1_Discarded += oldSize;
 232         break;
 233     case 2:
 234         afs_blocksUsed_2 += adjustSize;
 235         afs_stats_cmperf.cacheBucket2_Discarded += oldSize;
 236         break;
 237     }
 238
 239     return;
 240 }
 241
 242 /*!
 243  * Move a dcache from one bucket to another.
 244  *
 245  * \param adc Operate on this dcache.
 246  * \param size Size in bucket (?).
 247  * \param newBucket Destination bucket.
 248  *
 249  */
 250 static void
 251 afs_DCMoveBucket(struct dcache *adc, afs_int32 size, afs_int32 newBucket)
 252 {
 253     if (!splitdcache)
 254         return;
 255
 256     /* Substract size from old bucket. */
 257     switch (adc->bucket)
 258     {
 259     case 0:
 260         afs_blocksUsed_0 -= size;
 261         break;
 262     case 1:
 263         afs_blocksUsed_1 -= size;
 264         break;
 265     case 2:
 266         afs_blocksUsed_2 -= size;
 267         break;
 268     }
 269
 270     /* Set new bucket and increase destination bucket size. */
 271     adc->bucket = newBucket;
 272
 273     switch (adc->bucket)
 274     {
 275     case 0:
 276         afs_blocksUsed_0 += size;
 277         break;
 278     case 1:
 279         afs_blocksUsed_1 += size;
 280         break;
 281     case 2:
 282         afs_blocksUsed_2 += size;
 283         break;
 284     }
 285
 286     return;
 287 }
 288
 289 /*!
 290  * Init split caches size.
 291  */
 292 static void
 293 afs_DCSizeInit(void)
 294 {
 295     afs_blocksUsed_0 = afs_blocksUsed_1 = afs_blocksUsed_2 = 0;
 296 }
 297
 298
 299 /*!
 300  * \param phase
 301  * \param bucket
 302  */
 303 static afs_int32
 304 afs_DCWhichBucket(afs_int32 phase, afs_int32 bucket)
 305 {
 306     if (!splitdcache)
 307         return 0;
 308
 309     afs_pct1 = afs_blocksUsed_1 / (afs_cacheBlocks / 100);
 310     afs_pct2 = afs_blocksUsed_2 / (afs_cacheBlocks / 100);
 311
 312     /* Short cut: if we don't know about it, try to kill it */
 313     if (phase < 2 && afs_blocksUsed_0)
 314         return 0;
 315
 316     if (afs_pct1 > afs_tpct1)
 317         return 1;
 318     if (afs_pct2 > afs_tpct2)
 319         return 2;
 320     return 0; /* unlikely */
 321 }
 322
 323
 324 /*!
 325  * Warn about failing to store a file.
 326  *
 327  * \param acode Associated error code.
 328  * \param avolume Volume involved.
 329  * \param aflags How to handle the output:
 330  *      aflags & 1: Print out on console
 331  *      aflags & 2: Print out on controlling tty
 332  *
 333  * \note Environment: Call this from close call when vnodeops is RCS unlocked.
 334  */
 335
 336 void
 337 afs_StoreWarn(afs_int32 acode, afs_int32 avolume,
 338               afs_int32 aflags)
 339 {
 340     static char problem_fmt[] =
 341         "afs: failed to store file in volume %d (%s)\n";
 342     static char problem_fmt_w_error[] =
 343         "afs: failed to store file in volume %d (error %d)\n";
 344     static char netproblems[] = "network problems";
 345     static char partfull[] = "partition full";
 346     static char overquota[] = "over quota";
 347
 348     AFS_STATCNT(afs_StoreWarn);
 349     if (acode < 0) {
 350         /*
 351          * Network problems
 352          */
 353         if (aflags & 1)
 354             afs_warn(problem_fmt, avolume, netproblems);
 355         if (aflags & 2)
 356             afs_warnuser(problem_fmt, avolume, netproblems);
 357     } else if (acode == ENOSPC) {
 358         /*
 359          * Partition full
 360          */
 361         if (aflags & 1)
 362             afs_warn(problem_fmt, avolume, partfull);
 363         if (aflags & 2)
 364             afs_warnuser(problem_fmt, avolume, partfull);
 365     } else
 366 #ifdef  EDQUOT
 367         /* EDQUOT doesn't exist on solaris and won't be sent by the server.
 368          * Instead ENOSPC will be sent...
 369          */
 370     if (acode == EDQUOT) {
 371         /*
 372          * Quota exceeded
 373          */
 374         if (aflags & 1)
 375             afs_warn(problem_fmt, avolume, overquota);
 376         if (aflags & 2)
 377             afs_warnuser(problem_fmt, avolume, overquota);
 378     } else
 379 #endif
 380     {
 381         /*
 382          * Unknown error
 383          */
 384         if (aflags & 1)
 385             afs_warn(problem_fmt_w_error, avolume, acode);
 386         if (aflags & 2)
 387             afs_warnuser(problem_fmt_w_error, avolume, acode);
 388     }
 389 }                               /*afs_StoreWarn */
 390
 391 /*!
 392  * Try waking up truncation daemon, if it's worth it.
 393  */
 394 void
 395 afs_MaybeWakeupTruncateDaemon(void)
 396 {
 397     if (!afs_CacheTooFull && afs_CacheIsTooFull()) {
 398         afs_CacheTooFull = 1;
 399         if (!afs_TruncateDaemonRunning)
 400             afs_osi_Wakeup((int *)afs_CacheTruncateDaemon);
 401     } else if (!afs_TruncateDaemonRunning
 402                && afs_blocksDiscarded > CM_MAXDISCARDEDCHUNKS) {
 403         afs_osi_Wakeup((int *)afs_CacheTruncateDaemon);
 404     }
 405 }
 406
 407 /*!
 408  * /struct CTD_stats
 409  *
 410  * Keep statistics on run time for afs_CacheTruncateDaemon. This is a
 411  * struct so we need only export one symbol for AIX.
 412  */
 413 static struct CTD_stats {
 414     osi_timeval_t CTD_beforeSleep;
 415     osi_timeval_t CTD_afterSleep;
 416     osi_timeval_t CTD_sleepTime;
 417     osi_timeval_t CTD_runTime;
 418     int CTD_nSleeps;
 419 } CTD_stats;
 420
 421 u_int afs_min_cache = 0;
 422
 423 /*!
 424  * If there are waiters for the cache to drain, wake them if
 425  * the number of free or discarded cache blocks reaches the
 426  * CM_CACHESIZEDDRAINEDPCT limit.
 427  *
 428  * \note Environment:
 429  *      This routine must be called with the afs_xdcache lock held
 430  *      (in write mode).
 431  */
 432 static void
 433 afs_WakeCacheWaitersIfDrained(void)
 434 {
 435     if (afs_WaitForCacheDrain) {
 436         if ((afs_blocksUsed - afs_blocksDiscarded) <=
 437             PERCENT(CM_CACHESIZEDRAINEDPCT, afs_cacheBlocks)) {
 438             afs_WaitForCacheDrain = 0;
 439             afs_osi_Wakeup(&afs_WaitForCacheDrain);
 440         }
 441     }
 442 }
 443
 444 /*!
 445  * Keeps the cache clean and free by truncating uneeded files, when used.
 446  * \param
 447  * \return
 448  */
 449 void
 450 afs_CacheTruncateDaemon(void)
 451 {
 452     osi_timeval_t CTD_tmpTime;
 453     u_int counter;
 454     u_int cb_lowat;
 455     u_int dc_hiwat =
 456         PERCENT((100 - CM_DCACHECOUNTFREEPCT + CM_DCACHEEXTRAPCT), afs_cacheFiles);
 457     afs_min_cache =
 458         (((10 * AFS_CHUNKSIZE(0)) + afs_fsfragsize) & ~afs_fsfragsize) >> 10;
 459
 460     osi_GetuTime(&CTD_stats.CTD_afterSleep);
 461     afs_TruncateDaemonRunning = 1;
 462     while (1) {
 463         cb_lowat = PERCENT((CM_DCACHESPACEFREEPCT - CM_DCACHEEXTRAPCT), afs_cacheBlocks);
 464         ObtainWriteLock(&afs_xdcache, 266);
 465         if (afs_CacheTooFull || afs_WaitForCacheDrain) {
 466             int space_needed, slots_needed;
 467             /* if we get woken up, we should try to clean something out */
 468             for (counter = 0; counter < 10; counter++) {
 469                 space_needed =
 470                     afs_blocksUsed - afs_blocksDiscarded - cb_lowat;
 471                 if (space_needed < 0)
 472                     space_needed = 0;
 473                 slots_needed =
 474                     dc_hiwat - afs_freeDCCount - afs_discardDCCount;
 475                 if (slots_needed < 0)
 476                     slots_needed = 0;
 477                 if (slots_needed || space_needed)
 478                     afs_GetDownD(slots_needed, &space_needed, 0);
 479                 if ((space_needed <= 0) && (slots_needed <= 0)) {
 480                     break;
 481                 }
 482                 if (afs_termState == AFSOP_STOP_TRUNCDAEMON)
 483                     break;
 484             }
 485             if (!afs_CacheIsTooFull()) {
 486                 afs_CacheTooFull = 0;
 487                 afs_WakeCacheWaitersIfDrained();
 488             }
 489         }       /* end of cache cleanup */
 490         ReleaseWriteLock(&afs_xdcache);
 491
 492         /*
 493          * This is a defensive check to try to avoid starving threads
 494          * that may need the global lock so thay can help free some
 495          * cache space. If this thread won't be sleeping or truncating
 496          * any cache files then give up the global lock so other
 497          * threads get a chance to run.
 498          */
 499         if ((afs_termState != AFSOP_STOP_TRUNCDAEMON) && afs_CacheTooFull
 500             && (!afs_blocksDiscarded || afs_WaitForCacheDrain)) {
 501             afs_osi_Wait(100, 0, 0);    /* 100 milliseconds */
 502         }
 503
 504         /*
 505          * This is where we free the discarded cache elements.
 506          */
 507         while (afs_blocksDiscarded && !afs_WaitForCacheDrain
 508                && (afs_termState != AFSOP_STOP_TRUNCDAEMON)) {
 509             int code = afs_FreeDiscardedDCache();
 510             if (code) {
 511                 /* If we can't free any discarded dcache entries, that's okay.
 512                  * We're just doing this in the background; if someone needs
 513                  * discarded entries freed, they will try it themselves and/or
 514                  * signal us that the cache is too full. In any case, we'll
 515                  * try doing this again the next time we run through the loop.
 516                  */
 517                 break;
 518             }
 519         }
 520
 521         /* See if we need to continue to run. Someone may have
 522          * signalled us while we were executing.
 523          */
 524         if (!afs_WaitForCacheDrain && !afs_CacheTooFull
 525             && (afs_termState != AFSOP_STOP_TRUNCDAEMON)) {
 526             /* Collect statistics on truncate daemon. */
 527             CTD_stats.CTD_nSleeps++;
 528             osi_GetuTime(&CTD_stats.CTD_beforeSleep);
 529             afs_stats_GetDiff(CTD_tmpTime, CTD_stats.CTD_afterSleep,
 530                               CTD_stats.CTD_beforeSleep);
 531             afs_stats_AddTo(CTD_stats.CTD_runTime, CTD_tmpTime);
 532
 533             afs_TruncateDaemonRunning = 0;
 534             afs_osi_Sleep((int *)afs_CacheTruncateDaemon);
 535             afs_TruncateDaemonRunning = 1;
 536
 537             osi_GetuTime(&CTD_stats.CTD_afterSleep);
 538             afs_stats_GetDiff(CTD_tmpTime, CTD_stats.CTD_beforeSleep,
 539                               CTD_stats.CTD_afterSleep);
 540             afs_stats_AddTo(CTD_stats.CTD_sleepTime, CTD_tmpTime);
 541         }
 542         if (afs_termState == AFSOP_STOP_TRUNCDAEMON) {
 543             afs_termState = AFSOP_STOP_AFSDB;
 544             afs_osi_Wakeup(&afs_termState);
 545             break;
 546         }
 547     }
 548 }
 549
 550
 551 /*!
 552  * Make adjustment for the new size in the disk cache entry
 553  *
 554  * \note Major Assumptions Here:
 555  *      Assumes that frag size is an integral power of two, less one,
 556  *      and that this is a two's complement machine.  I don't
 557  *      know of any filesystems which violate this assumption...
 558  *
 559  * \param adc Ptr to dcache entry.
 560  * \param anewsize New size desired.
 561  *
 562  */
 563
 564 void
 565 afs_AdjustSize(struct dcache *adc, afs_int32 newSize)
 566 {
 567     afs_int32 oldSize;
 568
 569     AFS_STATCNT(afs_AdjustSize);
 570
 571     if (newSize > afs_OtherCSize && !(adc->f.fid.Fid.Vnode & 1)) {
 572         /* No non-dir cache files should be larger than the chunk size.
 573          * (Directory blobs are fetched in a single chunk file, so directories
 574          * can be larger.) If someone is requesting that a chunk is larger than
 575          * the chunk size, something strange is happening. Log a message about
 576          * it, to give a hint to subsequent strange behavior, if any occurs. */
 577         static int warned;
 578         if (!warned) {
 579             warned = 1;
 580             afs_warn("afs: Warning: dcache %d is very large (%d > %d). This "
 581                      "should not happen, but trying to continue regardless. If "
 582                      "AFS starts hanging or behaving strangely, this might be "
 583                      "why.\n",
 584                      adc->index, newSize, afs_OtherCSize);
 585         }
 586     }
 587
 588     adc->dflags |= DFEntryMod;
 589     oldSize = ((adc->f.chunkBytes + afs_fsfragsize) ^ afs_fsfragsize) >> 10;    /* round up */
 590     adc->f.chunkBytes = newSize;
 591     if (!newSize)
 592         adc->validPos = 0;
 593     newSize = ((newSize + afs_fsfragsize) ^ afs_fsfragsize) >> 10;      /* round up */
 594     afs_DCAdjustSize(adc, oldSize, newSize);
 595     if ((newSize > oldSize) && !AFS_IS_DISCONNECTED) {
 596
 597         /* We're growing the file, wakeup the daemon */
 598         afs_MaybeWakeupTruncateDaemon();
 599     }
 600     afs_blocksUsed += (newSize - oldSize);
 601     afs_stats_cmperf.cacheBlocksInUse = afs_blocksUsed; /* XXX */
 602 }
 603
 604
 605 /*!
 606  * This routine is responsible for moving at least one entry (but up
 607  * to some number of them) from the LRU queue to the free queue.
 608  *
 609  * \param anumber Number of entries that should ideally be moved.
 610  * \param aneedSpace How much space we need (1K blocks);
 611  *
 612  * \note Environment:
 613  *      The anumber parameter is just a hint; at least one entry MUST be
 614  *      moved, or we'll panic.  We must be called with afs_xdcache
 615  *      write-locked.  We should try to satisfy both anumber and aneedspace,
 616  *      whichever is more demanding - need to do several things:
 617  *      1.  only grab up to anumber victims if aneedSpace <= 0, not
 618  *          the whole set of MAXATONCE.
 619  *      2.  dynamically choose MAXATONCE to reflect severity of
 620  *          demand: something like (*aneedSpace >> (logChunk - 9))
 621  *
 622  *  \note N.B. if we're called with aneedSpace <= 0 and anumber > 0, that
 623  *  indicates that the cache is not properly configured/tuned or
 624  *  something. We should be able to automatically correct that problem.
 625  */
 626
 627 #define MAXATONCE   16          /* max we can obtain at once */
 628 static void
 629 afs_GetDownD(int anumber, int *aneedSpace, afs_int32 buckethint)
 630 {
 631
 632     struct dcache *tdc;
 633     struct VenusFid *afid;
 634     afs_int32 i, j;
 635     afs_hyper_t vtime;
 636     int skip, phase;
 637     struct vcache *tvc;
 638     afs_uint32 victims[MAXATONCE];
 639     struct dcache *victimDCs[MAXATONCE];
 640     afs_hyper_t victimTimes[MAXATONCE]; /* youngest (largest LRU time) first */
 641     afs_uint32 victimPtr;       /* next free item in victim arrays */
 642     afs_hyper_t maxVictimTime;  /* youngest (largest LRU time) victim */
 643     afs_uint32 maxVictimPtr;    /* where it is */
 644     int discard;
 645     int curbucket;
 646
 647     AFS_STATCNT(afs_GetDownD);
 648
 649     if (CheckLock(&afs_xdcache) != -1)
 650         osi_Panic("getdownd nolock");
 651     /* decrement anumber first for all dudes in free list */
 652     /* SHOULD always decrement anumber first, even if aneedSpace >0,
 653      * because we should try to free space even if anumber <=0 */
 654     if (!aneedSpace || *aneedSpace <= 0) {
 655         anumber -= afs_freeDCCount;
 656         if (anumber <= 0) {
 657             return;             /* enough already free */
 658         }
 659     }
 660
 661     /* bounds check parameter */
 662     if (anumber > MAXATONCE)
 663         anumber = MAXATONCE;    /* all we can do */
 664
 665     /* rewrite so phases include a better eligiblity for gc test*/
 666     /*
 667      * The phase variable manages reclaims.  Set to 0, the first pass,
 668      * we don't reclaim active entries, or other than target bucket.
 669      * Set to 1, we reclaim even active ones in target bucket.
 670      * Set to 2, we reclaim any inactive one.
 671      * Set to 3, we reclaim even active ones. On Solaris, we also reclaim
 672      * entries whose corresponding vcache has a nonempty multiPage list, when
 673      * possible.
 674      */
 675     if (splitdcache) {
 676         phase = 0;
 677     } else {
 678         phase = 4;
 679     }
 680
 681     for (i = 0; i < afs_cacheFiles; i++)
 682         /* turn off all flags */
 683         afs_indexFlags[i] &= ~IFFlag;
 684
 685     while (anumber > 0 || (aneedSpace && *aneedSpace > 0)) {
 686         /* find oldest entries for reclamation */
 687         maxVictimPtr = victimPtr = 0;
 688         hzero(maxVictimTime);
 689         curbucket = afs_DCWhichBucket(phase, buckethint);
 690         /* select victims from access time array */
 691         for (i = 0; i < afs_cacheFiles; i++) {
 692             if (afs_indexFlags[i] & (IFDataMod | IFFree | IFDiscarded)) {
 693                 /* skip if dirty or already free */
 694                 continue;
 695             }
 696             tdc = afs_indexTable[i];
 697             if (tdc && (curbucket != tdc->bucket) && (phase < 4))
 698             {
 699                 /* Wrong bucket; can't use it! */
 700                 continue;
 701             }
 702             if (tdc && (tdc->refCount != 0)) {
 703                 /* Referenced; can't use it! */
 704                 continue;
 705             }
 706             hset(vtime, afs_indexTimes[i]);
 707
 708             /* if we've already looked at this one, skip it */
 709             if (afs_indexFlags[i] & IFFlag)
 710                 continue;
 711
 712             if (victimPtr < MAXATONCE) {
 713                 /* if there's at least one free victim slot left */
 714                 victims[victimPtr] = i;
 715                 hset(victimTimes[victimPtr], vtime);
 716                 if (hcmp(vtime, maxVictimTime) > 0) {
 717                     hset(maxVictimTime, vtime);
 718                     maxVictimPtr = victimPtr;
 719                 }
 720                 victimPtr++;
 721             } else if (hcmp(vtime, maxVictimTime) < 0) {
 722                 /*
 723                  * We're older than youngest victim, so we replace at
 724                  * least one victim
 725                  */
 726                 /* find youngest (largest LRU) victim */
 727                 j = maxVictimPtr;
 728                 if (j == victimPtr)
 729                     osi_Panic("getdownd local");
 730                 victims[j] = i;
 731                 hset(victimTimes[j], vtime);
 732                 /* recompute maxVictimTime */
 733                 hset(maxVictimTime, vtime);
 734                 for (j = 0; j < victimPtr; j++)
 735                     if (hcmp(maxVictimTime, victimTimes[j]) < 0) {
 736                         hset(maxVictimTime, victimTimes[j]);
 737                         maxVictimPtr = j;
 738                     }
 739             }
 740         }                       /* big for loop */
 741
 742         /* now really reclaim the victims */
 743         j = 0;                  /* flag to track if we actually got any of the victims */
 744         /* first, hold all the victims, since we're going to release the lock
 745          * during the truncate operation.
 746          */
 747         for (i = 0; i < victimPtr; i++) {
 748             tdc = afs_GetValidDSlot(victims[i]);
 749             /* We got tdc->tlock(R) here */
 750             if (tdc && tdc->refCount == 1)
 751                 victimDCs[i] = tdc;
 752             else
 753                 victimDCs[i] = 0;
 754             if (tdc) {
 755                 ReleaseReadLock(&tdc->tlock);
 756                 if (!victimDCs[i])
 757                     afs_PutDCache(tdc);
 758             }
 759         }
 760         for (i = 0; i < victimPtr; i++) {
 761             /* q is first elt in dcache entry */
 762             tdc = victimDCs[i];
 763             /* now, since we're dropping the afs_xdcache lock below, we
 764              * have to verify, before proceeding, that there are no other
 765              * references to this dcache entry, even now.  Note that we
 766              * compare with 1, since we bumped it above when we called
 767              * afs_GetValidDSlot to preserve the entry's identity.
 768              */
 769             if (tdc && tdc->refCount == 1) {
 770                 unsigned char chunkFlags;
 771                 afs_size_t tchunkoffset = 0;
 772                 afid = &tdc->f.fid;
 773                 /* xdcache is lower than the xvcache lock */
 774                 ReleaseWriteLock(&afs_xdcache);
 775                 ObtainReadLock(&afs_xvcache);
 776                 tvc = afs_FindVCache(afid, 0, 0 /* no stats, no vlru */ );
 777                 ReleaseReadLock(&afs_xvcache);
 778                 ObtainWriteLock(&afs_xdcache, 527);
 779                 skip = 0;
 780                 if (tdc->refCount > 1)
 781                     skip = 1;
 782                 if (tvc) {
 783                     tchunkoffset = AFS_CHUNKTOBASE(tdc->f.chunk);
 784                     chunkFlags = afs_indexFlags[tdc->index];
 785                     if (((phase & 1) == 0) && osi_Active(tvc))
 786                         skip = 1;
 787                     if (((phase & 1) == 1) && osi_Active(tvc)
 788                         && (tvc->f.states & CDCLock)
 789                         && (chunkFlags & IFAnyPages))
 790                         skip = 1;
 791                     if (chunkFlags & IFDataMod)
 792                         skip = 1;
 793                     afs_Trace4(afs_iclSetp, CM_TRACE_GETDOWND,
 794                                ICL_TYPE_POINTER, tvc, ICL_TYPE_INT32, skip,
 795                                ICL_TYPE_INT32, tdc->index, ICL_TYPE_OFFSET,
 796                                ICL_HANDLE_OFFSET(tchunkoffset));
 797
 798 #if     defined(AFS_SUN5_ENV)
 799                     /*
 800                      * Now we try to invalidate pages.  We do this only for
 801                      * Solaris.  For other platforms, it's OK to recycle a
 802                      * dcache entry out from under a page, because the strategy
 803                      * function can call afs_GetDCache().
 804                      */
 805                     if (!skip && (chunkFlags & IFAnyPages)) {
 806                         int code;
 807
 808                         ReleaseWriteLock(&afs_xdcache);
 809                         ObtainWriteLock(&tvc->vlock, 543);
 810                         if (!QEmpty(&tvc->multiPage)) {
 811                             if (phase < 3 || osi_VM_MultiPageConflict(tvc, tdc)) {
 812                                 skip = 1;
 813                                 goto endmultipage;
 814                             }
 815                         }
 816                         /* block locking pages */
 817                         tvc->vstates |= VPageCleaning;
 818                         /* block getting new pages */
 819                         tvc->activeV++;
 820                         ReleaseWriteLock(&tvc->vlock);
 821                         /* One last recheck */
 822                         ObtainWriteLock(&afs_xdcache, 333);
 823                         chunkFlags = afs_indexFlags[tdc->index];
 824                         if (tdc->refCount > 1 || (chunkFlags & IFDataMod)
 825                             || (osi_Active(tvc) && (tvc->f.states & CDCLock)
 826                                 && (chunkFlags & IFAnyPages))) {
 827                             skip = 1;
 828                             ReleaseWriteLock(&afs_xdcache);
 829                             goto endputpage;
 830                         }
 831                         ReleaseWriteLock(&afs_xdcache);
 832
 833                         code = osi_VM_GetDownD(tvc, tdc);
 834
 835                         ObtainWriteLock(&afs_xdcache, 269);
 836                         /* we actually removed all pages, clean and dirty */
 837                         if (code == 0) {
 838                             afs_indexFlags[tdc->index] &=
 839                                 ~(IFDirtyPages | IFAnyPages);
 840                         } else
 841                             skip = 1;
 842                         ReleaseWriteLock(&afs_xdcache);
 843                       endputpage:
 844                         ObtainWriteLock(&tvc->vlock, 544);
 845                         if (--tvc->activeV == 0
 846                             && (tvc->vstates & VRevokeWait)) {
 847                             tvc->vstates &= ~VRevokeWait;
 848                             afs_osi_Wakeup((char *)&tvc->vstates);
 849
 850                         }
 851                         if (tvc->vstates & VPageCleaning) {
 852                             tvc->vstates &= ~VPageCleaning;
 853                             afs_osi_Wakeup((char *)&tvc->vstates);
 854                         }
 855                       endmultipage:
 856                         ReleaseWriteLock(&tvc->vlock);
 857                     } else
 858 #endif /* AFS_SUN5_ENV */
 859                     {
 860                         ReleaseWriteLock(&afs_xdcache);
 861                     }
 862
 863                     afs_PutVCache(tvc); /*XXX was AFS_FAST_RELE?*/
 864                     ObtainWriteLock(&afs_xdcache, 528);
 865                     if (afs_indexFlags[tdc->index] &
 866                         (IFDataMod | IFDirtyPages | IFAnyPages))
 867                         skip = 1;
 868                     if (tdc->refCount > 1)
 869                         skip = 1;
 870                 }
 871 #if     defined(AFS_SUN5_ENV)
 872                 else {
 873                     /* no vnode, so IFDirtyPages is spurious (we don't
 874                      * sweep dcaches on vnode recycling, so we can have
 875                      * DIRTYPAGES set even when all pages are gone).  Just
 876                      * clear the flag.
 877                      * Hold vcache lock to prevent vnode from being
 878                      * created while we're clearing IFDirtyPages.
 879                      */
 880                     afs_indexFlags[tdc->index] &=
 881                         ~(IFDirtyPages | IFAnyPages);
 882                 }
 883 #endif
 884                 if (skip) {
 885                     /* skip this guy and mark him as recently used */
 886                     afs_indexFlags[tdc->index] |= IFFlag;
 887                     afs_Trace4(afs_iclSetp, CM_TRACE_GETDOWND,
 888                                ICL_TYPE_POINTER, tvc, ICL_TYPE_INT32, 2,
 889                                ICL_TYPE_INT32, tdc->index, ICL_TYPE_OFFSET,
 890                                ICL_HANDLE_OFFSET(tchunkoffset));
 891                 } else {
 892                     /* flush this dude from the data cache and reclaim;
 893                      * first, make sure no one will care that we damage
 894                      * it, by removing it from all hash tables.  Then,
 895                      * melt it down for parts.  Note that any concurrent
 896                      * (new possibility!) calls to GetDownD won't touch
 897                      * this guy because his reference count is > 0. */
 898                     afs_Trace4(afs_iclSetp, CM_TRACE_GETDOWND,
 899                                ICL_TYPE_POINTER, tvc, ICL_TYPE_INT32, 3,
 900                                ICL_TYPE_INT32, tdc->index, ICL_TYPE_OFFSET,
 901                                ICL_HANDLE_OFFSET(tchunkoffset));
 902                     AFS_STATCNT(afs_gget);
 903                     afs_HashOutDCache(tdc, 1);
 904                     if (tdc->f.chunkBytes != 0) {
 905                         discard = 1;
 906                         if (aneedSpace)
 907                             *aneedSpace -=
 908                                 (tdc->f.chunkBytes + afs_fsfragsize) >> 10;
 909                     } else {
 910                         discard = 0;
 911                     }
 912                     if (discard) {
 913                         afs_DiscardDCache(tdc);
 914                     } else {
 915                         afs_FreeDCache(tdc);
 916                     }
 917                     anumber--;
 918                     j = 1;      /* we reclaimed at least one victim */
 919                 }
 920             }
 921             if (tdc)
 922                 afs_PutDCache(tdc);
 923         }                       /* end of for victims loop */
 924
 925         if (phase < 5) {
 926             /* Phase is 0 and no one was found, so try phase 1 (ignore
 927              * osi_Active flag) */
 928             if (j == 0) {
 929                 phase++;
 930                 for (i = 0; i < afs_cacheFiles; i++)
 931                     /* turn off all flags */
 932                     afs_indexFlags[i] &= ~IFFlag;
 933             }
 934         } else {
 935             /* found no one in phases 0-5, we're hosed */
 936             if (victimPtr == 0)
 937                 break;
 938         }
 939     }                           /* big while loop */
 940
 941     return;
 942
 943 }                               /*afs_GetDownD */
 944
 945
 946 /*!
 947  * Remove adc from any hash tables that would allow it to be located
 948  * again by afs_FindDCache or afs_GetDCache.
 949  *
 950  * \param adc Pointer to dcache entry to remove from hash tables.
 951  *
 952  * \note Locks: Must have the afs_xdcache lock write-locked to call this function.
 953  *
 954  */
 955 int
 956 afs_HashOutDCache(struct dcache *adc, int zap)
 957 {
 958     int i, us;
 959
 960     AFS_STATCNT(afs_glink);
 961     if (zap)
 962         /* we know this guy's in the LRUQ.  We'll move dude into DCQ below */
 963         DZap(adc);
 964     /* if this guy is in the hash table, pull him out */
 965     if (adc->f.fid.Fid.Volume != 0) {
 966         /* remove entry from first hash chains */
 967         i = DCHash(&adc->f.fid, adc->f.chunk);
 968         us = afs_dchashTbl[i];
 969         if (us == adc->index) {
 970             /* first dude in the list */
 971             afs_dchashTbl[i] = afs_dcnextTbl[adc->index];
 972         } else {
 973             /* somewhere on the chain */
 974             while (us != NULLIDX) {
 975                 if (afs_dcnextTbl[us] == adc->index) {
 976                     /* found item pointing at the one to delete */
 977                     afs_dcnextTbl[us] = afs_dcnextTbl[adc->index];
 978                     break;
 979                 }
 980                 us = afs_dcnextTbl[us];
 981             }
 982             if (us == NULLIDX)
 983                 osi_Panic("dcache hc");
 984         }
 985         /* remove entry from *other* hash chain */
 986         i = DVHash(&adc->f.fid);
 987         us = afs_dvhashTbl[i];
 988         if (us == adc->index) {
 989             /* first dude in the list */
 990             afs_dvhashTbl[i] = afs_dvnextTbl[adc->index];
 991         } else {
 992             /* somewhere on the chain */
 993             while (us != NULLIDX) {
 994                 if (afs_dvnextTbl[us] == adc->index) {
 995                     /* found item pointing at the one to delete */
 996                     afs_dvnextTbl[us] = afs_dvnextTbl[adc->index];
 997                     break;
 998                 }
 999                 us = afs_dvnextTbl[us];
1000             }
1001             if (us == NULLIDX)
1002                 osi_Panic("dcache hv");
1003         }
1004     }
1005
1006     if (zap) {
1007         /* prevent entry from being found on a reboot (it is already out of
1008          * the hash table, but after a crash, we just look at fid fields of
1009          * stable (old) entries).
1010          */
1011          adc->f.fid.Fid.Volume = 0;     /* invalid */
1012
1013         /* mark entry as modified */
1014         adc->dflags |= DFEntryMod;
1015     }
1016
1017     /* all done */
1018     return 0;
1019 }                               /*afs_HashOutDCache */
1020
1021 /*!
1022  * Flush the given dcache entry, pulling it from hash chains
1023  * and truncating the associated cache file.
1024  *
1025  * \param adc Ptr to dcache entry to flush.
1026  *
1027  * \note Environment:
1028  *      This routine must be called with the afs_xdcache lock held
1029  *      (in write mode).
1030  */
1031 void
1032 afs_FlushDCache(struct dcache *adc)
1033 {
1034     AFS_STATCNT(afs_FlushDCache);
1035     /*
1036      * Bump the number of cache files flushed.
1037      */
1038     afs_stats_cmperf.cacheFlushes++;
1039
1040     /* remove from all hash tables */
1041     afs_HashOutDCache(adc, 1);
1042
1043     /* Free its space; special case null operation, since truncate operation
1044      * in UFS is slow even in this case, and this allows us to pre-truncate
1045      * these files at more convenient times with fewer locks set
1046      * (see afs_GetDownD).
1047      */
1048     if (adc->f.chunkBytes != 0) {
1049         afs_DiscardDCache(adc);
1050         afs_MaybeWakeupTruncateDaemon();
1051     } else {
1052         afs_FreeDCache(adc);
1053     }
1054 }                               /*afs_FlushDCache */
1055
1056
1057 /*!
1058  * Put a dcache entry on the free dcache entry list.
1059  *
1060  * \param adc dcache entry to free.
1061  *
1062  * \note Environment: called with afs_xdcache lock write-locked.
1063  */
1064 static void
1065 afs_FreeDCache(struct dcache *adc)
1066 {
1067     /* Thread on free list, update free list count and mark entry as
1068      * freed in its indexFlags element.  Also, ensure DCache entry gets
1069      * written out (set DFEntryMod).
1070      */
1071
1072     afs_dvnextTbl[adc->index] = afs_freeDCList;
1073     afs_freeDCList = adc->index;
1074     afs_freeDCCount++;
1075     afs_indexFlags[adc->index] |= IFFree;
1076     adc->dflags |= DFEntryMod;
1077
1078     afs_WakeCacheWaitersIfDrained();
1079 }                               /* afs_FreeDCache */
1080
1081 /*!
1082  * Discard the cache element by moving it to the discardDCList.
1083  * This puts the cache element into a quasi-freed state, where
1084  * the space may be reused, but the file has not been truncated.
1085  *
1086  * \note Major Assumptions Here:
1087  *      Assumes that frag size is an integral power of two, less one,
1088  *      and that this is a two's complement machine.  I don't
1089  *      know of any filesystems which violate this assumption...
1090  *
1091  * \param adr Ptr to dcache entry.
1092  *
1093  * \note Environment:
1094  *      Must be called with afs_xdcache write-locked.
1095  */
1096
1097 static void
1098 afs_DiscardDCache(struct dcache *adc)
1099 {
1100     afs_int32 size;
1101
1102     AFS_STATCNT(afs_DiscardDCache);
1103
1104     osi_Assert(adc->refCount == 1);
1105
1106     size = ((adc->f.chunkBytes + afs_fsfragsize) ^ afs_fsfragsize) >> 10;       /* round up */
1107     afs_blocksDiscarded += size;
1108     afs_stats_cmperf.cacheBlocksDiscarded = afs_blocksDiscarded;
1109
1110     afs_dvnextTbl[adc->index] = afs_discardDCList;
1111     afs_discardDCList = adc->index;
1112     afs_discardDCCount++;
1113
1114     adc->f.fid.Fid.Volume = 0;
1115     adc->dflags |= DFEntryMod;
1116     afs_indexFlags[adc->index] |= IFDiscarded;
1117
1118     afs_WakeCacheWaitersIfDrained();
1119 }                               /*afs_DiscardDCache */
1120
1121 /**
1122  * Get a dcache entry from the discard or free list
1123  *
1124  * @param[in] indexp  A pointer to the head of the dcache free list or discard
1125  *                    list (afs_freeDCList, or afs_discardDCList)
1126  *
1127  * @return A dcache from that list, or NULL if none could be retrieved.
1128  *
1129  * @pre afs_xdcache is write-locked
1130  */
1131 static struct dcache *
1132 afs_GetDSlotFromList(afs_int32 *indexp)
1133 {
1134     struct dcache *tdc;
1135
1136     for ( ; *indexp != NULLIDX; indexp = &afs_dvnextTbl[*indexp]) {
1137         tdc = afs_GetUnusedDSlot(*indexp);
1138         if (tdc) {
1139             osi_Assert(tdc->refCount == 1);
1140             ReleaseReadLock(&tdc->tlock);
1141             *indexp = afs_dvnextTbl[tdc->index];
1142             afs_dvnextTbl[tdc->index] = NULLIDX;
1143             return tdc;
1144         }
1145     }
1146     return NULL;
1147 }
1148
1149 /*!
1150  * Free the next element on the list of discarded cache elements.
1151  *
1152  * Returns -1 if we encountered an error preventing us from freeing a
1153  * discarded dcache, or 0 on success.
1154  */
1155 static int
1156 afs_FreeDiscardedDCache(void)
1157 {
1158     struct dcache *tdc;
1159     struct osi_file *tfile;
1160     afs_int32 size;
1161
1162     AFS_STATCNT(afs_FreeDiscardedDCache);
1163
1164     ObtainWriteLock(&afs_xdcache, 510);
1165     if (!afs_blocksDiscarded) {
1166         ReleaseWriteLock(&afs_xdcache);
1167         return 0;
1168     }
1169
1170     /*
1171      * Get an entry from the list of discarded cache elements
1172      */
1173     tdc = afs_GetDSlotFromList(&afs_discardDCList);
1174     if (!tdc) {
1175         ReleaseWriteLock(&afs_xdcache);
1176         return -1;
1177     }
1178
1179     afs_discardDCCount--;
1180     size = ((tdc->f.chunkBytes + afs_fsfragsize) ^ afs_fsfragsize) >> 10;       /* round up */
1181     afs_blocksDiscarded -= size;
1182     afs_stats_cmperf.cacheBlocksDiscarded = afs_blocksDiscarded;
1183     /* We can lock because we just took it off the free list */
1184     ObtainWriteLock(&tdc->lock, 626);
1185     ReleaseWriteLock(&afs_xdcache);
1186
1187     /*
1188      * Truncate the element to reclaim its space
1189      */
1190     tfile = afs_CFileOpen(&tdc->f.inode);
1191     osi_Assert(tfile);
1192     afs_CFileTruncate(tfile, 0);
1193     afs_CFileClose(tfile);
1194     afs_AdjustSize(tdc, 0);
1195     afs_DCMoveBucket(tdc, 0, 0);
1196
1197     /*
1198      * Free the element we just truncated
1199      */
1200     ObtainWriteLock(&afs_xdcache, 511);
1201     afs_indexFlags[tdc->index] &= ~IFDiscarded;
1202     afs_FreeDCache(tdc);
1203     tdc->f.states &= ~(DRO|DBackup|DRW);
1204     ReleaseWriteLock(&tdc->lock);
1205     afs_PutDCache(tdc);
1206     ReleaseWriteLock(&afs_xdcache);
1207
1208     return 0;
1209 }
1210
1211 /*!
1212  * Free as many entries from the list of discarded cache elements
1213  * as we need to get the free space down below CM_WAITFORDRAINPCT (98%).
1214  *
1215  * \return 0
1216  */
1217 int
1218 afs_MaybeFreeDiscardedDCache(void)
1219 {
1220
1221     AFS_STATCNT(afs_MaybeFreeDiscardedDCache);
1222
1223     while (afs_blocksDiscarded
1224            && (afs_blocksUsed >
1225                PERCENT(CM_WAITFORDRAINPCT, afs_cacheBlocks))) {
1226         int code = afs_FreeDiscardedDCache();
1227         if (code) {
1228             /* Callers depend on us to get the afs_blocksDiscarded count down.
1229              * If we cannot do that, the callers can spin by calling us over
1230              * and over. Panic for now until we can figure out something
1231              * better. */
1232             osi_Panic("Error freeing discarded dcache");
1233         }
1234     }
1235     return 0;
1236 }
1237
1238 /*!
1239  * Try to free up a certain number of disk slots.
1240  *
1241  * \param anumber Targeted number of disk slots to free up.
1242  *
1243  * \note Environment:
1244  *      Must be called with afs_xdcache write-locked.
1245  *
1246  */
1247 static void
1248 afs_GetDownDSlot(int anumber)
1249 {
1250     struct afs_q *tq, *nq;
1251     struct dcache *tdc;
1252     int ix;
1253     unsigned int cnt;
1254
1255     AFS_STATCNT(afs_GetDownDSlot);
1256     if (cacheDiskType == AFS_FCACHE_TYPE_MEM)
1257         osi_Panic("diskless getdowndslot");
1258
1259     if (CheckLock(&afs_xdcache) != -1)
1260         osi_Panic("getdowndslot nolock");
1261
1262     /* decrement anumber first for all dudes in free list */
1263     for (tdc = afs_freeDSList; tdc; tdc = (struct dcache *)tdc->lruq.next)
1264         anumber--;
1265     if (anumber <= 0)
1266         return;                 /* enough already free */
1267
1268     for (cnt = 0, tq = afs_DLRU.prev; tq != &afs_DLRU && anumber > 0;
1269          tq = nq, cnt++) {
1270         tdc = (struct dcache *)tq;      /* q is first elt in dcache entry */
1271         nq = QPrev(tq);         /* in case we remove it */
1272         if (tdc->refCount == 0) {
1273             if ((ix = tdc->index) == NULLIDX)
1274                 osi_Panic("getdowndslot");
1275             /* pull the entry out of the lruq and put it on the free list */
1276             QRemove(&tdc->lruq);
1277
1278             /* write-through if modified */
1279             if (tdc->dflags & DFEntryMod) {
1280 #if defined(AFS_SGI_ENV) && defined(AFS_SGI_SHORTSTACK)
1281                 /*
1282                  * ask proxy to do this for us - we don't have the stack space
1283                  */
1284                 while (tdc->dflags & DFEntryMod) {
1285                     int s;
1286                     AFS_GUNLOCK();
1287                     s = SPLOCK(afs_sgibklock);
1288                     if (afs_sgibklist == NULL) {
1289                         /* if slot is free, grab it. */
1290                         afs_sgibklist = tdc;
1291                         SV_SIGNAL(&afs_sgibksync);
1292                     }
1293                     /* wait for daemon to (start, then) finish. */
1294                     SP_WAIT(afs_sgibklock, s, &afs_sgibkwait, PINOD);
1295                     AFS_GLOCK();
1296                 }
1297 #else
1298                 tdc->dflags &= ~DFEntryMod;
1299                 osi_Assert(afs_WriteDCache(tdc, 1) == 0);
1300 #endif
1301             }
1302
1303             /* finally put the entry in the free list */
1304             afs_indexTable[ix] = NULL;
1305             afs_indexFlags[ix] &= ~IFEverUsed;
1306             tdc->index = NULLIDX;
1307             tdc->lruq.next = (struct afs_q *)afs_freeDSList;
1308             afs_freeDSList = tdc;
1309             anumber--;
1310         }
1311     }
1312 }                               /*afs_GetDownDSlot */
1313
1314
1315 /*
1316  * afs_RefDCache
1317  *
1318  * Description:
1319  *      Increment the reference count on a disk cache entry,
1320  *      which already has a non-zero refcount.  In order to
1321  *      increment the refcount of a zero-reference entry, you
1322  *      have to hold afs_xdcache.
1323  *
1324  * Parameters:
1325  *      adc : Pointer to the dcache entry to increment.
1326  *
1327  * Environment:
1328  *      Nothing interesting.
1329  */
1330 int
1331 afs_RefDCache(struct dcache *adc)
1332 {
1333     ObtainWriteLock(&adc->tlock, 627);
1334     if (adc->refCount < 0)
1335         osi_Panic("RefDCache: negative refcount");
1336     adc->refCount++;
1337     ReleaseWriteLock(&adc->tlock);
1338     return 0;
1339 }
1340
1341
1342 /*
1343  * afs_PutDCache
1344  *
1345  * Description:
1346  *      Decrement the reference count on a disk cache entry.
1347  *
1348  * Parameters:
1349  *      ad : Ptr to the dcache entry to decrement.
1350  *
1351  * Environment:
1352  *      Nothing interesting.
1353  */
1354 int
1355 afs_PutDCache(struct dcache *adc)
1356 {
1357     AFS_STATCNT(afs_PutDCache);
1358     ObtainWriteLock(&adc->tlock, 276);
1359     if (adc->refCount <= 0)
1360         osi_Panic("putdcache");
1361     --adc->refCount;
1362     ReleaseWriteLock(&adc->tlock);
1363     return 0;
1364 }
1365
1366
1367 /*
1368  * afs_TryToSmush
1369  *
1370  * Description:
1371  *      Try to discard all data associated with this file from the
1372  *      cache.
1373  *
1374  * Parameters:
1375  *      avc : Pointer to the cache info for the file.
1376  *
1377  * Environment:
1378  *      Both pvnLock and lock are write held.
1379  */
1380 void
1381 afs_TryToSmush(struct vcache *avc, afs_ucred_t *acred, int sync)
1382 {
1383     struct dcache *tdc;
1384     int index;
1385     int i;
1386     AFS_STATCNT(afs_TryToSmush);
1387     afs_Trace2(afs_iclSetp, CM_TRACE_TRYTOSMUSH, ICL_TYPE_POINTER, avc,
1388                ICL_TYPE_OFFSET, ICL_HANDLE_OFFSET(avc->f.m.Length));
1389     sync = 1;                   /* XX Temp testing XX */
1390
1391 #if     defined(AFS_SUN5_ENV)
1392     ObtainWriteLock(&avc->vlock, 573);
1393     avc->activeV++;             /* block new getpages */
1394     ReleaseWriteLock(&avc->vlock);
1395 #endif
1396
1397     /* Flush VM pages */
1398     osi_VM_TryToSmush(avc, acred, sync);
1399
1400     /*
1401      * Get the hash chain containing all dce's for this fid
1402      */
1403     i = DVHash(&avc->f.fid);
1404     ObtainWriteLock(&afs_xdcache, 277);
1405     for (index = afs_dvhashTbl[i]; index != NULLIDX; index = i) {
1406         i = afs_dvnextTbl[index];       /* next pointer this hash table */
1407         if (afs_indexUnique[index] == avc->f.fid.Fid.Unique) {
1408             int releaseTlock = 1;
1409             tdc = afs_GetValidDSlot(index);
1410             if (!tdc) {
1411                 /* afs_TryToSmush is best-effort; we may not actually discard
1412                  * everything, so failure to discard a dcache due to an i/o
1413                  * error is okay. */
1414                 continue;
1415             }
1416             if (!FidCmp(&tdc->f.fid, &avc->f.fid)) {
1417                 if (sync) {
1418                     if ((afs_indexFlags[index] & IFDataMod) == 0
1419                         && tdc->refCount == 1) {
1420                         ReleaseReadLock(&tdc->tlock);
1421                         releaseTlock = 0;
1422                         afs_FlushDCache(tdc);
1423                     }
1424                 } else
1425                     afs_indexTable[index] = 0;
1426             }
1427             if (releaseTlock)
1428                 ReleaseReadLock(&tdc->tlock);
1429             afs_PutDCache(tdc);
1430         }
1431     }
1432 #if     defined(AFS_SUN5_ENV)
1433     ObtainWriteLock(&avc->vlock, 545);
1434     if (--avc->activeV == 0 && (avc->vstates & VRevokeWait)) {
1435         avc->vstates &= ~VRevokeWait;
1436         afs_osi_Wakeup((char *)&avc->vstates);
1437     }
1438     ReleaseWriteLock(&avc->vlock);
1439 #endif
1440     ReleaseWriteLock(&afs_xdcache);
1441     /*
1442      * It's treated like a callback so that when we do lookups we'll
1443      * invalidate the unique bit if any
1444      * trytoSmush occured during the lookup call
1445      */
1446     afs_allCBs++;
1447 }
1448
1449 /*
1450  * afs_DCacheMissingChunks
1451  *
1452  * Description
1453  *      Given the cached info for a file, return the number of chunks that
1454  *      are not available from the dcache.
1455  *
1456  * Parameters:
1457  *      avc:    Pointer to the (held) vcache entry to look in.
1458  *
1459  * Returns:
1460  *      The number of chunks which are not currently cached.
1461  *
1462  * Environment:
1463  *      The vcache entry is held upon entry.
1464  */
1465
1466 int
1467 afs_DCacheMissingChunks(struct vcache *avc)
1468 {
1469     int i, index;
1470     afs_size_t totalLength = 0;
1471     afs_uint32 totalChunks = 0;
1472     struct dcache *tdc;
1473
1474     totalLength = avc->f.m.Length;
1475     if (avc->f.truncPos < totalLength)
1476         totalLength = avc->f.truncPos;
1477
1478     /* Length is 0, no chunk missing. */
1479     if (totalLength == 0)
1480         return 0;
1481
1482     /* If totalLength is a multiple of chunksize, the last byte appears
1483      * as being part of the next chunk, which does not exist.
1484      * Decrementing totalLength by one fixes that.
1485      */
1486     totalLength--;
1487     totalChunks = (AFS_CHUNK(totalLength) + 1);
1488
1489     /* If we're a directory, we only ever have one chunk, regardless of
1490      * the size of the dir.
1491      */
1492     if (avc->f.fid.Fid.Vnode & 1 || vType(avc) == VDIR)
1493         totalChunks = 1;
1494
1495     /*
1496      printf("Should have %d chunks for %u bytes\n",
1497                 totalChunks, (totalLength + 1));
1498     */
1499     i = DVHash(&avc->f.fid);
1500     ObtainWriteLock(&afs_xdcache, 1001);
1501     for (index = afs_dvhashTbl[i]; index != NULLIDX; index = i) {
1502         i = afs_dvnextTbl[index];
1503         if (afs_indexUnique[index] == avc->f.fid.Fid.Unique) {
1504             tdc = afs_GetValidDSlot(index);
1505             if (tdc) {
1506                 if (!FidCmp(&tdc->f.fid, &avc->f.fid)) {
1507                     totalChunks--;
1508                 }
1509                 ReleaseReadLock(&tdc->tlock);
1510                 afs_PutDCache(tdc);
1511             }
1512         }
1513     }
1514     ReleaseWriteLock(&afs_xdcache);
1515
1516     /*printf("Missing %d chunks\n", totalChunks);*/
1517
1518     return (totalChunks);
1519 }
1520
1521 /*
1522  * afs_FindDCache
1523  *
1524  * Description:
1525  *      Given the cached info for a file and a byte offset into the
1526  *      file, make sure the dcache entry for that file and containing
1527  *      the given byte is available, returning it to our caller.
1528  *
1529  * Parameters:
1530  *      avc   : Pointer to the (held) vcache entry to look in.
1531  *      abyte : Which byte we want to get to.
1532  *
1533  * Returns:
1534  *      Pointer to the dcache entry covering the file & desired byte,
1535  *      or NULL if not found.
1536  *
1537  * Environment:
1538  *      The vcache entry is held upon entry.
1539  */
1540
1541 struct dcache *
1542 afs_FindDCache(struct vcache *avc, afs_size_t abyte)
1543 {
1544     afs_int32 chunk;
1545     afs_int32 i, index;
1546     struct dcache *tdc = NULL;
1547
1548     AFS_STATCNT(afs_FindDCache);
1549     chunk = AFS_CHUNK(abyte);
1550
1551     /*
1552      * Hash on the [fid, chunk] and get the corresponding dcache index
1553      * after write-locking the dcache.
1554      */
1555     i = DCHash(&avc->f.fid, chunk);
1556     ObtainWriteLock(&afs_xdcache, 278);
1557     for (index = afs_dchashTbl[i]; index != NULLIDX; index = afs_dcnextTbl[index]) {
1558         if (afs_indexUnique[index] == avc->f.fid.Fid.Unique) {
1559             tdc = afs_GetValidDSlot(index);
1560             if (!tdc) {
1561                 /* afs_FindDCache is best-effort; we may not find the given
1562                  * file/offset, so if we cannot find the given dcache due to
1563                  * i/o errors, that is okay. */
1564                 continue;
1565             }
1566             ReleaseReadLock(&tdc->tlock);
1567             if (!FidCmp(&tdc->f.fid, &avc->f.fid) && chunk == tdc->f.chunk) {
1568                 break;          /* leaving refCount high for caller */
1569             }
1570             afs_PutDCache(tdc);
1571         }
1572     }
1573     if (index != NULLIDX) {
1574         hset(afs_indexTimes[tdc->index], afs_indexCounter);
1575         hadd32(afs_indexCounter, 1);
1576         ReleaseWriteLock(&afs_xdcache);
1577         return tdc;
1578     }
1579     ReleaseWriteLock(&afs_xdcache);
1580     return NULL;
1581 }                               /*afs_FindDCache */
1582
1583 /* only call these from afs_AllocDCache() */
1584 static struct dcache *
1585 afs_AllocFreeDSlot(void)
1586 {
1587     struct dcache *tdc;
1588
1589     tdc = afs_GetDSlotFromList(&afs_freeDCList);
1590     if (!tdc) {
1591         return NULL;
1592     }
1593     afs_indexFlags[tdc->index] &= ~IFFree;
1594     ObtainWriteLock(&tdc->lock, 604);
1595     afs_freeDCCount--;
1596
1597     return tdc;
1598 }
1599 static struct dcache *
1600 afs_AllocDiscardDSlot(afs_int32 lock)
1601 {
1602     struct dcache *tdc;
1603     afs_uint32 size = 0;
1604     struct osi_file *file;
1605
1606     tdc = afs_GetDSlotFromList(&afs_discardDCList);
1607     if (!tdc) {
1608         return NULL;
1609     }
1610     afs_indexFlags[tdc->index] &= ~IFDiscarded;
1611     ObtainWriteLock(&tdc->lock, 605);
1612     afs_discardDCCount--;
1613     size =
1614         ((tdc->f.chunkBytes +
1615           afs_fsfragsize) ^ afs_fsfragsize) >> 10;
1616     tdc->f.states &= ~(DRO|DBackup|DRW);
1617     afs_DCMoveBucket(tdc, size, 0);
1618     afs_blocksDiscarded -= size;
1619     afs_stats_cmperf.cacheBlocksDiscarded = afs_blocksDiscarded;
1620     if ((lock & 2)) {
1621         /* Truncate the chunk so zeroes get filled properly */
1622         file = afs_CFileOpen(&tdc->f.inode);
1623         osi_Assert(file);
1624         afs_CFileTruncate(file, 0);
1625         afs_CFileClose(file);
1626         afs_AdjustSize(tdc, 0);
1627     }
1628
1629     return tdc;
1630 }
1631
1632 /*!
1633  * Get a fresh dcache from the free or discarded list.
1634  *
1635  * \param avc Who's dcache is this going to be?
1636  * \param chunk The position where it will be placed in.
1637  * \param lock How are locks held.
1638  * \param ashFid If this dcache going to be used for a shadow dir,
1639  *              this is it's fid.
1640  *
1641  * \note Required locks:
1642  *      - afs_xdcache (W)
1643  *      - avc (R if (lock & 1) set and W otherwise)
1644  * \note It write locks the new dcache. The caller must unlock it.
1645  *
1646  * \return The new dcache.
1647  */
1648 struct dcache *
1649 afs_AllocDCache(struct vcache *avc, afs_int32 chunk, afs_int32 lock,
1650                 struct VenusFid *ashFid)
1651 {
1652     struct dcache *tdc = NULL;
1653
1654     /* if (lock & 2), prefer 'free' dcaches; otherwise, prefer 'discard'
1655      * dcaches. In either case, try both if our first choice doesn't work. */
1656     if ((lock & 2)) {
1657         tdc = afs_AllocFreeDSlot();
1658         if (!tdc) {
1659             tdc = afs_AllocDiscardDSlot(lock);
1660         }
1661     } else {
1662         tdc = afs_AllocDiscardDSlot(lock);
1663         if (!tdc) {
1664             tdc = afs_AllocFreeDSlot();
1665         }
1666     }
1667     if (!tdc) {
1668         return NULL;
1669     }
1670
1671     /*
1672      * Locks held:
1673      * avc->lock(R) if setLocks
1674      * avc->lock(W) if !setLocks
1675      * tdc->lock(W)
1676      * afs_xdcache(W)
1677      */
1678
1679     /*
1680      * Fill in the newly-allocated dcache record.
1681      */
1682     afs_indexFlags[tdc->index] &= ~(IFDirtyPages | IFAnyPages);
1683     if (ashFid)
1684         /* Use shadow fid if provided. */
1685         tdc->f.fid = *ashFid;
1686     else
1687         /* Use normal vcache's fid otherwise. */
1688         tdc->f.fid = avc->f.fid;
1689     if (avc->f.states & CRO)
1690         tdc->f.states = DRO;
1691     else if (avc->f.states & CBackup)
1692         tdc->f.states = DBackup;
1693     else
1694         tdc->f.states = DRW;
1695     afs_DCMoveBucket(tdc, 0, afs_DCGetBucket(avc));
1696     afs_indexUnique[tdc->index] = tdc->f.fid.Fid.Unique;
1697     if (!ashFid)
1698         hones(tdc->f.versionNo);        /* invalid value */
1699     tdc->f.chunk = chunk;
1700     tdc->validPos = AFS_CHUNKTOBASE(chunk);
1701     /* XXX */
1702     if (tdc->lruq.prev == &tdc->lruq)
1703         osi_Panic("lruq 1");
1704
1705     return tdc;
1706 }
1707
1708 /*
1709  * afs_GetDCache
1710  *
1711  * Description:
1712  *      This function is called to obtain a reference to data stored in
1713  *      the disk cache, locating a chunk of data containing the desired
1714  *      byte and returning a reference to the disk cache entry, with its
1715  *      reference count incremented.
1716  *
1717  * Parameters:
1718  * IN:
1719  *      avc     : Ptr to a vcache entry (unlocked)
1720  *      abyte   : Byte position in the file desired
1721  *      areq    : Request structure identifying the requesting user.
1722  *      aflags  : Settings as follows:
1723  *                      1 : Set locks
1724  *                      2 : Return after creating entry.
1725  *                      4 : called from afs_vnop_write.c
1726  *                          *alen contains length of data to be written.
1727  * OUT:
1728  *      aoffset : Set to the offset within the chunk where the resident
1729  *                byte is located.
1730  *      alen    : Set to the number of bytes of data after the desired
1731  *                byte (including the byte itself) which can be read
1732  *                from this chunk.
1733  *
1734  * Environment:
1735  *      The vcache entry pointed to by avc is unlocked upon entry.
1736  */
1737
1738 /*
1739  * Update the vnode-to-dcache hint if we can get the vnode lock
1740  * right away.  Assumes dcache entry is at least read-locked.
1741  */
1742 void
1743 updateV2DC(int lockVc, struct vcache *v, struct dcache *d, int src)
1744 {
1745     if (!lockVc || 0 == NBObtainWriteLock(&v->lock, src)) {
1746         if (hsame(v->f.m.DataVersion, d->f.versionNo) && v->callback)
1747             v->dchint = d;
1748         if (lockVc)
1749             ReleaseWriteLock(&v->lock);
1750     }
1751 }
1752
1753 /* avc - Write-locked unless aflags & 1 */
1754 struct dcache *
1755 afs_GetDCache(struct vcache *avc, afs_size_t abyte,
1756               struct vrequest *areq, afs_size_t * aoffset,
1757               afs_size_t * alen, int aflags)
1758 {
1759     afs_int32 i, code, shortcut;
1760 #if     defined(AFS_AIX32_ENV) || defined(AFS_SGI_ENV)
1761     afs_int32 adjustsize = 0;
1762 #endif
1763     int setLocks;
1764     afs_int32 index;
1765     afs_int32 us;
1766     afs_int32 chunk;
1767     afs_size_t Position = 0;
1768     afs_int32 size, tlen;       /* size of segment to transfer */
1769     struct afs_FetchOutput *tsmall = 0;
1770     struct dcache *tdc;
1771     struct osi_file *file;
1772     struct afs_conn *tc;
1773     int downDCount = 0;
1774     struct server *newCallback = NULL;
1775     char setNewCallback;
1776     char setVcacheStatus;
1777     char doVcacheUpdate;
1778     char slowPass = 0;
1779     int doAdjustSize = 0;
1780     int doReallyAdjustSize = 0;
1781     int overWriteWholeChunk = 0;
1782     struct rx_connection *rxconn;
1783
1784 #ifndef AFS_NOSTATS
1785     struct afs_stats_AccessInfo *accP;  /*Ptr to access record in stats */
1786     int fromReplica;            /*Are we reading from a replica? */
1787     int numFetchLoops;          /*# times around the fetch/analyze loop */
1788 #endif /* AFS_NOSTATS */
1789
1790     AFS_STATCNT(afs_GetDCache);
1791     if (dcacheDisabled)
1792         return NULL;
1793
1794     setLocks = aflags & 1;
1795
1796     /*
1797      * Determine the chunk number and offset within the chunk corresponding
1798      * to the desired byte.
1799      */
1800     if (avc->f.fid.Fid.Vnode & 1) {     /* if (vType(avc) == VDIR) */
1801         chunk = 0;
1802     } else {
1803         chunk = AFS_CHUNK(abyte);
1804     }
1805
1806     /* come back to here if we waited for the cache to drain. */
1807   RetryGetDCache:
1808
1809     setNewCallback = setVcacheStatus = 0;
1810
1811     if (setLocks) {
1812         if (slowPass)
1813             ObtainWriteLock(&avc->lock, 616);
1814         else
1815             ObtainReadLock(&avc->lock);
1816     }
1817
1818     /*
1819      * Locks held:
1820      * avc->lock(R) if setLocks && !slowPass
1821      * avc->lock(W) if !setLocks || slowPass
1822      */
1823
1824     shortcut = 0;
1825
1826     /* check hints first! (might could use bcmp or some such...) */
1827     if ((tdc = avc->dchint)) {
1828         int dcLocked;
1829
1830         /*
1831          * The locking order between afs_xdcache and dcache lock matters.
1832          * The hint dcache entry could be anywhere, even on the free list.
1833          * Locking afs_xdcache ensures that noone is trying to pull dcache
1834          * entries from the free list, and thereby assuming them to be not
1835          * referenced and not locked.
1836          */
1837         ObtainReadLock(&afs_xdcache);
1838         dcLocked = (0 == NBObtainSharedLock(&tdc->lock, 601));
1839
1840         if (dcLocked && (tdc->index != NULLIDX)
1841             && !FidCmp(&tdc->f.fid, &avc->f.fid) && chunk == tdc->f.chunk
1842             && !(afs_indexFlags[tdc->index] & (IFFree | IFDiscarded))) {
1843             /* got the right one.  It might not be the right version, and it
1844              * might be fetching, but it's the right dcache entry.
1845              */
1846             /* All this code should be integrated better with what follows:
1847              * I can save a good bit more time under a write lock if I do..
1848              */
1849             ObtainWriteLock(&tdc->tlock, 603);
1850             tdc->refCount++;
1851             ReleaseWriteLock(&tdc->tlock);
1852
1853             ReleaseReadLock(&afs_xdcache);
1854             shortcut = 1;
1855
1856             if (hsame(tdc->f.versionNo, avc->f.m.DataVersion)
1857                 && !(tdc->dflags & DFFetching)) {
1858
1859                 afs_stats_cmperf.dcacheHits++;
1860                 ObtainWriteLock(&afs_xdcache, 559);
1861                 QRemove(&tdc->lruq);
1862                 QAdd(&afs_DLRU, &tdc->lruq);
1863                 ReleaseWriteLock(&afs_xdcache);
1864
1865                 /* Locks held:
1866                  * avc->lock(R) if setLocks && !slowPass
1867                  * avc->lock(W) if !setLocks || slowPass
1868                  * tdc->lock(S)
1869                  */
1870                 goto done;
1871             }
1872         } else {
1873             if (dcLocked)
1874                 ReleaseSharedLock(&tdc->lock);
1875             ReleaseReadLock(&afs_xdcache);
1876         }
1877
1878         if (!shortcut)
1879             tdc = 0;
1880     }
1881
1882     /* Locks held:
1883      * avc->lock(R) if setLocks && !slowPass
1884      * avc->lock(W) if !setLocks || slowPass
1885      * tdc->lock(S) if tdc
1886      */
1887
1888     if (!tdc) {                 /* If the hint wasn't the right dcache entry */
1889         int dslot_error = 0;
1890         /*
1891          * Hash on the [fid, chunk] and get the corresponding dcache index
1892          * after write-locking the dcache.
1893          */
1894       RetryLookup:
1895
1896         /* Locks held:
1897          * avc->lock(R) if setLocks && !slowPass
1898          * avc->lock(W) if !setLocks || slowPass
1899          */
1900
1901         i = DCHash(&avc->f.fid, chunk);
1902         /* check to make sure our space is fine */
1903         afs_MaybeWakeupTruncateDaemon();
1904
1905         ObtainWriteLock(&afs_xdcache, 280);
1906         us = NULLIDX;
1907         for (index = afs_dchashTbl[i]; index != NULLIDX; us = index, index = afs_dcnextTbl[index]) {
1908             if (afs_indexUnique[index] == avc->f.fid.Fid.Unique) {
1909                 tdc = afs_GetValidDSlot(index);
1910                 if (!tdc) {
1911                     /* we got an i/o error when trying to get the given dslot,
1912                      * but do not bail out just yet; it is possible the dcache
1913                      * we're looking for is elsewhere, so it doesn't matter if
1914                      * we can't load this one. */
1915                     dslot_error = 1;
1916                     continue;
1917                 }
1918                 ReleaseReadLock(&tdc->tlock);
1919                 /*
1920                  * Locks held:
1921                  * avc->lock(R) if setLocks && !slowPass
1922                  * avc->lock(W) if !setLocks || slowPass
1923                  * afs_xdcache(W)
1924                  */
1925                 if (!FidCmp(&tdc->f.fid, &avc->f.fid) && chunk == tdc->f.chunk) {
1926                     /* Move it up in the beginning of the list */
1927                     if (afs_dchashTbl[i] != index) {
1928                         afs_dcnextTbl[us] = afs_dcnextTbl[index];
1929                         afs_dcnextTbl[index] = afs_dchashTbl[i];
1930                         afs_dchashTbl[i] = index;
1931                     }
1932                     ReleaseWriteLock(&afs_xdcache);
1933                     ObtainSharedLock(&tdc->lock, 606);
1934                     break;      /* leaving refCount high for caller */
1935                 }
1936                 afs_PutDCache(tdc);
1937                 tdc = 0;
1938             }
1939         }
1940
1941         /*
1942          * If we didn't find the entry, we'll create one.
1943          */
1944         if (index == NULLIDX) {
1945             /*
1946              * Locks held:
1947              * avc->lock(R) if setLocks
1948              * avc->lock(W) if !setLocks
1949              * afs_xdcache(W)
1950              */
1951             afs_Trace2(afs_iclSetp, CM_TRACE_GETDCACHE1, ICL_TYPE_POINTER,
1952                        avc, ICL_TYPE_INT32, chunk);
1953
1954             if (dslot_error) {
1955                 /* We couldn't find the dcache we want, but we hit some i/o
1956                  * errors when trying to find it, so we're not sure if the
1957                  * dcache we want is in the cache or not. Error out, so we
1958                  * don't try to possibly create 2 separate dcaches for the
1959                  * same exact data. */
1960                 ReleaseWriteLock(&afs_xdcache);
1961                 goto done;
1962             }
1963
1964             if (afs_discardDCList == NULLIDX && afs_freeDCList == NULLIDX) {
1965                 if (!setLocks)
1966                     avc->f.states |= CDCLock;
1967                 /* just need slots */
1968                 afs_GetDownD(5, (int *)0, afs_DCGetBucket(avc));
1969                 if (!setLocks)
1970                     avc->f.states &= ~CDCLock;
1971             }
1972             tdc = afs_AllocDCache(avc, chunk, aflags, NULL);
1973             if (!tdc) {
1974                 /* If we can't get space for 5 mins we give up and panic */
1975                 if (++downDCount > 300)
1976                     osi_Panic("getdcache");
1977                 ReleaseWriteLock(&afs_xdcache);
1978                 /*
1979                  * Locks held:
1980                  * avc->lock(R) if setLocks
1981                  * avc->lock(W) if !setLocks
1982                  */
1983                 afs_osi_Wait(1000, 0, 0);
1984                 goto RetryLookup;
1985             }
1986
1987             /*
1988              * Locks held:
1989              * avc->lock(R) if setLocks
1990              * avc->lock(W) if !setLocks
1991              * tdc->lock(W)
1992              * afs_xdcache(W)
1993              */
1994
1995             /*
1996              * Now add to the two hash chains - note that i is still set
1997              * from the above DCHash call.
1998              */
1999             afs_dcnextTbl[tdc->index] = afs_dchashTbl[i];
2000             afs_dchashTbl[i] = tdc->index;
2001             i = DVHash(&avc->f.fid);
2002             afs_dvnextTbl[tdc->index] = afs_dvhashTbl[i];
2003             afs_dvhashTbl[i] = tdc->index;
2004             tdc->dflags = DFEntryMod;
2005             tdc->mflags = 0;
2006             afs_MaybeWakeupTruncateDaemon();
2007             ReleaseWriteLock(&afs_xdcache);
2008             ConvertWToSLock(&tdc->lock);
2009         }
2010     }
2011
2012
2013     /* vcache->dcache hint failed */
2014     /*
2015      * Locks held:
2016      * avc->lock(R) if setLocks && !slowPass
2017      * avc->lock(W) if !setLocks || slowPass
2018      * tdc->lock(S)
2019      */
2020     afs_Trace4(afs_iclSetp, CM_TRACE_GETDCACHE2, ICL_TYPE_POINTER, avc,
2021                ICL_TYPE_POINTER, tdc, ICL_TYPE_INT32,
2022                hgetlo(tdc->f.versionNo), ICL_TYPE_INT32,
2023                hgetlo(avc->f.m.DataVersion));
2024     /*
2025      * Here we have the entry in tdc, with its refCount incremented.
2026      * Note: we don't use the S-lock on avc; it costs concurrency when
2027      * storing a file back to the server.
2028      */
2029
2030     /*
2031      * Not a newly created file so we need to check the file's length and
2032      * compare data versions since someone could have changed the data or we're
2033      * reading a file written elsewhere. We only want to bypass doing no-op
2034      * read rpcs on newly created files (dv of 0) since only then we guarantee
2035      * that this chunk's data hasn't been filled by another client.
2036      */
2037     size = AFS_CHUNKSIZE(abyte);
2038     if (aflags & 4)             /* called from write */
2039         tlen = *alen;
2040     else                        /* called from read */
2041         tlen = tdc->validPos - abyte;
2042     Position = AFS_CHUNKTOBASE(chunk);
2043     afs_Trace4(afs_iclSetp, CM_TRACE_GETDCACHE3, ICL_TYPE_INT32, tlen,
2044                ICL_TYPE_INT32, aflags, ICL_TYPE_OFFSET,
2045                ICL_HANDLE_OFFSET(abyte), ICL_TYPE_OFFSET,
2046                ICL_HANDLE_OFFSET(Position));
2047     if ((aflags & 4) && (hiszero(avc->f.m.DataVersion)))
2048         doAdjustSize = 1;
2049     if ((AFS_CHUNKTOBASE(chunk) >= avc->f.m.Length) ||
2050          ((aflags & 4) && (abyte == Position) && (tlen >= size)))
2051         overWriteWholeChunk = 1;
2052     if (doAdjustSize || overWriteWholeChunk) {
2053 #if     defined(AFS_AIX32_ENV) || defined(AFS_SGI_ENV)
2054 #ifdef  AFS_SGI_ENV
2055 #ifdef AFS_SGI64_ENV
2056         if (doAdjustSize)
2057             adjustsize = NBPP;
2058 #else /* AFS_SGI64_ENV */
2059         if (doAdjustSize)
2060             adjustsize = 8192;
2061 #endif /* AFS_SGI64_ENV */
2062 #else /* AFS_SGI_ENV */
2063         if (doAdjustSize)
2064             adjustsize = 4096;
2065 #endif /* AFS_SGI_ENV */
2066         if (AFS_CHUNKTOBASE(chunk) + adjustsize >= avc->f.m.Length &&
2067 #else /* defined(AFS_AIX32_ENV) || defined(AFS_SGI_ENV) */
2068 #if     defined(AFS_SUN5_ENV)
2069         if ((doAdjustSize || (AFS_CHUNKTOBASE(chunk) >= avc->f.m.Length)) &&
2070 #else
2071         if (AFS_CHUNKTOBASE(chunk) >= avc->f.m.Length &&
2072 #endif
2073 #endif /* defined(AFS_AIX32_ENV) || defined(AFS_SGI_ENV) */
2074             !hsame(avc->f.m.DataVersion, tdc->f.versionNo))
2075             doReallyAdjustSize = 1;
2076
2077         if (doReallyAdjustSize || overWriteWholeChunk) {
2078             /* no data in file to read at this position */
2079             UpgradeSToWLock(&tdc->lock, 607);
2080             file = afs_CFileOpen(&tdc->f.inode);
2081             osi_Assert(file);
2082             afs_CFileTruncate(file, 0);
2083             afs_CFileClose(file);
2084             afs_AdjustSize(tdc, 0);
2085             hset(tdc->f.versionNo, avc->f.m.DataVersion);
2086             tdc->dflags |= DFEntryMod;
2087
2088             ConvertWToSLock(&tdc->lock);
2089         }
2090     }
2091
2092     /*
2093      * We must read in the whole chunk if the version number doesn't
2094      * match.
2095      */
2096     if (aflags & 2) {
2097         /* don't need data, just a unique dcache entry */
2098         ObtainWriteLock(&afs_xdcache, 608);
2099         hset(afs_indexTimes[tdc->index], afs_indexCounter);
2100         hadd32(afs_indexCounter, 1);
2101         ReleaseWriteLock(&afs_xdcache);
2102
2103         updateV2DC(setLocks, avc, tdc, 553);
2104         if (vType(avc) == VDIR)
2105             *aoffset = abyte;
2106         else
2107             *aoffset = AFS_CHUNKOFFSET(abyte);
2108         if (tdc->validPos < abyte)
2109             *alen = (afs_size_t) 0;
2110         else
2111             *alen = tdc->validPos - abyte;
2112         ReleaseSharedLock(&tdc->lock);
2113         if (setLocks) {
2114             if (slowPass)
2115                 ReleaseWriteLock(&avc->lock);
2116             else
2117                 ReleaseReadLock(&avc->lock);
2118         }
2119         return tdc;             /* check if we're done */
2120     }
2121
2122     /*
2123      * Locks held:
2124      * avc->lock(R) if setLocks && !slowPass
2125      * avc->lock(W) if !setLocks || slowPass
2126      * tdc->lock(S)
2127      */
2128     osi_Assert((setLocks && !slowPass) || WriteLocked(&avc->lock));
2129
2130     setNewCallback = setVcacheStatus = 0;
2131
2132     /*
2133      * Locks held:
2134      * avc->lock(R) if setLocks && !slowPass
2135      * avc->lock(W) if !setLocks || slowPass
2136      * tdc->lock(S)
2137      */
2138     if (!hsame(avc->f.m.DataVersion, tdc->f.versionNo) && !overWriteWholeChunk) {
2139         /*
2140          * Version number mismatch.
2141          */
2142         /*
2143          * If we are disconnected, then we can't do much of anything
2144          * because the data doesn't match the file.
2145          */
2146         if (AFS_IS_DISCONNECTED) {
2147             ReleaseSharedLock(&tdc->lock);
2148             if (setLocks) {
2149                 if (slowPass)
2150                     ReleaseWriteLock(&avc->lock);
2151                 else
2152                     ReleaseReadLock(&avc->lock);
2153             }
2154             /* Flush the Dcache */
2155             afs_PutDCache(tdc);
2156
2157             return NULL;
2158         }
2159         UpgradeSToWLock(&tdc->lock, 609);
2160
2161         /*
2162          * If data ever existed for this vnode, and this is a text object,
2163          * do some clearing.  Now, you'd think you need only do the flush
2164          * when VTEXT is on, but VTEXT is turned off when the text object
2165          * is freed, while pages are left lying around in memory marked
2166          * with this vnode.  If we would reactivate (create a new text
2167          * object from) this vnode, we could easily stumble upon some of
2168          * these old pages in pagein.  So, we always flush these guys.
2169          * Sun has a wonderful lack of useful invariants in this system.
2170          *
2171          * avc->flushDV is the data version # of the file at the last text
2172          * flush.  Clearly, at least, we don't have to flush the file more
2173          * often than it changes
2174          */
2175         if (hcmp(avc->flushDV, avc->f.m.DataVersion) < 0) {
2176             /*
2177              * By here, the cache entry is always write-locked.  We can
2178              * deadlock if we call osi_Flush with the cache entry locked...
2179              * Unlock the dcache too.
2180              */
2181             ReleaseWriteLock(&tdc->lock);
2182             if (setLocks && !slowPass)
2183                 ReleaseReadLock(&avc->lock);
2184             else
2185                 ReleaseWriteLock(&avc->lock);
2186
2187             osi_FlushText(avc);
2188             /*
2189              * Call osi_FlushPages in open, read/write, and map, since it
2190              * is too hard here to figure out if we should lock the
2191              * pvnLock.
2192              */
2193             if (setLocks && !slowPass)
2194                 ObtainReadLock(&avc->lock);
2195             else
2196                 ObtainWriteLock(&avc->lock, 66);
2197             ObtainWriteLock(&tdc->lock, 610);
2198         }
2199
2200         /*
2201          * Locks held:
2202          * avc->lock(R) if setLocks && !slowPass
2203          * avc->lock(W) if !setLocks || slowPass
2204          * tdc->lock(W)
2205          */
2206
2207         /* Watch for standard race condition around osi_FlushText */
2208         if (hsame(avc->f.m.DataVersion, tdc->f.versionNo)) {
2209             updateV2DC(setLocks, avc, tdc, 569);        /* set hint */
2210             afs_stats_cmperf.dcacheHits++;
2211             ConvertWToSLock(&tdc->lock);
2212             goto done;
2213         }
2214
2215         /* Sleep here when cache needs to be drained. */
2216         if (setLocks && !slowPass
2217             && (afs_blocksUsed >
2218                 PERCENT(CM_WAITFORDRAINPCT, afs_cacheBlocks))) {
2219             /* Make sure truncate daemon is running */
2220             afs_MaybeWakeupTruncateDaemon();
2221             ObtainWriteLock(&tdc->tlock, 614);
2222             tdc->refCount--;    /* we'll re-obtain the dcache when we re-try. */
2223             ReleaseWriteLock(&tdc->tlock);
2224             ReleaseWriteLock(&tdc->lock);
2225             ReleaseReadLock(&avc->lock);
2226             while ((afs_blocksUsed - afs_blocksDiscarded) >
2227                    PERCENT(CM_WAITFORDRAINPCT, afs_cacheBlocks)) {
2228                 afs_WaitForCacheDrain = 1;
2229                 afs_osi_Sleep(&afs_WaitForCacheDrain);
2230             }
2231             afs_MaybeFreeDiscardedDCache();
2232             /* need to check if someone else got the chunk first. */
2233             goto RetryGetDCache;
2234         }
2235
2236         Position = AFS_CHUNKBASE(abyte);
2237         if (vType(avc) == VDIR) {
2238             size = avc->f.m.Length;
2239             if (size > tdc->f.chunkBytes) {
2240                 /* pre-reserve space for file */
2241                 afs_AdjustSize(tdc, size);
2242             }
2243             size = 999999999;   /* max size for transfer */
2244         } else {
2245             afs_size_t maxGoodLength;
2246
2247             /* estimate how much data we're expecting back from the server,
2248              * and reserve space in the dcache entry for it */
2249
2250             maxGoodLength = avc->f.m.Length;
2251             if (avc->f.truncPos < maxGoodLength)
2252                 maxGoodLength = avc->f.truncPos;
2253
2254             size = AFS_CHUNKSIZE(abyte);        /* expected max size */
2255             if (Position > maxGoodLength) { /* If we're beyond EOF */
2256                 size = 0;
2257             } else if (Position + size > maxGoodLength) {
2258                 size = maxGoodLength - Position;
2259             }
2260             osi_Assert(size >= 0);
2261
2262             if (size > tdc->f.chunkBytes) {
2263                 /* pre-reserve estimated space for file */
2264                 afs_AdjustSize(tdc, size);      /* changes chunkBytes */
2265             }
2266
2267             if (size) {
2268                 /* For the actual fetch, do not limit the request to the
2269                  * length of the file. If this results in a read past EOF on
2270                  * the server, the server will just reply with less data than
2271                  * requested. If we limit ourselves to only requesting data up
2272                  * to the avc file length, we open ourselves up to races if the
2273                  * file is extended on the server at about the same time.
2274                  *
2275                  * However, we must restrict ourselves to the avc->f.truncPos
2276                  * length, since this represents an outstanding local
2277                  * truncation of the file that will be committed to the
2278                  * fileserver when we actually write the fileserver contents.
2279                  * If we do not restrict the fetch length based on
2280                  * avc->f.truncPos, a different truncate operation extending
2281                  * the file length could cause the old data after
2282                  * avc->f.truncPos to reappear, instead of extending the file
2283                  * with NUL bytes. */
2284                 size = AFS_CHUNKSIZE(abyte);
2285                 if (Position > avc->f.truncPos) {
2286                     size = 0;
2287                 } else if (Position + size > avc->f.truncPos) {
2288                     size = avc->f.truncPos - Position;
2289                 }
2290                 osi_Assert(size >= 0);
2291             }
2292         }
2293         if (afs_mariner && !tdc->f.chunk)
2294             afs_MarinerLog("fetch$Fetching", avc);      /* , Position, size, afs_indexCounter ); */
2295         /*
2296          * Right now, we only have one tool, and it's a hammer.  So, we
2297          * fetch the whole file.
2298          */
2299         DZap(tdc);      /* pages in cache may be old */
2300         file = afs_CFileOpen(&tdc->f.inode);
2301         if (!file) {
2302             /* We can't access the file in the disk cache backing this dcache;
2303              * bail out. */
2304             ReleaseWriteLock(&tdc->lock);
2305             afs_PutDCache(tdc);
2306             tdc = NULL;
2307             goto done;
2308         }
2309         afs_RemoveVCB(&avc->f.fid);
2310         tdc->f.states |= DWriting;
2311         tdc->dflags |= DFFetching;
2312         tdc->validPos = Position;       /*  which is AFS_CHUNKBASE(abyte) */
2313         if (tdc->mflags & DFFetchReq) {
2314             tdc->mflags &= ~DFFetchReq;
2315             if (afs_osi_Wakeup(&tdc->validPos) == 0)
2316                 afs_Trace4(afs_iclSetp, CM_TRACE_DCACHEWAKE, ICL_TYPE_STRING,
2317                            __FILE__, ICL_TYPE_INT32, __LINE__,
2318                            ICL_TYPE_POINTER, tdc, ICL_TYPE_INT32,
2319                            tdc->dflags);
2320         }
2321         tsmall = osi_AllocLargeSpace(sizeof(struct afs_FetchOutput));
2322         setVcacheStatus = 0;
2323 #ifndef AFS_NOSTATS
2324         /*
2325          * Remember if we are doing the reading from a replicated volume,
2326          * and how many times we've zipped around the fetch/analyze loop.
2327          */
2328         fromReplica = (avc->f.states & CRO) ? 1 : 0;
2329         numFetchLoops = 0;
2330         accP = &(afs_stats_cmfullperf.accessinf);
2331         if (fromReplica)
2332             (accP->replicatedRefs)++;
2333         else
2334             (accP->unreplicatedRefs)++;
2335 #endif /* AFS_NOSTATS */
2336         /* this is a cache miss */
2337         afs_Trace4(afs_iclSetp, CM_TRACE_FETCHPROC, ICL_TYPE_POINTER, avc,
2338                    ICL_TYPE_FID, &(avc->f.fid), ICL_TYPE_OFFSET,
2339                    ICL_HANDLE_OFFSET(Position), ICL_TYPE_INT32, size);
2340
2341         if (size)
2342             afs_stats_cmperf.dcacheMisses++;
2343         code = 0;
2344         /*
2345          * Dynamic root support:  fetch data from local memory.
2346          */
2347         if (afs_IsDynroot(avc)) {
2348             char *dynrootDir;
2349             int dynrootLen;
2350
2351             afs_GetDynroot(&dynrootDir, &dynrootLen, &tsmall->OutStatus);
2352
2353             dynrootDir += Position;
2354             dynrootLen -= Position;
2355             if (size > dynrootLen)
2356                 size = dynrootLen;
2357             if (size < 0)
2358                 size = 0;
2359             code = afs_CFileWrite(file, 0, dynrootDir, size);
2360             afs_PutDynroot();
2361
2362             if (code == size)
2363                 code = 0;
2364             else
2365                 code = -1;
2366
2367             tdc->validPos = Position + size;
2368             afs_CFileTruncate(file, size);      /* prune it */
2369         } else if (afs_IsDynrootMount(avc)) {
2370             char *dynrootDir;
2371             int dynrootLen;
2372
2373             afs_GetDynrootMount(&dynrootDir, &dynrootLen, &tsmall->OutStatus);
2374
2375             dynrootDir += Position;
2376             dynrootLen -= Position;
2377             if (size > dynrootLen)
2378                 size = dynrootLen;
2379             if (size < 0)
2380                 size = 0;
2381             code = afs_CFileWrite(file, 0, dynrootDir, size);
2382             afs_PutDynroot();
2383
2384             if (code == size)
2385                 code = 0;
2386             else
2387                 code = -1;
2388
2389             tdc->validPos = Position + size;
2390             afs_CFileTruncate(file, size);      /* prune it */
2391         } else
2392             /*
2393              * Not a dynamic vnode:  do the real fetch.
2394              */
2395             do {
2396                 /*
2397                  * Locks held:
2398                  * avc->lock(R) if setLocks && !slowPass
2399                  * avc->lock(W) if !setLocks || slowPass
2400                  * tdc->lock(W)
2401                  */
2402
2403                 tc = afs_Conn(&avc->f.fid, areq, SHARED_LOCK, &rxconn);
2404                 if (tc) {
2405 #ifndef AFS_NOSTATS
2406                     numFetchLoops++;
2407                     if (fromReplica)
2408                         (accP->numReplicasAccessed)++;
2409
2410 #endif /* AFS_NOSTATS */
2411                     if (!setLocks || slowPass) {
2412                         avc->callback = tc->parent->srvr->server;
2413                     } else {
2414                         newCallback = tc->parent->srvr->server;
2415                         setNewCallback = 1;
2416                     }
2417                     i = osi_Time();
2418                     code = afs_CacheFetchProc(tc, rxconn, file, Position, tdc,
2419                                                avc, size, tsmall);
2420                 } else
2421                    code = -1;
2422
2423                 if (code == 0) {
2424                     /* callback could have been broken (or expired) in a race here,
2425                      * but we return the data anyway.  It's as good as we knew about
2426                      * when we started. */
2427                     /*
2428                      * validPos is updated by CacheFetchProc, and can only be
2429                      * modifed under a dcache write lock, which we've blocked out
2430                      */
2431                     size = tdc->validPos - Position;    /* actual segment size */
2432                     if (size < 0)
2433                         size = 0;
2434                     afs_CFileTruncate(file, size);      /* prune it */
2435                 } else {
2436                     if (!setLocks || slowPass) {
2437                         afs_StaleVCacheFlags(avc, AFS_STALEVC_CLEARCB, CUnique);
2438                     } else {
2439                         /* Something lost.  Forget about performance, and go
2440                          * back with a vcache write lock.
2441                          */
2442                         afs_CFileTruncate(file, 0);
2443                         afs_AdjustSize(tdc, 0);
2444                         afs_CFileClose(file);
2445                         osi_FreeLargeSpace(tsmall);
2446                         tsmall = 0;
2447                         ReleaseWriteLock(&tdc->lock);
2448                         afs_PutDCache(tdc);
2449                         tdc = 0;
2450                         ReleaseReadLock(&avc->lock);
2451
2452                         if (tc) {
2453                             /* If we have a connection, we must put it back,
2454                              * since afs_Analyze will not be called here. */
2455                             afs_PutConn(tc, rxconn, SHARED_LOCK);
2456                         }
2457
2458                         slowPass = 1;
2459                         goto RetryGetDCache;
2460                     }
2461                 }
2462
2463             } while (afs_Analyze
2464                      (tc, rxconn, code, &avc->f.fid, areq,
2465                       AFS_STATS_FS_RPCIDX_FETCHDATA, SHARED_LOCK, NULL));
2466
2467         /*
2468          * Locks held:
2469          * avc->lock(R) if setLocks && !slowPass
2470          * avc->lock(W) if !setLocks || slowPass
2471          * tdc->lock(W)
2472          */
2473
2474 #ifndef AFS_NOSTATS
2475         /*
2476          * In the case of replicated access, jot down info on the number of
2477          * attempts it took before we got through or gave up.
2478          */
2479         if (fromReplica) {
2480             if (numFetchLoops <= 1)
2481                 (accP->refFirstReplicaOK)++;
2482             if (numFetchLoops > accP->maxReplicasPerRef)
2483                 accP->maxReplicasPerRef = numFetchLoops;
2484         }
2485 #endif /* AFS_NOSTATS */
2486
2487         tdc->dflags &= ~DFFetching;
2488         if (afs_osi_Wakeup(&tdc->validPos) == 0)
2489             afs_Trace4(afs_iclSetp, CM_TRACE_DCACHEWAKE, ICL_TYPE_STRING,
2490                        __FILE__, ICL_TYPE_INT32, __LINE__, ICL_TYPE_POINTER,
2491                        tdc, ICL_TYPE_INT32, tdc->dflags);
2492         if (avc->execsOrWriters == 0)
2493             tdc->f.states &= ~DWriting;
2494
2495         /* now, if code != 0, we have an error and should punt.
2496          * note that we have the vcache write lock, either because
2497          * !setLocks or slowPass.
2498          */
2499         if (code) {
2500             afs_CFileTruncate(file, 0);
2501             afs_AdjustSize(tdc, 0);
2502             afs_CFileClose(file);
2503             ZapDCE(tdc);        /* sets DFEntryMod */
2504             if (vType(avc) == VDIR) {
2505                 DZap(tdc);
2506             }
2507             tdc->f.states &= ~(DRO|DBackup|DRW);
2508             afs_DCMoveBucket(tdc, 0, 0);
2509             ReleaseWriteLock(&tdc->lock);
2510             afs_PutDCache(tdc);
2511             if (!afs_IsDynroot(avc)) {
2512                 afs_StaleVCacheFlags(avc, 0, CUnique);
2513                 /*
2514                  * Locks held:
2515                  * avc->lock(W); assert(!setLocks || slowPass)
2516                  */
2517                 osi_Assert(!setLocks || slowPass);
2518             }
2519             tdc = NULL;
2520             goto done;
2521         }
2522
2523         /* otherwise we copy in the just-fetched info */
2524         afs_CFileClose(file);
2525         afs_AdjustSize(tdc, size);      /* new size */
2526         /*
2527          * Copy appropriate fields into vcache.  Status is
2528          * copied later where we selectively acquire the
2529          * vcache write lock.
2530          */
2531         if (slowPass)
2532             afs_ProcessFS(avc, &tsmall->OutStatus, areq);
2533         else
2534             setVcacheStatus = 1;
2535         hset64(tdc->f.versionNo, tsmall->OutStatus.dataVersionHigh,
2536                tsmall->OutStatus.DataVersion);
2537         tdc->dflags |= DFEntryMod;
2538         afs_indexFlags[tdc->index] |= IFEverUsed;
2539         ConvertWToSLock(&tdc->lock);
2540     } /*Data version numbers don't match */
2541     else {
2542         /*
2543          * Data version numbers match.
2544          */
2545         afs_stats_cmperf.dcacheHits++;
2546     }                           /*Data version numbers match */
2547
2548     updateV2DC(setLocks, avc, tdc, 335);        /* set hint */
2549   done:
2550     /*
2551      * Locks held:
2552      * avc->lock(R) if setLocks && !slowPass
2553      * avc->lock(W) if !setLocks || slowPass
2554      * tdc->lock(S) if tdc
2555      */
2556
2557     /*
2558      * See if this was a reference to a file in the local cell.
2559      */
2560     if (afs_IsPrimaryCellNum(avc->f.fid.Cell))
2561         afs_stats_cmperf.dlocalAccesses++;
2562     else
2563         afs_stats_cmperf.dremoteAccesses++;
2564
2565     /* Fix up LRU info */
2566
2567     if (tdc) {
2568         ObtainWriteLock(&afs_xdcache, 602);
2569         hset(afs_indexTimes[tdc->index], afs_indexCounter);
2570         hadd32(afs_indexCounter, 1);
2571         ReleaseWriteLock(&afs_xdcache);
2572
2573         /* return the data */
2574         if (vType(avc) == VDIR)
2575             *aoffset = abyte;
2576         else
2577             *aoffset = AFS_CHUNKOFFSET(abyte);
2578         *alen = (tdc->f.chunkBytes - *aoffset);
2579         ReleaseSharedLock(&tdc->lock);
2580     }
2581
2582     /*
2583      * Locks held:
2584      * avc->lock(R) if setLocks && !slowPass
2585      * avc->lock(W) if !setLocks || slowPass
2586      */
2587
2588     /* Fix up the callback and status values in the vcache */
2589     doVcacheUpdate = 0;
2590     if (setLocks && !slowPass) {
2591         /* DCLOCKXXX
2592          *
2593          * This is our dirty little secret to parallel fetches.
2594          * We don't write-lock the vcache while doing the fetch,
2595          * but potentially we'll need to update the vcache after
2596          * the fetch is done.
2597          *
2598          * Drop the read lock and try to re-obtain the write
2599          * lock.  If the vcache still has the same DV, it's
2600          * ok to go ahead and install the new data.
2601          */
2602         afs_hyper_t currentDV, statusDV;
2603
2604         hset(currentDV, avc->f.m.DataVersion);
2605
2606         if (setNewCallback && avc->callback != newCallback)
2607             doVcacheUpdate = 1;
2608
2609         if (tsmall) {
2610             hset64(statusDV, tsmall->OutStatus.dataVersionHigh,
2611                    tsmall->OutStatus.DataVersion);
2612
2613             if (setVcacheStatus && avc->f.m.Length != tsmall->OutStatus.Length)
2614                 doVcacheUpdate = 1;
2615             if (setVcacheStatus && !hsame(currentDV, statusDV))
2616                 doVcacheUpdate = 1;
2617         }
2618
2619         ReleaseReadLock(&avc->lock);
2620
2621         if (doVcacheUpdate) {
2622             ObtainWriteLock(&avc->lock, 615);
2623             if (!hsame(avc->f.m.DataVersion, currentDV)) {
2624                 /* We lose.  Someone will beat us to it. */
2625                 doVcacheUpdate = 0;
2626                 ReleaseWriteLock(&avc->lock);
2627             }
2628         }
2629     }
2630
2631     /* With slow pass, we've already done all the updates */
2632     if (slowPass) {
2633         ReleaseWriteLock(&avc->lock);
2634     }
2635
2636     /* Check if we need to perform any last-minute fixes with a write-lock */
2637     if (!setLocks || doVcacheUpdate) {
2638         if (setNewCallback)
2639             avc->callback = newCallback;
2640         if (tsmall && setVcacheStatus)
2641             afs_ProcessFS(avc, &tsmall->OutStatus, areq);
2642         if (setLocks)
2643             ReleaseWriteLock(&avc->lock);
2644     }
2645
2646     if (tsmall)
2647         osi_FreeLargeSpace(tsmall);
2648
2649     return tdc;
2650 }                               /*afs_GetDCache */
2651
2652
2653 /*
2654  * afs_WriteThroughDSlots
2655  *
2656  * Description:
2657  *      Sweep through the dcache slots and write out any modified
2658  *      in-memory data back on to our caching store.
2659  *
2660  * Parameters:
2661  *      None.
2662  *
2663  * Environment:
2664  *      The afs_xdcache is write-locked through this whole affair.
2665  */
2666 void
2667 afs_WriteThroughDSlots(void)
2668 {
2669     struct dcache *tdc;
2670     afs_int32 i, touchedit = 0;
2671
2672     struct afs_q DirtyQ, *tq;
2673
2674     AFS_STATCNT(afs_WriteThroughDSlots);
2675
2676     /*
2677      * Because of lock ordering, we can't grab dcache locks while
2678      * holding afs_xdcache.  So we enter xdcache, get a reference
2679      * for every dcache entry, and exit xdcache.
2680      */
2681     ObtainWriteLock(&afs_xdcache, 283);
2682     QInit(&DirtyQ);
2683     for (i = 0; i < afs_cacheFiles; i++) {
2684         tdc = afs_indexTable[i];
2685
2686         /* Grab tlock in case the existing refcount isn't zero */
2687         if (tdc && !(afs_indexFlags[i] & (IFFree | IFDiscarded))) {
2688             ObtainWriteLock(&tdc->tlock, 623);
2689             tdc->refCount++;
2690             ReleaseWriteLock(&tdc->tlock);
2691
2692             QAdd(&DirtyQ, &tdc->dirty);
2693         }
2694     }
2695     ReleaseWriteLock(&afs_xdcache);
2696
2697     /*
2698      * Now, for each dcache entry we found, check if it's dirty.
2699      * If so, get write-lock, get afs_xdcache, which protects
2700      * afs_cacheInodep, and flush it.  Don't forget to put back
2701      * the refcounts.
2702      */
2703
2704 #define DQTODC(q)       ((struct dcache *)(((char *) (q)) - sizeof(struct afs_q)))
2705
2706     for (tq = DirtyQ.prev; tq != &DirtyQ; tq = QPrev(tq)) {
2707         tdc = DQTODC(tq);
2708         if (tdc->dflags & DFEntryMod) {
2709             int wrLock;
2710
2711             wrLock = (0 == NBObtainWriteLock(&tdc->lock, 619));
2712
2713             /* Now that we have the write lock, double-check */
2714             if (wrLock && (tdc->dflags & DFEntryMod)) {
2715                 tdc->dflags &= ~DFEntryMod;
2716                 ObtainWriteLock(&afs_xdcache, 620);
2717                 osi_Assert(afs_WriteDCache(tdc, 1) == 0);
2718                 ReleaseWriteLock(&afs_xdcache);
2719                 touchedit = 1;
2720             }
2721             if (wrLock)
2722                 ReleaseWriteLock(&tdc->lock);
2723         }
2724
2725         afs_PutDCache(tdc);
2726     }
2727
2728     ObtainWriteLock(&afs_xdcache, 617);
2729     if (!touchedit && (cacheDiskType != AFS_FCACHE_TYPE_MEM)) {
2730         /* Touch the file to make sure that the mtime on the file is kept
2731          * up-to-date to avoid losing cached files on cold starts because
2732          * their mtime seems old...
2733          */
2734         struct afs_fheader theader;
2735
2736         afs_InitFHeader(&theader);
2737         afs_osi_Write(afs_cacheInodep, 0, &theader, sizeof(theader));
2738     }
2739     ReleaseWriteLock(&afs_xdcache);
2740 }
2741
2742 /*
2743  * afs_MemGetDSlot
2744  *
2745  * Description:
2746  *      Return a pointer to an freshly initialized dcache entry using
2747  *      a memory-based cache.  The tlock will be read-locked.
2748  *
2749  * Parameters:
2750  *      aslot : Dcache slot to look at.
2751  *      type : What 'type' of dslot to get; see the dslot_state enum
2752  *
2753  * Environment:
2754  *      Must be called with afs_xdcache write-locked.
2755  */
2756
2757 struct dcache *
2758 afs_MemGetDSlot(afs_int32 aslot, dslot_state type)
2759 {
2760     struct dcache *tdc;
2761     int existing = 0;
2762
2763     AFS_STATCNT(afs_MemGetDSlot);
2764     if (CheckLock(&afs_xdcache) != -1)
2765         osi_Panic("getdslot nolock");
2766     if (aslot < 0 || aslot >= afs_cacheFiles)
2767         osi_Panic("getdslot slot %d (of %d)", aslot, afs_cacheFiles);
2768     tdc = afs_indexTable[aslot];
2769     if (tdc) {
2770         QRemove(&tdc->lruq);    /* move to queue head */
2771         QAdd(&afs_DLRU, &tdc->lruq);
2772         /* We're holding afs_xdcache, but get tlock in case refCount != 0 */
2773         ObtainWriteLock(&tdc->tlock, 624);
2774         tdc->refCount++;
2775         ConvertWToRLock(&tdc->tlock);
2776         return tdc;
2777     }
2778
2779     /* if we got here, the given slot is not in memory in our list of known
2780      * slots. for memcache, the only place a dslot can exist is in memory, so
2781      * if the caller is expecting to get back a known dslot, and we've reached
2782      * here, something is very wrong. DSLOT_NEW is the only type of dslot that
2783      * may not exist; for all others, the caller assumes the given dslot
2784      * already exists. so, 'type' had better be DSLOT_NEW here, or something is
2785      * very wrong. */
2786     osi_Assert(type == DSLOT_NEW);
2787
2788     if (!afs_freeDSList)
2789         afs_GetDownDSlot(4);
2790     if (!afs_freeDSList) {
2791         /* none free, making one is better than a panic */
2792         afs_stats_cmperf.dcacheXAllocs++;       /* count in case we have a leak */
2793         tdc = afs_osi_Alloc(sizeof(struct dcache));
2794         osi_Assert(tdc != NULL);
2795 #ifdef  KERNEL_HAVE_PIN
2796         pin((char *)tdc, sizeof(struct dcache));        /* XXX */
2797 #endif
2798     } else {
2799         tdc = afs_freeDSList;
2800         afs_freeDSList = (struct dcache *)tdc->lruq.next;
2801         existing = 1;
2802     }
2803     tdc->dflags = 0;    /* up-to-date, not in free q */
2804     tdc->mflags = 0;
2805     QAdd(&afs_DLRU, &tdc->lruq);
2806     if (tdc->lruq.prev == &tdc->lruq)
2807         osi_Panic("lruq 3");
2808
2809     /* initialize entry */
2810     tdc->f.fid.Cell = 0;
2811     tdc->f.fid.Fid.Volume = 0;
2812     tdc->f.chunk = -1;
2813     hones(tdc->f.versionNo);
2814     tdc->f.inode.mem = aslot;
2815     tdc->dflags |= DFEntryMod;
2816     tdc->refCount = 1;
2817     tdc->index = aslot;
2818     afs_indexUnique[aslot] = tdc->f.fid.Fid.Unique;
2819
2820     if (existing) {
2821         osi_Assert(0 == NBObtainWriteLock(&tdc->lock, 674));
2822         osi_Assert(0 == NBObtainWriteLock(&tdc->mflock, 675));
2823         osi_Assert(0 == NBObtainWriteLock(&tdc->tlock, 676));
2824     }
2825
2826     AFS_RWLOCK_INIT(&tdc->lock, "dcache lock");
2827     AFS_RWLOCK_INIT(&tdc->tlock, "dcache tlock");
2828     AFS_RWLOCK_INIT(&tdc->mflock, "dcache flock");
2829     ObtainReadLock(&tdc->tlock);
2830
2831     afs_indexTable[aslot] = tdc;
2832     return tdc;
2833
2834 }                               /*afs_MemGetDSlot */
2835
2836 unsigned int last_error = 0, lasterrtime = 0;
2837
2838 /*
2839  * afs_UFSGetDSlot
2840  *
2841  * Description:
2842  *      Return a pointer to an freshly initialized dcache entry using
2843  *      a UFS-based disk cache.  The dcache tlock will be read-locked.
2844  *
2845  * Parameters:
2846  *      aslot : Dcache slot to look at.
2847  *      type : What 'type' of dslot to get; see the dslot_state enum
2848  *
2849  * Environment:
2850  *      afs_xdcache lock write-locked.
2851  */
2852 struct dcache *
2853 afs_UFSGetDSlot(afs_int32 aslot, dslot_state type)
2854 {
2855     afs_int32 code;
2856     struct dcache *tdc;
2857     int existing = 0;
2858     int entryok;
2859     int off;
2860
2861     AFS_STATCNT(afs_UFSGetDSlot);
2862     if (CheckLock(&afs_xdcache) != -1)
2863         osi_Panic("getdslot nolock");
2864     if (aslot < 0 || aslot >= afs_cacheFiles)
2865         osi_Panic("getdslot slot %d (of %d)", aslot, afs_cacheFiles);
2866     tdc = afs_indexTable[aslot];
2867     if (tdc) {
2868         QRemove(&tdc->lruq);    /* move to queue head */
2869         QAdd(&afs_DLRU, &tdc->lruq);
2870         /* Grab tlock in case refCount != 0 */
2871         ObtainWriteLock(&tdc->tlock, 625);
2872         tdc->refCount++;
2873         ConvertWToRLock(&tdc->tlock);
2874         return tdc;
2875     }
2876
2877     /* otherwise we should read it in from the cache file */
2878     if (!afs_freeDSList)
2879         afs_GetDownDSlot(4);
2880     if (!afs_freeDSList) {
2881         /* none free, making one is better than a panic */
2882         afs_stats_cmperf.dcacheXAllocs++;       /* count in case we have a leak */
2883         tdc = afs_osi_Alloc(sizeof(struct dcache));
2884         osi_Assert(tdc != NULL);
2885 #ifdef  KERNEL_HAVE_PIN
2886         pin((char *)tdc, sizeof(struct dcache));        /* XXX */
2887 #endif
2888     } else {
2889         tdc = afs_freeDSList;
2890         afs_freeDSList = (struct dcache *)tdc->lruq.next;
2891         existing = 1;
2892     }
2893     tdc->dflags = 0;    /* up-to-date, not in free q */
2894     tdc->mflags = 0;
2895     QAdd(&afs_DLRU, &tdc->lruq);
2896     if (tdc->lruq.prev == &tdc->lruq)
2897         osi_Panic("lruq 3");
2898
2899     /*
2900      * Seek to the aslot'th entry and read it in.
2901      */
2902     off = sizeof(struct fcache)*aslot + sizeof(struct afs_fheader);
2903     code =
2904         afs_osi_Read(afs_cacheInodep,
2905                      off, (char *)(&tdc->f),
2906                      sizeof(struct fcache));
2907     entryok = 1;
2908     if (code != sizeof(struct fcache)) {
2909         entryok = 0;
2910 #if defined(KERNEL_HAVE_UERROR)
2911         last_error = getuerror();
2912 #else
2913         last_error = code;
2914 #endif
2915         lasterrtime = osi_Time();
2916         if (type != DSLOT_NEW) {
2917             /* If we are requesting a non-DSLOT_NEW slot, this is an error.
2918              * non-DSLOT_NEW slots are supposed to already exist, so if we
2919              * failed to read in the slot, something is wrong. */
2920             struct osi_stat tstat;
2921             if (afs_osi_Stat(afs_cacheInodep, &tstat)) {
2922                 tstat.size = -1;
2923             }
2924             afs_warn("afs: disk cache read error in CacheItems slot %d "
2925                      "off %d/%d code %d/%d\n",
2926                      (int)aslot,
2927                      off, (int)tstat.size,
2928                      (int)code, (int)sizeof(struct fcache));
2929             /* put tdc back on the free dslot list */
2930             QRemove(&tdc->lruq);
2931             tdc->index = NULLIDX;
2932             tdc->lruq.next = (struct afs_q *)afs_freeDSList;
2933             afs_freeDSList = tdc;
2934             return NULL;
2935         }
2936     }
2937     if (!afs_CellNumValid(tdc->f.fid.Cell)) {
2938         entryok = 0;
2939         if (type == DSLOT_VALID) {
2940             osi_Panic("afs: needed valid dcache but index %d off %d has "
2941                       "invalid cell num %d\n",
2942                       (int)aslot, off, (int)tdc->f.fid.Cell);
2943         }
2944     }
2945
2946     if (type == DSLOT_VALID && tdc->f.fid.Fid.Volume == 0) {
2947         osi_Panic("afs: invalid zero-volume dcache entry at slot %d off %d",
2948                   (int)aslot, off);
2949     }
2950
2951     if (type == DSLOT_UNUSED) {
2952         /* the requested dslot is known to exist, but contain invalid data
2953          * (this happens when we're using a dslot from the free or discard
2954          * list). be sure not to re-use the data in it, so force invalidation.
2955          */
2956         entryok = 0;
2957     }
2958
2959     if (!entryok) {
2960         tdc->f.fid.Cell = 0;
2961         tdc->f.fid.Fid.Volume = 0;
2962         tdc->f.chunk = -1;
2963         hones(tdc->f.versionNo);
2964         tdc->dflags |= DFEntryMod;
2965         afs_indexUnique[aslot] = tdc->f.fid.Fid.Unique;
2966         tdc->f.states &= ~(DRO|DBackup|DRW);
2967         afs_DCMoveBucket(tdc, 0, 0);
2968     } else {
2969         if (tdc->f.states & DRO) {
2970             afs_DCMoveBucket(tdc, 0, 2);
2971         } else if (tdc->f.states & DBackup) {
2972             afs_DCMoveBucket(tdc, 0, 1);
2973         } else {
2974             afs_DCMoveBucket(tdc, 0, 1);
2975         }
2976     }
2977     tdc->refCount = 1;
2978     tdc->index = aslot;
2979     if (tdc->f.chunk >= 0)
2980         tdc->validPos = AFS_CHUNKTOBASE(tdc->f.chunk) + tdc->f.chunkBytes;
2981     else
2982         tdc->validPos = 0;
2983
2984     if (existing) {
2985         osi_Assert(0 == NBObtainWriteLock(&tdc->lock, 674));
2986         osi_Assert(0 == NBObtainWriteLock(&tdc->mflock, 675));
2987         osi_Assert(0 == NBObtainWriteLock(&tdc->tlock, 676));
2988     }
2989
2990     AFS_RWLOCK_INIT(&tdc->lock, "dcache lock");
2991     AFS_RWLOCK_INIT(&tdc->tlock, "dcache tlock");
2992     AFS_RWLOCK_INIT(&tdc->mflock, "dcache flock");
2993     ObtainReadLock(&tdc->tlock);
2994
2995     /*
2996      * If we didn't read into a temporary dcache region, update the
2997      * slot pointer table.
2998      */
2999     afs_indexTable[aslot] = tdc;
3000     return tdc;
3001
3002 }                               /*afs_UFSGetDSlot */
3003
3004
3005
3006 /*!
3007  * Write a particular dcache entry back to its home in the
3008  * CacheInfo file.
3009  *
3010  * \param adc Pointer to the dcache entry to write.
3011  * \param atime If true, set the modtime on the file to the current time.
3012  *
3013  * \note Environment:
3014  *      Must be called with the afs_xdcache lock at least read-locked,
3015  *      and dcache entry at least read-locked.
3016  *      The reference count is not changed.
3017  */
3018
3019 int
3020 afs_WriteDCache(struct dcache *adc, int atime)
3021 {
3022     afs_int32 code;
3023
3024     if (cacheDiskType == AFS_FCACHE_TYPE_MEM)
3025         return 0;
3026     AFS_STATCNT(afs_WriteDCache);
3027     osi_Assert(WriteLocked(&afs_xdcache));
3028     if (atime)
3029         adc->f.modTime = osi_Time();
3030
3031     if ((afs_indexFlags[adc->index] & (IFFree | IFDiscarded)) == 0 &&
3032         adc->f.fid.Fid.Volume == 0) {
3033         /* If a dcache slot is not on the free or discard list, it must be
3034          * in the hash table. Thus, the volume must be non-zero, since that
3035          * is how we determine whether or not to unhash the entry when kicking
3036          * it out of the cache. Do this check now, since otherwise this can
3037          * cause hash table corruption and a panic later on after we read the
3038          * entry back in. */
3039         osi_Panic("afs_WriteDCache zero volume index %d flags 0x%x\n",
3040                   adc->index, (unsigned)afs_indexFlags[adc->index]);
3041     }
3042
3043     /*
3044      * Seek to the right dcache slot and write the in-memory image out to disk.
3045      */
3046     afs_cellname_write();
3047     code =
3048         afs_osi_Write(afs_cacheInodep,
3049                       sizeof(struct fcache) * adc->index +
3050                       sizeof(struct afs_fheader), (char *)(&adc->f),
3051                       sizeof(struct fcache));
3052     if (code != sizeof(struct fcache)) {
3053         afs_warn("afs: failed to write to CacheItems off %ld code %d/%d\n",
3054                  (long)(sizeof(struct fcache) * adc->index + sizeof(struct afs_fheader)),
3055                  (int)code, (int)sizeof(struct fcache));
3056         return EIO;
3057     }
3058     return 0;
3059 }
3060
3061
3062
3063 /*!
3064  * Wake up users of a particular file waiting for stores to take
3065  * place.
3066  *
3067  * \param avc Ptr to related vcache entry.
3068  *
3069  * \note Environment:
3070  *      Nothing interesting.
3071  */
3072 int
3073 afs_wakeup(struct vcache *avc)
3074 {
3075     int i;
3076     struct brequest *tb;
3077     tb = afs_brs;
3078     AFS_STATCNT(afs_wakeup);
3079     for (i = 0; i < NBRS; i++, tb++) {
3080         /* if request is valid and for this file, we've found it */
3081         if (tb->refCount > 0 && avc == tb->vc) {
3082
3083             /*
3084              * If CSafeStore is on, then we don't awaken the guy
3085              * waiting for the store until the whole store has finished.
3086              * Otherwise, we do it now.  Note that if CSafeStore is on,
3087              * the BStore routine actually wakes up the user, instead
3088              * of us.
3089              * I think this is redundant now because this sort of thing
3090              * is already being handled by the higher-level code.
3091              */
3092             if ((avc->f.states & CSafeStore) == 0) {
3093                 tb->code_raw = tb->code_checkcode = 0;
3094                 tb->flags |= BUVALID;
3095                 if (tb->flags & BUWAIT) {
3096                     tb->flags &= ~BUWAIT;
3097                     afs_osi_Wakeup(tb);
3098                 }
3099             }
3100             break;
3101         }
3102     }
3103     return 0;
3104 }
3105
3106 /*!
3107  * Given a file name and inode, set up that file to be an
3108  * active member in the AFS cache.  This also involves checking
3109  * the usability of its data.
3110  *
3111  * \param afile Name of the cache file to initialize.
3112  * \param ainode Inode of the file.
3113  *
3114  * \note Environment:
3115  *      This function is called only during initialization.
3116  */
3117 int
3118 afs_InitCacheFile(char *afile, ino_t ainode)
3119 {
3120     afs_int32 code;
3121     afs_int32 index;
3122     int fileIsBad;
3123     struct osi_file *tfile;
3124     struct osi_stat tstat;
3125     struct dcache *tdc;
3126
3127     AFS_STATCNT(afs_InitCacheFile);
3128     index = afs_stats_cmperf.cacheNumEntries;
3129     if (index >= afs_cacheFiles)
3130         return EINVAL;
3131
3132     ObtainWriteLock(&afs_xdcache, 282);
3133     tdc = afs_GetNewDSlot(index);
3134     ReleaseReadLock(&tdc->tlock);
3135     ReleaseWriteLock(&afs_xdcache);
3136
3137     ObtainWriteLock(&tdc->lock, 621);
3138     ObtainWriteLock(&afs_xdcache, 622);
3139     if (!afile && !ainode) {
3140         tfile = NULL;
3141         fileIsBad = 1;
3142     } else {
3143         if (afile) {
3144             code = afs_LookupInodeByPath(afile, &tdc->f.inode.ufs, NULL);
3145             if (code) {
3146                 ReleaseWriteLock(&afs_xdcache);
3147                 ReleaseWriteLock(&tdc->lock);
3148                 afs_PutDCache(tdc);
3149                 return code;
3150             }
3151         } else {
3152             /* Add any other 'complex' inode types here ... */
3153 #if !defined(AFS_LINUX26_ENV) && !defined(AFS_CACHE_VNODE_PATH)
3154             tdc->f.inode.ufs = ainode;
3155 #else
3156             osi_Panic("Can't init cache with inode numbers when complex inodes are "
3157                       "in use\n");
3158 #endif
3159         }
3160         fileIsBad = 0;
3161         if ((tdc->f.states & DWriting) || tdc->f.fid.Fid.Volume == 0)
3162             fileIsBad = 1;
3163         tfile = osi_UFSOpen(&tdc->f.inode);
3164         if (!tfile) {
3165             ReleaseWriteLock(&afs_xdcache);
3166             ReleaseWriteLock(&tdc->lock);
3167             afs_PutDCache(tdc);
3168             return ENOENT;
3169         }
3170
3171         code = afs_osi_Stat(tfile, &tstat);
3172         if (code)
3173             osi_Panic("initcachefile stat");
3174
3175         /*
3176          * If file size doesn't match the cache info file, it's probably bad.
3177          */
3178         if (tdc->f.chunkBytes != tstat.size)
3179             fileIsBad = 1;
3180         /*
3181          * If file changed within T (120?) seconds of cache info file, it's
3182          * probably bad.  In addition, if slot changed within last T seconds,
3183          * the cache info file may be incorrectly identified, and so slot
3184          * may be bad.
3185          */
3186         if (cacheInfoModTime < tstat.mtime + 120)
3187             fileIsBad = 1;
3188         if (cacheInfoModTime < tdc->f.modTime + 120)
3189             fileIsBad = 1;
3190         /* In case write through is behind, make sure cache items entry is
3191          * at least as new as the chunk.
3192          */
3193         if (tdc->f.modTime < tstat.mtime)
3194             fileIsBad = 1;
3195     }
3196     tdc->f.chunkBytes = 0;
3197
3198     if (fileIsBad) {
3199         tdc->f.fid.Fid.Volume = 0;      /* not in the hash table */
3200         if (tfile && tstat.size != 0)
3201             osi_UFSTruncate(tfile, 0);
3202         tdc->f.states &= ~(DRO|DBackup|DRW);
3203         afs_DCMoveBucket(tdc, 0, 0);
3204         /* put entry in free cache slot list */
3205         afs_dvnextTbl[tdc->index] = afs_freeDCList;
3206         afs_freeDCList = index;
3207         afs_freeDCCount++;
3208         afs_indexFlags[index] |= IFFree;
3209         afs_indexUnique[index] = 0;
3210     } else {
3211         /*
3212          * We must put this entry in the appropriate hash tables.
3213          * Note that i is still set from the above DCHash call
3214          */
3215         code = DCHash(&tdc->f.fid, tdc->f.chunk);
3216         afs_dcnextTbl[tdc->index] = afs_dchashTbl[code];
3217         afs_dchashTbl[code] = tdc->index;
3218         code = DVHash(&tdc->f.fid);
3219         afs_dvnextTbl[tdc->index] = afs_dvhashTbl[code];
3220         afs_dvhashTbl[code] = tdc->index;
3221         afs_AdjustSize(tdc, tstat.size);        /* adjust to new size */
3222         if (tstat.size > 0)
3223             /* has nontrivial amt of data */
3224             afs_indexFlags[index] |= IFEverUsed;
3225         afs_stats_cmperf.cacheFilesReused++;
3226         /*
3227          * Initialize index times to file's mod times; init indexCounter
3228          * to max thereof
3229          */
3230         hset32(afs_indexTimes[index], tstat.atime);
3231         if (hgetlo(afs_indexCounter) < tstat.atime) {
3232             hset32(afs_indexCounter, tstat.atime);
3233         }
3234         afs_indexUnique[index] = tdc->f.fid.Fid.Unique;
3235     }                           /*File is not bad */
3236
3237     if (tfile)
3238         osi_UFSClose(tfile);
3239     tdc->f.states &= ~DWriting;
3240     tdc->dflags &= ~DFEntryMod;
3241     /* don't set f.modTime; we're just cleaning up */
3242     osi_Assert(afs_WriteDCache(tdc, 0) == 0);
3243     ReleaseWriteLock(&afs_xdcache);
3244     ReleaseWriteLock(&tdc->lock);
3245     afs_PutDCache(tdc);
3246     afs_stats_cmperf.cacheNumEntries++;
3247     return 0;
3248 }
3249
3250
3251 /*Max # of struct dcache's resident at any time*/
3252 /*
3253  * If 'dchint' is enabled then in-memory dcache min is increased because of
3254  * crashes...
3255  */
3256 #define DDSIZE 200
3257
3258 /*!
3259  * Initialize dcache related variables.
3260  *
3261  * \param afiles
3262  * \param ablocks
3263  * \param aDentries
3264  * \param achunk
3265  * \param aflags
3266  *
3267  */
3268 void
3269 afs_dcacheInit(int afiles, int ablocks, int aDentries, int achunk, int aflags)
3270 {
3271     struct dcache *tdp;
3272     int i;
3273     int code;
3274     int afs_dhashbits;
3275
3276     afs_freeDCList = NULLIDX;
3277     afs_discardDCList = NULLIDX;
3278     afs_freeDCCount = 0;
3279     afs_freeDSList = NULL;
3280     hzero(afs_indexCounter);
3281
3282     LOCK_INIT(&afs_xdcache, "afs_xdcache");
3283
3284     /*
3285      * Set chunk size
3286      */
3287     if (achunk) {
3288         if (achunk < 0 || achunk > 30)
3289             achunk = 13;        /* Use default */
3290         AFS_SETCHUNKSIZE(achunk);
3291     }
3292
3293     if (!aDentries)
3294         aDentries = DDSIZE;
3295
3296     /* afs_dhashsize defaults to 1024 */
3297     if (aDentries > 512)
3298         afs_dhashsize = 2048;
3299     /* Try to keep the average chain length around two unless the table
3300      * would be ridiculously big. */
3301     if (aDentries > 4096) {
3302         afs_dhashbits = opr_fls(aDentries) - 3;
3303         /* Cap the hash tables to 32k entries. */
3304         if (afs_dhashbits > 15)
3305             afs_dhashbits = 15;
3306         afs_dhashsize = opr_jhash_size(afs_dhashbits);
3307     }
3308     /* initialize hash tables */
3309     afs_dvhashTbl = afs_osi_Alloc(afs_dhashsize * sizeof(afs_int32));
3310     osi_Assert(afs_dvhashTbl != NULL);
3311     afs_dchashTbl = afs_osi_Alloc(afs_dhashsize * sizeof(afs_int32));
3312     osi_Assert(afs_dchashTbl != NULL);
3313     for (i = 0; i < afs_dhashsize; i++) {
3314         afs_dvhashTbl[i] = NULLIDX;
3315         afs_dchashTbl[i] = NULLIDX;
3316     }
3317     afs_dvnextTbl = afs_osi_Alloc(afiles * sizeof(afs_int32));
3318     osi_Assert(afs_dvnextTbl != NULL);
3319     afs_dcnextTbl = afs_osi_Alloc(afiles * sizeof(afs_int32));
3320     osi_Assert(afs_dcnextTbl != NULL);
3321     for (i = 0; i < afiles; i++) {
3322         afs_dvnextTbl[i] = NULLIDX;
3323         afs_dcnextTbl[i] = NULLIDX;
3324     }
3325
3326     /* Allocate and zero the pointer array to the dcache entries */
3327     afs_indexTable = afs_osi_Alloc(sizeof(struct dcache *) * afiles);
3328     osi_Assert(afs_indexTable != NULL);
3329     memset(afs_indexTable, 0, sizeof(struct dcache *) * afiles);
3330     afs_indexTimes = afs_osi_Alloc(afiles * sizeof(afs_hyper_t));
3331     osi_Assert(afs_indexTimes != NULL);
3332     memset(afs_indexTimes, 0, afiles * sizeof(afs_hyper_t));
3333     afs_indexUnique = afs_osi_Alloc(afiles * sizeof(afs_uint32));
3334     osi_Assert(afs_indexUnique != NULL);
3335     memset(afs_indexUnique, 0, afiles * sizeof(afs_uint32));
3336     afs_indexFlags = afs_osi_Alloc(afiles * sizeof(u_char));
3337     osi_Assert(afs_indexFlags != NULL);
3338     memset(afs_indexFlags, 0, afiles * sizeof(char));
3339
3340     /* Allocate and thread the struct dcache entries themselves */
3341     tdp = afs_Initial_freeDSList =
3342         afs_osi_Alloc(aDentries * sizeof(struct dcache));
3343     osi_Assert(tdp != NULL);
3344     memset(tdp, 0, aDentries * sizeof(struct dcache));
3345 #ifdef  KERNEL_HAVE_PIN
3346     pin((char *)afs_indexTable, sizeof(struct dcache *) * afiles);      /* XXX */
3347     pin((char *)afs_indexTimes, sizeof(afs_hyper_t) * afiles);  /* XXX */
3348     pin((char *)afs_indexFlags, sizeof(char) * afiles); /* XXX */
3349     pin((char *)afs_indexUnique, sizeof(afs_int32) * afiles);   /* XXX */
3350     pin((char *)tdp, aDentries * sizeof(struct dcache));        /* XXX */
3351     pin((char *)afs_dvhashTbl, sizeof(afs_int32) * afs_dhashsize);      /* XXX */
3352     pin((char *)afs_dchashTbl, sizeof(afs_int32) * afs_dhashsize);      /* XXX */
3353     pin((char *)afs_dcnextTbl, sizeof(afs_int32) * afiles);     /* XXX */
3354     pin((char *)afs_dvnextTbl, sizeof(afs_int32) * afiles);     /* XXX */
3355 #endif
3356
3357     afs_freeDSList = &tdp[0];
3358     for (i = 0; i < aDentries - 1; i++) {
3359         tdp[i].lruq.next = (struct afs_q *)(&tdp[i + 1]);
3360         AFS_RWLOCK_INIT(&tdp[i].lock, "dcache lock");
3361         AFS_RWLOCK_INIT(&tdp[i].tlock, "dcache tlock");
3362         AFS_RWLOCK_INIT(&tdp[i].mflock, "dcache flock");
3363     }
3364     tdp[aDentries - 1].lruq.next = (struct afs_q *)0;
3365     AFS_RWLOCK_INIT(&tdp[aDentries - 1].lock, "dcache lock");
3366     AFS_RWLOCK_INIT(&tdp[aDentries - 1].tlock, "dcache tlock");
3367     AFS_RWLOCK_INIT(&tdp[aDentries - 1].mflock, "dcache flock");
3368
3369     afs_stats_cmperf.cacheBlocksOrig = afs_stats_cmperf.cacheBlocksTotal =
3370         afs_cacheBlocks = ablocks;
3371     afs_ComputeCacheParms();    /* compute parms based on cache size */
3372
3373     afs_dcentries = aDentries;
3374     afs_blocksUsed = 0;
3375     afs_stats_cmperf.cacheBucket0_Discarded =
3376         afs_stats_cmperf.cacheBucket1_Discarded =
3377         afs_stats_cmperf.cacheBucket2_Discarded = 0;
3378     afs_DCSizeInit();
3379     QInit(&afs_DLRU);
3380
3381     if (aflags & AFSCALL_INIT_MEMCACHE) {
3382         /*
3383          * Use a memory cache instead of a disk cache
3384          */
3385         cacheDiskType = AFS_FCACHE_TYPE_MEM;
3386         afs_cacheType = &afs_MemCacheOps;
3387         afiles = (afiles < aDentries) ? afiles : aDentries;     /* min */
3388         ablocks = afiles * (AFS_FIRSTCSIZE / 1024);
3389         /* ablocks is reported in 1K blocks */
3390         code = afs_InitMemCache(afiles, AFS_FIRSTCSIZE, aflags);
3391         if (code != 0) {
3392             afs_warn("afsd: memory cache too large for available memory.\n");
3393             afs_warn("afsd: AFS files cannot be accessed.\n\n");
3394             dcacheDisabled = 1;
3395         } else
3396             afs_warn("Memory cache: Allocating %d dcache entries...",
3397                    aDentries);
3398     } else {
3399         cacheDiskType = AFS_FCACHE_TYPE_UFS;
3400         afs_cacheType = &afs_UfsCacheOps;
3401     }
3402 }
3403
3404 /*!
3405  * Shuts down the cache.
3406  *
3407  */
3408 void
3409 shutdown_dcache(void)
3410 {
3411     int i;
3412
3413 #ifdef AFS_CACHE_VNODE_PATH
3414     if (cacheDiskType != AFS_FCACHE_TYPE_MEM) {
3415         struct dcache *tdc;
3416         for (i = 0; i < afs_cacheFiles; i++) {
3417             tdc = afs_indexTable[i];
3418             if (tdc) {
3419                 afs_osi_FreeStr(tdc->f.inode.ufs);
3420             }
3421         }
3422     }
3423 #endif
3424
3425     afs_osi_Free(afs_dvnextTbl, afs_cacheFiles * sizeof(afs_int32));
3426     afs_osi_Free(afs_dcnextTbl, afs_cacheFiles * sizeof(afs_int32));
3427     afs_osi_Free(afs_indexTable, afs_cacheFiles * sizeof(struct dcache *));
3428     afs_osi_Free(afs_indexTimes, afs_cacheFiles * sizeof(afs_hyper_t));
3429     afs_osi_Free(afs_indexUnique, afs_cacheFiles * sizeof(afs_uint32));
3430     afs_osi_Free(afs_indexFlags, afs_cacheFiles * sizeof(u_char));
3431     afs_osi_Free(afs_Initial_freeDSList,
3432                  afs_dcentries * sizeof(struct dcache));
3433 #ifdef  KERNEL_HAVE_PIN
3434     unpin((char *)afs_dcnextTbl, afs_cacheFiles * sizeof(afs_int32));
3435     unpin((char *)afs_dvnextTbl, afs_cacheFiles * sizeof(afs_int32));
3436     unpin((char *)afs_indexTable, afs_cacheFiles * sizeof(struct dcache *));
3437     unpin((char *)afs_indexTimes, afs_cacheFiles * sizeof(afs_hyper_t));
3438     unpin((char *)afs_indexUnique, afs_cacheFiles * sizeof(afs_uint32));
3439     unpin((u_char *) afs_indexFlags, afs_cacheFiles * sizeof(u_char));
3440     unpin(afs_Initial_freeDSList, afs_dcentries * sizeof(struct dcache));
3441 #endif
3442
3443
3444     for (i = 0; i < afs_dhashsize; i++) {
3445         afs_dvhashTbl[i] = NULLIDX;
3446         afs_dchashTbl[i] = NULLIDX;
3447     }
3448
3449     afs_osi_Free(afs_dvhashTbl, afs_dhashsize * sizeof(afs_int32));
3450     afs_osi_Free(afs_dchashTbl, afs_dhashsize * sizeof(afs_int32));
3451
3452     afs_blocksUsed = afs_dcentries = 0;
3453     afs_stats_cmperf.cacheBucket0_Discarded =
3454         afs_stats_cmperf.cacheBucket1_Discarded =
3455         afs_stats_cmperf.cacheBucket2_Discarded = 0;
3456     hzero(afs_indexCounter);
3457
3458     afs_freeDCCount = 0;
3459     afs_freeDCList = NULLIDX;
3460     afs_discardDCList = NULLIDX;
3461     afs_freeDSList = afs_Initial_freeDSList = 0;
3462
3463     LOCK_INIT(&afs_xdcache, "afs_xdcache");
3464     QInit(&afs_DLRU);
3465
3466 }
3467
3468 /*!
3469  * Get a dcache ready for writing, respecting the current cache size limits
3470  *
3471  * len is required because afs_GetDCache with flag == 4 expects the length
3472  * field to be filled. It decides from this whether it's necessary to fetch
3473  * data into the chunk before writing or not (when the whole chunk is
3474  * overwritten!).
3475  *
3476  * \param avc           The vcache to fetch a dcache for
3477  * \param filePos       The start of the section to be written
3478  * \param len           The length of the section to be written
3479  * \param areq
3480  * \param noLock
3481  *
3482  * \return If successful, a reference counted dcache with tdc->lock held. Lock
3483  *         must be released and afs_PutDCache() called to free dcache.
3484  *         NULL on  failure
3485  *
3486  * \note avc->lock must be held on entry. Function may release and reobtain
3487  *       avc->lock and GLOCK.
3488  */
3489
3490 struct dcache *
3491 afs_ObtainDCacheForWriting(struct vcache *avc, afs_size_t filePos,
3492                            afs_size_t len, struct vrequest *areq,
3493                            int noLock)
3494 {
3495     struct dcache *tdc = NULL;
3496     afs_size_t offset;
3497
3498     /* read the cached info */
3499     if (noLock) {
3500         tdc = afs_FindDCache(avc, filePos);
3501         if (tdc)
3502             ObtainWriteLock(&tdc->lock, 657);
3503     } else if (afs_blocksUsed >
3504                PERCENT(CM_WAITFORDRAINPCT, afs_cacheBlocks)) {
3505         tdc = afs_FindDCache(avc, filePos);
3506         if (tdc) {
3507             ObtainWriteLock(&tdc->lock, 658);
3508             if (!hsame(tdc->f.versionNo, avc->f.m.DataVersion)
3509                 || (tdc->dflags & DFFetching)) {
3510                 ReleaseWriteLock(&tdc->lock);
3511                 afs_PutDCache(tdc);
3512                 tdc = NULL;
3513             }
3514         }
3515         if (!tdc) {
3516             afs_MaybeWakeupTruncateDaemon();
3517             while (afs_blocksUsed >
3518                    PERCENT(CM_WAITFORDRAINPCT, afs_cacheBlocks)) {
3519                 ReleaseWriteLock(&avc->lock);
3520                 if (afs_blocksUsed - afs_blocksDiscarded >
3521                     PERCENT(CM_WAITFORDRAINPCT, afs_cacheBlocks)) {
3522                     afs_WaitForCacheDrain = 1;
3523                     afs_osi_Sleep(&afs_WaitForCacheDrain);
3524                 }
3525                 afs_MaybeFreeDiscardedDCache();
3526                 afs_MaybeWakeupTruncateDaemon();
3527                 ObtainWriteLock(&avc->lock, 509);
3528             }
3529             avc->f.states |= CDirty;
3530             tdc = afs_GetDCache(avc, filePos, areq, &offset, &len, 4);
3531             if (tdc)
3532                 ObtainWriteLock(&tdc->lock, 659);
3533         }
3534     } else {
3535         tdc = afs_GetDCache(avc, filePos, areq, &offset, &len, 4);
3536         if (tdc)
3537             ObtainWriteLock(&tdc->lock, 660);
3538     }
3539     if (tdc) {
3540         if (!(afs_indexFlags[tdc->index] & IFDataMod)) {
3541             afs_stats_cmperf.cacheCurrDirtyChunks++;
3542             afs_indexFlags[tdc->index] |= IFDataMod;    /* so it doesn't disappear */
3543         }
3544         if (!(tdc->f.states & DWriting)) {
3545             /* don't mark entry as mod if we don't have to */
3546             tdc->f.states |= DWriting;
3547             tdc->dflags |= DFEntryMod;
3548         }
3549     }
3550     return tdc;
3551 }
3552
3553 /*!
3554  * Make a shadow copy of a dir's dcache. It's used for disconnected
3555  * operations like remove/create/rename to keep the original directory data.
3556  * On reconnection, we can diff the original data with the server and get the
3557  * server changes and with the local data to get the local changes.
3558  *
3559  * \param avc The dir vnode.
3560  * \param adc The dir dcache.
3561  *
3562  * \return 0 for success.
3563  *
3564  * \note The vcache entry must be write locked.
3565  * \note The dcache entry must be read locked.
3566  */
3567 int
3568 afs_MakeShadowDir(struct vcache *avc, struct dcache *adc)
3569 {
3570     int i, code, ret_code = 0, written, trans_size;
3571     struct dcache *new_dc = NULL;
3572     struct osi_file *tfile_src, *tfile_dst;
3573     struct VenusFid shadow_fid;
3574     char *data;
3575
3576     /* Is this a dir? */
3577     if (vType(avc) != VDIR)
3578         return ENOTDIR;
3579
3580     if (avc->f.shadow.vnode || avc->f.shadow.unique)
3581         return EEXIST;
3582
3583     /* Generate a fid for the shadow dir. */
3584     shadow_fid.Cell = avc->f.fid.Cell;
3585     shadow_fid.Fid.Volume = avc->f.fid.Fid.Volume;
3586     afs_GenShadowFid(&shadow_fid);
3587
3588     ObtainWriteLock(&afs_xdcache, 716);
3589
3590     /* Get a fresh dcache. */
3591     new_dc = afs_AllocDCache(avc, 0, 0, &shadow_fid);
3592     osi_Assert(new_dc);
3593
3594     ObtainReadLock(&adc->mflock);
3595
3596     /* Set up the new fid. */
3597     /* Copy interesting data from original dir dcache. */
3598     new_dc->mflags = adc->mflags;
3599     new_dc->dflags = adc->dflags;
3600     new_dc->f.modTime = adc->f.modTime;
3601     new_dc->f.versionNo = adc->f.versionNo;
3602     new_dc->f.states = adc->f.states;
3603     new_dc->f.chunk= adc->f.chunk;
3604     new_dc->f.chunkBytes = adc->f.chunkBytes;
3605
3606     ReleaseReadLock(&adc->mflock);
3607
3608     /* Now add to the two hash chains */
3609     i = DCHash(&shadow_fid, 0);
3610     afs_dcnextTbl[new_dc->index] = afs_dchashTbl[i];
3611     afs_dchashTbl[i] = new_dc->index;
3612
3613     i = DVHash(&shadow_fid);
3614     afs_dvnextTbl[new_dc->index] = afs_dvhashTbl[i];
3615     afs_dvhashTbl[i] = new_dc->index;
3616
3617     ReleaseWriteLock(&afs_xdcache);
3618
3619     /* Alloc a 4k block. */
3620     data = afs_osi_Alloc(4096);
3621     if (!data) {
3622         afs_warn("afs_MakeShadowDir: could not alloc data\n");
3623         ret_code = ENOMEM;
3624         goto done;
3625     }
3626
3627     /* Open the files. */
3628     tfile_src = afs_CFileOpen(&adc->f.inode);
3629     tfile_dst = afs_CFileOpen(&new_dc->f.inode);
3630     osi_Assert(tfile_src);
3631     osi_Assert(tfile_dst);
3632
3633     /* And now copy dir dcache data into this dcache,
3634      * 4k at a time.
3635      */
3636     written = 0;
3637     while (written < adc->f.chunkBytes) {
3638         trans_size = adc->f.chunkBytes - written;
3639         if (trans_size > 4096)
3640             trans_size = 4096;
3641
3642         /* Read a chunk from the dcache. */
3643         code = afs_CFileRead(tfile_src, written, data, trans_size);
3644         if (code < trans_size) {
3645             ret_code = EIO;
3646             break;
3647         }
3648
3649         /* Write it to the new dcache. */
3650         code = afs_CFileWrite(tfile_dst, written, data, trans_size);
3651         if (code < trans_size) {
3652             ret_code = EIO;
3653             break;
3654         }
3655
3656         written+=trans_size;
3657     }
3658
3659     afs_CFileClose(tfile_dst);
3660     afs_CFileClose(tfile_src);
3661
3662     afs_osi_Free(data, 4096);
3663
3664     ReleaseWriteLock(&new_dc->lock);
3665     afs_PutDCache(new_dc);
3666
3667     if (!ret_code) {
3668         ObtainWriteLock(&afs_xvcache, 763);
3669         ObtainWriteLock(&afs_disconDirtyLock, 765);
3670         QAdd(&afs_disconShadow, &avc->shadowq);
3671         osi_Assert((afs_RefVCache(avc) == 0));
3672         ReleaseWriteLock(&afs_disconDirtyLock);
3673         ReleaseWriteLock(&afs_xvcache);
3674
3675         avc->f.shadow.vnode = shadow_fid.Fid.Vnode;
3676         avc->f.shadow.unique = shadow_fid.Fid.Unique;
3677     }
3678
3679 done:
3680     return ret_code;
3681 }
3682
3683 /*!
3684  * Delete the dcaches of a shadow dir.
3685  *
3686  * \param avc The vcache containing the shadow fid.
3687  *
3688  * \note avc must be write locked.
3689  */
3690 void
3691 afs_DeleteShadowDir(struct vcache *avc)
3692 {
3693     struct dcache *tdc;
3694     struct VenusFid shadow_fid;
3695
3696     shadow_fid.Cell = avc->f.fid.Cell;
3697     shadow_fid.Fid.Volume = avc->f.fid.Fid.Volume;
3698     shadow_fid.Fid.Vnode = avc->f.shadow.vnode;
3699     shadow_fid.Fid.Unique = avc->f.shadow.unique;
3700
3701     tdc = afs_FindDCacheByFid(&shadow_fid);
3702     if (tdc) {
3703         afs_HashOutDCache(tdc, 1);
3704         afs_DiscardDCache(tdc);
3705         afs_PutDCache(tdc);
3706     }
3707     avc->f.shadow.vnode = avc->f.shadow.unique = 0;
3708     ObtainWriteLock(&afs_disconDirtyLock, 708);
3709     QRemove(&avc->shadowq);
3710     ReleaseWriteLock(&afs_disconDirtyLock);
3711     afs_PutVCache(avc); /* Because we held it when we added to the queue */
3712 }
3713
3714 /*!
3715  * Populate a dcache with empty chunks up to a given file size,
3716  * used before extending a file in order to avoid 'holes' which
3717  * we can't access in disconnected mode.
3718  *
3719  * \param avc   The vcache which is being extended (locked)
3720  * \param alen  The new length of the file
3721  *
3722  */
3723 void
3724 afs_PopulateDCache(struct vcache *avc, afs_size_t apos, struct vrequest *areq)
3725 {
3726     struct dcache *tdc;
3727     afs_size_t len, offset;
3728     afs_int32 start, end;
3729
3730     /* We're doing this to deal with the situation where we extend
3731      * by writing after lseek()ing past the end of the file . If that
3732      * extension skips chunks, then those chunks won't be created, and
3733      * GetDCache will assume that they have to be fetched from the server.
3734      * So, for each chunk between the current file position, and the new
3735      * length we GetDCache for that chunk.
3736      */
3737
3738     if (AFS_CHUNK(apos) == 0 || apos <= avc->f.m.Length)
3739         return;
3740
3741     if (avc->f.m.Length == 0)
3742         start = 0;
3743     else
3744         start = AFS_CHUNK(avc->f.m.Length)+1;
3745
3746     end = AFS_CHUNK(apos);
3747
3748     while (start<end) {
3749         len = AFS_CHUNKTOSIZE(start);
3750         tdc = afs_GetDCache(avc, AFS_CHUNKTOBASE(start), areq, &offset, &len, 4);
3751         if (tdc)
3752             afs_PutDCache(tdc);
3753         start++;
3754     }
3755 }