src/WINNT/afsd/cm_volume.c

   1 /*
   2  * Copyright 2000, International Business Machines Corporation and others.
   3  * All Rights Reserved.
   4  *
   5  * This software has been released under the terms of the IBM Public
   6  * License.  For details, see the LICENSE file in the top-level source
   7  * directory or online at http://www.openafs.org/dl/license10.html
   8  */
   9
  10 #include <afsconfig.h>
  11 #include <afs/param.h>
  12 #include <afs/stds.h>
  13
  14 #include <roken.h>
  15
  16 #include <windows.h>
  17 #include <winsock2.h>
  18 #include <nb30.h>
  19 #include <string.h>
  20 #include <strsafe.h>
  21 #include <malloc.h>
  22 #include "afsd.h"
  23 #include <osi.h>
  24 #include <rx/rx.h>
  25
  26 osi_rwlock_t cm_volumeLock;
  27
  28 long
  29 cm_ValidateVolume(void)
  30 {
  31     cm_volume_t * volp;
  32     afs_uint32 count;
  33
  34     for (volp = cm_data.allVolumesp, count = 0; volp; volp=volp->allNextp, count++) {
  35         if ( volp->magic != CM_VOLUME_MAGIC ) {
  36             afsi_log("cm_ValidateVolume failure: volp->magic != CM_VOLUME_MAGIC");
  37             fprintf(stderr, "cm_ValidateVolume failure: volp->magic != CM_VOLUME_MAGIC\n");
  38             return -1;
  39         }
  40         if ( volp->cellp && volp->cellp->magic != CM_CELL_MAGIC ) {
  41             afsi_log("cm_ValidateVolume failure: volp->cellp->magic != CM_CELL_MAGIC");
  42             fprintf(stderr, "cm_ValidateVolume failure: volp->cellp->magic != CM_CELL_MAGIC\n");
  43             return -2;
  44         }
  45         if ( volp->allNextp && volp->allNextp->magic != CM_VOLUME_MAGIC ) {
  46             afsi_log("cm_ValidateVolume failure: volp->allNextp->magic != CM_VOLUME_MAGIC");
  47             fprintf(stderr, "cm_ValidateVolume failure: volp->allNextp->magic != CM_VOLUME_MAGIC\n");
  48             return -3;
  49         }
  50         if ( count != 0 && volp == cm_data.allVolumesp ||
  51              count > cm_data.maxVolumes ) {
  52             afsi_log("cm_ValidateVolume failure: cm_data.allVolumep loop detected");
  53             fprintf(stderr, "cm_ValidateVolume failure: cm_data.allVolumep loop detected\n");
  54             return -4;
  55         }
  56     }
  57
  58     if ( count != cm_data.currentVolumes ) {
  59         afsi_log("cm_ValidateVolume failure: count != cm_data.currentVolumes");
  60         fprintf(stderr, "cm_ValidateVolume failure: count != cm_data.currentVolumes\n");
  61         return -5;
  62     }
  63
  64     return 0;
  65 }
  66
  67 long
  68 cm_ShutdownVolume(void)
  69 {
  70     cm_volume_t * volp;
  71
  72     for (volp = cm_data.allVolumesp; volp; volp=volp->allNextp) {
  73         afs_uint32 volType;
  74         for ( volType = RWVOL; volType < NUM_VOL_TYPES; volType++) {
  75             if (volp->vol[volType].ID)
  76                 cm_VolumeStatusNotification(volp, volp->vol[volType].ID, volp->vol[volType].state, vl_alldown);
  77         }
  78         volp->cbExpiresRO = 0;
  79         volp->cbIssuedRO = 0;
  80         volp->cbServerpRO = NULL;
  81         volp->volumeSizeRO = 0;
  82         _InterlockedAnd(&volp->flags, ~CM_VOLUMEFLAG_RO_SIZE_VALID);
  83
  84         lock_FinalizeRWLock(&volp->rw);
  85     }
  86
  87     return 0;
  88 }
  89
  90 void cm_InitVolume(int newFile, long maxVols)
  91 {
  92     static osi_once_t once;
  93
  94     if (osi_Once(&once)) {
  95         lock_InitializeRWLock(&cm_volumeLock, "cm global volume lock", LOCK_HIERARCHY_VOLUME_GLOBAL);
  96
  97         if ( newFile ) {
  98             cm_data.allVolumesp = NULL;
  99             cm_data.currentVolumes = 0;
 100             cm_data.maxVolumes = maxVols;
 101             memset(cm_data.volumeNameHashTablep, 0, sizeof(cm_volume_t *) * cm_data.volumeHashTableSize);
 102             memset(cm_data.volumeRWIDHashTablep, 0, sizeof(cm_volume_t *) * cm_data.volumeHashTableSize);
 103             memset(cm_data.volumeROIDHashTablep, 0, sizeof(cm_volume_t *) * cm_data.volumeHashTableSize);
 104             memset(cm_data.volumeBKIDHashTablep, 0, sizeof(cm_volume_t *) * cm_data.volumeHashTableSize);
 105             cm_data.volumeLRUFirstp = cm_data.volumeLRULastp = NULL;
 106         } else {
 107             cm_volume_t * volp;
 108
 109             for (volp = cm_data.allVolumesp; volp; volp=volp->allNextp) {
 110                 afs_uint32 volType;
 111
 112                 lock_InitializeRWLock(&volp->rw, "cm_volume_t rwlock", LOCK_HIERARCHY_VOLUME);
 113                 _InterlockedOr(&volp->flags, CM_VOLUMEFLAG_RESET);
 114                 _InterlockedAnd(&volp->flags, ~CM_VOLUMEFLAG_UPDATING_VL);
 115                 volp->lastUpdateTime = 0;
 116                 for (volType = RWVOL; volType < NUM_VOL_TYPES; volType++) {
 117                     volp->vol[volType].state = vl_unknown;
 118                     volp->vol[volType].serversp = NULL;
 119                     if (volp->vol[volType].ID)
 120                         cm_VolumeStatusNotification(volp, volp->vol[volType].ID, vl_unknown, volp->vol[volType].state);
 121                 }
 122                 volp->cbExpiresRO = 0;
 123                 volp->cbIssuedRO = 0;
 124                 volp->cbServerpRO = NULL;
 125                 volp->volumeSizeRO = 0;
 126                 _InterlockedAnd(&volp->flags, ~CM_VOLUMEFLAG_RO_SIZE_VALID);
 127             }
 128         }
 129         osi_EndOnce(&once);
 130     }
 131 }
 132
 133
 134 /* returns true if the id is a decimal integer, in which case we interpret it
 135  * as an id.  make the cache manager much simpler.
 136  * Stolen from src/volser/vlprocs.c */
 137 int
 138 cm_VolNameIsID(char *aname)
 139 {
 140     int tc;
 141     while (tc = *aname++) {
 142         if (tc > '9' || tc < '0')
 143             return 0;
 144     }
 145     return 1;
 146 }
 147
 148
 149 /*
 150  * Update a volume.  Caller holds a write lock on the volume (volp->rw).
 151  *
 152  *
 153  *  shadow / openafs / jhutz@CS.CMU.EDU {ANDREW.CMU.EDU}  01:38    (JHutz)
 154  *    Yes, we support multihomed fileservers.
 155  *    Since before we got the code from IBM.
 156  *    But to find out about multiple addresses on a multihomed server, you need
 157  *    to use VL_GetEntryByNameU and VL_GetAddrsU.  If you use
 158  *    VL_GetEntryByNameO or VL_GetEntryByNameN, the vlserver just gives you one
 159  *    address per server.
 160  *  shadow / openafs / jhutz@CS.CMU.EDU {ANDREW.CMU.EDU}  01:39    (JHutz)
 161  *    see src/afs/afs_volume.c, paying particular attention to
 162  *    afs_NewVolumeByName, afs_SetupVolume, and InstallUVolumeEntry
 163  *  shadow / openafs / jaltman {ANDREW.CMU.EDU}  01:40    (Jeffrey Altman)
 164  *    thanks.  The windows client calls the 0 versions.
 165  *  shadow / openafs / jhutz@CS.CMU.EDU {ANDREW.CMU.EDU}  01:51    (JHutz)
 166  *    Oh.  Ew.
 167  *    By not using the N versions, you only get up to 8 sites instead of 13.
 168  *    By not using the U versions, you don't get to know about multihomed serve
 169  *  shadow / openafs / jhutz@CS.CMU.EDU {ANDREW.CMU.EDU}  01:52    (JHutz)
 170  *    Of course, you probably want to support the older versions for backward
 171  *    compatibility.  If you do that, you need to call the newest interface
 172  *    first, and fall back to successively older versions if you get
 173  *    RXGEN_OPCODE.
 174  */
 175 static long
 176 cm_GetEntryByName( struct cm_cell *cellp, const char *name,
 177                    struct vldbentry *vldbEntryp,
 178                    struct nvldbentry *nvldbEntryp,
 179                    struct uvldbentry *uvldbEntryp,
 180                    int *methodp,
 181                    cm_user_t *userp,
 182                    cm_req_t *reqp
 183                    )
 184 {
 185     long code;
 186     cm_conn_t *connp;
 187     struct rx_connection * rxconnp;
 188
 189     osi_Log2(afsd_logp, "CALL VL_GetEntryByName{UNO} name %s:%s",
 190               osi_LogSaveString(afsd_logp,cellp->name),
 191               osi_LogSaveString(afsd_logp,name));
 192     do {
 193
 194         code = cm_ConnByMServers(cellp->vlServersp, FALSE, userp, reqp, &connp);
 195         if (code)
 196             continue;
 197
 198         rxconnp = cm_GetRxConn(connp);
 199         code = VL_GetEntryByNameU(rxconnp, name, uvldbEntryp);
 200         *methodp = 2;
 201         if ( code == RXGEN_OPCODE )
 202         {
 203             code = VL_GetEntryByNameN(rxconnp, name, nvldbEntryp);
 204             *methodp = 1;
 205         }
 206         if ( code == RXGEN_OPCODE ) {
 207             code = VL_GetEntryByNameO(rxconnp, name, vldbEntryp);
 208             *methodp = 0;
 209         }
 210         rx_PutConnection(rxconnp);
 211     } while (cm_Analyze(connp, userp, reqp, NULL, cellp, 0, NULL, NULL, &cellp->vlServersp, NULL, code));
 212     code = cm_MapVLRPCError(code, reqp);
 213     if ( code )
 214         osi_Log3(afsd_logp, "CALL VL_GetEntryByName{UNO} name %s:%s FAILURE, code 0x%x",
 215                   osi_LogSaveString(afsd_logp,cellp->name),
 216                   osi_LogSaveString(afsd_logp,name), code);
 217     else
 218         osi_Log2(afsd_logp, "CALL VL_GetEntryByName{UNO} name %s:%s SUCCESS",
 219                   osi_LogSaveString(afsd_logp,cellp->name),
 220                   osi_LogSaveString(afsd_logp,name));
 221     return code;
 222 }
 223
 224 static long
 225 cm_GetEntryByID( struct cm_cell *cellp, afs_uint32 id,
 226                  struct vldbentry *vldbEntryp,
 227                  struct nvldbentry *nvldbEntryp,
 228                  struct uvldbentry *uvldbEntryp,
 229                  int *methodp,
 230                  cm_user_t *userp,
 231                  cm_req_t *reqp
 232                  )
 233 {
 234     char name[64];
 235
 236     StringCbPrintf(name, sizeof(name), "%u", id);
 237
 238     return cm_GetEntryByName(cellp, name, vldbEntryp, nvldbEntryp, uvldbEntryp, methodp, userp, reqp);
 239 }
 240
 241 long cm_UpdateVolumeLocation(struct cm_cell *cellp, cm_user_t *userp, cm_req_t *reqp,
 242                      cm_volume_t *volp)
 243 {
 244     struct rx_connection *rxconnp;
 245     cm_conn_t *connp;
 246     int i;
 247     afs_uint32 j, k;
 248     cm_serverRef_t *tsrp;
 249     cm_server_t *tsp;
 250     struct sockaddr_in tsockAddr;
 251     long tflags;
 252     u_long tempAddr;
 253     struct vldbentry vldbEntry;
 254     struct nvldbentry nvldbEntry;
 255     struct uvldbentry uvldbEntry;
 256     int method = -1;
 257     int ROcount = 0;
 258     int isMixed = 0;
 259     long code;
 260     enum volstatus rwNewstate = vl_online;
 261     enum volstatus roNewstate = vl_online;
 262     enum volstatus bkNewstate = vl_online;
 263 #ifdef AFS_FREELANCE_CLIENT
 264     int freelance = 0;
 265 #endif
 266     afs_uint32 volType;
 267     time_t now;
 268
 269     lock_AssertWrite(&volp->rw);
 270
 271     /*
 272      * If the last volume update was in the last five
 273      * minutes and it did not exist, then avoid the RPC
 274      * and return No Such Volume immediately.
 275      */
 276     now = time(NULL);
 277     if ((volp->flags & CM_VOLUMEFLAG_NOEXIST) &&
 278         (now < volp->lastUpdateTime + 600))
 279     {
 280         return CM_ERROR_NOSUCHVOLUME;
 281     }
 282
 283 #ifdef AFS_FREELANCE_CLIENT
 284     if (cellp->cellID == AFS_FAKE_ROOT_CELL_ID)
 285     {
 286         freelance = 1;
 287         memset(&vldbEntry, 0, sizeof(vldbEntry));
 288         vldbEntry.flags |= VLF_RWEXISTS;
 289         vldbEntry.volumeId[0] = AFS_FAKE_ROOT_VOL_ID;
 290         code = 0;
 291         method = 0;
 292     } else
 293 #endif
 294     {
 295         while (volp->flags & CM_VOLUMEFLAG_UPDATING_VL) {
 296             osi_Log3(afsd_logp, "cm_UpdateVolumeLocation sleeping name %s:%s flags 0x%x",
 297                      volp->cellp->name, volp->namep, volp->flags);
 298             osi_SleepW((LONG_PTR) &volp->flags, &volp->rw);
 299             lock_ObtainWrite(&volp->rw);
 300             osi_Log3(afsd_logp, "cm_UpdateVolumeLocation awake name %s:%s flags 0x%x",
 301                      volp->cellp->name, volp->namep, volp->flags);
 302             if (!(volp->flags & CM_VOLUMEFLAG_RESET)) {
 303                 osi_Log3(afsd_logp, "cm_UpdateVolumeLocation nothing to do, waking others name %s:%s flags 0x%x",
 304                          volp->cellp->name, volp->namep, volp->flags);
 305                 osi_Wakeup((LONG_PTR) &volp->flags);
 306                 return 0;
 307             }
 308             now = time(NULL);
 309         }
 310
 311         /* Do not query again if the last update attempt failed in the last 60 seconds */
 312         if ((volp->flags & CM_VOLUMEFLAG_RESET) && (volp->lastUpdateTime > now - 60))
 313         {
 314             osi_Log3(afsd_logp, "cm_UpdateVolumeLocation unsuccessful update in last 60 seconds -- name %s:%s flags 0x%x",
 315                       volp->cellp->name, volp->namep, volp->flags);
 316             return(CM_ERROR_ALLDOWN);
 317         }
 318
 319         _InterlockedOr(&volp->flags, CM_VOLUMEFLAG_UPDATING_VL);
 320
 321         /* Do not hold the volume lock across the RPC calls */
 322         lock_ReleaseWrite(&volp->rw);
 323
 324         if (cellp->flags & CM_CELLFLAG_VLSERVER_INVALID)
 325              cm_UpdateCell(cellp, 0);
 326
 327         /* now we have volume structure locked and held; make RPC to fill it */
 328         code = cm_GetEntryByName(cellp, volp->namep, &vldbEntry, &nvldbEntry,
 329                                  &uvldbEntry,
 330                                  &method, userp, reqp);
 331
 332         /* We can end up here with code == CM_ERROR_NOSUCHVOLUME if the base volume name
 333          * does not exist and is not a numeric string but there might exist a .readonly volume.
 334          * If the base name doesn't exist we will not care about the .backup that might be left
 335          * behind since there should be no method to access it.
 336          */
 337         if (code == CM_ERROR_NOSUCHVOLUME &&
 338              _atoi64(volp->namep) == 0 &&
 339              volp->vol[RWVOL].ID == 0 &&
 340              strlen(volp->namep) < (VL_MAXNAMELEN - 9)) {
 341             char name[VL_MAXNAMELEN];
 342
 343             snprintf(name, VL_MAXNAMELEN, "%s.readonly", volp->namep);
 344
 345             /* now we have volume structure locked and held; make RPC to fill it */
 346             code = cm_GetEntryByName(cellp, name, &vldbEntry, &nvldbEntry,
 347                                      &uvldbEntry,
 348                                      &method, userp, reqp);
 349         }
 350
 351         /*
 352          * What if there was a volume rename?  The volume name no longer exists but the
 353          * volume id might.  Try to refresh the volume location information based one
 354          * of the readwrite or readonly volume id.
 355          */
 356         if (code == CM_ERROR_NOSUCHVOLUME) {
 357             if (volp->vol[RWVOL].ID != 0) {
 358                 code = cm_GetEntryByID(cellp, volp->vol[RWVOL].ID, &vldbEntry, &nvldbEntry,
 359                                        &uvldbEntry,
 360                                        &method, userp, reqp);
 361             } else if (volp->vol[ROVOL].ID != 0) {
 362                 code = cm_GetEntryByID(cellp, volp->vol[ROVOL].ID, &vldbEntry, &nvldbEntry,
 363                                        &uvldbEntry,
 364                                        &method, userp, reqp);
 365             }
 366         }
 367         lock_ObtainWrite(&volp->rw);
 368     }
 369
 370     if (code == 0) {
 371         afs_int32 flags;
 372         afs_int32 nServers;
 373         afs_int32 rwID;
 374         afs_int32 roID;
 375         afs_int32 bkID;
 376         afs_int32 serverNumber[NMAXNSERVERS];
 377         afs_int32 serverFlags[NMAXNSERVERS];
 378         afsUUID   serverUUID[NMAXNSERVERS];
 379         afs_int32 rwServers_alldown = 1;
 380         afs_int32 roServers_alldown = 1;
 381         afs_int32 bkServers_alldown = 1;
 382         char      name[VL_MAXNAMELEN];
 383
 384 #ifdef AFS_FREELANCE_CLIENT
 385         if (freelance)
 386             rwServers_alldown = 0;
 387 #endif
 388
 389         /* clear out old bindings */
 390         for ( volType = RWVOL; volType < NUM_VOL_TYPES; volType++) {
 391             if (volp->vol[volType].serversp)
 392                 cm_FreeServerList(&volp->vol[volType].serversp, CM_FREESERVERLIST_DELETE);
 393         }
 394
 395         memset(serverUUID, 0, sizeof(serverUUID));
 396
 397         switch ( method ) {
 398         case 0:
 399             flags = vldbEntry.flags;
 400             nServers = vldbEntry.nServers;
 401             rwID = vldbEntry.volumeId[0];
 402             roID = vldbEntry.volumeId[1];
 403             bkID = vldbEntry.volumeId[2];
 404             for ( i=0; i<nServers; i++ ) {
 405                 serverFlags[i] = vldbEntry.serverFlags[i];
 406                 serverNumber[i] = vldbEntry.serverNumber[i];
 407             }
 408             strncpy(name, vldbEntry.name, VL_MAXNAMELEN);
 409             name[VL_MAXNAMELEN - 1] = '\0';
 410             break;
 411         case 1:
 412             flags = nvldbEntry.flags;
 413             nServers = nvldbEntry.nServers;
 414             rwID = nvldbEntry.volumeId[0];
 415             roID = nvldbEntry.volumeId[1];
 416             bkID = nvldbEntry.volumeId[2];
 417             for ( i=0; i<nServers; i++ ) {
 418                 serverFlags[i] = nvldbEntry.serverFlags[i];
 419                 serverNumber[i] = nvldbEntry.serverNumber[i];
 420             }
 421             strncpy(name, nvldbEntry.name, VL_MAXNAMELEN);
 422             name[VL_MAXNAMELEN - 1] = '\0';
 423             break;
 424         case 2:
 425             flags = uvldbEntry.flags;
 426             nServers = uvldbEntry.nServers;
 427             rwID = uvldbEntry.volumeId[0];
 428             roID = uvldbEntry.volumeId[1];
 429             bkID = uvldbEntry.volumeId[2];
 430             for ( i=0, j=0; code == 0 && i<nServers && j<NMAXNSERVERS; i++ ) {
 431                 if ( !(uvldbEntry.serverFlags[i] & VLSF_UUID) ) {
 432                     serverFlags[j] = uvldbEntry.serverFlags[i];
 433                     serverNumber[j] = uvldbEntry.serverNumber[i].time_low;
 434                     j++;
 435                 } else {
 436                     afs_uint32 * addrp, nentries, code, unique;
 437                     bulkaddrs  addrs;
 438                     ListAddrByAttributes attrs;
 439                     afsUUID uuid;
 440
 441                     memset(&attrs, 0, sizeof(attrs));
 442                     attrs.Mask = VLADDR_UUID;
 443                     attrs.uuid = uvldbEntry.serverNumber[i];
 444                     memset(&uuid, 0, sizeof(uuid));
 445                     memset(&addrs, 0, sizeof(addrs));
 446
 447                     do {
 448                         code = cm_ConnByMServers(cellp->vlServersp, FALSE, userp, reqp, &connp);
 449                         if (code)
 450                             continue;
 451
 452                         rxconnp = cm_GetRxConn(connp);
 453                         code = VL_GetAddrsU(rxconnp, &attrs, &uuid, &unique, &nentries, &addrs);
 454                         rx_PutConnection(rxconnp);
 455                     } while (cm_Analyze(connp, userp, reqp, NULL, cellp, 0, NULL, NULL, &cellp->vlServersp, NULL, code));
 456
 457                     if ( code ) {
 458                         code = cm_MapVLRPCError(code, reqp);
 459                         osi_Log2(afsd_logp, "CALL VL_GetAddrsU serverNumber %u FAILURE, code 0x%x",
 460                                  i, code);
 461                         continue;
 462                     }
 463                     osi_Log1(afsd_logp, "CALL VL_GetAddrsU serverNumber %u SUCCESS", i);
 464
 465                     addrp = addrs.bulkaddrs_val;
 466                     for (k = 0; k < nentries && j < NMAXNSERVERS; j++, k++) {
 467                         serverFlags[j] = uvldbEntry.serverFlags[i];
 468                         serverNumber[j] = addrp[k];
 469                         serverUUID[j] = uuid;
 470                     }
 471
 472                     xdr_free((xdrproc_t) xdr_bulkaddrs, &addrs);
 473
 474                     if (nentries == 0)
 475                         code = CM_ERROR_INVAL;
 476                 }
 477             }
 478             nServers = j;                                       /* update the server count */
 479             strncpy(name, uvldbEntry.name, VL_MAXNAMELEN);
 480             name[VL_MAXNAMELEN - 1] = '\0';
 481             break;
 482         }
 483
 484         /* decode the response */
 485         lock_ObtainWrite(&cm_volumeLock);
 486         if (!cm_VolNameIsID(volp->namep)) {
 487             size_t    len;
 488
 489             len = strlen(name);
 490
 491             if (len >= 8 && strcmp(name + len - 7, ".backup") == 0) {
 492                 name[len - 7] = '\0';
 493             } else if (len >= 10 && strcmp(name + len - 9, ".readonly") == 0) {
 494                 name[len - 9] = '\0';
 495             }
 496
 497             osi_Log2(afsd_logp, "cm_UpdateVolume name %s -> %s",
 498                      osi_LogSaveString(afsd_logp,volp->namep), osi_LogSaveString(afsd_logp,name));
 499
 500             if (volp->qflags & CM_VOLUME_QFLAG_IN_HASH)
 501                 cm_RemoveVolumeFromNameHashTable(volp);
 502
 503             strcpy(volp->namep, name);
 504
 505             cm_AddVolumeToNameHashTable(volp);
 506         }
 507
 508         if (flags & VLF_DFSFILESET) {
 509             _InterlockedOr(&volp->flags, CM_VOLUMEFLAG_DFS_VOLUME);
 510             osi_Log1(afsd_logp, "cm_UpdateVolume Volume Group '%s' is a DFS File Set.  Correct behavior is not implemented.",
 511                      osi_LogSaveString(afsd_logp, volp->namep));
 512         }
 513
 514         if (flags & VLF_RWEXISTS) {
 515             if (volp->vol[RWVOL].ID != rwID) {
 516                 if (volp->vol[RWVOL].qflags & CM_VOLUME_QFLAG_IN_HASH)
 517                     cm_RemoveVolumeFromIDHashTable(volp, RWVOL);
 518                 volp->vol[RWVOL].ID = rwID;
 519                 cm_AddVolumeToIDHashTable(volp, RWVOL);
 520             }
 521         } else {
 522             if (volp->vol[RWVOL].qflags & CM_VOLUME_QFLAG_IN_HASH)
 523                 cm_RemoveVolumeFromIDHashTable(volp, RWVOL);
 524             volp->vol[RWVOL].ID = 0;
 525         }
 526         if (flags & VLF_ROEXISTS) {
 527             if (volp->vol[ROVOL].ID != roID) {
 528                 if (volp->vol[ROVOL].qflags & CM_VOLUME_QFLAG_IN_HASH)
 529                     cm_RemoveVolumeFromIDHashTable(volp, ROVOL);
 530                 volp->vol[ROVOL].ID = roID;
 531                 cm_AddVolumeToIDHashTable(volp, ROVOL);
 532             }
 533         } else {
 534             if (volp->vol[ROVOL].qflags & CM_VOLUME_QFLAG_IN_HASH)
 535                 cm_RemoveVolumeFromIDHashTable(volp, ROVOL);
 536             volp->vol[ROVOL].ID = 0;
 537         }
 538         if (flags & VLF_BACKEXISTS) {
 539             if (volp->vol[BACKVOL].ID != bkID) {
 540                 if (volp->vol[BACKVOL].qflags & CM_VOLUME_QFLAG_IN_HASH)
 541                     cm_RemoveVolumeFromIDHashTable(volp, BACKVOL);
 542                 volp->vol[BACKVOL].ID = bkID;
 543                 cm_AddVolumeToIDHashTable(volp, BACKVOL);
 544             }
 545         } else {
 546             if (volp->vol[BACKVOL].qflags & CM_VOLUME_QFLAG_IN_HASH)
 547                 cm_RemoveVolumeFromIDHashTable(volp, BACKVOL);
 548             volp->vol[BACKVOL].ID = 0;
 549         }
 550         lock_ReleaseWrite(&cm_volumeLock);
 551
 552         /* See if the replica sites are mixed versions */
 553         for (i=0; i<nServers; i++) {
 554             if (serverFlags[i] & VLSF_NEWREPSITE) {
 555                 isMixed = 1;
 556                 break;
 557             }
 558         }
 559
 560         for (i=0; i<nServers; i++) {
 561             /* create a server entry */
 562             tflags = serverFlags[i];
 563             if (tflags & VLSF_DONTUSE)
 564                 continue;
 565             tsockAddr.sin_port = htons(7000);
 566             tsockAddr.sin_family = AF_INET;
 567             tempAddr = htonl(serverNumber[i]);
 568             tsockAddr.sin_addr.s_addr = tempAddr;
 569             tsp = cm_FindServer(&tsockAddr, CM_SERVER_FILE, FALSE);
 570             if (tsp && (method == 2) && (tsp->flags & CM_SERVERFLAG_UUID)) {
 571                 /*
 572                  * Check to see if the uuid of the server we know at this address
 573                  * matches the uuid of the server we are being told about by the
 574                  * vlserver.  If not, ...?
 575                  */
 576                 if (!afs_uuid_equal(&serverUUID[i], &tsp->uuid)) {
 577                     char uuid1[128], uuid2[128];
 578                     char hoststr[16];
 579
 580                     afsUUID_to_string(&serverUUID[i], uuid1, sizeof(uuid1));
 581                     afsUUID_to_string(&tsp->uuid, uuid2, sizeof(uuid2));
 582                     afs_inet_ntoa_r(serverNumber[i], hoststr);
 583
 584                     osi_Log3(afsd_logp, "cm_UpdateVolumeLocation UUIDs do not match! %s != %s (%s)",
 585                               osi_LogSaveString(afsd_logp, uuid1),
 586                               osi_LogSaveString(afsd_logp, uuid2),
 587                               osi_LogSaveString(afsd_logp, hoststr));
 588                 }
 589             }
 590             if (!tsp) {
 591                 /*
 592                  * cm_NewServer will probe the file server which in turn will
 593                  * update the state on the volume group object.  Do not probe
 594                  * in this thread.  It will block the thread and can result in
 595                  * a recursive call to cm_UpdateVolumeLocation().
 596                  */
 597                 lock_ReleaseWrite(&volp->rw);
 598                 tsp = cm_NewServer(&tsockAddr, CM_SERVER_FILE, cellp, &serverUUID[i], CM_FLAG_NOPROBE);
 599                 lock_ObtainWrite(&volp->rw);
 600             }
 601             osi_assertx(tsp != NULL, "null cm_server_t");
 602
 603             /*
 604              * if this server was created by fs setserverprefs
 605              * then it won't have either a cell assignment or
 606              * a server uuid.
 607              */
 608             if ( !tsp->cellp )
 609                 tsp->cellp = cellp;
 610             if ( (method == 2) && !(tsp->flags & CM_SERVERFLAG_UUID) &&
 611                  !afs_uuid_is_nil(&serverUUID[i])) {
 612                 tsp->uuid = serverUUID[i];
 613                 _InterlockedOr(&tsp->flags, CM_SERVERFLAG_UUID);
 614             }
 615
 616             /* and add it to the list(s). */
 617             /*
 618              * Each call to cm_NewServerRef() increments the
 619              * ref count of tsp.  These reference will be dropped,
 620              * if and when the volume is reset; see reset code
 621              * earlier in this function.
 622              */
 623             if ((tflags & VLSF_RWVOL) && (flags & VLF_RWEXISTS)) {
 624                 tsrp = cm_NewServerRef(tsp, rwID);
 625                 cm_InsertServerList(&volp->vol[RWVOL].serversp, tsrp);
 626                 if (!(tsp->flags & CM_SERVERFLAG_DOWN))
 627                     rwServers_alldown = 0;
 628             }
 629             /*
 630              * If there are mixed versions of RO releases on the replica
 631              * sites, skip the servers with the out of date versions.
 632              */
 633             if ((tflags & VLSF_ROVOL) && (flags & VLF_ROEXISTS) &&
 634                 (!isMixed || (tflags & VLSF_NEWREPSITE))) {
 635                 tsrp = cm_NewServerRef(tsp, roID);
 636                 cm_InsertServerList(&volp->vol[ROVOL].serversp, tsrp);
 637                 ROcount++;
 638
 639                 if (!(tsp->flags & CM_SERVERFLAG_DOWN))
 640                     roServers_alldown = 0;
 641             }
 642             /* We don't use VLSF_BACKVOL !?! */
 643             /* Because only the backup on the server holding the RW
 644              * volume can be valid.  This check prevents errors if a
 645              * RW is moved but the old backup is not removed.
 646              */
 647             if ((tflags & VLSF_RWVOL) && (flags & VLF_BACKEXISTS)) {
 648                 tsrp = cm_NewServerRef(tsp, bkID);
 649                 cm_InsertServerList(&volp->vol[BACKVOL].serversp, tsrp);
 650
 651                 if (!(tsp->flags & CM_SERVERFLAG_DOWN))
 652                     bkServers_alldown = 0;
 653             }
 654             /* Drop the reference obtained by cm_FindServer() */
 655             cm_PutServer(tsp);
 656         }
 657
 658         /*
 659          * Randomize RO list
 660          *
 661          * If the first n servers have the same rank, then we
 662          * randomly pick one among them and move it to the beginning.
 663          * We don't bother to re-order the whole list because
 664          * the rest of the list is used only if the first server is
 665          * down.  We only do this for the RO list; we assume the other
 666          * lists are length 1.
 667          */
 668         if (ROcount > 1) {
 669             cm_RandomizeServer(&volp->vol[ROVOL].serversp);
 670             _InterlockedOr(&volp->vol[ROVOL].flags, CM_VOL_STATE_FLAG_REPLICATED);
 671         }
 672         else {
 673             _InterlockedAnd(&volp->vol[ROVOL].flags, ~CM_VOL_STATE_FLAG_REPLICATED);
 674         }
 675
 676         rwNewstate = rwServers_alldown ? vl_alldown : vl_online;
 677         roNewstate = roServers_alldown ? vl_alldown : vl_online;
 678         bkNewstate = bkServers_alldown ? vl_alldown : vl_online;
 679
 680         _InterlockedAnd(&volp->flags, ~CM_VOLUMEFLAG_NOEXIST);
 681     } else if (code == CM_ERROR_NOSUCHVOLUME || code == VL_NOENT || code == VL_BADNAME) {
 682         _InterlockedOr(&volp->flags, CM_VOLUMEFLAG_NOEXIST);
 683     } else {
 684         rwNewstate = roNewstate = bkNewstate = vl_alldown;
 685
 686         /*
 687          * we are updating lastUpdateTime but didn't get an answer
 688          * so clear the no exist flag.
 689          */
 690         _InterlockedAnd(&volp->flags, ~CM_VOLUMEFLAG_NOEXIST);
 691     }
 692
 693     if (volp->vol[RWVOL].state != rwNewstate) {
 694         if (volp->vol[RWVOL].ID)
 695             cm_VolumeStatusNotification(volp, volp->vol[RWVOL].ID, volp->vol[RWVOL].state, rwNewstate);
 696         volp->vol[RWVOL].state = rwNewstate;
 697     }
 698     if (volp->vol[ROVOL].state != roNewstate) {
 699         if (volp->vol[ROVOL].ID)
 700             cm_VolumeStatusNotification(volp, volp->vol[ROVOL].ID, volp->vol[ROVOL].state, roNewstate);
 701         volp->vol[ROVOL].state = roNewstate;
 702     }
 703     if (volp->vol[BACKVOL].state != bkNewstate) {
 704         if (volp->vol[BACKVOL].ID)
 705             cm_VolumeStatusNotification(volp, volp->vol[BACKVOL].ID, volp->vol[BACKVOL].state, bkNewstate);
 706         volp->vol[BACKVOL].state = bkNewstate;
 707     }
 708
 709     volp->lastUpdateTime = time(NULL);
 710     if (isMixed)
 711         _InterlockedOr(&volp->flags, CM_VOLUMEFLAG_RO_MIXED);
 712     else
 713         _InterlockedAnd(&volp->flags, ~CM_VOLUMEFLAG_RO_MIXED);
 714
 715     if (code == 0)
 716         _InterlockedAnd(&volp->flags, ~CM_VOLUMEFLAG_RESET);
 717
 718     _InterlockedAnd(&volp->flags, ~CM_VOLUMEFLAG_UPDATING_VL);
 719     osi_Log4(afsd_logp, "cm_UpdateVolumeLocation done, waking others name %s:%s flags 0x%x code 0x%x",
 720              osi_LogSaveString(afsd_logp,volp->cellp->name),
 721              osi_LogSaveString(afsd_logp,volp->namep), volp->flags, code);
 722     osi_Wakeup((LONG_PTR) &volp->flags);
 723
 724     return code;
 725 }
 726
 727 /* Requires read or write lock on cm_volumeLock */
 728 void cm_GetVolume(cm_volume_t *volp)
 729 {
 730     InterlockedIncrement(&volp->refCount);
 731 }
 732
 733 cm_volume_t *cm_GetVolumeByFID(cm_fid_t *fidp)
 734 {
 735     cm_volume_t *volp;
 736     afs_uint32 hash;
 737
 738     lock_ObtainRead(&cm_volumeLock);
 739     hash = CM_VOLUME_ID_HASH(fidp->volume);
 740     /* The volumeID can be any one of the three types.  So we must
 741      * search the hash table for all three types until we find it.
 742      * We will search in the order of RO, RW, BK.
 743      */
 744     for ( volp = cm_data.volumeROIDHashTablep[hash]; volp; volp = volp->vol[ROVOL].nextp) {
 745         if ( fidp->cell == volp->cellp->cellID && fidp->volume == volp->vol[ROVOL].ID )
 746             break;
 747     }
 748     if (!volp) {
 749         /* try RW volumes */
 750         for ( volp = cm_data.volumeRWIDHashTablep[hash]; volp; volp = volp->vol[RWVOL].nextp) {
 751             if ( fidp->cell == volp->cellp->cellID && fidp->volume == volp->vol[RWVOL].ID )
 752                 break;
 753         }
 754     }
 755     if (!volp) {
 756         /* try BK volumes */
 757         for ( volp = cm_data.volumeBKIDHashTablep[hash]; volp; volp = volp->vol[BACKVOL].nextp) {
 758             if ( fidp->cell == volp->cellp->cellID && fidp->volume == volp->vol[BACKVOL].ID )
 759                 break;
 760         }
 761     }
 762
 763     /* hold the volume if we found it */
 764     if (volp)
 765         cm_GetVolume(volp);
 766
 767     lock_ReleaseRead(&cm_volumeLock);
 768     return volp;
 769 }
 770
 771 long cm_FindVolumeByID(cm_cell_t *cellp, afs_uint32 volumeID, cm_user_t *userp,
 772                       cm_req_t *reqp, afs_uint32 flags, cm_volume_t **outVolpp)
 773 {
 774     cm_volume_t *volp;
 775 #ifdef SEARCH_ALL_VOLUMES
 776     cm_volume_t *volp2;
 777 #endif
 778     char volNameString[VL_MAXNAMELEN];
 779     afs_uint32 hash;
 780     long code = 0;
 781
 782     lock_ObtainRead(&cm_volumeLock);
 783 #ifdef SEARCH_ALL_VOLUMES
 784     for(volp = cm_data.allVolumesp; volp; volp=volp->allNextp) {
 785         if (cellp == volp->cellp &&
 786              ((unsigned) volumeID == volp->vol[RWVOL].ID ||
 787                (unsigned) volumeID == volp->vol[ROVOL].ID ||
 788                (unsigned) volumeID == volp->vol[BACKVOL].ID))
 789             break;
 790     }
 791
 792     volp2 = volp;
 793 #endif /* SEARCH_ALL_VOLUMES */
 794
 795     hash = CM_VOLUME_ID_HASH(volumeID);
 796     /* The volumeID can be any one of the three types.  So we must
 797      * search the hash table for all three types until we find it.
 798      * We will search in the order of RO, RW, BK.
 799      */
 800     for ( volp = cm_data.volumeROIDHashTablep[hash]; volp; volp = volp->vol[ROVOL].nextp) {
 801         if ( cellp == volp->cellp && volumeID == volp->vol[ROVOL].ID )
 802             break;
 803     }
 804     if (!volp) {
 805         /* try RW volumes */
 806         for ( volp = cm_data.volumeRWIDHashTablep[hash]; volp; volp = volp->vol[RWVOL].nextp) {
 807             if ( cellp == volp->cellp && volumeID == volp->vol[RWVOL].ID )
 808                 break;
 809         }
 810     }
 811     if (!volp) {
 812         /* try BK volumes */
 813         for ( volp = cm_data.volumeBKIDHashTablep[hash]; volp; volp = volp->vol[BACKVOL].nextp) {
 814             if ( cellp == volp->cellp && volumeID == volp->vol[BACKVOL].ID )
 815                 break;
 816         }
 817     }
 818
 819 #ifdef SEARCH_ALL_VOLUMES
 820     osi_assertx(volp == volp2, "unexpected cm_vol_t");
 821 #endif
 822
 823     /* hold the volume if we found it */
 824     if (volp)
 825         cm_GetVolume(volp);
 826
 827     lock_ReleaseRead(&cm_volumeLock);
 828
 829     /* return it held */
 830     if (volp) {
 831         lock_ObtainWrite(&volp->rw);
 832
 833         code = 0;
 834         if ((volp->flags & CM_VOLUMEFLAG_RESET) && !(flags & CM_GETVOL_FLAG_NO_RESET)) {
 835             code = cm_UpdateVolumeLocation(cellp, userp, reqp, volp);
 836         }
 837         lock_ReleaseWrite(&volp->rw);
 838         if (code == 0) {
 839             *outVolpp = volp;
 840
 841             if (!(flags & CM_GETVOL_FLAG_NO_LRU_UPDATE)) {
 842                 lock_ObtainWrite(&cm_volumeLock);
 843                 cm_AdjustVolumeLRU(volp);
 844                 lock_ReleaseWrite(&cm_volumeLock);
 845             }
 846         } else {
 847             lock_ObtainRead(&cm_volumeLock);
 848             cm_PutVolume(volp);
 849             lock_ReleaseRead(&cm_volumeLock);
 850         }
 851         return code;
 852     }
 853
 854     /* otherwise, we didn't find it so consult the VLDB */
 855     sprintf(volNameString, "%u", volumeID);
 856     code = cm_FindVolumeByName(cellp, volNameString, userp, reqp,
 857                               flags | CM_GETVOL_FLAG_IGNORE_LINKED_CELL, outVolpp);
 858
 859     if (code == CM_ERROR_NOSUCHVOLUME && cellp->linkedName[0] &&
 860         !(flags & CM_GETVOL_FLAG_IGNORE_LINKED_CELL)) {
 861         cm_cell_t *linkedCellp = cm_GetCell(cellp->linkedName, flags);
 862
 863         if (linkedCellp)
 864             code = cm_FindVolumeByID(linkedCellp, volumeID, userp, reqp,
 865                                      flags | CM_GETVOL_FLAG_IGNORE_LINKED_CELL,
 866                                      outVolpp);
 867     }
 868     return code;
 869 }
 870
 871
 872 long cm_FindVolumeByName(struct cm_cell *cellp, char *volumeNamep,
 873                         struct cm_user *userp, struct cm_req *reqp,
 874                         afs_uint32 flags, cm_volume_t **outVolpp)
 875 {
 876     cm_volume_t *volp;
 877 #ifdef SEARCH_ALL_VOLUMES
 878     cm_volume_t *volp2;
 879 #endif
 880     long        code = 0;
 881     char        name[VL_MAXNAMELEN];
 882     size_t      len;
 883     int         type;
 884     afs_uint32  hash;
 885
 886     strncpy(name, volumeNamep, VL_MAXNAMELEN);
 887     name[VL_MAXNAMELEN-1] = '\0';
 888     len = strlen(name);
 889
 890     if (len >= 8 && strcmp(name + len - 7, ".backup") == 0) {
 891         type = BACKVOL;
 892         name[len - 7] = '\0';
 893     } else if (len >= 10 && strcmp(name + len - 9, ".readonly") == 0) {
 894         type = ROVOL;
 895         name[len - 9] = '\0';
 896     } else {
 897         type = RWVOL;
 898     }
 899
 900     lock_ObtainRead(&cm_volumeLock);
 901 #ifdef SEARCH_ALL_VOLUMES
 902     for (volp = cm_data.allVolumesp; volp; volp=volp->allNextp) {
 903         if (cellp == volp->cellp && strcmp(name, volp->namep) == 0) {
 904             break;
 905         }
 906     }
 907     volp2 = volp;
 908 #endif /* SEARCH_ALL_VOLUMES */
 909
 910     hash = CM_VOLUME_NAME_HASH(name);
 911     for (volp = cm_data.volumeNameHashTablep[hash]; volp; volp = volp->nameNextp) {
 912         if (cellp == volp->cellp && strcmp(name, volp->namep) == 0)
 913             break;
 914     }
 915
 916 #ifdef SEARCH_ALL_VOLUMES
 917     osi_assertx(volp2 == volp, "unexpected cm_vol_t");
 918 #endif
 919
 920     if (!volp && (flags & CM_GETVOL_FLAG_CREATE)) {
 921         afs_uint32 volType;
 922         /* otherwise, get from VLDB */
 923
 924         /*
 925          * Change to a write lock so that we have exclusive use of
 926          * the first cm_volume_t with a refCount of 0 so that we
 927          * have time to increment it.
 928          */
 929         lock_ConvertRToW(&cm_volumeLock);
 930
 931         /*
 932          * While the lock was converted it may have been dropped
 933          * Search again now that we are exclusive.
 934          */
 935         for (volp = cm_data.volumeNameHashTablep[hash]; volp; volp = volp->nameNextp) {
 936             if (cellp == volp->cellp && strcmp(name, volp->namep) == 0)
 937                 break;
 938         }
 939
 940         if (volp) {
 941             cm_GetVolume(volp);
 942             lock_ReleaseWrite(&cm_volumeLock);
 943             lock_ObtainWrite(&volp->rw);
 944         } else {
 945             if ( cm_data.currentVolumes >= cm_data.maxVolumes ) {
 946 #ifdef RECYCLE_FROM_ALL_VOLUMES_LIST
 947                 for (volp = cm_data.allVolumesp; volp; volp=volp->allNextp) {
 948                     if ( volp->refCount == 0 ) {
 949                         /* There is one we can re-use */
 950                         break;
 951                     }
 952                 }
 953 #else
 954                 for ( volp = cm_data.volumeLRULastp;
 955                       volp;
 956                       volp = (cm_volume_t *) osi_QPrev(&volp->q))
 957                 {
 958                     if ( volp->refCount == 0 ) {
 959                         /* There is one we can re-use */
 960                         break;
 961                     }
 962                 }
 963 #endif
 964                 if (!volp)
 965                     osi_panic("Exceeded Max Volumes", __FILE__, __LINE__);
 966
 967                 osi_Log2(afsd_logp, "Recycling Volume %s:%s",
 968                          volp->cellp->name, volp->namep);
 969
 970                 /* The volp is removed from the LRU queue in order to
 971                  * prevent two threads from attempting to recycle the
 972                  * same object.  This volp must be re-inserted back into
 973                  * the LRU queue before this function exits.
 974                  */
 975                 if (volp->qflags & CM_VOLUME_QFLAG_IN_LRU_QUEUE)
 976                     cm_RemoveVolumeFromLRU(volp);
 977                 if (volp->qflags & CM_VOLUME_QFLAG_IN_HASH)
 978                     cm_RemoveVolumeFromNameHashTable(volp);
 979
 980                 for ( volType = RWVOL; volType < NUM_VOL_TYPES; volType++) {
 981                     if (volp->vol[volType].qflags & CM_VOLUME_QFLAG_IN_HASH)
 982                         cm_RemoveVolumeFromIDHashTable(volp, volType);
 983                     if (volp->vol[volType].ID)
 984                         cm_VolumeStatusNotification(volp, volp->vol[volType].ID, volp->vol[volType].state, vl_unknown);
 985                     volp->vol[volType].ID = 0;
 986                     cm_SetFid(&volp->vol[volType].dotdotFid, 0, 0, 0, 0);
 987                 }
 988             } else {
 989                 volp = &cm_data.volumeBaseAddress[InterlockedIncrement(&cm_data.currentVolumes) - 1];
 990                 memset(volp, 0, sizeof(cm_volume_t));
 991                 volp->magic = CM_VOLUME_MAGIC;
 992                 volp->allNextp = cm_data.allVolumesp;
 993                 cm_data.allVolumesp = volp;
 994                 lock_InitializeRWLock(&volp->rw, "cm_volume_t rwlock", LOCK_HIERARCHY_VOLUME);
 995             }
 996             /*
 997              * no one else can find this object and we have not dropped
 998              * cm_volumeLock in any case.  The object is either new or
 999              * recycled.  Initialize its new values and put it into the
1000              * name hash table before dropping cm_volumeLock which makes
1001              * it visible to competing threads.
1002              */
1003             volp->cellp = cellp;
1004             strncpy(volp->namep, name, VL_MAXNAMELEN);
1005             volp->namep[VL_MAXNAMELEN-1] = '\0';
1006             volp->flags = CM_VOLUMEFLAG_RESET;
1007             volp->lastUpdateTime = 0;
1008
1009             for ( volType = RWVOL; volType < NUM_VOL_TYPES; volType++) {
1010                 volp->vol[volType].state = vl_unknown;
1011                 volp->vol[volType].nextp = NULL;
1012                 volp->vol[volType].flags = 0;
1013             }
1014             volp->cbExpiresRO = 0;
1015             volp->cbIssuedRO = 0;
1016             volp->cbServerpRO = NULL;
1017             volp->creationDateRO = 0;
1018             cm_AddVolumeToNameHashTable(volp);
1019             cm_GetVolume(volp);
1020             lock_ReleaseWrite(&cm_volumeLock);
1021             lock_ObtainWrite(&volp->rw);
1022             for ( volType = RWVOL; volType < NUM_VOL_TYPES; volType++) {
1023                 cm_FreeServerList(&volp->vol[volType].serversp, CM_FREESERVERLIST_DELETE);
1024             }
1025         }
1026     }
1027     else if (volp) {
1028         cm_GetVolume(volp);
1029         lock_ReleaseRead(&cm_volumeLock);
1030         lock_ObtainWrite(&volp->rw);
1031     } else {
1032         lock_ReleaseRead(&cm_volumeLock);
1033         return CM_ERROR_NOSUCHVOLUME;
1034     }
1035
1036     /* if we get here we are holding the mutex */
1037     if ((volp->flags & CM_VOLUMEFLAG_RESET) && !(flags & CM_GETVOL_FLAG_NO_RESET)) {
1038         code = cm_UpdateVolumeLocation(cellp, userp, reqp, volp);
1039     }
1040     lock_ReleaseWrite(&volp->rw);
1041
1042     if (code == 0 && (type == BACKVOL && volp->vol[BACKVOL].ID == 0 ||
1043                       type == ROVOL && volp->vol[ROVOL].ID == 0))
1044         code = CM_ERROR_NOSUCHVOLUME;
1045
1046     if (code == 0) {
1047         *outVolpp = volp;
1048
1049         lock_ObtainWrite(&cm_volumeLock);
1050         if (!(volp->qflags & CM_VOLUME_QFLAG_IN_LRU_QUEUE) ||
1051              (flags & CM_GETVOL_FLAG_NO_LRU_UPDATE))
1052             cm_AdjustVolumeLRU(volp);
1053         lock_ReleaseWrite(&cm_volumeLock);
1054     } else {
1055         /*
1056          * do not return it to the caller but do insert it in the LRU
1057          * otherwise it will be lost
1058          */
1059         lock_ObtainWrite(&cm_volumeLock);
1060         if (!(volp->qflags & CM_VOLUME_QFLAG_IN_LRU_QUEUE) ||
1061              (flags & CM_GETVOL_FLAG_NO_LRU_UPDATE))
1062             cm_AdjustVolumeLRU(volp);
1063         cm_PutVolume(volp);
1064         lock_ReleaseWrite(&cm_volumeLock);
1065     }
1066
1067     if (code == CM_ERROR_NOSUCHVOLUME && cellp->linkedName[0] &&
1068         !(flags & CM_GETVOL_FLAG_IGNORE_LINKED_CELL)) {
1069         cm_cell_t *linkedCellp = cm_GetCell(cellp->linkedName, flags);
1070
1071         if (linkedCellp)
1072             code = cm_FindVolumeByName(linkedCellp, volumeNamep, userp, reqp,
1073                                        flags | CM_GETVOL_FLAG_IGNORE_LINKED_CELL,
1074                                        outVolpp);
1075     }
1076     return code;
1077 }
1078
1079 /*
1080  * Only call this function in response to a VNOVOL or VMOVED error
1081  * from a file server.  Do not call it in response to CM_ERROR_NOSUCHVOLUME
1082  * as that can lead to recursive calls.
1083  */
1084 long cm_ForceUpdateVolume(cm_fid_t *fidp, cm_user_t *userp, cm_req_t *reqp)
1085 {
1086     cm_cell_t *cellp;
1087     cm_volume_t *volp;
1088 #ifdef SEARCH_ALL_VOLUMES
1089     cm_volume_t *volp2;
1090 #endif
1091     afs_uint32  hash;
1092     long code;
1093
1094     if (!fidp)
1095         return CM_ERROR_INVAL;
1096
1097     cellp = cm_FindCellByID(fidp->cell, 0);
1098     if (!cellp)
1099         return CM_ERROR_NOSUCHCELL;
1100
1101     /* search for the volume */
1102     lock_ObtainRead(&cm_volumeLock);
1103 #ifdef SEARCH_ALL_VOLUMES
1104     for(volp = cm_data.allVolumesp; volp; volp=volp->allNextp) {
1105         if (cellp == volp->cellp &&
1106              (fidp->volume == volp->vol[RWVOL].ID ||
1107                fidp->volume == volp->vol[ROVOL].ID ||
1108                fidp->volume == volp->vol[BACKVOL].ID))
1109             break;
1110     }
1111 #endif /* SEARCH_ALL_VOLUMES */
1112
1113     hash = CM_VOLUME_ID_HASH(fidp->volume);
1114     /* The volumeID can be any one of the three types.  So we must
1115      * search the hash table for all three types until we find it.
1116      * We will search in the order of RO, RW, BK.
1117      */
1118     for ( volp = cm_data.volumeROIDHashTablep[hash]; volp; volp = volp->vol[ROVOL].nextp) {
1119         if ( cellp == volp->cellp && fidp->volume == volp->vol[ROVOL].ID )
1120             break;
1121     }
1122     if (!volp) {
1123         /* try RW volumes */
1124         for ( volp = cm_data.volumeRWIDHashTablep[hash]; volp; volp = volp->vol[RWVOL].nextp) {
1125             if ( cellp == volp->cellp && fidp->volume == volp->vol[RWVOL].ID )
1126                 break;
1127         }
1128     }
1129     if (!volp) {
1130         /* try BK volumes */
1131         for ( volp = cm_data.volumeBKIDHashTablep[hash]; volp; volp = volp->vol[BACKVOL].nextp) {
1132             if ( cellp == volp->cellp && fidp->volume == volp->vol[BACKVOL].ID )
1133                 break;
1134         }
1135     }
1136
1137 #ifdef SEARCH_ALL_VOLUMES
1138     osi_assertx(volp == volp2, "unexpected cm_vol_t");
1139 #endif
1140     /* hold the volume if we found it */
1141     if (volp)
1142         cm_GetVolume(volp);
1143
1144     lock_ReleaseRead(&cm_volumeLock);
1145
1146     if (!volp)
1147         return CM_ERROR_NOSUCHVOLUME;
1148
1149     /* update it */
1150     cm_data.mountRootGen = time(NULL);
1151     lock_ObtainWrite(&volp->rw);
1152     _InterlockedOr(&volp->flags, CM_VOLUMEFLAG_RESET);
1153     volp->lastUpdateTime = 0;
1154
1155     code = cm_UpdateVolumeLocation(cellp, userp, reqp, volp);
1156     lock_ReleaseWrite(&volp->rw);
1157
1158     lock_ObtainRead(&cm_volumeLock);
1159     cm_PutVolume(volp);
1160     lock_ReleaseRead(&cm_volumeLock);
1161
1162     return code;
1163 }
1164
1165 /* find the appropriate servers from a volume */
1166 cm_serverRef_t **cm_GetVolServers(cm_volume_t *volp, afs_uint32 volid, cm_user_t *userp, cm_req_t *reqp, afs_uint32 *replicated)
1167 {
1168     cm_serverRef_t **serverspp;
1169     cm_serverRef_t *current;
1170     int firstTry = 1;
1171     cm_vol_state_t *volstatep = NULL;
1172
1173   start:
1174     volstatep = cm_VolumeStateByID(volp, volid);
1175
1176     lock_ObtainWrite(&cm_serverLock);
1177     if (volstatep) {
1178         if (replicated)
1179             *replicated = (volstatep->flags & CM_VOL_STATE_FLAG_REPLICATED);
1180         serverspp = &volstatep->serversp;
1181     } else {
1182         lock_ReleaseWrite(&cm_serverLock);
1183         if (firstTry) {
1184             afs_int32 code;
1185             firstTry = 0;
1186             lock_ObtainWrite(&volp->rw);
1187             _InterlockedOr(&volp->flags, CM_VOLUMEFLAG_RESET);
1188             volp->lastUpdateTime = 0;
1189             code = cm_UpdateVolumeLocation(volp->cellp, userp, reqp, volp);
1190             lock_ReleaseWrite(&volp->rw);
1191             if (code == 0)
1192                 goto start;
1193         }
1194         return NULL;
1195     }
1196
1197     /*
1198      * Increment the refCount on deleted items as well.
1199      * They will be freed by cm_FreeServerList when they get to zero
1200      */
1201     for (current = *serverspp; current; current = current->next)
1202         cm_GetServerRef(current, TRUE);
1203
1204     lock_ReleaseWrite(&cm_serverLock);
1205
1206     return serverspp;
1207 }
1208
1209 void cm_PutVolume(cm_volume_t *volp)
1210 {
1211     afs_int32 refCount = InterlockedDecrement(&volp->refCount);
1212     osi_assertx(refCount >= 0, "cm_volume_t refCount underflow has occurred");
1213 }
1214
1215 /* return the read-only volume, if there is one, or the read-write volume if
1216  * not.
1217  */
1218 long cm_GetROVolumeID(cm_volume_t *volp)
1219 {
1220     long id;
1221
1222     lock_ObtainRead(&volp->rw);
1223     if (volp->vol[ROVOL].ID && !cm_IsServerListEmpty(volp->vol[ROVOL].serversp))
1224         id = volp->vol[ROVOL].ID;
1225     else
1226         id = volp->vol[RWVOL].ID;
1227     lock_ReleaseRead(&volp->rw);
1228
1229     return id;
1230 }
1231
1232 void cm_RefreshVolumes(int lifetime)
1233 {
1234     cm_volume_t *volp;
1235     afs_int32 refCount;
1236     time_t now;
1237
1238     now = time(NULL);
1239
1240     /* force mount point target updates */
1241     if (cm_data.mountRootGen + lifetime <= now)
1242         cm_data.mountRootGen = now;
1243
1244     /*
1245      * force a re-loading of volume data from the vldb
1246      * if the lifetime for the cached data has expired
1247      */
1248     lock_ObtainRead(&cm_volumeLock);
1249     for (volp = cm_data.allVolumesp; volp; volp=volp->allNextp) {
1250         cm_GetVolume(volp);
1251         lock_ReleaseRead(&cm_volumeLock);
1252
1253         if (!(volp->flags & CM_VOLUMEFLAG_RESET) ||
1254             (volp->flags & CM_VOLUMEFLAG_NOEXIST)) {
1255             lock_ObtainWrite(&volp->rw);
1256             if (volp->flags & CM_VOLUMEFLAG_NOEXIST) {
1257                 _InterlockedAnd(&volp->flags, ~CM_VOLUMEFLAG_NOEXIST);
1258             }
1259
1260             if (volp->flags & CM_VOLUMEFLAG_RO_MIXED) {
1261                 if (volp->lastUpdateTime + 300 <= now) {
1262                     _InterlockedOr(&volp->flags, CM_VOLUMEFLAG_RESET);
1263                     volp->lastUpdateTime = 0;
1264                 }
1265             } else {
1266                 if (volp->lastUpdateTime + lifetime <= now) {
1267                     _InterlockedOr(&volp->flags, CM_VOLUMEFLAG_RESET);
1268                     volp->lastUpdateTime = 0;
1269                 }
1270             }
1271             lock_ReleaseWrite(&volp->rw);
1272         }
1273
1274         lock_ObtainRead(&cm_volumeLock);
1275         cm_PutVolume(volp);
1276     }
1277     lock_ReleaseRead(&cm_volumeLock);
1278 }
1279
1280 void
1281 cm_CheckOfflineVolumeState(cm_volume_t *volp, cm_vol_state_t *statep, afs_uint32 volID,
1282                            afs_uint32 *onlinep, afs_uint32 *volumeUpdatedp)
1283 {
1284     cm_conn_t *connp;
1285     long code;
1286     AFSFetchVolumeStatus volStat;
1287     char *Name;
1288     char *OfflineMsg;
1289     char *MOTD;
1290     cm_req_t req;
1291     struct rx_connection * rxconnp;
1292     char volName[32];
1293     afs_uint32 volType;
1294     char offLineMsg[256];
1295     char motd[256];
1296     long alldown, alldeleted;
1297     cm_serverRef_t *serversp;
1298     cm_fid_t vfid;
1299     cm_scache_t *vscp = NULL;
1300
1301     Name = volName;
1302     OfflineMsg = offLineMsg;
1303     MOTD = motd;
1304
1305     volType = cm_VolumeType(volp, volID);
1306
1307     if (statep->ID != 0 && (!volID || volID == statep->ID)) {
1308         /* create fid for volume root so that VNOVOL and VMOVED errors can be processed */
1309         cm_SetFid(&vfid, volp->cellp->cellID, statep->ID, 1, 1);
1310
1311         if (!statep->serversp && !(*volumeUpdatedp)) {
1312             cm_InitReq(&req);
1313             code = cm_UpdateVolumeLocation(volp->cellp, cm_rootUserp, &req, volp);
1314             *volumeUpdatedp = 1;
1315         }
1316
1317         lock_ObtainRead(&cm_serverLock);
1318         if (statep->serversp) {
1319             alldown = 1;
1320             alldeleted = 1;
1321             for (serversp = statep->serversp; serversp; serversp = serversp->next) {
1322                 if (serversp->status == srv_deleted)
1323                     continue;
1324
1325                 alldeleted = 0;
1326
1327                 if (!(serversp->server->flags & CM_SERVERFLAG_DOWN))
1328                     alldown = 0;
1329
1330                 if (serversp->status == srv_busy || serversp->status == srv_offline)
1331                     serversp->status = srv_not_busy;
1332             }
1333             lock_ReleaseRead(&cm_serverLock);
1334
1335             if (alldeleted && !(*volumeUpdatedp)) {
1336                 cm_InitReq(&req);
1337                 code = cm_UpdateVolumeLocation(volp->cellp, cm_rootUserp, &req, volp);
1338                 *volumeUpdatedp = 1;
1339             }
1340
1341             if (statep->state == vl_busy || statep->state == vl_offline || statep->state == vl_unknown ||
1342                 (!alldown && statep->state == vl_alldown)) {
1343                 cm_InitReq(&req);
1344                 req.flags |= CM_REQ_OFFLINE_VOL_CHK;
1345                 lock_ReleaseWrite(&volp->rw);
1346
1347                 code = cm_GetSCache(&vfid, NULL, &vscp, cm_rootUserp, &req);
1348                 if (code = 0) {
1349                     lock_ObtainWrite(&vscp->rw);
1350                     code = cm_SyncOp(vscp, NULL, cm_rootUserp, &req, PRSFS_READ,
1351                                      CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
1352                     lock_ReleaseWrite(&vscp->rw);
1353                     if (code == 0) {
1354                         do {
1355                             code = cm_ConnFromVolume(volp, statep->ID, cm_rootUserp, &req, &connp);
1356                             if (code)
1357                                 continue;
1358
1359                             rxconnp = cm_GetRxConn(connp);
1360                             code = RXAFS_GetVolumeStatus(rxconnp, statep->ID,
1361                                                          &volStat, &Name, &OfflineMsg, &MOTD);
1362                             rx_PutConnection(rxconnp);
1363                         } while (cm_Analyze(connp, cm_rootUserp, &req, &vfid, NULL, 0, NULL, NULL, NULL, NULL, code));
1364                         code = cm_MapRPCError(code, &req);
1365
1366                         if (code == 0 && volType == ROVOL)
1367                         {
1368
1369                             lock_ObtainWrite(&volp->rw);
1370                             volp->volumeSizeRO = volStat.BlocksInUse * 1024;
1371                             _InterlockedOr(&volp->flags, CM_VOLUMEFLAG_RO_SIZE_VALID);
1372                             lock_ReleaseWrite(&volp->rw);
1373                         }
1374                     }
1375
1376                     lock_ObtainWrite(&vscp->rw);
1377                     cm_SyncOpDone(vscp, NULL, CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
1378                     lock_ReleaseWrite(&vscp->rw);
1379                     cm_ReleaseSCache(vscp);
1380                 }
1381                 lock_ObtainWrite(&volp->rw);
1382                 if (code == 0 && volStat.Online) {
1383                     cm_VolumeStatusNotification(volp, statep->ID, statep->state, vl_online);
1384                     statep->state = vl_online;
1385                     *onlinep = 1;
1386                 } else if (code == CM_ERROR_NOACCESS) {
1387                     cm_VolumeStatusNotification(volp, statep->ID, statep->state, vl_unknown);
1388                     statep->state = vl_unknown;
1389                     *onlinep = 1;
1390                 }
1391             } else if (alldown && statep->state != vl_alldown) {
1392                 cm_VolumeStatusNotification(volp, statep->ID, statep->state, vl_alldown);
1393                 statep->state = vl_alldown;
1394             }
1395         } else {
1396             lock_ReleaseRead(&cm_serverLock);
1397             if (statep->state != vl_alldown) {
1398                 cm_VolumeStatusNotification(volp, statep->ID, statep->state, vl_alldown);
1399                 statep->state = vl_alldown;
1400             }
1401         }
1402     }
1403 }
1404
1405 /* The return code is 0 if the volume is not online and
1406  * 1 if the volume is online
1407  */
1408 long
1409 cm_CheckOfflineVolume(cm_volume_t *volp, afs_uint32 volID)
1410 {
1411     long code;
1412     cm_req_t req;
1413     afs_uint32 online = 0;
1414     afs_uint32 volumeUpdated = 0;
1415
1416     lock_ObtainWrite(&volp->rw);
1417
1418     if (volp->flags & CM_VOLUMEFLAG_RESET) {
1419         cm_InitReq(&req);
1420         code = cm_UpdateVolumeLocation(volp->cellp, cm_rootUserp, &req, volp);
1421         volumeUpdated = 1;
1422     }
1423
1424     cm_CheckOfflineVolumeState(volp, &volp->vol[RWVOL], volID, &online, &volumeUpdated);
1425     cm_CheckOfflineVolumeState(volp, &volp->vol[ROVOL], volID, &online, &volumeUpdated);
1426     cm_CheckOfflineVolumeState(volp, &volp->vol[BACKVOL], volID, &online, &volumeUpdated);
1427
1428     lock_ReleaseWrite(&volp->rw);
1429     return online;
1430 }
1431
1432
1433 /*
1434  * called from the Daemon thread.
1435  * when checking the offline status, check those of the most recently used volumes first.
1436  */
1437 void cm_CheckOfflineVolumes(void)
1438 {
1439     cm_volume_t *volp;
1440     afs_int32 refCount;
1441     extern int daemon_ShutdownFlag;
1442     extern int powerStateSuspended;
1443
1444     lock_ObtainRead(&cm_volumeLock);
1445     for (volp = cm_data.volumeLRULastp;
1446          volp && !daemon_ShutdownFlag && !powerStateSuspended;
1447          volp=(cm_volume_t *) osi_QPrev(&volp->q)) {
1448         /*
1449          * Skip volume entries that did not exist last time
1450          * the vldb was queried.  For those entries wait until
1451          * the next actual request is received for the volume
1452          * before checking its state.
1453          */
1454         if ((volp->qflags & CM_VOLUME_QFLAG_IN_HASH) &&
1455             !(volp->flags & CM_VOLUMEFLAG_NOEXIST)) {
1456             cm_GetVolume(volp);
1457             lock_ReleaseRead(&cm_volumeLock);
1458             cm_CheckOfflineVolume(volp, 0);
1459             lock_ObtainRead(&cm_volumeLock);
1460             cm_PutVolume(volp);
1461         }
1462     }
1463     lock_ReleaseRead(&cm_volumeLock);
1464 }
1465
1466
1467 static void
1468 cm_UpdateVolumeStatusInt(cm_volume_t *volp, struct cm_vol_state *statep)
1469 {
1470     enum volstatus newStatus;
1471     cm_serverRef_t *tsrp;
1472     cm_server_t *tsp;
1473     int someBusy = 0, someOffline = 0, allOffline = 1, allBusy = 1, allDown = 1;
1474     char addr[16];
1475
1476     if (!volp || !statep) {
1477 #ifdef DEBUG
1478         DebugBreak();
1479 #endif
1480         return;
1481     }
1482
1483     lock_ObtainWrite(&cm_serverLock);
1484     for (tsrp = statep->serversp; tsrp; tsrp=tsrp->next) {
1485         tsp = tsrp->server;
1486         sprintf(addr, "%d.%d.%d.%d",
1487                  ((tsp->addr.sin_addr.s_addr & 0xff)),
1488                  ((tsp->addr.sin_addr.s_addr & 0xff00)>> 8),
1489                  ((tsp->addr.sin_addr.s_addr & 0xff0000)>> 16),
1490                  ((tsp->addr.sin_addr.s_addr & 0xff000000)>> 24));
1491
1492         if (tsrp->status == srv_deleted) {
1493             osi_Log2(afsd_logp, "cm_UpdateVolumeStatusInt volume %d server reference %s deleted",
1494                      statep->ID, osi_LogSaveString(afsd_logp,addr));
1495             continue;
1496         }
1497         if (tsp) {
1498             cm_GetServerNoLock(tsp);
1499             if (!(tsp->flags & CM_SERVERFLAG_DOWN)) {
1500                 allDown = 0;
1501                 if (tsrp->status == srv_busy) {
1502                     osi_Log2(afsd_logp, "cm_UpdateVolumeStatusInt volume %d server reference %s busy",
1503                               statep->ID, osi_LogSaveString(afsd_logp,addr));
1504                     allOffline = 0;
1505                     someBusy = 1;
1506                 } else if (tsrp->status == srv_offline) {
1507                     osi_Log2(afsd_logp, "cm_UpdateVolumeStatusInt volume %d server reference %s offline",
1508                               statep->ID, osi_LogSaveString(afsd_logp,addr));
1509                     allBusy = 0;
1510                     someOffline = 1;
1511                 } else {
1512                     osi_Log2(afsd_logp, "cm_UpdateVolumeStatusInt volume %d server reference %s online",
1513                               statep->ID, osi_LogSaveString(afsd_logp,addr));
1514                     allOffline = 0;
1515                     allBusy = 0;
1516                 }
1517             } else {
1518                 osi_Log2(afsd_logp, "cm_UpdateVolumeStatusInt volume %d server reference %s down",
1519                           statep->ID, osi_LogSaveString(afsd_logp,addr));
1520             }
1521             cm_PutServerNoLock(tsp);
1522         }
1523     }
1524     lock_ReleaseWrite(&cm_serverLock);
1525
1526     osi_Log5(afsd_logp, "cm_UpdateVolumeStatusInt allDown %d allBusy %d someBusy %d someOffline %d allOffline %d",
1527              allDown, allBusy, someBusy, someOffline, allOffline);
1528
1529     if (allDown)
1530         newStatus = vl_alldown;
1531     else if (allBusy || (someBusy && someOffline))
1532         newStatus = vl_busy;
1533     else if (allOffline)
1534         newStatus = vl_offline;
1535     else
1536         newStatus = vl_online;
1537
1538     if (statep->ID && statep->state != newStatus)
1539         cm_VolumeStatusNotification(volp, statep->ID, statep->state, newStatus);
1540
1541     statep->state = newStatus;
1542 }
1543
1544 void
1545 cm_UpdateVolumeStatus(cm_volume_t *volp, afs_uint32 volID)
1546 {
1547
1548     if (volp->vol[RWVOL].ID == volID) {
1549         cm_UpdateVolumeStatusInt(volp, &volp->vol[RWVOL]);
1550     } else if (volp->vol[ROVOL].ID == volID) {
1551         cm_UpdateVolumeStatusInt(volp, &volp->vol[ROVOL]);
1552     } else if (volp->vol[BACKVOL].ID == volID) {
1553         cm_UpdateVolumeStatusInt(volp, &volp->vol[BACKVOL]);
1554     } else {
1555         /*
1556          * If we are called with volID == 0 then something has gone wrong.
1557          * Most likely a race occurred in the server volume list maintenance.
1558          * Since we don't know which volume's status should be updated,
1559          * just update all of them that are known to exist.  Better to be
1560          * correct than fast.
1561          */
1562         afs_uint32 volType;
1563         for ( volType = RWVOL; volType < NUM_VOL_TYPES; volType++) {
1564             if (volp->vol[volType].ID != 0)
1565                 cm_UpdateVolumeStatusInt(volp, &volp->vol[volType]);
1566         }
1567     }
1568 }
1569
1570 /*
1571 ** Finds all volumes that reside on this server and reorders their
1572 ** RO list according to the changed rank of server.
1573 */
1574 void cm_ChangeRankVolume(cm_server_t *tsp)
1575 {
1576     int                 code;
1577     cm_volume_t*        volp;
1578     afs_int32 refCount;
1579
1580     /* find volumes which might have RO copy on server*/
1581     lock_ObtainRead(&cm_volumeLock);
1582     for(volp = cm_data.allVolumesp; volp; volp=volp->allNextp)
1583     {
1584         code = 1 ;      /* assume that list is unchanged */
1585         cm_GetVolume(volp);
1586         lock_ReleaseRead(&cm_volumeLock);
1587         lock_ObtainWrite(&volp->rw);
1588
1589         if ((tsp->cellp==volp->cellp) && (volp->vol[ROVOL].serversp))
1590             code =cm_ChangeRankServer(&volp->vol[ROVOL].serversp, tsp);
1591
1592         /* this volume list was changed */
1593         if ( !code )
1594             cm_RandomizeServer(&volp->vol[ROVOL].serversp);
1595
1596         lock_ReleaseWrite(&volp->rw);
1597         lock_ObtainRead(&cm_volumeLock);
1598         cm_PutVolume(volp);
1599     }
1600     lock_ReleaseRead(&cm_volumeLock);
1601 }
1602
1603 /* dump all volumes that have reference count > 0 to a file.
1604  * cookie is used to identify this batch for easy parsing,
1605  * and it a string provided by a caller
1606  */
1607 int cm_DumpVolumes(FILE *outputFile, char *cookie, int lock)
1608 {
1609     int zilch;
1610     cm_volume_t *volp;
1611     char output[1024];
1612
1613     if (lock) {
1614         lock_ObtainRead(&cm_scacheLock);
1615         lock_ObtainRead(&cm_volumeLock);
1616     }
1617
1618     sprintf(output, "%s - dumping volumes - cm_data.currentVolumes=%d, cm_data.maxVolumes=%d\r\n",
1619             cookie, cm_data.currentVolumes, cm_data.maxVolumes);
1620     WriteFile(outputFile, output, (DWORD)strlen(output), &zilch, NULL);
1621
1622     for (volp = cm_data.allVolumesp; volp; volp=volp->allNextp)
1623     {
1624         time_t t;
1625         char *srvStr = NULL;
1626         afs_uint32 srvStrRpc = TRUE;
1627         char *cbt = NULL;
1628         char *cdrot = NULL;
1629
1630         if (volp->cbServerpRO) {
1631             if (!((volp->cbServerpRO->flags & CM_SERVERFLAG_UUID) &&
1632                 UuidToString((UUID *)&volp->cbServerpRO->uuid, &srvStr) == RPC_S_OK)) {
1633                 srvStr = malloc(16);
1634                 if (srvStr != NULL)
1635                     afs_inet_ntoa_r(volp->cbServerpRO->addr.sin_addr.s_addr, srvStr);
1636                 srvStrRpc = FALSE;
1637             }
1638         }
1639         if (volp->cbExpiresRO) {
1640             t = volp->cbExpiresRO;
1641             cbt = ctime(&t);
1642             if (cbt) {
1643                 cbt = strdup(cbt);
1644                 cbt[strlen(cbt)-1] = '\0';
1645             }
1646         }
1647         if (volp->creationDateRO) {
1648             t = volp->creationDateRO;
1649             cdrot = ctime(&t);
1650             if (cdrot) {
1651                 cdrot = strdup(cdrot);
1652                 cdrot[strlen(cdrot)-1] = '\0';
1653             }
1654         }
1655
1656         sprintf(output,
1657                 "%s - volp=0x%p cell=%s name=%s rwID=%u roID=%u bkID=%u flags=0x%x:%x "
1658                 "cbServerpRO='%s' cbExpiresRO='%s' creationDateRO='%s' refCount=%u\r\n",
1659                  cookie, volp, volp->cellp->name, volp->namep, volp->vol[RWVOL].ID,
1660                  volp->vol[ROVOL].ID, volp->vol[BACKVOL].ID, volp->flags, volp->qflags,
1661                  srvStr ? srvStr : "<none>", cbt ? cbt : "<none>", cdrot ? cdrot : "<none>",
1662                  volp->refCount);
1663         WriteFile(outputFile, output, (DWORD)strlen(output), &zilch, NULL);
1664
1665         if (srvStr) {
1666             if (srvStrRpc)
1667                 RpcStringFree(&srvStr);
1668             else
1669                 free(srvStr);
1670         }
1671         if (cbt)
1672             free(cbt);
1673         if (cdrot)
1674             free(cdrot);
1675     }
1676     sprintf(output, "%s - Done dumping volumes.\r\n", cookie);
1677     WriteFile(outputFile, output, (DWORD)strlen(output), &zilch, NULL);
1678
1679     if (lock) {
1680         lock_ReleaseRead(&cm_volumeLock);
1681         lock_ReleaseRead(&cm_scacheLock);
1682     }
1683     return (0);
1684 }
1685
1686
1687 /*
1688  * String hash function used by SDBM project.
1689  * It was chosen because it is fast and provides
1690  * decent coverage.
1691  */
1692 afs_uint32 SDBMHash(const char * str)
1693 {
1694     afs_uint32 hash = 0;
1695     size_t i, len;
1696
1697     if (str == NULL)
1698         return 0;
1699
1700     for(i = 0, len = strlen(str); i < len; i++)
1701     {
1702         hash = str[i] + (hash << 6) + (hash << 16) - hash;
1703     }
1704
1705     return (hash & 0x7FFFFFFF);
1706 }
1707
1708 /* call with volume write-locked and mutex held */
1709 void cm_AddVolumeToNameHashTable(cm_volume_t *volp)
1710 {
1711     int i;
1712
1713     if (volp->qflags & CM_VOLUME_QFLAG_IN_HASH)
1714         return;
1715
1716     i = CM_VOLUME_NAME_HASH(volp->namep);
1717
1718     volp->nameNextp = cm_data.volumeNameHashTablep[i];
1719     cm_data.volumeNameHashTablep[i] = volp;
1720     _InterlockedOr(&volp->qflags, CM_VOLUME_QFLAG_IN_HASH);
1721 }
1722
1723 /* call with volume write-locked and mutex held */
1724 void cm_RemoveVolumeFromNameHashTable(cm_volume_t *volp)
1725 {
1726     cm_volume_t **lvolpp;
1727     cm_volume_t *tvolp;
1728     int i;
1729
1730     if (volp->qflags & CM_VOLUME_QFLAG_IN_HASH) {
1731         /* hash it out first */
1732         i = CM_VOLUME_NAME_HASH(volp->namep);
1733         for (lvolpp = &cm_data.volumeNameHashTablep[i], tvolp = cm_data.volumeNameHashTablep[i];
1734              tvolp;
1735              lvolpp = &tvolp->nameNextp, tvolp = tvolp->nameNextp) {
1736             if (tvolp == volp) {
1737                 *lvolpp = volp->nameNextp;
1738                 _InterlockedAnd(&volp->qflags, ~CM_VOLUME_QFLAG_IN_HASH);
1739                 volp->nameNextp = NULL;
1740                 break;
1741             }
1742         }
1743     }
1744 }
1745
1746 /* call with volume write-locked and mutex held */
1747 void cm_AddVolumeToIDHashTable(cm_volume_t *volp, afs_uint32 volType)
1748 {
1749     int i;
1750     struct cm_vol_state * statep;
1751
1752     statep = cm_VolumeStateByType(volp, volType);
1753
1754     if (statep->qflags & CM_VOLUME_QFLAG_IN_HASH)
1755         return;
1756
1757     i = CM_VOLUME_ID_HASH(statep->ID);
1758
1759     switch (volType) {
1760     case RWVOL:
1761         statep->nextp = cm_data.volumeRWIDHashTablep[i];
1762         cm_data.volumeRWIDHashTablep[i] = volp;
1763         break;
1764     case ROVOL:
1765         statep->nextp = cm_data.volumeROIDHashTablep[i];
1766         cm_data.volumeROIDHashTablep[i] = volp;
1767         break;
1768     case BACKVOL:
1769         statep->nextp = cm_data.volumeBKIDHashTablep[i];
1770         cm_data.volumeBKIDHashTablep[i] = volp;
1771         break;
1772     }
1773     _InterlockedOr(&statep->qflags, CM_VOLUME_QFLAG_IN_HASH);
1774 }
1775
1776
1777 /* call with volume write-locked and mutex held */
1778 void cm_RemoveVolumeFromIDHashTable(cm_volume_t *volp, afs_uint32 volType)
1779 {
1780     cm_volume_t **lvolpp;
1781     cm_volume_t *tvolp;
1782     struct cm_vol_state * statep;
1783     int i;
1784
1785     statep = cm_VolumeStateByType(volp, volType);
1786
1787     if (statep->qflags & CM_VOLUME_QFLAG_IN_HASH) {
1788         /* hash it out first */
1789         i = CM_VOLUME_ID_HASH(statep->ID);
1790
1791         switch (volType) {
1792         case RWVOL:
1793             lvolpp = &cm_data.volumeRWIDHashTablep[i];
1794             tvolp = cm_data.volumeRWIDHashTablep[i];
1795             break;
1796         case ROVOL:
1797             lvolpp = &cm_data.volumeROIDHashTablep[i];
1798             tvolp = cm_data.volumeROIDHashTablep[i];
1799             break;
1800         case BACKVOL:
1801             lvolpp = &cm_data.volumeBKIDHashTablep[i];
1802             tvolp = cm_data.volumeBKIDHashTablep[i];
1803             break;
1804         default:
1805             osi_assertx(0, "invalid volume type");
1806         }
1807         do {
1808             if (tvolp == volp) {
1809                 *lvolpp = statep->nextp;
1810                 _InterlockedAnd(&statep->qflags, ~CM_VOLUME_QFLAG_IN_HASH);
1811                 statep->nextp = NULL;
1812                 break;
1813             }
1814
1815             lvolpp = &tvolp->vol[volType].nextp;
1816             tvolp = tvolp->vol[volType].nextp;
1817         } while(tvolp);
1818     }
1819 }
1820
1821 /* must be called with cm_volumeLock write-locked! */
1822 void cm_AdjustVolumeLRU(cm_volume_t *volp)
1823 {
1824     lock_AssertWrite(&cm_volumeLock);
1825
1826     if (volp == cm_data.volumeLRUFirstp)
1827         return;
1828
1829     if (volp->qflags & CM_VOLUME_QFLAG_IN_LRU_QUEUE)
1830         osi_QRemoveHT((osi_queue_t **) &cm_data.volumeLRUFirstp, (osi_queue_t **) &cm_data.volumeLRULastp, &volp->q);
1831     osi_QAddH((osi_queue_t **) &cm_data.volumeLRUFirstp, (osi_queue_t **) &cm_data.volumeLRULastp, &volp->q);
1832     _InterlockedOr(&volp->qflags, CM_VOLUME_QFLAG_IN_LRU_QUEUE);
1833
1834     osi_assertx(cm_data.volumeLRULastp != NULL, "null cm_data.volumeLRULastp");
1835 }
1836
1837 /* must be called with cm_volumeLock write-locked! */
1838 void cm_MoveVolumeToLRULast(cm_volume_t *volp)
1839 {
1840     lock_AssertWrite(&cm_volumeLock);
1841
1842     if (volp == cm_data.volumeLRULastp)
1843         return;
1844
1845     if (volp->qflags & CM_VOLUME_QFLAG_IN_LRU_QUEUE)
1846         osi_QRemoveHT((osi_queue_t **) &cm_data.volumeLRUFirstp, (osi_queue_t **) &cm_data.volumeLRULastp, &volp->q);
1847     osi_QAddT((osi_queue_t **) &cm_data.volumeLRUFirstp, (osi_queue_t **) &cm_data.volumeLRULastp, &volp->q);
1848     _InterlockedOr(&volp->qflags, CM_VOLUME_QFLAG_IN_LRU_QUEUE);
1849
1850     osi_assertx(cm_data.volumeLRULastp != NULL, "null cm_data.volumeLRULastp");
1851 }
1852
1853 /* must be called with cm_volumeLock write-locked! */
1854 void cm_RemoveVolumeFromLRU(cm_volume_t *volp)
1855 {
1856     lock_AssertWrite(&cm_volumeLock);
1857
1858     if (volp->qflags & CM_VOLUME_QFLAG_IN_LRU_QUEUE) {
1859         osi_QRemoveHT((osi_queue_t **) &cm_data.volumeLRUFirstp, (osi_queue_t **) &cm_data.volumeLRULastp, &volp->q);
1860         _InterlockedAnd(&volp->qflags, ~CM_VOLUME_QFLAG_IN_LRU_QUEUE);
1861     }
1862
1863     osi_assertx(cm_data.volumeLRULastp != NULL, "null cm_data.volumeLRULastp");
1864 }
1865
1866 static char * volstatus_str(enum volstatus vs)
1867 {
1868     switch (vs) {
1869     case vl_online:
1870         return "online";
1871     case vl_busy:
1872         return "busy";
1873     case vl_offline:
1874         return "offline";
1875     case vl_alldown:
1876         return "alldown";
1877     default:
1878         return "unknown";
1879     }
1880 }
1881
1882 void cm_VolumeStatusNotification(cm_volume_t * volp, afs_uint32 volID, enum volstatus old, enum volstatus new)
1883 {
1884     char volstr[CELL_MAXNAMELEN + VL_MAXNAMELEN]="";
1885     char *ext = "";
1886
1887     if (volID == volp->vol[RWVOL].ID)
1888         ext = "";
1889     else if (volID == volp->vol[ROVOL].ID)
1890         ext = ".readonly";
1891     else if (volID == volp->vol[BACKVOL].ID)
1892         ext = ".backup";
1893     else
1894         ext = ".nomatch";
1895     snprintf(volstr, sizeof(volstr), "%s:%s%s", volp->cellp->name, volp->namep, ext);
1896
1897     osi_Log4(afsd_logp, "VolumeStatusNotification: %-48s [%10u] (%s -> %s)",
1898              osi_LogSaveString(afsd_logp, volstr), volID, volstatus_str(old), volstatus_str(new));
1899
1900     cm_VolStatus_Change_Notification(volp->cellp->cellID, volID, new);
1901 }
1902
1903 enum volstatus cm_GetVolumeStatus(cm_volume_t *volp, afs_uint32 volID)
1904 {
1905     cm_vol_state_t * statep = cm_VolumeStateByID(volp, volID);
1906     if (statep)
1907         return statep->state;
1908     else
1909         return vl_unknown;
1910 }
1911
1912 /* Renew .readonly volume callbacks that are more than
1913  * 30 minutes old.  (A volume callback is issued for 2 hours.)
1914  */
1915 void
1916 cm_VolumeRenewROCallbacks(void)
1917 {
1918     cm_volume_t * volp;
1919     time_t minexp = time(NULL) + 90 * 60;
1920     extern int daemon_ShutdownFlag;
1921     extern int powerStateSuspended;
1922
1923     lock_ObtainRead(&cm_volumeLock);
1924     for (volp = cm_data.allVolumesp;
1925          volp && !daemon_ShutdownFlag && !powerStateSuspended;
1926          volp=volp->allNextp) {
1927         if ( volp->cbExpiresRO > 0 && volp->cbExpiresRO < minexp) {
1928             cm_req_t      req;
1929             cm_fid_t      fid;
1930             cm_scache_t * scp;
1931
1932             cm_SetFid(&fid, volp->cellp->cellID, volp->vol[ROVOL].ID, 1, 1);
1933
1934             cm_InitReq(&req);
1935
1936             lock_ReleaseRead(&cm_volumeLock);
1937             if (cm_GetSCache(&fid, NULL, &scp, cm_rootUserp, &req) == 0) {
1938                 lock_ObtainWrite(&scp->rw);
1939                 cm_GetCallback(scp, cm_rootUserp, &req, 1);
1940                 lock_ReleaseWrite(&scp->rw);
1941                 cm_ReleaseSCache(scp);
1942             }
1943             lock_ObtainRead(&cm_volumeLock);
1944         }
1945     }
1946     lock_ReleaseRead(&cm_volumeLock);
1947 }
1948
1949 cm_vol_state_t *
1950 cm_VolumeStateByType(cm_volume_t *volp, afs_uint32 volType)
1951 {
1952     return &volp->vol[volType];
1953 }
1954
1955 cm_vol_state_t *
1956 cm_VolumeStateByID(cm_volume_t *volp, afs_uint32 id)
1957 {
1958     cm_vol_state_t * statep = NULL;
1959
1960     if (id == volp->vol[RWVOL].ID)
1961         statep = &volp->vol[RWVOL];
1962     else if (id == volp->vol[ROVOL].ID)
1963         statep = &volp->vol[ROVOL];
1964     else if (id == volp->vol[BACKVOL].ID)
1965         statep = &volp->vol[BACKVOL];
1966
1967     return(statep);
1968 }
1969
1970 cm_vol_state_t *
1971 cm_VolumeStateByName(cm_volume_t *volp, char *volname)
1972 {
1973     size_t len = strlen(volname);
1974     cm_vol_state_t *statep;
1975
1976     if (cm_stricmp_utf8N(".readonly", &volname[len-9]) == 0)
1977         statep = &volp->vol[ROVOL];
1978     else if (cm_stricmp_utf8N(".backup", &volname[len-7]) == 0)
1979         statep = &volp->vol[BACKVOL];
1980     else
1981         statep = &volp->vol[RWVOL];
1982
1983     return statep;
1984 }
1985
1986 afs_int32
1987 cm_VolumeType(cm_volume_t *volp, afs_uint32 id)
1988 {
1989     if (id == volp->vol[RWVOL].ID)
1990         return(RWVOL);
1991     else if (id == volp->vol[ROVOL].ID)
1992         return(ROVOL);
1993     else if (id == volp->vol[BACKVOL].ID)
1994         return (BACKVOL);
1995
1996     return -1;
1997 }
1998
1999 LONG_PTR
2000 cm_ChecksumVolumeServerList(struct cm_fid *fidp, cm_user_t *userp, cm_req_t *reqp)
2001 {
2002     LONG_PTR cksum = 0;
2003     long code;
2004     afs_uint32 replicated;
2005     cm_serverRef_t **serverspp;
2006
2007     code = cm_GetServerList(fidp, userp, reqp, &replicated, &serverspp);
2008     if (code == 0) {
2009         cksum = cm_ChecksumServerList(*serverspp);
2010         cm_FreeServerList(serverspp, 0);
2011     }
2012     return cksum;
2013 }
2014
2015 afs_int32
2016 cm_IsVolumeReplicated(cm_fid_t *fidp)
2017 {
2018     afs_int32 replicated = 0;
2019     cm_volume_t *volp;
2020     cm_vol_state_t * volstatep;
2021
2022     volp = cm_GetVolumeByFID(fidp);
2023     if (volp) {
2024         volstatep = cm_VolumeStateByID(volp, fidp->volume);
2025         replicated = (volstatep->flags & CM_VOL_STATE_FLAG_REPLICATED);
2026         cm_PutVolume(volp);
2027     }
2028
2029     return replicated;
2030 }