src/WINNT/afsd/cm_conn.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/stds.h>
  12
  13 #include <windows.h>
  14 #include <string.h>
  15 #include <malloc.h>
  16 #include <osi.h>
  17 #include "afsd.h"
  18 #include <rx/rx.h>
  19 #include <rx/rxkad.h>
  20 #include <afs/unified_afs.h>
  21 #include <WINNT/afsreg.h>
  22
  23 osi_rwlock_t cm_connLock;
  24
  25 DWORD RDRtimeout = CM_CONN_DEFAULTRDRTIMEOUT;
  26 unsigned short ConnDeadtimeout = CM_CONN_CONNDEADTIME;
  27 unsigned short HardDeadtimeout = CM_CONN_HARDDEADTIME;
  28
  29 #define LANMAN_WKS_PARAM_KEY "SYSTEM\\CurrentControlSet\\Services\\lanmanworkstation\\parameters"
  30 #define LANMAN_WKS_SESSION_TIMEOUT "SessTimeout"
  31
  32 afs_int32 cryptall = 0;
  33
  34 void cm_PutConn(cm_conn_t *connp)
  35 {
  36         lock_ObtainWrite(&cm_connLock);
  37         osi_assertx(connp->refCount-- > 0, "cm_conn_t refcount 0");
  38         lock_ReleaseWrite(&cm_connLock);
  39 }
  40
  41 void cm_InitConn(void)
  42 {
  43     static osi_once_t once;
  44     long code;
  45     DWORD dwValue;
  46     DWORD dummyLen;
  47     HKEY parmKey;
  48
  49     if (osi_Once(&once)) {
  50         lock_InitializeRWLock(&cm_connLock, "connection global lock");
  51
  52         /* keisa - read timeout value for lanmanworkstation  service.
  53          * jaltman - as per
  54          *   http://support.microsoft.com:80/support/kb/articles/Q102/0/67.asp&NoWebContent=1
  55          * the SessTimeout is a minimum timeout not a maximum timeout.  Therefore,
  56          * I believe that the default should not be short.  Instead, we should wait until
  57          * RX times out before reporting a timeout to the SMB client.
  58          */
  59         code = RegOpenKeyEx(HKEY_LOCAL_MACHINE, LANMAN_WKS_PARAM_KEY,
  60                             0, KEY_QUERY_VALUE, &parmKey);
  61         if (code == ERROR_SUCCESS)
  62         {
  63             dummyLen = sizeof(DWORD);
  64             code = RegQueryValueEx(parmKey, LANMAN_WKS_SESSION_TIMEOUT, NULL, NULL,
  65                                    (BYTE *) &dwValue, &dummyLen);
  66             if (code == ERROR_SUCCESS)
  67                 RDRtimeout = dwValue;
  68             RegCloseKey(parmKey);
  69         }
  70
  71         code = RegOpenKeyEx(HKEY_LOCAL_MACHINE, AFSREG_CLT_SVC_PARAM_SUBKEY,
  72                              0, KEY_QUERY_VALUE, &parmKey);
  73         if (code == ERROR_SUCCESS) {
  74             dummyLen = sizeof(DWORD);
  75             code = RegQueryValueEx(parmKey, "ConnDeadTimeout", NULL, NULL,
  76                                     (BYTE *) &dwValue, &dummyLen);
  77             if (code == ERROR_SUCCESS)
  78                 ConnDeadtimeout = (unsigned short)dwValue;
  79
  80             dummyLen = sizeof(DWORD);
  81             code = RegQueryValueEx(parmKey, "HardDeadTimeout", NULL, NULL,
  82                                     (BYTE *) &dwValue, &dummyLen);
  83             if (code == ERROR_SUCCESS)
  84                 HardDeadtimeout = (unsigned short)dwValue;
  85             afsi_log("HardDeadTimeout is %d", HardDeadtimeout);
  86             RegCloseKey(parmKey);
  87         }
  88
  89         afsi_log("lanmanworkstation : SessTimeout %u", RDRtimeout);
  90         if (ConnDeadtimeout == 0)
  91             ConnDeadtimeout = (unsigned short) (RDRtimeout / 2);
  92         afsi_log("ConnDeadTimeout is %d", ConnDeadtimeout);
  93         if (HardDeadtimeout == 0)
  94             HardDeadtimeout = (unsigned short) RDRtimeout;
  95         afsi_log("HardDeadTimeout is %d", HardDeadtimeout);
  96
  97         osi_EndOnce(&once);
  98     }
  99 }
 100
 101 void cm_InitReq(cm_req_t *reqp)
 102 {
 103         memset((char *)reqp, 0, sizeof(cm_req_t));
 104         reqp->startTime = GetTickCount();
 105 }
 106
 107 static long cm_GetServerList(struct cm_fid *fidp, struct cm_user *userp,
 108         struct cm_req *reqp, cm_serverRef_t ***serversppp)
 109 {
 110     long code;
 111     cm_volume_t *volp = NULL;
 112     cm_cell_t *cellp = NULL;
 113
 114     if (!fidp) {
 115         *serversppp = NULL;
 116         return CM_ERROR_INVAL;
 117     }
 118
 119     cellp = cm_FindCellByID(fidp->cell, 0);
 120     if (!cellp)
 121         return CM_ERROR_NOSUCHCELL;
 122
 123     code = cm_GetVolumeByID(cellp, fidp->volume, userp, reqp, CM_GETVOL_FLAG_CREATE, &volp);
 124     if (code)
 125         return code;
 126
 127     *serversppp = cm_GetVolServers(volp, fidp->volume);
 128
 129     cm_PutVolume(volp);
 130     return 0;
 131 }
 132
 133 /*
 134  * Analyze the error return from an RPC.  Determine whether or not to retry,
 135  * and if we're going to retry, determine whether failover is appropriate,
 136  * and whether timed backoff is appropriate.
 137  *
 138  * If the error code is from cm_ConnFromFID() or friends, it will be a CM_ERROR code.
 139  * Otherwise it will be an RPC code.  This may be a UNIX code (e.g. EDQUOT), or
 140  * it may be an RX code, or it may be a special code (e.g. VNOVOL), or it may
 141  * be a security code (e.g. RXKADEXPIRED).
 142  *
 143  * If the error code is from cm_ConnFromFID() or friends, connp will be NULL.
 144  *
 145  * For VLDB calls, fidp will be NULL.
 146  *
 147  * volSyncp and/or cbrp may also be NULL.
 148  */
 149 int
 150 cm_Analyze(cm_conn_t *connp, cm_user_t *userp, cm_req_t *reqp,
 151            struct cm_fid *fidp,
 152            AFSVolSync *volSyncp,
 153            cm_serverRef_t * serversp,
 154            cm_callbackRequest_t *cbrp, long errorCode)
 155 {
 156     cm_server_t *serverp = NULL;
 157     cm_serverRef_t **serverspp = NULL;
 158     cm_serverRef_t *tsrp;
 159     cm_cell_t  *cellp = NULL;
 160     cm_ucell_t *ucellp;
 161     cm_volume_t * volp = NULL;
 162     cm_vol_state_t *statep = NULL;
 163     int retry = 0;
 164     int free_svr_list = 0;
 165     int dead_session;
 166     long timeUsed, timeLeft;
 167     long code;
 168     char addr[16];
 169     int forcing_new = 0;
 170
 171     osi_Log2(afsd_logp, "cm_Analyze connp 0x%p, code 0x%x",
 172              connp, errorCode);
 173
 174     /* no locking required, since connp->serverp never changes after
 175      * creation */
 176     dead_session = (userp->cellInfop == NULL);
 177     if (connp)
 178         serverp = connp->serverp;
 179
 180     /* Update callback pointer */
 181     if (cbrp && serverp && errorCode == 0) {
 182         if (cbrp->serverp) {
 183             if ( cbrp->serverp != serverp ) {
 184                 lock_ObtainWrite(&cm_serverLock);
 185                 cm_PutServerNoLock(cbrp->serverp);
 186                 cm_GetServerNoLock(serverp);
 187                 lock_ReleaseWrite(&cm_serverLock);
 188             }
 189         } else {
 190             cm_GetServer(serverp);
 191         }
 192         lock_ObtainWrite(&cm_callbackLock);
 193         cbrp->serverp = serverp;
 194         lock_ReleaseWrite(&cm_callbackLock);
 195     }
 196
 197     /* if timeout - check that it did not exceed the HardDead timeout
 198      * and retry */
 199
 200     /* timeleft - get if from reqp the same way as cmXonnByMServers does */
 201     timeUsed = (GetTickCount() - reqp->startTime) / 1000;
 202
 203     /* leave 5 seconds margin for sleep */
 204     timeLeft = HardDeadtimeout - timeUsed;
 205
 206     /* get a pointer to the cell */
 207     if (errorCode) {
 208         if (cellp == NULL && serverp)
 209             cellp = serverp->cellp;
 210         if (cellp == NULL && serversp) {
 211             struct cm_serverRef * refp;
 212             for ( refp=serversp ; cellp == NULL && refp != NULL; refp=refp->next) {
 213                 if ( refp->server )
 214                     cellp = refp->server->cellp;
 215             }
 216         }
 217         if (cellp == NULL && fidp) {
 218             cellp = cm_FindCellByID(fidp->cell, 0);
 219         }
 220     }
 221
 222     if (errorCode == CM_ERROR_TIMEDOUT) {
 223         if (timeLeft > 5 ) {
 224             thrd_Sleep(3000);
 225             cm_CheckServers(CM_FLAG_CHECKDOWNSERVERS, cellp);
 226             retry = 1;
 227         }
 228     }
 229
 230     else if (errorCode == UAEWOULDBLOCK || errorCode == EWOULDBLOCK ||
 231               errorCode == UAEAGAIN || errorCode == EAGAIN) {
 232         osi_Log0(afsd_logp, "cm_Analyze passed EWOULDBLOCK or EAGAIN.");
 233         if (timeLeft > 5 ) {
 234             thrd_Sleep(1000);
 235             retry = 1;
 236         }
 237     }
 238
 239     /* if there is nosuchvolume, then we have a situation in which a
 240      * previously known volume no longer has a set of servers
 241      * associated with it.  Either the volume has moved or
 242      * the volume has been deleted.  Try to find a new server list
 243      * until the timeout period expires.
 244      */
 245     else if (errorCode == CM_ERROR_NOSUCHVOLUME) {
 246         osi_Log0(afsd_logp, "cm_Analyze passed CM_ERROR_NOSUCHVOLUME.");
 247         if (timeLeft > 7) {
 248             thrd_Sleep(5000);
 249
 250             retry = 1;
 251
 252             if (fidp != NULL)   /* Not a VLDB call */
 253                 cm_ForceUpdateVolume(fidp, userp, reqp);
 254         }
 255     }
 256
 257     else if (errorCode == CM_ERROR_ALLDOWN) {
 258         osi_Log0(afsd_logp, "cm_Analyze passed CM_ERROR_ALLDOWN.");
 259         /* Servers marked DOWN will be restored by the background daemon
 260          * thread as they become available.
 261          */
 262     }
 263
 264     else if (errorCode == CM_ERROR_ALLOFFLINE) {
 265         osi_Log0(afsd_logp, "cm_Analyze passed CM_ERROR_ALLOFFLINE.");
 266         /* Volume instances marked offline will be restored by the
 267          * background daemon thread as they become available
 268          */
 269         if (timeLeft > 7 && fidp) {
 270             thrd_Sleep(5000);
 271
 272             code = cm_GetVolumeByID(cellp, fidp->volume, userp, reqp,
 273                                     CM_GETVOL_FLAG_NO_LRU_UPDATE,
 274                                     &volp);
 275             if (code == 0) {
 276                 if (fidp->volume == volp->rw.ID)
 277                     statep = &volp->rw;
 278                 else if (fidp->volume == volp->ro.ID)
 279                     statep = &volp->ro;
 280                 else if (fidp->volume == volp->bk.ID)
 281                     statep = &volp->bk;
 282
 283                 if (statep->state != vl_offline) {
 284                     retry = 1;
 285                 } else {
 286                     if (cm_CheckOfflineVolume(volp, statep->ID))
 287                         retry = 1;
 288                 }
 289
 290                 cm_PutVolume(volp);
 291             }
 292         }
 293     }
 294     else if (errorCode == CM_ERROR_ALLBUSY) {
 295         /* Volumes that are busy cannot be determined to be non-busy
 296          * without actually attempting to access them.
 297          */
 298         osi_Log0(afsd_logp, "cm_Analyze passed CM_ERROR_ALLBUSY.");
 299         if (timeLeft > 7) {
 300
 301             thrd_Sleep(5000);
 302
 303             if (fidp) { /* File Server query */
 304                 code = cm_GetVolumeByID(cellp, fidp->volume, userp, reqp,
 305                                         CM_GETVOL_FLAG_NO_LRU_UPDATE,
 306                                         &volp);
 307                 if (code == 0) {
 308                     if (fidp->volume == volp->rw.ID)
 309                         statep = &volp->rw;
 310                     else if (fidp->volume == volp->ro.ID)
 311                         statep = &volp->ro;
 312                     else if (fidp->volume == volp->bk.ID)
 313                         statep = &volp->bk;
 314
 315                     if (statep->state != vl_offline && statep->state != vl_busy) {
 316                         retry = 1;
 317                     } else {
 318                         if (!serversp) {
 319                             code = cm_GetServerList(fidp, userp, reqp, &serverspp);
 320                             if (code == 0) {
 321                                 serversp = *serverspp;
 322                                 free_svr_list = 1;
 323                             }
 324                         }
 325                         lock_ObtainWrite(&cm_serverLock);
 326                         for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
 327                             if (tsrp->status == srv_busy) {
 328                                 tsrp->status = srv_not_busy;
 329                             }
 330                         }
 331                         lock_ReleaseWrite(&cm_serverLock);
 332                         if (free_svr_list) {
 333                             cm_FreeServerList(&serversp, 0);
 334                             *serverspp = serversp;
 335                         }
 336
 337                         cm_UpdateVolumeStatus(volp, statep->ID);
 338                         retry = 1;
 339                     }
 340
 341                     cm_PutVolume(volp);
 342                 }
 343             } else {    /* VL Server query */
 344                 if (serversp) {
 345                     lock_ObtainWrite(&cm_serverLock);
 346                     for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
 347                         if (tsrp->status == srv_busy) {
 348                             tsrp->status = srv_not_busy;
 349                         }
 350                     }
 351                     lock_ReleaseWrite(&cm_serverLock);
 352                     retry = 1;
 353                 }
 354             }
 355         }
 356     }
 357
 358     /* special codes:  VBUSY and VRESTARTING */
 359     else if (errorCode == VBUSY || errorCode == VRESTARTING) {
 360         if (!serversp && fidp) {
 361             code = cm_GetServerList(fidp, userp, reqp, &serverspp);
 362             if (code == 0) {
 363                 serversp = *serverspp;
 364                 free_svr_list = 1;
 365             }
 366         }
 367         lock_ObtainWrite(&cm_serverLock);
 368         for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
 369             if (tsrp->server == serverp && tsrp->status == srv_not_busy) {
 370                 tsrp->status = srv_busy;
 371                 if (fidp) { /* File Server query */
 372                     code = cm_GetVolumeByID(cellp, fidp->volume, userp, reqp,
 373                                              CM_GETVOL_FLAG_NO_LRU_UPDATE,
 374                                              &volp);
 375                     if (code == 0) {
 376                         if (fidp->volume == volp->rw.ID)
 377                             statep = &volp->rw;
 378                         else if (fidp->volume == volp->ro.ID)
 379                             statep = &volp->ro;
 380                         else if (fidp->volume == volp->bk.ID)
 381                             statep = &volp->bk;
 382                     }
 383                 }
 384                 break;
 385             }
 386         }
 387         lock_ReleaseWrite(&cm_serverLock);
 388
 389         if (statep) {
 390             cm_UpdateVolumeStatus(volp, statep->ID);
 391             cm_PutVolume(volp);
 392         }
 393
 394         if (free_svr_list) {
 395             cm_FreeServerList(&serversp, 0);
 396             *serverspp = serversp;
 397         }
 398         retry = 1;
 399     }
 400
 401     /* special codes:  missing volumes */
 402     else if (errorCode == VNOVOL || errorCode == VMOVED || errorCode == VOFFLINE ||
 403              errorCode == VSALVAGE || errorCode == VNOSERVICE || errorCode == VIO)
 404     {
 405         char addr[16];
 406         char *format;
 407         DWORD msgID;
 408         switch ( errorCode ) {
 409         case VNOVOL:
 410             msgID = MSG_SERVER_REPORTS_VNOVOL;
 411             format = "Server %s reported volume %d as not attached.";
 412             break;
 413         case VMOVED:
 414             msgID = MSG_SERVER_REPORTS_VMOVED;
 415             format = "Server %s reported volume %d as moved.";
 416             break;
 417         case VOFFLINE:
 418             msgID = MSG_SERVER_REPORTS_VOFFLINE;
 419             format = "Server %s reported volume %d as offline.";
 420             break;
 421         case VSALVAGE:
 422             msgID = MSG_SERVER_REPORTS_VSALVAGE;
 423             format = "Server %s reported volume %d as needs salvage.";
 424             break;
 425         case VNOSERVICE:
 426             msgID = MSG_SERVER_REPORTS_VNOSERVICE;
 427             format = "Server %s reported volume %d as not in service.";
 428             break;
 429         case VIO:
 430             msgID = MSG_SERVER_REPORTS_VIO;
 431             format = "Server %s reported volume %d as temporarily unaccessible.";
 432             break;
 433         }
 434
 435         /* Log server being offline for this volume */
 436         sprintf(addr, "%d.%d.%d.%d",
 437                  ((serverp->addr.sin_addr.s_addr & 0xff)),
 438                  ((serverp->addr.sin_addr.s_addr & 0xff00)>> 8),
 439                  ((serverp->addr.sin_addr.s_addr & 0xff0000)>> 16),
 440                  ((serverp->addr.sin_addr.s_addr & 0xff000000)>> 24));
 441
 442         osi_Log2(afsd_logp, format, osi_LogSaveString(afsd_logp,addr), fidp->volume);
 443         LogEvent(EVENTLOG_WARNING_TYPE, msgID, addr, fidp->volume);
 444
 445         /* Mark server offline for this volume */
 446         if (!serversp && fidp) {
 447             code = cm_GetServerList(fidp, userp, reqp, &serverspp);
 448             if (code == 0) {
 449                 serversp = *serverspp;
 450                 free_svr_list = 1;
 451             }
 452         }
 453         lock_ObtainWrite(&cm_serverLock);
 454         for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
 455             if (tsrp->server == serverp) {
 456                 /* REDIRECT */
 457                 if (errorCode == VMOVED) {
 458                     tsrp->status = srv_deleted;
 459                 } else {
 460                     tsrp->status = srv_offline;
 461                 }
 462
 463                 if (fidp) { /* File Server query */
 464                     code = cm_GetVolumeByID(cellp, fidp->volume, userp, reqp,
 465                                              CM_GETVOL_FLAG_NO_LRU_UPDATE,
 466                                              &volp);
 467                     if (code == 0) {
 468                         if (fidp->volume == volp->rw.ID)
 469                             statep = &volp->rw;
 470                         else if (fidp->volume == volp->ro.ID)
 471                             statep = &volp->ro;
 472                         else if (fidp->volume == volp->bk.ID)
 473                             statep = &volp->bk;
 474                     }
 475                 }
 476             }
 477         }
 478         lock_ReleaseWrite(&cm_serverLock);
 479
 480         if (fidp && errorCode == VMOVED)
 481             cm_ForceUpdateVolume(fidp, userp, reqp);
 482
 483         if (statep) {
 484             cm_UpdateVolumeStatus(volp, statep->ID);
 485             cm_PutVolume(volp);
 486         }
 487
 488         if (free_svr_list) {
 489             cm_FreeServerList(&serversp, 0);
 490             *serverspp = serversp;
 491         }
 492         if ( timeLeft > 2 )
 493             retry = 1;
 494     } else if ( errorCode == VNOVNODE ) {
 495         if ( fidp ) {
 496             cm_scache_t * scp;
 497             osi_Log4(afsd_logp, "cm_Analyze passed VNOVNODE cell %u vol %u vn %u uniq %u.",
 498                       fidp->cell, fidp->volume, fidp->vnode, fidp->unique);
 499
 500             scp = cm_FindSCache(fidp);
 501             if (scp) {
 502                 cm_scache_t *pscp = NULL;
 503
 504                 if (scp->fileType != CM_SCACHETYPE_DIRECTORY)
 505                     pscp = cm_FindSCacheParent(scp);
 506
 507
 508                 lock_ObtainMutex(&scp->mx);
 509                 lock_ObtainWrite(&cm_scacheLock);
 510                 cm_RemoveSCacheFromHashTable(scp);
 511                 lock_ReleaseWrite(&cm_scacheLock);
 512                 scp->flags |= CM_SCACHEFLAG_DELETED;
 513                 lock_ReleaseMutex(&scp->mx);
 514                 cm_ReleaseSCache(scp);
 515
 516                 if (pscp) {
 517                     if (cm_HaveCallback(pscp)) {
 518                         lock_ObtainMutex(&pscp->mx);
 519                         cm_DiscardSCache(pscp);
 520                         lock_ReleaseMutex(&pscp->mx);
 521                     }
 522                     cm_ReleaseSCache(pscp);
 523                 }
 524             }
 525         } else {
 526             osi_Log0(afsd_logp, "cm_Analyze passed VNOVNODE unknown fid.");
 527         }
 528     }
 529
 530     /* RX codes */
 531     else if (errorCode == RX_CALL_TIMEOUT) {
 532         /* server took longer than hardDeadTime
 533          * don't mark server as down but don't retry
 534          * this is to prevent the SMB session from timing out
 535          * In addition, we log an event to the event log
 536          */
 537
 538         /* Log server being offline for this volume */
 539         sprintf(addr, "%d.%d.%d.%d",
 540                  ((serverp->addr.sin_addr.s_addr & 0xff)),
 541                  ((serverp->addr.sin_addr.s_addr & 0xff00)>> 8),
 542                  ((serverp->addr.sin_addr.s_addr & 0xff0000)>> 16),
 543                  ((serverp->addr.sin_addr.s_addr & 0xff000000)>> 24));
 544
 545         LogEvent(EVENTLOG_WARNING_TYPE, MSG_RX_HARD_DEAD_TIME_EXCEEDED, addr);
 546
 547         retry = 0;
 548         osi_Log1(afsd_logp, "cm_Analyze: hardDeadTime exceeded addr[%s]",
 549                  osi_LogSaveString(afsd_logp,addr));
 550     }
 551     else if (errorCode >= -64 && errorCode < 0) {
 552         /* mark server as down */
 553         lock_ObtainMutex(&serverp->mx);
 554         if (reqp->flags & CM_REQ_NEW_CONN_FORCED) {
 555             if (!(serverp->flags & CM_SERVERFLAG_DOWN)) {
 556                 serverp->flags |= CM_SERVERFLAG_DOWN;
 557                 serverp->downTime = time(NULL);
 558             }
 559         } else {
 560             reqp->flags |= CM_REQ_NEW_CONN_FORCED;
 561             forcing_new = 1;
 562         }
 563         lock_ReleaseMutex(&serverp->mx);
 564         cm_ForceNewConnections(serverp);
 565         if ( timeLeft > 2 )
 566             retry = 1;
 567     }
 568     else if (errorCode == RXKADEXPIRED || errorCode == RXKADBADTICKET) {
 569         if (!dead_session) {
 570             lock_ObtainMutex(&userp->mx);
 571             ucellp = cm_GetUCell(userp, serverp->cellp);
 572             if (ucellp->ticketp) {
 573                 free(ucellp->ticketp);
 574                 ucellp->ticketp = NULL;
 575             }
 576             ucellp->flags &= ~CM_UCELLFLAG_RXKAD;
 577             ucellp->gen++;
 578             lock_ReleaseMutex(&userp->mx);
 579             if ( timeLeft > 2 )
 580                 retry = 1;
 581         }
 582     } else if (errorCode == VICECONNBAD || errorCode == VICETOKENDEAD) {
 583         cm_ForceNewConnections(serverp);
 584         if ( timeLeft > 2 )
 585             retry = 1;
 586     } else {
 587         if (errorCode) {
 588             char * s = "unknown error";
 589             switch ( errorCode ) {
 590             case RXKADINCONSISTENCY: s = "RXKADINCONSISTENCY"; break;
 591             case RXKADPACKETSHORT  : s = "RXKADPACKETSHORT";   break;
 592             case RXKADLEVELFAIL    : s = "RXKADLEVELFAIL";     break;
 593             case RXKADTICKETLEN    : s = "RXKADTICKETLEN";     break;
 594             case RXKADOUTOFSEQUENCE: s = "RXKADOUTOFSEQUENCE"; break;
 595             case RXKADNOAUTH       : s = "RXKADNOAUTH";        break;
 596             case RXKADBADKEY       : s = "RXKADBADKEY";        break;
 597             case RXKADBADTICKET    : s = "RXKADBADTICKET";     break;
 598             case RXKADUNKNOWNKEY   : s = "RXKADUNKNOWNKEY";    break;
 599             case RXKADEXPIRED      : s = "RXKADEXPIRED";       break;
 600             case RXKADSEALEDINCON  : s = "RXKADSEALEDINCON";   break;
 601             case RXKADDATALEN      : s = "RXKADDATALEN";       break;
 602             case RXKADILLEGALLEVEL : s = "RXKADILLEGALLEVEL";  break;
 603             case VSALVAGE          : s = "VSALVAGE";           break;
 604             case VNOVNODE          : s = "VNOVNODE";           break;
 605             case VNOVOL            : s = "VNOVOL";             break;
 606             case VVOLEXISTS        : s = "VVOLEXISTS";         break;
 607             case VNOSERVICE        : s = "VNOSERVICE";         break;
 608             case VOFFLINE          : s = "VOFFLINE";           break;
 609             case VONLINE           : s = "VONLINE";            break;
 610             case VDISKFULL         : s = "VDISKFULL";          break;
 611             case VOVERQUOTA        : s = "VOVERQUOTA";         break;
 612             case VBUSY             : s = "VBUSY";              break;
 613             case VMOVED            : s = "VMOVED";             break;
 614             case VIO               : s = "VIO";                break;
 615             case VRESTRICTED       : s = "VRESTRICTED";        break;
 616             case VRESTARTING       : s = "VRESTARTING";        break;
 617             case VREADONLY         : s = "VREADONLY";          break;
 618             case EAGAIN            : s = "EAGAIN";             break;
 619             case UAEAGAIN          : s = "UAEAGAIN";           break;
 620             case EINVAL            : s = "EINVAL";             break;
 621             case UAEINVAL          : s = "UAEINVAL";           break;
 622             case EACCES            : s = "EACCES";             break;
 623             case UAEACCES          : s = "UAEACCES";           break;
 624             case ENOENT            : s = "ENOENT";             break;
 625             case UAENOENT          : s = "UAENOENT";           break;
 626             case VICECONNBAD       : s = "VICECONNBAD";        break;
 627             case VICETOKENDEAD     : s = "VICETOKENDEAD";      break;
 628             case WSAEWOULDBLOCK    : s = "WSAEWOULDBLOCK";     break;
 629             case UAEWOULDBLOCK     : s = "UAEWOULDBLOCK";      break;
 630             case CM_ERROR_NOSUCHCELL        : s = "CM_ERROR_NOSUCHCELL";         break;
 631             case CM_ERROR_NOSUCHVOLUME      : s = "CM_ERROR_NOSUCHVOLUME";       break;
 632             case CM_ERROR_TIMEDOUT          : s = "CM_ERROR_TIMEDOUT";           break;
 633             case CM_ERROR_RETRY             : s = "CM_ERROR_RETRY";              break;
 634             case CM_ERROR_NOACCESS          : s = "CM_ERROR_NOACCESS";           break;
 635             case CM_ERROR_NOSUCHFILE        : s = "CM_ERROR_NOSUCHFILE";         break;
 636             case CM_ERROR_STOPNOW           : s = "CM_ERROR_STOPNOW";            break;
 637             case CM_ERROR_TOOBIG            : s = "CM_ERROR_TOOBIG";             break;
 638             case CM_ERROR_INVAL             : s = "CM_ERROR_INVAL";              break;
 639             case CM_ERROR_BADFD             : s = "CM_ERROR_BADFD";              break;
 640             case CM_ERROR_BADFDOP           : s = "CM_ERROR_BADFDOP";            break;
 641             case CM_ERROR_EXISTS            : s = "CM_ERROR_EXISTS";             break;
 642             case CM_ERROR_CROSSDEVLINK      : s = "CM_ERROR_CROSSDEVLINK";       break;
 643             case CM_ERROR_BADOP             : s = "CM_ERROR_BADOP";              break;
 644             case CM_ERROR_BADPASSWORD       : s = "CM_ERROR_BADPASSWORD";        break;
 645             case CM_ERROR_NOTDIR            : s = "CM_ERROR_NOTDIR";             break;
 646             case CM_ERROR_ISDIR             : s = "CM_ERROR_ISDIR";              break;
 647             case CM_ERROR_READONLY          : s = "CM_ERROR_READONLY";           break;
 648             case CM_ERROR_WOULDBLOCK        : s = "CM_ERROR_WOULDBLOCK";         break;
 649             case CM_ERROR_QUOTA             : s = "CM_ERROR_QUOTA";              break;
 650             case CM_ERROR_SPACE             : s = "CM_ERROR_SPACE";              break;
 651             case CM_ERROR_BADSHARENAME      : s = "CM_ERROR_BADSHARENAME";       break;
 652             case CM_ERROR_BADTID            : s = "CM_ERROR_BADTID";             break;
 653             case CM_ERROR_UNKNOWN           : s = "CM_ERROR_UNKNOWN";            break;
 654             case CM_ERROR_NOMORETOKENS      : s = "CM_ERROR_NOMORETOKENS";       break;
 655             case CM_ERROR_NOTEMPTY          : s = "CM_ERROR_NOTEMPTY";           break;
 656             case CM_ERROR_USESTD            : s = "CM_ERROR_USESTD";             break;
 657             case CM_ERROR_REMOTECONN        : s = "CM_ERROR_REMOTECONN";         break;
 658             case CM_ERROR_ATSYS             : s = "CM_ERROR_ATSYS";              break;
 659             case CM_ERROR_NOSUCHPATH        : s = "CM_ERROR_NOSUCHPATH";         break;
 660             case CM_ERROR_CLOCKSKEW         : s = "CM_ERROR_CLOCKSKEW";          break;
 661             case CM_ERROR_BADSMB            : s = "CM_ERROR_BADSMB";             break;
 662             case CM_ERROR_ALLBUSY           : s = "CM_ERROR_ALLBUSY";            break;
 663             case CM_ERROR_NOFILES           : s = "CM_ERROR_NOFILES";            break;
 664             case CM_ERROR_PARTIALWRITE      : s = "CM_ERROR_PARTIALWRITE";       break;
 665             case CM_ERROR_NOIPC             : s = "CM_ERROR_NOIPC";              break;
 666             case CM_ERROR_BADNTFILENAME     : s = "CM_ERROR_BADNTFILENAME";      break;
 667             case CM_ERROR_BUFFERTOOSMALL    : s = "CM_ERROR_BUFFERTOOSMALL";     break;
 668             case CM_ERROR_RENAME_IDENTICAL  : s = "CM_ERROR_RENAME_IDENTICAL";   break;
 669             case CM_ERROR_ALLOFFLINE        : s = "CM_ERROR_ALLOFFLINE";         break;
 670             case CM_ERROR_AMBIGUOUS_FILENAME: s = "CM_ERROR_AMBIGUOUS_FILENAME"; break;
 671             case CM_ERROR_BADLOGONTYPE      : s = "CM_ERROR_BADLOGONTYPE";       break;
 672             case CM_ERROR_GSSCONTINUE       : s = "CM_ERROR_GSSCONTINUE";        break;
 673             case CM_ERROR_TIDIPC            : s = "CM_ERROR_TIDIPC";             break;
 674             case CM_ERROR_TOO_MANY_SYMLINKS : s = "CM_ERROR_TOO_MANY_SYMLINKS";  break;
 675             case CM_ERROR_PATH_NOT_COVERED  : s = "CM_ERROR_PATH_NOT_COVERED";   break;
 676             case CM_ERROR_LOCK_CONFLICT     : s = "CM_ERROR_LOCK_CONFLICT";      break;
 677             case CM_ERROR_SHARING_VIOLATION : s = "CM_ERROR_SHARING_VIOLATION";  break;
 678             case CM_ERROR_ALLDOWN           : s = "CM_ERROR_ALLDOWN";            break;
 679             case CM_ERROR_TOOFEWBUFS        : s = "CM_ERROR_TOOFEWBUFS";         break;
 680             case CM_ERROR_TOOMANYBUFS       : s = "CM_ERROR_TOOMANYBUFS";        break;
 681             }
 682             osi_Log2(afsd_logp, "cm_Analyze: ignoring error code 0x%x (%s)",
 683                      errorCode, s);
 684             retry = 0;
 685         }
 686     }
 687
 688     /* If not allowed to retry, don't */
 689     if (!forcing_new && (reqp->flags & CM_REQ_NORETRY))
 690         retry = 0;
 691     else if (retry && dead_session)
 692         retry = 0;
 693
 694   out:
 695     /* drop this on the way out */
 696     if (connp)
 697         cm_PutConn(connp);
 698
 699     /* retry until we fail to find a connection */
 700     return retry;
 701 }
 702
 703 long cm_ConnByMServers(cm_serverRef_t *serversp, cm_user_t *usersp,
 704         cm_req_t *reqp, cm_conn_t **connpp)
 705 {
 706     long code;
 707     cm_serverRef_t *tsrp;
 708     cm_server_t *tsp;
 709     long firstError = 0;
 710     int someBusy = 0, someOffline = 0, allOffline = 1, allBusy = 1, allDown = 1;
 711     long timeUsed, timeLeft, hardTimeLeft;
 712
 713     *connpp = NULL;
 714
 715     if (serversp == NULL) {
 716         osi_Log1(afsd_logp, "cm_ConnByMServers returning 0x%x", CM_ERROR_ALLDOWN);
 717         return CM_ERROR_ALLDOWN;
 718     }
 719
 720     timeUsed = (GetTickCount() - reqp->startTime) / 1000;
 721
 722     /* leave 5 seconds margin of safety */
 723     timeLeft =  ConnDeadtimeout - timeUsed - 5;
 724     hardTimeLeft = HardDeadtimeout - timeUsed - 5;
 725
 726     lock_ObtainWrite(&cm_serverLock);
 727     for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
 728         tsp = tsrp->server;
 729         cm_GetServerNoLock(tsp);
 730         lock_ReleaseWrite(&cm_serverLock);
 731         if (!(tsp->flags & CM_SERVERFLAG_DOWN)) {
 732             allDown = 0;
 733             if (tsrp->status == srv_deleted) {
 734                 /* skip this entry.  no longer valid. */;
 735             } else if (tsrp->status == srv_busy) {
 736                 allOffline = 0;
 737                 someBusy = 1;
 738             } else if (tsrp->status == srv_offline) {
 739                 allBusy = 0;
 740                 someOffline = 1;
 741             } else {
 742                 allOffline = 0;
 743                 allBusy = 0;
 744                 code = cm_ConnByServer(tsp, usersp, connpp);
 745                 if (code == 0) {        /* cm_CBS only returns 0 */
 746                     cm_PutServer(tsp);
 747                     /* Set RPC timeout */
 748                     if (timeLeft > ConnDeadtimeout)
 749                         timeLeft = ConnDeadtimeout;
 750
 751                     if (hardTimeLeft > HardDeadtimeout)
 752                         hardTimeLeft = HardDeadtimeout;
 753
 754                     lock_ObtainMutex(&(*connpp)->mx);
 755                     rx_SetConnDeadTime((*connpp)->callp, timeLeft);
 756                     rx_SetConnHardDeadTime((*connpp)->callp, (u_short) hardTimeLeft);
 757                     lock_ReleaseMutex(&(*connpp)->mx);
 758                     return 0;
 759                 }
 760
 761                 /* therefore, this code is never executed */
 762                 if (firstError == 0)
 763                     firstError = code;
 764             }
 765         }
 766         lock_ObtainWrite(&cm_serverLock);
 767         cm_PutServerNoLock(tsp);
 768     }
 769     lock_ReleaseWrite(&cm_serverLock);
 770
 771     if (firstError == 0) {
 772         if (allDown)
 773             firstError = CM_ERROR_ALLDOWN;
 774         else if (allBusy)
 775             firstError = CM_ERROR_ALLBUSY;
 776         else if (allOffline || (someBusy && someOffline))
 777             firstError = CM_ERROR_ALLOFFLINE;
 778         else {
 779             osi_Log0(afsd_logp, "cm_ConnByMServers returning impossible error TIMEDOUT");
 780             firstError = CM_ERROR_TIMEDOUT;
 781         }
 782     }
 783
 784     osi_Log1(afsd_logp, "cm_ConnByMServers returning 0x%x", firstError);
 785     return firstError;
 786 }
 787
 788 /* called with a held server to GC all bad connections hanging off of the server */
 789 void cm_GCConnections(cm_server_t *serverp)
 790 {
 791     cm_conn_t *tcp;
 792     cm_conn_t **lcpp;
 793     cm_user_t *userp;
 794
 795     lock_ObtainWrite(&cm_connLock);
 796     lcpp = &serverp->connsp;
 797     for (tcp = *lcpp; tcp; tcp = *lcpp) {
 798         userp = tcp->userp;
 799         if (userp && tcp->refCount == 0 && (userp->vcRefs == 0)) {
 800             /* do the deletion of this guy */
 801             cm_PutServer(tcp->serverp);
 802             cm_ReleaseUser(userp);
 803             *lcpp = tcp->nextp;
 804             rx_DestroyConnection(tcp->callp);
 805             lock_FinalizeMutex(&tcp->mx);
 806             free(tcp);
 807         }
 808         else {
 809             /* just advance to the next */
 810             lcpp = &tcp->nextp;
 811         }
 812     }
 813     lock_ReleaseWrite(&cm_connLock);
 814 }
 815
 816 static void cm_NewRXConnection(cm_conn_t *tcp, cm_ucell_t *ucellp,
 817                                cm_server_t *serverp)
 818 {
 819     unsigned short port;
 820     int serviceID;
 821     int secIndex;
 822     struct rx_securityClass *secObjp;
 823
 824     if (serverp->type == CM_SERVER_VLDB) {
 825         port = htons(7003);
 826         serviceID = 52;
 827     }
 828     else {
 829         osi_assertx(serverp->type == CM_SERVER_FILE, "incorrect server type");
 830         port = htons(7000);
 831         serviceID = 1;
 832     }
 833     if (ucellp->flags & CM_UCELLFLAG_RXKAD) {
 834         secIndex = 2;
 835         if (cryptall) {
 836             tcp->cryptlevel = rxkad_crypt;
 837         } else {
 838             tcp->cryptlevel = rxkad_clear;
 839         }
 840         secObjp = rxkad_NewClientSecurityObject(tcp->cryptlevel,
 841                                                 &ucellp->sessionKey, ucellp->kvno,
 842                                                 ucellp->ticketLen, ucellp->ticketp);
 843     } else {
 844         /* normal auth */
 845         secIndex = 0;
 846         tcp->cryptlevel = rxkad_clear;
 847         secObjp = rxnull_NewClientSecurityObject();
 848     }
 849     osi_assertx(secObjp != NULL, "null rx_securityClass");
 850     tcp->callp = rx_NewConnection(serverp->addr.sin_addr.s_addr,
 851                                   port,
 852                                   serviceID,
 853                                   secObjp,
 854                                   secIndex);
 855     rx_SetConnDeadTime(tcp->callp, ConnDeadtimeout);
 856     rx_SetConnHardDeadTime(tcp->callp, HardDeadtimeout);
 857     tcp->ucgen = ucellp->gen;
 858     if (secObjp)
 859         rxs_Release(secObjp);   /* Decrement the initial refCount */
 860 }
 861
 862 long cm_ConnByServer(cm_server_t *serverp, cm_user_t *userp, cm_conn_t **connpp)
 863 {
 864     cm_conn_t *tcp;
 865     cm_ucell_t *ucellp;
 866
 867     *connpp = NULL;
 868
 869     lock_ObtainMutex(&userp->mx);
 870     lock_ObtainWrite(&cm_connLock);
 871     for (tcp = serverp->connsp; tcp; tcp=tcp->nextp) {
 872         if (tcp->userp == userp)
 873             break;
 874     }
 875
 876     /* find ucell structure */
 877     ucellp = cm_GetUCell(userp, serverp->cellp);
 878     if (!tcp) {
 879         cm_GetServer(serverp);
 880         tcp = malloc(sizeof(*tcp));
 881         memset(tcp, 0, sizeof(*tcp));
 882         tcp->nextp = serverp->connsp;
 883         serverp->connsp = tcp;
 884         cm_HoldUser(userp);
 885         tcp->userp = userp;
 886         lock_InitializeMutex(&tcp->mx, "cm_conn_t mutex");
 887         lock_ObtainMutex(&tcp->mx);
 888         tcp->serverp = serverp;
 889         tcp->cryptlevel = rxkad_clear;
 890         cm_NewRXConnection(tcp, ucellp, serverp);
 891         tcp->refCount = 1;
 892         lock_ReleaseMutex(&tcp->mx);
 893     } else {
 894         if ((tcp->flags & CM_CONN_FLAG_FORCE_NEW) ||
 895             (tcp->ucgen < ucellp->gen) ||
 896             (tcp->cryptlevel != (cryptall ? (ucellp->flags & CM_UCELLFLAG_RXKAD ? rxkad_crypt : rxkad_clear) : rxkad_clear)))
 897         {
 898             if (tcp->ucgen < ucellp->gen)
 899                 osi_Log0(afsd_logp, "cm_ConnByServer replace connection due to token update");
 900             else
 901                 osi_Log0(afsd_logp, "cm_ConnByServer replace connection due to crypt change");
 902             lock_ObtainMutex(&tcp->mx);
 903             tcp->flags &= ~CM_CONN_FLAG_FORCE_NEW;
 904             rx_DestroyConnection(tcp->callp);
 905             cm_NewRXConnection(tcp, ucellp, serverp);
 906             lock_ReleaseMutex(&tcp->mx);
 907         }
 908         tcp->refCount++;
 909     }
 910     lock_ReleaseWrite(&cm_connLock);
 911     lock_ReleaseMutex(&userp->mx);
 912
 913     /* return this pointer to our caller */
 914     osi_Log1(afsd_logp, "cm_ConnByServer returning conn 0x%p", tcp);
 915     *connpp = tcp;
 916
 917     return 0;
 918 }
 919
 920 long cm_ServerAvailable(struct cm_fid *fidp, struct cm_user *userp)
 921 {
 922     long code;
 923     cm_req_t req;
 924     cm_serverRef_t **serverspp;
 925     cm_serverRef_t *tsrp;
 926     cm_server_t *tsp;
 927     int someBusy = 0, someOffline = 0, allOffline = 1, allBusy = 1, allDown = 1;
 928
 929     cm_InitReq(&req);
 930
 931     code = cm_GetServerList(fidp, userp, &req, &serverspp);
 932     if (code)
 933         return 0;
 934
 935     lock_ObtainWrite(&cm_serverLock);
 936     for (tsrp = *serverspp; tsrp; tsrp=tsrp->next) {
 937         tsp = tsrp->server;
 938         cm_GetServerNoLock(tsp);
 939         if (!(tsp->flags & CM_SERVERFLAG_DOWN)) {
 940             allDown = 0;
 941             if (tsrp->status == srv_busy) {
 942                 allOffline = 0;
 943                 someBusy = 1;
 944             } else if (tsrp->status == srv_offline) {
 945                 allBusy = 0;
 946                 someOffline = 1;
 947             } else {
 948                 allOffline = 0;
 949                 allBusy = 0;
 950             }
 951         }
 952         cm_PutServerNoLock(tsp);
 953     }
 954     lock_ReleaseWrite(&cm_serverLock);
 955     cm_FreeServerList(serverspp, 0);
 956
 957     if (allDown)
 958         return 0;
 959     else if (allBusy)
 960         return 0;
 961     else if (allOffline || (someBusy && someOffline))
 962         return 0;
 963     else
 964         return 1;
 965 }
 966
 967 /*
 968  * The returned cm_conn_t ** object is released in the subsequent call
 969  * to cm_Analyze().
 970  */
 971 long cm_ConnFromFID(struct cm_fid *fidp, struct cm_user *userp, cm_req_t *reqp,
 972                     cm_conn_t **connpp)
 973 {
 974     long code;
 975     cm_serverRef_t **serverspp;
 976
 977     *connpp = NULL;
 978
 979     code = cm_GetServerList(fidp, userp, reqp, &serverspp);
 980     if (code) {
 981         return code;
 982     }
 983
 984     code = cm_ConnByMServers(*serverspp, userp, reqp, connpp);
 985     cm_FreeServerList(serverspp, 0);
 986     return code;
 987 }
 988
 989
 990 long cm_ConnFromVolume(struct cm_volume *volp, unsigned long volid, struct cm_user *userp, cm_req_t *reqp,
 991                        cm_conn_t **connpp)
 992 {
 993     long code;
 994     cm_serverRef_t **serverspp;
 995
 996     *connpp = NULL;
 997
 998     serverspp = cm_GetVolServers(volp, volid);
 999
1000     code = cm_ConnByMServers(*serverspp, userp, reqp, connpp);
1001     cm_FreeServerList(serverspp, 0);
1002     return code;
1003 }
1004
1005
1006 extern struct rx_connection *
1007 cm_GetRxConn(cm_conn_t *connp)
1008 {
1009     struct rx_connection * rxconn;
1010     lock_ObtainMutex(&connp->mx);
1011     rxconn = connp->callp;
1012     rx_GetConnection(rxconn);
1013     lock_ReleaseMutex(&connp->mx);
1014     return rxconn;
1015 }
1016
1017 void cm_ForceNewConnections(cm_server_t *serverp)
1018 {
1019     cm_conn_t *tcp;
1020
1021     lock_ObtainWrite(&cm_connLock);
1022     for (tcp = serverp->connsp; tcp; tcp=tcp->nextp) {
1023         lock_ObtainMutex(&tcp->mx);
1024         tcp->flags |= CM_CONN_FLAG_FORCE_NEW;
1025         lock_ReleaseMutex(&tcp->mx);
1026     }
1027     lock_ReleaseWrite(&cm_connLock);
1028 }