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