49bc39b11ac301fad74af57f2563e754c1c9a6d1
[openafs.git] / src / bozo / bosserver.c
1 /*
2  * Copyright 2000, International Business Machines Corporation and others.
3  * All Rights Reserved.
4  * 
5  * This software has been released under the terms of the IBM Public
6  * License.  For details, see the LICENSE file in the top-level source
7  * directory or online at http://www.openafs.org/dl/license10.html
8  */
9
10 #include <afsconfig.h>
11 #include <afs/param.h>
12
13 #ifdef IGNORE_SOME_GCC_WARNINGS
14 # pragma GCC diagnostic warning "-Wdeprecated-declarations"
15 #endif
16
17 #include <afs/stds.h>
18 #include <sys/types.h>
19 #include <sys/stat.h>
20 #include <fcntl.h>
21 #include <errno.h>
22 #include <string.h>
23 #include <stdio.h>
24 #include <stdlib.h>
25 #include <stdarg.h>
26 #ifdef AFS_NT40_ENV
27 #include <winsock2.h>
28 #include <direct.h>
29 #include <io.h>
30 #include <WINNT/afsevent.h>
31 #else
32 #include <unistd.h>
33 #include <netinet/in.h>
34 #include <syslog.h>
35 #endif /* AFS_NT40_ENV */
36 #include <afs/cellconfig.h>
37 #include <rx/rx.h>
38 #include <rx/xdr.h>
39 #include <rx/rx_globals.h>
40 #include "bosint.h"
41 #include "bnode.h"
42 #include "bosprototypes.h"
43 #include <rx/rxkad.h>
44 #include <rx/rxstat.h>
45 #include <afs/keys.h>
46 #include <afs/ktime.h>
47 #include <afs/afsutil.h>
48 #include <afs/fileutil.h>
49 #include <afs/procmgmt.h>       /* signal(), kill(), wait(), etc. */
50 #include <afs/audit.h>
51 #include <afs/cellconfig.h>
52 #if defined(AFS_SGI_ENV)
53 #include <afs/afs_args.h>
54 #endif
55
56 #define BOZO_LWP_STACKSIZE      16000
57 extern struct bnode_ops fsbnode_ops, dafsbnode_ops, ezbnode_ops, cronbnode_ops;
58
59 struct afsconf_dir *bozo_confdir = 0;   /* bozo configuration dir */
60 static PROCESS bozo_pid;
61 struct rx_securityClass *bozo_rxsc[3];
62 const char *bozo_fileName;
63 FILE *bozo_logFile;
64
65 int DoLogging = 0;
66 int DoSyslog = 0;
67 #ifndef AFS_NT40_ENV
68 int DoSyslogFacility = LOG_DAEMON;
69 #endif
70 static afs_int32 nextRestart;
71 static afs_int32 nextDay;
72
73 struct ktime bozo_nextRestartKT, bozo_nextDayKT;
74 int bozo_newKTs;
75 int rxBind = 0;
76 int rxkadDisableDotCheck = 0;
77
78 #define ADDRSPERSITE 16         /* Same global is in rx/rx_user.c */
79 afs_uint32 SHostAddrs[ADDRSPERSITE];
80
81 int bozo_isrestricted = 0;
82 int bozo_restdisable = 0;
83
84 void
85 bozo_insecureme(int sig)
86 {
87     signal(SIGFPE, bozo_insecureme);
88     bozo_isrestricted = 0;
89     bozo_restdisable = 1;
90 }
91
92 struct bztemp {
93     FILE *file;
94 };
95
96 /* check whether caller is authorized to manage RX statistics */
97 int
98 bozo_rxstat_userok(struct rx_call *call)
99 {
100     return afsconf_SuperUser(bozo_confdir, call, NULL);
101 }
102
103 /* restart bozo process */
104 int
105 bozo_ReBozo(void)
106 {
107 #ifdef AFS_NT40_ENV
108     /* exit with restart code; SCM integrator process will restart bosserver */
109     int status = BOSEXIT_RESTART;
110
111     /* if noauth flag is set, pass "-noauth" to new bosserver */
112     if (afsconf_GetNoAuthFlag(bozo_confdir)) {
113         status |= BOSEXIT_NOAUTH_FLAG;
114     }
115     /* if logging is on, pass "-log" to new bosserver */
116     if (DoLogging) {
117         status |= BOSEXIT_LOGGING_FLAG;
118     }
119     exit(status);
120 #else
121     /* exec new bosserver process */
122     char *argv[4];
123     int i = 0;
124
125     argv[i] = (char *)AFSDIR_SERVER_BOSVR_FILEPATH;
126     i++;
127
128     /* if noauth flag is set, pass "-noauth" to new bosserver */
129     if (afsconf_GetNoAuthFlag(bozo_confdir)) {
130         argv[i] = "-noauth";
131         i++;
132     }
133     /* if logging is on, pass "-log" to new bosserver */
134     if (DoLogging) {
135         argv[i] = "-log";
136         i++;
137     }
138 #ifndef AFS_NT40_ENV
139     /* if syslog logging is on, pass "-syslog" to new bosserver */
140     if (DoSyslog) {
141         char *arg = (char *)malloc(40); /* enough for -syslog=# */
142         if (DoSyslogFacility != LOG_DAEMON) {
143             snprintf(arg, 40, "-syslog=%d", DoSyslogFacility);
144         } else {
145             strcpy(arg, "-syslog");
146         }
147         argv[i] = arg;
148         i++;
149     }
150 #endif
151
152     /* null-terminate argument list */
153     argv[i] = NULL;
154
155     /* close random fd's */
156     for (i = 3; i < 64; i++) {
157         close(i);
158     }
159
160     execv(argv[0], argv);       /* should not return */
161     _exit(1);
162 #endif /* AFS_NT40_ENV */
163 }
164
165 /* make sure a dir exists */
166 static int
167 MakeDir(const char *adir)
168 {
169     struct stat tstat;
170     register afs_int32 code;
171     if (stat(adir, &tstat) < 0 || (tstat.st_mode & S_IFMT) != S_IFDIR) {
172         int reqPerm;
173         unlink(adir);
174         reqPerm = GetRequiredDirPerm(adir);
175         if (reqPerm == -1)
176             reqPerm = 0777;
177 #ifdef AFS_NT40_ENV
178         /* underlying filesystem may not support directory protection */
179         code = mkdir(adir);
180 #else
181         code = mkdir(adir, reqPerm);
182 #endif
183         return code;
184     }
185     return 0;
186 }
187
188 /* create all the bozo dirs */
189 static int
190 CreateDirs(void)
191 {
192     if ((!strncmp
193          (AFSDIR_USR_DIRPATH, AFSDIR_CLIENT_ETC_DIRPATH,
194           strlen(AFSDIR_USR_DIRPATH)))
195         ||
196         (!strncmp
197          (AFSDIR_USR_DIRPATH, AFSDIR_SERVER_BIN_DIRPATH,
198           strlen(AFSDIR_USR_DIRPATH)))) {
199         MakeDir(AFSDIR_USR_DIRPATH);
200     }
201     if (!strncmp
202         (AFSDIR_SERVER_AFS_DIRPATH, AFSDIR_SERVER_BIN_DIRPATH,
203          strlen(AFSDIR_SERVER_AFS_DIRPATH))) {
204         MakeDir(AFSDIR_SERVER_AFS_DIRPATH);
205     }
206     MakeDir(AFSDIR_SERVER_BIN_DIRPATH);
207     MakeDir(AFSDIR_SERVER_ETC_DIRPATH);
208     MakeDir(AFSDIR_SERVER_LOCAL_DIRPATH);
209     MakeDir(AFSDIR_SERVER_DB_DIRPATH);
210     MakeDir(AFSDIR_SERVER_LOGS_DIRPATH);
211 #ifndef AFS_NT40_ENV
212     if (!strncmp
213         (AFSDIR_CLIENT_VICE_DIRPATH, AFSDIR_CLIENT_ETC_DIRPATH,
214          strlen(AFSDIR_CLIENT_VICE_DIRPATH))) {
215         MakeDir(AFSDIR_CLIENT_VICE_DIRPATH);
216     }
217     MakeDir(AFSDIR_CLIENT_ETC_DIRPATH);
218
219     symlink(AFSDIR_SERVER_THISCELL_FILEPATH, AFSDIR_CLIENT_THISCELL_FILEPATH);
220     symlink(AFSDIR_SERVER_CELLSERVDB_FILEPATH,
221             AFSDIR_CLIENT_CELLSERVDB_FILEPATH);
222 #endif /* AFS_NT40_ENV */
223     return 0;
224 }
225
226 /* strip the \\n from the end of the line, if it is present */
227 static int
228 StripLine(register char *abuffer)
229 {
230     register char *tp;
231
232     tp = abuffer + strlen(abuffer);     /* starts off pointing at the null  */
233     if (tp == abuffer)
234         return 0;               /* null string, no last character to check */
235     tp--;                       /* aim at last character */
236     if (*tp == '\n')
237         *tp = 0;
238     return 0;
239 }
240
241 /* write one bnode's worth of entry into the file */
242 static int
243 bzwrite(register struct bnode *abnode, void *arock)
244 {
245     register struct bztemp *at = (struct bztemp *)arock;
246     register int i;
247     char tbuffer[BOZO_BSSIZE];
248     register afs_int32 code;
249
250     if (abnode->notifier)
251         fprintf(at->file, "bnode %s %s %d %s\n", abnode->type->name,
252                 abnode->name, abnode->fileGoal, abnode->notifier);
253     else
254         fprintf(at->file, "bnode %s %s %d\n", abnode->type->name,
255                 abnode->name, abnode->fileGoal);
256     for (i = 0;; i++) {
257         code = bnode_GetParm(abnode, i, tbuffer, BOZO_BSSIZE);
258         if (code) {
259             if (code != BZDOM)
260                 return code;
261             break;
262         }
263         fprintf(at->file, "parm %s\n", tbuffer);
264     }
265     fprintf(at->file, "end\n");
266     return 0;
267 }
268
269 #define MAXPARMS    20
270 int
271 ReadBozoFile(char *aname)
272 {
273     register FILE *tfile;
274     char tbuffer[BOZO_BSSIZE];
275     register char *tp;
276     char *instp, *typep, *notifier, *notp;
277     register afs_int32 code;
278     afs_int32 ktmask, ktday, kthour, ktmin, ktsec;
279     afs_int32 i, goal;
280     struct bnode *tb;
281     char *parms[MAXPARMS];
282     int rmode;
283
284     /* rename BozoInit to BosServer for the user */
285     if (!aname) {
286         /* if BozoInit exists and BosConfig doesn't, try a rename */
287         if (access(AFSDIR_SERVER_BOZINIT_FILEPATH, 0) == 0
288             && access(AFSDIR_SERVER_BOZCONF_FILEPATH, 0) != 0) {
289             code =
290                 renamefile(AFSDIR_SERVER_BOZINIT_FILEPATH,
291                            AFSDIR_SERVER_BOZCONF_FILEPATH);
292             if (code < 0)
293                 perror("bosconfig rename");
294         }
295         if (access(AFSDIR_SERVER_BOZCONFNEW_FILEPATH, 0) == 0) {
296             code =
297                 renamefile(AFSDIR_SERVER_BOZCONFNEW_FILEPATH,
298                            AFSDIR_SERVER_BOZCONF_FILEPATH);
299             if (code < 0)
300                 perror("bosconfig rename");
301         }
302     }
303
304     /* setup default times we want to do restarts */
305     bozo_nextRestartKT.mask = KTIME_HOUR | KTIME_MIN | KTIME_DAY;
306     bozo_nextRestartKT.hour = 4;        /* 4 am */
307     bozo_nextRestartKT.min = 0;
308     bozo_nextRestartKT.day = 0; /* Sunday */
309     bozo_nextDayKT.mask = KTIME_HOUR | KTIME_MIN;
310     bozo_nextDayKT.hour = 5;
311     bozo_nextDayKT.min = 0;
312
313     for (code = 0; code < MAXPARMS; code++)
314         parms[code] = NULL;
315     instp = typep = notifier = NULL;
316     tfile = (FILE *) 0;
317     if (!aname)
318         aname = (char *)bozo_fileName;
319     tfile = fopen(aname, "r");
320     if (!tfile)
321         return 0;               /* -1 */
322     instp = (char *)malloc(BOZO_BSSIZE);
323     typep = (char *)malloc(BOZO_BSSIZE);
324     notifier = notp = (char *)malloc(BOZO_BSSIZE);
325     while (1) {
326         /* ok, read lines giving parms and such from the file */
327         tp = fgets(tbuffer, sizeof(tbuffer), tfile);
328         if (tp == (char *)0)
329             break;              /* all done */
330
331         if (strncmp(tbuffer, "restarttime", 11) == 0) {
332             code =
333                 sscanf(tbuffer, "restarttime %d %d %d %d %d", &ktmask, &ktday,
334                        &kthour, &ktmin, &ktsec);
335             if (code != 5) {
336                 code = -1;
337                 goto fail;
338             }
339             /* otherwise we've read in the proper ktime structure; now assign
340              * it and continue processing */
341             bozo_nextRestartKT.mask = ktmask;
342             bozo_nextRestartKT.day = ktday;
343             bozo_nextRestartKT.hour = kthour;
344             bozo_nextRestartKT.min = ktmin;
345             bozo_nextRestartKT.sec = ktsec;
346             continue;
347         }
348
349         if (strncmp(tbuffer, "checkbintime", 12) == 0) {
350             code =
351                 sscanf(tbuffer, "checkbintime %d %d %d %d %d", &ktmask,
352                        &ktday, &kthour, &ktmin, &ktsec);
353             if (code != 5) {
354                 code = -1;
355                 goto fail;
356             }
357             /* otherwise we've read in the proper ktime structure; now assign
358              * it and continue processing */
359             bozo_nextDayKT.mask = ktmask;       /* time to restart the system */
360             bozo_nextDayKT.day = ktday;
361             bozo_nextDayKT.hour = kthour;
362             bozo_nextDayKT.min = ktmin;
363             bozo_nextDayKT.sec = ktsec;
364             continue;
365         }
366
367         if (strncmp(tbuffer, "restrictmode", 12) == 0) {
368             code = sscanf(tbuffer, "restrictmode %d", &rmode);
369             if (code != 1) {
370                 code = -1;
371                 goto fail;
372             }
373             if (rmode != 0 && rmode != 1) {
374                 code = -1;
375                 goto fail;
376             }
377             bozo_isrestricted = rmode;
378             continue;
379         }
380
381         if (strncmp("bnode", tbuffer, 5) != 0) {
382             code = -1;
383             goto fail;
384         }
385         notifier = notp;
386         code =
387             sscanf(tbuffer, "bnode %s %s %d %s", typep, instp, &goal,
388                    notifier);
389         if (code < 3) {
390             code = -1;
391             goto fail;
392         } else if (code == 3)
393             notifier = NULL;
394
395         for (i = 0; i < MAXPARMS; i++) {
396             /* now read the parms, until we see an "end" line */
397             tp = fgets(tbuffer, sizeof(tbuffer), tfile);
398             if (!tp) {
399                 code = -1;
400                 goto fail;
401             }
402             StripLine(tbuffer);
403             if (!strncmp(tbuffer, "end", 3))
404                 break;
405             if (strncmp(tbuffer, "parm ", 5)) {
406                 code = -1;
407                 goto fail;      /* no "parm " either */
408             }
409             if (!parms[i])      /* make sure there's space */
410                 parms[i] = (char *)malloc(BOZO_BSSIZE);
411             strcpy(parms[i], tbuffer + 5);      /* remember the parameter for later */
412         }
413
414         /* ok, we have the type and parms, now create the object */
415         code =
416             bnode_Create(typep, instp, &tb, parms[0], parms[1], parms[2],
417                          parms[3], parms[4], notifier,
418                          goal ? BSTAT_NORMAL : BSTAT_SHUTDOWN, 0);
419         if (code)
420             goto fail;
421
422         /* bnode created in 'temporarily shutdown' state;
423          * check to see if we are supposed to run this guy,
424          * and if so, start the process up */
425         if (goal) {
426             bnode_SetStat(tb, BSTAT_NORMAL);    /* set goal, taking effect immediately */
427         } else {
428             bnode_SetStat(tb, BSTAT_SHUTDOWN);
429         }
430     }
431     /* all done */
432     code = 0;
433
434   fail:
435     if (instp)
436         free(instp);
437     if (typep)
438         free(typep);
439     for (i = 0; i < MAXPARMS; i++)
440         if (parms[i])
441             free(parms[i]);
442     if (tfile)
443         fclose(tfile);
444     return code;
445 }
446
447 /* write a new bozo file */
448 int
449 WriteBozoFile(char *aname)
450 {
451     register FILE *tfile;
452     char tbuffer[AFSDIR_PATH_MAX];
453     register afs_int32 code;
454     struct bztemp btemp;
455
456     if (!aname)
457         aname = (char *)bozo_fileName;
458     strcpy(tbuffer, aname);
459     strcat(tbuffer, ".NBZ");
460     tfile = fopen(tbuffer, "w");
461     if (!tfile)
462         return -1;
463     btemp.file = tfile;
464
465     fprintf(tfile, "restrictmode %d\n", bozo_isrestricted);
466     fprintf(tfile, "restarttime %d %d %d %d %d\n", bozo_nextRestartKT.mask,
467             bozo_nextRestartKT.day, bozo_nextRestartKT.hour,
468             bozo_nextRestartKT.min, bozo_nextRestartKT.sec);
469     fprintf(tfile, "checkbintime %d %d %d %d %d\n", bozo_nextDayKT.mask,
470             bozo_nextDayKT.day, bozo_nextDayKT.hour, bozo_nextDayKT.min,
471             bozo_nextDayKT.sec);
472     code = bnode_ApplyInstance(bzwrite, &btemp);
473     if (code || (code = ferror(tfile))) {       /* something went wrong */
474         fclose(tfile);
475         unlink(tbuffer);
476         return code;
477     }
478     /* close the file, check for errors and snap new file into place */
479     if (fclose(tfile) == EOF) {
480         unlink(tbuffer);
481         return -1;
482     }
483     code = renamefile(tbuffer, aname);
484     if (code) {
485         unlink(tbuffer);
486         return -1;
487     }
488     return 0;
489 }
490
491 static int
492 bdrestart(register struct bnode *abnode, void *arock)
493 {
494     register afs_int32 code;
495
496     if (abnode->fileGoal != BSTAT_NORMAL || abnode->goal != BSTAT_NORMAL)
497         return 0;               /* don't restart stopped bnodes */
498     bnode_Hold(abnode);
499     code = bnode_RestartP(abnode);
500     if (code) {
501         /* restart the dude */
502         bnode_SetStat(abnode, BSTAT_SHUTDOWN);
503         bnode_WaitStatus(abnode, BSTAT_SHUTDOWN);
504         bnode_SetStat(abnode, BSTAT_NORMAL);
505     }
506     bnode_Release(abnode);
507     return 0;                   /* keep trying all bnodes */
508 }
509
510 #define BOZO_MINSKIP 3600       /* minimum to advance clock */
511 /* lwp to handle system restarts */
512 static void *
513 BozoDaemon(void *unused)
514 {
515     register afs_int32 now;
516
517     /* now initialize the values */
518     bozo_newKTs = 1;
519     while (1) {
520         IOMGR_Sleep(60);
521         now = FT_ApproxTime();
522
523         if (bozo_restdisable) {
524             bozo_Log("Restricted mode disabled by signal\n");
525             bozo_restdisable = 0;
526         }
527
528         if (bozo_newKTs) {      /* need to recompute restart times */
529             bozo_newKTs = 0;    /* done for a while */
530             nextRestart = ktime_next(&bozo_nextRestartKT, BOZO_MINSKIP);
531             nextDay = ktime_next(&bozo_nextDayKT, BOZO_MINSKIP);
532         }
533
534         /* see if we should do a restart */
535         if (now > nextRestart) {
536             SBOZO_ReBozo(0);    /* doesn't come back */
537         }
538
539         /* see if we should restart a server */
540         if (now > nextDay) {
541             nextDay = ktime_next(&bozo_nextDayKT, BOZO_MINSKIP);
542
543             /* call the bnode restartp function, and restart all that require it */
544             bnode_ApplyInstance(bdrestart, 0);
545         }
546     }
547     return NULL;
548 }
549
550 #ifdef AFS_AIX32_ENV
551 static int
552 tweak_config(void)
553 {
554     FILE *f;
555     char c[80];
556     int s, sb_max, ipfragttl;
557
558     sb_max = 131072;
559     ipfragttl = 20;
560     f = popen("/usr/sbin/no -o sb_max", "r");
561     s = fscanf(f, "sb_max = %d", &sb_max);
562     fclose(f);
563     if (s < 1)
564         return;
565     f = popen("/usr/sbin/no -o ipfragttl", "r");
566     s = fscanf(f, "ipfragttl = %d", &ipfragttl);
567     fclose(f);
568     if (s < 1)
569         ipfragttl = 20;
570
571     if (sb_max < 131072)
572         sb_max = 131072;
573     if (ipfragttl > 20)
574         ipfragttl = 20;
575
576     sprintf(c, "/usr/sbin/no -o sb_max=%d -o ipfragttl=%d", sb_max,
577             ipfragttl);
578     f = popen(c, "r");
579     fclose(f);
580 }
581 #endif
582
583 #if 0
584 /*
585  * This routine causes the calling process to go into the background and
586  * to lose its controlling tty.
587  *
588  * It does not close or otherwise alter the standard file descriptors.
589  *
590  * It writes warning messages to the standard error output if certain
591  * fundamental errors occur.
592  *
593  * This routine requires
594  * 
595  * #include <sys/types.h>
596  * #include <sys/stat.h>
597  * #include <fcntl.h>
598  * #include <unistd.h>
599  * #include <stdlib.h>
600  *
601  * and has been tested on:
602  *
603  * AIX 4.2
604  * Digital Unix 4.0D
605  * HP-UX 11.0
606  * IRIX 6.5
607  * Linux 2.1.125
608  * Solaris 2.5
609  * Solaris 2.6
610  */
611
612 #ifndef AFS_NT40_ENV
613 static void
614 background(void)
615 {
616     /* 
617      * A process is a process group leader if its process ID
618      * (getpid()) and its process group ID (getpgrp()) are the same.
619      */
620
621     /*
622      * To create a new session (and thereby lose our controlling
623      * terminal) we cannot be a process group leader.
624      *
625      * To guarantee we are not a process group leader, we fork and
626      * let the parent process exit.
627      */
628
629     if (getpid() == getpgrp()) {
630         pid_t pid;
631         pid = fork();
632         switch (pid) {
633         case -1:
634             abort();            /* leave footprints */
635             break;
636         case 0:         /* child */
637             break;
638         default:                /* parent */
639             exit(0);
640             break;
641         }
642     }
643
644     /*
645      * By here, we are not a process group leader, so we can make a
646      * new session and become the session leader.
647      */
648
649     {
650         pid_t sid = setsid();
651
652         if (sid == -1) {
653             static char err[] = "bosserver: WARNING: setsid() failed\n";
654             write(STDERR_FILENO, err, sizeof err - 1);
655         }
656     }
657
658     /*
659      * Once we create a new session, the current process is a
660      * session leader without a controlling tty.
661      *
662      * On some systems, the first tty device the session leader
663      * opens automatically becomes the controlling tty for the
664      * session.
665      *
666      * So, to guarantee we do not acquire a controlling tty, we fork
667      * and let the parent process exit.  The child process is not a
668      * session leader, and so it will not acquire a controlling tty
669      * even if it should happen to open a tty device.
670      */
671
672     if (getpid() == getpgrp()) {
673         pid_t pid;
674         pid = fork();
675         switch (pid) {
676         case -1:
677             abort();            /* leave footprints */
678             break;
679         case 0:         /* child */
680             break;
681         default:                /* parent */
682             exit(0);
683             break;
684         }
685     }
686
687     /*
688      * check that we no longer have a controlling tty
689      */
690
691     {
692         int fd;
693
694         fd = open("/dev/tty", O_RDONLY);
695
696         if (fd >= 0) {
697             static char err[] =
698                 "bosserver: WARNING: /dev/tty still attached\n";
699             close(fd);
700             write(STDERR_FILENO, err, sizeof err - 1);
701         }
702     }
703 }
704 #endif /* ! AFS_NT40_ENV */
705 #endif
706
707 /* start a process and monitor it */
708
709 #include "AFS_component_version_number.c"
710
711 int
712 main(int argc, char **argv, char **envp)
713 {
714     struct rx_service *tservice;
715     register afs_int32 code;
716     struct afsconf_dir *tdir;
717     int noAuth = 0;
718     int i;
719     char namebuf[AFSDIR_PATH_MAX];
720     int rxMaxMTU = -1;
721     afs_uint32 host = htonl(INADDR_ANY);
722     char *auditFileName = NULL;
723 #ifndef AFS_NT40_ENV
724     int nofork = 0;
725     struct stat sb;
726 #endif
727 #ifdef  AFS_AIX32_ENV
728     struct sigaction nsa;
729
730     /* for some reason, this permits user-mode RX to run a lot faster.
731      * we do it here in the bosserver, so we don't have to do it 
732      * individually in each server.
733      */
734     tweak_config();
735
736     /*
737      * The following signal action for AIX is necessary so that in case of a 
738      * crash (i.e. core is generated) we can include the user's data section 
739      * in the core dump. Unfortunately, by default, only a partial core is
740      * generated which, in many cases, isn't too useful.
741      */
742     sigemptyset(&nsa.sa_mask);
743     nsa.sa_handler = SIG_DFL;
744     nsa.sa_flags = SA_FULLDUMP;
745     sigaction(SIGSEGV, &nsa, NULL);
746     sigaction(SIGABRT, &nsa, NULL);
747 #endif
748     osi_audit_init();
749     signal(SIGFPE, bozo_insecureme);
750
751 #ifdef AFS_NT40_ENV
752     /* Initialize winsock */
753     if (afs_winsockInit() < 0) {
754         ReportErrorEventAlt(AFSEVT_SVR_WINSOCK_INIT_FAILED, 0, argv[0], 0);
755         fprintf(stderr, "%s: Couldn't initialize winsock.\n", argv[0]);
756         exit(2);
757     }
758 #endif
759
760     /* Initialize dirpaths */
761     if (!(initAFSDirPath() & AFSDIR_SERVER_PATHS_OK)) {
762 #ifdef AFS_NT40_ENV
763         ReportErrorEventAlt(AFSEVT_SVR_NO_INSTALL_DIR, 0, argv[0], 0);
764 #endif
765         fprintf(stderr, "%s: Unable to obtain AFS server directory.\n",
766                 argv[0]);
767         exit(2);
768     }
769
770     /* some path inits */
771     bozo_fileName = AFSDIR_SERVER_BOZCONF_FILEPATH;
772
773     /* initialize the list of dirpaths that the bosserver has
774      * an interest in monitoring */
775     initBosEntryStats();
776
777 #if defined(AFS_SGI_ENV)
778     /* offer some protection if AFS isn't loaded */
779     if (syscall(AFS_SYSCALL, AFSOP_ENDLOG) < 0 && errno == ENOPKG) {
780         printf("bosserver: AFS doesn't appear to be configured in O.S..\n");
781         exit(1);
782     }
783 #endif
784
785     /* parse cmd line */
786     for (code = 1; code < argc; code++) {
787         if (strcmp(argv[code], "-noauth") == 0) {
788             /* set noauth flag */
789             noAuth = 1;
790         } else if (strcmp(argv[code], "-log") == 0) {
791             /* set extra logging flag */
792             DoLogging = 1;
793         }
794 #ifndef AFS_NT40_ENV
795         else if (strcmp(argv[code], "-syslog") == 0) {
796             /* set syslog logging flag */
797             DoSyslog = 1;
798         } else if (strncmp(argv[code], "-syslog=", 8) == 0) {
799             DoSyslog = 1;
800             DoSyslogFacility = atoi(argv[code] + 8);
801         } else if (strcmp(argv[code], "-nofork") == 0) {
802             nofork = 1;
803         }
804 #endif
805         else if (strcmp(argv[code], "-enable_peer_stats") == 0) {
806             rx_enablePeerRPCStats();
807         } else if (strcmp(argv[code], "-enable_process_stats") == 0) {
808             rx_enableProcessRPCStats();
809         }
810         else if (strcmp(argv[code], "-restricted") == 0) {
811             bozo_isrestricted = 1;
812         }
813         else if (strcmp(argv[code], "-rxbind") == 0) {
814             rxBind = 1;
815         }
816         else if (strcmp(argv[code], "-allow-dotted-principals") == 0) {
817             rxkadDisableDotCheck = 1;
818         }
819         else if (!strcmp(argv[code], "-rxmaxmtu")) {
820             if ((code + 1) >= argc) {
821                 fprintf(stderr, "missing argument for -rxmaxmtu\n"); 
822                 exit(1); 
823             }
824             rxMaxMTU = atoi(argv[++code]);
825             if ((rxMaxMTU < RX_MIN_PACKET_SIZE) || 
826                 (rxMaxMTU > RX_MAX_PACKET_DATA_SIZE)) {
827                 printf("rxMaxMTU %d invalid; must be between %d-%" AFS_SIZET_FMT "\n",
828                         rxMaxMTU, RX_MIN_PACKET_SIZE, 
829                         RX_MAX_PACKET_DATA_SIZE);
830                 exit(1);
831             }
832         }
833         else if (strcmp(argv[code], "-auditlog") == 0) {
834             auditFileName = argv[++code];
835
836         } else if (strcmp(argv[code], "-audit-interface") == 0) {
837             char *interface = argv[++code];
838
839             if (osi_audit_interface(interface)) {
840                 printf("Invalid audit interface '%s'\n", interface);
841                 exit(1);
842             }
843         }
844         else {
845
846             /* hack to support help flag */
847
848 #ifndef AFS_NT40_ENV
849             printf("Usage: bosserver [-noauth] [-log] "
850                    "[-auditlog <log path>] "
851                    "[-audit-interafce <file|sysvmq> (default is file)] "
852                    "[-rxmaxmtu <bytes>] [-rxbind] [-allow-dotted-principals]"
853                    "[-syslog[=FACILITY]] "
854                    "[-enable_peer_stats] [-enable_process_stats] "
855                    "[-nofork] " "[-help]\n");
856 #else
857             printf("Usage: bosserver [-noauth] [-log] "
858                    "[-auditlog <log path>] "
859                    "[-audit-interafce <file|sysvmq> (default is file)] "
860                    "[-rxmaxmtu <bytes>] [-rxbind] [-allow-dotted-principals]"
861                    "[-enable_peer_stats] [-enable_process_stats] "
862                    "[-help]\n");
863 #endif
864             fflush(stdout);
865
866             exit(0);
867         }
868     }
869     if (auditFileName) {
870         osi_audit_file(auditFileName);
871     }
872
873 #ifndef AFS_NT40_ENV
874     if (geteuid() != 0) {
875         printf("bosserver: must be run as root.\n");
876         exit(1);
877     }
878 #endif
879
880     code = bnode_Init();
881     if (code) {
882         printf("bosserver: could not init bnode package, code %d\n", code);
883         exit(1);
884     }
885
886     bnode_Register("fs", &fsbnode_ops, 3);
887     bnode_Register("dafs", &dafsbnode_ops, 4);
888     bnode_Register("simple", &ezbnode_ops, 1);
889     bnode_Register("cron", &cronbnode_ops, 2);
890
891     /* create useful dirs */
892     CreateDirs();
893
894     /* chdir to AFS log directory */
895     chdir(AFSDIR_SERVER_LOGS_DIRPATH);
896
897 #if 0
898     fputs(AFS_GOVERNMENT_MESSAGE, stdout);
899     fflush(stdout);
900 #endif
901
902     /* go into the background and remove our controlling tty, close open 
903        file desriptors
904      */
905
906 #ifndef AFS_NT40_ENV
907     if (!nofork)
908         daemon(1, 0);
909 #endif /* ! AFS_NT40_ENV */
910
911     if ((!DoSyslog)
912 #ifndef AFS_NT40_ENV
913         && ((lstat(AFSDIR_BOZLOG_FILE, &sb) == 0) && 
914         !(S_ISFIFO(sb.st_mode)))
915 #endif
916         ) {
917         strcpy(namebuf, AFSDIR_BOZLOG_FILE);
918         strcat(namebuf, ".old");
919         renamefile(AFSDIR_BOZLOG_FILE, namebuf);        /* try rename first */
920         bozo_logFile = fopen(AFSDIR_BOZLOG_FILE, "a");
921         if (!bozo_logFile) {
922             printf("bosserver: can't initialize log file (%s).\n",
923                    AFSDIR_SERVER_BOZLOG_FILEPATH);
924             exit(1);
925         }
926         /* keep log closed normally, so can be removed */
927         fclose(bozo_logFile);
928     } else {
929 #ifndef AFS_NT40_ENV
930         openlog("bosserver", LOG_PID, DoSyslogFacility);
931 #endif
932     }
933
934     /* Write current state of directory permissions to log file */
935     DirAccessOK();
936
937     for (i = 0; i < 10; i++) {
938         code = rx_Init(htons(AFSCONF_NANNYPORT));
939         if (code) {
940             bozo_Log("can't initialize rx: code=%d\n", code);
941             sleep(3);
942         } else
943             break;
944     }
945     if (i >= 10) {
946         bozo_Log("Bos giving up, can't initialize rx\n");
947         exit(code);
948     }
949
950     code = LWP_CreateProcess(BozoDaemon, BOZO_LWP_STACKSIZE, /* priority */ 1,
951                              /* param */ NULL , "bozo-the-clown",
952                              &bozo_pid);
953
954     /* try to read the key from the config file */
955     tdir = afsconf_Open(AFSDIR_SERVER_ETC_DIRPATH);
956     if (!tdir) {
957         /* try to create local cell config file */
958         struct afsconf_cell tcell;
959         strcpy(tcell.name, "localcell");
960         tcell.numServers = 1;
961         code = gethostname(tcell.hostName[0], MAXHOSTCHARS);
962         if (code) {
963             bozo_Log("failed to get hostname, code %d\n", errno);
964             exit(1);
965         }
966         if (tcell.hostName[0][0] == 0) {
967             bozo_Log("host name not set, can't start\n");
968             bozo_Log("try the 'hostname' command\n");
969             exit(1);
970         }
971         memset(tcell.hostAddr, 0, sizeof(tcell.hostAddr));      /* not computed */
972         code =
973             afsconf_SetCellInfo(bozo_confdir, AFSDIR_SERVER_ETC_DIRPATH,
974                                 &tcell);
975         if (code) {
976             bozo_Log
977                 ("could not create cell database in '%s' (code %d), quitting\n",
978                  AFSDIR_SERVER_ETC_DIRPATH, code);
979             exit(1);
980         }
981         tdir = afsconf_Open(AFSDIR_SERVER_ETC_DIRPATH);
982         if (!tdir) {
983             bozo_Log
984                 ("failed to open newly-created cell database, quitting\n");
985             exit(1);
986         }
987     }
988
989     /* read init file, starting up programs */
990     if ((code = ReadBozoFile(0))) {
991         bozo_Log
992             ("bosserver: Something is wrong (%d) with the bos configuration file %s; aborting\n",
993              code, AFSDIR_SERVER_BOZCONF_FILEPATH);
994         exit(code);
995     }
996
997     /* opened the cell databse */
998     bozo_confdir = tdir;
999
1000     /* allow super users to manage RX statistics */
1001     rx_SetRxStatUserOk(bozo_rxstat_userok);
1002
1003     /* have bcrypt key now */
1004
1005     afsconf_SetNoAuthFlag(tdir, noAuth);
1006
1007     bozo_rxsc[0] = rxnull_NewServerSecurityObject();
1008     bozo_rxsc[1] = (struct rx_securityClass *)0;
1009     bozo_rxsc[2] =
1010         rxkad_NewServerSecurityObject(0, tdir, afsconf_GetKey, NULL);
1011
1012     /* Disable jumbograms */
1013     rx_SetNoJumbo();
1014
1015     if (rxMaxMTU != -1) {
1016         rx_SetMaxMTU(rxMaxMTU);
1017     }
1018
1019     if (rxBind) {
1020         afs_int32 ccode;
1021         if (AFSDIR_SERVER_NETRESTRICT_FILEPATH || 
1022             AFSDIR_SERVER_NETINFO_FILEPATH) {
1023             char reason[1024];
1024             ccode = parseNetFiles(SHostAddrs, NULL, NULL,
1025                                            ADDRSPERSITE, reason,
1026                                            AFSDIR_SERVER_NETINFO_FILEPATH,
1027                                            AFSDIR_SERVER_NETRESTRICT_FILEPATH);
1028         } else 
1029         {
1030             ccode = rx_getAllAddr(SHostAddrs, ADDRSPERSITE);
1031         }
1032         if (ccode == 1) 
1033             host = SHostAddrs[0];
1034     }
1035
1036     tservice = rx_NewServiceHost(host,  /* port */ 0, /* service id */ 1,
1037                              /*service name */ "bozo",
1038                              /* security classes */
1039                              bozo_rxsc,
1040                              /* numb sec classes */ 3, BOZO_ExecuteRequest);
1041     rx_SetMinProcs(tservice, 2);
1042     rx_SetMaxProcs(tservice, 4);
1043     rx_SetStackSize(tservice, BOZO_LWP_STACKSIZE);      /* so gethostbyname works (in cell stuff) */
1044     if (rxkadDisableDotCheck) {
1045         rx_SetSecurityConfiguration(tservice, RXS_CONFIG_FLAGS,
1046                                     (void *)RXS_CONFIG_FLAGS_DISABLE_DOTCHECK);
1047     }
1048
1049     tservice =
1050         rx_NewServiceHost(host, 0, RX_STATS_SERVICE_ID, "rpcstats", bozo_rxsc,
1051                           3, RXSTATS_ExecuteRequest);
1052     rx_SetMinProcs(tservice, 2);
1053     rx_SetMaxProcs(tservice, 4);
1054     rx_StartServer(1);          /* donate this process */
1055     return 0;
1056 }
1057
1058 void
1059 bozo_Log(char *format, ...)
1060 {
1061     char tdate[27];
1062     time_t myTime;
1063     va_list ap;
1064
1065     va_start(ap, format);
1066
1067     if (DoSyslog) {
1068 #ifndef AFS_NT40_ENV
1069         vsyslog(LOG_INFO, format, ap);
1070 #endif
1071     } else {
1072         myTime = time(0);
1073         strcpy(tdate, ctime(&myTime));  /* copy out of static area asap */
1074         tdate[24] = ':';
1075
1076         /* log normally closed, so can be removed */
1077
1078         bozo_logFile = fopen(AFSDIR_SERVER_BOZLOG_FILEPATH, "a");
1079         if (bozo_logFile == NULL) {
1080             printf("bosserver: WARNING: problem with %s\n",
1081                    AFSDIR_SERVER_BOZLOG_FILEPATH);
1082             printf("%s ", tdate);
1083             vprintf(format, ap);
1084             fflush(stdout);
1085         } else {
1086             fprintf(bozo_logFile, "%s ", tdate);
1087             vfprintf(bozo_logFile, format, ap);
1088
1089             /* close so rm BosLog works */
1090             fclose(bozo_logFile);
1091         }
1092     }
1093 }