Always verify that the client is fully reachable before talking
[openafs.git] / src / viced / viced.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 /*  viced.c     - File Server main loop                                  */
11 /*                                                                       */
12 /*  Date: 5/1/85                                                         */
13 /*                                                                       */
14 /*  Function    - This routine has the initialization code for           */
15 /*                FileServer II                                          */
16 /*                                                                       */
17 /* ********************************************************************** */
18
19 #include <afsconfig.h>
20 #include <afs/param.h>
21
22 RCSID("$Header$");
23
24 #include <stdio.h>
25 #include <stdlib.h>
26 #include <errno.h>
27 #include <sys/types.h>
28 #include <afs/procmgmt.h>  /* signal(), kill(), wait(), etc. */
29 #include <sys/stat.h>
30 #ifdef AFS_NT40_ENV
31 #include <fcntl.h>
32 #include <io.h>
33 #include <windows.h>
34 #include <WINNT/afsevent.h>
35 #else
36 #include <sys/file.h>
37 #include <netinet/in.h>
38 #include <netdb.h>
39 #include <sys/resource.h>
40 #include <unistd.h>     /* sysconf() */
41 #ifndef ITIMER_REAL
42 #include <sys/time.h>
43 #endif /* ITIMER_REAL */
44 #endif /* AFS_NT40_ENV */
45 #include <afs/stds.h>
46 #undef SHARED
47 #include <rx/xdr.h>
48 #include <afs/nfs.h>
49 #ifdef AFS_PTHREAD_ENV
50 #include <assert.h>
51 #else /* AFS_PTHREAD_ENV */
52 #include <afs/assert.h>
53 #endif /* AFS_PTHREAD_ENV */
54 #include <lwp.h>
55 #include <lock.h>
56 #include <afs/ptclient.h>
57 #include <afs/afsint.h>
58 #include <afs/vldbint.h>
59 #include <afs/errors.h>
60 #include <afs/ihandle.h>
61 #include <afs/vnode.h>
62 #include <afs/volume.h>
63 #include <afs/auth.h>
64 #include <afs/cellconfig.h>
65 #include <afs/acl.h>
66 #include <afs/prs_fs.h>
67 #include <rx/rx.h>
68 #include <rx/rxkad.h>
69 #include <afs/keys.h>
70 #include <afs/afs_args.h>
71 #include <afs/vlserver.h>
72 #include <afs/afsutil.h>
73 #include <afs/fileutil.h>
74 #ifndef AFS_NT40_ENV
75 #include <afs/netutils.h>
76 #endif
77 #include "viced.h"
78 #include "host.h"
79 #if defined(AFS_SGI_ENV)
80 #include "sys/schedctl.h"
81 #include "sys/lock.h"
82 #endif
83 #include <rx/rx_globals.h>
84
85
86 extern int      BreakVolumeCallBacks(), InitCallBack();
87 extern  int     LogLevel, etext;
88 extern afs_int32        BlocksSpare, PctSpare;
89
90 void            ShutDown();
91 static void     ClearXStatValues(), NewParms(), PrintCounters();
92 static void     ResetCheckDescriptors(void), ResetCheckSignal(void);
93 static int      CheckSignal();
94 static int      FiveMinuteCheckLWP(), HostCheckLWP();
95 extern  int     GetKeysFromToken();
96 extern struct rx_securityClass *rxnull_NewServerSecurityObject();
97 extern int RXAFS_ExecuteRequest();
98 extern int RXSTATS_ExecuteRequest();
99
100 int eventlog = 0, rxlog = 0;
101 FILE *debugFile;
102 FILE * console = NULL;
103
104 #ifdef AFS_NT40_ENV
105 #define AFS_QUIETFS_ENV 1
106 #define NT_OPEN_MAX    1024 /* This is an arbitrary no. we came up with for 
107                              * now. We hope this will be replaced by a more
108                              * intelligent estimate later. */
109 #endif
110
111 int     SystemId;               /* ViceID of "Administrators"*/
112 int     SystemAnyUser;          /* Viceid of "System:AnyUser" */
113 prlist  SystemAnyUserCPS;       /* CPS for "system:AnyUser */
114 int     AnonymousID = 0;        /* ViceId of "Anonymous"*/
115 prlist  AnonCPS;                /* CPS for "Anonymous"*/
116
117 struct afsconf_dir *confDir;    /* Configuration dir object */
118
119 int     restartMode = RESTART_ORDINARY;
120
121 int Testing = 0; /* for ListViceInodes */
122
123 /*
124  * Home for the performance statistics.
125  */
126 struct afs_PerfStats afs_perfstats;
127
128 extern  int     LogLevel;
129 extern  int     Statistics;
130
131 int     timeout = 30;
132 int     SawSpare;
133 int     SawPctSpare;
134 int     debuglevel = 0;
135 int     printBanner = 0;
136 int     rxJumbograms = 1; /* default is to send and receive jumbograms. */
137 afs_int32       implicitAdminRights = PRSFS_LOOKUP;     /* The ADMINISTER right is 
138                                                    already implied */
139
140 int     stack = 24;
141 int     stackSize = 24000;
142 int     fiveminutes = 300;              /* 5 minutes.  Change this for debugging only */
143 int     CurrentConnections = 0;
144 int     hostaclRefresh = 7200;          /* refresh host clients' acls every 2 hrs */
145 #if defined(AFS_SGI_ENV)
146 int     SawLock;
147 #endif
148 time_t  StartTime;
149
150 int     rxpackets = 150;        /* 100 */
151 int     nSmallVns = 400;        /* 200 */
152 int     large = 400;            /* 200 */
153 int     volcache = 400;         /* 400 */
154 int     numberofcbs = 60000;    /* 60000 */
155 int     lwps = 9;               /* 6 */
156 int     buffs = 90;             /* 70 */
157 int     novbc = 0;              /* Enable Volume Break calls */
158 int     busy_threshold = 600;
159 int     udpBufSize = 0;         /* UDP buffer size for receive*/
160
161 struct timeval  tp;
162
163 /*
164  * FileServer's name and IP address, both network byte order and
165  * host byte order.
166  */
167 #define ADDRSPERSITE 16     /* Same global is in rx/rx_user.c */
168
169 char FS_HostName[128] = "localhost";
170 afs_uint32 FS_HostAddr_NBO;
171 afs_uint32 FS_HostAddr_HBO;
172 afs_uint32 FS_HostAddrs[ADDRSPERSITE], FS_HostAddr_cnt = 0, FS_registered=0;
173 /* All addresses in FS_HostAddrs are in NBO */
174 afsUUID FS_HostUUID;
175
176 static ParseArgs();
177 static FlagMsg();
178
179 /*
180  * Home for the performance statistics.
181  */
182
183 /* DEBUG HACK */
184 static CheckDescriptors()
185 {
186 #ifndef AFS_NT40_ENV
187     struct stat status;
188     register int tsize = getdtablesize();
189     register int i;
190     for (i = 0; i<tsize; i++) {
191         if (fstat(i, &status) != -1) {
192             printf("%d: dev %x, inode %u, length %u, type/mode %x\n",
193                    i, status.st_dev, status.st_ino,
194                    status.st_size, status.st_mode);
195         }
196     }
197     fflush(stdout);
198     ResetCheckDescriptors();
199 #endif
200 } /*CheckDescriptors*/
201
202
203 #ifdef AFS_PTHREAD_ENV
204 void CheckSignal_Signal(x)       {CheckSignal(0);}
205 void ShutDown_Signal(x)          {ShutDown(0);}
206 void CheckDescriptors_Signal(x)  {CheckDescriptors(0);}
207 #else /* AFS_PTHREAD_ENV */
208 void CheckSignal_Signal(x)       {IOMGR_SoftSig(CheckSignal, 0);}
209 void ShutDown_Signal(x)          {IOMGR_SoftSig(ShutDown, 0);}
210 void CheckDescriptors_Signal(x)  {IOMGR_SoftSig(CheckDescriptors, 0);}
211 #endif /* AFS_PTHREAD_ENV */
212
213 /* check whether caller is authorized to manage RX statistics */
214 int fs_rxstat_userok(call)
215     struct rx_call *call;
216 {
217     return afsconf_SuperUser(confDir, call, (char *)0);
218 }
219
220 static void ResetCheckSignal(void)
221 {
222 #ifdef  AFS_HPUX_ENV
223     signal(SIGPOLL, CheckSignal_Signal);
224 #else
225 #ifdef AFS_NT40_ENV
226     signal(SIGUSR2, CheckSignal_Signal);
227 #else
228     signal(SIGXCPU, CheckSignal_Signal);
229 #endif
230 #endif
231 }
232
233 static void ResetCheckDescriptors(void)
234 {
235 #ifndef AFS_NT40_ENV
236     signal(SIGTERM, CheckDescriptors_Signal);
237 #endif
238 }
239
240
241 /* proc called by rxkad module to get a key */
242 static int get_key(arock, akvno, akey)
243     char *akey;
244     char *arock;
245     register afs_int32 akvno;
246
247 {
248     /* find the key */
249     static struct afsconf_key tkey;
250     register afs_int32 code;
251
252     if (!confDir) {
253         ViceLog(0, ("conf dir not open\n"));
254         return 1;
255     }
256     code = afsconf_GetKey(confDir, akvno, tkey.key);
257     if (code)
258         return code;
259     memcpy(akey, tkey.key, sizeof(tkey.key));
260     return 0;
261
262 } /*get_key*/
263
264 #ifndef AFS_NT40_ENV
265 int viced_syscall(a3, a4, a5)
266 afs_uint32 a3, a4;
267 void * a5;
268 {
269   afs_uint32 rcode;
270   void (*old)();
271         
272 #ifndef AFS_LINUX20_ENV
273   old = (void (*)())signal(SIGSYS, SIG_IGN);    
274 #endif
275   rcode = syscall (AFS_SYSCALL, 28 /* AFSCALL_CALL */, a3, a4, a5);
276 #ifndef AFS_LINUX20_ENV
277   signal(SIGSYS, old);  
278 #endif
279
280   return rcode;
281 }
282 #endif
283
284 #if !defined(AFS_NT40_ENV)
285 #include "AFS_component_version_number.c"
286 #endif /* !AFS_NT40_ENV */
287
288 main(argc, argv)
289     int argc;
290     char * argv[];
291
292 {
293     int     i;
294     afs_int32    code;
295     FILE   *file;
296     char tbuffer[32];
297     struct rx_securityClass *sc[4];
298     struct rx_service *tservice;
299 #ifdef AFS_PTHREAD_ENV
300     pthread_t parentPid, serverPid;
301     pthread_attr_t tattr;
302     AFS_SIGSET_DECL;
303 #else /* AFS_PTHREAD_ENV */
304     PROCESS parentPid, serverPid;
305 #endif /* AFS_PTHREAD_ENV */
306     struct hostent *he;
307     int minVnodesRequired;      /* min size of vnode cache */
308 #ifndef AFS_NT40_ENV
309     struct rlimit rlim;         /* max number of open file descriptors */
310 #endif
311     int curLimit;
312
313 #ifdef  AFS_AIX32_ENV
314     struct sigaction nsa;
315     
316     sigemptyset(&nsa.sa_mask);
317     nsa.sa_handler = SIG_DFL;
318     nsa.sa_flags = SA_FULLDUMP;
319     sigaction(SIGABRT, &nsa, NULL);
320     sigaction(SIGSEGV, &nsa, NULL);
321 #endif
322
323     /* Initialize dirpaths */
324     if (!(initAFSDirPath() & AFSDIR_SERVER_PATHS_OK)) {
325 #ifdef AFS_NT40_ENV
326         ReportErrorEventAlt(AFSEVT_SVR_NO_INSTALL_DIR, 0, argv[0],0);
327 #endif
328         fprintf(stderr,"%s: Unable to obtain AFS server directory.\n", argv[0]);
329         exit(2);
330     }
331
332 #ifndef AFS_QUIETFS_ENV
333     console = fopen("/dev/console","w");
334 #endif
335
336     if(ParseArgs(argc,argv)) {
337         FlagMsg();
338         exit(-1);
339     }
340
341 #ifdef AFS_PTHREAD_ENV
342     assert(pthread_mutex_init(&fileproc_glock_mutex, NULL) == 0);
343 #endif /* AFS_PTHREAD_ENV */
344
345 #ifdef AFS_SGI_VNODE_GLUE
346     if (afs_init_kernel_config(-1) <0) {
347         printf("Can't determine NUMA configuration, not starting fileserver.\n");
348         exit(1);
349     }
350 #endif
351     confDir = afsconf_Open(AFSDIR_SERVER_ETC_DIRPATH);
352     if (!confDir) {
353         fprintf(stderr, "Unable to open config directory %s\n",
354                 AFSDIR_SERVER_ETC_DIRPATH);
355         exit(-1);
356     }
357
358     NewParms(1);
359
360     /* Open FileLog on stdout, stderr, fd 1 and fd2 (for perror), sigh. */
361     OpenLog(AFSDIR_SERVER_FILELOG_FILEPATH);
362     SetupLogSignals(); 
363
364     if (SawSpare && SawPctSpare) {
365         ViceLog(0, ("Both -spare and -pctspare specified, exiting.\n"));
366         exit(-1);
367     }
368
369 #ifdef AFS_SGI_XFS_IOPS_ENV
370     ViceLog(0, ("XFS/EFS File server starting\n"));
371 #else
372     ViceLog(0, ("File server starting\n"));
373 #endif
374
375     /* install signal handlers for controlling the fileserver process */
376     ResetCheckSignal();  /* set CheckSignal_Signal() sig handler */
377     ResetCheckDescriptors();  /* set CheckDescriptors_Signal() sig handler */
378
379 #if defined(AFS_SGI_ENV)
380     /* give this guy a non-degrading priority so help busy servers */
381     schedctl(NDPRI, 0, NDPNORMMAX);
382     if (SawLock)
383         plock(PROCLOCK);
384 #else
385 #ifndef AFS_NT40_ENV
386     nice(-5); /* TODO: */
387 #endif
388 #endif
389     assert(DInit(buffs) == 0);
390  
391 #ifdef AFS_NT40_ENV
392     if (afs_winsockInit()<0) {
393         ReportErrorEventAlt(AFSEVT_SVR_WINSOCK_INIT_FAILED, 0, argv[0], 0);
394         ViceLog(0, ("File server failed to intialize winsock.\n"));
395         exit(1);
396     }
397 #endif
398     CheckAdminName();
399
400     /* if we support more than 16 threads, then we better have the ability 
401     ** to keep open a large number of files simultaneously 
402     */
403 #if     defined(AFS_AIX_ENV) && !defined(AFS_AIX42_ENV)
404     curLimit = OPEN_MAX;        /* for pre AIX 4.2 systems */
405 #elif defined(AFS_NT40_ENV)
406     curLimit = NT_OPEN_MAX;     /* open file descriptor limit on NT */
407 #else
408
409     curLimit = 0;               /* the number of open file descriptors */
410     code     = getrlimit(RLIMIT_NOFILE, &rlim);
411     if (code == 0) {
412         curLimit      = rlim.rlim_cur;
413         rlim.rlim_cur = rlim.rlim_max;
414         code = setrlimit(RLIMIT_NOFILE, &rlim);
415         if ( code == 0 ) 
416             curLimit  = rlim.rlim_max;
417     }
418     if ( code != 0 )
419         ViceLog(0, ("Failed to increase open file limit, using default\n"));
420
421 #endif /* defined(AFS_AIX_ENV) && !defined(AFS_AIX42_ENV) */
422
423     curLimit -= 32;             /* leave a slack of 32 file descriptors */
424     if ( lwps > curLimit ) {
425         if ( curLimit > 0)
426             lwps = curLimit; 
427         else if ( lwps > 16 )
428             lwps = 16;            /* default to a maximum of 16 threads */
429         ViceLog(0, ("The system supports a max of %d open files and we are starting %d threads\n", curLimit, lwps));
430     }
431
432
433 #ifndef AFS_PTHREAD_ENV
434     assert(LWP_InitializeProcessSupport(LWP_MAX_PRIORITY - 2, &parentPid) == LWP_SUCCESS);
435 #endif /* !AFS_PTHREAD_ENV */
436
437     /* Initialize volume support */
438     if (!novbc) {
439         V_BreakVolumeCallbacks = BreakVolumeCallBacks;
440     }
441
442     /* initialize libacl routines */
443     acl_Initialize(ACL_VERSION);
444
445     /* initialize RX support */
446 #ifndef AFS_NT40_ENV
447     rxi_syscallp = viced_syscall;
448 #endif
449     rx_extraPackets = rxpackets;
450     rx_extraQuota = 4;  /* for outgoing prserver calls from R threads */
451     rx_SetBusyThreshold(busy_threshold, VBUSY);
452     rx_SetCallAbortThreshold(10);
453     rx_SetConnAbortThreshold(10);
454     stackSize = lwps * 4000;
455     if (stackSize < 32000)
456         stackSize = 32000;
457     else if (stackSize > 44000)
458         stackSize = 44000;
459 #if    defined(AFS_HPUX_ENV) || defined(AFS_SUN_ENV) || defined(AFS_SGI51_ENV)
460     rx_SetStackSize(1, stackSize);      
461 #endif
462     if ( udpBufSize )
463         rx_SetUdpBufSize(udpBufSize);/* set the UDP buffer size for receive */
464     if (rx_Init((int)htons(7000))<0) {
465         ViceLog(0, ("Cannot initialize RX\n"));
466         exit(1);
467     }
468     if (!rxJumbograms) {
469         /* Don't send and don't allow 3.4 clients to send jumbograms. */
470         rx_SetNoJumbo();
471     }
472     rx_GetIFInfo();
473     rx_SetRxDeadTime(30);
474     sc[0] = rxnull_NewServerSecurityObject();
475     sc[1] = 0; /* rxvab_NewServerSecurityObject(key1, 0) */
476     sc[2] = rxkad_NewServerSecurityObject (rxkad_clear, (char *) 0,
477                                            get_key, (char *) 0);
478     sc[3] = rxkad_NewServerSecurityObject (rxkad_crypt, (char *) 0,
479                                            get_key, (char *) 0);
480     tservice = rx_NewService
481         (/* port */ 0, /* service id */ 1, /*service name */ "AFS",
482          /* security classes */ sc, /* numb sec classes */ 4,
483          RXAFS_ExecuteRequest);
484     if (!tservice) {
485         ViceLog(0, ("Failed to initialize RX, probably two servers running.\n"));
486         exit(-1);
487     }
488     rx_SetDestroyConnProc(tservice, (char (*)()) h_FreeConnection);
489     rx_SetMinProcs(tservice, 3);
490     rx_SetMaxProcs(tservice, lwps);
491     rx_SetCheckReach(tservice, 1);
492
493     tservice = rx_NewService(0,  RX_STATS_SERVICE_ID, "rpcstats", sc, 4, RXSTATS_ExecuteRequest);
494     if (!tservice) {
495         ViceLog(0, ("Failed to initialize rpc stat service.\n"));
496         exit(-1);
497     }
498     rx_SetMinProcs(tservice, 2);
499     rx_SetMaxProcs(tservice, 4);
500
501     /*
502      * Enable RX hot threads, which allows the listener thread to trade
503      * places with an idle thread and moves the context switch from listener
504      * to worker out of the critical path.
505      */
506     rx_EnableHotThread();
507
508     /* Some rx debugging */
509     if (rxlog || eventlog) {
510         debugFile = fopen("rx_dbg", "w");
511         if (rxlog) rx_debugFile = debugFile;
512         if (eventlog) rxevent_debugFile = debugFile;
513     }
514
515     h_InitHostPackage();  /* set up local cellname and realmname */
516     InitCallBack(numberofcbs);
517     ClearXStatValues();
518
519     code = InitVL();
520     if (code) {
521         ViceLog(0,("Fatal error in library initialization, exiting!!\n"));
522         exit(1);
523     }
524
525     code = InitPR();
526     if (code) {
527         ViceLog(0,("Fatal error in protection initialization, exiting!!\n"));
528         exit(1);
529     }
530
531     /* allow super users to manage RX statistics */
532     rx_SetRxStatUserOk(fs_rxstat_userok);
533
534     rx_StartServer(0);  /* now start handling requests */
535
536     /* we ensure that there is enough space in the vnode buffer to satisfy
537     ** requests from all concurrent threads. 
538     ** the maximum number of vnodes used by a single thread at any one time
539     ** is three ( "link" uses three vnodes simultaneously, one vLarge and
540     ** two vSmall for linking files and two vLarge and one vSmall for linking
541     ** files  ) : dhruba 
542     */
543     minVnodesRequired = 2 * lwps + 1;     
544     if ( minVnodesRequired > nSmallVns ) {
545         nSmallVns = minVnodesRequired;
546         ViceLog(0, ("Overriding -s command line parameter with %d\n",
547                     nSmallVns));
548     }
549     if ( minVnodesRequired > large ) {
550         large = minVnodesRequired;
551         ViceLog(0, ("Overriding -l command line parameter with %d\n", large));
552     }
553
554     /* We now do this after getting the listener up and running, so that client
555        connections don't timeout (maybe) if a file server is restarted, since it
556        will be available "real soon now".  Worry about whether we can satisfy the 
557        calls in the volume package itself.
558      */
559     if (VInitVolumePackage(fileServer,large,nSmallVns,0, volcache)) {
560         ViceLog(0, ("Shutting down: errors encountered initializing volume package\n"));
561         VShutdown();
562         exit(1);
563     }
564
565     /*
566      * We are done calling fopen/fdopen. It is safe to use a large
567      * of the file descriptor cache.
568      */
569     ih_UseLargeCache();
570
571 #ifdef AFS_PTHREAD_ENV
572     assert(pthread_attr_init(&tattr) == 0);
573     assert(pthread_attr_setdetachstate(&tattr, PTHREAD_CREATE_DETACHED) == 0);
574     /* Block signals in the threads */
575     AFS_SIGSET_CLEAR();
576     assert(pthread_create(&serverPid, &tattr, (void *)FiveMinuteCheckLWP, &fiveminutes) == 0);
577     assert(pthread_create(&serverPid, &tattr, (void *)HostCheckLWP, &fiveminutes) == 0);
578     AFS_SIGSET_RESTORE();
579 #else /* AFS_PTHREAD_ENV */
580     assert(LWP_CreateProcess(FiveMinuteCheckLWP, stack*1024, LWP_MAX_PRIORITY - 2,
581             &fiveminutes, "FiveMinuteChecks", &serverPid) == LWP_SUCCESS);
582             
583     assert(LWP_CreateProcess(HostCheckLWP, stack*1024, LWP_MAX_PRIORITY - 2,
584             &fiveminutes, "HostCheck", &serverPid) == LWP_SUCCESS);
585 #endif /* AFS_PTHREAD_ENV */
586
587     TM_GetTimeOfDay(&tp, 0);
588
589 #ifndef AFS_QUIETFS_ENV
590     if (console != NULL) {
591         fprintf(console, "File server has started at %s\r",
592                 afs_ctime(&tp.tv_sec, tbuffer, sizeof(tbuffer)));
593     }
594 #endif
595
596     /*
597      * Figure out the FileServer's name and primary address.
598      */
599     ViceLog(0, ("Getting FileServer name...\n"));
600     code = gethostname(FS_HostName, 64);
601     if (code) {
602         ViceLog(0, ("gethostname() failed\n"));
603     }
604     ViceLog(0, ("FileServer host name is '%s'\n", FS_HostName));
605
606     ViceLog(0, ("Getting FileServer address...\n"));
607     he = gethostbyname(FS_HostName);
608     if (!he) {
609         ViceLog(0, ("Can't find address for FileServer '%s'\n", FS_HostName));
610     }
611     else {
612         char hoststr[16];
613         memcpy(&FS_HostAddr_NBO, he->h_addr, 4);
614         afs_inet_ntoa_r(FS_HostAddr_NBO, hoststr);
615         FS_HostAddr_HBO = ntohl(FS_HostAddr_NBO);
616         ViceLog(0,("FileServer %s has address %s (0x%x or 0x%x in host byte order)\n",
617                    FS_HostName, hoststr, FS_HostAddr_NBO, FS_HostAddr_HBO));
618     }
619
620     /* Install handler to catch the shutdown signal */
621     signal(SIGQUIT, ShutDown_Signal); /* bosserver assumes SIGQUIT shutdown */
622
623     ViceLog(0,("File Server started %s",
624                afs_ctime(&tp.tv_sec, tbuffer, sizeof(tbuffer))));
625 #if FS_STATS_DETAILED
626     afs_FullPerfStats.det.epoch.tv_sec = StartTime = tp.tv_sec;
627 #endif
628 #ifdef AFS_PTHREAD_ENV
629     while(1) {
630         sleep(1000); /* long time */
631     }
632 #else /* AFS_PTHREAD_ENV */
633     assert(LWP_WaitProcess(&parentPid) == LWP_SUCCESS);
634 #endif /* AFS_PTHREAD_ENV */
635 }
636
637
638 /* This LWP does things roughly every 5 minutes */
639 static FiveMinuteCheckLWP()
640
641 {
642     static int msg  = 0;
643     char tbuffer[32];
644
645     ViceLog(1, ("Starting five minute check process\n"));
646     while (1) {
647 #ifdef AFS_PTHREAD_ENV
648         sleep(fiveminutes);
649 #else /* AFS_PTHREAD_ENV */
650         IOMGR_Sleep(fiveminutes);
651 #endif /* AFS_PTHREAD_ENV */
652
653         /* close the log so it can be removed */
654         ReOpenLog(AFSDIR_SERVER_FILELOG_FILEPATH); /* don't trunc, just append */
655         ViceLog(2, ("Cleaning up timed out callbacks\n"));
656         if(CleanupTimedOutCallBacks())
657             ViceLog(5,("Timed out callbacks deleted\n"));
658         ViceLog(2, ("Set disk usage statistics\n"));
659         VSetDiskUsage();
660         if (FS_registered == 1) Do_VLRegisterRPC();
661         if(printBanner && (++msg&1)) { /* Every 10 minutes */
662             time_t now = FT_ApproxTime();
663             if (console != NULL) {
664 #ifndef AFS_QUIETFS_ENV
665                 fprintf(console,"File server is running at %s\r",
666                         afs_ctime(&now, tbuffer, sizeof(tbuffer)));
667 #endif /* AFS_QUIETFS_ENV */
668                 ViceLog(2, ("File server is running at %s\n",
669                         afs_ctime(&now, tbuffer, sizeof(tbuffer))));
670             }
671         }
672     }
673 } /*FiveMinuteCheckLWP*/
674
675
676 /* This LWP does host checks every 5 minutes:  it should not be used for
677  * other 5 minute activities because it may be delayed by timeouts when
678  * it probes the workstations
679  */
680 static HostCheckLWP()
681
682 {
683     ViceLog(1, ("Starting Host check process\n"));
684     while(1) {
685 #ifdef AFS_PTHREAD_ENV
686         sleep(fiveminutes);
687 #else /* AFS_PTHREAD_ENV */
688         IOMGR_Sleep(fiveminutes);
689 #endif /* AFS_PTHREAD_ENV */
690         ViceLog(2, ("Checking for dead venii & clients\n"));
691         h_CheckHosts();
692     }
693 } /*HostCheckLWP*/
694
695
696 #define MAXADMINNAME 64
697 char adminName[MAXADMINNAME];
698
699 CheckAdminName()
700
701 {
702     int             fd = 0;
703     struct stat     status;
704     
705     if ((stat("/AdminName", &status)) ||        /* if file does not exist */
706         (status.st_size <= 0) ||                /* or it is too short */
707         (status.st_size >= (MAXADMINNAME)) ||   /* or it is too long */
708         !(fd = open("/AdminName", O_RDONLY, 0))) {      /* or the open fails */
709         strcpy(adminName, "System:Administrators");     /* use the default name */
710     }
711     else {
712         read(fd, adminName, status.st_size);    /* use name from the file */
713     }
714     if (fd)
715         close(fd);      /* close fd if it was opened */
716
717 } /*CheckAdminName*/
718
719
720 /*------------------------------------------------------------------------
721  * PRIVATE ClearXStatValues
722  *
723  * Description:
724  *      Initialize all of the values collected via the xstat
725  *      interface.
726  *
727  * Arguments:
728  *      None.
729  *
730  * Returns:
731  *      Nothing.
732  *
733  * Environment:
734  *      Must be called during File Server initialization.
735  *
736  * Side Effects:
737  *      As advertised.
738  *------------------------------------------------------------------------*/
739
740 static void ClearXStatValues()
741
742 { /*ClearXStatValues*/
743
744     struct fs_stats_opTimingData *opTimeP;      /*Ptr to timing struct*/
745     struct fs_stats_xferData *opXferP;          /*Ptr to xfer struct*/
746     int i;                                      /*Loop counter*/
747
748     /*
749      * Zero all xstat-related structures.
750      */
751     memset((char *)(&afs_perfstats), 0, sizeof(struct afs_PerfStats));
752 #if FS_STATS_DETAILED
753     memset((char *)(&afs_FullPerfStats), 0, sizeof(struct fs_stats_FullPerfStats));
754
755     /*
756      * That's not enough.  We have to set reasonable minima for
757      * time and xfer values in the detailed stats.
758      */
759     opTimeP = &(afs_FullPerfStats.det.rpcOpTimes[0]);
760     for (i = 0; i < FS_STATS_NUM_RPC_OPS; i++, opTimeP++)
761         opTimeP->minTime.tv_sec = 999999;
762
763     opXferP = &(afs_FullPerfStats.det.xferOpTimes[0]);
764     for (i = 0; i < FS_STATS_NUM_XFER_OPS; i++, opXferP++) {
765         opXferP->minTime.tv_sec = 999999;
766         opXferP->minBytes = 999999999;
767     }
768
769     /*
770      * There's more.  We have to set our unique system identifier, as
771      * declared in param.h.  If such a thing is not defined, we bitch
772      * and declare ourselves to be an unknown system type.
773      */
774 #ifdef SYS_NAME_ID
775     afs_perfstats.sysname_ID = SYS_NAME_ID;
776 #else
777 #ifndef AFS_NT40_ENV
778     ViceLog(0, ("Sys name ID constant not defined in param.h!!\n"));
779     ViceLog(0, ("[Choosing ``undefined'' sys name ID.\n"));
780 #endif
781     afs_perfstats.sysname_ID = SYS_NAME_ID_UNDEFINED;
782 #endif /* SYS_NAME_ID */
783 #endif
784
785 } /*ClearXStatValues*/
786
787
788 static void PrintCounters()
789
790 {
791     int dirbuff, dircall, dirio;
792     struct timeval  tpl;
793     int workstations, activeworkstations, delworkstations;
794     int processSize = 0;
795     char tbuffer[32];
796
797     TM_GetTimeOfDay(&tpl, 0);
798     Statistics = 1;
799     ViceLog(0, ("Vice was last started at %s\n",
800                 afs_ctime(&StartTime, tbuffer, sizeof(tbuffer))));
801
802     VPrintCacheStats();
803     VPrintDiskStats();
804     DStat(&dirbuff, &dircall, &dirio);
805     ViceLog(0,("With %d directory buffers; %d reads resulted in %d read I/Os\n",
806             dirbuff, dircall, dirio));
807     rx_PrintStats(stderr);
808     h_PrintStats();
809     PrintCallBackStats();
810 #ifdef AFS_NT40_ENV
811     processSize = -1; /* TODO: */
812 #else
813     processSize = (int)((long) sbrk(0) >> 10);
814 #endif
815     ViceLog(0,("There are %d connections, process size %d\n",  CurrentConnections, processSize));
816     h_GetWorkStats(&workstations, &activeworkstations, &delworkstations,
817          tpl.tv_sec-15*60);
818     ViceLog(0,
819             ("There are %d workstations, %d are active (req in < 15 mins), %d marked \"down\"\n",
820             workstations, activeworkstations, delworkstations));
821     Statistics = 0;
822
823 } /*PrintCounters*/
824
825
826
827 static CheckSignal()
828
829 {
830     if (FS_registered > 0)  {
831         /*
832          * We have proper ip addresses; tell the vlserver what we got; the following
833          * routine will do the proper reporting for us
834          */
835         Do_VLRegisterRPC();
836     }
837     h_DumpHosts();
838     h_PrintClients();
839     DumpCallBackState();
840     PrintCounters();
841     ResetCheckSignal();
842
843 } /*CheckSignal*/
844
845 void ShutDownAndCore(dopanic)
846 int dopanic;
847 {
848     time_t now = time(0);
849     char *tstr;
850     char tbuffer[32];
851
852     ViceLog(0, ("Shutting down file server at %s",
853                 afs_ctime(&now, tbuffer, sizeof(tbuffer))));
854     if (dopanic) 
855         ViceLog(0, ("ABNORMAL SHUTDOWN, see core file.\n"));
856 #ifndef AFS_QUIETFS_ENV
857     if (console != NULL) {
858         fprintf(console,"File server restart/shutdown received at %s\r",
859                 afs_ctime(&now, tbuffer, sizeof(tbuffer)));
860     }
861 #endif
862     DFlush();
863     PrintCounters();
864
865     /* do not allows new reqests to be served from now on, all new requests
866        are returned with an error code of RX_RESTARTING ( transient failure ) */
867     rx_SetRxTranquil();                 /* dhruba */
868     VShutdown();
869
870     if (debugFile) {
871         rx_PrintStats(debugFile);
872         fflush(debugFile);
873     }
874     if (console != NULL) {
875         now = time(0);
876         if (dopanic) {
877 #ifndef AFS_QUIETFS_ENV
878             fprintf(console, "File server has terminated abnormally at %s\r",
879                     afs_ctime(&now, tbuffer, sizeof(tbuffer)));
880 #endif
881             ViceLog(0, ("File server has terminated abnormally at %s\n",
882                 afs_ctime(&now, tbuffer, sizeof(tbuffer))));
883         } else {
884 #ifndef AFS_QUIETFS_ENV
885             fprintf(console, "File server has terminated normally at %s\r",
886                     afs_ctime(&now, tbuffer, sizeof(tbuffer)));
887 #endif
888             ViceLog(0, ("File server has terminated normally at %s\n",
889                 afs_ctime(&now, tbuffer, sizeof(tbuffer))));
890         }
891     }
892
893     exit(0);
894
895 } /*ShutDown*/
896
897 void ShutDown() /* backward compatibility */
898 {
899   ShutDownAndCore(DONTPANIC);
900 }
901
902
903 static FlagMsg()
904
905 {
906     char buffer[1024];
907
908         /* default supports help flag */
909
910     strcpy(buffer, "Usage: fileserver ");
911     strcat(buffer, "[-d <debug level>] ");
912     strcat(buffer, "[-p <number of processes>] ");
913     strcat(buffer, "[-spare <number of spare blocks>] ");
914     strcat(buffer, "[-pctspare <percentage spare>] ");
915     strcat(buffer, "[-b <buffers>] ");
916     strcat(buffer, "[-l <large vnodes>] ");
917     strcat(buffer, "[-s <small vnodes>] ");
918     strcat(buffer, "[-vc <volume cachesize>] ");
919     strcat(buffer, "[-w <call back wait interval>] ");
920     strcat(buffer, "[-cb <number of call backs>] ");
921     strcat(buffer, "[-banner (print banner every 10 minutes)] ");
922     strcat(buffer, "[-novbc (whole volume cbs disabled)] ");
923     strcat(buffer, "[-implicit <admin mode bits: rlidwka>] ");
924     strcat(buffer, "[-hr <number of hours between refreshing the host cps>] ");
925     strcat(buffer, "[-busyat <redirect clients when queue > n>] ");
926     strcat(buffer, "[-rxpck <number of rx extra packets>] ");
927     strcat(buffer, "[-rxdbg (enable rx debugging)] ");
928     strcat(buffer, "[-rxdbge (enable rxevent debugging)] ");
929 #ifdef  AFS_AIX32_ENV
930     strcat(buffer, "[-m <min percentage spare in partition>] ");
931 #endif
932 #if defined(AFS_SGI_ENV)
933     strcat(buffer, "[-lock (keep fileserver from swapping)] ");
934 #endif
935     strcat(buffer, "[-L (large server conf)] ");
936     strcat(buffer, "[-S (small server conf)] ");
937     strcat(buffer, "[-k <stack size>] ");
938     strcat(buffer, "[-realm <Kerberos realm name>] ");
939     strcat(buffer, "[-udpsize <size of socket buffer in bytes>] ");
940 /*   strcat(buffer, "[-enable_peer_stats] "); */
941 /*   strcat(buffer, "[-enable_process_stats] "); */
942     strcat(buffer, "[-help]\n");
943 /*
944     ViceLog(0, ("%s", buffer));
945 */
946
947         printf("%s",buffer);
948         fflush(stdout);
949
950 } /*FlagMsg*/
951
952
953 static afs_int32 ParseRights(arights)
954     char *arights;
955 {
956     afs_int32 mode = 0;
957     int i, len;
958     char tc;
959
960     if (!arights || !strcmp(arights, "")) {
961         printf("Missing list of mode bits on -implicit option\n");
962         return -1;
963     }
964     if (!strcmp(arights, "none"))
965       mode = 0;
966     else if (!strcmp(arights, "read")) 
967       mode = PRSFS_READ | PRSFS_LOOKUP;
968     else if (!strcmp(arights, "write"))
969       mode = PRSFS_READ | PRSFS_LOOKUP | PRSFS_INSERT | 
970              PRSFS_DELETE | PRSFS_WRITE | PRSFS_LOCK;
971     else if (!strcmp(arights, "all"))
972       mode = PRSFS_READ | PRSFS_LOOKUP | PRSFS_INSERT | 
973              PRSFS_DELETE | PRSFS_WRITE | PRSFS_LOCK | PRSFS_ADMINISTER;
974     else {
975         len = strlen(arights);
976         for(i=0;i<len;i++) {
977             tc = *arights++;
978             if (tc == 'r') mode |= PRSFS_READ;
979             else if (tc == 'l') mode |= PRSFS_LOOKUP;
980             else if (tc == 'i') mode |= PRSFS_INSERT;
981             else if (tc == 'd') mode |= PRSFS_DELETE;
982             else if (tc == 'w') mode |= PRSFS_WRITE;
983             else if (tc == 'k') mode |= PRSFS_LOCK;
984             else if (tc == 'a') mode |= PRSFS_ADMINISTER;
985             else if (tc == 'A') mode |= PRSFS_USR0;
986             else if (tc == 'B') mode |= PRSFS_USR1;
987             else if (tc == 'C') mode |= PRSFS_USR2;
988             else if (tc == 'D') mode |= PRSFS_USR3;
989             else if (tc == 'E') mode |= PRSFS_USR4;
990             else if (tc == 'F') mode |= PRSFS_USR5;
991             else if (tc == 'G') mode |= PRSFS_USR6;
992             else if (tc == 'H') mode |= PRSFS_USR7;
993             else {
994                 printf("Illegal -implicit rights character '%c'.\n", tc);
995                 return -1;
996             }
997         }
998     }
999     return mode;
1000 }
1001
1002 /*
1003  * Limit MAX_FILESERVER_THREAD by the system limit on the number of
1004  * pthreads (sysconf(_SC_THREAD_THREADS_MAX)), if applicable and
1005  * available.
1006  *
1007  * AIX:         sysconf() limit is real
1008  * HP-UX:       sysconf() limit is real
1009  * IRIX:        sysconf() limit is apparently NOT real -- too small
1010  * DUX:         sysconf() limit is apparently NOT real -- too big
1011  * Linux:       sysconf() limit is apparently NOT real -- too big
1012  * Solaris:     no sysconf() limit
1013  */
1014 static int
1015 max_fileserver_thread(void)
1016 {
1017 #if defined(AFS_PTHREAD_ENV)
1018 #if defined(AFS_AIX_ENV) || defined(AFS_HPUX_ENV)
1019         long ans;
1020
1021         ans = sysconf(_SC_THREAD_THREADS_MAX);
1022         if (0 < ans && ans < MAX_FILESERVER_THREAD)
1023                 return (int) ans;
1024 #endif
1025 #endif /* defined(AFS_PTHREAD_ENV) */
1026         return MAX_FILESERVER_THREAD;
1027 }
1028
1029 static ParseArgs(argc, argv)
1030     int argc;
1031     char *argv[];
1032
1033 {
1034     int SawL=0, SawS=0, SawVC=0;
1035     int Sawrxpck = 0, Sawsmall=0, Sawlarge=0, Sawcbs=0, Sawlwps=0, Sawbufs=0;
1036     int Sawbusy=0;
1037     int i;
1038     int bufSize = 0;      /* temp variable to read in udp socket buf size*/
1039
1040     for (i = 1; i < argc; i++) {
1041         if (!strcmp(argv[i], "-d")) {
1042             debuglevel = atoi(argv[++i]);
1043             LogLevel = debuglevel;
1044         }
1045         else
1046             if (!strcmp(argv[i], "-banner")) {
1047                 printBanner = 1;
1048         } else
1049             if (!strcmp(argv[i], "-implicit")) {
1050                 implicitAdminRights = ParseRights(argv[++i]);
1051                 if (implicitAdminRights < 0) return implicitAdminRights;
1052         } else
1053             if (!strcmp(argv[i], "-L")) {
1054                 SawL = 1;
1055         } else
1056             if (!strcmp(argv[i], "-S")) {
1057                 SawS = 1;
1058         }
1059         else
1060             if (!strcmp(argv[i], "-p")) {
1061                 int lwps_max = max_fileserver_thread() - FILESERVER_HELPER_THREADS;
1062                 Sawlwps = 1;
1063                 lwps = atoi(argv[++i]);
1064                 if (lwps > lwps_max)
1065                     lwps = lwps_max;
1066                 else if (lwps < 6)
1067                     lwps = 6;
1068             }
1069         else
1070             if (!strcmp(argv[i], "-b")) {
1071                 Sawbufs = 1;
1072                 buffs = atoi(argv[++i]);
1073             }
1074         else
1075             if (!strcmp(argv[i], "-l")) {
1076                 Sawlarge = 1;
1077                 large = atoi(argv[++i]);
1078             }
1079         else
1080             if (!strcmp(argv[i], "-vc")) {
1081                 SawVC = 1;
1082                 volcache = atoi(argv[++i]);
1083             }
1084         else
1085             if (!strcmp(argv[i], "-novbc")) {
1086                 novbc = 1;
1087             }
1088         else
1089             if (!strcmp(argv[i], "-rxpck")) {
1090                 Sawrxpck = 1;
1091                 rxpackets = atoi(argv[++i]);
1092             }
1093         else
1094             if (!strcmp(argv[i], "-s")) {
1095                 Sawsmall = 1;
1096                 nSmallVns = atoi(argv[++i]);
1097             }
1098         else    
1099             if (!strcmp(argv[i], "-k"))
1100                 stack = atoi(argv[++i]);
1101 #if defined(AFS_SGI_ENV)
1102         else
1103             if (!strcmp(argv[i], "-lock")) {
1104                 SawLock = 1;
1105             }
1106 #endif
1107         else
1108             if (!strcmp(argv[i], "-spare")) {
1109                 BlocksSpare = atoi(argv[++i]);
1110                 SawSpare = 1;
1111             }
1112         else
1113             if (!strcmp(argv[i], "-pctspare")) {
1114                 PctSpare = atoi(argv[++i]);
1115                 BlocksSpare = 0;                /* has non-zero default */
1116                 SawPctSpare = 1;
1117             }
1118         else
1119             if (!strcmp(argv[i], "-w"))
1120                 fiveminutes = atoi(argv[++i]);
1121         else
1122             if (!strcmp(argv[i], "-hr")) {
1123                 int hr = atoi(argv[++i]);
1124                 if ((hr < 1) || (hr > 36)) {
1125                     printf("host acl refresh interval of %d hours is invalid; hours must be between 1 and 36\n\n",
1126                            hr);
1127                     return -1;
1128                 }                   
1129                 hostaclRefresh = hr*60*60;
1130         } else
1131             if (!strcmp(argv[i], "-rxdbg"))
1132                 rxlog = 1;
1133         else 
1134             if (!strcmp(argv[i], "-rxdbge"))
1135                 eventlog = 1;
1136         else
1137             if (!strcmp(argv[i], "-cb")) {
1138                 Sawcbs = 1;
1139                 numberofcbs = atoi(argv[++i]);
1140                 if ((numberofcbs < 10000) || (numberofcbs > 65535)) {
1141                     printf("number of cbs %d invalid; must be between 10000 and 65535\n",
1142                            numberofcbs);
1143                     return -1;
1144                 }
1145             }
1146             else
1147               if (!strcmp(argv[i], "-busyat")) {
1148                 Sawbusy = 1;
1149                 busy_threshold = atoi(argv[++i]);
1150                 if (busy_threshold < 10) {
1151                     printf("Busy threshold %d is too low, will compute default.\n",
1152                            busy_threshold);
1153                     Sawbusy = 0;
1154                 }
1155             }
1156 #ifdef  AFS_AIX32_ENV
1157         else
1158             if (!strcmp(argv[i], "-m")) {
1159                 extern int aixlow_water;
1160                  aixlow_water = atoi(argv[++i]);
1161                 if ((aixlow_water < 0) || (aixlow_water > 30)) {
1162                     printf("space reserved %d% invalid; must be between 0-30%\n", aixlow_water);
1163                     return -1;
1164                 }
1165             }
1166 #endif
1167         else
1168             if (!strcmp(argv[i], "-nojumbo")) {
1169                 rxJumbograms = 0;
1170             }
1171         else
1172             if (!strcmp(argv[i], "-realm")) {
1173                 extern char local_realm[AFS_REALM_SZ];
1174                 if (strlen(argv[++i]) >= AFS_REALM_SZ) {
1175                     printf("-realm argument must contain fewer than %d characters.\n",AFS_REALM_SZ);
1176                     return -1;
1177                 }
1178                 strncpy (local_realm, argv[i], AFS_REALM_SZ);
1179             }
1180         else
1181             if ( !strcmp(argv[i], "-udpsize")) {
1182                 if ( (i+1) >= argc ) {
1183                     printf("You have to specify -udpsize <integer value>\n");
1184                     return -1;
1185                 }
1186                 bufSize = atoi(argv[++i]);
1187                 if ( bufSize < rx_GetMinUdpBufSize() )
1188                     printf("Warning:udpsize %d is less than minimum %d; ignoring\n",
1189                                 bufSize, rx_GetMinUdpBufSize() );
1190                 else
1191                     udpBufSize = bufSize;
1192             }
1193         else
1194             if (!strcmp(argv[i], "-enable_peer_stats")) {
1195                 rx_enablePeerRPCStats();
1196             }
1197         else
1198             if (!strcmp(argv[i], "-enable_process_stats")) {
1199                 rx_enableProcessRPCStats();
1200             }
1201 #ifndef AFS_NT40_ENV
1202         else 
1203             if (strcmp(argv[i], "-syslog")==0) {
1204                 /* set syslog logging flag */
1205                 serverLogSyslog = 1;
1206             } 
1207         else 
1208             if (strncmp(argv[i], "-syslog=", 8)==0) {
1209                 serverLogSyslog = 1;
1210                 serverLogSyslogFacility = atoi(argv[i]+8);
1211             }
1212 #endif
1213         else {
1214             return(-1);
1215         }
1216     }
1217     if (SawS && SawL) {
1218         printf("Only one of -L, or -S must be specified\n");
1219         return -1;
1220     }
1221     if (SawS) {
1222         if (!Sawrxpck) rxpackets = 100;
1223         if (!Sawsmall) nSmallVns = 200;
1224         if (!Sawlarge) large = 200;
1225         if (!Sawcbs) numberofcbs = 20000;
1226         if (!Sawlwps) lwps = 6;
1227         if (!Sawbufs) buffs = 70;
1228         if (!SawVC) volcache = 200;
1229     }
1230     if (SawL) {
1231         if (!Sawrxpck) rxpackets = 200;
1232         if (!Sawsmall) nSmallVns = 600;
1233         if (!Sawlarge) large = 600;
1234         if (!Sawcbs) numberofcbs = 64000;
1235         if (!Sawlwps) lwps = 12;
1236         if (!Sawbufs) buffs = 120;
1237         if (!SawVC) volcache = 600;
1238     }
1239     if (!Sawbusy) 
1240         busy_threshold = 3*rxpackets/2;
1241
1242     return(0);
1243
1244 } /*ParseArgs*/
1245
1246
1247 #define MAXPARMS 15
1248
1249 static void NewParms(initializing)
1250     int initializing;
1251
1252 {
1253     static struct stat sbuf;
1254     register int i, fd;
1255     char *parms;
1256     char *argv[MAXPARMS];
1257     register int argc;
1258
1259     if (!(stat("/vice/file/parms",&sbuf))) {
1260         parms = (char *)malloc(sbuf.st_size);
1261         if(parms <= (char *)0) return;
1262         fd = open("parms", O_RDONLY, 0666);
1263         if(fd <= 0) {
1264             ViceLog(0, ("Open for parms failed with errno = %d\n", errno));
1265             return;
1266         }
1267
1268         i = read(fd, parms, sbuf.st_size);
1269         close(fd);
1270         if(i != sbuf.st_size) {
1271             if (i < 0 )
1272                 ViceLog(0, ("Read on parms failed with errno = %d\n", errno));
1273             else
1274                 ViceLog(0,
1275                         ("Read on parms failed; expected %d bytes but read %d\n",
1276                         sbuf.st_size, i));
1277             free(parms);
1278             return;
1279         }
1280
1281         for (i = 0;i < MAXPARMS; argv[i++] = 0 );
1282         
1283         for (argc = i = 0; i < sbuf.st_size; i++) {
1284             if ((*(parms + i) != ' ') && (*(parms + i) != '\n')){
1285                 if(argv[argc] == 0) argv[argc] = (parms+i);
1286             }
1287             else {
1288                 *(parms + i) = '\0';
1289                 if(argv[argc] != 0) {
1290                     if(++argc == MAXPARMS) break;
1291                 }
1292                 while ((*(parms + i + 1) == ' ') || (*(parms + i + 1) == '\n'))
1293                     i++;
1294             }
1295         }
1296         if(ParseArgs(argc, argv) == 0)
1297             ViceLog(0, ("Change parameters to:"));
1298         else
1299             ViceLog(0, ("Invalid parameter in:"));
1300         for(i = 0; i < argc; i++) {
1301             ViceLog(0, (" %s", argv[i]));
1302         }
1303         ViceLog(0,("\n"));
1304         free(parms);
1305     }
1306     else
1307         if(!initializing)
1308             ViceLog(0, ("Received request to change parms but no parms file exists\n"));
1309
1310 } /*NewParms*/
1311
1312
1313 /* Miscellaneous routines */
1314 Die (msg)
1315     char *msg;
1316
1317 {
1318     ViceLog (0,("%s\n", msg));
1319     assert(0);
1320
1321 } /*Die*/
1322
1323
1324 InitPR()
1325
1326 {
1327     register code;
1328
1329     /*
1330      * If this fails, it's because something major is wrong, and is not
1331      * likely to be time dependent.
1332      */
1333     code = pr_Initialize(2, AFSDIR_SERVER_ETC_DIRPATH, 0);
1334     if (code != 0) {
1335         ViceLog(0, ("Couldn't initialize protection library; code=%d.\n", code));
1336         return code; 
1337     }
1338     SystemId = SYSADMINID;
1339     SystemAnyUser = ANYUSERID;
1340     SystemAnyUserCPS.prlist_len = 0;
1341     SystemAnyUserCPS.prlist_val = (afs_int32 *)0;
1342     AnonCPS.prlist_len = 0;
1343     AnonCPS.prlist_val = (afs_int32 *)0;
1344     while (1) {
1345         code = pr_GetCPS(SystemAnyUser, &SystemAnyUserCPS);
1346         if (code != 0) {
1347             ViceLog(0,
1348                     ("Couldn't get CPS for AnyUser, will try again in 30 seconds; code=%d.\n",
1349                     code));
1350             goto sleep;
1351         }
1352         code = pr_GetCPS(ANONYMOUSID,&AnonCPS);
1353         if (code != 0) {
1354             ViceLog(0,("Couldn't get Anonymous CPS, exiting; code=%d.\n", code));
1355             return -1;
1356         }
1357         AnonymousID = ANONYMOUSID;
1358         return 0;
1359 sleep:
1360 #ifdef AFS_PTHREAD_ENV
1361         sleep(30);
1362 #else /* AFS_PTHREAD_ENV */
1363         IOMGR_Sleep(30);
1364 #endif /* AFS_PTHREAD_ENV */
1365     }
1366 } /*InitPR*/
1367
1368 struct rx_connection *serverconns[MAXSERVERS];
1369 struct ubik_client *cstruct;
1370 afs_int32 vl_Initialize(confDir)
1371 char *confDir;
1372 {   afs_int32 code, scIndex = 0, i;
1373     struct afsconf_dir *tdir;
1374     struct rx_securityClass *sc;
1375     struct afsconf_cell info;
1376
1377     tdir = afsconf_Open(confDir);
1378     if (!tdir) {
1379         ViceLog(0, ("Could not open configuration directory (%s).\n", confDir));
1380         exit(1);
1381     }
1382     code = afsconf_ClientAuth(tdir, &sc, &scIndex);
1383     if (code) {
1384         ViceLog(0, ("Could not get security object for localAuth\n"));
1385         exit(1);
1386     }
1387     code = afsconf_GetCellInfo(tdir,(char *)0, AFSCONF_VLDBSERVICE, &info);
1388     if (info.numServers > MAXSERVERS) {
1389         ViceLog(0, ("vl_Initialize: info.numServers=%d (> MAXSERVERS=%d)\n",info.numServers, MAXSERVERS));
1390         exit(1);
1391     }
1392     for (i = 0;i<info.numServers;i++) 
1393         serverconns[i] = rx_NewConnection(info.hostAddr[i].sin_addr.s_addr, info.hostAddr[i].sin_port,
1394                                           USER_SERVICE_ID, sc, scIndex);
1395     code = ubik_ClientInit(serverconns, &cstruct);
1396     if (code) {
1397         ViceLog(0, ("vl_Initialize: ubik client init failed.\n"));
1398         return code;
1399     }
1400     return 0;
1401 }
1402
1403 #define SYSIDMAGIC      0x88aabbcc
1404 #define SYSIDVERSION    1
1405
1406 ReadSysIdFile() {
1407     afs_int32 fd, nentries, i;
1408     struct versionStamp vsn;
1409     struct stat     status;
1410     afsUUID uuid;
1411
1412     if ((stat(AFSDIR_SERVER_SYSID_FILEPATH, &status)) || (status.st_size <= 0)) {
1413         ViceLog(0, ("%s: doesn't exist\n", AFSDIR_SERVER_SYSID_FILEPATH));
1414         return ENOENT;
1415     }
1416     if (!(fd = open(AFSDIR_SERVER_SYSID_FILEPATH, O_RDONLY, 0))) {
1417         ViceLog(0, ("%s: can't open (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1418         return EIO;
1419     }
1420     if ((i = read(fd, (char *)&vsn, sizeof(vsn))) != sizeof(vsn)) {
1421         ViceLog(0, ("%s: Read failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1422         return EIO;
1423     }
1424     if (vsn.magic != SYSIDMAGIC) {
1425         ViceLog(0, ("%s: wrong magic %x (we support %x)\n", AFSDIR_SERVER_SYSID_FILEPATH, vsn.magic, SYSIDMAGIC));
1426         return EIO;
1427     }
1428     if (vsn.version != SYSIDVERSION) {
1429         ViceLog(0, ("%s: wrong version %d (we support %d)\n", AFSDIR_SERVER_SYSID_FILEPATH, vsn.version, SYSIDVERSION));
1430         return EIO;
1431     }
1432     if ((i = read(fd, (char *)&uuid, sizeof(struct afsUUID))) != sizeof(struct afsUUID)) {
1433         ViceLog(0, ("%s: read of uuid failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1434         return EIO;
1435     }
1436     afs_ntohuuid(&uuid);
1437     FS_HostUUID = uuid;
1438     if ((i = read(fd, (char *)&nentries, sizeof(afs_int32))) != sizeof(afs_int32)) {
1439         ViceLog(0, ("%s: Read of entries failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1440         return EIO;
1441     }
1442     if (nentries <= 0 || nentries > ADDRSPERSITE) {
1443         ViceLog(0, ("%s: invalid num of interfaces: %d\n", AFSDIR_SERVER_SYSID_FILEPATH, nentries));
1444         return EIO;
1445     }
1446     FS_HostAddr_cnt = nentries;
1447     for (i = 0; i < nentries; i++) {
1448         if (read(fd, (char *)&FS_HostAddrs[i], sizeof(afs_int32)) != sizeof(afs_int32)) {       
1449             ViceLog(0, ("%s: Read of addresses failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1450             FS_HostAddr_cnt = 0;        /* reset it */
1451             return EIO;
1452         }
1453     }
1454     close(fd);
1455     return 0;
1456 }
1457
1458 WriteSysIdFile() {
1459     afs_int32 fd, nentries, i;
1460     struct versionStamp vsn;
1461     struct stat     status;
1462     afsUUID uuid;
1463     
1464     if (!stat(AFSDIR_SERVER_SYSID_FILEPATH, &status)) {
1465         /*
1466          * File exists; keep the old one around
1467          */
1468         renamefile(AFSDIR_SERVER_SYSID_FILEPATH, AFSDIR_SERVER_OLDSYSID_FILEPATH);      
1469     }
1470     fd = open(AFSDIR_SERVER_SYSID_FILEPATH, O_WRONLY|O_TRUNC|O_CREAT, 0666);
1471     if (fd < 1) {
1472         ViceLog(0, ("%s: can't create (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1473         return EIO;
1474     }
1475     vsn.magic = SYSIDMAGIC;
1476     vsn.version = 1;
1477     if ((i = write(fd, (char *)&vsn, sizeof(vsn))) != sizeof(vsn)) {
1478         ViceLog(0, ("%s: write failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1479         return EIO;
1480     }
1481     uuid = FS_HostUUID;
1482     afs_htonuuid(&uuid);
1483     if ((i = write(fd, (char *)&uuid, sizeof(struct afsUUID))) != sizeof(struct afsUUID)) {
1484         ViceLog(0, ("%s: write of uuid failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1485         return EIO;
1486     }
1487     if ((i = write(fd, (char *)&FS_HostAddr_cnt, sizeof(afs_int32))) != sizeof(afs_int32)) {
1488         ViceLog(0, ("%s: write of # of entries failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1489         return EIO;
1490     }
1491     for (i = 0; i < FS_HostAddr_cnt; i++) {
1492         if (write(fd, (char *)&FS_HostAddrs[i], sizeof(afs_int32)) != sizeof(afs_int32)) {      
1493             ViceLog(0, ("%s: write of addresses failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1494             return EIO;
1495         }
1496     }
1497     close(fd);
1498     return 0;
1499 }
1500
1501 /*
1502  * defect 10966 
1503  * This routine sets up the buffers for the VL_RegisterAddrs RPC. All addresses
1504  * in FS_HostAddrs[] are in NBO, while the RPC treats them as a "blob" of data
1505  * and so we need to convert each of them into HBO which is what the extra 
1506  * array called FS_HostAddrs_HBO is used here.
1507  */ 
1508 Do_VLRegisterRPC() {
1509     register int code;
1510     bulkaddrs addrs;
1511     extern int VL_RegisterAddrs();
1512     afs_uint32 FS_HostAddrs_HBO[ADDRSPERSITE];
1513     int i=0;
1514  
1515     for (i=0; i < FS_HostAddr_cnt ; i++) 
1516      FS_HostAddrs_HBO[i]=ntohl(FS_HostAddrs[i]);
1517     addrs.bulkaddrs_len = FS_HostAddr_cnt;
1518     addrs.bulkaddrs_val = (afs_uint32 *)FS_HostAddrs_HBO;
1519     code = ubik_Call(VL_RegisterAddrs, cstruct, 0, &FS_HostUUID, 0, &addrs);
1520     if (code) {
1521        if (code == VL_MULTIPADDR) {
1522           ViceLog(0, ("VL_RegisterAddrs rpc failed; The ethernet address exist on a different server; repair it\n"));
1523           ViceLog(0, ("VL_RegisterAddrs rpc failed; See VLLog for details\n"));
1524           return code;
1525        } else if (code == RXGEN_OPCODE) {
1526           ViceLog(0, ("vlserver doesn't support VL_RegisterAddrs rpc; ignored\n"));
1527           FS_registered = 2;    /* So we don't have to retry in the gc daemon */
1528        } else {
1529           ViceLog(0, ("VL_RegisterAddrs rpc failed; will retry periodically (code=%d, err=%d)\n",
1530                       code, errno));
1531        }
1532     } else {
1533        FS_registered = 2;       /* So we don't have to retry in the gc daemon */
1534        WriteSysIdFile();
1535     }
1536
1537     return 0;
1538 }
1539
1540 AddrsEqual(cnt, addr1, addr2) 
1541     int cnt;
1542     afs_int32 *addr1, *addr2; 
1543 {
1544     register int i, j;
1545
1546     for (i = 0; i < cnt; i++) {
1547         for (j = 0; j < cnt; j++) {
1548             if (addr1[i] == addr2[j]) break;
1549         }
1550         if (j == cnt) return 0;
1551     }
1552     return 1;
1553 }
1554
1555 InitVL() {
1556     int (*old)();
1557     afs_int32 code;
1558     afs_int32 cnt, i;
1559     extern int rxi_numNetAddrs;
1560     extern afs_uint32 rxi_NetAddrs[];
1561
1562     /*
1563      * If this fails, it's because something major is wrong, and is not
1564      * likely to be time dependent.
1565      */
1566     code = vl_Initialize(AFSDIR_SERVER_ETC_DIRPATH);
1567     if (code != 0) {
1568         ViceLog(0, ("Couldn't initialize protection library; code=%d.\n", code));
1569         return code;
1570     }
1571
1572     /* Read or create the sysid file and register the fileserver's
1573      * IP addresses with the vlserver.
1574      */
1575     code = ReadSysIdFile();
1576     if (code) {
1577        /* Need to create the file */
1578        ViceLog(0, ("Creating new SysID file\n")); 
1579        if (code = afs_uuid_create(&FS_HostUUID)) {
1580           ViceLog(0, ("Failed to create new uuid: %d\n", code)); 
1581           exit(1);
1582        }
1583     }
1584     /* A good sysid file exists; inform the vlserver. If any conflicts,
1585      * we always use the latest interface available as the real truth.
1586      */
1587 #ifndef AFS_NT40_ENV
1588     if(AFSDIR_SERVER_NETRESTRICT_FILEPATH || AFSDIR_SERVER_NETINFO_FILEPATH) {
1589       /*
1590        * Find addresses we are supposed to register as per the netrestrict 
1591        * and netinfo files (/usr/afs/local/NetInfo and 
1592        * /usr/afs/local/NetRestict)
1593        */
1594       char reason[1024];
1595       afs_int32 code = parseNetFiles(FS_HostAddrs,NULL, NULL,
1596                                  ADDRSPERSITE, reason,
1597                                  AFSDIR_SERVER_NETINFO_FILEPATH,
1598                                  AFSDIR_SERVER_NETRESTRICT_FILEPATH);
1599       if (code < 0) {
1600         ViceLog(0,("Can't register any valid addresses: %s\n",reason));
1601         exit(1);
1602       }
1603       FS_HostAddr_cnt = (afs_uint32) code;
1604     }
1605     else 
1606 #endif
1607     {
1608       FS_HostAddr_cnt = rx_getAllAddr(FS_HostAddrs, ADDRSPERSITE);
1609     }
1610
1611     FS_registered = 1;
1612     code = Do_VLRegisterRPC();
1613     return code;
1614