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