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