bf8a7f1ab36ed873e01dd68a36cd6fe4e90766ce
[openafs.git] / 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 }