60ce24d21b49d1434c9c07742d6d5c5822955cfb
[openafs.git] / src / WINNT / afsd / cm_callback.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/afs_args.h>
12 #include <afs/stds.h>
13
14 #include <windows.h>
15 #include <winsock2.h>
16 #include <malloc.h>
17 #include <string.h>
18 #include <stdlib.h>
19
20 #include "afsd.h"
21 #include "smb.h"
22 #include <osi.h>
23 #include <rx_pthread.h>
24
25 #include <WINNT/syscfg.h>
26 #include <WINNT/afsreg.h>
27 #include <afs/vldbint.h>
28 #include <afs/volint.h>
29
30 int
31 SRXAFSCB_InitCallBackState3(struct rx_call *callp, afsUUID* serverUuid);
32
33 /* read/write lock for all global storage in this module */
34 osi_rwlock_t cm_callbackLock;
35
36 afs_int32 cm_OfflineROIsValid = 0;
37
38 afs_int32 cm_giveUpAllCBs = 0;
39
40 afs_int32 cm_shutdown = 0;
41
42 #ifdef AFS_FREELANCE_CLIENT
43 extern osi_mutex_t cm_Freelance_Lock;
44 #endif
45
46 /* count of # of callback breaking messages received by this CM so far.  We use
47  * this count in determining whether there have been any callback breaks that
48  * apply to a call that returned a new callback.  If the counter doesn't
49  * increase during a call, then we know that no callbacks were broken during
50  * that call, and thus that the callback that was just returned is still valid.
51  */
52 long cm_callbackCount;
53
54 /* count of number of RPCs potentially returning a callback executing now.
55  * When this counter hits zero, we can clear out the racing revokes list, since
56  * at that time, we know that none of the just-executed callback revokes will
57  * apply to any future call that returns a callback (since the latter hasn't
58  * even started execution yet).
59  */
60 long cm_activeCallbackGrantingCalls;
61
62 /* list of callbacks that have been broken recently.  If a call returning a
63  * callback is executing and a callback revoke runs immediately after it at the
64  * server, the revoke may end up being processed before the response to the
65  * original callback granting call.  We detect this by keeping a list of
66  * callback revokes that have been received since we *started* the callback
67  * granting call, and discarding any callbacks received for the same file ID,
68  * even if the callback revoke was received before the callback grant.
69  */
70 cm_racingRevokes_t *cm_racingRevokesp;
71
72 /* record a (potentially) racing revoke for this file ID; null means for all
73  * file IDs, and is used by InitCallBackState.
74  *
75  * The cancelFlags describe whether we're just discarding callbacks for the same
76  * file ID, the same volume, or all from the same server.
77  *
78  * Called with no locks held.
79  */
80 void cm_RecordRacingRevoke(cm_fid_t *fidp, long cancelFlags)
81 {
82     cm_racingRevokes_t *rp;
83
84     lock_ObtainWrite(&cm_callbackLock);
85
86     osi_Log3(afsd_logp, "RecordRacingRevoke Volume %d Flags %lX activeCalls %d",
87                 fidp ? fidp->volume : 0, cancelFlags, cm_activeCallbackGrantingCalls);
88
89     if (cm_activeCallbackGrantingCalls > 0) {
90         rp = malloc(sizeof(*rp));
91         memset(rp, 0, sizeof(*rp));
92         osi_QAdd((osi_queue_t **) &cm_racingRevokesp, &rp->q);
93         rp->flags |= (cancelFlags & CM_RACINGFLAG_ALL);
94         if (fidp) rp->fid = *fidp;
95         rp->callbackCount = ++cm_callbackCount;
96     }
97     lock_ReleaseWrite(&cm_callbackLock);
98 }
99
100 /*
101  * When we lose a callback, may have to send change notification replies.
102  * Do not call with a lock on the scp.
103  */
104 void cm_CallbackNotifyChange(cm_scache_t *scp)
105 {
106     DWORD dwDelay = 0;
107     HKEY  hKey;
108     DWORD dummyLen;
109
110     /* why does this have to query the registry each time? */
111         if (RegOpenKeyEx( HKEY_LOCAL_MACHINE, 
112                       AFSREG_CLT_OPENAFS_SUBKEY,
113                       0,
114                       KEY_READ|KEY_QUERY_VALUE,
115                       &hKey) == ERROR_SUCCESS) {
116
117         dummyLen = sizeof(DWORD);
118         RegQueryValueEx(hKey, "CallBack Notify Change Delay", NULL, NULL,
119                         (BYTE *) &dwDelay, &dummyLen);
120         RegCloseKey(hKey);
121     }
122
123     if (dwDelay > 5000)    /* do not allow a delay of more then 5 seconds */
124         dwDelay = 5000;   
125
126     osi_Log3(afsd_logp, "CallbackNotifyChange FileType %d Flags %lX Delay %dms",
127               scp->fileType, scp->flags, dwDelay);
128
129     if (dwDelay)
130         Sleep(dwDelay);
131
132     /* for directories, this sends a change notification on the dir itself */
133     if (scp->fileType == CM_SCACHETYPE_DIRECTORY) {
134         if (scp->flags & CM_SCACHEFLAG_ANYWATCH)
135             smb_NotifyChange(0,
136                              FILE_NOTIFY_GENERIC_DIRECTORY_FILTER,
137                              scp, NULL, NULL, TRUE);
138     } else {
139         /* and for files, this sends a change notification on the file's parent dir */
140         cm_fid_t tfid;
141         cm_scache_t *dscp;
142
143         cm_SetFid(&tfid, scp->fid.cell, scp->fid.volume, scp->parentVnode, scp->parentUnique);
144         dscp = cm_FindSCache(&tfid);
145         if ( dscp &&
146              dscp->flags & CM_SCACHEFLAG_ANYWATCH )
147             smb_NotifyChange( 0,
148                               FILE_NOTIFY_GENERIC_FILE_FILTER,
149                               dscp, NULL, NULL, TRUE);
150         if (dscp) 
151             cm_ReleaseSCache(dscp);
152     }
153 }
154
155 /* called with no locks held for every file ID that is revoked directly by
156  * a callback revoke call.  Does not have to handle volume callback breaks,
157  * since those have already been split out.
158  *
159  * The callp parameter is currently unused.
160  */
161 void cm_RevokeCallback(struct rx_call *callp, cm_cell_t * cellp, AFSFid *fidp)
162 {
163     cm_fid_t tfid;
164     cm_scache_t *scp;
165     long hash;
166         
167     tfid.cell = cellp ? cellp->cellID : 0;
168     tfid.volume = fidp->Volume;
169     tfid.vnode = fidp->Vnode;
170     tfid.unique = fidp->Unique;
171     hash = CM_SCACHE_HASH(&tfid);
172
173     osi_Log3(afsd_logp, "RevokeCallback vol %u vn %u uniq %u",
174              fidp->Volume, fidp->Vnode, fidp->Unique);
175         
176     /* do this first, so that if we're executing a callback granting call
177      * at this moment, we kill it before it can be merged in.  Otherwise,
178      * it could complete while we're doing the scan below, and get missed
179      * by both the scan and by this code.
180      */
181     cm_RecordRacingRevoke(&tfid, 0);
182
183     lock_ObtainWrite(&cm_scacheLock);
184     /* do all in the hash bucket, since we don't know how many we'll find with
185      * varying cells.
186      */
187     for (scp = cm_data.scacheHashTablep[hash]; scp; scp=scp->nextp) {
188         if (scp->fid.volume == tfid.volume &&
189              scp->fid.vnode == tfid.vnode &&
190              scp->fid.unique == tfid.unique &&
191              (cellp == NULL || scp->fid.cell == cellp->cellID) &&
192              cm_HaveCallback(scp))
193         {
194             cm_HoldSCacheNoLock(scp);
195             lock_ReleaseWrite(&cm_scacheLock);
196             osi_Log4(afsd_logp, "RevokeCallback Discarding SCache scp 0x%p vol %u vn %u uniq %u", 
197                      scp, scp->fid.volume, scp->fid.vnode, scp->fid.unique);
198
199             lock_ObtainWrite(&scp->rw);
200             cm_DiscardSCache(scp);
201             lock_ReleaseWrite(&scp->rw);
202
203             cm_CallbackNotifyChange(scp);
204             
205             lock_ObtainWrite(&cm_scacheLock);
206             cm_ReleaseSCacheNoLock(scp);
207         }
208     }
209     lock_ReleaseWrite(&cm_scacheLock);
210
211     osi_Log3(afsd_logp, "RevokeCallback Complete vol %u vn %u uniq %u",
212              fidp->Volume, fidp->Vnode, fidp->Unique);
213 }
214
215 /* called to revoke a volume callback, which is typically issued when a volume
216  * is moved from one server to another.
217  *
218  * Called with no locks held.
219  */
220 void cm_RevokeVolumeCallback(struct rx_call *callp, cm_cell_t *cellp, AFSFid *fidp)
221 {
222     unsigned long hash;
223     cm_scache_t *scp;
224     cm_fid_t tfid;
225
226     osi_Log1(afsd_logp, "RevokeVolumeCallback vol %d", fidp->Volume);
227
228     /* do this first, so that if we're executing a callback granting call
229      * at this moment, we kill it before it can be merged in.  Otherwise,
230      * it could complete while we're doing the scan below, and get missed
231      * by both the scan and by this code.
232      */
233     tfid.cell = cellp ? cellp->cellID : 0;
234     tfid.volume = fidp->Volume;
235     tfid.vnode = tfid.unique = 0;
236
237     cm_RecordRacingRevoke(&tfid, CM_RACINGFLAG_CANCELVOL);
238
239     lock_ObtainWrite(&cm_scacheLock);
240     for (hash = 0; hash < cm_data.scacheHashTableSize; hash++) {
241         for(scp=cm_data.scacheHashTablep[hash]; scp; scp=scp->nextp) {
242             if (scp->fid.volume == fidp->Volume &&
243                 (cellp == NULL || scp->fid.cell == cellp->cellID) &&
244                  scp->cbExpires > 0 &&
245                  scp->cbServerp != NULL) {
246                 cm_HoldSCacheNoLock(scp);
247                 lock_ReleaseWrite(&cm_scacheLock);
248
249                 lock_ObtainWrite(&scp->rw);
250                 osi_Log4(afsd_logp, "RevokeVolumeCallback Discarding SCache scp 0x%p vol %u vn %u uniq %u", 
251                           scp, scp->fid.volume, scp->fid.vnode, scp->fid.unique);
252                 cm_DiscardSCache(scp);
253                 lock_ReleaseWrite(&scp->rw);
254
255                 cm_CallbackNotifyChange(scp);
256                 lock_ObtainWrite(&cm_scacheLock);
257                 cm_ReleaseSCacheNoLock(scp);
258                 if (scp->flags & CM_SCACHEFLAG_PURERO) {
259                     cm_volume_t *volp = cm_GetVolumeByFID(&scp->fid);
260                     if (volp) {
261                         volp->cbExpiresRO = 0;
262                         cm_PutVolume(volp);
263                     }
264                 }
265             }
266         }       /* search one hash bucket */
267     }   /* search all hash buckets */
268
269     lock_ReleaseWrite(&cm_scacheLock);
270
271     osi_Log1(afsd_logp, "RevokeVolumeCallback Complete vol %d", fidp->Volume);
272 }
273
274 /*
275  * afs_data_pointer_to_int32() - returns least significant afs_int32 of the
276  * given data pointer, without triggering "cast truncates pointer"
277  * warnings.  We use this where we explicitly don't care whether a
278  * pointer is truncated -- it loses information where a pointer is
279  * larger than an afs_int32.
280  */
281
282 static afs_int32
283 afs_data_pointer_to_int32(const void *p)
284 {
285     union {
286         afs_int32 i32[sizeof(void *) / sizeof(afs_int32)];
287         const void *p;
288     } ip;
289
290     int i32_sub;                /* subscript of least significant afs_int32 in ip.i32[] */
291
292     /* set i32_sub */
293
294     {
295         /* used to determine the byte order of the system */
296
297         union {
298             char c[sizeof(int) / sizeof(char)];
299             int i;
300         } ci;
301
302         ci.i = 1;
303         if (ci.c[0] == 1) {
304             /* little-endian system */
305             i32_sub = 0;
306         } else {
307             /* big-endian system */
308             i32_sub = (sizeof ip.i32 / sizeof ip.i32[0]) - 1;
309         }
310     }
311
312     ip.p = p;
313     return ip.i32[i32_sub];
314 }
315 /*------------------------------------------------------------------------
316  * EXPORTED SRXAFSCB_CallBack
317  *
318  * Description:
319  *      Routine called by the server-side callback RPC interface to
320  *      implement passing in callback information.
321  *      table.
322  *
323  * Arguments:
324  *      rx_call    : Ptr to Rx call on which this request came in.
325  *      fidsArrayp : Ptr to array of fids involved.
326  *      cbsArrayp  : Ptr to matching callback info for the fids.
327  *
328  * Returns:
329  *      0 (always).
330  *
331  * Environment:
332  *      Nothing interesting.
333  *
334  * Side Effects:
335  *      As advertised.
336  *------------------------------------------------------------------------*/
337 /* handle incoming RPC callback breaking message.
338  * Called with no locks held.
339  */
340 int
341 SRXAFSCB_CallBack(struct rx_call *callp, AFSCBFids *fidsArrayp, AFSCBs *cbsArrayp)
342 {
343     int i;
344     AFSFid *tfidp;
345     struct rx_connection *connp;
346     struct rx_peer *peerp;
347     unsigned long host = 0;
348     unsigned short port = 0;
349     cm_server_t *tsp = NULL;
350     cm_cell_t* cellp = NULL;
351
352     if (cm_shutdown)
353         return 1;
354
355     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
356         host = rx_HostOf(peerp);
357         port = rx_PortOf(peerp);
358
359         tsp = cm_FindServerByIP(host, port, CM_SERVER_FILE);
360         if (tsp) {
361             cellp = tsp->cellp;
362             cm_PutServer(tsp);
363         }
364
365         if (!cellp)
366             osi_Log2(afsd_logp, "SRXAFSCB_CallBack from host 0x%x port %d",
367                      ntohl(host),
368                      ntohs(port));
369         else 
370             osi_Log3(afsd_logp, "SRXAFSCB_CallBack from host 0x%x port %d for cell %s",
371                      ntohl(host),
372                      ntohs(port),
373                      cellp->name /* does not need to be saved, doesn't change */);
374     } else {
375         osi_Log0(afsd_logp, "SRXAFSCB_CallBack from unknown host");
376     }
377
378
379     for (i=0; i < (long) fidsArrayp->AFSCBFids_len; i++) {
380         tfidp = &fidsArrayp->AFSCBFids_val[i];
381                 
382         if (tfidp->Volume == 0)
383             continue;   /* means don't do anything */
384         else if (tfidp->Vnode == 0)
385             cm_RevokeVolumeCallback(callp, cellp, tfidp);
386         else
387             cm_RevokeCallback(callp, cellp, tfidp);
388     }
389     return 0;
390 }
391
392 /*------------------------------------------------------------------------
393  * EXPORTED SRXAFSCB_InitCallBackState
394  *
395  * Description:
396  *      Routine called by the server-side callback RPC interface to
397  *      implement clearing all callbacks from this host.
398  *
399  * Arguments:
400  *      rx_call : Ptr to Rx call on which this request came in.
401  *
402  * Returns:
403  *      0 (always).
404  *
405  * Environment:
406  *      Nothing interesting.
407  *
408  * Side Effects:
409  *      As advertised.
410  *------------------------------------------------------------------------*/
411 /* called with no locks by RPC system when a server indicates that it has never
412  * heard from us, or for other reasons has had to discard callbacks from us
413  * without telling us, e.g. a network partition.
414  */
415 int
416 SRXAFSCB_InitCallBackState(struct rx_call *callp)
417 {
418     if (cm_shutdown)
419         return 1;
420
421     osi_Log0(afsd_logp, "SRXAFSCB_InitCallBackState ->");
422
423     return SRXAFSCB_InitCallBackState3(callp, NULL);
424 }
425
426 /*------------------------------------------------------------------------
427  * EXPORTED SRXAFSCB_Probe
428  *
429  * Description:
430  *      Routine called by the server-side callback RPC interface to
431  *      implement ``probing'' the Cache Manager, just making sure it's
432  *      still there.
433  *
434  * Arguments:
435  *      rx_call : Ptr to Rx call on which this request came in.
436  *
437  * Returns:
438  *      0 (always).
439  *
440  * Environment:
441  *      Nothing interesting.
442  *
443  * Side Effects:
444  *      As advertised.
445  *------------------------------------------------------------------------*/
446 int
447 SRXAFSCB_Probe(struct rx_call *callp)
448 {
449     struct rx_connection *connp;
450     struct rx_peer *peerp;
451     unsigned long host = 0;
452     unsigned short port = 0;
453
454     if (cm_shutdown)
455         return 1;
456
457     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
458         host = rx_HostOf(peerp);
459         port = rx_PortOf(peerp);
460     }
461
462     osi_Log2(afsd_logp, "SRXAFSCB_Probe from host 0x%x port %d",
463               ntohl(host),
464               ntohs(port));
465
466     return 0;
467 }
468
469 /*------------------------------------------------------------------------
470  * EXPORTED SRXAFSCB_GetLock
471  *
472  * Description:
473  *      Routine called by the server-side callback RPC interface to
474  *      implement pulling out the contents of a lock in the lock
475  *      table.
476  *
477  * Arguments:
478  *      a_call   : Ptr to Rx call on which this request came in.
479  *      a_index  : Index of desired lock.
480  *      a_result : Ptr to a buffer for the given lock.
481  *
482  * Returns:
483  *      0 if everything went fine,
484  *      1 if we were given a bad index.
485  *
486  * Environment:
487  *      Nothing interesting.
488  *
489  * Side Effects:
490  *      As advertised.
491  *------------------------------------------------------------------------*/
492 /* debug interface */
493
494 extern osi_rwlock_t cm_aclLock;
495 extern osi_rwlock_t buf_globalLock;
496 extern osi_rwlock_t cm_cellLock;
497 extern osi_rwlock_t cm_connLock;
498 extern osi_rwlock_t cm_daemonLock;
499 extern osi_rwlock_t cm_dnlcLock;
500 extern osi_rwlock_t cm_scacheLock;
501 extern osi_rwlock_t cm_serverLock;
502 extern osi_rwlock_t cm_syscfgLock;
503 extern osi_rwlock_t cm_userLock;
504 extern osi_rwlock_t cm_utilsLock;
505 extern osi_rwlock_t cm_volumeLock;
506 extern osi_rwlock_t smb_globalLock;
507 extern osi_rwlock_t smb_rctLock;
508
509 extern osi_mutex_t cm_Freelance_Lock;
510 extern osi_mutex_t cm_Afsdsbmt_Lock;
511 extern osi_mutex_t tokenEventLock;
512 extern osi_mutex_t  smb_ListenerLock;
513 extern osi_mutex_t smb_RawBufLock;
514 extern osi_mutex_t smb_Dir_Watch_Lock;
515
516 #define LOCKTYPE_RW     1
517 #define LOCKTYPE_MUTEX  2
518 static struct _ltable {
519     char *name;
520     char *addr;
521     int  type;
522 } ltable[] = {
523     {"cm_scacheLock",    (char*)&cm_scacheLock,         LOCKTYPE_RW},
524     {"buf_globalLock",   (char*)&buf_globalLock,        LOCKTYPE_RW},
525     {"cm_serverLock",    (char*)&cm_serverLock,         LOCKTYPE_RW},
526     {"cm_callbackLock",  (char*)&cm_callbackLock,       LOCKTYPE_RW},
527     {"cm_syscfgLock",    (char*)&cm_syscfgLock,         LOCKTYPE_RW},
528     {"cm_aclLock",       (char*)&cm_aclLock,            LOCKTYPE_RW},
529     {"cm_cellLock",      (char*)&cm_cellLock,           LOCKTYPE_RW},
530     {"cm_connLock",      (char*)&cm_connLock,           LOCKTYPE_RW},
531     {"cm_userLock",      (char*)&cm_userLock,           LOCKTYPE_RW},
532     {"cm_volumeLock",    (char*)&cm_volumeLock,         LOCKTYPE_RW},
533     {"cm_daemonLock",    (char*)&cm_daemonLock,         LOCKTYPE_RW},
534     {"cm_dnlcLock",      (char*)&cm_dnlcLock,           LOCKTYPE_RW},
535     {"cm_utilsLock",     (char*)&cm_utilsLock,          LOCKTYPE_RW},
536     {"smb_globalLock",   (char*)&smb_globalLock,        LOCKTYPE_RW},
537     {"smb_rctLock",      (char*)&smb_rctLock,           LOCKTYPE_RW},
538     {"cm_Freelance_Lock",(char*)&cm_Freelance_Lock,     LOCKTYPE_MUTEX},
539     {"cm_Afsdsbmt_Lock", (char*)&cm_Afsdsbmt_Lock,      LOCKTYPE_MUTEX},
540     {"tokenEventLock",   (char*)&tokenEventLock,        LOCKTYPE_MUTEX},
541     {"smb_ListenerLock", (char*)&smb_ListenerLock,      LOCKTYPE_MUTEX},
542     {"smb_RawBufLock",   (char*)&smb_RawBufLock,        LOCKTYPE_MUTEX},
543     {"smb_Dir_Watch_Lock",(char*)&smb_Dir_Watch_Lock,   LOCKTYPE_MUTEX}
544 };
545
546 int
547 SRXAFSCB_GetLock(struct rx_call *callp, long index, AFSDBLock *lockp)
548 {
549     struct _ltable *tl;          /*Ptr to lock table entry */
550     osi_rwlock_t  *rwp;
551     osi_mutex_t   *mtxp;
552     int nentries;               /*Num entries in table */
553     int code;                   /*Return code */
554     struct rx_connection *connp;
555     struct rx_peer *peerp;
556     unsigned long host = 0;
557     unsigned short port = 0;
558
559     if (cm_shutdown)
560         return 1;
561
562     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
563         host = rx_HostOf(peerp);
564         port = rx_PortOf(peerp);
565     }
566
567     osi_Log3(afsd_logp, "SRXAFSCB_GetLock(%d) from host 0x%x port %d", 
568              index, ntohl(host), ntohs(port));
569
570     nentries = sizeof(ltable) / sizeof(struct _ltable);
571     if (index < 0 || index >= nentries) {
572         /*
573          * Past EOF
574          */
575         code = 1;
576     } else {
577         /*
578          * Found it - copy out its contents.
579          */
580         tl = &ltable[index];
581         strncpy(lockp->name, tl->name, sizeof(lockp->name));
582         lockp->name[sizeof(lockp->name)-1] = '\0';
583         lockp->lock.waitStates = 0;
584         switch ( tl->type ) {
585         case LOCKTYPE_RW:
586             rwp = (osi_rwlock_t *)tl->addr;
587             lockp->lock.exclLocked = rwp->flags;
588             lockp->lock.readersReading = rwp->readers;
589             lockp->lock.numWaiting = rwp->waiters;
590             break;
591         case LOCKTYPE_MUTEX:
592             mtxp = (osi_mutex_t *)tl->addr;
593             lockp->lock.exclLocked = mtxp->flags;
594             lockp->lock.readersReading = 0;
595             lockp->lock.numWaiting = mtxp->waiters;
596             break;
597         }
598         lockp->lock.pid_last_reader = 0;
599         lockp->lock.pid_writer = 0;
600         lockp->lock.src_indicator = 0;
601         code = 0;
602     }
603
604     return code;
605 }
606
607 /* debug interface */
608 int
609 SRXAFSCB_GetCE(struct rx_call *callp, long index, AFSDBCacheEntry *cep)
610 {
611     afs_uint32 i;
612     cm_scache_t * scp;
613     int code;
614     struct rx_connection *connp;
615     struct rx_peer *peerp;
616     unsigned long host = 0;
617     unsigned short port = 0;
618
619     if (cm_shutdown)
620         return 1;
621
622     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
623         host = rx_HostOf(peerp);
624         port = rx_PortOf(peerp);
625     }
626
627     osi_Log2(afsd_logp, "SRXAFSCB_GetCE from host 0x%x port %d",
628              ntohl(host), ntohs(port));
629
630     lock_ObtainRead(&cm_scacheLock);
631     for (i = 0; i < cm_data.scacheHashTableSize; i++) {
632         for (scp = cm_data.scacheHashTablep[i]; scp; scp = scp->nextp) {
633             if (index == 0)
634                 goto searchDone;
635             index--;
636         }                       /*Zip through current hash chain */
637     }                           /*Zip through hash chains */
638
639   searchDone:
640     if (scp == NULL) {
641         /*Past EOF */
642         code = 1;
643         goto fcnDone;
644     }
645
646     /*
647      * Copy out the located entry.
648      */
649     memset(cep, 0, sizeof(AFSDBCacheEntry));
650     cep->addr = afs_data_pointer_to_int32(scp);
651     cep->cell = scp->fid.cell;
652     cep->netFid.Volume = scp->fid.volume;
653     cep->netFid.Vnode = scp->fid.vnode;
654     cep->netFid.Unique = scp->fid.unique;
655     cep->lock.waitStates = 0;
656     cep->lock.exclLocked = scp->rw.flags;
657     cep->lock.readersReading = 0;
658     cep->lock.numWaiting = scp->rw.waiters;
659     cep->lock.pid_last_reader = 0;
660     cep->lock.pid_writer = 0;
661     cep->lock.src_indicator = 0;
662     cep->Length = scp->length.LowPart;
663     cep->DataVersion = (afs_uint32)(scp->dataVersion & 0xFFFFFFFF);
664     cep->callback = afs_data_pointer_to_int32(scp->cbServerp);
665     if (scp->flags & CM_SCACHEFLAG_PURERO) {
666         cm_volume_t *volp = cm_GetVolumeByFID(&scp->fid);
667         if (volp) {
668             cep->cbExpires = volp->cbExpiresRO;
669             cm_PutVolume(volp);
670         }
671     } else {
672         /* TODO: deal with time_t below */
673         cep->cbExpires = (afs_int32) scp->cbExpires;
674     }
675     cep->refCount = scp->refCount;
676     cep->opens = scp->openReads;
677     cep->writers = scp->openWrites;
678     switch (scp->fileType) {
679     case CM_SCACHETYPE_FILE:
680         cep->mvstat = 0;
681         break;
682     case CM_SCACHETYPE_MOUNTPOINT:
683         cep->mvstat = 1;
684         break;
685     case CM_SCACHETYPE_DIRECTORY:
686         if (scp->fid.vnode == 1 && scp->fid.unique == 1)
687             cep->mvstat = 2;
688         else
689             cep->mvstat = 3;
690         break;
691     case CM_SCACHETYPE_SYMLINK:
692         cep->mvstat = 4;
693         break;
694     case CM_SCACHETYPE_DFSLINK:
695         cep->mvstat = 5;
696         break;
697     case CM_SCACHETYPE_INVALID:
698         cep->mvstat = 6;
699         break;
700     }
701     cep->states = 0;
702     if (scp->flags & CM_SCACHEFLAG_STATD)
703         cep->states |= 1;
704     if (scp->flags & CM_SCACHEFLAG_RO || scp->flags & CM_SCACHEFLAG_PURERO)
705         cep->states |= 4;
706     if (scp->fileType == CM_SCACHETYPE_MOUNTPOINT &&
707         scp->mountPointStringp[0])
708         cep->states |= 8;
709     if (scp->flags & CM_SCACHEFLAG_WAITING)
710         cep->states |= 0x40;
711     code = 0;
712
713     /*
714      * Return our results.
715      */
716   fcnDone:
717     lock_ReleaseRead(&cm_scacheLock);
718
719     return (code);
720 }
721
722 /* debug interface */
723 int
724 SRXAFSCB_GetCE64(struct rx_call *callp, long index, AFSDBCacheEntry64 *cep)
725 {
726     afs_uint32 i;
727     cm_scache_t * scp;
728     int code;
729     struct rx_connection *connp;
730     struct rx_peer *peerp;
731     unsigned long host = 0;
732     unsigned short port = 0;
733
734     if (cm_shutdown)
735         return 1;
736
737     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
738         host = rx_HostOf(peerp);
739         port = rx_PortOf(peerp);
740     }
741
742     osi_Log2(afsd_logp, "SRXAFSCB_GetCE64 from host 0x%x port %d",
743              ntohl(host), ntohs(port));
744
745     lock_ObtainRead(&cm_scacheLock);
746     for (i = 0; i < cm_data.scacheHashTableSize; i++) {
747         for (scp = cm_data.scacheHashTablep[i]; scp; scp = scp->nextp) {
748             if (index == 0)
749                 goto searchDone;
750             index--;
751         }                       /*Zip through current hash chain */
752     }                           /*Zip through hash chains */
753
754   searchDone:
755     if (scp == NULL) {
756         /*Past EOF */
757         code = 1;
758         goto fcnDone;
759     }
760
761     /*
762      * Copy out the located entry.
763      */
764     memset(cep, 0, sizeof(AFSDBCacheEntry64));
765     cep->addr = afs_data_pointer_to_int32(scp);
766     cep->cell = scp->fid.cell;
767     cep->netFid.Volume = scp->fid.volume;
768     cep->netFid.Vnode = scp->fid.vnode;
769     cep->netFid.Unique = scp->fid.unique;
770     cep->lock.waitStates = 0;
771     cep->lock.exclLocked = scp->rw.flags;
772     cep->lock.readersReading = 0;
773     cep->lock.numWaiting = scp->rw.waiters;
774     cep->lock.pid_last_reader = 0;
775     cep->lock.pid_writer = 0;
776     cep->lock.src_indicator = 0;
777 #if !defined(AFS_64BIT_ENV)
778     cep->Length.high = scp->length.HighPart;
779     cep->Length.low = scp->length.LowPart;
780 #else
781     cep->Length = (afs_int64) scp->length.QuadPart;
782 #endif
783     cep->DataVersion = (afs_uint32)(scp->dataVersion & 0xFFFFFFFF);
784     cep->callback = afs_data_pointer_to_int32(scp->cbServerp);
785     if (scp->flags & CM_SCACHEFLAG_PURERO) {
786         cm_volume_t *volp = cm_GetVolumeByFID(&scp->fid);
787         if (volp) {
788             cep->cbExpires = volp->cbExpiresRO;
789             cm_PutVolume(volp);
790         }
791     } else {
792         /* TODO: handle time_t */
793         cep->cbExpires = (afs_int32) scp->cbExpires;
794     }
795     cep->refCount = scp->refCount;
796     cep->opens = scp->openReads;
797     cep->writers = scp->openWrites;
798     switch (scp->fileType) {
799     case CM_SCACHETYPE_FILE:
800         cep->mvstat = 0;
801         break;
802     case CM_SCACHETYPE_MOUNTPOINT:
803         cep->mvstat = 1;
804         break;
805     case CM_SCACHETYPE_DIRECTORY:
806         if (scp->fid.vnode == 1 && scp->fid.unique == 1)
807             cep->mvstat = 2;
808         else
809             cep->mvstat = 3;
810         break;
811     case CM_SCACHETYPE_SYMLINK:
812         cep->mvstat = 4;
813         break;
814     case CM_SCACHETYPE_DFSLINK:
815         cep->mvstat = 5;
816         break;
817     case CM_SCACHETYPE_INVALID:
818         cep->mvstat = 6;
819         break;
820     }
821     cep->states = 0;
822     if (scp->flags & CM_SCACHEFLAG_STATD)
823         cep->states |= 1;
824     if (scp->flags & CM_SCACHEFLAG_RO || scp->flags & CM_SCACHEFLAG_PURERO)
825         cep->states |= 4;
826     if (scp->fileType == CM_SCACHETYPE_MOUNTPOINT &&
827         scp->mountPointStringp[0])
828         cep->states |= 8;
829     if (scp->flags & CM_SCACHEFLAG_WAITING)
830         cep->states |= 0x40;
831     code = 0;
832
833     /*
834      * Return our results.
835      */
836   fcnDone:
837     lock_ReleaseRead(&cm_scacheLock);
838
839     return (code);
840 }
841
842 /* debug interface: not implemented */
843 int
844 SRXAFSCB_XStatsVersion(struct rx_call *callp, long *vp)
845 {
846     struct rx_connection *connp;
847     struct rx_peer *peerp;
848     unsigned long host = 0;
849     unsigned short port = 0;
850
851     if (cm_shutdown)
852         return 1;
853
854     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
855         host = rx_HostOf(peerp);
856         port = rx_PortOf(peerp);
857     }
858
859     osi_Log2(afsd_logp, "SRXAFSCB_XStatsVersion from host 0x%x port %d - not implemented",
860              ntohl(host), ntohs(port));
861     *vp = -1;
862
863     return RXGEN_OPCODE;
864 }
865
866 /* debug interface: not implemented */
867 int
868 SRXAFSCB_GetXStats(struct rx_call *callp, long cvn, long coln, long *srvp, long *timep,
869                    AFSCB_CollData *datap)
870 {
871     struct rx_connection *connp;
872     struct rx_peer *peerp;
873     unsigned long host = 0;
874     unsigned short port = 0;
875
876     if (cm_shutdown)
877         return 1;
878
879     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
880         host = rx_HostOf(peerp);
881         port = rx_PortOf(peerp);
882     }
883
884     osi_Log2(afsd_logp, "SRXAFSCB_GetXStats from host 0x%x port %d - not implemented",
885              ntohl(host), ntohs(port));
886
887     return RXGEN_OPCODE;
888 }
889
890 int
891 SRXAFSCB_InitCallBackState2(struct rx_call *callp, struct interfaceAddr* addr)
892 {
893     if (cm_shutdown)
894         return 1;
895
896     osi_Log0(afsd_logp, "SRXAFSCB_InitCallBackState2 ->");
897
898     return SRXAFSCB_InitCallBackState3(callp, NULL);
899 }
900
901 /* debug interface */
902 int
903 SRXAFSCB_WhoAreYou(struct rx_call *callp, struct interfaceAddr* addr)
904 {
905     int i;
906     long code;
907     struct rx_connection *connp;
908     struct rx_peer *peerp;
909     unsigned long host = 0;
910     unsigned short port = 0;
911
912     if (cm_shutdown)
913         return 1;
914
915     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
916         host = rx_HostOf(peerp);
917         port = rx_PortOf(peerp);
918     }
919
920     osi_Log2(afsd_logp, "SRXAFSCB_WhoAreYou from host 0x%x port %d",
921               ntohl(host),
922               ntohs(port));
923
924     lock_ObtainRead(&cm_syscfgLock);
925     if (cm_LanAdapterChangeDetected) {
926         lock_ConvertRToW(&cm_syscfgLock);
927         if (cm_LanAdapterChangeDetected) {
928             /* get network related info */
929             cm_noIPAddr = CM_MAXINTERFACE_ADDR;
930             code = syscfg_GetIFInfo(&cm_noIPAddr,
931                                      cm_IPAddr, cm_SubnetMask,
932                                      cm_NetMtu, cm_NetFlags);
933             cm_LanAdapterChangeDetected = 0;
934         }
935         lock_ConvertWToR(&cm_syscfgLock);
936     }
937
938     /* return all network interface addresses */
939     addr->numberOfInterfaces = cm_noIPAddr;
940     addr->uuid = cm_data.Uuid;
941     for ( i=0; i < cm_noIPAddr; i++ ) {
942         addr->addr_in[i] = cm_IPAddr[i];
943         addr->subnetmask[i] = cm_SubnetMask[i];
944         addr->mtu[i] = (rx_mtu == -1 || (rx_mtu != -1 && cm_NetMtu[i] < rx_mtu)) ? 
945             cm_NetMtu[i] : rx_mtu;
946     }
947
948     lock_ReleaseRead(&cm_syscfgLock);
949
950     return 0;
951 }
952
953 int
954 SRXAFSCB_InitCallBackState3(struct rx_call *callp, afsUUID* serverUuid)
955 {
956     char *p = NULL;
957
958     struct sockaddr_in taddr;
959     cm_server_t *tsp = NULL;
960     cm_scache_t *scp = NULL;
961     cm_cell_t* cellp = NULL;
962     afs_uint32 hash;
963     int discarded;
964     struct rx_connection *connp;
965     struct rx_peer *peerp;
966     unsigned long host = 0;
967     unsigned short port = 0;
968
969     if (cm_shutdown)
970         return 1;
971
972     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
973         host = rx_HostOf(peerp);
974         port = rx_PortOf(peerp);
975
976         if (serverUuid) {
977             if (UuidToString((UUID *)serverUuid, &p) == RPC_S_OK) {
978                 osi_Log1(afsd_logp, "SRXAFSCB_InitCallBackState3 Uuid%s ->",osi_LogSaveString(afsd_logp,p));
979                 RpcStringFree(&p);
980             } 
981
982             tsp = cm_FindServerByUuid(serverUuid, CM_SERVER_FILE);
983         }
984         if (!tsp)
985             tsp = cm_FindServerByIP(host, port, CM_SERVER_FILE);
986         if (tsp) {
987             cellp = tsp->cellp;
988             cm_PutServer(tsp);
989         }
990
991         if (!cellp)
992             osi_Log2(afsd_logp, "SRXAFSCB_InitCallBackState3 from host 0x%x port %d",
993                      ntohl(host),
994                      ntohs(port));
995         else 
996             osi_Log3(afsd_logp, "SRXAFSCB_InitCallBackState3 from host 0x%x port %d for cell %s",
997                      ntohl(host),
998                      ntohs(port),
999                      cellp->name /* does not need to be saved, doesn't change */);
1000     } else {
1001         osi_Log0(afsd_logp, "SRXAFSCB_InitCallBackState3 from unknown host");
1002     }
1003
1004     if (connp && peerp) {
1005         taddr.sin_family = AF_INET;
1006         taddr.sin_addr.s_addr = rx_HostOf(rx_PeerOf(rx_ConnectionOf(callp)));
1007         taddr.sin_port = rx_PortOf(rx_PeerOf(rx_ConnectionOf(callp)));
1008
1009         tsp = cm_FindServer(&taddr, CM_SERVER_FILE);
1010
1011         osi_Log1(afsd_logp, "InitCallbackState3 server %x", tsp);
1012         
1013         /* record the callback in the racing revokes structure.  This
1014          * shouldn't be necessary, since we shouldn't be making callback
1015          * granting calls while we're going to get an initstate call,
1016          * but there probably are some obscure races, so better safe
1017          * than sorry.
1018          *
1019          * We do this first since we don't hold the cm_scacheLock and vnode
1020          * locks over the entire callback scan operation below.  The
1021          * big loop below is guaranteed to hit any callback already
1022          * processed.  The call to RecordRacingRevoke is guaranteed
1023          * to kill any callback that is currently being returned.
1024          * Anything that sneaks past both must start
1025          * after the call to RecordRacingRevoke.
1026          */
1027         if (cellp) {
1028             cm_fid_t fid;
1029
1030             fid.cell = cellp->cellID;
1031             fid.volume = fid.vnode = fid.unique = 0;
1032
1033             cm_RecordRacingRevoke(&fid, CM_RACINGFLAG_CANCELALL);
1034         } else {
1035             cm_RecordRacingRevoke(NULL, CM_RACINGFLAG_CANCELALL);
1036         }
1037
1038         /* now search all vnodes looking for guys with this callback, if we
1039          * found it, or guys with any callbacks, if we didn't find the server
1040          * (that's how multihomed machines will appear and how we'll handle
1041          * them, albeit a little inefficiently).  That is, we're discarding all
1042          * callbacks from all hosts if we get an initstate call from an unknown
1043          * host.  Since these calls are rare, and multihomed servers
1044          * are "rare," hopefully this won't be a problem.
1045          */
1046         lock_ObtainWrite(&cm_scacheLock);
1047         for (hash = 0; hash < cm_data.scacheHashTableSize; hash++) {
1048             for (scp=cm_data.scacheHashTablep[hash]; scp; scp=scp->nextp) {
1049                 cm_HoldSCacheNoLock(scp);
1050                 lock_ReleaseWrite(&cm_scacheLock);
1051                 lock_ObtainWrite(&scp->rw);
1052                 discarded = 0;
1053                 if (scp->cbExpires > 0 && scp->cbServerp != NULL) {
1054                     /* we have a callback, now decide if we should clear it */
1055                     if (cm_ServerEqual(scp->cbServerp, tsp)) {
1056                         osi_Log4(afsd_logp, "InitCallbackState3 Discarding SCache scp 0x%p vol %u vn %u uniq %u", 
1057                                   scp, scp->fid.volume, scp->fid.vnode, scp->fid.unique);
1058                         cm_DiscardSCache(scp);
1059                         discarded = 1;
1060                     }
1061                 }
1062                 lock_ReleaseWrite(&scp->rw);
1063                 if (discarded)
1064                     cm_CallbackNotifyChange(scp);
1065                 lock_ObtainWrite(&cm_scacheLock);
1066                 cm_ReleaseSCacheNoLock(scp);
1067
1068                 if (discarded && (scp->flags & CM_SCACHEFLAG_PURERO)) {
1069                     cm_volume_t *volp = cm_GetVolumeByFID(&scp->fid);
1070                     if (volp) {
1071                         if (volp->cbExpiresRO != 0)
1072                             volp->cbExpiresRO = 0;
1073                         cm_PutVolume(volp);
1074                     }
1075                 }
1076
1077             }   /* search one hash bucket */
1078         }       /* search all hash buckets */
1079         
1080         lock_ReleaseWrite(&cm_scacheLock);
1081         
1082         if (tsp) {
1083             /* reset the No flags on the server */
1084             cm_SetServerNo64Bit(tsp, 0);
1085             cm_SetServerNoInlineBulk(tsp, 0);
1086
1087             /* we're done with the server structure */
1088             cm_PutServer(tsp);
1089         } 
1090     }
1091     return 0;
1092 }
1093
1094 /* debug interface */
1095 int
1096 SRXAFSCB_ProbeUuid(struct rx_call *callp, afsUUID* clientUuid)
1097 {
1098     struct rx_connection *connp;
1099     struct rx_peer *peerp;
1100     unsigned long host = 0;
1101     unsigned short port = 0;
1102     char *p,*q;
1103     int code = 0;
1104
1105     if (cm_shutdown)
1106         return 1;
1107
1108     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1109         host = rx_HostOf(peerp);
1110         port = rx_PortOf(peerp);
1111     }
1112
1113     if ( !afs_uuid_equal(&cm_data.Uuid, clientUuid) ) {
1114         UuidToString((UUID *)&cm_data.Uuid, &p);
1115         UuidToString((UUID *)clientUuid, &q);
1116         osi_Log4(afsd_logp, "SRXAFSCB_ProbeUuid %s != %s from host 0x%x port %d", 
1117                   osi_LogSaveString(afsd_logp,p), 
1118                   osi_LogSaveString(afsd_logp,q),
1119                   ntohl(host),
1120                   ntohs(port));
1121         RpcStringFree(&p);
1122         RpcStringFree(&q);
1123
1124         code = 1;       /* failure */
1125     } else
1126         osi_Log2(afsd_logp, "SRXAFSCB_ProbeUuid (success) from host 0x%x port %d",
1127                   ntohl(host),
1128                   ntohs(port));
1129
1130     return code;
1131 }
1132
1133 /* debug interface */
1134 static int 
1135 GetCellCommon(afs_int32 a_cellnum, char **a_name, serverList *a_hosts)
1136 {
1137     afs_int32 sn;
1138     cm_cell_t * cellp;
1139     cm_serverRef_t * serverRefp; 
1140
1141     cellp = cm_FindCellByID(a_cellnum, CM_FLAG_NOPROBE);
1142     if (!cellp) {
1143         *a_name = strdup("");
1144         return 0;
1145     }
1146
1147     lock_ObtainRead(&cm_serverLock);
1148     *a_name = strdup(cellp->name);
1149
1150     for ( sn = 0, serverRefp = cellp->vlServersp; 
1151           sn < AFSMAXCELLHOSTS && serverRefp;
1152           sn++, serverRefp = serverRefp->next);
1153
1154     a_hosts->serverList_len = sn;
1155     a_hosts->serverList_val = (afs_int32 *)xdr_alloc(sn * sizeof(afs_int32));
1156
1157     for ( sn = 0, serverRefp = cellp->vlServersp; 
1158           sn < AFSMAXCELLHOSTS && serverRefp;
1159           sn++, serverRefp = serverRefp->next)
1160     {
1161         a_hosts->serverList_val[sn] = ntohl(serverRefp->server->addr.sin_addr.s_addr);
1162     }
1163
1164     lock_ReleaseRead(&cm_serverLock);
1165     return 0;
1166 }
1167
1168 /* debug interface */
1169 int 
1170 SRXAFSCB_GetCellByNum(struct rx_call *callp, afs_int32 a_cellnum,
1171                       char **a_name, serverList *a_hosts)
1172 {
1173     struct rx_connection *connp;
1174     struct rx_peer *peerp;
1175     unsigned long host = 0;
1176     unsigned short port = 0;
1177     int rc;
1178
1179     if (cm_shutdown)
1180         return 1;
1181
1182     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1183         host = rx_HostOf(peerp);
1184         port = rx_PortOf(peerp);
1185     }
1186
1187     osi_Log3(afsd_logp, "SRXAFSCB_GetCellByNum(%d) from host 0x%x port %d",
1188              a_cellnum, ntohl(host), ntohs(port));
1189
1190     a_hosts->serverList_val = 0;
1191     a_hosts->serverList_len = 0;
1192
1193
1194     rc = GetCellCommon(a_cellnum, a_name, a_hosts);
1195
1196     return rc;
1197 }
1198
1199 /* debug interface */
1200 int 
1201 SRXAFSCB_TellMeAboutYourself( struct rx_call *callp, 
1202                               struct interfaceAddr *addr,
1203                               Capabilities * capabilities)
1204 {
1205     int i;
1206     afs_uint32 *dataBuffP;
1207     afs_int32 dataBytes;
1208     long code;
1209     struct rx_connection *connp;
1210     struct rx_peer *peerp;
1211     unsigned long host = 0;
1212     unsigned short port = 0;
1213
1214     if (cm_shutdown)
1215         return 1;
1216
1217     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1218         host = rx_HostOf(peerp);
1219         port = rx_PortOf(peerp);
1220     }
1221
1222     osi_Log2(afsd_logp, "SRXAFSCB_TellMeAboutYourself from host 0x%x port %d",
1223               ntohl(host),
1224               ntohs(port));
1225
1226     lock_ObtainRead(&cm_syscfgLock);
1227     if (cm_LanAdapterChangeDetected) {
1228         lock_ConvertRToW(&cm_syscfgLock);
1229         if (cm_LanAdapterChangeDetected) {
1230             /* get network related info */
1231             cm_noIPAddr = CM_MAXINTERFACE_ADDR;
1232             code = syscfg_GetIFInfo(&cm_noIPAddr,
1233                                      cm_IPAddr, cm_SubnetMask,
1234                                      cm_NetMtu, cm_NetFlags);
1235             cm_LanAdapterChangeDetected = 0;
1236         }
1237         lock_ConvertWToR(&cm_syscfgLock);
1238     }
1239
1240     /* return all network interface addresses */
1241     addr->numberOfInterfaces = cm_noIPAddr;
1242     addr->uuid = cm_data.Uuid;
1243     for ( i=0; i < cm_noIPAddr; i++ ) {
1244         addr->addr_in[i] = cm_IPAddr[i];
1245         addr->subnetmask[i] = cm_SubnetMask[i];
1246         addr->mtu[i] = (rx_mtu == -1 || (rx_mtu != -1 && cm_NetMtu[i] < rx_mtu)) ? 
1247             cm_NetMtu[i] : rx_mtu;
1248     }
1249     lock_ReleaseRead(&cm_syscfgLock);
1250
1251     dataBytes = 1 * sizeof(afs_uint32);
1252     dataBuffP = (afs_uint32 *) xdr_alloc(dataBytes);
1253     dataBuffP[0] = CLIENT_CAPABILITY_ERRORTRANS;
1254     capabilities->Capabilities_len = dataBytes / sizeof(afs_uint32);
1255     capabilities->Capabilities_val = dataBuffP;
1256
1257     return 0;
1258 }
1259
1260 /*------------------------------------------------------------------------
1261  * EXPORTED SRXAFSCB_GetServerPrefs
1262  *
1263  * Description:
1264  *      Routine to list server preferences used by this client.
1265  *
1266  * Arguments:
1267  *      a_call  : Ptr to Rx call on which this request came in.
1268  *      a_index : Input server index
1269  *      a_srvr_addr  : Output server address (0xffffffff on last server)
1270  *      a_srvr_rank  : Output server rank
1271  *
1272  * Returns:
1273  *      0 on success
1274  *
1275  * Environment:
1276  *      Nothing interesting.
1277  *
1278  * Side Effects:
1279  *      As advertised.
1280  *------------------------------------------------------------------------*/
1281
1282 int SRXAFSCB_GetServerPrefs(
1283     struct rx_call *callp,
1284     afs_int32 a_index,
1285     afs_int32 *a_srvr_addr,
1286     afs_int32 *a_srvr_rank)
1287 {
1288     struct rx_connection *connp;
1289     struct rx_peer *peerp;
1290     unsigned long host = 0;
1291     unsigned short port = 0;
1292
1293     if (cm_shutdown)
1294         return 1;
1295
1296     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1297         host = rx_HostOf(peerp);
1298         port = rx_PortOf(peerp);
1299     }
1300
1301     osi_Log2(afsd_logp, "SRXAFSCB_GetServerPrefs from host 0x%x port %d - not implemented",
1302               ntohl(host),
1303               ntohs(port));
1304
1305     *a_srvr_addr = 0xffffffff;
1306     *a_srvr_rank = 0xffffffff;
1307
1308     return 0;
1309 }
1310
1311 /*------------------------------------------------------------------------
1312  * EXPORTED SRXAFSCB_GetCellServDB
1313  *
1314  * Description:
1315  *      Routine to list cells configured for this client
1316  *
1317  * Arguments:
1318  *      a_call  : Ptr to Rx call on which this request came in.
1319  *      a_index : Input cell index
1320  *      a_name  : Output cell name ("" on last cell)
1321  *      a_hosts : Output cell database servers
1322  *
1323  * Returns:
1324  *      0 on success
1325  *
1326  * Environment:
1327  *      Nothing interesting.
1328  *
1329  * Side Effects:
1330  *      As advertised.
1331  *------------------------------------------------------------------------*/
1332
1333 int SRXAFSCB_GetCellServDB(struct rx_call *callp, afs_int32 index, char **a_name, 
1334                            serverList *a_hosts)
1335 {
1336     struct rx_connection *connp;
1337     struct rx_peer *peerp;
1338     unsigned long host = 0;
1339     unsigned short port = 0;
1340     int rc;
1341
1342     if (cm_shutdown)
1343         return 1;
1344
1345     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1346         host = rx_HostOf(peerp);
1347         port = rx_PortOf(peerp);
1348     }
1349
1350     osi_Log2(afsd_logp, "SRXAFSCB_GetCellServDB from host 0x%x port %d - not implemented",
1351              ntohl(host), ntohs(port));
1352
1353 #ifdef AFS_FREELANCE_CLIENT
1354     if (cm_freelanceEnabled && index == 0) {
1355         rc = GetCellCommon(AFS_FAKE_ROOT_CELL_ID, a_name, a_hosts);
1356     } else
1357 #endif
1358     {
1359         rc = GetCellCommon(index+1, a_name, a_hosts);
1360     }
1361     return 0;
1362 }
1363
1364 /*------------------------------------------------------------------------
1365  * EXPORTED SRXAFSCB_GetLocalCell
1366  *
1367  * Description:
1368  *      Routine to return name of client's local cell
1369  *
1370  * Arguments:
1371  *      a_call  : Ptr to Rx call on which this request came in.
1372  *      a_name  : Output cell name
1373  *
1374  * Returns:
1375  *      0 on success
1376  *
1377  * Environment:
1378  *      Nothing interesting.
1379  *
1380  * Side Effects:
1381  *      As advertised.
1382  *------------------------------------------------------------------------*/
1383
1384 int SRXAFSCB_GetLocalCell(struct rx_call *callp, char **a_name)
1385 {
1386     char *t_name;
1387     struct rx_connection *connp;
1388     struct rx_peer *peerp;
1389     unsigned long host = 0;
1390     unsigned short port = 0;
1391
1392     if (cm_shutdown)
1393         return 1;
1394
1395     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1396         host = rx_HostOf(peerp);
1397         port = rx_PortOf(peerp);
1398     }
1399
1400     osi_Log2(afsd_logp, "SRXAFSCB_GetLocalCell from host 0x%x port %d",
1401              ntohl(host), ntohs(port));
1402
1403     if (cm_data.rootCellp) {
1404         t_name = strdup(cm_data.rootCellp->name);
1405     } else {
1406         t_name = (char *)xdr_alloc(1);
1407         t_name[0] = '\0';
1408     }
1409     *a_name = t_name;
1410
1411     return 0;
1412 }
1413
1414
1415 /*
1416  * afs_MarshallCacheConfig - marshall client cache configuration
1417  *
1418  * PARAMETERS
1419  *
1420  * IN callerVersion - the rpc stat version of the caller.
1421  *
1422  * IN config - client cache configuration.
1423  *
1424  * OUT ptr - buffer where configuration is marshalled.
1425  *
1426  * RETURN CODES
1427  *
1428  * Returns void.
1429  */
1430 static void afs_MarshallCacheConfig(
1431     afs_uint32 callerVersion,
1432     cm_initparams_v1 *config,
1433     afs_uint32 *ptr)
1434 {
1435     /*
1436      * We currently only support version 1.
1437      */
1438     *(ptr++) = config->nChunkFiles;
1439     *(ptr++) = config->nStatCaches;
1440     *(ptr++) = config->nDataCaches;
1441     *(ptr++) = config->nVolumeCaches;
1442     *(ptr++) = config->firstChunkSize;
1443     *(ptr++) = config->otherChunkSize;
1444     *(ptr++) = config->cacheSize;
1445     *(ptr++) = config->setTime;
1446     *(ptr++) = config->memCache;
1447
1448 }
1449  
1450
1451 /*------------------------------------------------------------------------
1452  * EXPORTED SRXAFSCB_GetCacheConfig
1453  *
1454  * Description:
1455  *      Routine to return parameters used to initialize client cache.
1456  *      Client may request any format version. Server may not return
1457  *      format version greater than version requested by client.
1458  *
1459  * Arguments:
1460  *      a_call:        Ptr to Rx call on which this request came in.
1461  *      callerVersion: Data format version desired by the client.
1462  *      serverVersion: Data format version of output data.
1463  *      configCount:   Number bytes allocated for output data.
1464  *      config:        Client cache configuration.
1465  *
1466  * Returns:
1467  *      0 on success
1468  *
1469  * Environment:
1470  *      Nothing interesting.
1471  *
1472  * Side Effects:
1473  *      As advertised.
1474  *------------------------------------------------------------------------*/
1475
1476 int SRXAFSCB_GetCacheConfig(struct rx_call *callp,
1477                             afs_uint32 callerVersion,
1478                             afs_uint32 *serverVersion,
1479                             afs_uint32 *configCount,
1480                             cacheConfig *config)
1481 {
1482     afs_uint32 *t_config;
1483     size_t allocsize;
1484     extern cm_initparams_v1 cm_initParams;
1485     struct rx_connection *connp;
1486     struct rx_peer *peerp;
1487     unsigned long host = 0;
1488     unsigned short port = 0;
1489
1490     if (cm_shutdown)
1491         return 1;
1492
1493     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1494         host = rx_HostOf(peerp);
1495         port = rx_PortOf(peerp);
1496     }
1497
1498     osi_Log2(afsd_logp, "SRXAFSCB_GetCacheConfig from host 0x%x port %d - version 1 only",
1499              ntohl(host), ntohs(port));
1500
1501     /*
1502      * Currently only support version 1
1503      */
1504     allocsize = sizeof(cm_initparams_v1);
1505     t_config = (afs_uint32 *)xdr_alloc(allocsize);
1506
1507     afs_MarshallCacheConfig(callerVersion, &cm_initParams, t_config);
1508
1509     *serverVersion = AFS_CLIENT_RETRIEVAL_FIRST_EDITION;
1510 #ifdef DEBUG
1511 #ifndef SIZE_MAX
1512 #define SIZE_MAX UINT_MAX
1513 #endif
1514     osi_assertx(allocsize < SIZE_MAX, "allocsize >= SIZE_MAX");
1515 #endif
1516     *configCount = (afs_uint32)allocsize;
1517     config->cacheConfig_val = t_config;
1518     config->cacheConfig_len = (*configCount)/sizeof(afs_uint32);
1519
1520     return 0;
1521 }
1522
1523 /* called by afsd without any locks to initialize this module */
1524 void cm_InitCallback(void)
1525 {
1526     lock_InitializeRWLock(&cm_callbackLock, "cm_callbackLock", LOCK_HIERARCHY_CALLBACK_GLOBAL);
1527     cm_activeCallbackGrantingCalls = 0;
1528 }
1529
1530 /* called with locked scp; tells us whether we've got a callback.
1531  * Expirations are checked by a background daemon so as to make
1532  * this function as inexpensive as possible
1533  */
1534 int cm_HaveCallback(cm_scache_t *scp)
1535 {
1536 #ifdef AFS_FREELANCE_CLIENT
1537     // yj: we handle callbacks specially for callbacks on the root directory
1538     // Since it's local, we almost always say that we have callback on it
1539     // The only time we send back a 0 is if we're need to initialize or
1540     // reinitialize the fake directory
1541
1542     // There are 2 state variables cm_fakeGettingCallback and cm_fakeDirCallback
1543     // cm_fakeGettingCallback is 1 if we're in the process of initialization and
1544     // hence should return false. it's 0 otherwise
1545     // cm_fakeDirCallback is 0 if we haven't loaded the fake directory, it's 1
1546     // if the fake directory is loaded and this is the first time cm_HaveCallback
1547     // is called since then. We return false in this case to allow cm_GetCallback
1548     // to be called because cm_GetCallback has some initialization work to do.
1549     // If cm_fakeDirCallback is 2, then it means that the fake directory is in
1550     // good shape and we simply return true, provided no change is detected.
1551     int fdc, fgc;
1552
1553     if (cm_freelanceEnabled && 
1554          scp->fid.cell==AFS_FAKE_ROOT_CELL_ID && scp->fid.volume==AFS_FAKE_ROOT_VOL_ID) {
1555         lock_ObtainMutex(&cm_Freelance_Lock);
1556         fdc = cm_fakeDirCallback;
1557         fgc = cm_fakeGettingCallback;
1558         lock_ReleaseMutex(&cm_Freelance_Lock);
1559             
1560         if (fdc==1) {   // first call since init
1561             return 0;
1562         } else if (fdc==2 && !fgc) {    // we're in good shape
1563             if (cm_getLocalMountPointChange()) {        // check for changes
1564                 cm_clearLocalMountPointChange(); // clear the changefile
1565                 lock_ReleaseWrite(&scp->rw);      // this is re-locked in reInitLocalMountPoints
1566                 cm_reInitLocalMountPoints();    // start reinit
1567                 lock_ObtainWrite(&scp->rw);      // now get the lock back 
1568                 return 0;
1569             }
1570             return (cm_data.fakeDirVersion == scp->dataVersion);
1571         }
1572         return 0;
1573     }
1574 #endif
1575
1576     if (scp->cbServerp != NULL) {
1577         return 1;
1578     } else if (cm_OfflineROIsValid) {
1579         cm_volume_t *volp = cm_GetVolumeByFID(&scp->fid);
1580         if (volp) {
1581             switch (cm_GetVolumeStatus(volp, scp->fid.volume)) {
1582             case vl_offline:
1583             case vl_alldown:
1584             case vl_unknown:
1585                 cm_PutVolume(volp);
1586                 return 1;
1587             default:
1588                 cm_PutVolume(volp);
1589                 return 0;
1590             }
1591         }
1592         return 1;
1593     }
1594     return 0;
1595 }
1596
1597 /* need to detect a broken callback that races with our obtaining a callback.
1598  * Need to be able to do this even if we don't know the file ID of the file
1599  * we're breaking the callback on at the time we start the acquisition of the
1600  * callback (as in the case where we are creating a file).
1601  *
1602  * So, we start by writing down the count of the # of callbacks we've received
1603  * so far, and bumping a global counter of the # of callback granting calls
1604  * outstanding (all done under cm_callbackLock).
1605  *
1606  * When we're back from the call, we look at all of the callback revokes with
1607  * counter numbers greater than the one we recorded in our caller's structure,
1608  * and replay those that are higher than when we started the call.
1609  * 
1610  * We free all the structures in the queue when the count of the # of outstanding
1611  * callback-granting calls drops to zero.
1612  *
1613  * We call this function with the scp locked, too, but in its current implementation,
1614  * this knowledge is not used.
1615  */
1616 void cm_StartCallbackGrantingCall(cm_scache_t *scp, cm_callbackRequest_t *cbrp)
1617 {
1618     lock_ObtainWrite(&cm_callbackLock);
1619     cbrp->callbackCount = cm_callbackCount;
1620     cm_activeCallbackGrantingCalls++;
1621     cbrp->startTime = time(NULL);
1622     cbrp->serverp = NULL;
1623     lock_ReleaseWrite(&cm_callbackLock);
1624 }
1625
1626 /* Called at the end of a callback-granting call, to remove the callback
1627  * info from the scache entry, if necessary.
1628  *
1629  * Called with scp write locked, so we can discard the callbacks easily with
1630  * this locking hierarchy.
1631  */
1632 void cm_EndCallbackGrantingCall(cm_scache_t *scp, cm_callbackRequest_t *cbrp,
1633                                 AFSCallBack *cbp, long flags)
1634 {
1635     cm_racingRevokes_t *revp;           /* where we are */
1636     cm_racingRevokes_t *nrevp;          /* where we'll be next */
1637     int freeFlag;
1638     cm_server_t * serverp = NULL;
1639     int discardScp = 0, discardVolCB = 0;
1640
1641     lock_ObtainWrite(&cm_callbackLock);
1642     if (flags & CM_CALLBACK_MAINTAINCOUNT) {
1643         osi_assertx(cm_activeCallbackGrantingCalls > 0, 
1644                     "CM_CALLBACK_MAINTAINCOUNT && cm_activeCallbackGrantingCalls == 0");
1645     }
1646     else {
1647         osi_assertx(cm_activeCallbackGrantingCalls-- > 0,
1648                     "!CM_CALLBACK_MAINTAINCOUNT && cm_activeCallbackGrantingCalls == 0");
1649     }
1650     if (cm_activeCallbackGrantingCalls == 0) 
1651         freeFlag = 1;
1652     else 
1653         freeFlag = 0;
1654
1655     /* record the callback; we'll clear it below if we really lose it */
1656     if (cbrp) {
1657         if (scp) {
1658             if (!cm_ServerEqual(scp->cbServerp, cbrp->serverp)) {
1659                 serverp = scp->cbServerp;
1660                 if (!freeFlag)
1661                     cm_GetServer(cbrp->serverp);
1662                 scp->cbServerp = cbrp->serverp;
1663             } else {
1664                 if (freeFlag)
1665                     serverp = cbrp->serverp;
1666             }
1667             scp->cbExpires = cbrp->startTime + cbp->ExpirationTime;
1668         } else {
1669             if (freeFlag)
1670                 serverp = cbrp->serverp;
1671         }
1672         if (freeFlag)
1673             cbrp->serverp = NULL;
1674     }
1675
1676     /* a callback was actually revoked during our granting call, so
1677      * run down the list of revoked fids, looking for ours.
1678      * If activeCallbackGrantingCalls is zero, free the elements, too.
1679      *
1680      * May need to go through entire list just to do the freeing.
1681      */
1682     for (revp = cm_racingRevokesp; revp; revp = nrevp) {
1683         nrevp = (cm_racingRevokes_t *) osi_QNext(&revp->q);
1684         /* if this callback came in later than when we started the
1685          * callback-granting call, and if this fid is the right fid,
1686          * then clear the callback.
1687          */
1688         if (scp && cbrp && cbrp->callbackCount != cm_callbackCount
1689              && revp->callbackCount > cbrp->callbackCount
1690              && (( scp->fid.volume == revp->fid.volume &&
1691                    scp->fid.vnode == revp->fid.vnode &&
1692                    scp->fid.unique == revp->fid.unique)
1693                   ||
1694                   ((revp->flags & CM_RACINGFLAG_CANCELVOL) &&
1695                     scp->fid.volume == revp->fid.volume)
1696                   ||
1697                   ((revp->flags & CM_RACINGFLAG_CANCELALL) && 
1698                    (revp->fid.cell == 0 || scp->fid.cell == revp->fid.cell)))) {
1699             /* this one matches */
1700             osi_Log4(afsd_logp,
1701                       "Racing revoke scp 0x%p old cbc %d rev cbc %d cur cbc %d",
1702                       scp,
1703                       cbrp->callbackCount, revp->callbackCount,
1704                       cm_callbackCount);
1705             discardScp = 1;
1706             if ((scp->flags & CM_SCACHEFLAG_PURERO) && 
1707                  (revp->flags & CM_RACINGFLAG_ALL)) {
1708                 cm_volume_t *volp = cm_GetVolumeByFID(&scp->fid);
1709                 if (volp) {
1710                     volp->cbExpiresRO = 0;
1711                     cm_PutVolume(volp);
1712                 }
1713             }
1714         }
1715         if (freeFlag) 
1716             free(revp);
1717     }
1718
1719     /* if we freed the list, zap the pointer to it */
1720     if (freeFlag) 
1721         cm_racingRevokesp = NULL;
1722
1723     lock_ReleaseWrite(&cm_callbackLock);
1724
1725     if ( discardScp ) {
1726         cm_DiscardSCache(scp);
1727         lock_ReleaseWrite(&scp->rw);
1728         cm_CallbackNotifyChange(scp);
1729         lock_ObtainWrite(&scp->rw);
1730     } else {
1731         if (scp && scp->flags & CM_SCACHEFLAG_PURERO) {
1732             cm_volume_t * volp = cm_GetVolumeByFID(&scp->fid);
1733             if (volp) {
1734                 /* If the volume has a valid callback from the same
1735                  * server as issued this latest callback and we know
1736                  * the last update time of the RO volume,
1737                  * then the last update time of the RO volume
1738                  * must not have changed.  Otherwise, we must obtain
1739                  * the volume status info from the volserver that
1740                  * matches the file server the callback was received
1741                  * from.
1742                  */
1743                 if (cm_readonlyVolumeVersioning &&
1744                     (volp->cbExpiresRO == 0 || volp->cbServerpRO != scp->cbServerp)) {
1745                     cm_server_t *volserverp;
1746
1747                     volserverp = cm_FindServer(&scp->cbServerp->addr, CM_SERVER_VOL);
1748                     if (volserverp) {
1749                         afs_int32 vcode = -1, code = -1;
1750                         volEntries volumeInfo;
1751                         struct nvldbentry entry;
1752                         int i;
1753                         afs_uint32 addr = volserverp->addr.sin_addr.s_addr;
1754                         cm_cell_t *cellp;
1755                         cm_conn_t *connp;
1756                         struct rx_connection * rxconnp;
1757                         cm_req_t req;
1758
1759                         cm_InitReq(&req);
1760
1761                         cellp = cm_FindCellByID(scp->fid.cell, 0);
1762                         code = cm_ConnByMServers(cellp->vlServersp, cm_rootUserp, &req, &connp);
1763                         if (code == 0) {
1764                             rxconnp = cm_GetRxConn(connp);
1765                             vcode = VL_GetEntryByIDN(rxconnp, scp->fid.volume, -1, &entry);
1766                             rx_PutConnection(rxconnp);
1767                         }
1768                         if (vcode == 0) {
1769                             for (i=0, code=-1; i < entry.nServers; i++) {
1770                                 if ( entry.serverNumber[i] == htonl(addr)) {
1771                                     code = cm_ConnByServer(volserverp, cm_rootUserp, &connp);
1772                                     if (code == 0) {
1773                                         rxconnp = cm_GetRxConn(connp);
1774                                         memset(&volumeInfo, 0, sizeof(volumeInfo));
1775                                         code = AFSVolListOneVolume(rxconnp, entry.serverPartition[i], scp->fid.volume, &volumeInfo);
1776                                         rx_PutConnection(rxconnp);
1777                                     }
1778                                     break;
1779                                 }
1780                             }
1781                         }
1782                         volp->lastUpdateRO = (vcode == 0 && code == 0 ? volumeInfo.volEntries_val->updateDate : 0);
1783                         cm_PutServer(volserverp);
1784                     }
1785                 }
1786
1787                 scp->lastUpdateRO = volp->lastUpdateRO;
1788                 volp->cbExpiresRO = scp->cbExpires;
1789                 if (volp->cbServerpRO != scp->cbServerp) {
1790                     if (volp->cbServerpRO)
1791                         cm_PutServer(volp->cbServerpRO);
1792                     cm_GetServer(scp->cbServerp);
1793                     volp->cbServerpRO = scp->cbServerp;
1794                 }
1795                 cm_PutVolume(volp);
1796             }
1797         }
1798     }
1799
1800     if ( serverp ) {
1801         lock_ObtainWrite(&cm_serverLock);
1802         cm_FreeServer(serverp);
1803         lock_ReleaseWrite(&cm_serverLock);
1804     }
1805 }
1806
1807 /* if flags is 1, we want to force the code to make one call, anyway.
1808  * called with locked scp; returns with same.
1809  */
1810 long cm_GetCallback(cm_scache_t *scp, struct cm_user *userp,
1811                     struct cm_req *reqp, long flags)
1812 {
1813     long code = 0;
1814     cm_conn_t *connp = NULL;
1815     AFSFetchStatus afsStatus;
1816     AFSVolSync volSync;
1817     AFSCallBack callback;
1818     AFSFid tfid;
1819     cm_callbackRequest_t cbr;
1820     int mustCall;
1821     cm_fid_t sfid;
1822     struct rx_connection * rxconnp = NULL;
1823     int syncop_done = 0;
1824
1825     osi_Log4(afsd_logp, "GetCallback scp 0x%p cell %d vol %d flags %lX", 
1826              scp, scp->fid.cell, scp->fid.volume, flags);
1827
1828 #ifdef AFS_FREELANCE_CLIENT
1829     // The case where a callback is needed on /afs is handled
1830     // specially. We need to fetch the status by calling
1831     // cm_MergeStatus and mark that cm_fakeDirCallback is 2
1832     if (cm_freelanceEnabled &&
1833         (scp->fid.cell==AFS_FAKE_ROOT_CELL_ID &&
1834          scp->fid.volume==AFS_FAKE_ROOT_VOL_ID)) {
1835
1836         code = cm_SyncOp(scp, NULL, userp, reqp, 0,
1837                           CM_SCACHESYNC_FETCHSTATUS | CM_SCACHESYNC_GETCALLBACK);
1838         if (code)
1839             goto done;
1840         syncop_done = 1;
1841
1842         if (cm_fakeDirCallback != 2) {
1843             // Start by indicating that we're in the process
1844             // of fetching the callback
1845             lock_ObtainMutex(&cm_Freelance_Lock);
1846             osi_Log0(afsd_logp,"GetCallback Freelance fakeGettingCallback=1");
1847             cm_fakeGettingCallback = 1;
1848             lock_ReleaseMutex(&cm_Freelance_Lock);
1849
1850             memset(&afsStatus, 0, sizeof(afsStatus));
1851             memset(&volSync, 0, sizeof(volSync));
1852
1853             // Fetch the status info 
1854             cm_MergeStatus(NULL, scp, &afsStatus, &volSync, userp, reqp, 0);
1855
1856             // Indicate that the callback is not done
1857             lock_ObtainMutex(&cm_Freelance_Lock);
1858             osi_Log0(afsd_logp,"GetCallback Freelance fakeDirCallback=2");
1859             cm_fakeDirCallback = 2;
1860
1861             // Indicate that we're no longer fetching the callback
1862             osi_Log0(afsd_logp,"GetCallback Freelance fakeGettingCallback=0");
1863             cm_fakeGettingCallback = 0;
1864             lock_ReleaseMutex(&cm_Freelance_Lock);
1865         }
1866         goto done;
1867     }
1868 #endif /* AFS_FREELANCE_CLIENT */
1869         
1870     mustCall = (flags & 1);
1871     cm_AFSFidFromFid(&tfid, &scp->fid);
1872     while (1) {
1873         if (!mustCall && cm_HaveCallback(scp))
1874             break;
1875
1876         /* turn off mustCall, since it has now forced us past the check above */
1877         mustCall = 0;
1878
1879         /* otherwise, we have to make an RPC to get the status */
1880         if (!syncop_done) {
1881             code = cm_SyncOp(scp, NULL, userp, reqp, 0, 
1882                              CM_SCACHESYNC_FETCHSTATUS | CM_SCACHESYNC_GETCALLBACK);
1883             if (code)
1884                 break;
1885             syncop_done = 1;
1886         }
1887         cm_StartCallbackGrantingCall(scp, &cbr);
1888         sfid = scp->fid;
1889         lock_ReleaseWrite(&scp->rw);
1890                 
1891         /* now make the RPC */
1892         osi_Log4(afsd_logp, "CALL FetchStatus scp 0x%p vol %u vn %u uniq %u", 
1893                  scp, sfid.volume, sfid.vnode, sfid.unique);
1894         do {
1895             code = cm_ConnFromFID(&sfid, userp, reqp, &connp);
1896             if (code) 
1897                 continue;
1898
1899             rxconnp = cm_GetRxConn(connp);
1900             code = RXAFS_FetchStatus(rxconnp, &tfid,
1901                                      &afsStatus, &callback, &volSync);
1902             rx_PutConnection(rxconnp);
1903
1904         } while (cm_Analyze(connp, userp, reqp, &sfid, &volSync, NULL,
1905                             &cbr, code));
1906         code = cm_MapRPCError(code, reqp);
1907         if (code)
1908             osi_Log4(afsd_logp, "CALL FetchStatus FAILURE code 0x%x scp 0x%p vol %u vn %u", 
1909                      code, scp, scp->fid.volume, scp->fid.vnode);
1910         else
1911             osi_Log4(afsd_logp, "CALL FetchStatus SUCCESS scp 0x%p vol %u vn %u uniq %u", 
1912                      scp, scp->fid.volume, scp->fid.vnode, scp->fid.unique);
1913
1914         lock_ObtainWrite(&scp->rw);
1915         if (code == 0) {
1916             cm_EndCallbackGrantingCall(scp, &cbr, &callback, 0);
1917             cm_MergeStatus(NULL, scp, &afsStatus, &volSync, userp, reqp, 0);
1918         } else {
1919             cm_EndCallbackGrantingCall(NULL, &cbr, NULL, 0);
1920         }
1921
1922         /* if we got an error, return to caller */
1923         if (code)
1924             break;
1925     }
1926
1927   done:
1928     if (syncop_done)
1929         cm_SyncOpDone(scp, NULL, CM_SCACHESYNC_FETCHSTATUS | CM_SCACHESYNC_GETCALLBACK);
1930     
1931     if (code) {
1932         osi_Log2(afsd_logp, "GetCallback Failed code 0x%x scp 0x%p -->",code, scp);
1933         osi_Log4(afsd_logp, "            cell %u vol %u vn %u uniq %u",
1934                  scp->fid.cell, scp->fid.volume, scp->fid.vnode, scp->fid.unique);
1935     } else {
1936         osi_Log3(afsd_logp, "GetCallback Complete scp 0x%p cell %d vol %d", 
1937                   scp, scp->fid.cell, scp->fid.volume);
1938     }
1939
1940     return code;
1941 }
1942
1943
1944 /* called with cm_scacheLock held */
1945 long cm_CBServersUp(cm_scache_t *scp, time_t * downTime)
1946 {
1947     cm_vol_state_t *statep;
1948     cm_volume_t * volp;
1949     afs_uint32 volID = scp->fid.volume;
1950     cm_serverRef_t *tsrp;
1951     int found;
1952
1953     *downTime = 0;
1954
1955     if (scp->cbServerp == NULL)
1956         return 1;
1957
1958     volp = cm_GetVolumeByFID(&scp->fid);
1959     if (!volp)
1960         return 1;
1961
1962     statep = cm_VolumeStateByID(volp, volID);
1963     cm_PutVolume(volp);
1964     if (statep->state == vl_online)
1965         return 1;
1966
1967     for (found = 0,tsrp = statep->serversp; tsrp; tsrp=tsrp->next) {
1968         if (tsrp->status == srv_deleted)
1969             continue;
1970         if (cm_ServerEqual(tsrp->server, scp->cbServerp))
1971             found = 1;
1972         if (tsrp->server->downTime > *downTime)
1973             *downTime = tsrp->server->downTime;
1974     }
1975
1976     /* if the cbServerp does not match the current volume server list
1977      * we report the callback server as up so the callback can be 
1978      * expired.
1979      */
1980     return(found ? 0 : 1);
1981 }
1982
1983 /* called periodically by cm_daemon to shut down use of expired callbacks */
1984 void cm_CheckCBExpiration(void)
1985 {
1986     afs_uint32 i;
1987     cm_scache_t *scp;
1988     time_t now, downTime;
1989         
1990     osi_Log0(afsd_logp, "CheckCBExpiration");
1991
1992     now = time(NULL);
1993     lock_ObtainWrite(&cm_scacheLock);
1994     for (i=0; i<cm_data.scacheHashTableSize; i++) {
1995         for (scp = cm_data.scacheHashTablep[i]; scp; scp=scp->nextp) {
1996             downTime = 0;
1997             if (scp->flags & CM_SCACHEFLAG_PURERO) {
1998                 cm_volume_t *volp = cm_GetVolumeByFID(&scp->fid);
1999                 if (volp) {
2000                     /* In the case of a scp from a .readonly volume
2001                      * we can automatically refresh the scp callback
2002                      * state under one of two conditions:
2003                      *
2004                      *   - there is currently an unexpired callback
2005                      *     and the callback is simply being extended
2006                      *
2007                      *   - the lastUpdateRO time for the scp and the
2008                      *     volp are the same indicating that the
2009                      *     .readonly has not changed
2010                      */
2011                     if (volp->cbExpiresRO > scp->cbExpires &&
2012                         (volp->cbServerpRO == scp->cbServerp &&
2013                          scp->cbExpires > 0 ||
2014                          volp->lastUpdateRO > 0 &&
2015                          scp->lastUpdateRO == volp->lastUpdateRO))
2016                     {
2017                         scp->cbExpires = volp->cbExpiresRO;
2018                         if (volp->cbServerpRO != scp->cbServerp) {
2019                             if (scp->cbServerp)
2020                                 cm_PutServer(scp->cbServerp);
2021                             cm_GetServer(volp->cbServerpRO);
2022                             scp->cbServerp = volp->cbServerpRO;
2023                         }
2024                     }        
2025                     cm_PutVolume(volp);
2026                 }
2027             }
2028             if (scp->cbServerp && scp->cbExpires > 0 && now > scp->cbExpires && 
2029                  (cm_CBServersUp(scp, &downTime) || downTime == 0 || downTime >= scp->cbExpires)) 
2030             {
2031                 cm_HoldSCacheNoLock(scp);
2032                 lock_ReleaseWrite(&cm_scacheLock);
2033                 
2034                 osi_Log4(afsd_logp, "Callback Expiration Discarding SCache scp 0x%p vol %u vn %u uniq %u",
2035                           scp, scp->fid.volume, scp->fid.vnode, scp->fid.unique);
2036                 lock_ObtainWrite(&scp->rw);
2037                 cm_DiscardSCache(scp);
2038                 lock_ReleaseWrite(&scp->rw);
2039                 cm_CallbackNotifyChange(scp);
2040
2041                 lock_ObtainWrite(&cm_scacheLock);
2042                 cm_ReleaseSCacheNoLock(scp);
2043             }
2044         }
2045     }
2046     lock_ReleaseWrite(&cm_scacheLock);
2047
2048     osi_Log0(afsd_logp, "CheckCBExpiration Complete");
2049 }
2050
2051
2052 void 
2053 cm_GiveUpAllCallbacks(cm_server_t *tsp, afs_int32 markDown)
2054 {
2055     long code;
2056     cm_conn_t *connp;
2057     struct rx_connection * rxconnp;
2058
2059     if ((tsp->type == CM_SERVER_FILE) && !(tsp->flags & CM_SERVERFLAG_DOWN)) 
2060     {
2061         code = cm_ConnByServer(tsp, cm_rootUserp, &connp);
2062         if (code == 0) {
2063             rxconnp = cm_GetRxConn(connp);
2064             rx_SetConnDeadTime(rxconnp, 10);
2065             code = RXAFS_GiveUpAllCallBacks(rxconnp);
2066             rx_SetConnDeadTime(rxconnp, ConnDeadtimeout);
2067             rx_PutConnection(rxconnp);
2068         }
2069
2070         if (markDown) {
2071             cm_server_vols_t * tsrvp;
2072             cm_volume_t * volp;
2073             int i;
2074
2075             cm_ForceNewConnections(tsp);
2076
2077             lock_ObtainMutex(&tsp->mx);
2078             if (!(tsp->flags & CM_SERVERFLAG_DOWN)) {
2079                 tsp->flags |= CM_SERVERFLAG_DOWN;
2080                 tsp->downTime = time(NULL);
2081             }
2082             /* Now update the volume status */
2083             for (tsrvp = tsp->vols; tsrvp; tsrvp = tsrvp->nextp) {
2084                 for (i=0; i<NUM_SERVER_VOLS; i++) {
2085                     if (tsrvp->ids[i] != 0) {
2086                         cm_req_t req;
2087
2088                         cm_InitReq(&req);
2089                         lock_ReleaseMutex(&tsp->mx);
2090                         code = cm_FindVolumeByID(tsp->cellp, tsrvp->ids[i], cm_rootUserp,
2091                                                  &req, CM_GETVOL_FLAG_NO_LRU_UPDATE | CM_GETVOL_FLAG_NO_RESET, &volp);
2092                         lock_ObtainMutex(&tsp->mx);
2093                         if (code == 0) {    
2094                             cm_UpdateVolumeStatus(volp, tsrvp->ids[i]);
2095                             cm_PutVolume(volp);
2096                         }       
2097                     }
2098                 }
2099             }
2100             lock_ReleaseMutex(&tsp->mx);
2101         }
2102     }
2103 }
2104
2105 void
2106 cm_GiveUpAllCallbacksAllServers(afs_int32 markDown)
2107 {
2108     cm_server_t *tsp;
2109
2110     if (!cm_giveUpAllCBs)
2111         return;
2112
2113     lock_ObtainWrite(&cm_serverLock);
2114     for (tsp = cm_allServersp; tsp; tsp = tsp->allNextp) {
2115         cm_GetServerNoLock(tsp);
2116         lock_ReleaseWrite(&cm_serverLock);
2117         cm_GiveUpAllCallbacks(tsp, markDown);
2118         lock_ObtainWrite(&cm_serverLock);
2119         cm_PutServerNoLock(tsp);
2120     }
2121     lock_ReleaseWrite(&cm_serverLock);
2122 }
2123
2124