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