2212359c736cb009c649bfe1a0dc81e0348e0d16
[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     MUTEX_ENTER(&callp->lock);
361
362     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
363         host = rx_HostOf(peerp);
364         port = rx_PortOf(peerp);
365
366         tsp = cm_FindServerByIP(host, CM_SERVER_FILE);
367         if (tsp)
368             cellp = tsp->cellp;
369
370         if (cellp)
371             osi_Log2(afsd_logp, "SRXAFSCB_CallBack from host 0x%x port %d",
372                      ntohl(host),
373                      ntohs(port));
374         else 
375             osi_Log3(afsd_logp, "SRXAFSCB_CallBack from host 0x%x port %d for cell %s",
376                      ntohl(host),
377                      ntohs(port),
378                      cellp->name /* does not need to be saved, doesn't change */);
379     } else {
380         osi_Log0(afsd_logp, "SRXAFSCB_CallBack from unknown host");
381     }
382
383
384     for (i=0; i < (long) fidsArrayp->AFSCBFids_len; i++) {
385         tfidp = &fidsArrayp->AFSCBFids_val[i];
386                 
387         if (tfidp->Volume == 0)
388             continue;   /* means don't do anything */
389         else if (tfidp->Vnode == 0)
390             cm_RevokeVolumeCallback(callp, cellp, tfidp);
391         else
392             cm_RevokeCallback(callp, cellp, tfidp);
393     }
394
395     MUTEX_EXIT(&callp->lock);
396     return 0;
397 }
398
399 /*------------------------------------------------------------------------
400  * EXPORTED SRXAFSCB_InitCallBackState
401  *
402  * Description:
403  *      Routine called by the server-side callback RPC interface to
404  *      implement clearing all callbacks from this host.
405  *
406  * Arguments:
407  *      rx_call : Ptr to Rx call on which this request came in.
408  *
409  * Returns:
410  *      0 (always).
411  *
412  * Environment:
413  *      Nothing interesting.
414  *
415  * Side Effects:
416  *      As advertised.
417  *------------------------------------------------------------------------*/
418 /* called with no locks by RPC system when a server indicates that it has never
419  * heard from us, or for other reasons has had to discard callbacks from us
420  * without telling us, e.g. a network partition.
421  */
422 int
423 SRXAFSCB_InitCallBackState(struct rx_call *callp)
424 {
425     struct sockaddr_in taddr;
426     cm_server_t *tsp;
427     cm_scache_t *scp;
428     afs_uint32 hash;
429     int discarded;
430     struct rx_connection *connp;
431     struct rx_peer *peerp;
432     unsigned long host = 0;
433     unsigned short port = 0;
434
435     MUTEX_ENTER(&callp->lock);
436
437     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
438         host = rx_HostOf(peerp);
439         port = rx_PortOf(peerp);
440     }
441
442     osi_Log2(afsd_logp, "SRXAFSCB_InitCallBackState from host 0x%x port %d",
443               ntohl(host),
444               ntohs(port));
445
446     if ((rx_ConnectionOf(callp)) && (rx_PeerOf(rx_ConnectionOf(callp)))) {
447         taddr.sin_family = AF_INET;
448         taddr.sin_addr.s_addr = rx_HostOf(rx_PeerOf(rx_ConnectionOf(callp)));
449
450         tsp = cm_FindServer(&taddr, CM_SERVER_FILE);
451
452         osi_Log1(afsd_logp, "Init Callback State server %x", tsp);
453         
454         /* record the callback in the racing revokes structure.  This
455          * shouldn't be necessary, since we shouldn't be making callback
456          * granting calls while we're going to get an initstate call,
457          * but there probably are some obscure races, so better safe
458          * than sorry.
459          *
460          * We do this first since we don't hold the cm_scacheLock and vnode
461          * locks over the entire callback scan operation below.  The
462          * big loop below is guaranteed to hit any callback already
463          * processed.  The call to RecordRacingRevoke is guaranteed
464          * to kill any callback that is currently being returned.
465          * Anything that sneaks past both must start
466          * after the call to RecordRacingRevoke.
467          */
468         cm_RecordRacingRevoke(NULL, CM_RACINGFLAG_CANCELALL);
469         
470         /* now search all vnodes looking for guys with this callback, if we
471          * found it, or guys with any callbacks, if we didn't find the server
472          * (that's how multihomed machines will appear and how we'll handle
473          * them, albeit a little inefficiently).  That is, we're discarding all
474          * callbacks from all hosts if we get an initstate call from an unknown
475          * host.  Since these calls are rare, and multihomed servers
476          * are "rare," hopefully this won't be a problem.
477          */
478         lock_ObtainWrite(&cm_scacheLock);
479         for (hash = 0; hash < cm_data.scacheHashTableSize; hash++) {
480             for (scp=cm_data.scacheHashTablep[hash]; scp; scp=scp->nextp) {
481                 cm_HoldSCacheNoLock(scp);
482                 lock_ReleaseWrite(&cm_scacheLock);
483                 lock_ObtainMutex(&scp->mx);
484                 discarded = 0;
485                 if (scp->cbExpires > 0 && scp->cbServerp != NULL) {
486                     /* we have a callback, now decide if we should clear it */
487                     if (scp->cbServerp == tsp || tsp == NULL) {
488                         osi_Log4(afsd_logp, "InitCallbackState Discarding SCache scp 0x%p vol %u vn %u uniq %u", 
489                                   scp, scp->fid.volume, scp->fid.vnode, scp->fid.unique);
490                         cm_DiscardSCache(scp);
491                         discarded = 1;
492                     }
493                 }
494                 lock_ReleaseMutex(&scp->mx);
495                 if (discarded)
496                     cm_CallbackNotifyChange(scp);
497                 lock_ObtainWrite(&cm_scacheLock);
498                 cm_ReleaseSCacheNoLock(scp);
499
500                 if (discarded && (scp->flags & CM_SCACHEFLAG_PURERO) && scp->volp && scp->volp->cbExpiresRO != 0)
501                     scp->volp->cbExpiresRO = 0;
502
503             }   /* search one hash bucket */
504         }       /* search all hash buckets */
505         
506         lock_ReleaseWrite(&cm_scacheLock);
507         
508         if (tsp) {
509             /* reset the No flags on the server */
510             cm_SetServerNo64Bit(tsp, 0);
511             cm_SetServerNoInlineBulk(tsp, 0);
512
513             /* we're done with the server structure */
514             cm_PutServer(tsp);
515         } 
516     }
517     MUTEX_EXIT(&callp->lock);
518     return 0;
519 }
520
521 /*------------------------------------------------------------------------
522  * EXPORTED SRXAFSCB_Probe
523  *
524  * Description:
525  *      Routine called by the server-side callback RPC interface to
526  *      implement ``probing'' the Cache Manager, just making sure it's
527  *      still there.
528  *
529  * Arguments:
530  *      rx_call : Ptr to Rx call on which this request came in.
531  *
532  * Returns:
533  *      0 (always).
534  *
535  * Environment:
536  *      Nothing interesting.
537  *
538  * Side Effects:
539  *      As advertised.
540  *------------------------------------------------------------------------*/
541 int
542 SRXAFSCB_Probe(struct rx_call *callp)
543 {
544     struct rx_connection *connp;
545     struct rx_peer *peerp;
546     unsigned long host = 0;
547     unsigned short port = 0;
548
549     MUTEX_ENTER(&callp->lock);
550
551     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
552         host = rx_HostOf(peerp);
553         port = rx_PortOf(peerp);
554     }
555
556     osi_Log2(afsd_logp, "SRXAFSCB_Probe from host 0x%x port %d",
557               ntohl(host),
558               ntohs(port));
559
560     MUTEX_EXIT(&callp->lock);
561     return 0;
562 }
563
564 /*------------------------------------------------------------------------
565  * EXPORTED SRXAFSCB_GetLock
566  *
567  * Description:
568  *      Routine called by the server-side callback RPC interface to
569  *      implement pulling out the contents of a lock in the lock
570  *      table.
571  *
572  * Arguments:
573  *      a_call   : Ptr to Rx call on which this request came in.
574  *      a_index  : Index of desired lock.
575  *      a_result : Ptr to a buffer for the given lock.
576  *
577  * Returns:
578  *      0 if everything went fine,
579  *      1 if we were given a bad index.
580  *
581  * Environment:
582  *      Nothing interesting.
583  *
584  * Side Effects:
585  *      As advertised.
586  *------------------------------------------------------------------------*/
587 /* debug interface */
588
589 extern osi_rwlock_t cm_aclLock;
590 extern osi_rwlock_t buf_globalLock;
591 extern osi_rwlock_t cm_callbackLock;
592 extern osi_rwlock_t cm_cellLock;
593 extern osi_rwlock_t cm_connLock;
594 extern osi_rwlock_t cm_daemonLock;
595 extern osi_rwlock_t cm_dnlcLock;
596 extern osi_rwlock_t cm_scacheLock;
597 extern osi_rwlock_t cm_serverLock;
598 extern osi_rwlock_t cm_userLock;
599 extern osi_rwlock_t cm_utilsLock;
600 extern osi_rwlock_t cm_volumeLock;
601 extern osi_rwlock_t smb_globalLock;
602 extern osi_rwlock_t smb_rctLock;
603
604 extern osi_mutex_t cm_Freelance_Lock;
605 extern osi_mutex_t cm_bufGetMutex;
606 extern osi_mutex_t cm_Afsdsbmt_Lock;
607 extern osi_mutex_t tokenEventLock;
608 extern osi_mutex_t  smb_ListenerLock;
609 extern osi_mutex_t smb_RawBufLock;
610 extern osi_mutex_t smb_Dir_Watch_Lock;
611
612 #define LOCKTYPE_RW     1
613 #define LOCKTYPE_MUTEX  2
614 static struct _ltable {
615     char *name;
616     char *addr;
617     int  type;
618 } ltable[] = {
619     {"cm_scacheLock",    (char*)&cm_scacheLock,         LOCKTYPE_RW},
620     {"buf_globalLock",   (char*)&buf_globalLock,        LOCKTYPE_RW},
621     {"cm_serverLock",    (char*)&cm_serverLock,         LOCKTYPE_RW},
622     {"cm_callbackLock",  (char*)&cm_callbackLock,       LOCKTYPE_RW},
623     {"cm_aclLock",       (char*)&cm_aclLock,            LOCKTYPE_RW},
624     {"cm_cellLock",      (char*)&cm_cellLock,           LOCKTYPE_RW},
625     {"cm_connLock",      (char*)&cm_connLock,           LOCKTYPE_RW},
626     {"cm_userLock",      (char*)&cm_userLock,           LOCKTYPE_RW},
627     {"cm_volumeLock",    (char*)&cm_volumeLock,         LOCKTYPE_RW},
628     {"cm_daemonLock",    (char*)&cm_daemonLock,         LOCKTYPE_RW},
629     {"cm_dnlcLock",      (char*)&cm_dnlcLock,           LOCKTYPE_RW},
630     {"cm_utilsLock",     (char*)&cm_utilsLock,          LOCKTYPE_RW},
631     {"smb_globalLock",   (char*)&smb_globalLock,        LOCKTYPE_RW},
632     {"smb_rctLock",      (char*)&smb_rctLock,           LOCKTYPE_RW},
633     {"cm_Freelance_Lock",(char*)&cm_Freelance_Lock,     LOCKTYPE_MUTEX},
634     {"cm_bufGetMutex",   (char*)&cm_bufGetMutex,        LOCKTYPE_MUTEX},
635     {"cm_Afsdsbmt_Lock", (char*)&cm_Afsdsbmt_Lock,      LOCKTYPE_MUTEX},
636     {"tokenEventLock",   (char*)&tokenEventLock,        LOCKTYPE_MUTEX},
637     {"smb_ListenerLock", (char*)&smb_ListenerLock,      LOCKTYPE_MUTEX},
638     {"smb_RawBufLock",   (char*)&smb_RawBufLock,        LOCKTYPE_MUTEX},
639     {"smb_Dir_Watch_Lock",(char*)&smb_Dir_Watch_Lock,   LOCKTYPE_MUTEX}
640 };
641
642 int
643 SRXAFSCB_GetLock(struct rx_call *callp, long index, AFSDBLock *lockp)
644 {
645     struct _ltable *tl;          /*Ptr to lock table entry */
646     osi_rwlock_t  *rwp;
647     osi_mutex_t   *mtxp;
648     int nentries;               /*Num entries in table */
649     int code;                   /*Return code */
650     struct rx_connection *connp;
651     struct rx_peer *peerp;
652     unsigned long host = 0;
653     unsigned short port = 0;
654
655     MUTEX_ENTER(&callp->lock);
656
657     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
658         host = rx_HostOf(peerp);
659         port = rx_PortOf(peerp);
660     }
661
662     osi_Log3(afsd_logp, "SRXAFSCB_GetLock(%d) from host 0x%x port %d", 
663              index, ntohl(host), ntohs(port));
664
665     nentries = sizeof(ltable) / sizeof(struct _ltable);
666     if (index < 0 || index >= nentries) {
667         /*
668          * Past EOF
669          */
670         code = 1;
671     } else {
672         /*
673          * Found it - copy out its contents.
674          */
675         tl = &ltable[index];
676         strncpy(lockp->name, tl->name, sizeof(lockp->name));
677         lockp->name[sizeof(lockp->name)-1] = '\0';
678         lockp->lock.waitStates = 0;
679         switch ( tl->type ) {
680         case LOCKTYPE_RW:
681             rwp = (osi_rwlock_t *)tl->addr;
682             lockp->lock.exclLocked = rwp->flags;
683             lockp->lock.readersReading = rwp->readers;
684             lockp->lock.numWaiting = rwp->waiters;
685             break;
686         case LOCKTYPE_MUTEX:
687             mtxp = (osi_mutex_t *)tl->addr;
688             lockp->lock.exclLocked = mtxp->flags;
689             lockp->lock.readersReading = 0;
690             lockp->lock.numWaiting = mtxp->waiters;
691             break;
692         }
693         lockp->lock.pid_last_reader = 0;
694         lockp->lock.pid_writer = 0;
695         lockp->lock.src_indicator = 0;
696         code = 0;
697     }
698
699     MUTEX_EXIT(&callp->lock);
700     return code;
701 }
702
703 /* debug interface */
704 int
705 SRXAFSCB_GetCE(struct rx_call *callp, long index, AFSDBCacheEntry *cep)
706 {
707     afs_uint32 i;
708     cm_scache_t * scp;
709     int code;
710     struct rx_connection *connp;
711     struct rx_peer *peerp;
712     unsigned long host = 0;
713     unsigned short port = 0;
714
715     MUTEX_ENTER(&callp->lock);
716
717     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
718         host = rx_HostOf(peerp);
719         port = rx_PortOf(peerp);
720     }
721
722     osi_Log2(afsd_logp, "SRXAFSCB_GetCE from host 0x%x port %d",
723              ntohl(host), ntohs(port));
724
725     lock_ObtainRead(&cm_scacheLock);
726     for (i = 0; i < cm_data.scacheHashTableSize; i++) {
727         for (scp = cm_data.scacheHashTablep[i]; scp; scp = scp->nextp) {
728             if (index == 0)
729                 goto searchDone;
730             index--;
731         }                       /*Zip through current hash chain */
732     }                           /*Zip through hash chains */
733
734   searchDone:
735     if (scp == NULL) {
736         /*Past EOF */
737         code = 1;
738         goto fcnDone;
739     }
740
741     /*
742      * Copy out the located entry.
743      */
744     memset(cep, 0, sizeof(AFSDBCacheEntry));
745     cep->addr = afs_data_pointer_to_int32(scp);
746     cep->cell = scp->fid.cell;
747     cep->netFid.Volume = scp->fid.volume;
748     cep->netFid.Vnode = scp->fid.vnode;
749     cep->netFid.Unique = scp->fid.unique;
750     cep->lock.waitStates = 0;
751     cep->lock.exclLocked = scp->mx.flags;
752     cep->lock.readersReading = 0;
753     cep->lock.numWaiting = scp->mx.waiters;
754     cep->lock.pid_last_reader = 0;
755     cep->lock.pid_writer = 0;
756     cep->lock.src_indicator = 0;
757     cep->Length = scp->length.LowPart;
758     cep->DataVersion = (afs_uint32)(scp->dataVersion & 0xFFFFFFFF);
759     cep->callback = afs_data_pointer_to_int32(scp->cbServerp);
760     if (scp->flags & CM_SCACHEFLAG_PURERO && scp->volp)
761         cep->cbExpires = scp->volp->cbExpiresRO;
762     else
763         cep->cbExpires = scp->cbExpires;
764     cep->refCount = scp->refCount;
765     cep->opens = scp->openReads;
766     cep->writers = scp->openWrites;
767     switch (scp->fileType) {
768     case CM_SCACHETYPE_FILE:
769         cep->mvstat = 0;
770         break;
771     case CM_SCACHETYPE_MOUNTPOINT:
772         cep->mvstat = 1;
773         break;
774     case CM_SCACHETYPE_DIRECTORY:
775         if (scp->fid.vnode == 1 && scp->fid.unique == 1)
776             cep->mvstat = 2;
777         else
778             cep->mvstat = 3;
779         break;
780     case CM_SCACHETYPE_SYMLINK:
781         cep->mvstat = 4;
782         break;
783     case CM_SCACHETYPE_DFSLINK:
784         cep->mvstat = 5;
785         break;
786     case CM_SCACHETYPE_INVALID:
787         cep->mvstat = 6;
788         break;
789     }
790     cep->states = 0;
791     if (scp->flags & CM_SCACHEFLAG_STATD)
792         cep->states |= 1;
793     if (scp->flags & CM_SCACHEFLAG_RO || scp->flags & CM_SCACHEFLAG_PURERO)
794         cep->states |= 4;
795     if (scp->fileType == CM_SCACHETYPE_MOUNTPOINT &&
796         scp->mountPointStringp[0])
797         cep->states |= 8;
798     if (scp->flags & CM_SCACHEFLAG_WAITING)
799         cep->states |= 0x40;
800     code = 0;
801
802     /*
803      * Return our results.
804      */
805   fcnDone:
806     lock_ReleaseRead(&cm_scacheLock);
807
808     MUTEX_EXIT(&callp->lock);
809     return (code);
810 }
811
812 /* debug interface */
813 int
814 SRXAFSCB_GetCE64(struct rx_call *callp, long index, AFSDBCacheEntry64 *cep)
815 {
816     afs_uint32 i;
817     cm_scache_t * scp;
818     int code;
819     struct rx_connection *connp;
820     struct rx_peer *peerp;
821     unsigned long host = 0;
822     unsigned short port = 0;
823
824     MUTEX_ENTER(&callp->lock);
825
826     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
827         host = rx_HostOf(peerp);
828         port = rx_PortOf(peerp);
829     }
830
831     osi_Log2(afsd_logp, "SRXAFSCB_GetCE64 from host 0x%x port %d",
832              ntohl(host), ntohs(port));
833
834     lock_ObtainRead(&cm_scacheLock);
835     for (i = 0; i < cm_data.scacheHashTableSize; i++) {
836         for (scp = cm_data.scacheHashTablep[i]; scp; scp = scp->nextp) {
837             if (index == 0)
838                 goto searchDone;
839             index--;
840         }                       /*Zip through current hash chain */
841     }                           /*Zip through hash chains */
842
843   searchDone:
844     if (scp == NULL) {
845         /*Past EOF */
846         code = 1;
847         goto fcnDone;
848     }
849
850     /*
851      * Copy out the located entry.
852      */
853     memset(cep, 0, sizeof(AFSDBCacheEntry64));
854     cep->addr = afs_data_pointer_to_int32(scp);
855     cep->cell = scp->fid.cell;
856     cep->netFid.Volume = scp->fid.volume;
857     cep->netFid.Vnode = scp->fid.vnode;
858     cep->netFid.Unique = scp->fid.unique;
859     cep->lock.waitStates = 0;
860     cep->lock.exclLocked = scp->mx.flags;
861     cep->lock.readersReading = 0;
862     cep->lock.numWaiting = scp->mx.waiters;
863     cep->lock.pid_last_reader = 0;
864     cep->lock.pid_writer = 0;
865     cep->lock.src_indicator = 0;
866 #if !defined(AFS_64BIT_ENV)
867     cep->Length.high = scp->length.HighPart;
868     cep->Length.low = scp->length.LowPart;
869 #else
870     cep->Length = (afs_int64) scp->length.QuadPart;
871 #endif
872     cep->DataVersion = (afs_uint32)(scp->dataVersion & 0xFFFFFFFF);
873     cep->callback = afs_data_pointer_to_int32(scp->cbServerp);
874     if (scp->flags & CM_SCACHEFLAG_PURERO && scp->volp)
875         cep->cbExpires = scp->volp->cbExpiresRO;
876     else
877         cep->cbExpires = scp->cbExpires;
878     cep->refCount = scp->refCount;
879     cep->opens = scp->openReads;
880     cep->writers = scp->openWrites;
881     switch (scp->fileType) {
882     case CM_SCACHETYPE_FILE:
883         cep->mvstat = 0;
884         break;
885     case CM_SCACHETYPE_MOUNTPOINT:
886         cep->mvstat = 1;
887         break;
888     case CM_SCACHETYPE_DIRECTORY:
889         if (scp->fid.vnode == 1 && scp->fid.unique == 1)
890             cep->mvstat = 2;
891         else
892             cep->mvstat = 3;
893         break;
894     case CM_SCACHETYPE_SYMLINK:
895         cep->mvstat = 4;
896         break;
897     case CM_SCACHETYPE_DFSLINK:
898         cep->mvstat = 5;
899         break;
900     case CM_SCACHETYPE_INVALID:
901         cep->mvstat = 6;
902         break;
903     }
904     cep->states = 0;
905     if (scp->flags & CM_SCACHEFLAG_STATD)
906         cep->states |= 1;
907     if (scp->flags & CM_SCACHEFLAG_RO || scp->flags & CM_SCACHEFLAG_PURERO)
908         cep->states |= 4;
909     if (scp->fileType == CM_SCACHETYPE_MOUNTPOINT &&
910         scp->mountPointStringp[0])
911         cep->states |= 8;
912     if (scp->flags & CM_SCACHEFLAG_WAITING)
913         cep->states |= 0x40;
914     code = 0;
915
916     /*
917      * Return our results.
918      */
919   fcnDone:
920     lock_ReleaseRead(&cm_scacheLock);
921
922     MUTEX_EXIT(&callp->lock);
923     return (code);
924 }
925
926 /* debug interface: not implemented */
927 int
928 SRXAFSCB_XStatsVersion(struct rx_call *callp, long *vp)
929 {
930     struct rx_connection *connp;
931     struct rx_peer *peerp;
932     unsigned long host = 0;
933     unsigned short port = 0;
934
935     MUTEX_ENTER(&callp->lock);
936
937     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
938         host = rx_HostOf(peerp);
939         port = rx_PortOf(peerp);
940     }
941
942     osi_Log2(afsd_logp, "SRXAFSCB_XStatsVersion from host 0x%x port %d - not implemented",
943              ntohl(host), ntohs(port));
944     *vp = -1;
945
946     MUTEX_EXIT(&callp->lock);
947     return RXGEN_OPCODE;
948 }
949
950 /* debug interface: not implemented */
951 int
952 SRXAFSCB_GetXStats(struct rx_call *callp, long cvn, long coln, long *srvp, long *timep,
953                    AFSCB_CollData *datap)
954 {
955     struct rx_connection *connp;
956     struct rx_peer *peerp;
957     unsigned long host = 0;
958     unsigned short port = 0;
959
960     MUTEX_ENTER(&callp->lock);
961
962     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
963         host = rx_HostOf(peerp);
964         port = rx_PortOf(peerp);
965     }
966
967     osi_Log2(afsd_logp, "SRXAFSCB_GetXStats from host 0x%x port %d - not implemented",
968              ntohl(host), ntohs(port));
969
970     MUTEX_EXIT(&callp->lock);
971     return RXGEN_OPCODE;
972 }
973
974 int
975 SRXAFSCB_InitCallBackState2(struct rx_call *callp, struct interfaceAddr* addr)
976 {
977     osi_Log0(afsd_logp, "SRXAFSCB_InitCallBackState2 ->");
978
979     return SRXAFSCB_InitCallBackState(callp);
980 }
981
982 /* debug interface */
983 int
984 SRXAFSCB_WhoAreYou(struct rx_call *callp, struct interfaceAddr* addr)
985 {
986     int i;
987     int cm_noIPAddr;         /* number of client network interfaces */
988     int cm_IPAddr[CM_MAXINTERFACE_ADDR];    /* client's IP address in host order */
989     int cm_SubnetMask[CM_MAXINTERFACE_ADDR];/* client's subnet mask in host order*/
990     int cm_NetMtu[CM_MAXINTERFACE_ADDR];    /* client's MTU sizes */
991     int cm_NetFlags[CM_MAXINTERFACE_ADDR];  /* network flags */
992     long code;
993     struct rx_connection *connp;
994     struct rx_peer *peerp;
995     unsigned long host = 0;
996     unsigned short port = 0;
997
998     MUTEX_ENTER(&callp->lock);
999
1000     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1001         host = rx_HostOf(peerp);
1002         port = rx_PortOf(peerp);
1003     }
1004
1005     /* get network related info */
1006     cm_noIPAddr = CM_MAXINTERFACE_ADDR;
1007     code = syscfg_GetIFInfo(&cm_noIPAddr,
1008                              cm_IPAddr, cm_SubnetMask,
1009                              cm_NetMtu, cm_NetFlags);
1010
1011     /* return all network interface addresses */
1012     osi_Log2(afsd_logp, "SRXAFSCB_WhoAreYou from host 0x%x port %d",
1013               ntohl(host),
1014               ntohs(port));
1015
1016     addr->numberOfInterfaces = cm_noIPAddr;
1017     addr->uuid = cm_data.Uuid;
1018     for ( i=0; i < cm_noIPAddr; i++ ) {
1019         addr->addr_in[i] = cm_IPAddr[i];
1020         addr->subnetmask[i] = cm_SubnetMask[i];
1021         addr->mtu[i] = (rx_mtu == -1 || (rx_mtu != -1 && cm_NetMtu[i] < rx_mtu)) ? 
1022             cm_NetMtu[i] : rx_mtu;
1023     }
1024
1025     MUTEX_EXIT(&callp->lock);
1026     return 0;
1027 }
1028
1029 int
1030 SRXAFSCB_InitCallBackState3(struct rx_call *callp, afsUUID* serverUuid)
1031 {
1032     char *p = NULL;
1033
1034     if (UuidToString((UUID *)serverUuid, &p) == RPC_S_OK) {
1035         osi_Log1(afsd_logp, "SRXAFSCB_InitCallBackState3 %s ->",p);
1036         RpcStringFree(&p);
1037     } else
1038         osi_Log0(afsd_logp, "SRXAFSCB_InitCallBackState3 - no server Uuid ->");
1039
1040     return SRXAFSCB_InitCallBackState(callp);
1041 }
1042
1043 /* debug interface */
1044 int
1045 SRXAFSCB_ProbeUuid(struct rx_call *callp, afsUUID* clientUuid)
1046 {
1047     struct rx_connection *connp;
1048     struct rx_peer *peerp;
1049     unsigned long host = 0;
1050     unsigned short port = 0;
1051     char *p,*q;
1052     int code = 0;
1053
1054     MUTEX_ENTER(&callp->lock);
1055
1056     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1057         host = rx_HostOf(peerp);
1058         port = rx_PortOf(peerp);
1059     }
1060
1061     if ( !afs_uuid_equal(&cm_data.Uuid, clientUuid) ) {
1062         UuidToString((UUID *)&cm_data.Uuid, &p);
1063         UuidToString((UUID *)clientUuid, &q);
1064         osi_Log4(afsd_logp, "SRXAFSCB_ProbeUuid %s != %s from host 0x%x port %d", 
1065                   osi_LogSaveString(afsd_logp,p), 
1066                   osi_LogSaveString(afsd_logp,q),
1067                   ntohl(host),
1068                   ntohs(port));
1069         RpcStringFree(&p);
1070         RpcStringFree(&q);
1071
1072         code = 1;       /* failure */
1073     } else
1074         osi_Log2(afsd_logp, "SRXAFSCB_ProbeUuid (success) from host 0x%x port %d",
1075                   ntohl(host),
1076                   ntohs(port));
1077
1078     MUTEX_EXIT(&callp->lock);
1079     return code;
1080 }
1081
1082 /* debug interface */
1083 int 
1084 SRXAFSCB_GetCellByNum(struct rx_call *callp, afs_int32 a_cellnum,
1085                       char **a_name, serverList *a_hosts)
1086 {
1087     afs_int32 sn;
1088     cm_cell_t * cellp;
1089     cm_serverRef_t * serverRefp; 
1090     struct rx_connection *connp;
1091     struct rx_peer *peerp;
1092     unsigned long host = 0;
1093     unsigned short port = 0;
1094
1095     MUTEX_ENTER(&callp->lock);
1096
1097     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1098         host = rx_HostOf(peerp);
1099         port = rx_PortOf(peerp);
1100     }
1101
1102     osi_Log3(afsd_logp, "SRXAFSCB_GetCellByNum(%d) from host 0x%x port %d",
1103              a_cellnum, ntohl(host), ntohs(port));
1104
1105     a_hosts->serverList_val = 0;
1106     a_hosts->serverList_len = 0;
1107
1108     cellp = cm_FindCellByID(a_cellnum);
1109     if (!cellp) {
1110         *a_name = strdup("");
1111         MUTEX_EXIT(&callp->lock);
1112         return 0;
1113     }
1114
1115     lock_ObtainRead(&cm_serverLock);
1116     *a_name = strdup(cellp->name);
1117
1118     for ( sn = 0, serverRefp = cellp->vlServersp; 
1119           sn < AFSMAXCELLHOSTS && serverRefp;
1120           sn++, serverRefp = serverRefp->next);
1121
1122     a_hosts->serverList_len = sn;
1123     a_hosts->serverList_val = (afs_int32 *)osi_Alloc(sn * sizeof(afs_int32));
1124
1125     for ( sn = 0, serverRefp = cellp->vlServersp; 
1126           sn < AFSMAXCELLHOSTS && serverRefp;
1127           sn++, serverRefp = serverRefp->next)
1128     {
1129         a_hosts->serverList_val[sn] = ntohl(serverRefp->server->addr.sin_addr.s_addr);
1130     }
1131
1132     lock_ReleaseRead(&cm_serverLock);
1133     MUTEX_EXIT(&callp->lock);
1134     return 0;
1135 }
1136
1137 /* debug interface */
1138 int 
1139 SRXAFSCB_TellMeAboutYourself( struct rx_call *callp, 
1140                               struct interfaceAddr *addr,
1141                               Capabilities * capabilities)
1142 {
1143     int i;
1144     afs_int32 *dataBuffP;
1145     afs_int32 dataBytes;
1146     int cm_noIPAddr;         /* number of client network interfaces */
1147     int cm_IPAddr[CM_MAXINTERFACE_ADDR];    /* client's IP address in host order */
1148     int cm_SubnetMask[CM_MAXINTERFACE_ADDR];/* client's subnet mask in host order*/
1149     int cm_NetMtu[CM_MAXINTERFACE_ADDR];    /* client's MTU sizes */
1150     int cm_NetFlags[CM_MAXINTERFACE_ADDR];  /* network flags */
1151     long code;
1152     struct rx_connection *connp;
1153     struct rx_peer *peerp;
1154     unsigned long host = 0;
1155     unsigned short port = 0;
1156
1157     MUTEX_ENTER(&callp->lock);
1158
1159     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1160         host = rx_HostOf(peerp);
1161         port = rx_PortOf(peerp);
1162     }
1163
1164     /* get network related info */
1165     cm_noIPAddr = CM_MAXINTERFACE_ADDR;
1166     code = syscfg_GetIFInfo(&cm_noIPAddr,
1167                              cm_IPAddr, cm_SubnetMask,
1168                              cm_NetMtu, cm_NetFlags);
1169
1170     osi_Log2(afsd_logp, "SRXAFSCB_TellMeAboutYourself from host 0x%x port %d",
1171               ntohl(host),
1172               ntohs(port));
1173
1174     /* return all network interface addresses */
1175     addr->numberOfInterfaces = cm_noIPAddr;
1176     addr->uuid = cm_data.Uuid;
1177     for ( i=0; i < cm_noIPAddr; i++ ) {
1178         addr->addr_in[i] = cm_IPAddr[i];
1179         addr->subnetmask[i] = cm_SubnetMask[i];
1180         addr->mtu[i] = (rx_mtu == -1 || (rx_mtu != -1 && cm_NetMtu[i] < rx_mtu)) ? 
1181             cm_NetMtu[i] : rx_mtu;
1182     }
1183
1184     dataBytes = 1 * sizeof(afs_int32);
1185     dataBuffP = (afs_int32 *) osi_Alloc(dataBytes);
1186     dataBuffP[0] = CLIENT_CAPABILITY_ERRORTRANS;
1187     capabilities->Capabilities_len = dataBytes / sizeof(afs_int32);
1188     capabilities->Capabilities_val = dataBuffP;
1189
1190     MUTEX_EXIT(&callp->lock);
1191     return 0;
1192 }
1193
1194 /*------------------------------------------------------------------------
1195  * EXPORTED SRXAFSCB_GetServerPrefs
1196  *
1197  * Description:
1198  *      Routine to list server preferences used by this client.
1199  *
1200  * Arguments:
1201  *      a_call  : Ptr to Rx call on which this request came in.
1202  *      a_index : Input server index
1203  *      a_srvr_addr  : Output server address (0xffffffff on last server)
1204  *      a_srvr_rank  : Output server rank
1205  *
1206  * Returns:
1207  *      0 on success
1208  *
1209  * Environment:
1210  *      Nothing interesting.
1211  *
1212  * Side Effects:
1213  *      As advertised.
1214  *------------------------------------------------------------------------*/
1215
1216 int SRXAFSCB_GetServerPrefs(
1217     struct rx_call *callp,
1218     afs_int32 a_index,
1219     afs_int32 *a_srvr_addr,
1220     afs_int32 *a_srvr_rank)
1221 {
1222     struct rx_connection *connp;
1223     struct rx_peer *peerp;
1224     unsigned long host = 0;
1225     unsigned short port = 0;
1226
1227     MUTEX_ENTER(&callp->lock);
1228
1229     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1230         host = rx_HostOf(peerp);
1231         port = rx_PortOf(peerp);
1232     }
1233
1234     osi_Log2(afsd_logp, "SRXAFSCB_GetServerPrefs from host 0x%x port %d - not implemented",
1235               ntohl(host),
1236               ntohs(port));
1237
1238     *a_srvr_addr = 0xffffffff;
1239     *a_srvr_rank = 0xffffffff;
1240
1241     MUTEX_EXIT(&callp->lock);
1242     return 0;
1243 }
1244
1245 /*------------------------------------------------------------------------
1246  * EXPORTED SRXAFSCB_GetCellServDB
1247  *
1248  * Description:
1249  *      Routine to list cells configured for this client
1250  *
1251  * Arguments:
1252  *      a_call  : Ptr to Rx call on which this request came in.
1253  *      a_index : Input cell index
1254  *      a_name  : Output cell name ("" on last cell)
1255  *      a_hosts : Output cell database servers
1256  *
1257  * Returns:
1258  *      0 on success
1259  *
1260  * Environment:
1261  *      Nothing interesting.
1262  *
1263  * Side Effects:
1264  *      As advertised.
1265  *------------------------------------------------------------------------*/
1266
1267 int SRXAFSCB_GetCellServDB(struct rx_call *callp, afs_int32 index, char **a_name, 
1268                            serverList *a_hosts)
1269 {
1270     char *t_name;
1271     struct rx_connection *connp;
1272     struct rx_peer *peerp;
1273     unsigned long host = 0;
1274     unsigned short port = 0;
1275
1276     MUTEX_ENTER(&callp->lock);
1277
1278     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1279         host = rx_HostOf(peerp);
1280         port = rx_PortOf(peerp);
1281     }
1282
1283     osi_Log2(afsd_logp, "SRXAFSCB_GetCellServDB from host 0x%x port %d - not implemented",
1284              ntohl(host), ntohs(port));
1285
1286     t_name = (char *)malloc(AFSNAMEMAX);
1287     t_name[0] = '\0';
1288     *a_name = t_name;
1289     a_hosts->serverList_len = 0;
1290
1291     MUTEX_EXIT(&callp->lock);
1292     return 0;
1293 }
1294
1295 /*------------------------------------------------------------------------
1296  * EXPORTED SRXAFSCB_GetLocalCell
1297  *
1298  * Description:
1299  *      Routine to return name of client's local cell
1300  *
1301  * Arguments:
1302  *      a_call  : Ptr to Rx call on which this request came in.
1303  *      a_name  : Output cell name
1304  *
1305  * Returns:
1306  *      0 on success
1307  *
1308  * Environment:
1309  *      Nothing interesting.
1310  *
1311  * Side Effects:
1312  *      As advertised.
1313  *------------------------------------------------------------------------*/
1314
1315 int SRXAFSCB_GetLocalCell(struct rx_call *callp, char **a_name)
1316 {
1317     char *t_name;
1318     struct rx_connection *connp;
1319     struct rx_peer *peerp;
1320     unsigned long host = 0;
1321     unsigned short port = 0;
1322
1323     MUTEX_ENTER(&callp->lock);
1324
1325     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1326         host = rx_HostOf(peerp);
1327         port = rx_PortOf(peerp);
1328     }
1329
1330     osi_Log2(afsd_logp, "SRXAFSCB_GetLocalCell from host 0x%x port %d",
1331              ntohl(host), ntohs(port));
1332
1333     if (cm_data.rootCellp) {
1334         t_name = (char *)malloc(strlen(cm_data.rootCellp->name)+1);
1335         strcpy(t_name, cm_data.rootCellp->name);
1336     } else {
1337         t_name = (char *)malloc(1);
1338         t_name[0] = '\0';
1339     }
1340     *a_name = t_name;
1341
1342     MUTEX_EXIT(&callp->lock);
1343     return 0;
1344 }
1345
1346
1347 /*
1348  * afs_MarshallCacheConfig - marshall client cache configuration
1349  *
1350  * PARAMETERS
1351  *
1352  * IN callerVersion - the rpc stat version of the caller.
1353  *
1354  * IN config - client cache configuration.
1355  *
1356  * OUT ptr - buffer where configuration is marshalled.
1357  *
1358  * RETURN CODES
1359  *
1360  * Returns void.
1361  */
1362 static void afs_MarshallCacheConfig(
1363     afs_uint32 callerVersion,
1364     cm_initparams_v1 *config,
1365     afs_uint32 *ptr)
1366 {
1367     /*
1368      * We currently only support version 1.
1369      */
1370     *(ptr++) = config->nChunkFiles;
1371     *(ptr++) = config->nStatCaches;
1372     *(ptr++) = config->nDataCaches;
1373     *(ptr++) = config->nVolumeCaches;
1374     *(ptr++) = config->firstChunkSize;
1375     *(ptr++) = config->otherChunkSize;
1376     *(ptr++) = config->cacheSize;
1377     *(ptr++) = config->setTime;
1378     *(ptr++) = config->memCache;
1379
1380 }
1381  
1382
1383 /*------------------------------------------------------------------------
1384  * EXPORTED SRXAFSCB_GetCacheConfig
1385  *
1386  * Description:
1387  *      Routine to return parameters used to initialize client cache.
1388  *      Client may request any format version. Server may not return
1389  *      format version greater than version requested by client.
1390  *
1391  * Arguments:
1392  *      a_call:        Ptr to Rx call on which this request came in.
1393  *      callerVersion: Data format version desired by the client.
1394  *      serverVersion: Data format version of output data.
1395  *      configCount:   Number bytes allocated for output data.
1396  *      config:        Client cache configuration.
1397  *
1398  * Returns:
1399  *      0 on success
1400  *
1401  * Environment:
1402  *      Nothing interesting.
1403  *
1404  * Side Effects:
1405  *      As advertised.
1406  *------------------------------------------------------------------------*/
1407
1408 int SRXAFSCB_GetCacheConfig(struct rx_call *callp,
1409                             afs_uint32 callerVersion,
1410                             afs_uint32 *serverVersion,
1411                             afs_uint32 *configCount,
1412                             cacheConfig *config)
1413 {
1414     afs_uint32 *t_config;
1415     size_t allocsize;
1416     extern cm_initparams_v1 cm_initParams;
1417     struct rx_connection *connp;
1418     struct rx_peer *peerp;
1419     unsigned long host = 0;
1420     unsigned short port = 0;
1421
1422     MUTEX_ENTER(&callp->lock);
1423
1424     if ((connp = rx_ConnectionOf(callp)) && (peerp = rx_PeerOf(connp))) {
1425         host = rx_HostOf(peerp);
1426         port = rx_PortOf(peerp);
1427     }
1428
1429     osi_Log2(afsd_logp, "SRXAFSCB_GetCacheConfig from host 0x%x port %d - version 1 only",
1430              ntohl(host), ntohs(port));
1431
1432     /*
1433      * Currently only support version 1
1434      */
1435     allocsize = sizeof(cm_initparams_v1);
1436     t_config = (afs_uint32 *)malloc(allocsize);
1437
1438     afs_MarshallCacheConfig(callerVersion, &cm_initParams, t_config);
1439
1440     *serverVersion = AFS_CLIENT_RETRIEVAL_FIRST_EDITION;
1441 #ifdef DEBUG
1442 #ifndef SIZE_MAX
1443 #define SIZE_MAX UINT_MAX
1444 #endif
1445     osi_assertx(allocsize < SIZE_MAX, "allocsize >= SIZE_MAX");
1446 #endif
1447     *configCount = (afs_uint32)allocsize;
1448     config->cacheConfig_val = t_config;
1449     config->cacheConfig_len = (*configCount)/sizeof(afs_uint32);
1450
1451     MUTEX_EXIT(&callp->lock);
1452     return 0;
1453 }
1454
1455 /* called by afsd without any locks to initialize this module */
1456 void cm_InitCallback(void)
1457 {
1458     lock_InitializeRWLock(&cm_callbackLock, "cm_callbackLock");
1459     cm_activeCallbackGrantingCalls = 0;
1460 }
1461
1462 /* called with locked scp; tells us whether we've got a callback.
1463  * Expirations are checked by a background daemon so as to make
1464  * this function as inexpensive as possible
1465  */
1466 int cm_HaveCallback(cm_scache_t *scp)
1467 {
1468 #ifdef AFS_FREELANCE_CLIENT
1469     // yj: we handle callbacks specially for callbacks on the root directory
1470     // Since it's local, we almost always say that we have callback on it
1471     // The only time we send back a 0 is if we're need to initialize or
1472     // reinitialize the fake directory
1473
1474     // There are 2 state variables cm_fakeGettingCallback and cm_fakeDirCallback
1475     // cm_fakeGettingCallback is 1 if we're in the process of initialization and
1476     // hence should return false. it's 0 otherwise
1477     // cm_fakeDirCallback is 0 if we haven't loaded the fake directory, it's 1
1478     // if the fake directory is loaded and this is the first time cm_HaveCallback
1479     // is called since then. We return false in this case to allow cm_GetCallback
1480     // to be called because cm_GetCallback has some initialization work to do.
1481     // If cm_fakeDirCallback is 2, then it means that the fake directory is in
1482     // good shape and we simply return true, provided no change is detected.
1483     int fdc, fgc;
1484
1485     if (cm_freelanceEnabled && 
1486          scp->fid.cell==AFS_FAKE_ROOT_CELL_ID && scp->fid.volume==AFS_FAKE_ROOT_VOL_ID) {
1487         /* if it's something on /afs */
1488         if (!(scp->fid.vnode==0x1 && scp->fid.unique==0x1)) {
1489             /* if it's not root.afs */
1490             return 1;
1491         }
1492
1493         lock_ObtainMutex(&cm_Freelance_Lock);
1494         fdc = cm_fakeDirCallback;
1495         fgc = cm_fakeGettingCallback;
1496         lock_ReleaseMutex(&cm_Freelance_Lock);
1497             
1498         if (fdc==1) {   // first call since init
1499             return 0;
1500         } else if (fdc==2 && !fgc) {    // we're in good shape
1501             if (cm_getLocalMountPointChange()) {        // check for changes
1502                 cm_clearLocalMountPointChange(); // clear the changefile
1503                 lock_ReleaseMutex(&scp->mx);      // this is re-locked in reInitLocalMountPoints
1504                 cm_reInitLocalMountPoints();    // start reinit
1505                 lock_ObtainMutex(&scp->mx);      // now get the lock back 
1506                 return 0;
1507             }
1508             return 1;                   // no change
1509         }
1510         return 0;
1511     }
1512 #endif
1513
1514     if (scp->cbServerp != NULL) {
1515         return 1;
1516     } else if (cm_OfflineROIsValid) {
1517         switch (cm_GetVolumeStatus(scp->volp, scp->fid.volume)) {
1518         case vl_offline:
1519         case vl_alldown:
1520         case vl_unknown:
1521             return 1;
1522         default:
1523             return 0;
1524         }
1525     } else {
1526         return 0;
1527     }
1528 }
1529
1530 /* need to detect a broken callback that races with our obtaining a callback.
1531  * Need to be able to do this even if we don't know the file ID of the file
1532  * we're breaking the callback on at the time we start the acquisition of the
1533  * callback (as in the case where we are creating a file).
1534  *
1535  * So, we start by writing down the count of the # of callbacks we've received
1536  * so far, and bumping a global counter of the # of callback granting calls
1537  * outstanding (all done under cm_callbackLock).
1538  *
1539  * When we're back from the call, we look at all of the callback revokes with
1540  * counter numbers greater than the one we recorded in our caller's structure,
1541  * and replay those that are higher than when we started the call.
1542  * 
1543  * We free all the structures in the queue when the count of the # of outstanding
1544  * callback-granting calls drops to zero.
1545  *
1546  * We call this function with the scp locked, too, but in its current implementation,
1547  * this knowledge is not used.
1548  */
1549 void cm_StartCallbackGrantingCall(cm_scache_t *scp, cm_callbackRequest_t *cbrp)
1550 {
1551     lock_ObtainWrite(&cm_callbackLock);
1552     cbrp->callbackCount = cm_callbackCount;
1553     cm_activeCallbackGrantingCalls++;
1554     cbrp->startTime = time(NULL);
1555     cbrp->serverp = NULL;
1556     lock_ReleaseWrite(&cm_callbackLock);
1557 }
1558
1559 /* Called at the end of a callback-granting call, to remove the callback
1560  * info from the scache entry, if necessary.
1561  *
1562  * Called with scp locked, so we can discard the callbacks easily with
1563  * this locking hierarchy.
1564  */
1565 void cm_EndCallbackGrantingCall(cm_scache_t *scp, cm_callbackRequest_t *cbrp,
1566                                 AFSCallBack *cbp, long flags)
1567 {
1568     cm_racingRevokes_t *revp;           /* where we are */
1569     cm_racingRevokes_t *nrevp;          /* where we'll be next */
1570     int freeFlag;
1571     cm_server_t * serverp = NULL;
1572     int discardScp = 0, discardVolCB = 0;
1573
1574     lock_ObtainWrite(&cm_callbackLock);
1575     if (flags & CM_CALLBACK_MAINTAINCOUNT) {
1576         osi_assertx(cm_activeCallbackGrantingCalls > 0, 
1577                     "CM_CALLBACK_MAINTAINCOUNT && cm_activeCallbackGrantingCalls == 0");
1578     }
1579     else {
1580         osi_assertx(cm_activeCallbackGrantingCalls-- > 0,
1581                     "!CM_CALLBACK_MAINTAINCOUNT && cm_activeCallbackGrantingCalls == 0");
1582     }
1583     if (cm_activeCallbackGrantingCalls == 0) 
1584         freeFlag = 1;
1585     else 
1586         freeFlag = 0;
1587
1588     /* record the callback; we'll clear it below if we really lose it */
1589     if (cbrp) {
1590         if (scp) {
1591             if (scp->cbServerp != cbrp->serverp) {
1592                 serverp = scp->cbServerp;
1593                 if (!freeFlag)
1594                     cm_GetServer(cbrp->serverp);
1595                 scp->cbServerp = cbrp->serverp;
1596             } else {
1597                 if (freeFlag)
1598                     serverp = cbrp->serverp;
1599             }
1600             scp->cbExpires = cbrp->startTime + cbp->ExpirationTime;
1601             if (scp->flags & CM_SCACHEFLAG_PURERO && scp->volp)
1602                 scp->volp->cbExpiresRO = scp->cbExpires;
1603         } else {
1604             if (freeFlag)
1605                 serverp = cbrp->serverp;
1606         }
1607         if (freeFlag)
1608             cbrp->serverp = NULL;
1609     }
1610
1611     /* a callback was actually revoked during our granting call, so
1612      * run down the list of revoked fids, looking for ours.
1613      * If activeCallbackGrantingCalls is zero, free the elements, too.
1614      *
1615      * May need to go through entire list just to do the freeing.
1616      */
1617     for (revp = cm_racingRevokesp; revp; revp = nrevp) {
1618         nrevp = (cm_racingRevokes_t *) osi_QNext(&revp->q);
1619         /* if this callback came in later than when we started the
1620          * callback-granting call, and if this fid is the right fid,
1621          * then clear the callback.
1622          */
1623         if (scp && cbrp && cbrp->callbackCount != cm_callbackCount
1624              && revp->callbackCount > cbrp->callbackCount
1625              && (( scp->fid.volume == revp->fid.volume &&
1626                    scp->fid.vnode == revp->fid.vnode &&
1627                    scp->fid.unique == revp->fid.unique)
1628                   ||
1629                   ((revp->flags & CM_RACINGFLAG_CANCELVOL) &&
1630                     scp->fid.volume == revp->fid.volume)
1631                   ||
1632                   (revp->flags & CM_RACINGFLAG_CANCELALL))) {
1633             /* this one matches */
1634             osi_Log4(afsd_logp,
1635                       "Racing revoke scp 0x%p old cbc %d rev cbc %d cur cbc %d",
1636                       scp,
1637                       cbrp->callbackCount, revp->callbackCount,
1638                       cm_callbackCount);
1639             discardScp = 1;
1640
1641             if ((scp->flags & CM_SCACHEFLAG_PURERO) && scp->volp && 
1642                 (revp->flags & (CM_RACINGFLAG_CANCELVOL | CM_RACINGFLAG_CANCELALL)))
1643                 scp->volp->cbExpiresRO = 0;
1644         }
1645         if (freeFlag) 
1646             free(revp);
1647     }
1648
1649     /* if we freed the list, zap the pointer to it */
1650     if (freeFlag) 
1651         cm_racingRevokesp = NULL;
1652
1653     lock_ReleaseWrite(&cm_callbackLock);
1654
1655     if ( discardScp ) {
1656         cm_DiscardSCache(scp);
1657         lock_ReleaseMutex(&scp->mx);
1658         cm_CallbackNotifyChange(scp);
1659         lock_ObtainMutex(&scp->mx);
1660     } 
1661
1662     if ( serverp ) {
1663         lock_ObtainWrite(&cm_serverLock);
1664         cm_FreeServer(serverp);
1665         lock_ReleaseWrite(&cm_serverLock);
1666     }
1667 }
1668
1669 /* if flags is 1, we want to force the code to make one call, anyway.
1670  * called with locked scp; returns with same.
1671  */
1672 long cm_GetCallback(cm_scache_t *scp, struct cm_user *userp,
1673                     struct cm_req *reqp, long flags)
1674 {
1675     long code = 0;
1676     cm_conn_t *connp = NULL;
1677     AFSFetchStatus afsStatus;
1678     AFSVolSync volSync;
1679     AFSCallBack callback;
1680     AFSFid tfid;
1681     cm_callbackRequest_t cbr;
1682     int mustCall;
1683     cm_fid_t sfid;
1684     struct rx_connection * callp = NULL;
1685     int syncop_done = 0;
1686
1687     osi_Log4(afsd_logp, "GetCallback scp 0x%p cell %d vol %d flags %lX", 
1688              scp, scp->fid.cell, scp->fid.volume, flags);
1689
1690 #ifdef AFS_FREELANCE_CLIENT
1691     // The case where a callback is needed on /afs is handled
1692     // specially. We need to fetch the status by calling
1693     // cm_MergeStatus and mark that cm_fakeDirCallback is 2
1694     if (cm_freelanceEnabled) {
1695         if (scp->fid.cell==AFS_FAKE_ROOT_CELL_ID &&
1696              scp->fid.volume==AFS_FAKE_ROOT_VOL_ID &&
1697              scp->fid.unique==0x1 &&
1698              scp->fid.vnode==0x1) {
1699             
1700             // Start by indicating that we're in the process
1701             // of fetching the callback
1702             lock_ObtainMutex(&cm_Freelance_Lock);
1703             osi_Log0(afsd_logp,"cm_getGetCallback fakeGettingCallback=1");
1704             cm_fakeGettingCallback = 1;
1705             lock_ReleaseMutex(&cm_Freelance_Lock);
1706
1707             // Fetch the status info 
1708             cm_MergeStatus(NULL, scp, &afsStatus, &volSync, userp, 0);
1709
1710             // Indicate that the callback is not done
1711             lock_ObtainMutex(&cm_Freelance_Lock);
1712             osi_Log0(afsd_logp,"cm_getGetCallback fakeDirCallback=2");
1713             cm_fakeDirCallback = 2;
1714
1715             // Indicate that we're no longer fetching the callback
1716             osi_Log0(afsd_logp,"cm_getGetCallback fakeGettingCallback=0");
1717             cm_fakeGettingCallback = 0;
1718             lock_ReleaseMutex(&cm_Freelance_Lock);
1719
1720             return 0;
1721         }
1722
1723         if (scp->fid.cell==AFS_FAKE_ROOT_CELL_ID && scp->fid.volume==AFS_FAKE_ROOT_VOL_ID) {
1724             osi_Log0(afsd_logp,"cm_getcallback should NEVER EVER get here... ");
1725         }
1726     }
1727 #endif /* AFS_FREELANCE_CLIENT */
1728         
1729     mustCall = (flags & 1);
1730     cm_AFSFidFromFid(&tfid, &scp->fid);
1731     while (1) {
1732         if (!mustCall && cm_HaveCallback(scp))
1733             break;
1734
1735         /* turn off mustCall, since it has now forced us past the check above */
1736         mustCall = 0;
1737
1738         /* otherwise, we have to make an RPC to get the status */
1739         if (!syncop_done) {
1740             code = cm_SyncOp(scp, NULL, userp, reqp, 0, 
1741                              CM_SCACHESYNC_FETCHSTATUS | CM_SCACHESYNC_GETCALLBACK);
1742             if (code)
1743                 break;
1744             syncop_done = 1;
1745         }
1746         cm_StartCallbackGrantingCall(scp, &cbr);
1747         sfid = scp->fid;
1748         lock_ReleaseMutex(&scp->mx);
1749                 
1750         /* now make the RPC */
1751         osi_Log4(afsd_logp, "CALL FetchStatus scp 0x%p vol %u vn %u uniq %u", 
1752                  scp, sfid.volume, sfid.vnode, sfid.unique);
1753         do {
1754             code = cm_ConnFromFID(&sfid, userp, reqp, &connp);
1755             if (code) 
1756                 continue;
1757
1758             callp = cm_GetRxConn(connp);
1759             code = RXAFS_FetchStatus(callp, &tfid,
1760                                      &afsStatus, &callback, &volSync);
1761             rx_PutConnection(callp);
1762
1763         } while (cm_Analyze(connp, userp, reqp, &sfid, &volSync, NULL,
1764                             &cbr, code));
1765         code = cm_MapRPCError(code, reqp);
1766         if (code)
1767             osi_Log4(afsd_logp, "CALL FetchStatus FAILURE code 0x%x scp 0x%p vol %u vn %u", 
1768                      code, scp, scp->fid.volume, scp->fid.vnode);
1769         else
1770             osi_Log4(afsd_logp, "CALL FetchStatus SUCCESS scp 0x%p vol %u vn %u uniq %u", 
1771                      scp, scp->fid.volume, scp->fid.vnode, scp->fid.unique);
1772
1773         lock_ObtainMutex(&scp->mx);
1774         if (code == 0) {
1775             cm_EndCallbackGrantingCall(scp, &cbr, &callback, 0);
1776             cm_MergeStatus(NULL, scp, &afsStatus, &volSync, userp, 0);
1777         } else {
1778             cm_EndCallbackGrantingCall(NULL, &cbr, NULL, 0);
1779         }
1780
1781         /* if we got an error, return to caller */
1782         if (code)
1783             break;
1784     }
1785
1786     if (syncop_done)
1787         cm_SyncOpDone(scp, NULL, CM_SCACHESYNC_FETCHSTATUS | CM_SCACHESYNC_GETCALLBACK);
1788     
1789     if (code) {
1790         osi_Log2(afsd_logp, "GetCallback Failed code 0x%x scp 0x%p -->",code, scp);
1791         osi_Log4(afsd_logp, "            cell %u vol %u vn %u uniq %u",
1792                  scp->fid.cell, scp->fid.volume, scp->fid.vnode, scp->fid.unique);
1793     } else {
1794         osi_Log3(afsd_logp, "GetCallback Complete scp 0x%p cell %d vol %d", 
1795                   scp, scp->fid.cell, scp->fid.volume);
1796     }
1797
1798     return code;
1799 }
1800
1801
1802 /* called with cm_scacheLock held */
1803 long cm_CBServersUp(cm_scache_t *scp, time_t * downTime)
1804 {
1805     cm_vol_state_t *statep;
1806     cm_volume_t * volp = scp->volp;
1807     afs_uint32 volID = scp->fid.volume;
1808     cm_serverRef_t *tsrp;
1809     int found;
1810
1811     *downTime = 0;
1812
1813     if (scp->cbServerp == NULL)
1814         return 1;
1815
1816     if (volp->rw.ID == volID) {
1817         statep = &volp->rw;
1818     } else if (volp->ro.ID == volID) {
1819         statep = &volp->ro;
1820     } else if (volp->bk.ID == volID) {
1821         statep = &volp->bk;
1822     }
1823
1824     if (statep->state == vl_online)
1825         return 1;
1826
1827     for (found = 0,tsrp = statep->serversp; tsrp; tsrp=tsrp->next) {
1828         if (tsrp->server == scp->cbServerp)
1829             found = 1;
1830         if (tsrp->server->downTime > *downTime)
1831             *downTime = tsrp->server->downTime;
1832     }
1833
1834     /* if the cbServerp does not match the current volume server list
1835      * we report the callback server as up so the callback can be 
1836      * expired.
1837      */
1838     return(found ? 0 : 1);
1839 }
1840
1841 /* called periodically by cm_daemon to shut down use of expired callbacks */
1842 void cm_CheckCBExpiration(void)
1843 {
1844     afs_uint32 i;
1845     cm_scache_t *scp;
1846     time_t now, downTime;
1847         
1848     osi_Log0(afsd_logp, "CheckCBExpiration");
1849
1850     now = time(NULL);
1851     lock_ObtainWrite(&cm_scacheLock);
1852     for (i=0; i<cm_data.scacheHashTableSize; i++) {
1853         for (scp = cm_data.scacheHashTablep[i]; scp; scp=scp->nextp) {
1854             downTime = 0;
1855             if (scp->flags & CM_SCACHEFLAG_PURERO && scp->volp) {
1856                 if (scp->volp->cbExpiresRO > scp->cbExpires && scp->cbExpires > 0)
1857                     scp->cbExpires = scp->volp->cbExpiresRO;
1858             }
1859
1860             if (scp->cbServerp && scp->cbExpires > 0 && now > scp->cbExpires && 
1861                  (cm_CBServersUp(scp, &downTime) || downTime == 0 || downTime >= scp->cbExpires)) 
1862             {
1863                 cm_HoldSCacheNoLock(scp);
1864                 lock_ReleaseWrite(&cm_scacheLock);
1865                 
1866                 osi_Log4(afsd_logp, "Callback Expiration Discarding SCache scp 0x%p vol %u vn %u uniq %u",
1867                           scp, scp->fid.volume, scp->fid.vnode, scp->fid.unique);
1868                 lock_ObtainMutex(&scp->mx);
1869                 cm_DiscardSCache(scp);
1870                 lock_ReleaseMutex(&scp->mx);
1871                 cm_CallbackNotifyChange(scp);
1872
1873                 cm_ReleaseSCacheNoLock(scp);
1874                 lock_ObtainWrite(&cm_scacheLock);
1875             }
1876         }
1877     }
1878     lock_ReleaseWrite(&cm_scacheLock);
1879
1880     osi_Log0(afsd_logp, "CheckCBExpiration Complete");
1881 }
1882
1883
1884 void 
1885 cm_GiveUpAllCallbacks(cm_server_t *tsp, afs_int32 markDown)
1886 {
1887     long code;
1888     cm_conn_t *connp;
1889     struct rx_connection * rxconnp;
1890
1891     if ((tsp->type == CM_SERVER_FILE) && !(tsp->flags & CM_SERVERFLAG_DOWN)) 
1892     {
1893         code = cm_ConnByServer(tsp, cm_rootUserp, &connp);
1894         if (code == 0) {
1895             rxconnp = cm_GetRxConn(connp);
1896             rx_SetConnDeadTime(rxconnp, 10);
1897             code = RXAFS_GiveUpAllCallBacks(rxconnp);
1898             rx_SetConnDeadTime(rxconnp, ConnDeadtimeout);
1899             rx_PutConnection(rxconnp);
1900         }
1901
1902         if (markDown) {
1903             cm_server_vols_t * tsrvp;
1904             cm_volume_t * volp;
1905             int i;
1906
1907             lock_ObtainMutex(&tsp->mx);
1908             if (!(tsp->flags & CM_SERVERFLAG_DOWN)) {
1909                 tsp->flags |= CM_SERVERFLAG_DOWN;
1910                 tsp->downTime = osi_Time();
1911             }
1912             cm_ForceNewConnections(tsp);
1913             /* Now update the volume status */
1914             for (tsrvp = tsp->vols; tsrvp; tsrvp = tsrvp->nextp) {
1915                 for (i=0; i<NUM_SERVER_VOLS; i++) {
1916                     if (tsrvp->ids[i] != 0) {
1917                         cm_req_t req;
1918
1919                         cm_InitReq(&req);
1920
1921                         code = cm_GetVolumeByID(tsp->cellp, tsrvp->ids[i], cm_rootUserp,
1922                                                  &req, CM_GETVOL_FLAG_NO_LRU_UPDATE, &volp);
1923                         if (code == 0) {    
1924                             cm_UpdateVolumeStatus(volp, tsrvp->ids[i]);
1925                             cm_PutVolume(volp);
1926                         }
1927                     }
1928                 }
1929             }
1930             lock_ReleaseMutex(&tsp->mx);
1931         }
1932     }
1933 }
1934
1935 void
1936 cm_GiveUpAllCallbacksAllServers(afs_int32 markDown)
1937 {
1938     cm_server_t *tsp;
1939
1940     if (!cm_giveUpAllCBs)
1941         return;
1942
1943     lock_ObtainWrite(&cm_serverLock);
1944     for (tsp = cm_allServersp; tsp; tsp = tsp->allNextp) {
1945         cm_GetServerNoLock(tsp);
1946         lock_ReleaseWrite(&cm_serverLock);
1947         cm_GiveUpAllCallbacks(tsp, markDown);
1948         lock_ObtainWrite(&cm_serverLock);
1949         cm_PutServerNoLock(tsp);
1950     }
1951     lock_ReleaseWrite(&cm_serverLock);
1952 }
1953
1954