2939ba1219ac20eecdfdc4b29176cc46ba43d6a2
[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 #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 <afs/vlserver.h>
22 #include <WINNT/afsreg.h>
23
24 osi_rwlock_t cm_connLock;
25
26 DWORD RDRtimeout = CM_CONN_DEFAULTRDRTIMEOUT;
27 unsigned short ConnDeadtimeout = CM_CONN_CONNDEADTIME;
28 unsigned short HardDeadtimeout = CM_CONN_HARDDEADTIME;
29 unsigned short IdleDeadtimeout = CM_CONN_IDLEDEADTIME;
30
31 #define LANMAN_WKS_PARAM_KEY "SYSTEM\\CurrentControlSet\\Services\\lanmanworkstation\\parameters"
32 #define LANMAN_WKS_SESSION_TIMEOUT "SessTimeout"
33 #define LANMAN_WKS_EXT_SESSION_TIMEOUT "ExtendedSessTimeout"
34
35 afs_uint32 cryptall = 0;
36 afs_uint32 cm_anonvldb = 0;
37
38 void cm_PutConn(cm_conn_t *connp)
39 {
40     afs_int32 refCount = InterlockedDecrement(&connp->refCount);
41     osi_assertx(refCount >= 0, "cm_conn_t refcount underflow");
42 }
43
44 void cm_InitConn(void)
45 {
46     static osi_once_t once;
47     long code;
48     DWORD dwValue;
49     DWORD dummyLen;
50     HKEY parmKey;
51         
52     if (osi_Once(&once)) {
53         lock_InitializeRWLock(&cm_connLock, "connection global lock",
54                                LOCK_HIERARCHY_CONN_GLOBAL);
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             BOOL extTimeouts = msftSMBRedirectorSupportsExtendedTimeouts();
68
69             if (extTimeouts) {
70                 /* 
71                  * The default value is 1000 seconds.  However, this default
72                  * will not apply to "\\AFS" unless "AFS" is listed in 
73                  * ServersWithExtendedSessTimeout which we will add when we
74                  * create the ExtendedSessTimeout value in smb_Init()
75                  */
76                 dummyLen = sizeof(DWORD);
77                 code = RegQueryValueEx(parmKey, 
78                                        LANMAN_WKS_EXT_SESSION_TIMEOUT,
79                                         NULL, NULL,
80                                         (BYTE *) &dwValue, &dummyLen);
81                 if (code == ERROR_SUCCESS) {
82                     RDRtimeout = dwValue;
83                     afsi_log("lanmanworkstation : ExtSessTimeout %u", RDRtimeout);
84                 }
85             } 
86             if (!extTimeouts || code != ERROR_SUCCESS) {
87                 dummyLen = sizeof(DWORD);
88                 code = RegQueryValueEx(parmKey, 
89                                        LANMAN_WKS_SESSION_TIMEOUT,
90                                        NULL, NULL,
91                                        (BYTE *) &dwValue, &dummyLen);
92                 if (code == ERROR_SUCCESS) {
93                     RDRtimeout = dwValue;
94                     afsi_log("lanmanworkstation : SessTimeout %u", RDRtimeout);
95                 }
96             }
97             RegCloseKey(parmKey);
98         }
99
100         code = RegOpenKeyEx(HKEY_LOCAL_MACHINE, AFSREG_CLT_SVC_PARAM_SUBKEY,
101                              0, KEY_QUERY_VALUE, &parmKey);
102         if (code == ERROR_SUCCESS) {
103             dummyLen = sizeof(DWORD);
104             code = RegQueryValueEx(parmKey, "ConnDeadTimeout", NULL, NULL,
105                                     (BYTE *) &dwValue, &dummyLen);
106             if (code == ERROR_SUCCESS) {
107                 ConnDeadtimeout = (unsigned short)dwValue;
108                 afsi_log("ConnDeadTimeout is %d", ConnDeadtimeout);
109             }
110             dummyLen = sizeof(DWORD);
111             code = RegQueryValueEx(parmKey, "HardDeadTimeout", NULL, NULL,
112                                     (BYTE *) &dwValue, &dummyLen);
113             if (code == ERROR_SUCCESS) {
114                 HardDeadtimeout = (unsigned short)dwValue;
115                 afsi_log("HardDeadTimeout is %d", HardDeadtimeout);
116             }
117             dummyLen = sizeof(DWORD);
118             code = RegQueryValueEx(parmKey, "IdleDeadTimeout", NULL, NULL,
119                                     (BYTE *) &dwValue, &dummyLen);
120             if (code == ERROR_SUCCESS) {
121                 IdleDeadtimeout = (unsigned short)dwValue;
122                 afsi_log("IdleDeadTimeout is %d", IdleDeadtimeout);
123             }
124             RegCloseKey(parmKey);
125         }
126
127         /* 
128          * If these values were not set via cpp macro or obtained 
129          * from the registry, we use a value that is derived from
130          * the smb redirector session timeout (RDRtimeout).
131          *
132          * The UNIX cache manager uses 120 seconds for the hard dead
133          * timeout and 50 seconds for the connection and idle timeouts.
134          *
135          * We base our values on those while making sure we leave 
136          * enough time for overhead.  
137          */
138         if (ConnDeadtimeout == 0) {
139             ConnDeadtimeout = (unsigned short) ((RDRtimeout / 2) < 50 ? (RDRtimeout / 2) : 50);
140             afsi_log("ConnDeadTimeout is %d", ConnDeadtimeout);
141         }
142         if (HardDeadtimeout == 0) {
143             HardDeadtimeout = (unsigned short) (RDRtimeout > 125 ? 120 : (RDRtimeout - 5));
144             afsi_log("HardDeadTimeout is %d", HardDeadtimeout);
145         }
146         if (IdleDeadtimeout == 0) {
147             IdleDeadtimeout = (unsigned short) ConnDeadtimeout;
148             afsi_log("IdleDeadTimeout is %d", IdleDeadtimeout);
149         }
150         osi_EndOnce(&once);
151     }
152 }
153
154 void cm_InitReq(cm_req_t *reqp)
155 {
156         memset((char *)reqp, 0, sizeof(cm_req_t));
157         reqp->startTime = GetTickCount();
158 }
159
160 static long cm_GetServerList(struct cm_fid *fidp, struct cm_user *userp,
161         struct cm_req *reqp, cm_serverRef_t ***serversppp)
162 {
163     long code;
164     cm_volume_t *volp = NULL;
165     cm_cell_t *cellp = NULL;
166
167     if (!fidp) {
168         *serversppp = NULL;
169         return CM_ERROR_INVAL;
170     }
171
172     cellp = cm_FindCellByID(fidp->cell, 0);
173     if (!cellp) 
174         return CM_ERROR_NOSUCHCELL;
175
176     code = cm_FindVolumeByID(cellp, fidp->volume, userp, reqp, CM_GETVOL_FLAG_CREATE, &volp);
177     if (code) 
178         return code;
179     
180     *serversppp = cm_GetVolServers(volp, fidp->volume, userp, reqp);
181
182     lock_ObtainRead(&cm_volumeLock);
183     cm_PutVolume(volp);
184     lock_ReleaseRead(&cm_volumeLock);
185     return (*serversppp ? 0 : CM_ERROR_NOSUCHVOLUME);
186 }
187
188 /*
189  * Analyze the error return from an RPC.  Determine whether or not to retry,
190  * and if we're going to retry, determine whether failover is appropriate,
191  * and whether timed backoff is appropriate.
192  *
193  * If the error code is from cm_ConnFromFID() or friends, it will be a CM_ERROR code.
194  * Otherwise it will be an RPC code.  This may be a UNIX code (e.g. EDQUOT), or
195  * it may be an RX code, or it may be a special code (e.g. VNOVOL), or it may
196  * be a security code (e.g. RXKADEXPIRED).
197  *
198  * If the error code is from cm_ConnFromFID() or friends, connp will be NULL.
199  *
200  * For VLDB calls, fidp will be NULL.
201  *
202  * volSyncp and/or cbrp may also be NULL.
203  */
204 int
205 cm_Analyze(cm_conn_t *connp, cm_user_t *userp, cm_req_t *reqp,
206            struct cm_fid *fidp, 
207            AFSVolSync *volSyncp, 
208            cm_serverRef_t * serversp,
209            cm_callbackRequest_t *cbrp, long errorCode)
210 {
211     cm_server_t *serverp = NULL;
212     cm_serverRef_t **serverspp = NULL;
213     cm_serverRef_t *tsrp;
214     cm_cell_t  *cellp = NULL;
215     cm_ucell_t *ucellp;
216     cm_volume_t * volp = NULL;
217     cm_vol_state_t *statep = NULL;
218     int retry = 0;
219     int free_svr_list = 0;
220     int dead_session;
221     long timeUsed, timeLeft;
222     long code;
223     char addr[16]="unknown";
224     int forcing_new = 0;
225
226     osi_Log2(afsd_logp, "cm_Analyze connp 0x%p, code 0x%x",
227              connp, errorCode);
228
229     /* no locking required, since connp->serverp never changes after
230      * creation */
231     dead_session = (userp->cellInfop == NULL);
232     if (connp)
233         serverp = connp->serverp;
234
235     /* Update callback pointer */
236     if (cbrp && serverp && errorCode == 0) {
237         if (cbrp->serverp) {
238             if ( cbrp->serverp != serverp ) {
239                 lock_ObtainWrite(&cm_serverLock);
240                 cm_PutServerNoLock(cbrp->serverp);
241                 cm_GetServerNoLock(serverp);
242                 lock_ReleaseWrite(&cm_serverLock);
243             }
244         } else {
245             cm_GetServer(serverp);
246         }
247         lock_ObtainWrite(&cm_callbackLock);
248         cbrp->serverp = serverp;
249         lock_ReleaseWrite(&cm_callbackLock);
250     }
251
252     /* if timeout - check that it did not exceed the HardDead timeout
253      * and retry */
254     
255     /* timeleft - get if from reqp the same way as cmXonnByMServers does */
256     timeUsed = (GetTickCount() - reqp->startTime) / 1000;
257             
258     /* leave 5 seconds margin for sleep */
259     if (reqp->flags & CM_REQ_NORETRY)
260         timeLeft = 0;
261     else
262         timeLeft = HardDeadtimeout - timeUsed;
263
264     /* get a pointer to the cell */
265     if (errorCode) {
266         if (cellp == NULL && serverp)
267             cellp = serverp->cellp;
268         if (cellp == NULL && serversp) {
269             struct cm_serverRef * refp;
270             for ( refp=serversp ; cellp == NULL && refp != NULL; refp=refp->next) {
271                 if (refp->status == srv_deleted)
272                     continue;
273                 if ( refp->server )
274                     cellp = refp->server->cellp;
275             }
276         } 
277         if (cellp == NULL && fidp) {
278             cellp = cm_FindCellByID(fidp->cell, 0);
279         }
280     }
281
282     if (errorCode == CM_ERROR_TIMEDOUT) {
283         if ( timeLeft > 5 ) {
284             thrd_Sleep(3000);
285             cm_CheckServers(CM_FLAG_CHECKDOWNSERVERS, cellp);
286             retry = 1;
287         }
288     }
289
290     else if (errorCode == UAEWOULDBLOCK || errorCode == EWOULDBLOCK ||
291               errorCode == UAEAGAIN || errorCode == EAGAIN) {
292         osi_Log0(afsd_logp, "cm_Analyze passed EWOULDBLOCK or EAGAIN.");
293         if ( timeLeft > 5 ) {
294             thrd_Sleep(1000);
295             retry = 1;
296         }
297     }
298
299     /* if there is nosuchvolume, then we have a situation in which a 
300      * previously known volume no longer has a set of servers 
301      * associated with it.  Either the volume has moved or
302      * the volume has been deleted.  Try to find a new server list
303      * until the timeout period expires.
304      */
305     else if (errorCode == CM_ERROR_NOSUCHVOLUME) {
306         osi_Log0(afsd_logp, "cm_Analyze passed CM_ERROR_NOSUCHVOLUME.");
307         /* 
308          * The VNOVOL or VL_NOENT error has already been translated
309          * to CM_ERROR_NOSUCHVOLUME.  There is nothing for us to do.
310          */
311     }
312
313     else if (errorCode == CM_ERROR_ALLDOWN) {
314         osi_Log0(afsd_logp, "cm_Analyze passed CM_ERROR_ALLDOWN.");
315         /* Servers marked DOWN will be restored by the background daemon
316          * thread as they become available.  The volume status is 
317          * updated as the server state changes.
318          */
319     }
320
321     else if (errorCode == CM_ERROR_ALLOFFLINE) {
322         osi_Log0(afsd_logp, "cm_Analyze passed CM_ERROR_ALLOFFLINE.");
323         /* Volume instances marked offline will be restored by the 
324          * background daemon thread as they become available 
325          */
326         if (fidp) {
327             code = cm_FindVolumeByID(cellp, fidp->volume, userp, reqp, 
328                                       CM_GETVOL_FLAG_NO_LRU_UPDATE, 
329                                       &volp);
330             if (code == 0) {
331                 if (timeLeft > 7) {
332                     thrd_Sleep(5000);
333
334                     /* cm_CheckOfflineVolume() resets the serverRef state */
335                     if (cm_CheckOfflineVolume(volp, fidp->volume))
336                         retry = 1;
337                 } else {
338                     cm_UpdateVolumeStatus(volp, fidp->volume);
339                 }
340                 lock_ObtainRead(&cm_volumeLock);
341                 cm_PutVolume(volp);
342                 lock_ReleaseRead(&cm_volumeLock);
343                 volp = NULL;
344             }
345         } 
346     }
347     else if (errorCode == CM_ERROR_ALLBUSY) {
348         /* Volumes that are busy cannot be determined to be non-busy 
349          * without actually attempting to access them.
350          */
351         osi_Log0(afsd_logp, "cm_Analyze passed CM_ERROR_ALLBUSY.");
352
353         if (fidp) { /* File Server query */
354             code = cm_FindVolumeByID(cellp, fidp->volume, userp, reqp, 
355                                      CM_GETVOL_FLAG_NO_LRU_UPDATE, 
356                                      &volp);
357             if (code == 0) {
358                 if (timeLeft > 7) {
359                     thrd_Sleep(5000);
360                     
361                     statep = cm_VolumeStateByID(volp, fidp->volume);
362                     if (statep->state != vl_offline && 
363                          statep->state != vl_busy &&
364                          statep->state != vl_unknown) {
365                         retry = 1;
366                     } else {
367                         if (!serversp) {
368                             code = cm_GetServerList(fidp, userp, reqp, &serverspp);
369                             if (code == 0) {
370                                 serversp = *serverspp;
371                                 free_svr_list = 1;
372                             }
373                         }
374                         lock_ObtainWrite(&cm_serverLock);
375                         for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
376                             if (tsrp->status == srv_deleted)
377                                 continue;
378                             if (tsrp->status == srv_busy) {
379                                 tsrp->status = srv_not_busy;
380                             }       
381                         }
382                         lock_ReleaseWrite(&cm_serverLock);
383                         if (free_svr_list) {
384                             cm_FreeServerList(serverspp, 0);
385                             serverspp = NULL;
386                             serversp = NULL;
387                             free_svr_list = 0;
388                         }
389
390                         cm_UpdateVolumeStatus(volp, fidp->volume);
391                         retry = 1;
392                     }
393                 } else {
394                     cm_UpdateVolumeStatus(volp, fidp->volume);
395                 }
396
397                 lock_ObtainRead(&cm_volumeLock);
398                 cm_PutVolume(volp);
399                 lock_ReleaseRead(&cm_volumeLock);
400                 volp = NULL;
401             }
402         } else {    /* VL Server query */
403             if (timeLeft > 7) {
404                 thrd_Sleep(5000);
405
406                 if (serversp) {
407                     lock_ObtainWrite(&cm_serverLock);
408                     for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
409                         if (tsrp->status == srv_deleted)
410                             continue;
411                         if (tsrp->status == srv_busy) {
412                             tsrp->status = srv_not_busy;
413                         }
414                     }
415                     lock_ReleaseWrite(&cm_serverLock);
416                     retry = 1;
417                 }
418             }
419         }
420     }
421
422     /* special codes:  VBUSY and VRESTARTING */
423     else if (errorCode == VBUSY || errorCode == VRESTARTING) {
424         if (!serversp && fidp) {
425             code = cm_GetServerList(fidp, userp, reqp, &serverspp);
426             if (code == 0) {
427                 serversp = *serverspp;
428                 free_svr_list = 1;
429             }
430         }
431         lock_ObtainWrite(&cm_serverLock);
432         for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
433             if (tsrp->status == srv_deleted)
434                 continue;
435             if (tsrp->server == serverp && tsrp->status == srv_not_busy) {
436                 tsrp->status = srv_busy;
437                 if (fidp) { /* File Server query */
438                     lock_ReleaseWrite(&cm_serverLock);
439                     code = cm_FindVolumeByID(cellp, fidp->volume, userp, reqp, 
440                                              CM_GETVOL_FLAG_NO_LRU_UPDATE, 
441                                              &volp);
442                     if (code == 0)
443                         statep = cm_VolumeStateByID(volp, fidp->volume);
444                     lock_ObtainWrite(&cm_serverLock);
445                 }
446                 break;
447             }
448         }
449         lock_ReleaseWrite(&cm_serverLock);
450         
451         if (statep) {
452             cm_UpdateVolumeStatus(volp, statep->ID);
453             lock_ObtainRead(&cm_volumeLock);
454             cm_PutVolume(volp);
455             lock_ReleaseRead(&cm_volumeLock);
456             volp = NULL;
457         }
458
459         if (free_svr_list) {
460             cm_FreeServerList(serverspp, 0);
461             serverspp = NULL;
462             serversp = NULL;
463             free_svr_list = 0;
464         }
465         retry = 1;
466     }
467
468     /* special codes:  missing volumes */
469     else if (errorCode == VNOVOL || errorCode == VMOVED || errorCode == VOFFLINE ||
470              errorCode == VSALVAGE || errorCode == VNOSERVICE || errorCode == VIO) 
471     {       
472         char *format;
473         DWORD msgID;
474
475         /* In case of timeout */
476         reqp->volumeError = errorCode;
477
478         switch ( errorCode ) {
479         case VNOVOL:
480             msgID = MSG_SERVER_REPORTS_VNOVOL;
481             format = "Server %s reported volume %d as not attached (does not exist).";
482             break;
483         case VMOVED:
484             msgID = MSG_SERVER_REPORTS_VMOVED;
485             format = "Server %s reported volume %d as moved.";
486             break;
487         case VOFFLINE:
488             msgID = MSG_SERVER_REPORTS_VOFFLINE;
489             format = "Server %s reported volume %d as offline.";
490             break;
491         case VSALVAGE:
492             msgID = MSG_SERVER_REPORTS_VSALVAGE;
493             format = "Server %s reported volume %d as needs salvage.";
494             break;
495         case VNOSERVICE:
496             msgID = MSG_SERVER_REPORTS_VNOSERVICE;
497             format = "Server %s reported volume %d as not in service.";
498             break;
499         case VIO:
500             msgID = MSG_SERVER_REPORTS_VIO;
501             format = "Server %s reported volume %d as temporarily unaccessible.";
502             break;
503         }
504
505         if (serverp && fidp) {
506             /* Log server being offline for this volume */
507             sprintf(addr, "%d.%d.%d.%d", 
508                    ((serverp->addr.sin_addr.s_addr & 0xff)),
509                    ((serverp->addr.sin_addr.s_addr & 0xff00)>> 8),
510                    ((serverp->addr.sin_addr.s_addr & 0xff0000)>> 16),
511                    ((serverp->addr.sin_addr.s_addr & 0xff000000)>> 24)); 
512
513             osi_Log2(afsd_logp, format, osi_LogSaveString(afsd_logp,addr), fidp->volume);
514             LogEvent(EVENTLOG_WARNING_TYPE, msgID, addr, fidp->volume);
515         }
516
517         /* 
518          * Mark server offline for this volume or delete the volume
519          * from the server list if it was moved or is not present.
520          */
521         if (!serversp && fidp) {
522             code = cm_GetServerList(fidp, userp, reqp, &serverspp);
523             if (code == 0) {
524                 serversp = *serverspp;
525                 free_svr_list = 1;
526             }
527         }
528
529         lock_ObtainWrite(&cm_serverLock);
530         for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
531             if (tsrp->status == srv_deleted)
532                 continue;
533
534             sprintf(addr, "%d.%d.%d.%d",
535                      ((tsrp->server->addr.sin_addr.s_addr & 0xff)),
536                      ((tsrp->server->addr.sin_addr.s_addr & 0xff00)>> 8),
537                      ((tsrp->server->addr.sin_addr.s_addr & 0xff0000)>> 16),
538                      ((tsrp->server->addr.sin_addr.s_addr & 0xff000000)>> 24)); 
539
540             if (tsrp->server == serverp) {
541                 /* REDIRECT */
542                 if (errorCode == VMOVED || errorCode == VNOVOL) {
543                     osi_Log2(afsd_logp, "volume %d not present on server %s", 
544                              fidp->volume, osi_LogSaveString(afsd_logp,addr));
545                     tsrp->status = srv_deleted;
546                     if (fidp)
547                         cm_RemoveVolumeFromServer(serverp, fidp->volume);
548                 } else {
549                     osi_Log2(afsd_logp, "volume %d instance on server %s marked offline", 
550                              fidp->volume, osi_LogSaveString(afsd_logp,addr));
551                     tsrp->status = srv_offline;
552                 }
553                 /* break; */
554             } else {
555                 osi_Log3(afsd_logp, "volume %d exists on server %s with status %u", 
556                          fidp->volume, osi_LogSaveString(afsd_logp,addr), tsrp->status);
557             }
558         }   
559         lock_ReleaseWrite(&cm_serverLock);
560
561         /* Free the server list before cm_ForceUpdateVolume is called */
562         if (free_svr_list) {
563             cm_FreeServerList(serverspp, 0);
564             serverspp = NULL;
565             serversp = NULL;
566             free_svr_list = 0;
567         }
568
569         if (fidp) { /* File Server query */
570             code = cm_FindVolumeByID(cellp, fidp->volume, userp, reqp, 
571                                       CM_GETVOL_FLAG_NO_LRU_UPDATE, 
572                                       &volp);
573             if (code == 0)
574                 statep = cm_VolumeStateByID(volp, fidp->volume);
575
576             if ((errorCode == VMOVED || errorCode == VNOVOL) &&
577                 !(reqp->flags & CM_REQ_VOLUME_UPDATED)) 
578             {
579                 code = cm_ForceUpdateVolume(fidp, userp, reqp);
580                 if (code) 
581                     timeLeft = 0;   /* prevent a retry on failure */
582                 else
583                     reqp->flags |= CM_REQ_VOLUME_UPDATED;
584                 osi_Log3(afsd_logp, "cm_Analyze called cm_ForceUpdateVolume cell %u vol %u code 0x%x",
585                         fidp->cell, fidp->volume, code);
586             }
587
588             if (statep) {
589                 cm_UpdateVolumeStatus(volp, statep->ID);
590                 osi_Log3(afsd_logp, "cm_Analyze NewVolState cell %u vol %u state %u", 
591                          fidp->cell, fidp->volume, statep->state);
592             }
593
594             if (volp) {
595                 lock_ObtainRead(&cm_volumeLock);
596                 cm_PutVolume(volp);
597                 lock_ReleaseRead(&cm_volumeLock);
598                 volp = NULL;
599             }
600         }
601
602         if ( timeLeft > 2 )
603             retry = 1;
604     } else if ( errorCode == VNOVNODE ) {
605         if ( fidp ) {
606             cm_scache_t * scp;
607             osi_Log4(afsd_logp, "cm_Analyze passed VNOVNODE cell %u vol %u vn %u uniq %u.",
608                       fidp->cell, fidp->volume, fidp->vnode, fidp->unique);
609
610             scp = cm_FindSCache(fidp);
611             if (scp) {
612                 cm_scache_t *pscp = NULL;
613
614                 if (scp->fileType != CM_SCACHETYPE_DIRECTORY)
615                     pscp = cm_FindSCacheParent(scp);
616
617                 lock_ObtainWrite(&scp->rw);
618                 lock_ObtainWrite(&cm_scacheLock);
619                 cm_RemoveSCacheFromHashTable(scp);
620                 lock_ReleaseWrite(&cm_scacheLock);
621                 cm_LockMarkSCacheLost(scp);
622                 scp->flags |= CM_SCACHEFLAG_DELETED;
623                 lock_ReleaseWrite(&scp->rw);
624                 cm_ReleaseSCache(scp);
625
626                 if (pscp) {
627                     if (cm_HaveCallback(pscp)) {
628                         lock_ObtainWrite(&pscp->rw);
629                         cm_DiscardSCache(pscp);
630                         lock_ReleaseWrite(&pscp->rw);
631                     }
632                     cm_ReleaseSCache(pscp);
633                 }
634             }
635         } else {
636             osi_Log0(afsd_logp, "cm_Analyze passed VNOVNODE unknown fid.");
637         }
638     }
639
640     /* RX codes */
641     else if (errorCode == RX_CALL_TIMEOUT) {
642         /* RPC took longer than hardDeadTime or the server
643          * reported idle for longer than idleDeadTime
644          * don't mark server as down but don't retry
645          * this is to prevent the SMB session from timing out
646          * In addition, we log an event to the event log 
647          */
648
649         if (serverp) {
650             sprintf(addr, "%d.%d.%d.%d", 
651                     ((serverp->addr.sin_addr.s_addr & 0xff)),
652                     ((serverp->addr.sin_addr.s_addr & 0xff00)>> 8),
653                     ((serverp->addr.sin_addr.s_addr & 0xff0000)>> 16),
654                     ((serverp->addr.sin_addr.s_addr & 0xff000000)>> 24)); 
655
656             LogEvent(EVENTLOG_WARNING_TYPE, MSG_RX_HARD_DEAD_TIME_EXCEEDED, addr);
657             osi_Log1(afsd_logp, "cm_Analyze: hardDeadTime or idleDeadtime exceeded addr[%s]",
658                      osi_LogSaveString(afsd_logp,addr));
659             reqp->tokenIdleErrorServp = serverp;
660             reqp->idleError++;
661
662             if (timeLeft > 2) {
663                 if (!fidp) { /* vldb */
664                     retry = 1;
665                 } else { /* file */
666                     cm_volume_t *volp = cm_GetVolumeByFID(fidp);
667                     if (volp) {
668                         if (fidp->volume == cm_GetROVolumeID(volp))
669                             retry = 1;
670                         cm_PutVolume(volp);
671                     }
672                 }
673             }
674         }
675     }
676     else if (errorCode >= -64 && errorCode < 0) {
677         /* mark server as down */
678         sprintf(addr, "%d.%d.%d.%d",
679                 ((serverp->addr.sin_addr.s_addr & 0xff)),
680                 ((serverp->addr.sin_addr.s_addr & 0xff00)>> 8),
681                 ((serverp->addr.sin_addr.s_addr & 0xff0000)>> 16),
682                 ((serverp->addr.sin_addr.s_addr & 0xff000000)>> 24));
683
684         if (errorCode == RX_CALL_DEAD)
685             osi_Log2(afsd_logp, "cm_Analyze: Rx Call Dead addr[%s] forcedNew[%s]",
686                      osi_LogSaveString(afsd_logp,addr), 
687                      (reqp->flags & CM_REQ_NEW_CONN_FORCED ? "yes" : "no"));
688         else
689             osi_Log3(afsd_logp, "cm_Analyze: Rx Misc Error[%d] addr[%s] forcedNew[%s]",
690                      errorCode,
691                      osi_LogSaveString(afsd_logp,addr), 
692                      (reqp->flags & CM_REQ_NEW_CONN_FORCED ? "yes" : "no"));
693
694         lock_ObtainMutex(&serverp->mx);
695         if (errorCode == RX_CALL_DEAD &&
696             (reqp->flags & CM_REQ_NEW_CONN_FORCED)) {
697             if (!(serverp->flags & CM_SERVERFLAG_DOWN)) {
698                 serverp->flags |= CM_SERVERFLAG_DOWN;
699                 serverp->downTime = time(NULL);
700             }
701         } else {
702             if (reqp->flags & CM_REQ_NEW_CONN_FORCED) {
703                 reqp->tokenIdleErrorServp = serverp;
704                 reqp->tokenError = errorCode;
705             } else {
706                 reqp->flags |= CM_REQ_NEW_CONN_FORCED;
707                 forcing_new = 1;
708             }
709         }
710         lock_ReleaseMutex(&serverp->mx);
711         cm_ForceNewConnections(serverp);
712         if ( timeLeft > 2 )
713             retry = 1;
714     }
715     else if (errorCode == RXKADEXPIRED) {
716         osi_Log1(afsd_logp, "cm_Analyze: rxkad error code 0x%x (RXKADEXPIRED)",
717                  errorCode);
718         if (!dead_session) {
719             lock_ObtainMutex(&userp->mx);
720             ucellp = cm_GetUCell(userp, serverp->cellp);
721             if (ucellp->ticketp) {
722                 free(ucellp->ticketp);
723                 ucellp->ticketp = NULL;
724             }
725             ucellp->flags &= ~CM_UCELLFLAG_RXKAD;
726             ucellp->gen++;
727             lock_ReleaseMutex(&userp->mx);
728             if ( timeLeft > 2 )
729                 retry = 1;
730         }
731     } else if (errorCode >= ERROR_TABLE_BASE_RXK && errorCode < ERROR_TABLE_BASE_RXK + 256) {
732         char * s = "unknown error";
733         switch ( errorCode ) {
734         case RXKADINCONSISTENCY: s = "RXKADINCONSISTENCY"; break;
735         case RXKADPACKETSHORT  : s = "RXKADPACKETSHORT";   break;
736         case RXKADLEVELFAIL    : s = "RXKADLEVELFAIL";     break;
737         case RXKADTICKETLEN    : s = "RXKADTICKETLEN";     break;
738         case RXKADOUTOFSEQUENCE: s = "RXKADOUTOFSEQUENCE"; break;
739         case RXKADNOAUTH       : s = "RXKADNOAUTH";        break;
740         case RXKADBADKEY       : s = "RXKADBADKEY";        break;
741         case RXKADBADTICKET    : s = "RXKADBADTICKET";     break;
742         case RXKADUNKNOWNKEY   : s = "RXKADUNKNOWNKEY";    break;
743         case RXKADEXPIRED      : s = "RXKADEXPIRED";       break;
744         case RXKADSEALEDINCON  : s = "RXKADSEALEDINCON";   break;
745         case RXKADDATALEN      : s = "RXKADDATALEN";       break;
746         case RXKADILLEGALLEVEL : s = "RXKADILLEGALLEVEL";  break;
747         }
748         osi_Log2(afsd_logp, "cm_Analyze: rxkad error code 0x%x (%s)",
749                   errorCode, s);
750
751         if (serverp) {
752             reqp->tokenIdleErrorServp = serverp;
753             reqp->tokenError = errorCode;
754             retry = 1;
755         }
756     } else if (errorCode >= ERROR_TABLE_BASE_U && errorCode < ERROR_TABLE_BASE_U + 256) {
757         /*
758          * We received a ubik error.  its possible that the server we are
759          * communicating with has a corrupted database or is partitioned
760          * from the rest of the servers and another server might be able
761          * to answer our query.  Therefore, we will retry the request
762          * and force the use of another server.
763          */
764         if (serverp) {
765             reqp->tokenIdleErrorServp = serverp;
766             reqp->tokenError = errorCode;
767             retry = 1;
768         }
769     } else if (errorCode == VICECONNBAD || errorCode == VICETOKENDEAD) {
770         cm_ForceNewConnections(serverp);
771         if ( timeLeft > 2 )
772             retry = 1;
773     } else {
774         if (errorCode) {
775             char * s = "unknown error";
776             switch ( errorCode ) {
777             case VSALVAGE          : s = "VSALVAGE";           break;
778             case VNOVNODE          : s = "VNOVNODE";           break;
779             case VNOVOL            : s = "VNOVOL";             break;
780             case VVOLEXISTS        : s = "VVOLEXISTS";         break;
781             case VNOSERVICE        : s = "VNOSERVICE";         break;
782             case VOFFLINE          : s = "VOFFLINE";           break;
783             case VONLINE           : s = "VONLINE";            break;
784             case VDISKFULL         : s = "VDISKFULL";          break;
785             case VOVERQUOTA        : s = "VOVERQUOTA";         break;
786             case VBUSY             : s = "VBUSY";              break;
787             case VMOVED            : s = "VMOVED";             break;
788             case VIO               : s = "VIO";                break;
789             case VRESTRICTED       : s = "VRESTRICTED";        break;
790             case VRESTARTING       : s = "VRESTARTING";        break;
791             case VREADONLY         : s = "VREADONLY";          break;
792             case EAGAIN            : s = "EAGAIN";             break;
793             case UAEAGAIN          : s = "UAEAGAIN";           break;
794             case EINVAL            : s = "EINVAL";             break;
795             case UAEINVAL          : s = "UAEINVAL";           break;
796             case EACCES            : s = "EACCES";             break;
797             case UAEACCES          : s = "UAEACCES";           break;
798             case ENOENT            : s = "ENOENT";             break;
799             case UAENOENT          : s = "UAENOENT";           break;
800             case EEXIST            : s = "EEXIST";             break;
801             case UAEEXIST          : s = "UAEEXIST";           break;
802             case VICECONNBAD       : s = "VICECONNBAD";        break;
803             case VICETOKENDEAD     : s = "VICETOKENDEAD";      break;
804             case WSAEWOULDBLOCK    : s = "WSAEWOULDBLOCK";     break;
805             case UAEWOULDBLOCK     : s = "UAEWOULDBLOCK";      break;
806             case VL_IDEXIST        : s = "VL_IDEXIST";         break;
807             case VL_IO             : s = "VL_IO";              break;
808             case VL_NAMEEXIST      : s = "VL_NAMEEXIST";       break;
809             case VL_CREATEFAIL     : s = "VL_CREATEFAIL";      break;
810             case VL_NOENT          : s = "VL_NOENT";           break;
811             case VL_EMPTY          : s = "VL_EMPTY";           break;
812             case VL_ENTDELETED     : s = "VL_ENTDELETED";      break;
813             case VL_BADNAME        : s = "VL_BADNAME";         break;
814             case VL_BADINDEX       : s = "VL_BADINDEX";        break;
815             case VL_BADVOLTYPE     : s = "VL_BADVOLTYPE";      break;
816             case VL_BADSERVER      : s = "VL_BADSERVER";       break;
817             case VL_BADPARTITION   : s = "VL_BADPARTITION";    break;
818             case VL_REPSFULL       : s = "VL_REPSFULL";        break;
819             case VL_NOREPSERVER    : s = "VL_NOREPSERVER";     break;
820             case VL_DUPREPSERVER   : s = "VL_DUPREPSERVER";    break;
821             case VL_RWNOTFOUND     : s = "VL_RWNOTFOUND";      break;
822             case VL_BADREFCOUNT    : s = "VL_BADREFCOUNT";     break;
823             case VL_SIZEEXCEEDED   : s = "VL_SIZEEXCEEDED";    break;
824             case VL_BADENTRY       : s = "VL_BADENTRY";        break;
825             case VL_BADVOLIDBUMP   : s = "VL_BADVOLIDBUMP";    break;
826             case VL_IDALREADYHASHED: s = "VL_IDALREADYHASHED"; break;
827             case VL_ENTRYLOCKED    : s = "VL_ENTRYLOCKED";     break;
828             case VL_BADVOLOPER     : s = "VL_BADVOLOPER";      break;
829             case VL_BADRELLOCKTYPE : s = "VL_BADRELLOCKTYPE";  break;
830             case VL_RERELEASE      : s = "VL_RERELEASE";       break;
831             case VL_BADSERVERFLAG  : s = "VL_BADSERVERFLAG";   break;
832             case VL_PERM           : s = "VL_PERM";            break;
833             case VL_NOMEM          : s = "VL_NOMEM";           break;
834             case VL_BADVERSION     : s = "VL_BADVERSION";      break;
835             case VL_INDEXERANGE    : s = "VL_INDEXERANGE";     break;
836             case VL_MULTIPADDR     : s = "VL_MULTIPADDR";      break;
837             case VL_BADMASK        : s = "VL_BADMASK";         break;
838             case CM_ERROR_NOSUCHCELL        : s = "CM_ERROR_NOSUCHCELL";         break;                         
839             case CM_ERROR_NOSUCHVOLUME      : s = "CM_ERROR_NOSUCHVOLUME";       break;                         
840             case CM_ERROR_TIMEDOUT          : s = "CM_ERROR_TIMEDOUT";           break;                 
841             case CM_ERROR_RETRY             : s = "CM_ERROR_RETRY";              break; 
842             case CM_ERROR_NOACCESS          : s = "CM_ERROR_NOACCESS";           break; 
843             case CM_ERROR_NOSUCHFILE        : s = "CM_ERROR_NOSUCHFILE";         break;                         
844             case CM_ERROR_STOPNOW           : s = "CM_ERROR_STOPNOW";            break;                         
845             case CM_ERROR_TOOBIG            : s = "CM_ERROR_TOOBIG";             break;                                 
846             case CM_ERROR_INVAL             : s = "CM_ERROR_INVAL";              break;                                 
847             case CM_ERROR_BADFD             : s = "CM_ERROR_BADFD";              break;                                 
848             case CM_ERROR_BADFDOP           : s = "CM_ERROR_BADFDOP";            break;                         
849             case CM_ERROR_EXISTS            : s = "CM_ERROR_EXISTS";             break;                                 
850             case CM_ERROR_CROSSDEVLINK      : s = "CM_ERROR_CROSSDEVLINK";       break;                         
851             case CM_ERROR_BADOP             : s = "CM_ERROR_BADOP";              break;                                 
852             case CM_ERROR_BADPASSWORD       : s = "CM_ERROR_BADPASSWORD";        break;         
853             case CM_ERROR_NOTDIR            : s = "CM_ERROR_NOTDIR";             break;                                 
854             case CM_ERROR_ISDIR             : s = "CM_ERROR_ISDIR";              break;                                 
855             case CM_ERROR_READONLY          : s = "CM_ERROR_READONLY";           break;                         
856             case CM_ERROR_WOULDBLOCK        : s = "CM_ERROR_WOULDBLOCK";         break;                         
857             case CM_ERROR_QUOTA             : s = "CM_ERROR_QUOTA";              break;                                 
858             case CM_ERROR_SPACE             : s = "CM_ERROR_SPACE";              break;                                 
859             case CM_ERROR_BADSHARENAME      : s = "CM_ERROR_BADSHARENAME";       break;                         
860             case CM_ERROR_BADTID            : s = "CM_ERROR_BADTID";             break;                                 
861             case CM_ERROR_UNKNOWN           : s = "CM_ERROR_UNKNOWN";            break;                         
862             case CM_ERROR_NOMORETOKENS      : s = "CM_ERROR_NOMORETOKENS";       break;                         
863             case CM_ERROR_NOTEMPTY          : s = "CM_ERROR_NOTEMPTY";           break;                         
864             case CM_ERROR_USESTD            : s = "CM_ERROR_USESTD";             break;                                 
865             case CM_ERROR_REMOTECONN        : s = "CM_ERROR_REMOTECONN";         break;                         
866             case CM_ERROR_ATSYS             : s = "CM_ERROR_ATSYS";              break;                                 
867             case CM_ERROR_NOSUCHPATH        : s = "CM_ERROR_NOSUCHPATH";         break;                         
868             case CM_ERROR_CLOCKSKEW         : s = "CM_ERROR_CLOCKSKEW";          break;                         
869             case CM_ERROR_BADSMB            : s = "CM_ERROR_BADSMB";             break;                                 
870             case CM_ERROR_ALLBUSY           : s = "CM_ERROR_ALLBUSY";            break;                         
871             case CM_ERROR_NOFILES           : s = "CM_ERROR_NOFILES";            break;                         
872             case CM_ERROR_PARTIALWRITE      : s = "CM_ERROR_PARTIALWRITE";       break;                         
873             case CM_ERROR_NOIPC             : s = "CM_ERROR_NOIPC";              break;                                 
874             case CM_ERROR_BADNTFILENAME     : s = "CM_ERROR_BADNTFILENAME";      break;                         
875             case CM_ERROR_BUFFERTOOSMALL    : s = "CM_ERROR_BUFFERTOOSMALL";     break;                         
876             case CM_ERROR_RENAME_IDENTICAL  : s = "CM_ERROR_RENAME_IDENTICAL";   break;                 
877             case CM_ERROR_ALLOFFLINE        : s = "CM_ERROR_ALLOFFLINE";         break;          
878             case CM_ERROR_AMBIGUOUS_FILENAME: s = "CM_ERROR_AMBIGUOUS_FILENAME"; break;  
879             case CM_ERROR_BADLOGONTYPE      : s = "CM_ERROR_BADLOGONTYPE";       break;             
880             case CM_ERROR_GSSCONTINUE       : s = "CM_ERROR_GSSCONTINUE";        break;         
881             case CM_ERROR_TIDIPC            : s = "CM_ERROR_TIDIPC";             break;              
882             case CM_ERROR_TOO_MANY_SYMLINKS : s = "CM_ERROR_TOO_MANY_SYMLINKS";  break;   
883             case CM_ERROR_PATH_NOT_COVERED  : s = "CM_ERROR_PATH_NOT_COVERED";   break;    
884             case CM_ERROR_LOCK_CONFLICT     : s = "CM_ERROR_LOCK_CONFLICT";      break;       
885             case CM_ERROR_SHARING_VIOLATION : s = "CM_ERROR_SHARING_VIOLATION";  break;   
886             case CM_ERROR_ALLDOWN           : s = "CM_ERROR_ALLDOWN";            break;             
887             case CM_ERROR_TOOFEWBUFS        : s = "CM_ERROR_TOOFEWBUFS";         break;                         
888             case CM_ERROR_TOOMANYBUFS       : s = "CM_ERROR_TOOMANYBUFS";        break;                         
889             }
890             osi_Log2(afsd_logp, "cm_Analyze: ignoring error code 0x%x (%s)", 
891                      errorCode, s);
892             retry = 0;
893         }
894     }
895
896     /* If not allowed to retry, don't */
897     if (!forcing_new && (reqp->flags & CM_REQ_NORETRY))
898         retry = 0;
899     else if (retry && dead_session)
900         retry = 0;
901
902   out:
903     /* drop this on the way out */
904     if (connp)
905         cm_PutConn(connp);
906
907     /* 
908      * clear the volume updated flag if we succeed.
909      * this way the flag will not prevent a subsequent volume 
910      * from being updated if necessary.
911      */
912     if (errorCode == 0)
913     {
914         reqp->flags &= ~CM_REQ_VOLUME_UPDATED;
915     }
916
917     /* retry until we fail to find a connection */
918     return retry;
919 }
920
921 long cm_ConnByMServers(cm_serverRef_t *serversp, cm_user_t *usersp,
922         cm_req_t *reqp, cm_conn_t **connpp)
923 {
924     long code;
925     cm_serverRef_t *tsrp;
926     cm_server_t *tsp;
927     long firstError = 0;
928     int someBusy = 0, someOffline = 0, allOffline = 1, allBusy = 1, allDown = 1;
929 #ifdef SET_RX_TIMEOUTS_TO_TIMELEFT
930     long timeUsed, timeLeft, hardTimeLeft;
931 #endif
932     *connpp = NULL;
933
934     if (serversp == NULL) {
935         osi_Log1(afsd_logp, "cm_ConnByMServers returning 0x%x", CM_ERROR_ALLDOWN);
936         return CM_ERROR_ALLDOWN;
937     }
938
939 #ifdef SET_RX_TIMEOUTS_TO_TIMELEFT
940     timeUsed = (GetTickCount() - reqp->startTime) / 1000;
941         
942     /* leave 5 seconds margin of safety */
943     timeLeft =  ConnDeadtimeout - timeUsed - 5;
944     hardTimeLeft = HardDeadtimeout - timeUsed - 5;
945 #endif
946
947     lock_ObtainRead(&cm_serverLock);
948     for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
949         if (tsrp->status == srv_deleted)
950             continue;
951
952         tsp = tsrp->server;
953         if (reqp->tokenIdleErrorServp) {
954             /* 
955              * search the list until we find the server
956              * that failed last time.  When we find it
957              * clear the error, skip it and try the one
958              * in the list.
959              */
960             if (tsp == reqp->tokenIdleErrorServp)
961                 reqp->tokenIdleErrorServp = NULL;
962             continue;
963         }
964         if (tsp) {
965             cm_GetServerNoLock(tsp);
966             lock_ReleaseRead(&cm_serverLock);
967             if (!(tsp->flags & CM_SERVERFLAG_DOWN)) {
968                 allDown = 0;
969                 if (tsrp->status == srv_busy) {
970                     allOffline = 0;
971                     someBusy = 1;
972                 } else if (tsrp->status == srv_offline) {
973                     allBusy = 0;
974                     someOffline = 1;
975                 } else {
976                     allOffline = 0;
977                     allBusy = 0;
978                     code = cm_ConnByServer(tsp, usersp, connpp);
979                     if (code == 0) {        /* cm_CBS only returns 0 */
980                         cm_PutServer(tsp);
981 #ifdef SET_RX_TIMEOUTS_TO_TIMELEFT
982                         /* Set RPC timeout */
983                         if (timeLeft > ConnDeadtimeout)
984                             timeLeft = ConnDeadtimeout;
985
986                         if (hardTimeLeft > HardDeadtimeout) 
987                             hardTimeLeft = HardDeadtimeout;
988
989                         lock_ObtainMutex(&(*connpp)->mx);
990                         rx_SetConnDeadTime((*connpp)->rxconnp, timeLeft);
991                         rx_SetConnHardDeadTime((*connpp)->rxconnp, (u_short) hardTimeLeft);
992                         lock_ReleaseMutex(&(*connpp)->mx);
993 #endif
994                         return 0;
995                     }
996
997                     /* therefore, this code is never executed */
998                     if (firstError == 0)
999                         firstError = code;
1000                 }
1001             }
1002             lock_ObtainRead(&cm_serverLock);
1003             cm_PutServerNoLock(tsp);
1004         }
1005     }   
1006     lock_ReleaseRead(&cm_serverLock);
1007
1008     if (firstError == 0) {
1009         if (allDown) 
1010             firstError = (reqp->tokenError ? reqp->tokenError : 
1011                           (reqp->idleError ? RX_CALL_TIMEOUT : CM_ERROR_ALLDOWN));
1012         else if (allBusy) 
1013             firstError = CM_ERROR_ALLBUSY;
1014         else if (allOffline || (someBusy && someOffline))
1015             firstError = CM_ERROR_ALLOFFLINE;
1016         else {
1017             osi_Log0(afsd_logp, "cm_ConnByMServers returning impossible error TIMEDOUT");
1018             firstError = CM_ERROR_TIMEDOUT;
1019         }
1020     }
1021
1022     osi_Log1(afsd_logp, "cm_ConnByMServers returning 0x%x", firstError);
1023     return firstError;
1024 }
1025
1026 /* called with a held server to GC all bad connections hanging off of the server */
1027 void cm_GCConnections(cm_server_t *serverp)
1028 {
1029     cm_conn_t *tcp;
1030     cm_conn_t **lcpp;
1031     cm_user_t *userp;
1032
1033     lock_ObtainWrite(&cm_connLock);
1034     lcpp = &serverp->connsp;
1035     for (tcp = *lcpp; tcp; tcp = *lcpp) {
1036         userp = tcp->userp;
1037         if (userp && tcp->refCount == 0 && (userp->vcRefs == 0)) {
1038             /* do the deletion of this guy */
1039             cm_PutServer(tcp->serverp);
1040             cm_ReleaseUser(userp);
1041             *lcpp = tcp->nextp;
1042             rx_DestroyConnection(tcp->rxconnp);
1043             lock_FinalizeMutex(&tcp->mx);
1044             free(tcp);
1045         }
1046         else {
1047             /* just advance to the next */
1048             lcpp = &tcp->nextp;
1049         }
1050     }
1051     lock_ReleaseWrite(&cm_connLock);
1052 }
1053
1054 static void cm_NewRXConnection(cm_conn_t *tcp, cm_ucell_t *ucellp,
1055                                cm_server_t *serverp)
1056 {
1057     unsigned short port;
1058     int serviceID;
1059     int secIndex;
1060     struct rx_securityClass *secObjp;
1061
1062     if (serverp->type == CM_SERVER_VLDB) {
1063         port = htons(7003);
1064         serviceID = 52;
1065     }
1066     else {
1067         osi_assertx(serverp->type == CM_SERVER_FILE, "incorrect server type");
1068         port = htons(7000);
1069         serviceID = 1;
1070     }
1071     if (ucellp->flags & CM_UCELLFLAG_RXKAD) {
1072         secIndex = 2;
1073         switch (cryptall) {
1074         case 0:
1075             tcp->cryptlevel = rxkad_clear;
1076             break;
1077         case 2:
1078             tcp->cryptlevel = rxkad_auth;
1079             break;
1080         default:
1081             tcp->cryptlevel = rxkad_crypt;
1082         }
1083         secObjp = rxkad_NewClientSecurityObject(tcp->cryptlevel,
1084                                                 &ucellp->sessionKey, ucellp->kvno,
1085                                                 ucellp->ticketLen, ucellp->ticketp);    
1086     } else {
1087         /* normal auth */
1088         secIndex = 0;
1089         tcp->cryptlevel = rxkad_clear;
1090         secObjp = rxnull_NewClientSecurityObject();
1091     }
1092     osi_assertx(secObjp != NULL, "null rx_securityClass");
1093     tcp->rxconnp = rx_NewConnection(serverp->addr.sin_addr.s_addr,
1094                                   port,
1095                                   serviceID,
1096                                   secObjp,
1097                                   secIndex);
1098     rx_SetConnDeadTime(tcp->rxconnp, ConnDeadtimeout);
1099     rx_SetConnHardDeadTime(tcp->rxconnp, HardDeadtimeout);
1100     rx_SetConnIdleDeadTime(tcp->rxconnp, IdleDeadtimeout);
1101     tcp->ucgen = ucellp->gen;
1102     if (secObjp)
1103         rxs_Release(secObjp);   /* Decrement the initial refCount */
1104 }
1105
1106 long cm_ConnByServer(cm_server_t *serverp, cm_user_t *userp, cm_conn_t **connpp)
1107 {
1108     cm_conn_t *tcp;
1109     cm_ucell_t *ucellp;
1110
1111     *connpp = NULL;
1112
1113     if (cm_anonvldb && serverp->type == CM_SERVER_VLDB)
1114         userp = cm_rootUserp;
1115
1116     lock_ObtainMutex(&userp->mx);
1117     lock_ObtainRead(&cm_connLock);
1118     for (tcp = serverp->connsp; tcp; tcp=tcp->nextp) {
1119         if (tcp->userp == userp) 
1120             break;
1121     }
1122     
1123     /* find ucell structure */
1124     ucellp = cm_GetUCell(userp, serverp->cellp);
1125     if (!tcp) {
1126         lock_ConvertRToW(&cm_connLock);
1127         for (tcp = serverp->connsp; tcp; tcp=tcp->nextp) {
1128             if (tcp->userp == userp) 
1129                 break;
1130         }
1131         if (tcp) {
1132             lock_ReleaseWrite(&cm_connLock);
1133             goto haveconn;
1134         }
1135         cm_GetServer(serverp);
1136         tcp = malloc(sizeof(*tcp));
1137         memset(tcp, 0, sizeof(*tcp));
1138         tcp->nextp = serverp->connsp;
1139         serverp->connsp = tcp;
1140         cm_HoldUser(userp);
1141         tcp->userp = userp;
1142         lock_InitializeMutex(&tcp->mx, "cm_conn_t mutex", LOCK_HIERARCHY_CONN);
1143         lock_ObtainMutex(&tcp->mx);
1144         tcp->serverp = serverp;
1145         tcp->cryptlevel = rxkad_clear;
1146         cm_NewRXConnection(tcp, ucellp, serverp);
1147         tcp->refCount = 1;
1148         lock_ReleaseMutex(&tcp->mx);
1149         lock_ReleaseWrite(&cm_connLock);
1150     } else {
1151         lock_ReleaseRead(&cm_connLock);
1152       haveconn:
1153         InterlockedIncrement(&tcp->refCount);
1154
1155         lock_ObtainMutex(&tcp->mx);
1156         if ((tcp->flags & CM_CONN_FLAG_FORCE_NEW) ||
1157             (tcp->ucgen < ucellp->gen) ||
1158             (tcp->cryptlevel != (ucellp->flags & CM_UCELLFLAG_RXKAD ? (cryptall == 1 ? rxkad_crypt : (cryptall == 2 ? rxkad_auth : rxkad_clear)) : rxkad_clear)))
1159         {
1160             if (tcp->ucgen < ucellp->gen)
1161                 osi_Log0(afsd_logp, "cm_ConnByServer replace connection due to token update");
1162             else
1163                 osi_Log0(afsd_logp, "cm_ConnByServer replace connection due to crypt change");
1164             tcp->flags &= ~CM_CONN_FLAG_FORCE_NEW;
1165             rx_DestroyConnection(tcp->rxconnp);
1166             cm_NewRXConnection(tcp, ucellp, serverp);
1167         }
1168         lock_ReleaseMutex(&tcp->mx);
1169     }
1170     lock_ReleaseMutex(&userp->mx);
1171
1172     /* return this pointer to our caller */
1173     osi_Log1(afsd_logp, "cm_ConnByServer returning conn 0x%p", tcp);
1174     *connpp = tcp;
1175
1176     return 0;
1177 }
1178
1179 long cm_ServerAvailable(struct cm_fid *fidp, struct cm_user *userp)
1180 {
1181     long code;
1182     cm_req_t req;
1183     cm_serverRef_t **serverspp;
1184     cm_serverRef_t *tsrp;
1185     cm_server_t *tsp;
1186     int someBusy = 0, someOffline = 0, allOffline = 1, allBusy = 1, allDown = 1;
1187
1188     cm_InitReq(&req);
1189
1190     code = cm_GetServerList(fidp, userp, &req, &serverspp);
1191     if (code)
1192         return 0;
1193
1194     lock_ObtainRead(&cm_serverLock);
1195     for (tsrp = *serverspp; tsrp; tsrp=tsrp->next) {
1196         if (tsrp->status == srv_deleted)
1197             continue;
1198         tsp = tsrp->server;
1199         if (!(tsp->flags & CM_SERVERFLAG_DOWN)) {
1200             allDown = 0;
1201             if (tsrp->status == srv_busy) {
1202                 allOffline = 0;
1203                 someBusy = 1;
1204             } else if (tsrp->status == srv_offline) {
1205                 allBusy = 0;
1206                 someOffline = 1;
1207             } else {
1208                 allOffline = 0;
1209                 allBusy = 0;
1210             }
1211         }
1212     }   
1213     lock_ReleaseRead(&cm_serverLock);
1214     cm_FreeServerList(serverspp, 0);
1215
1216     if (allDown)
1217         return 0;
1218     else if (allBusy) 
1219         return 0;
1220     else if (allOffline || (someBusy && someOffline))
1221         return 0;
1222     else
1223         return 1;
1224 }
1225
1226 /* 
1227  * The returned cm_conn_t ** object is released in the subsequent call
1228  * to cm_Analyze().  
1229  */
1230 long cm_ConnFromFID(struct cm_fid *fidp, struct cm_user *userp, cm_req_t *reqp,
1231                     cm_conn_t **connpp)
1232 {
1233     long code;
1234     cm_serverRef_t **serverspp;
1235
1236     *connpp = NULL;
1237
1238     code = cm_GetServerList(fidp, userp, reqp, &serverspp);
1239     if (code) {
1240         return code;
1241     }
1242
1243     code = cm_ConnByMServers(*serverspp, userp, reqp, connpp);
1244     cm_FreeServerList(serverspp, 0);
1245     return code;
1246 }
1247
1248
1249 long cm_ConnFromVolume(struct cm_volume *volp, unsigned long volid, struct cm_user *userp, cm_req_t *reqp,
1250                        cm_conn_t **connpp)
1251 {
1252     long code;
1253     cm_serverRef_t **serverspp;
1254
1255     *connpp = NULL;
1256
1257     serverspp = cm_GetVolServers(volp, volid, userp, reqp);
1258
1259     code = cm_ConnByMServers(*serverspp, userp, reqp, connpp);
1260     cm_FreeServerList(serverspp, 0);
1261     return code;
1262 }
1263
1264
1265 extern struct rx_connection *
1266 cm_GetRxConn(cm_conn_t *connp)
1267 {
1268     struct rx_connection * rxconnp;
1269     lock_ObtainMutex(&connp->mx);
1270     rxconnp = connp->rxconnp;
1271     rx_GetConnection(rxconnp);
1272     lock_ReleaseMutex(&connp->mx);
1273     return rxconnp;
1274 }
1275
1276 void cm_ForceNewConnections(cm_server_t *serverp)
1277 {
1278     cm_conn_t *tcp;
1279
1280     lock_ObtainWrite(&cm_connLock);
1281     for (tcp = serverp->connsp; tcp; tcp=tcp->nextp) {
1282         lock_ObtainMutex(&tcp->mx);
1283         tcp->flags |= CM_CONN_FLAG_FORCE_NEW;
1284         lock_ReleaseMutex(&tcp->mx);
1285     }
1286     lock_ReleaseWrite(&cm_connLock);
1287 }