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