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