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