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