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