Initial IBM OpenAFS 1.0 tree
[openafs.git] / src / afs / afs_conn.c
1 /* Copyright (C) 1995, 1989, 1998 Transarc Corporation - All rights reserved */
2 /*
3  * (C) COPYRIGHT IBM CORPORATION 1987, 1988
4  * LICENSED MATERIALS - PROPERTY OF IBM
5  */
6 /*
7  * afs_conn.c
8  *
9  * Implements:
10  */
11 #include "../afs/param.h"       /* Should be always first */
12 #include "../afs/stds.h"
13 #include "../afs/sysincludes.h" /* Standard vendor system headers */
14
15 #if !defined(UKERNEL)
16 #include <net/if.h>
17 #include <netinet/in.h>
18
19 #ifdef AFS_SGI62_ENV
20 #include "../h/hashing.h"
21 #endif
22 #if !defined(AFS_HPUX110_ENV) && !defined(AFS_LINUX20_ENV)
23 #include <netinet/in_var.h>
24 #endif /* ! AFS_HPUX110_ENV */
25 #endif /* !defined(UKERNEL) */
26
27 #include "../afs/afsincludes.h" /* Afs-based standard headers */
28 #include "../afs/afs_stats.h"   /* afs statistics */
29
30 #if     defined(AFS_SUN56_ENV)
31 #include <inet/led.h>
32 #include <inet/common.h>
33 #include <inet/ip.h>
34 #endif
35
36 /* Imported variables */
37 /* these are for storing alternate interface addresses - from afs_callback.c */
38 extern struct interfaceAddr afs_cb_interface;
39
40
41 /* Imported functions. */
42 struct rx_securityClass *rxnull_NewClientSecurityObject();
43 struct rx_securityClass *rxkad_NewClientSecurityObject();
44
45 /* Exported variables */
46 afs_rwlock_t afs_xconn;                 /* allocation lock for new things */
47 afs_rwlock_t afs_xinterface;            /* for multiple client address */
48
49 /* Local variables */
50 afs_int32 cryptall = 0;
51
52
53 unsigned int VNOSERVERS = 0;
54 struct conn *afs_Conn(afid, areq, locktype)
55     register struct VenusFid *afid;
56     register struct vrequest *areq;
57     afs_int32 locktype;
58 {
59    u_short fsport=AFS_FSPORT;
60    struct volume *tv;
61    struct conn *tconn = (struct conn *)0;
62    struct srvAddr *lowp= (struct srvAddr *)0;
63    struct unixuser *tu;
64    int notbusy;
65    int i;
66    struct srvAddr *sa1p;
67
68    AFS_STATCNT(afs_Conn);
69    tv = afs_GetVolume(afid, areq, READ_LOCK);
70    if (!tv) {
71       if (areq) {
72          afs_FinalizeReq(areq);
73          areq->volumeError = 1;
74       }
75       return (struct conn *) 0;
76    }
77
78    if (tv->serverHost[0] && tv->serverHost[0]->cell) {
79       fsport = tv->serverHost[0]->cell->fsport;
80    }    
81    else {
82       VNOSERVERS++;
83    }
84
85    /* First is always lowest rank, if it's up */
86    if ((tv->status[0] == not_busy) && tv->serverHost[0] && 
87        !(tv->serverHost[0]->addr->sa_flags & SRVR_ISDOWN))
88       lowp = tv->serverHost[0]->addr;
89
90    /* Otherwise we look at all of them. There are seven levels of
91     * not_busy. This means we will check a volume seven times before it
92     * is marked offline. Ideally, we only need two levels, but this
93     * serves a second purpose of waiting some number of seconds before
94     * the client decides the volume is offline (ie: a clone could finish
95     * in this time).
96     */
97    for (notbusy = not_busy; (!lowp && (notbusy <= end_not_busy)); notbusy++) {
98       for (i=0 ;i<MAXHOSTS && tv->serverHost[i];i++) {
99          if (tv->status[i] != notbusy) {
100             if (tv->status[i] == rd_busy || tv->status[i] == rdwr_busy) {
101                if (!areq->busyCount)
102                   areq->busyCount++;
103             } else if (tv->status[i] == offline) {
104                if (!areq->volumeError) 
105                   areq->volumeError = VOLMISSING;
106             }
107             continue;
108          }
109          for (sa1p = tv->serverHost[i]->addr; sa1p; sa1p = sa1p->next_sa) {
110             if (sa1p->sa_flags & SRVR_ISDOWN)
111                continue;
112             if (!lowp || (lowp->sa_iprank > sa1p->sa_iprank))
113                lowp = sa1p;
114          }
115       }
116    }
117    afs_PutVolume(tv, READ_LOCK);
118
119    if (lowp) {
120       tu = afs_GetUser(areq->uid, afid->Cell, SHARED_LOCK);
121       tconn = afs_ConnBySA(lowp, fsport, afid->Cell, tu,
122                            0/*!force*/, 1/*create*/, locktype);
123
124       afs_PutUser(tu, SHARED_LOCK);
125    }
126
127    return tconn;
128 } /*afs_Conn*/
129
130
131 struct conn *afs_ConnBySA(struct srvAddr *sap, unsigned short aport,
132                           afs_int32 acell, struct unixuser *tu,
133                           int force_if_down, afs_int32 create, afs_int32 locktype)
134 {
135     struct conn *tc=0;
136     struct rx_securityClass *csec;      /*Security class object*/
137     int isec;                           /*Security index*/
138     int service;
139
140     if (!sap || ((sap->sa_flags & SRVR_ISDOWN) && !force_if_down)) {
141         /* sa is known down, and we don't want to force it.  */
142         return (struct conn *)0;
143     }
144
145     ObtainSharedLock(&afs_xconn,15);
146     for (tc = sap->conns; tc; tc=tc->next) {
147        if (tc->user == tu && tc->port == aport) {
148           break;
149        }
150     }           
151
152     if (!tc && !create) {
153        ReleaseSharedLock(&afs_xconn);
154        return (struct conn *)0;
155     }
156
157     if (!tc) {
158        /* No such connection structure exists.  Create one and splice it in.
159         * Make sure the server record has been marked as used (for the purposes
160         * of calculating up & down times, it's now considered to be an
161         * ``active'' server).  Also make sure the server's lastUpdateEvalTime
162         * gets set, marking the time of its ``birth''.
163         */
164         UpgradeSToWLock(&afs_xconn,37);
165         tc = (struct conn *) afs_osi_Alloc(sizeof(struct conn));
166         bzero((char *)tc, sizeof(struct conn));
167
168         tc->user = tu;
169         tc->port = aport;
170         tc->srvr = sap;
171         tc->refCount = 0;   /* bumped below */
172         tc->forceConnectFS = 1;
173         tc->id = (struct rx_connection *) 0;
174         tc->next = sap->conns;
175         sap->conns = tc;
176         afs_ActivateServer(sap); 
177
178         ConvertWToSLock(&afs_xconn);
179     }
180     tc->refCount++;
181
182     if (tu->states & UTokensBad) {
183         /* we may still have an authenticated RPC connection here,
184          * we'll have to create a new, unauthenticated, connection.
185          * Perhaps a better way to do this would be to set
186          * conn->forceConnectFS on all conns when the token first goes
187          * bad, but that's somewhat trickier, due to locking
188          * constraints (though not impossible).
189          */
190         if (tc->id && (rx_SecurityClassOf(tc->id) != 0)) {
191            tc->forceConnectFS = 1;      /* force recreation of connection */
192         }
193         tu->vid = UNDEFVID;     /* forcibly disconnect the authentication info */
194     }
195
196     if (tc->forceConnectFS) { 
197         UpgradeSToWLock(&afs_xconn,38);
198         csec = (struct rx_securityClass *) 0;
199         if (tc->id) {
200             AFS_GUNLOCK();
201             rx_DestroyConnection(tc->id);
202             AFS_GLOCK();
203         }
204         /*
205          * Stupid hack to determine if using vldb service or file system
206          * service.
207          */
208         if (aport == sap->server->cell->vlport)
209             service = 52;
210         else
211             service = 1;
212         isec = 0;
213         if (tu->vid != UNDEFVID) {
214               int level;
215
216               if (cryptall) {
217                 level=rxkad_crypt;
218                 isec=3;
219               }
220               else {
221                 level=rxkad_clear;
222                 isec=2;
223               }
224                 /* kerberos tickets on channel 2 */
225                 csec = rxkad_NewClientSecurityObject(level, tu->ct.HandShakeKey,
226                         /* kvno */ tu->ct.AuthHandle, tu->stLen, tu->stp);
227         }
228         if (isec == 0)
229             csec = rxnull_NewClientSecurityObject();
230         AFS_GUNLOCK();
231         tc->id = rx_NewConnection(sap->sa_ip, aport, service, csec, isec);
232         AFS_GLOCK();
233         if (service == 52) { 
234            rx_SetConnHardDeadTime(tc->id, AFS_HARDDEADTIME);
235        }
236
237
238         tc->forceConnectFS = 0; /* apparently we're appropriately connected now */
239         if (csec)
240             rxs_Release(csec);
241         ConvertWToSLock(&afs_xconn);
242     }
243
244     ReleaseSharedLock(&afs_xconn);
245     return tc;
246 }
247 /*
248  * afs_ConnByHost
249  *
250  * forceConnectFS is set whenever we must recompute the connection. UTokensBad
251  * is true only if we know that the tokens are bad.  We thus clear this flag
252  * when we get a new set of tokens..
253  * Having force... true and UTokensBad true simultaneously means that the tokens
254  * went bad and we're supposed to create a new, unauthenticated, connection.
255  */
256 struct conn *afs_ConnByHost(aserver, aport, acell, areq, aforce, locktype)
257     struct server *aserver;
258     afs_int32 acell;
259     unsigned short aport;
260     struct vrequest *areq;
261     int aforce;
262     afs_int32 locktype;
263 { /*afs_ConnByHost*/
264
265     struct unixuser *tu;
266     struct conn *tc=0;
267     struct srvAddr *sa=0;
268
269     AFS_STATCNT(afs_ConnByHost);
270 /* 
271   1.  look for an existing connection
272   2.  create a connection at an address believed to be up
273       (if aforce is true, create a connection at the first address)
274 */
275
276     tu = afs_GetUser(areq->uid, acell, SHARED_LOCK);
277
278     for (sa = aserver->addr; sa; sa = sa->next_sa) {    
279        tc = afs_ConnBySA(sa, aport, acell, tu, aforce, 
280                          0/*don't create one*/,
281                          locktype);
282        if (tc) 
283             break;
284     }
285
286     if (!tc) {
287        for (sa = aserver->addr; sa; sa = sa->next_sa) { 
288           tc = afs_ConnBySA(sa, aport, acell, tu, aforce, 
289                             1/*create one*/,
290                             locktype);
291           if (tc) 
292                break;
293        }
294     }
295
296     afs_PutUser(tu, SHARED_LOCK);
297     return tc;
298
299 } /*afs_ConnByHost*/
300
301
302 struct conn *afs_ConnByMHosts(ahosts, aport, acell, areq, locktype)
303     struct server *ahosts[];
304     afs_int32 acell;
305     unsigned short aport;
306     register struct vrequest *areq;
307     afs_int32 locktype;
308 {
309     register afs_int32 i;
310     register struct conn *tconn;
311     register struct server *ts;
312
313     /* try to find any connection from the set */
314     AFS_STATCNT(afs_ConnByMHosts);
315     for (i=0;i<MAXCELLHOSTS;i++) {
316         if ((ts = ahosts[i]) == (struct server *) 0) break;
317         tconn = afs_ConnByHost(ts, aport, acell, 
318                                areq, 0, locktype);
319         if (tconn) {
320            return tconn;
321         }
322     }
323     return (struct conn *) 0;
324
325 } /*afs_ConnByMHosts*/
326
327
328 void afs_PutConn(ac, locktype)
329     register struct conn *ac;
330     afs_int32 locktype;
331 {
332     AFS_STATCNT(afs_PutConn);
333     ac->refCount--;
334 } /*afs_PutConn*/
335
336
337 /* for multi homed clients, an RPC may timeout because of a
338 client network interface going down. We need to reopen new 
339 connections in this case
340 */
341 ForceNewConnections(sap)
342 struct srvAddr *sap;
343 {
344         struct conn *tc=0;
345
346         if ( !sap) return; /* defensive check */
347
348         /* if client is not multihomed, do nothing */
349         ObtainReadLock(&afs_xinterface);
350         if ( afs_cb_interface.numberOfInterfaces <= 1 )
351         {
352                 ReleaseReadLock(&afs_xinterface);
353                 return;
354         }
355         ReleaseReadLock(&afs_xinterface);
356         
357         ObtainWriteLock(&afs_xconn,413);
358         for (tc = sap->conns; tc; tc=tc->next)
359                 tc->forceConnectFS=1;
360         ReleaseWriteLock(&afs_xconn);
361 }