Add opr/lock.h and tidy locking macros
[openafs.git] / src / ubik / beacon.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 <afsconfig.h>
11 #include <afs/param.h>
12
13 #include <roken.h>
14
15 #include <afs/opr.h>
16 #ifdef AFS_PTHREAD_ENV
17 # include <opr/lock.h>
18 #else
19 # include <opr/lockstub.h>
20 #endif
21
22 #include <lock.h>
23 #include <rx/rx.h>
24 #include <rx/rxkad.h>
25 #include <rx/rx_multi.h>
26 #include <afs/cellconfig.h>
27 #ifndef AFS_NT40_ENV
28 #include <afs/afsutil.h>
29 #endif
30
31 #define UBIK_INTERNALS
32 #include "ubik.h"
33 #include "ubik_int.h"
34
35 /* These global variables were used to set the function to use to initialise
36  * the client security layer. They are retained for backwards compatiblity with
37  * legacy callers - the ubik_SetClientSecurityProcs() interface should be used
38  * instead
39  */
40 int (*ubik_CRXSecurityProc) (void *rock, struct rx_securityClass **,
41                              afs_int32 *);
42 void *ubik_CRXSecurityRock;
43
44 /*! \name statics used to determine if we're the sync site */
45 static int nServers;            /*!< total number of servers */
46 static char amIMagic = 0;       /*!< is this host the magic host */
47 char amIClone = 0;              /*!< is this a clone which doesn't vote */
48 static char ubik_singleServer = 0;
49 /*\}*/
50 static int (*secLayerProc) (void *rock, struct rx_securityClass **,
51                             afs_int32 *) = NULL;
52 static int (*tokenCheckProc) (void *rock) = NULL;
53 static void * securityRock = NULL;
54
55 afs_int32 ubikSecIndex;
56 struct rx_securityClass *ubikSecClass;
57
58 /* Values protected by the address lock */
59 struct addr_data addr_globals;
60
61 /* Values protected by the beacon lock */
62 struct beacon_data beacon_globals;
63
64 static int ubeacon_InitServerListCommon(afs_uint32 ame,
65                                         struct afsconf_cell *info,
66                                         char clones[],
67                                         afs_uint32 aservers[]);
68 static int verifyInterfaceAddress(afs_uint32 *ame, struct afsconf_cell *info,
69                                   afs_uint32 aservers[]);
70
71 /*! \file
72  * Module responsible for both deciding if we're currently the sync site,
73  * and keeping collecting votes so as to stay sync site.
74  *
75  * The basic module contacts all of the servers it can, trying to get them to vote
76  * for this server for sync site.  The vote request message (called a beacon message)
77  * also specifies until which time this site claims to be the sync site, if at all, thus enabling
78  * receiving sites to know how long the sync site guarantee is made for.
79  *
80  * Each  of these beacon messages is thus both a declaration of how long this site will
81  * remain sync site, and an attempt to extend that time by collecting votes for a later
82  * sync site extension.
83  *
84  * The voting module is responsible for choosing a reasonable time until which it promises
85  * not to vote for someone else.  This parameter (BIG seconds) is not actually passed in
86  * the interface (perhaps it should be?) but is instead a compile time constant that both
87  * sides know about.
88
89  * The beacon and vote modules work intimately together; the vote module decides how long
90  * it should promise the beacon module its vote, and the beacon module takes all of these
91  * votes and decides for how long it is the synchronization site.
92  */
93
94 /*! \brief procedure called from debug rpc call to get this module's state for debugging */
95 void
96 ubeacon_Debug(struct ubik_debug *aparm)
97 {
98     /* fill in beacon's state fields in the ubik_debug structure */
99     aparm->syncSiteUntil = beacon_globals.syncSiteUntil;
100     aparm->nServers = nServers;
101 }
102
103 static int
104 amSyncSite(void) {
105     afs_int32 now;
106     afs_int32 rcode;
107
108     /* special case for fast startup */
109     if (nServers == 1 && !amIClone)
110         return 1;               /* one guy is always the sync site */
111
112     UBIK_BEACON_LOCK;
113     if (beacon_globals.ubik_amSyncSite == 0 || amIClone)
114         rcode = 0;              /* if I don't think I'm the sync site, say so */
115     else {
116         now = FT_ApproxTime();
117         if (beacon_globals.syncSiteUntil <= now) {      /* if my votes have expired, say so */
118             if (beacon_globals.ubik_amSyncSite)
119                 ubik_dprint("Ubik: I am no longer the sync site\n");
120             beacon_globals.ubik_amSyncSite = 0;
121             rcode = 0;
122         } else {
123             rcode = 1;          /* otherwise still have the required votes */
124         }
125     }
126     UBIK_BEACON_UNLOCK;
127     ubik_dprint("beacon: amSyncSite is %d\n", rcode);
128     return rcode;
129 }
130
131 /*!
132  * \brief Procedure that determines whether this site has enough current votes to remain sync site.
133  *
134  * Called from higher-level modules (everything but the vote module).
135  *
136  * If we're the sync site, check that our guarantees, obtained by the ubeacon_Interact()
137  * light-weight process, haven't expired.  We're sync site as long as a majority of the
138  * servers in existence have promised us unexpired guarantees.  The variable #ubik_syncSiteUntil
139  * contains the time at which the latest of the majority of the sync site guarantees expires
140  * (if the variable #ubik_amSyncSite is true)
141  * This module also calls up to the recovery module if it thinks that the recovery module
142  * may have to pick up a new database (which offucr sif [sic] we lose the sync site votes).
143  *
144  * \return 1 if local site is the sync site
145  * \return 0 if sync site is elsewhere
146  */
147 int
148 ubeacon_AmSyncSite(void)
149 {
150     afs_int32 rcode;
151
152     rcode = amSyncSite();
153
154     if (!rcode)
155         urecovery_ResetState();
156
157     return rcode;
158 }
159
160 /*!
161  * \see ubeacon_InitServerListCommon()
162  */
163 int
164 ubeacon_InitServerListByInfo(afs_uint32 ame, struct afsconf_cell *info,
165                              char clones[])
166 {
167     afs_int32 code;
168
169     code = ubeacon_InitServerListCommon(ame, info, clones, 0);
170     return code;
171 }
172
173 /*!
174  * \param ame "address of me"
175  * \param aservers list of other servers
176  *
177  * \see ubeacon_InitServerListCommon()
178  */
179 int
180 ubeacon_InitServerList(afs_uint32 ame, afs_uint32 aservers[])
181 {
182     afs_int32 code;
183
184     code =
185         ubeacon_InitServerListCommon(ame, (struct afsconf_cell *)0, 0,
186                                      aservers);
187     return code;
188 }
189
190 /* Must be called with address lock held */
191 void
192 ubeacon_InitSecurityClass(void)
193 {
194     int i;
195     /* get the security index to use, if we can */
196     if (secLayerProc) {
197         i = (*secLayerProc) (securityRock, &addr_globals.ubikSecClass, &addr_globals.ubikSecIndex);
198     } else if (ubik_CRXSecurityProc) {
199         i = (*ubik_CRXSecurityProc) (ubik_CRXSecurityRock, &addr_globals.ubikSecClass,
200                                      &addr_globals.ubikSecIndex);
201     } else
202         i = 1;
203     if (i) {
204         /* don't have sec module yet */
205         addr_globals.ubikSecIndex = 0;
206         addr_globals.ubikSecClass = rxnull_NewClientSecurityObject();
207     }
208 }
209
210 void
211 ubeacon_ReinitServer(struct ubik_server *ts)
212 {
213     if (tokenCheckProc && !(*tokenCheckProc) (securityRock)) {
214         struct rx_connection *disk_rxcid;
215         struct rx_connection *vote_rxcid;
216         struct rx_connection *tmp;
217         UBIK_ADDR_LOCK;
218         ubeacon_InitSecurityClass();
219         disk_rxcid =
220             rx_NewConnection(rx_HostOf(rx_PeerOf(ts->disk_rxcid)),
221                              ubik_callPortal, DISK_SERVICE_ID,
222                              addr_globals.ubikSecClass, addr_globals.ubikSecIndex);
223         if (disk_rxcid) {
224             tmp = ts->disk_rxcid;
225             ts->disk_rxcid = disk_rxcid;
226             rx_PutConnection(tmp);
227         }
228         vote_rxcid =
229             rx_NewConnection(rx_HostOf(rx_PeerOf(ts->vote_rxcid)),
230                              ubik_callPortal, VOTE_SERVICE_ID,
231                              addr_globals.ubikSecClass, addr_globals.ubikSecIndex);
232         if (vote_rxcid) {
233             tmp = ts->vote_rxcid;
234             ts->vote_rxcid = vote_rxcid;
235             rx_PutConnection(tmp);
236         }
237         UBIK_ADDR_UNLOCK;
238     }
239 }
240
241 /*!
242  * \brief setup server list
243  *
244  * \param ame "address of me"
245  * \param aservers list of other servers
246  *
247  * called only at initialization to set up the list of servers to
248  * contact for votes.  Just creates the server structure.
249  *
250  * The "magic" host is the one with the lowest internet address.  It is
251  * magic because its vote counts epsilon more than the others.  This acts
252  * as a tie-breaker when we have an even number of hosts in the system.
253  * For example, if the "magic" host is up in a 2 site system, then it
254  * is sync site.  Without the magic host hack, if anyone crashed in a 2
255  * site system, we'd be out of business.
256  *
257  * \note There are two connections in every server structure, one for
258  * vote calls (which must always go through quickly) and one for database
259  * operations, which are subject to waiting for locks.  If we used only
260  * one, the votes would sometimes get held up behind database operations,
261  * and the sync site guarantees would timeout even though the host would be
262  * up for communication.
263  *
264  * \see ubeacon_InitServerList(), ubeacon_InitServerListByInfo()
265  */
266 int
267 ubeacon_InitServerListCommon(afs_uint32 ame, struct afsconf_cell *info,
268                              char clones[], afs_uint32 aservers[])
269 {
270     struct ubik_server *ts;
271     afs_int32 me = -1;
272     afs_int32 servAddr;
273     afs_int32 i, code;
274     afs_int32 magicHost;
275     struct ubik_server *magicServer;
276
277     /* verify that the addresses passed in are correct */
278     if ((code = verifyInterfaceAddress(&ame, info, aservers)))
279         return code;
280
281     ubeacon_InitSecurityClass();
282
283     magicHost = ntohl(ame);     /* do comparisons in host order */
284     magicServer = (struct ubik_server *)0;
285
286     if (info) {
287         for (i = 0; i < info->numServers; i++) {
288             if (ntohl((afs_uint32) info->hostAddr[i].sin_addr.s_addr) ==
289                 ntohl((afs_uint32) ame)) {
290                 me = i;
291                 if (clones[i]) {
292                     amIClone = 1;
293                     magicHost = 0;
294                 }
295             }
296         }
297         nServers = 0;
298         for (i = 0; i < info->numServers; i++) {
299             if (i == me)
300                 continue;
301             ts = calloc(1, sizeof(struct ubik_server));
302             ts->next = ubik_servers;
303             ubik_servers = ts;
304             ts->addr[0] = info->hostAddr[i].sin_addr.s_addr;
305             if (clones[i]) {
306                 ts->isClone = 1;
307             } else {
308                 if (!magicHost
309                     || ntohl((afs_uint32) ts->addr[0]) <
310                     (afs_uint32) magicHost) {
311                     magicHost = ntohl(ts->addr[0]);
312                     magicServer = ts;
313                 }
314                 ++nServers;
315             }
316             /* for vote reqs */
317             ts->vote_rxcid =
318                 rx_NewConnection(info->hostAddr[i].sin_addr.s_addr,
319                                  ubik_callPortal, VOTE_SERVICE_ID,
320                                  addr_globals.ubikSecClass, addr_globals.ubikSecIndex);
321             /* for disk reqs */
322             ts->disk_rxcid =
323                 rx_NewConnection(info->hostAddr[i].sin_addr.s_addr,
324                                  ubik_callPortal, DISK_SERVICE_ID,
325                                  addr_globals.ubikSecClass, addr_globals.ubikSecIndex);
326             ts->up = 1;
327         }
328     } else {
329         i = 0;
330         while ((servAddr = *aservers++)) {
331             if (i >= MAXSERVERS)
332                 return UNHOSTS; /* too many hosts */
333             ts = calloc(1, sizeof(struct ubik_server));
334             ts->next = ubik_servers;
335             ubik_servers = ts;
336             ts->addr[0] = servAddr;     /* primary address in  net byte order */
337             ts->vote_rxcid = rx_NewConnection(servAddr, ubik_callPortal, VOTE_SERVICE_ID,
338                         addr_globals.ubikSecClass, addr_globals.ubikSecIndex);  /* for vote reqs */
339             ts->disk_rxcid = rx_NewConnection(servAddr, ubik_callPortal, DISK_SERVICE_ID,
340                         addr_globals.ubikSecClass, addr_globals.ubikSecIndex);  /* for disk reqs */
341             ts->isClone = 0;    /* don't know about clones */
342             ts->up = 1;
343             if (ntohl((afs_uint32) servAddr) < (afs_uint32) magicHost) {
344                 magicHost = ntohl(servAddr);
345                 magicServer = ts;
346             }
347             i++;
348         }
349     }
350     if (magicServer)
351         magicServer->magic = 1; /* remember for when counting votes */
352
353     if (!amIClone && !magicServer)
354         amIMagic = 1;
355     if (info) {
356         if (!amIClone)
357             ++nServers;         /* count this server as well as the remotes */
358     } else
359         nServers = i + 1;       /* count this server as well as the remotes */
360
361     ubik_quorum = (nServers >> 1) + 1;  /* compute the majority figure */
362
363 /* Shoud we set some defaults for RX??
364     r_retryInterval = 2;
365     r_nRetries = (RPCTIMEOUT/r_retryInterval);
366 */
367     if (info) {
368         if (!ubik_servers)      /* special case 1 server */
369             ubik_singleServer = 1;
370         if (nServers == 1 && !amIClone) {
371             beacon_globals.ubik_amSyncSite = 1; /* let's start as sync site */
372             beacon_globals.syncSiteUntil = 0x7fffffff;  /* and be it quite a while */
373         }
374     } else {
375         if (nServers == 1)      /* special case 1 server */
376             ubik_singleServer = 1;
377     }
378
379     if (ubik_singleServer) {
380         if (!beacon_globals.ubik_amSyncSite)
381             ubik_dprint("Ubik: I am the sync site - 1 server\n");
382         beacon_globals.ubik_amSyncSite = 1;
383         beacon_globals.syncSiteUntil = 0x7fffffff;      /* quite a while */
384     }
385     return 0;
386 }
387
388 /*!
389  * \brief main lwp loop for code that sends out beacons.
390  *
391  * This code only runs while we're sync site or we want to be the sync site.
392  * It runs in its very own light-weight process.
393  */
394 void *
395 ubeacon_Interact(void *dummy)
396 {
397     afs_int32 code;
398     struct timeval tt;
399     struct rx_connection *connections[MAXSERVERS];
400     struct ubik_server *servers[MAXSERVERS];
401     afs_int32 i;
402     struct ubik_server *ts;
403     afs_int32 temp, yesVotes, lastWakeupTime, oldestYesVote, syncsite;
404     struct ubik_tid ttid;
405     struct ubik_version tversion;
406     afs_int32 startTime;
407
408     afs_pthread_setname_self("beacon");
409
410     /* loop forever getting votes */
411     lastWakeupTime = 0;         /* keep track of time we last started a vote collection */
412     while (1) {
413
414         /* don't wakeup more than every POLLTIME seconds */
415         temp = (lastWakeupTime + POLLTIME) - FT_ApproxTime();
416         /* don't sleep if last collection phase took too long (probably timed someone out ) */
417         if (temp > 0) {
418             if (temp > POLLTIME)
419                 temp = POLLTIME;
420             tt.tv_sec = temp;
421             tt.tv_usec = 0;
422 #ifdef AFS_PTHREAD_ENV
423             code = select(0, 0, 0, 0, &tt);
424 #else
425             code = IOMGR_Select(0, 0, 0, 0, &tt);
426 #endif
427         } else
428             code = 0;
429
430         lastWakeupTime = FT_ApproxTime();       /* started a new collection phase */
431
432         if (ubik_singleServer)
433             continue;           /* special-case 1 server for speedy startup */
434
435         if (!uvote_ShouldIRun())
436             continue;           /* if voter has heard from a better candidate than us, don't bother running */
437
438         /* otherwise we should run for election, or we're the sync site (and have already won);
439          * send out the beacon packets */
440         /* build list of all up hosts (noticing dead hosts are running again
441          * is a task for the recovery module, not the beacon module), and
442          * prepare to send them an r multi-call containing the beacon message */
443         i = 0;                  /* collect connections */
444         UBIK_BEACON_LOCK;
445         UBIK_ADDR_LOCK;
446         for (ts = ubik_servers; ts; ts = ts->next) {
447             if (ts->up && ts->addr[0] != ubik_host[0]) {
448                 servers[i] = ts;
449                 connections[i++] = ts->vote_rxcid;
450             }
451         }
452         UBIK_ADDR_UNLOCK;
453         UBIK_BEACON_UNLOCK;
454         servers[i] = (struct ubik_server *)0;   /* end of list */
455         /* note that we assume in the vote module that we'll always get at least BIGTIME
456          * seconds of vote from anyone who votes for us, which means we can conservatively
457          * assume we'll be fine until SMALLTIME seconds after we start collecting votes */
458         /* this next is essentially an expansion of rgen's ServBeacon routine */
459
460         UBIK_VERSION_LOCK;
461         ttid.epoch = version_globals.ubik_epochTime;
462         if (ubik_dbase->flags & DBWRITING) {
463             /*
464              * if a write is in progress, we have to send the writeTidCounter
465              * which holds the tid counter of the write transaction , and not
466              * send the tidCounter value which holds the tid counter of the
467              * last transaction.
468              */
469             ttid.counter = ubik_dbase->writeTidCounter;
470         } else
471             ttid.counter = ubik_dbase->tidCounter + 1;
472         tversion.epoch = ubik_dbase->version.epoch;
473         tversion.counter = ubik_dbase->version.counter;
474         UBIK_VERSION_UNLOCK;
475
476         /* now analyze return codes, counting up our votes */
477         yesVotes = 0;           /* count how many to ensure we have quorum */
478         oldestYesVote = 0x7fffffff;     /* time quorum expires */
479         syncsite = amSyncSite();
480         if (!syncsite) {
481             /* Ok to use the DB lock here since we aren't sync site */
482             DBHOLD(ubik_dbase);
483             urecovery_ResetState();
484             DBRELE(ubik_dbase);
485         }
486         startTime = FT_ApproxTime();
487         /*
488          * Don't waste time using mult Rx calls if there are no connections out there
489          */
490         if (i > 0) {
491             char hoststr[16];
492             multi_Rx(connections, i) {
493                 multi_VOTE_Beacon(syncsite, startTime, &tversion,
494                                   &ttid);
495                 temp = FT_ApproxTime(); /* now, more or less */
496                 ts = servers[multi_i];
497                 UBIK_BEACON_LOCK;
498                 ts->lastBeaconSent = temp;
499                 code = multi_error;
500                 /* note that the vote time (the return code) represents the time
501                  * the vote was computed, *not* the time the vote expires.  We compute
502                  * the latter down below if we got enough votes to go with */
503                 if (code > 0) {
504                     if ((code & ~0xff) == ERROR_TABLE_BASE_RXK) {
505                         ubik_dprint("token error %d from host %s\n",
506                                     code, afs_inet_ntoa_r(ts->addr[0], hoststr));
507                         ts->up = 0;
508                         ts->beaconSinceDown = 0;
509                         urecovery_LostServer(ts);
510                     } else {
511                         ts->lastVoteTime = code;
512                         if (code < oldestYesVote)
513                             oldestYesVote = code;
514                         ts->lastVote = 1;
515                         if (!ts->isClone)
516                             yesVotes += 2;
517                         if (ts->magic)
518                             yesVotes++; /* the extra epsilon */
519                         ts->up = 1;     /* server is up (not really necessary: recovery does this for real) */
520                         ts->beaconSinceDown = 1;
521                         ubik_dprint("yes vote from host %s\n",
522                                     afs_inet_ntoa_r(ts->addr[0], hoststr));
523                     }
524                 } else if (code == 0) {
525                     ts->lastVoteTime = temp;
526                     ts->lastVote = 0;
527                     ts->beaconSinceDown = 1;
528                     ubik_dprint("no vote from %s\n",
529                                 afs_inet_ntoa_r(ts->addr[0], hoststr));
530                 } else if (code < 0) {
531                     ts->up = 0;
532                     ts->beaconSinceDown = 0;
533                     urecovery_LostServer(ts);
534                     ubik_dprint("time out from %s\n",
535                                 afs_inet_ntoa_r(ts->addr[0], hoststr));
536                 }
537                 UBIK_BEACON_UNLOCK;
538             }
539             multi_End;
540         }
541         /* now call our own voter module to see if we'll vote for ourself.  Note that
542          * the same restrictions apply for our voting for ourself as for our voting
543          * for anyone else. */
544         i = SVOTE_Beacon((struct rx_call *)0, ubeacon_AmSyncSite(), startTime,
545                          &tversion, &ttid);
546         if (i) {
547             yesVotes += 2;
548             if (amIMagic)
549                 yesVotes++;     /* extra epsilon */
550             if (i < oldestYesVote)
551                 oldestYesVote = i;
552         }
553
554         /* now decide if we have enough votes to become sync site.
555          * Note that we can still get enough votes even if we didn't for ourself. */
556         if (yesVotes > nServers) {      /* yesVotes is bumped by 2 or 3 for each site */
557             UBIK_BEACON_LOCK;
558             if (!beacon_globals.ubik_amSyncSite)
559                 ubik_dprint("Ubik: I am the sync site\n");
560             beacon_globals.ubik_amSyncSite = 1;
561             beacon_globals.syncSiteUntil = oldestYesVote + SMALLTIME;
562 #ifndef AFS_PTHREAD_ENV
563                 /* I did not find a corresponding LWP_WaitProcess(&ubik_amSyncSite) --
564                    this may be a spurious signal call -- sjenkins */
565                 LWP_NoYieldSignal(&beacon_globals.ubik_amSyncSite);
566 #endif
567             UBIK_BEACON_UNLOCK;
568         } else {
569             UBIK_BEACON_LOCK;
570             if (beacon_globals.ubik_amSyncSite)
571                 ubik_dprint("Ubik: I am no longer the sync site\n");
572             beacon_globals.ubik_amSyncSite = 0;
573             UBIK_BEACON_UNLOCK;
574             DBHOLD(ubik_dbase);
575             urecovery_ResetState();     /* tell recovery we're no longer the sync site */
576             DBRELE(ubik_dbase);
577         }
578
579     }                           /* while loop */
580     return NULL;
581 }
582
583 /*!
584  * \brief Verify that a given IP addresses does actually exist on this machine.
585  *
586  * \param ame      the pointer to my IP address specified in the
587  *                 CellServDB file.
588  * \param aservers an array containing IP
589  *                 addresses of remote ubik servers. The array is
590  *                 terminated by a zero address.
591  *
592  * Algorithm     : Verify that my IP addresses \p ame does actually exist
593  *                 on this machine.  If any of my IP addresses are there
594  *                 in the remote server list \p aserver, remove them from
595  *                 this list.  Update global variable \p ubik_host[] with
596  *                 my IP addresses.
597  *
598  * \return 0 on success, non-zero on failure
599  */
600 static int
601 verifyInterfaceAddress(afs_uint32 *ame, struct afsconf_cell *info,
602                        afs_uint32 aservers[]) {
603     afs_uint32 myAddr[UBIK_MAX_INTERFACE_ADDR], *servList, tmpAddr;
604     afs_uint32 myAddr2[UBIK_MAX_INTERFACE_ADDR];
605     char hoststr[16];
606     int tcount, count, found, i, j, totalServers, start, end, usednetfiles =
607         0;
608
609     if (info)
610         totalServers = info->numServers;
611     else {                      /* count the number of servers */
612         for (totalServers = 0, servList = aservers; *servList; servList++)
613             totalServers++;
614     }
615
616     if (AFSDIR_SERVER_NETRESTRICT_FILEPATH || AFSDIR_SERVER_NETINFO_FILEPATH) {
617         /*
618          * Find addresses we are supposed to register as per the netrestrict file
619          * if it exists, else just register all the addresses we find on this
620          * host as returned by rx_getAllAddr (in NBO)
621          */
622         char reason[1024];
623         count = afsconf_ParseNetFiles(myAddr, NULL, NULL,
624                                       UBIK_MAX_INTERFACE_ADDR, reason,
625                                       AFSDIR_SERVER_NETINFO_FILEPATH,
626                                       AFSDIR_SERVER_NETRESTRICT_FILEPATH);
627         if (count < 0) {
628             ubik_print("ubik: Can't register any valid addresses:%s\n",
629                        reason);
630             ubik_print("Aborting..\n");
631             return UBADHOST;
632         }
633         usednetfiles++;
634     } else {
635         /* get all my interface addresses in net byte order */
636         count = rx_getAllAddr(myAddr, UBIK_MAX_INTERFACE_ADDR);
637     }
638
639     if (count <= 0) {           /* no address found */
640         ubik_print("ubik: No network addresses found, aborting..");
641         return UBADHOST;
642     }
643
644     /* verify that the My-address passed in by ubik is correct */
645     for (j = 0, found = 0; j < count; j++) {
646         if (*ame == myAddr[j]) {        /* both in net byte order */
647             found = 1;
648             break;
649         }
650     }
651
652     if (!found) {
653         ubik_print("ubik: primary address %s does not exist\n",
654                    afs_inet_ntoa_r(*ame, hoststr));
655         /* if we had the result of rx_getAllAddr already, avoid subverting
656          * the "is gethostbyname(gethostname()) us" check. If we're
657          * using NetInfo/NetRestrict, we assume they have enough clue
658          * to avoid that big hole in their foot from the loaded gun. */
659         if (usednetfiles) {
660             /* take the address we did get, then see if ame was masked */
661             *ame = myAddr[0];
662             tcount = rx_getAllAddr(myAddr2, UBIK_MAX_INTERFACE_ADDR);
663             if (tcount <= 0) {  /* no address found */
664                 ubik_print("ubik: No network addresses found, aborting..");
665                 return UBADHOST;
666             }
667
668             /* verify that the My-address passed in by ubik is correct */
669             for (j = 0, found = 0; j < tcount; j++) {
670                 if (*ame == myAddr2[j]) {       /* both in net byte order */
671                     found = 1;
672                     break;
673                 }
674             }
675         }
676         if (!found)
677             return UBADHOST;
678     }
679
680     /* if any of my addresses are there in serverList, then
681      ** use that as my primary addresses : the higher level
682      ** application screwed up in dealing with multihomed concepts
683      */
684     for (j = 0, found = 0; j < count; j++) {
685         for (i = 0; i < totalServers; i++) {
686             if (info)
687                 tmpAddr = (afs_uint32) info->hostAddr[i].sin_addr.s_addr;
688             else
689                 tmpAddr = aservers[i];
690             if (myAddr[j] == tmpAddr) {
691                 *ame = tmpAddr;
692                 if (!info)
693                     aservers[i] = 0;
694                 found = 1;
695             }
696         }
697     }
698     if (found)
699         ubik_print("Using %s as my primary address\n", afs_inet_ntoa_r(*ame, hoststr));
700
701     if (!info) {
702         /* get rid of servers which were purged because all
703          ** those interface addresses are myself
704          */
705         for (start = 0, end = totalServers - 1; (start < end); start++, end--) {
706             /* find the first zero entry from the beginning */
707             for (; (start < end) && (aservers[start]); start++);
708
709             /* find the last non-zero entry from the end */
710             for (; (end >= 0) && (!aservers[end]); end--);
711
712             /* if there is nothing more to purge, exit from loop */
713             if (start >= end)
714                 break;
715
716             /* move the entry */
717             aservers[start] = aservers[end];
718             aservers[end] = 0;  /* this entry was moved */
719         }
720     }
721
722     /* update all my addresses in ubik_host in such a way
723      ** that ubik_host[0] has the primary address
724      */
725     ubik_host[0] = *ame;
726     for (j = 0, i = 1; j < count; j++)
727         if (*ame != myAddr[j])
728             ubik_host[i++] = myAddr[j];
729
730     return 0;                   /* return success */
731 }
732
733
734 /*!
735  * \brief Exchange IP address information with remote servers.
736  *
737  * \param ubik_host an array containing all my IP addresses.
738  *
739  * Algorithm     : Do an RPC to all remote ubik servers informing them
740  *                 about my IP addresses. Get their IP addresses and
741  *                 update my linked list of ubik servers \p ubik_servers
742  *
743  * \return 0 on success, non-zero on failure
744  */
745 int
746 ubeacon_updateUbikNetworkAddress(afs_uint32 ubik_host[UBIK_MAX_INTERFACE_ADDR])
747 {
748     int j, count, code = 0;
749     UbikInterfaceAddr inAddr, outAddr;
750     struct rx_connection *conns[MAXSERVERS];
751     struct ubik_server *ts, *server[MAXSERVERS];
752     char buffer[32];
753     char hoststr[16];
754
755     UBIK_ADDR_LOCK;
756     for (count = 0, ts = ubik_servers; ts; count++, ts = ts->next) {
757         conns[count] = ts->disk_rxcid;
758         server[count] = ts;
759     }
760     UBIK_ADDR_UNLOCK;
761
762
763     /* inform all other servers only if there are more than one
764      * database servers in the cell */
765
766     if (count > 0) {
767
768         for (j = 0; j < UBIK_MAX_INTERFACE_ADDR; j++)
769             inAddr.hostAddr[j] = ntohl(ubik_host[j]);
770
771
772         /* do the multi-RX RPC to all other servers */
773         multi_Rx(conns, count) {
774             multi_DISK_UpdateInterfaceAddr(&inAddr, &outAddr);
775             ts = server[multi_i];       /* reply received from this server */
776             if (!multi_error) {
777                 UBIK_ADDR_LOCK;
778                 if (ts->addr[0] != htonl(outAddr.hostAddr[0])) {
779                     code = UBADHOST;
780                     strcpy(buffer, afs_inet_ntoa_r(ts->addr[0], hoststr));
781                     ubik_print("ubik:Two primary addresses for same server \
782                     %s %s\n", buffer,
783                     afs_inet_ntoa_r(htonl(outAddr.hostAddr[0]), hoststr));
784                 } else {
785                     for (j = 1; j < UBIK_MAX_INTERFACE_ADDR; j++)
786                         ts->addr[j] = htonl(outAddr.hostAddr[j]);
787                 }
788                 UBIK_ADDR_UNLOCK;
789             } else if (multi_error == RXGEN_OPCODE) {   /* pre 3.5 remote server */
790                 UBIK_ADDR_LOCK;
791                 ubik_print
792                     ("ubik server %s does not support UpdateInterfaceAddr RPC\n",
793                      afs_inet_ntoa_r(ts->addr[0], hoststr));
794                 UBIK_ADDR_UNLOCK;
795             } else if (multi_error == UBADHOST) {
796                 code = UBADHOST;        /* remote CellServDB inconsistency */
797                 ubik_print("Inconsistent Cell Info on server: ");
798                 UBIK_ADDR_LOCK;
799                 for (j = 0; j < UBIK_MAX_INTERFACE_ADDR && ts->addr[j]; j++)
800                     ubik_print("%s ", afs_inet_ntoa_r(ts->addr[j], hoststr));
801                 UBIK_ADDR_UNLOCK;
802                 ubik_print("\n");
803             } else {
804                 UBIK_BEACON_LOCK;
805                 ts->up = 0;     /* mark the remote server as down */
806                 UBIK_BEACON_UNLOCK;
807             }
808         }
809         multi_End;
810     }
811     return code;
812 }
813
814 void
815 ubik_SetClientSecurityProcs(int (*secproc) (void *,
816                                             struct rx_securityClass **,
817                                             afs_int32 *),
818                             int (*checkproc) (void *),
819                             void *rock)
820 {
821     secLayerProc = secproc;
822     tokenCheckProc = checkproc;
823     securityRock = rock;
824 }