src/WINNT/afsd/cm_callback.c

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