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