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