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