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 #ifndef DJGPP
  14 #include <windows.h>
  15 #endif /* !DJGPP */
  16 #include <string.h>
  17 #include <malloc.h>
  18 #include <osi.h>
  19 #include <rx/rx.h>
  20 #ifndef DJGPP
  21 #include <rx/rxkad.h>
  22 #else
  23 #include <rx/rxkad.h>
  24 #endif
  25
  26 #include "afsd.h"
  27
  28 osi_rwlock_t cm_connLock;
  29
  30 long RDRtimeout = CM_CONN_DEFAULTRDRTIMEOUT;
  31 unsigned short ConnDeadtimeout = CM_CONN_CONNDEADTIME;
  32 unsigned short HardDeadtimeout = CM_CONN_HARDDEADTIME;
  33
  34 #define LANMAN_WKS_PARAM_KEY "SYSTEM\\CurrentControlSet\\Services\\lanmanworkstation\\parameters"
  35 #define LANMAN_WKS_SESSION_TIMEOUT "SessTimeout"
  36
  37 afs_int32 cryptall = 0;
  38
  39 void cm_PutConn(cm_conn_t *connp)
  40 {
  41         lock_ObtainWrite(&cm_connLock);
  42         osi_assert(connp->refCount-- > 0);
  43         lock_ReleaseWrite(&cm_connLock);
  44 }
  45
  46 void cm_InitConn(void)
  47 {
  48         static osi_once_t once;
  49         long code;
  50         DWORD sessTimeout;
  51         HKEY parmKey;
  52
  53     if (osi_Once(&once)) {
  54                 lock_InitializeRWLock(&cm_connLock, "connection global lock");
  55
  56         /* keisa - read timeout value for lanmanworkstation  service.
  57          * jaltman - as per
  58          *   http://support.microsoft.com:80/support/kb/articles/Q102/0/67.asp&NoWebContent=1
  59          * the SessTimeout is a minimum timeout not a maximum timeout.  Therefore,
  60          * I believe that the default should not be short.  Instead, we should wait until
  61          * RX times out before reporting a timeout to the SMB client.
  62          */
  63                 code = RegOpenKeyEx(HKEY_LOCAL_MACHINE, LANMAN_WKS_PARAM_KEY,
  64                             0, KEY_QUERY_VALUE, &parmKey);
  65                 if (code == ERROR_SUCCESS)
  66         {
  67                     DWORD dummyLen = sizeof(sessTimeout);
  68                     code = RegQueryValueEx(parmKey, LANMAN_WKS_SESSION_TIMEOUT, NULL, NULL,
  69                                    (BYTE *) &sessTimeout, &dummyLen);
  70                     if (code == ERROR_SUCCESS)
  71             {
  72                 afsi_log("lanmanworkstation : SessTimeout %d", sessTimeout);
  73                 RDRtimeout = sessTimeout;
  74                 if ( ConnDeadtimeout < RDRtimeout + 15 ) {
  75                     ConnDeadtimeout = RDRtimeout + 15;
  76                     afsi_log("ConnDeadTimeout increased to %d", ConnDeadtimeout);
  77                 }
  78                 if ( HardDeadtimeout < 2 * ConnDeadtimeout ) {
  79                     HardDeadtimeout = 2 * ConnDeadtimeout;
  80                     afsi_log("HardDeadTimeout increased to %d", HardDeadtimeout);
  81                 }
  82             }
  83         }
  84
  85         osi_EndOnce(&once);
  86     }
  87 }
  88
  89 void cm_InitReq(cm_req_t *reqp)
  90 {
  91         memset((char *)reqp, 0, sizeof(cm_req_t));
  92 #ifndef DJGPP
  93         reqp->startTime = GetCurrentTime();
  94 #else
  95         gettimeofday(&reqp->startTime, NULL);
  96 #endif
  97 }
  98
  99 static long cm_GetServerList(struct cm_fid *fidp, struct cm_user *userp,
 100         struct cm_req *reqp, cm_serverRef_t ***serversppp)
 101 {
 102     long code;
 103     cm_volume_t *volp = NULL;
 104     cm_cell_t *cellp = NULL;
 105
 106     if (!fidp) {
 107         *serversppp = NULL;
 108         return 0;
 109     }
 110
 111     cellp = cm_FindCellByID(fidp->cell);
 112     if (!cellp) return CM_ERROR_NOSUCHCELL;
 113
 114     code = cm_GetVolumeByID(cellp, fidp->volume, userp, reqp, &volp);
 115     if (code) return code;
 116
 117     *serversppp = cm_GetVolServers(volp, fidp->volume);
 118
 119     cm_PutVolume(volp);
 120     return 0;
 121 }
 122
 123 /*
 124  * Analyze the error return from an RPC.  Determine whether or not to retry,
 125  * and if we're going to retry, determine whether failover is appropriate,
 126  * and whether timed backoff is appropriate.
 127  *
 128  * If the error code is from cm_Conn() or friends, it will be a CM_ERROR code.
 129  * Otherwise it will be an RPC code.  This may be a UNIX code (e.g. EDQUOT), or
 130  * it may be an RX code, or it may be a special code (e.g. VNOVOL), or it may
 131  * be a security code (e.g. RXKADEXPIRED).
 132  *
 133  * If the error code is from cm_Conn() or friends, connp will be NULL.
 134  *
 135  * For VLDB calls, fidp will be NULL.
 136  *
 137  * volSyncp and/or cbrp may also be NULL.
 138  */
 139 int
 140 cm_Analyze(cm_conn_t *connp, cm_user_t *userp, cm_req_t *reqp,
 141            struct cm_fid *fidp,
 142            AFSVolSync *volSyncp,
 143            cm_serverRef_t * serversp,
 144            cm_callbackRequest_t *cbrp, long errorCode)
 145 {
 146     cm_server_t *serverp = NULL;
 147     cm_serverRef_t **serverspp = NULL;
 148     cm_serverRef_t *tsrp;
 149     cm_cell_t  *cellp = NULL;
 150     cm_ucell_t *ucellp;
 151     int retry = 0;
 152     int free_svr_list = 0;
 153     int dead_session;
 154     long timeUsed, timeLeft;
 155     long code;
 156
 157     osi_Log2(afsd_logp, "cm_Analyze connp 0x%p, code 0x%x",
 158              connp, errorCode);
 159
 160     /* no locking required, since connp->serverp never changes after
 161      * creation */
 162     dead_session = (userp->cellInfop == NULL);
 163     if (connp)
 164         serverp = connp->serverp;
 165
 166     /* Update callback pointer */
 167     if (cbrp && serverp && errorCode == 0) {
 168         if (cbrp->serverp) {
 169             if ( cbrp->serverp != serverp ) {
 170                 lock_ObtainWrite(&cm_serverLock);
 171                 cm_PutServerNoLock(cbrp->serverp);
 172                 cm_GetServerNoLock(serverp);
 173                 lock_ReleaseWrite(&cm_serverLock);
 174             }
 175         } else {
 176             cm_GetServer(serverp);
 177         }
 178         lock_ObtainWrite(&cm_callbackLock);
 179         cbrp->serverp = serverp;
 180         lock_ReleaseWrite(&cm_callbackLock);
 181     }
 182
 183     /* If not allowed to retry, don't */
 184     if (reqp->flags & CM_REQ_NORETRY)
 185         goto out;
 186
 187     /* if timeout - check that it did not exceed the SMB timeout
 188      * and retry */
 189
 190     /* timeleft - get if from reqp the same way as cmXonnByMServers does */
 191 #ifndef DJGPP
 192     timeUsed = (GetCurrentTime() - reqp->startTime) / 1000;
 193 #else
 194     gettimeofday(&now, NULL);
 195     timeUsed = sub_time(now, reqp->startTime) / 1000;
 196 #endif
 197
 198     /* leave 5 seconds margin for sleep */
 199     timeLeft = RDRtimeout - timeUsed;
 200
 201     if (errorCode == CM_ERROR_TIMEDOUT) {
 202         if (timeLeft > 5 ) {
 203             thrd_Sleep(3000);
 204             if (cellp == NULL && serverp)
 205                 cellp = serverp->cellp;
 206             if (cellp == NULL && serversp) {
 207                 struct cm_serverRef * refp;
 208                 for ( refp=serversp ; cellp == NULL && refp != NULL; refp=refp->next) {
 209                     if ( refp->server )
 210                         cellp = refp->server->cellp;
 211                 }
 212             }
 213             cm_CheckServers(CM_FLAG_CHECKDOWNSERVERS, cellp);
 214             retry = 1;
 215         }
 216     }
 217
 218     /* if there is nosuchvolume, then we have a situation in which a
 219      * previously known volume no longer has a set of servers
 220      * associated with it.  Either the volume has moved or
 221      * the volume has been deleted.  Try to find a new server list
 222      * until the timeout period expires.
 223      */
 224     else if (errorCode == CM_ERROR_NOSUCHVOLUME) {
 225         osi_Log0(afsd_logp, "cm_Analyze passed CM_ERROR_NOSUCHVOLUME.");
 226         if (timeLeft > 7) {
 227             thrd_Sleep(5000);
 228
 229             retry = 1;
 230
 231             if (fidp != NULL)   /* Not a VLDB call */
 232                 cm_ForceUpdateVolume(fidp, userp, reqp);
 233         }
 234     }
 235
 236     else if (errorCode == CM_ERROR_ALLDOWN) {
 237         osi_Log0(afsd_logp, "cm_Analyze passed CM_ERROR_ALLDOWN.");
 238         /* Servers marked DOWN will be restored by the background daemon
 239          * thread as they become available.
 240          */
 241     }
 242
 243     else if (errorCode == CM_ERROR_ALLOFFLINE) {
 244         if (timeLeft > 7) {
 245             osi_Log0(afsd_logp, "cm_Analyze passed CM_ERROR_ALLOFFLINE.");
 246             thrd_Sleep(5000);
 247
 248             if (fidp) { /* Not a VLDB call */
 249                 if (!serversp) {
 250                     code = cm_GetServerList(fidp, userp, reqp, &serverspp);
 251                     if (code == 0) {
 252                         serversp = *serverspp;
 253                         free_svr_list = 1;
 254                     }
 255                 }
 256                 if (serversp) {
 257                     lock_ObtainWrite(&cm_serverLock);
 258                     for (tsrp = serversp; tsrp; tsrp=tsrp->next)
 259                         tsrp->status = not_busy;
 260                     lock_ReleaseWrite(&cm_serverLock);
 261                     if (free_svr_list) {
 262                         cm_FreeServerList(&serversp);
 263                         *serverspp = serversp;
 264                     }
 265                     retry = 1;
 266                 }
 267
 268                 cm_ForceUpdateVolume(fidp, userp, reqp);
 269             } else { /* VLDB call */
 270                 if (serversp) {
 271                     lock_ObtainWrite(&cm_serverLock);
 272                     for (tsrp = serversp; tsrp; tsrp=tsrp->next)
 273                         tsrp->status = not_busy;
 274                     lock_ReleaseWrite(&cm_serverLock);
 275                     if (free_svr_list) {
 276                         cm_FreeServerList(&serversp);
 277                         *serverspp = serversp;
 278                     }
 279                 }
 280             }
 281         }
 282     }
 283
 284     /* if all servers are busy, mark them non-busy and start over */
 285     else if (errorCode == CM_ERROR_ALLBUSY) {
 286         osi_Log0(afsd_logp, "cm_Analyze passed CM_ERROR_ALLBUSY.");
 287         if (timeLeft > 7) {
 288             thrd_Sleep(5000);
 289             if (!serversp) {
 290                 code = cm_GetServerList(fidp, userp, reqp, &serverspp);
 291                 if (code == 0) {
 292                     serversp = *serverspp;
 293                     free_svr_list = 1;
 294                 }
 295             }
 296             lock_ObtainWrite(&cm_serverLock);
 297             for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
 298                 if (tsrp->status == busy)
 299                     tsrp->status = not_busy;
 300             }
 301             lock_ReleaseWrite(&cm_serverLock);
 302             if (free_svr_list) {
 303                 cm_FreeServerList(&serversp);
 304                 *serverspp = serversp;
 305             }
 306             retry = 1;
 307         }
 308     }
 309
 310     /* special codes:  VBUSY and VRESTARTING */
 311     else if (errorCode == VBUSY || errorCode == VRESTARTING) {
 312         if (!serversp) {
 313             code = cm_GetServerList(fidp, userp, reqp, &serverspp);
 314             if (code == 0) {
 315                 serversp = *serverspp;
 316                 free_svr_list = 1;
 317             }
 318         }
 319         lock_ObtainWrite(&cm_serverLock);
 320         for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
 321             if (tsrp->server == serverp
 322                  && tsrp->status == not_busy) {
 323                 tsrp->status = busy;
 324                 break;
 325             }
 326         }
 327         lock_ReleaseWrite(&cm_serverLock);
 328         if (free_svr_list) {
 329             cm_FreeServerList(&serversp);
 330             *serverspp = serversp;
 331         }
 332         retry = 1;
 333     }
 334
 335     /* special codes:  missing volumes */
 336     else if (errorCode == VNOVOL || errorCode == VMOVED || errorCode == VOFFLINE ||
 337              errorCode == VSALVAGE || errorCode == VNOSERVICE || errorCode == VIO)
 338     {
 339 #ifndef DJGPP
 340         HANDLE h;
 341         char *ptbuf[1];
 342         char s[100];
 343 #endif
 344         char addr[16];
 345         char *format;
 346
 347         switch ( errorCode ) {
 348         case VNOVOL:
 349             format = "Server %s reported volume %d as not attached.";
 350             break;
 351         case VMOVED:
 352             format = "Server %s reported volume %d as moved.";
 353             break;
 354         case VOFFLINE:
 355             format = "Server %s reported volume %d as offline.";
 356             break;
 357         case VSALVAGE:
 358             format = "Server %s reported volume %d as needs salvage.";
 359             break;
 360         case VNOSERVICE:
 361             format = "Server %s reported volume %d as not in service.";
 362             break;
 363         case VIO:
 364             format = "Server %s reported volume %d as temporarily unaccessible.";
 365             break;
 366         }
 367
 368         /* Log server being offline for this volume */
 369         sprintf(addr, "%d.%d.%d.%d",
 370                  ((serverp->addr.sin_addr.s_addr & 0xff)),
 371                  ((serverp->addr.sin_addr.s_addr & 0xff00)>> 8),
 372                  ((serverp->addr.sin_addr.s_addr & 0xff0000)>> 16),
 373                  ((serverp->addr.sin_addr.s_addr & 0xff000000)>> 24));
 374         osi_Log2(afsd_logp, format, osi_LogSaveString(afsd_logp,addr), fidp->volume);
 375
 376 #ifndef DJGPP
 377         /* Create Event Log message */
 378         h = RegisterEventSource(NULL, AFS_DAEMON_EVENT_NAME);
 379         sprintf(s, format, addr, fidp->volume);
 380         ptbuf[0] = s;
 381         ReportEvent(h, EVENTLOG_WARNING_TYPE, 0, 1009, NULL,
 382                      1, 0, ptbuf, NULL);
 383         DeregisterEventSource(h);
 384 #endif
 385
 386         /* Mark server offline for this volume */
 387         if (!serversp) {
 388             code = cm_GetServerList(fidp, userp, reqp, &serverspp);
 389             if (code == 0) {
 390                 serversp = *serverspp;
 391                 free_svr_list = 1;
 392             }
 393         }
 394         for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
 395             if (tsrp->server == serverp)
 396                 tsrp->status = offline;
 397         }
 398         if (free_svr_list) {
 399             cm_FreeServerList(&serversp);
 400             *serverspp = serversp;
 401         }
 402         if ( timeLeft > 2 )
 403             retry = 1;
 404     } else if ( errorCode == VNOVNODE ) {
 405         if ( fidp ) {
 406             cm_scache_t * scp;
 407             osi_Log4(afsd_logp, "cm_Analyze passed VNOVNODE cell %u vol %u vn %u uniq %u.",
 408                       fidp->cell, fidp->volume, fidp->vnode, fidp->unique);
 409             if (!cm_GetSCache(fidp, &scp, userp, reqp)) {
 410                 cm_FlushParent(scp, userp, reqp);
 411                 cm_FlushFile(scp, userp, reqp);
 412                 cm_ReleaseSCache(scp);
 413             }
 414         } else {
 415             osi_Log0(afsd_logp, "cm_Analyze passed VNOVNODE unknown fid.");
 416         }
 417     }
 418
 419     /* RX codes */
 420     else if (errorCode == RX_CALL_TIMEOUT) {
 421         /* server took longer than hardDeadTime
 422          * don't mark server as down but don't retry
 423          * this is to prevent the SMB session from timing out
 424          * In addition, we log an event to the event log
 425          */
 426 #ifndef DJGPP
 427         HANDLE h;
 428         char *ptbuf[1];
 429         char s[100];
 430         h = RegisterEventSource(NULL, AFS_DAEMON_EVENT_NAME);
 431         sprintf(s, "cm_Analyze: HardDeadTime exceeded.");
 432         ptbuf[0] = s;
 433         ReportEvent(h, EVENTLOG_WARNING_TYPE, 0, 1009, NULL,
 434                      1, 0, ptbuf, NULL);
 435         DeregisterEventSource(h);
 436 #endif /* !DJGPP */
 437
 438         retry = 0;
 439         osi_Log0(afsd_logp, "cm_Analyze: hardDeadTime exceeded");
 440     }
 441     else if (errorCode >= -64 && errorCode < 0) {
 442         /* mark server as down */
 443         lock_ObtainMutex(&serverp->mx);
 444         serverp->flags |= CM_SERVERFLAG_DOWN;
 445         lock_ReleaseMutex(&serverp->mx);
 446         cm_ForceNewConnections(serverp);
 447         if ( timeLeft > 2 )
 448             retry = 1;
 449     }
 450     else if (errorCode == RXKADEXPIRED ||
 451              errorCode == RXKADBADTICKET) {
 452         if (!dead_session) {
 453             lock_ObtainMutex(&userp->mx);
 454             ucellp = cm_GetUCell(userp, serverp->cellp);
 455             if (ucellp->ticketp) {
 456                 free(ucellp->ticketp);
 457                 ucellp->ticketp = NULL;
 458             }
 459             ucellp->flags &= ~CM_UCELLFLAG_RXKAD;
 460             ucellp->gen++;
 461             lock_ReleaseMutex(&userp->mx);
 462             if ( timeLeft > 2 )
 463                 retry = 1;
 464         }
 465     } else {
 466         if (errorCode) {
 467             char * s = "unknown error";
 468             switch ( errorCode ) {
 469             case RXKADINCONSISTENCY: s = "RXKADINCONSISTENCY"; break;
 470             case RXKADPACKETSHORT  : s = "RXKADPACKETSHORT";   break;
 471             case RXKADLEVELFAIL    : s = "RXKADLEVELFAIL";     break;
 472             case RXKADTICKETLEN    : s = "RXKADTICKETLEN";     break;
 473             case RXKADOUTOFSEQUENCE: s = "RXKADOUTOFSEQUENCE"; break;
 474             case RXKADNOAUTH       : s = "RXKADNOAUTH";        break;
 475             case RXKADBADKEY       : s = "RXKADBADKEY";        break;
 476             case RXKADBADTICKET    : s = "RXKADBADTICKET";     break;
 477             case RXKADUNKNOWNKEY   : s = "RXKADUNKNOWNKEY";    break;
 478             case RXKADEXPIRED      : s = "RXKADEXPIRED";       break;
 479             case RXKADSEALEDINCON  : s = "RXKADSEALEDINCON";   break;
 480             case RXKADDATALEN      : s = "RXKADDATALEN";       break;
 481             case RXKADILLEGALLEVEL : s = "RXKADILLEGALLEVEL";  break;
 482             case VSALVAGE          : s = "VSALVAGE";           break;
 483             case VNOVNODE          : s = "VNOVNODE";           break;
 484             case VNOVOL            : s = "VNOVOL";             break;
 485             case VVOLEXISTS        : s = "VVOLEXISTS";         break;
 486             case VNOSERVICE        : s = "VNOSERVICE";         break;
 487             case VOFFLINE          : s = "VOFFLINE";           break;
 488             case VONLINE           : s = "VONLINE";            break;
 489             case VDISKFULL         : s = "VDISKFULL";          break;
 490             case VOVERQUOTA        : s = "VOVERQUOTA";         break;
 491             case VBUSY             : s = "VBUSY";              break;
 492             case VMOVED            : s = "VMOVED";             break;
 493             case VIO               : s = "VIO";                break;
 494             case VRESTRICTED       : s = "VRESTRICTED";        break;
 495             case VRESTARTING       : s = "VRESTARTING";        break;
 496             case VREADONLY         : s = "VREADONLY";          break;
 497             case EAGAIN            : s = "EAGAIN";             break;
 498             case EACCES            : s = "EACCES";             break;
 499             }
 500             osi_Log2(afsd_logp, "cm_Analyze: ignoring error code 0x%x (%s)",
 501                      errorCode, s);
 502             retry = 0;
 503         }
 504     }
 505
 506     if (retry && dead_session)
 507         retry = 0;
 508
 509   out:
 510     /* drop this on the way out */
 511     if (connp)
 512         cm_PutConn(connp);
 513
 514     /* retry until we fail to find a connection */
 515     return retry;
 516 }
 517
 518 long cm_ConnByMServers(cm_serverRef_t *serversp, cm_user_t *usersp,
 519         cm_req_t *reqp, cm_conn_t **connpp)
 520 {
 521     long code;
 522     cm_serverRef_t *tsrp;
 523     cm_server_t *tsp;
 524     long firstError = 0;
 525     int someBusy = 0, someOffline = 0, allOffline = 1, allBusy = 1, allDown = 1;
 526     long timeUsed, timeLeft, hardTimeLeft;
 527 #ifdef DJGPP
 528     struct timeval now;
 529 #endif /* DJGPP */
 530
 531     if (serversp == NULL) {
 532         osi_Log1(afsd_logp, "cm_ConnByMServers returning 0x%x", CM_ERROR_NOSUCHVOLUME);
 533         return CM_ERROR_NOSUCHVOLUME;
 534     }
 535
 536     *connpp = NULL;
 537
 538 #ifndef DJGPP
 539     timeUsed = (GetCurrentTime() - reqp->startTime) / 1000;
 540 #else
 541     gettimeofday(&now, NULL);
 542     timeUsed = sub_time(now, reqp->startTime) / 1000;
 543 #endif
 544
 545     /* leave 5 seconds margin of safety */
 546     timeLeft =  ConnDeadtimeout - timeUsed - 5;
 547     hardTimeLeft = HardDeadtimeout - timeUsed - 5;
 548
 549     lock_ObtainWrite(&cm_serverLock);
 550     for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
 551         tsp = tsrp->server;
 552         cm_GetServerNoLock(tsp);
 553         lock_ReleaseWrite(&cm_serverLock);
 554         if (!(tsp->flags & CM_SERVERFLAG_DOWN)) {
 555             allDown = 0;
 556             if (tsrp->status == busy) {
 557                 allOffline = 0;
 558                 someBusy = 1;
 559             } else if (tsrp->status == offline) {
 560                 allBusy = 0;
 561                 someOffline = 1;
 562             } else {
 563                 allOffline = 0;
 564                 allBusy = 0;
 565                 code = cm_ConnByServer(tsp, usersp, connpp);
 566                 if (code == 0) {        /* cm_CBS only returns 0 */
 567                     cm_PutServer(tsp);
 568                     /* Set RPC timeout */
 569                     if (timeLeft > ConnDeadtimeout)
 570                         timeLeft = ConnDeadtimeout;
 571
 572                     if (hardTimeLeft > HardDeadtimeout)
 573                         hardTimeLeft = HardDeadtimeout;
 574
 575                     lock_ObtainMutex(&(*connpp)->mx);
 576                     rx_SetConnDeadTime((*connpp)->callp, timeLeft);
 577                     rx_SetConnHardDeadTime((*connpp)->callp, (u_short) hardTimeLeft);
 578                     lock_ReleaseMutex(&(*connpp)->mx);
 579                     return 0;
 580                 }
 581
 582                 /* therefore, this code is never executed */
 583                 if (firstError == 0)
 584                     firstError = code;
 585             }
 586         }
 587         lock_ObtainWrite(&cm_serverLock);
 588         cm_PutServerNoLock(tsp);
 589     }
 590     lock_ReleaseWrite(&cm_serverLock);
 591
 592     if (firstError == 0) {
 593         if (allDown)
 594             firstError = CM_ERROR_ALLDOWN;
 595         else if (allBusy)
 596             firstError = CM_ERROR_ALLBUSY;
 597         else if (allOffline || (someBusy && someOffline))
 598             firstError = CM_ERROR_ALLOFFLINE;
 599         else {
 600             osi_Log0(afsd_logp, "cm_ConnByMServers returning impossible error TIMEDOUT");
 601             firstError = CM_ERROR_TIMEDOUT;
 602         }
 603     }
 604
 605     osi_Log1(afsd_logp, "cm_ConnByMServers returning 0x%x", firstError);
 606     return firstError;
 607 }
 608
 609 /* called with a held server to GC all bad connections hanging off of the server */
 610 void cm_GCConnections(cm_server_t *serverp)
 611 {
 612     cm_conn_t *tcp;
 613     cm_conn_t **lcpp;
 614     cm_user_t *userp;
 615
 616     lock_ObtainWrite(&cm_connLock);
 617     lcpp = &serverp->connsp;
 618     for (tcp = *lcpp; tcp; tcp = *lcpp) {
 619         userp = tcp->userp;
 620         if (userp && tcp->refCount == 0 && (userp->vcRefs == 0)) {
 621             /* do the deletion of this guy */
 622             cm_PutServer(tcp->serverp);
 623             cm_ReleaseUser(userp);
 624             *lcpp = tcp->nextp;
 625             rx_DestroyConnection(tcp->callp);
 626             lock_FinalizeMutex(&tcp->mx);
 627             free(tcp);
 628         }
 629         else {
 630             /* just advance to the next */
 631             lcpp = &tcp->nextp;
 632         }
 633     }
 634     lock_ReleaseWrite(&cm_connLock);
 635 }
 636
 637 static void cm_NewRXConnection(cm_conn_t *tcp, cm_ucell_t *ucellp,
 638                                cm_server_t *serverp)
 639 {
 640     unsigned short port;
 641     int serviceID;
 642     int secIndex;
 643     struct rx_securityClass *secObjp;
 644
 645     if (serverp->type == CM_SERVER_VLDB) {
 646         port = htons(7003);
 647         serviceID = 52;
 648     }
 649     else {
 650         osi_assert(serverp->type == CM_SERVER_FILE);
 651         port = htons(7000);
 652         serviceID = 1;
 653     }
 654     if (ucellp->flags & CM_UCELLFLAG_RXKAD) {
 655         secIndex = 2;
 656         if (cryptall) {
 657             tcp->cryptlevel = rxkad_crypt;
 658         } else {
 659             tcp->cryptlevel = rxkad_clear;
 660         }
 661         secObjp = rxkad_NewClientSecurityObject(tcp->cryptlevel,
 662                                                 &ucellp->sessionKey, ucellp->kvno,
 663                                                 ucellp->ticketLen, ucellp->ticketp);
 664     } else {
 665         /* normal auth */
 666         secIndex = 0;
 667         tcp->cryptlevel = rxkad_clear;
 668         secObjp = rxnull_NewClientSecurityObject();
 669     }
 670     osi_assert(secObjp != NULL);
 671     tcp->callp = rx_NewConnection(serverp->addr.sin_addr.s_addr,
 672                                   port,
 673                                   serviceID,
 674                                   secObjp,
 675                                   secIndex);
 676     rx_SetConnDeadTime(tcp->callp, ConnDeadtimeout);
 677     rx_SetConnHardDeadTime(tcp->callp, HardDeadtimeout);
 678     tcp->ucgen = ucellp->gen;
 679     if (secObjp)
 680         rxs_Release(secObjp);   /* Decrement the initial refCount */
 681 }
 682
 683 long cm_ConnByServer(cm_server_t *serverp, cm_user_t *userp, cm_conn_t **connpp)
 684 {
 685     cm_conn_t *tcp;
 686     cm_ucell_t *ucellp;
 687
 688     lock_ObtainMutex(&userp->mx);
 689     lock_ObtainWrite(&cm_connLock);
 690     for (tcp = serverp->connsp; tcp; tcp=tcp->nextp) {
 691         if (tcp->userp == userp)
 692             break;
 693     }
 694
 695     /* find ucell structure */
 696     ucellp = cm_GetUCell(userp, serverp->cellp);
 697     if (!tcp) {
 698         cm_GetServer(serverp);
 699         tcp = malloc(sizeof(*tcp));
 700         memset(tcp, 0, sizeof(*tcp));
 701         tcp->nextp = serverp->connsp;
 702         serverp->connsp = tcp;
 703         cm_HoldUser(userp);
 704         tcp->userp = userp;
 705         lock_InitializeMutex(&tcp->mx, "cm_conn_t mutex");
 706         lock_ObtainMutex(&tcp->mx);
 707         tcp->serverp = serverp;
 708         tcp->cryptlevel = rxkad_clear;
 709         cm_NewRXConnection(tcp, ucellp, serverp);
 710         tcp->refCount = 1;
 711         lock_ReleaseMutex(&tcp->mx);
 712     } else {
 713         if ((tcp->flags & CM_CONN_FLAG_FORCE_NEW) ||
 714             (tcp->ucgen < ucellp->gen) ||
 715             (tcp->cryptlevel != (cryptall ? (ucellp->flags & CM_UCELLFLAG_RXKAD ? rxkad_crypt : rxkad_clear) : rxkad_clear)))
 716         {
 717             if (tcp->ucgen < ucellp->gen)
 718                 osi_Log0(afsd_logp, "cm_ConnByServer replace connection due to token update");
 719             else
 720                 osi_Log0(afsd_logp, "cm_ConnByServer replace connection due to crypt change");
 721             lock_ObtainMutex(&tcp->mx);
 722             tcp->flags &= ~CM_CONN_FLAG_FORCE_NEW;
 723             rx_DestroyConnection(tcp->callp);
 724             cm_NewRXConnection(tcp, ucellp, serverp);
 725             lock_ReleaseMutex(&tcp->mx);
 726         }
 727         tcp->refCount++;
 728     }
 729     lock_ReleaseWrite(&cm_connLock);
 730     lock_ReleaseMutex(&userp->mx);
 731
 732     /* return this pointer to our caller */
 733     osi_Log1(afsd_logp, "cm_ConnByServer returning conn 0x%p", tcp);
 734     *connpp = tcp;
 735
 736     return 0;
 737 }
 738
 739 long cm_Conn(struct cm_fid *fidp, struct cm_user *userp, cm_req_t *reqp,
 740              cm_conn_t **connpp)
 741 {
 742     long code;
 743
 744     cm_serverRef_t **serverspp;
 745
 746     code = cm_GetServerList(fidp, userp, reqp, &serverspp);
 747     if (code) {
 748         *connpp = NULL;
 749         return code;
 750     }
 751
 752     code = cm_ConnByMServers(*serverspp, userp, reqp, connpp);
 753     cm_FreeServerList(serverspp);
 754     return code;
 755 }
 756
 757 extern struct rx_connection *
 758 cm_GetRxConn(cm_conn_t *connp)
 759 {
 760     struct rx_connection * rxconn;
 761     lock_ObtainMutex(&connp->mx);
 762     rxconn = connp->callp;
 763     rx_GetConnection(rxconn);
 764     lock_ReleaseMutex(&connp->mx);
 765     return rxconn;
 766 }
 767
 768 void cm_ForceNewConnections(cm_server_t *serverp)
 769 {
 770     cm_conn_t *tcp;
 771
 772     lock_ObtainWrite(&cm_connLock);
 773     for (tcp = serverp->connsp; tcp; tcp=tcp->nextp) {
 774         lock_ObtainMutex(&tcp->mx);
 775         tcp->flags |= CM_CONN_FLAG_FORCE_NEW;
 776         lock_ReleaseMutex(&tcp->mx);
 777     }
 778     lock_ReleaseWrite(&cm_connLock);
 779 }