2f479210a7bb1f46a7374c3709f1498fe71a4d99
[openafs.git] / src / afsd / afsd.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 /*
11   *         Information Technology Center
12   *         October 1987
13   *
14   * Description:
15   *     The Andrew File System startup process.  It is responsible for
16   * reading and parsing the various configuration files, starting up
17   * the kernel processes required by AFS and feeding the configuration
18   * information to the kernel.
19   *
20   * Recognized flags are:
21   *     -blocks     The number of blocks available in the workstation cache.
22   *     -files      The target number of files in the workstation cache (Default:
23   *                 1000).
24   *     -rootvol            The name of the root volume to use.
25   *     -stat       The number of stat cache entries.
26   *     -hosts      List of servers to check for volume location info FOR THE
27   *                 HOME CELL.
28   *     -memcache   Use an in-memory cache rather than disk.
29   *     -cachedir    The base directory for the workstation cache.
30   *     -mountdir   The directory on which the AFS is to be mounted.
31   *     -confdir    The configuration directory .
32   *     -nosettime  Don't keep checking the time to avoid drift (default).
33   *     -settime    Keep checking the time to avoid drift.
34   *     -verbose     Be chatty.
35   *     -debug     Print out additional debugging info.
36   *     -kerndev    [OBSOLETE] The kernel device for AFS.
37   *     -dontfork   [OBSOLETE] Don't fork off as a new process.
38   *     -daemons   The number of background daemons to start (Default: 2).
39   *     -rmtsys    Also fires up an afs remote sys call (e.g. pioctl, setpag)
40   *                support daemon 
41   *     -chunksize [n]   2^n is the chunksize to be used.  0 is default.
42   *     -dcache    The number of data cache entries.
43   *     -biods     Number of bkg I/O daemons (AIX3.1 only)
44   *     -prealloc  Number of preallocated "small" memory blocks
45   *     -pininodes Number of inodes which can be spared from inode[] for 
46   *                pointing at Vfiles.  If this is set too high, you may have
47   *                system problems, which can only be ameliorated by changing
48   *                NINODE (or equivalent) and rebuilding the kernel.
49   *                This option is now disabled.
50   *     -logfile   Place where to put the logfile (default in <cache>/etc/AFSLog.
51   *     -waitclose make close calls always synchronous (slows em down, tho)
52   *     -files_per_subdir [n]   number of files per cache subdir. (def=2048)
53   *     -shutdown  Shutdown afs daemons
54   *---------------------------------------------------------------------------*/
55
56 #include <afsconfig.h>
57 #include <afs/param.h>
58
59 RCSID
60     ("$Header$");
61
62 #define VFS 1
63
64 #include <afs/cmd.h>
65
66 #include <assert.h>
67 #include <potpourri.h>
68 #include <afs/afsutil.h>
69 #include <stdlib.h>
70 #include <stdio.h>
71 #include <signal.h>
72 #include <string.h>
73 #include <stdlib.h>
74 #include <time.h>
75 #include <sys/types.h>
76 #include <sys/stat.h>
77 #include <sys/file.h>
78 #include <errno.h>
79 #include <sys/time.h>
80 #include <dirent.h>
81
82
83 #ifdef HAVE_SYS_PARAM_H
84 #include <sys/param.h>
85 #endif
86
87 #ifdef HAVE_SYS_FS_TYPES_H
88 #include <sys/fs_types.h>
89 #endif
90
91 #ifdef HAVE_SYS_MOUNT_H
92 #include <sys/mount.h>
93 #endif
94
95 #ifdef HAVE_SYS_FCNTL_H
96 #include <sys/fcntl.h>
97 #endif
98
99 #ifdef HAVE_SYS_MNTTAB_H
100 #include <sys/mnttab.h>
101 #endif
102
103 #ifdef HAVE_SYS_MNTENT_H
104 #include <sys/mntent.h>
105 #endif
106
107 #ifdef HAVE_MNTENT_H
108 #include <mntent.h>
109 #endif
110
111 #ifdef HAVE_SYS_MOUNT_H
112 #include <sys/mount.h>
113 #endif
114
115 #ifdef HAVE_SYS_VFS_H
116 #include <sys/vfs.h>
117 #endif
118
119 #ifdef HAVE_SYS_FSTYP_H
120 #include <sys/fstyp.h>
121 #endif
122
123 #ifdef HAVE_UNISTD_H
124 #include <unistd.h>
125 #endif
126
127 #ifdef HAVE_FCNTL_H
128 #include <fcntl.h>
129 #endif
130
131 #include <netinet/in.h>
132 #include <afs/afs_args.h>
133 #include <afs/cellconfig.h>
134 #include <afs/auth.h>
135 #include <ctype.h>
136 #include <afs/afssyscalls.h>
137 #include <afs/afsutil.h>
138
139 #ifdef AFS_SGI61_ENV
140 #include <unistd.h>
141 #include <libelf.h>
142 #include <dwarf.h>
143 #include <libdwarf.h>
144 void set_staticaddrs(void);
145 #endif /* AFS_SGI61_ENV */
146 #if defined(AFS_SGI62_ENV) && !defined(AFS_SGI65_ENV)
147 #include <sym.h>
148 #include <symconst.h>
149 #endif
150 #ifdef AFS_SGI65_ENV
151 #include <sched.h>
152 #endif
153 #ifdef AFS_LINUX20_ENV
154 #include <sys/resource.h>
155 #endif
156 #ifdef AFS_DARWIN_ENV
157 #include <mach/mach.h>
158 /* Symbols from the DiskArbitration framework */
159 kern_return_t DiskArbStart(mach_port_t *);
160 kern_return_t DiskArbDiskAppearedWithMountpointPing_auto(char *, unsigned int,
161                                                          char *);
162 #define DISK_ARB_NETWORK_DISK_FLAG 8
163 #endif /* AFS_DARWIN_ENV */
164
165 #ifndef MOUNT_AFS
166 #define MOUNT_AFS AFS_MOUNT_AFS
167 #endif /* MOUNT_AFS */
168
169 #if AFS_HAVE_STATVFS
170 #include <sys/statvfs.h>
171 #else
172 #if defined(AFS_SUN_ENV)
173 #include <sys/vfs.h>
174 #else
175 #if !defined(AFS_OSF_ENV) && !defined(AFS_DARWIN_ENV) && !defined(AFS_XBSD_ENV)
176 #include <sys/statfs.h>
177 #endif
178 #endif
179 #endif
180
181
182 #undef  VIRTUE
183 #undef  VICE
184
185
186 #define CACHEINFOFILE   "cacheinfo"
187 #define AFSLOGFILE      "AFSLog"
188 #define DCACHEFILE      "CacheItems"
189 #define VOLINFOFILE     "VolumeItems"
190 #define CELLINFOFILE    "CellItems"
191
192 #define MAXIPADDRS 1024
193
194 char LclCellName[64];
195
196 #define MAX_CACHE_LOOPS 4
197
198
199 /*
200  * Internet address (old style... should be updated).  This was pulled out of the old 4.2
201  * version of <netinet/in.h>, since it's still useful.
202  */
203 struct in_addr_42 {
204     union {
205         struct {
206             u_char s_b1, s_b2, s_b3, s_b4;
207         } S_un_b;
208         struct {
209             u_short s_w1, s_w2;
210         } S_un_w;
211         afs_uint32 S_addr;
212     } S_un;
213 #define s_host  S_un.S_un_b.s_b2        /* host on imp */
214 #define s_net   S_un.S_un_b.s_b1        /* network */
215 #define s_imp   S_un.S_un_w.s_w2        /* imp */
216 #define s_impno S_un.S_un_b.s_b4        /* imp # */
217 #define s_lh    S_un.S_un_b.s_b3        /* logical host */
218 };
219
220 #define mPrintIPAddr(ipaddr)  printf("[%d.%d.%d.%d] ",          \
221       ((struct in_addr_42 *) &(ipaddr))->S_un.S_un_b.s_b1,      \
222       ((struct in_addr_42 *) &(ipaddr))->S_un.S_un_b.s_b2,      \
223       ((struct in_addr_42 *) &(ipaddr))->S_un.S_un_b.s_b3,      \
224       ((struct in_addr_42 *) &(ipaddr))->S_un.S_un_b.s_b4)
225
226 /*
227  * Global configuration variables.
228  */
229 afs_int32 enable_rxbind = 0;
230 afs_int32 afs_shutdown = 0;
231 afs_int32 cacheBlocks;          /*Num blocks in the cache */
232 afs_int32 cacheFiles = 1000;    /*Optimal # of files in workstation cache */
233 afs_int32 rwpct = 0;
234 afs_int32 ropct = 0;
235 afs_int32 cacheStatEntries = 300;       /*Number of stat cache entries */
236 char cacheBaseDir[1024];        /*Where the workstation AFS cache lives */
237 char confDir[1024];             /*Where the workstation AFS configuration lives */
238 char fullpn_DCacheFile[1024];   /*Full pathname of DCACHEFILE */
239 char fullpn_VolInfoFile[1024];  /*Full pathname of VOLINFOFILE */
240 char fullpn_CellInfoFile[1024]; /*Full pathanem of CELLINFOFILE */
241 char fullpn_AFSLogFile[1024];   /*Full pathname of AFSLOGFILE */
242 char fullpn_CacheInfo[1024];    /*Full pathname of CACHEINFO */
243 char fullpn_VFile[1024];        /*Full pathname of data cache files */
244 char *vFilePtr;                 /*Ptr to the number part of above pathname */
245 int sawCacheMountDir = 0;       /* from cmd line */
246 int sawCacheBaseDir = 0;
247 int sawCacheBlocks = 0;
248 int sawDCacheSize = 0;
249 int sawBiod = 0;
250 char cacheMountDir[1024];       /*Mount directory for AFS */
251 char rootVolume[64] = "root.afs";       /*AFS root volume name */
252 afs_int32 cacheSetTime = FALSE; /*Keep checking time to avoid drift? */
253 afs_int32 isHomeCell;           /*Is current cell info for the home cell? */
254 #ifdef AFS_XBSD_ENV
255 int createAndTrunc = O_RDWR | O_CREAT | O_TRUNC;        /*Create & truncate on open */
256 #else
257 int createAndTrunc = O_CREAT | O_TRUNC; /*Create & truncate on open */
258 #endif
259 int ownerRWmode = 0600;         /*Read/write OK by owner */
260 static int filesSet = 0;        /*True if number of files explicitly set */
261 static int nFilesPerDir = 2048; /* # files per cache dir */
262 static int nDaemons = 2;        /* Number of background daemons */
263 static int chunkSize = 0;       /* 2^chunkSize bytes per chunk */
264 static int dCacheSize = 300;    /* # of dcache entries */
265 static int vCacheSize = 50;     /* # of volume cache entries */
266 static int rootVolSet = 0;      /*True if root volume name explicitly set */
267 int addrNum;                    /*Cell server address index being printed */
268 static int cacheFlags = 0;      /*Flags to cache manager */
269 static int nBiods = 5;          /* AIX3.1 only */
270 static int preallocs = 400;     /* Def # of allocated memory blocks */
271 static int enable_peer_stats = 0;       /* enable rx stats */
272 static int enable_process_stats = 0;    /* enable rx stats */
273 #ifdef AFS_AFSDB_ENV
274 static int enable_afsdb = 0;    /* enable AFSDB support */
275 #endif
276 static int enable_dynroot = 0;  /* enable dynroot support */
277 static int enable_fakestat = 0; /* enable fakestat support */
278 static int enable_backuptree = 0;       /* enable backup tree support */
279 static int enable_nomount = 0;  /* do not mount */
280 static int enable_splitcache = 0;
281 #ifdef notdef
282 static int inodes = 60;         /* VERY conservative, but has to be */
283 #endif
284 int afsd_verbose = 0;           /*Are we being chatty? */
285 int afsd_debug = 0;             /*Are we printing debugging info? */
286 int afsd_CloseSynch = 0;        /*Are closes synchronous or not? */
287
288 #ifdef AFS_SGI62_ENV
289 #define AFSD_INO_T ino64_t
290 #else
291 #define AFSD_INO_T afs_uint32
292 #endif
293 struct afsd_file_list {
294     int fileNum;
295     struct afsd_file_list *next;
296 };
297 struct afsd_file_list **cache_dir_filelist = NULL;
298 int *cache_dir_list = NULL;     /* Array of cache subdirs */
299 int *dir_for_V = NULL;          /* Array: dir of each cache file.
300                                  * -1: file does not exist
301                                  * -2: file exists in top-level
302                                  * >=0: file exists in Dxxx
303                                  */
304 AFSD_INO_T *inode_for_V;        /* Array of inodes for desired
305                                  * cache files */
306 int missing_DCacheFile = 1;     /*Is the DCACHEFILE missing? */
307 int missing_VolInfoFile = 1;    /*Is the VOLINFOFILE missing? */
308 int missing_CellInfoFile = 1;   /*Is the CELLINFOFILE missing? */
309 int afsd_rmtsys = 0;            /* Default: don't support rmtsys */
310 struct afs_cacheParams cparams; /* params passed to cache manager */
311
312 static int HandleMTab();
313
314 /* ParseArgs is now obsolete, being handled by cmd */
315
316 /*------------------------------------------------------------------------------
317   * ParseCacheInfoFile
318   *
319   * Description:
320   *     Open the file containing the description of the workstation's AFS cache
321   *     and pull out its contents.  The format of this file is as follows:
322   *
323   *         cacheMountDir:cacheBaseDir:cacheBlocks
324   *
325   * Arguments:
326   *     None.
327   *
328   * Returns:
329   *     0 if everything went well,
330   *     1 otherwise.
331   *
332   * Environment:
333   *     Nothing interesting.
334   *
335   *  Side Effects:
336   *     Sets globals.
337   *---------------------------------------------------------------------------*/
338
339 int
340 ParseCacheInfoFile(void)
341 {
342     static char rn[] = "ParseCacheInfoFile";    /*This routine's name */
343     FILE *cachefd;              /*Descriptor for cache info file */
344     int parseResult;            /*Result of our fscanf() */
345     afs_int32 tCacheBlocks;
346     char tCacheBaseDir[1024], *tbd, tCacheMountDir[1024], *tmd;
347
348     if (afsd_debug)
349         printf("%s: Opening cache info file '%s'...\n", rn, fullpn_CacheInfo);
350
351     cachefd = fopen(fullpn_CacheInfo, "r");
352     if (!cachefd) {
353         printf("%s: Can't read cache info file '%s'\n", rn, fullpn_CacheInfo);
354         return (1);
355     }
356
357     /*
358      * Parse the contents of the cache info file.  All chars up to the first
359      * colon are the AFS mount directory, all chars to the next colon are the
360      * full path name of the workstation cache directory and all remaining chars
361      * represent the number of blocks in the cache.
362      */
363     tCacheMountDir[0] = tCacheBaseDir[0] = '\0';
364     parseResult =
365         fscanf(cachefd, "%1024[^:]:%1024[^:]:%d", tCacheMountDir,
366                tCacheBaseDir, &tCacheBlocks);
367
368     /*
369      * Regardless of how the parse went, we close the cache info file.
370      */
371     fclose(cachefd);
372
373     if (parseResult == EOF || parseResult < 3) {
374         printf("%s: Format error in cache info file!\n", rn);
375         if (parseResult == EOF)
376             printf("\tEOF encountered before any field parsed.\n");
377         else
378             printf("\t%d out of 3 fields successfully parsed.\n",
379                    parseResult);
380
381         return (1);
382     }
383
384     for (tmd = tCacheMountDir; *tmd == '\n' || *tmd == ' ' || *tmd == '\t';
385          tmd++);
386     for (tbd = tCacheBaseDir; *tbd == '\n' || *tbd == ' ' || *tbd == '\t';
387          tbd++);
388     /* now copy in the fields not explicitly overridden by cmd args */
389     if (!sawCacheMountDir)
390         strcpy(cacheMountDir, tmd);
391     if (!sawCacheBaseDir)
392         strcpy(cacheBaseDir, tbd);
393     if (!sawCacheBlocks)
394         cacheBlocks = tCacheBlocks;
395
396     if (afsd_debug) {
397         printf("%s: Cache info file successfully parsed:\n", rn);
398         printf
399             ("\tcacheMountDir: '%s'\n\tcacheBaseDir: '%s'\n\tcacheBlocks: %d\n",
400              tmd, tbd, tCacheBlocks);
401     }
402     if (!(cacheFlags & AFSCALL_INIT_MEMCACHE)) {
403         return (PartSizeOverflow(tbd, cacheBlocks));
404     }
405
406     return (0);
407 }
408
409 /*
410  * All failures to open the partition are ignored. Also if the cache dir 
411  * isn't a mounted partition it's also ignored since we can't guarantee 
412  * what will be stored afterwards. Too many if's. This is now purely
413  * advisory. ODS with over 2G partition also gives warning message.
414  *
415  * Returns:
416  *      0 if everything went well,
417  *      1 otherwise.
418  */
419 int
420 PartSizeOverflow(char *path, int cs)
421 {
422     int bsize = -1, totalblks, mint;
423 #if AFS_HAVE_STATVFS
424     struct statvfs statbuf;
425
426     if (statvfs(path, &statbuf) != 0) {
427         if (afsd_debug)
428             printf
429                 ("statvfs failed on %s; skip checking for adequate partition space\n",
430                  path);
431         return 0;
432     }
433     totalblks = statbuf.f_blocks;
434     bsize = statbuf.f_frsize;
435 #if AFS_AIX51_ENV
436     if (strcmp(statbuf.f_basetype, "jfs")) {
437         fprintf(stderr, "Cache filesystem '%s' must be jfs (now %s)\n",
438                 path, statbuf.f_basetype);
439         return 1;
440     }
441 #endif /* AFS_AIX51_ENV */
442
443 #else /* AFS_HAVE_STATVFS */
444     struct statfs statbuf;
445
446     if (statfs(path, &statbuf) < 0) {
447         if (afsd_debug)
448             printf
449                 ("statfs failed on %s; skip checking for adequate partition space\n",
450                  path);
451         return 0;
452     }
453     totalblks = statbuf.f_blocks;
454     bsize = statbuf.f_bsize;
455 #endif
456     if (bsize == -1)
457         return 0;               /* sucess */
458
459     /* now free and totalblks are in fragment units, but we want them in 1K units */
460     if (bsize >= 1024) {
461         totalblks *= (bsize / 1024);
462     } else {
463         totalblks /= (1024 / bsize);
464     }
465
466     mint = totalblks / 100 * 95;
467     if (cs > mint) {
468         printf
469             ("Cache size (%d) must be less than 95%% of partition size (which is %d). Lower cache size\n",
470              cs, mint);
471         return 1;
472     }
473
474     return 0;
475 }
476
477 /*-----------------------------------------------------------------------------
478   * GetVFileNumber
479   *
480   * Description:
481   *     Given the final component of a filename expected to be a data cache file,
482   *     return the integer corresponding to the file.  Note: we reject names that
483   *     are not a ``V'' followed by an integer.  We also reject those names having
484   *     the right format but lying outside the range [0..cacheFiles-1].
485   *
486   * Arguments:
487   *     fname : Char ptr to the filename to parse.
488   *     max   : integer for the highest number to accept
489   *
490   * Returns:
491   *     >= 0 iff the file is really a data cache file numbered from 0 to cacheFiles-1, or
492   *     -1      otherwise.
493   *
494   * Environment:
495   *     Nothing interesting.
496   *
497   * Side Effects:
498   *     None.
499   *---------------------------------------------------------------------------*/
500
501 static int
502 doGetXFileNumber(fname, filechar, maxNum)
503      char *fname;
504      char filechar;
505      int maxNum;
506 {
507     int computedVNumber;        /*The computed file number we return */
508     int filenameLen;            /*Number of chars in filename */
509     int currDigit;              /*Current digit being processed */
510
511     /*
512      * The filename must have at least two characters, the first of which must be a ``filechar''
513      * and the second of which cannot be a zero unless the file is exactly two chars long.
514      */
515     filenameLen = strlen(fname);
516     if (filenameLen < 2)
517         return (-1);
518     if (fname[0] != filechar)
519         return (-1);
520     if ((filenameLen > 2) && (fname[1] == '0'))
521         return (-1);
522
523     /*
524      * Scan through the characters in the given filename, failing immediately if a non-digit
525      * is found.
526      */
527     for (currDigit = 1; currDigit < filenameLen; currDigit++)
528         if (isdigit(fname[currDigit]) == 0)
529             return (-1);
530
531     /*
532      * All relevant characters are digits.  Pull out the decimal number they represent.
533      * Reject it if it's out of range, otherwise return it.
534      */
535     computedVNumber = atoi(++fname);
536     if (computedVNumber < cacheFiles)
537         return (computedVNumber);
538     else
539         return (-1);
540 }
541
542 int
543 GetVFileNumber(fname, maxFile)
544      char *fname;
545      int maxFile;
546 {
547     return doGetXFileNumber(fname, 'V', maxFile);
548 }
549
550 int
551 GetDDirNumber(fname, maxDir)
552      char *fname;
553      int maxDir;
554 {
555     return doGetXFileNumber(fname, 'D', maxDir);
556 }
557
558
559 /*-----------------------------------------------------------------------------
560   * CreateCacheFile
561   *
562   * Description:
563   *     Given a full pathname for a file we need to create for the workstation AFS
564   *     cache, go ahead and create the file.
565   *
566   * Arguments:
567   *     fname : Full pathname of file to create.
568   *     statp : A pointer to a stat buffer which, if NON-NULL, will be
569   *             filled by fstat()
570   *
571   * Returns:
572   *     0   iff the file was created,
573   *     -1  otherwise.
574   *
575   * Environment:
576   *     The given cache file has been found to be missing.
577   *
578   * Side Effects:
579   *     As described.
580   *---------------------------------------------------------------------------*/
581
582 static int
583 CreateCacheSubDir(basename, dirNum)
584      char *basename;
585      int dirNum;
586 {
587     static char rn[] = "CreateCacheSubDir";     /* Routine Name */
588     char dir[1024];
589     int ret;
590
591     /* Build the new cache subdirectory */
592     sprintf(dir, "%s/D%d", basename, dirNum);
593
594     if (afsd_verbose)
595         printf("%s: Creating cache subdir '%s'\n", rn, dir);
596
597     if ((ret = mkdir(dir, 0700)) != 0) {
598         printf("%s: Can't create '%s', error return is %d (%d)\n", rn, dir,
599                ret, errno);
600         if (errno != EEXIST)
601             return (-1);
602     }
603
604     /* Mark this directory as created */
605     cache_dir_list[dirNum] = 0;
606
607     /* And return success */
608     return (0);
609 }
610
611 static int
612 MoveCacheFile(basename, fromDir, toDir, cacheFile, maxDir)
613      char *basename;
614      int fromDir, toDir, cacheFile, maxDir;
615 {
616     static char rn[] = "MoveCacheFile";
617     char from[1024], to[1024];
618     int ret;
619
620     if (cache_dir_list[toDir] < 0
621         && (ret = CreateCacheSubDir(basename, toDir))) {
622         printf("%s: Can't create directory '%s/D%d'\n", rn, basename, toDir);
623         return ret;
624     }
625
626     /* Build the from,to dir */
627     if (fromDir < 0) {
628         /* old-style location */
629         snprintf(from, sizeof(from), "%s/V%d", basename, cacheFile);
630     } else {
631         snprintf(from, sizeof(from), "%s/D%d/V%d", basename, fromDir,
632                  cacheFile);
633     }
634
635     snprintf(to, sizeof(from), "%s/D%d/V%d", basename, toDir, cacheFile);
636
637     if (afsd_verbose)
638         printf("%s: Moving cacheFile from '%s' to '%s'\n", rn, from, to);
639
640     if ((ret = rename(from, to)) != 0) {
641         printf("%s: Can't rename '%s' to '%s', error return is %d (%d)\n", rn,
642                from, to, ret, errno);
643         return -1;
644     }
645
646     /* Reset directory pointer; fix file counts */
647     dir_for_V[cacheFile] = toDir;
648     cache_dir_list[toDir]++;
649     if (fromDir < maxDir && fromDir >= 0)
650         cache_dir_list[fromDir]--;
651
652     return 0;
653 }
654
655 int
656 CreateCacheFile(fname, statp)
657      char *fname;
658      struct stat *statp;
659 {
660     static char rn[] = "CreateCacheFile";       /*Routine name */
661     int cfd;                    /*File descriptor to AFS cache file */
662     int closeResult;            /*Result of close() */
663
664     if (afsd_verbose)
665         printf("%s: Creating cache file '%s'\n", rn, fname);
666     cfd = open(fname, createAndTrunc, ownerRWmode);
667     if (cfd <= 0) {
668         printf("%s: Can't create '%s', error return is %d (%d)\n", rn, fname,
669                cfd, errno);
670         return (-1);
671     }
672     if (statp != NULL) {
673         closeResult = fstat(cfd, statp);
674         if (closeResult) {
675             printf
676                 ("%s: Can't stat newly-created AFS cache file '%s' (code %d)\n",
677                  rn, fname, errno);
678             return (-1);
679         }
680     }
681     closeResult = close(cfd);
682     if (closeResult) {
683         printf
684             ("%s: Can't close newly-created AFS cache file '%s' (code %d)\n",
685              rn, fname, errno);
686         return (-1);
687     }
688
689     return (0);
690 }
691
692 static void
693 CreateFileIfMissing(char *fullpn, int missing)
694 {
695     if (missing) {
696         if (afsd_verbose)
697             printf("CreateFileIfMissing: Creating '%s'\n", fullpn);
698         if (CreateCacheFile(fullpn, NULL))
699             printf("CreateFileIfMissing: Can't create '%s'\n", fullpn);
700     }
701 }
702
703 /*-----------------------------------------------------------------------------
704   * SweepAFSCache
705   *
706   * Description:
707   *     Sweep through the AFS cache directory, recording the inode number for
708   *     each valid data cache file there.  Also, delete any file that doesn't belong
709   *     in the cache directory during this sweep, and remember which of the other
710   *     residents of this directory were seen.  After the sweep, we create any data
711   *     cache files that were missing.
712   *
713   * Arguments:
714   *     vFilesFound : Set to the number of data cache files found.
715   *
716   * Returns:
717   *     0   if everything went well,
718   *     -1 otherwise.
719   *
720   * Environment:
721   *     This routine may be called several times.  If the number of data cache files
722   *     found is less than the global cacheFiles, then the caller will need to call it
723   *     again to record the inodes of the missing zero-length data cache files created
724   *     in the previous call.
725   *
726   * Side Effects:
727   *     Fills up the global inode_for_V array, may create and/or delete files as
728   *     explained above.
729   *---------------------------------------------------------------------------*/
730
731
732 static int
733 doSweepAFSCache(vFilesFound, directory, dirNum, maxDir)
734      int *vFilesFound;
735      char *directory;           /* /path/to/cache/directory */
736      int dirNum;                /* current directory number */
737      int maxDir;                /* maximum directory number */
738 {
739     static char rn[] = "doSweepAFSCache";       /* Routine Name */
740     char fullpn_FileToDelete[1024];     /*File to be deleted from cache */
741     char *fileToDelete;         /*Ptr to last component of above */
742     DIR *cdirp;                 /*Ptr to cache directory structure */
743 #ifdef AFS_SGI62_ENV
744     struct dirent64 *currp;     /*Current directory entry */
745 #else
746     struct dirent *currp;       /*Current directory entry */
747 #endif
748     int vFileNum;               /*Data cache file's associated number */
749     int thisDir;                /* A directory number */
750     int highDir = 0;
751
752     if (afsd_debug)
753         printf("%s: Opening cache directory '%s'\n", rn, directory);
754
755     if (chmod(directory, 0700)) {       /* force it to be 700 */
756         printf("%s: Can't 'chmod 0700' the cache dir, '%s'.\n", rn,
757                directory);
758         return (-1);
759     }
760     cdirp = opendir(directory);
761     if (cdirp == (DIR *) 0) {
762         printf("%s: Can't open AFS cache directory, '%s'.\n", rn, directory);
763         return (-1);
764     }
765
766     /*
767      * Scan the directory entries, remembering data cache file inodes
768      * and the existance of other important residents.  Recurse into
769      * the data subdirectories.
770      *
771      * Delete all files and directories that don't belong here.
772      */
773     sprintf(fullpn_FileToDelete, "%s/", directory);
774     fileToDelete = fullpn_FileToDelete + strlen(fullpn_FileToDelete);
775
776 #ifdef AFS_SGI62_ENV
777     for (currp = readdir64(cdirp); currp; currp = readdir64(cdirp))
778 #else
779     for (currp = readdir(cdirp); currp; currp = readdir(cdirp))
780 #endif
781     {
782         if (afsd_debug) {
783             printf("%s: Current directory entry:\n", rn);
784 #ifdef AFS_SGI62_ENV
785             printf("\tinode=%lld, reclen=%d, name='%s'\n", currp->d_ino,
786                    currp->d_reclen, currp->d_name);
787 #else
788             printf("\tinode=%d, reclen=%d, name='%s'\n", currp->d_ino,
789                    currp->d_reclen, currp->d_name);
790 #endif
791         }
792
793         /*
794          * If dirNum < 0, we are a top-level cache directory and should
795          * only contain sub-directories and other sundry files.  Therefore,
796          * V-files are valid only if dirNum >= 0, and Directories are only
797          * valid if dirNum < 0.
798          */
799
800         if (*(currp->d_name) == 'V'
801             && ((vFileNum = GetVFileNumber(currp->d_name, cacheFiles)) >=
802                 0)) {
803             /*
804              * Found a valid data cache filename.  Remember this
805              * file's inode, directory, and bump the number of files found
806              * total and in this directory.
807              */
808             inode_for_V[vFileNum] = currp->d_ino;
809             dir_for_V[vFileNum] = dirNum;       /* remember this directory */
810
811             if (!maxDir) {
812                 /* If we're in a real subdir, mark this file to be moved
813                  * if we've already got too many files in this directory
814                  */
815                 assert(dirNum >= 0);
816                 cache_dir_list[dirNum]++;       /* keep directory's file count */
817                 if (cache_dir_list[dirNum] > nFilesPerDir) {
818                     /* Too many files -- add to filelist */
819                     struct afsd_file_list *tmp = (struct afsd_file_list *)
820                         malloc(sizeof(*tmp));
821                     if (!tmp)
822                         printf
823                             ("%s: MALLOC FAILED allocating file_list entry\n",
824                              rn);
825                     else {
826                         tmp->fileNum = vFileNum;
827                         tmp->next = cache_dir_filelist[dirNum];
828                         cache_dir_filelist[dirNum] = tmp;
829                     }
830                 }
831             }
832             (*vFilesFound)++;
833         } else if (dirNum < 0 && (*(currp->d_name) == 'D')
834                    && GetDDirNumber(currp->d_name, 1 << 30) >= 0) {
835             int retval = 0;
836             if ((vFileNum = GetDDirNumber(currp->d_name, maxDir)) >= 0) {
837                 /* Found a valid cachefile sub-Directory.  Remember this number
838                  * and recurse into it.  Note that subdirs cannot have subdirs.
839                  */
840                 retval = 1;
841             } else if ((vFileNum = GetDDirNumber(currp->d_name, 1 << 30)) >=
842                        0) {
843                 /* This directory is going away, but figure out if there
844                  * are any cachefiles in here that should be saved by
845                  * moving them to other cache directories.  This directory
846                  * will be removed later.
847                  */
848                 retval = 2;
849             }
850
851             /* Save the highest directory number we've seen */
852             if (vFileNum > highDir)
853                 highDir = vFileNum;
854
855             /* If this directory is staying, be sure to mark it as 'found' */
856             if (retval == 1)
857                 cache_dir_list[vFileNum] = 0;
858
859             /* Print the dirname for recursion */
860             sprintf(fileToDelete, "%s", currp->d_name);
861
862             /* Note: vFileNum is the directory number */
863             retval =
864                 doSweepAFSCache(vFilesFound, fullpn_FileToDelete, vFileNum,
865                                 (retval == 1 ? 0 : -1));
866             if (retval) {
867                 printf("%s: Recursive sweep failed on directory %s\n", rn,
868                        currp->d_name);
869                 return retval;
870             }
871         } else if (dirNum < 0 && strcmp(currp->d_name, DCACHEFILE) == 0) {
872             /*
873              * Found the file holding the dcache entries.
874              */
875             missing_DCacheFile = 0;
876         } else if (dirNum < 0 && strcmp(currp->d_name, VOLINFOFILE) == 0) {
877             /*
878              * Found the file holding the volume info.
879              */
880             missing_VolInfoFile = 0;
881         } else if (dirNum < 0 && strcmp(currp->d_name, CELLINFOFILE) == 0) {
882             /*
883              * Found the file holding the cell info.
884              */
885             missing_CellInfoFile = 0;
886         } else if ((strcmp(currp->d_name, ".") == 0)
887                    || (strcmp(currp->d_name, "..") == 0) ||
888 #ifdef AFS_DECOSF_ENV
889                    /* these are magic AdvFS files */
890                    (strcmp(currp->d_name, ".tags") == 0)
891                    || (strcmp(currp->d_name, "quota.user") == 0)
892                    || (strcmp(currp->d_name, "quota.group") == 0) ||
893 #endif
894 #ifdef AFS_LINUX22_ENV
895                    /* this is the ext3 journal file */
896                    (strcmp(currp->d_name, ".journal") == 0) ||
897 #endif
898                    (strcmp(currp->d_name, "lost+found") == 0)) {
899             /*
900              * Don't do anything - this file is legit, and is to be left alone.
901              */
902         } else {
903             /*
904              * This file/directory doesn't belong in the cache.  Nuke it.
905              */
906             sprintf(fileToDelete, "%s", currp->d_name);
907             if (afsd_verbose)
908                 printf("%s: Deleting '%s'\n", rn, fullpn_FileToDelete);
909             if (unlink(fullpn_FileToDelete)) {
910                 if (errno == EISDIR && *fileToDelete == 'D') {
911                     if (rmdir(fullpn_FileToDelete)) {
912                         printf("%s: Can't rmdir '%s', errno is %d\n", rn,
913                                fullpn_FileToDelete, errno);
914                     }
915                 } else
916                     printf("%s: Can't unlink '%s', errno is %d\n", rn,
917                            fullpn_FileToDelete, errno);
918             }
919         }
920     }
921
922     if (dirNum < 0) {
923
924         /*
925          * Create all the cache files that are missing.
926          */
927         CreateFileIfMissing(fullpn_DCacheFile, missing_DCacheFile);
928         CreateFileIfMissing(fullpn_VolInfoFile, missing_VolInfoFile);
929         CreateFileIfMissing(fullpn_CellInfoFile, missing_CellInfoFile);
930
931         /* ADJUST CACHE FILES */
932
933         /* First, let's walk through the list of files and figure out
934          * if there are any leftover files in extra directories or
935          * missing files.  Move the former and create the latter in
936          * subdirs with extra space.
937          */
938
939         thisDir = 0;            /* Keep track of which subdir has space */
940
941         for (vFileNum = 0; vFileNum < cacheFiles; vFileNum++) {
942             if (dir_for_V[vFileNum] == -1) {
943                 /* This file does not exist.  Create it in the first
944                  * subdir that still has extra space.
945                  */
946                 while (thisDir < maxDir
947                        && cache_dir_list[thisDir] >= nFilesPerDir)
948                     thisDir++;
949                 if (thisDir >= maxDir)
950                     printf("%s: can't find directory to create V%d\n", rn,
951                            vFileNum);
952                 else {
953                     struct stat statb;
954                     assert(inode_for_V[vFileNum] == (AFSD_INO_T) 0);
955                     sprintf(vFilePtr, "D%d/V%d", thisDir, vFileNum);
956                     if (afsd_verbose)
957                         printf("%s: Creating '%s'\n", rn, fullpn_VFile);
958                     if (cache_dir_list[thisDir] < 0
959                         && CreateCacheSubDir(directory, thisDir))
960                         printf("%s: Can't create directory for '%s'\n", rn,
961                                fullpn_VFile);
962                     if (CreateCacheFile(fullpn_VFile, &statb))
963                         printf("%s: Can't create '%s'\n", rn, fullpn_VFile);
964                     else {
965                         inode_for_V[vFileNum] = statb.st_ino;
966                         dir_for_V[vFileNum] = thisDir;
967                         cache_dir_list[thisDir]++;
968                         (*vFilesFound)++;
969                     }
970                 }
971
972             } else if (dir_for_V[vFileNum] >= maxDir
973                        || dir_for_V[vFileNum] == -2) {
974                 /* This file needs to move; move it to the first subdir
975                  * that has extra space.  (-2 means it's in the toplevel)
976                  */
977                 while (thisDir < maxDir
978                        && cache_dir_list[thisDir] >= nFilesPerDir)
979                     thisDir++;
980                 if (thisDir >= maxDir)
981                     printf("%s: can't find directory to move V%d\n", rn,
982                            vFileNum);
983                 else {
984                     if (MoveCacheFile
985                         (directory, dir_for_V[vFileNum], thisDir, vFileNum,
986                          maxDir)) {
987                         /* Cannot move.  Ignore this file??? */
988                         /* XXX */
989                     }
990                 }
991             }
992         }                       /* for */
993
994         /* At this point, we've moved all of the valid cache files
995          * into the valid subdirs, and created all the extra
996          * cachefiles we need to create.  Next, rebalance any subdirs
997          * with too many cache files into the directories with not
998          * enough cache files.  Note that thisDir currently sits at
999          * the lowest subdir that _may_ have room.
1000          */
1001
1002         for (dirNum = 0; dirNum < maxDir; dirNum++) {
1003             struct afsd_file_list *thisFile;
1004
1005             for (thisFile = cache_dir_filelist[dirNum];
1006                  thisFile && cache_dir_list[dirNum] >= nFilesPerDir;
1007                  thisFile = thisFile->next) {
1008                 while (thisDir < maxDir
1009                        && cache_dir_list[thisDir] >= nFilesPerDir)
1010                     thisDir++;
1011                 if (thisDir >= maxDir)
1012                     printf("%s: can't find directory to move V%d\n", rn,
1013                            vFileNum);
1014                 else {
1015                     if (MoveCacheFile
1016                         (directory, dirNum, thisDir, thisFile->fileNum,
1017                          maxDir)) {
1018                         /* Cannot move.  Ignore this file??? */
1019                         /* XXX */
1020                     }
1021                 }
1022             }                   /* for each file to move */
1023         }                       /* for each directory */
1024
1025         /* Remove any directories >= maxDir -- they should be empty */
1026         for (; highDir >= maxDir; highDir--) {
1027             sprintf(fileToDelete, "D%d", highDir);
1028             if (unlink(fullpn_FileToDelete)) {
1029                 if (errno == EISDIR && *fileToDelete == 'D') {
1030                     if (rmdir(fullpn_FileToDelete)) {
1031                         printf("%s: Can't rmdir '%s', errno is %d\n", rn,
1032                                fullpn_FileToDelete, errno);
1033                     }
1034                 } else
1035                     printf("%s: Can't unlink '%s', errno is %d\n", rn,
1036                            fullpn_FileToDelete, errno);
1037             }
1038         }
1039     }
1040
1041     /* dirNum < 0 */
1042     /*
1043      * Close the directory, return success.
1044      */
1045     if (afsd_debug)
1046         printf("%s: Closing cache directory.\n", rn);
1047     closedir(cdirp);
1048     return (0);
1049 }
1050
1051 char *
1052 CheckCacheBaseDir(char *dir)
1053 {
1054     struct stat statbuf;
1055
1056     if (!dir) {
1057         return "cache base dir not specified";
1058     }
1059     if (stat(dir, &statbuf) != 0) {
1060         return "unable to stat cache base directory";
1061     }
1062
1063     /* might want to check here for anything else goofy, like cache pointed at a non-dedicated directory, etc */
1064
1065 #ifdef AFS_LINUX24_ENV
1066     {
1067         int res;
1068         struct statfs statfsbuf;
1069
1070         res = statfs(dir, &statfsbuf);
1071         if (res != 0) {
1072             return "unable to statfs cache base directory";
1073         }
1074         if (statfsbuf.f_type == 0x52654973) {   /* REISERFS_SUPER_MAGIC */
1075             return "cannot use reiserfs as cache partition";
1076         } else if (statfsbuf.f_type == 0x58465342) {    /* XFS_SUPER_MAGIC */
1077             return "cannot use xfs as cache partition";
1078         }
1079     }
1080 #endif
1081
1082 #ifdef AFS_HPUX_ENV
1083     {
1084         int res;
1085         struct statfs statfsbuf;
1086         char name[FSTYPSZ];
1087
1088         res = statfs(dir, &statfsbuf);
1089         if (res != 0) {
1090             return "unable to statfs cache base directory";
1091         }
1092
1093         if (sysfs(GETFSTYP, statfsbuf.f_fsid[1], name) != 0) {
1094             return "unable to determine filesystem type for cache base dir";
1095         }
1096
1097         if (strcmp(name, "hfs")) {
1098             return "can only use hfs filesystem for cache partition on hpux";
1099         }
1100     }
1101 #endif
1102
1103 #ifdef AFS_SUN5_ENV
1104     {
1105         FILE *vfstab;
1106         struct mnttab mnt;
1107         struct stat statmnt, statci;
1108
1109         if ((stat(dir, &statci) == 0)
1110             && ((vfstab = fopen(MNTTAB, "r")) != NULL)) {
1111             while (getmntent(vfstab, &mnt) == 0) {
1112                 if (strcmp(dir, mnt.mnt_mountp) != 0) {
1113                     char *cp;
1114                     int rdev = 0;
1115
1116                     if (cp = hasmntopt(&mnt, "dev="))
1117                         rdev =
1118                             (int)strtol(cp + strlen("dev="), (char **)NULL,
1119                                         16);
1120
1121                     if ((rdev == 0) && (stat(mnt.mnt_mountp, &statmnt) == 0))
1122                         rdev = statmnt.st_dev;
1123
1124                     if ((rdev == statci.st_dev)
1125                         && (hasmntopt(&mnt, "logging") != NULL)) {
1126
1127                         fclose(vfstab);
1128                         return
1129                             "mounting a multi-use partition which contains the AFS cache with the\n\"logging\" option may deadlock your system.\n\n";
1130                     }
1131                 }
1132             }
1133
1134             fclose(vfstab);
1135         }
1136     }
1137 #endif
1138
1139     return NULL;
1140 }
1141
1142 int
1143 SweepAFSCache(vFilesFound)
1144      int *vFilesFound;
1145 {
1146     static char rn[] = "SweepAFSCache"; /*Routine name */
1147     int maxDir = (cacheFiles + nFilesPerDir - 1) / nFilesPerDir;
1148     int i;
1149
1150     *vFilesFound = 0;
1151
1152     if (cacheFlags & AFSCALL_INIT_MEMCACHE) {
1153         if (afsd_debug)
1154             printf("%s: Memory Cache, no cache sweep done\n", rn);
1155         return 0;
1156     }
1157
1158     if (cache_dir_list == NULL) {
1159         cache_dir_list = (int *)malloc(maxDir * sizeof(*cache_dir_list));
1160         if (cache_dir_list == NULL) {
1161             printf("%s: Malloc Failed!\n", rn);
1162             return (-1);
1163         }
1164         for (i = 0; i < maxDir; i++)
1165             cache_dir_list[i] = -1;     /* Does not exist */
1166     }
1167
1168     if (cache_dir_filelist == NULL) {
1169         cache_dir_filelist = (struct afsd_file_list **)
1170             malloc(maxDir * sizeof(*cache_dir_filelist));
1171         if (cache_dir_filelist == NULL) {
1172             printf("%s: Malloc Failed!\n", rn);
1173             return (-1);
1174         }
1175         memset(cache_dir_filelist, 0, maxDir * sizeof(*cache_dir_filelist));
1176     }
1177
1178     if (dir_for_V == NULL) {
1179         dir_for_V = (int *)malloc(cacheFiles * sizeof(*dir_for_V));
1180         if (dir_for_V == NULL) {
1181             printf("%s: Malloc Failed!\n", rn);
1182             return (-1);
1183         }
1184         for (i = 0; i < cacheFiles; i++)
1185             dir_for_V[i] = -1;  /* Does not exist */
1186     }
1187
1188     /* Note, setting dirNum to -2 here will cause cachefiles found in
1189      * the toplevel directory to be marked in directory "-2".  This
1190      * allows us to differentiate between 'file not seen' (-1) and
1191      * 'file seen in top-level' (-2).  Then when we try to move the
1192      * file into a subdirectory, we know it's in the top-level instead
1193      * of some other cache subdir.
1194      */
1195     return doSweepAFSCache(vFilesFound, cacheBaseDir, -2, maxDir);
1196 }
1197
1198 static
1199 ConfigCell(aci, arock, adir)
1200      register struct afsconf_cell *aci;
1201      char *arock;
1202      struct afsconf_dir *adir;
1203 {
1204     register int isHomeCell;
1205     register int i, code;
1206     afs_int32 cellFlags = 0;
1207     afs_int32 hosts[MAXHOSTSPERCELL];
1208
1209     /* figure out if this is the home cell */
1210     isHomeCell = (strcmp(aci->name, LclCellName) == 0);
1211     if (!isHomeCell)
1212         cellFlags = 2;          /* not home, suid is forbidden */
1213
1214     /* build address list */
1215     for (i = 0; i < MAXHOSTSPERCELL; i++)
1216         memcpy(&hosts[i], &aci->hostAddr[i].sin_addr, sizeof(afs_int32));
1217
1218     if (aci->linkedCell)
1219         cellFlags |= 4;         /* Flag that linkedCell arg exists,
1220                                  * for upwards compatibility */
1221
1222     /* configure one cell */
1223     code = call_syscall(AFSOP_ADDCELL2, hosts,  /* server addresses */
1224                         aci->name,      /* cell name */
1225                         cellFlags,      /* is this the home cell? */
1226                         aci->linkedCell);       /* Linked cell, if any */
1227     if (code)
1228         printf("Adding cell '%s': error %d\n", aci->name, code);
1229     return 0;
1230 }
1231
1232 static
1233 ConfigCellAlias(aca, arock, adir)
1234      register struct afsconf_cellalias *aca;
1235      char *arock;
1236      struct afsconf_dir *adir;
1237 {
1238     /* push the alias into the kernel */
1239     call_syscall(AFSOP_ADDCELLALIAS, aca->aliasName, aca->realName);
1240     return 0;
1241 }
1242
1243 #ifdef AFS_AFSDB_ENV
1244 static
1245 AfsdbLookupHandler()
1246 {
1247     afs_int32 kernelMsg[64];
1248     char acellName[128];
1249     afs_int32 code;
1250     struct afsconf_cell acellInfo;
1251     int i;
1252
1253     kernelMsg[0] = 0;
1254     kernelMsg[1] = 0;
1255     acellName[0] = '\0';
1256
1257     while (1) {
1258         /* On some platforms you only get 4 args to an AFS call */
1259         int sizeArg = ((sizeof acellName) << 16) | (sizeof kernelMsg);
1260         code =
1261             call_syscall(AFSOP_AFSDB_HANDLER, acellName, kernelMsg, sizeArg);
1262         if (code) {             /* Something is wrong? */
1263             sleep(1);
1264             continue;
1265         }
1266
1267         if (*acellName == 1)    /* Shutting down */
1268             break;
1269
1270         code = afsconf_GetAfsdbInfo(acellName, 0, &acellInfo);
1271         if (code) {
1272             kernelMsg[0] = 0;
1273             kernelMsg[1] = 0;
1274         } else {
1275             kernelMsg[0] = acellInfo.numServers;
1276             if (acellInfo.timeout)
1277                 kernelMsg[1] = acellInfo.timeout - time(0);
1278             else
1279                 kernelMsg[1] = 0;
1280             for (i = 0; i < acellInfo.numServers; i++)
1281                 kernelMsg[i + 2] = acellInfo.hostAddr[i].sin_addr.s_addr;
1282             strncpy(acellName, acellInfo.name, sizeof(acellName));
1283             acellName[sizeof(acellName) - 1] = '\0';
1284         }
1285     }
1286
1287     exit(1);
1288 }
1289 #endif
1290
1291 #ifdef mac2
1292 #include <sys/ioctl.h>
1293 #endif /* mac2 */
1294
1295 #ifdef AFS_SGI65_ENV
1296 #define SET_RTPRI(P) {  \
1297     struct sched_param sp; \
1298     sp.sched_priority = P; \
1299     if (sched_setscheduler(0, SCHED_RR, &sp)<0) { \
1300         perror("sched_setscheduler"); \
1301     } \
1302 }
1303 #define SET_AFSD_RTPRI() SET_RTPRI(68)
1304 #define SET_RX_RTPRI()   SET_RTPRI(199)
1305 #else
1306 #ifdef AFS_LINUX20_ENV
1307 #define SET_AFSD_RTPRI()
1308 #define SET_RX_RTPRI()  do { if (setpriority(PRIO_PROCESS, 0, -10)<0) \
1309                            perror("setting rx priority"); \
1310                          } while (0)
1311 #else
1312 #define SET_AFSD_RTPRI()
1313 #define SET_RX_RTPRI()
1314 #endif
1315 #endif
1316
1317 mainproc(as, arock)
1318      struct cmd_syndesc *as;
1319      char *arock;
1320 {
1321     static char rn[] = "afsd";  /*Name of this routine */
1322     register afs_int32 code;    /*Result of fork() */
1323     register int i;
1324     int currVFile;              /*Current AFS cache file number passed in */
1325     int mountFlags;             /*Flags passed to mount() */
1326     int lookupResult;           /*Result of GetLocalCellName() */
1327     int cacheIteration;         /*How many times through cache verification */
1328     int vFilesFound;            /*How many data cache files were found in sweep */
1329     struct afsconf_dir *cdir;   /* config dir */
1330     FILE *logfd;
1331     char *fsTypeMsg = NULL;
1332 #ifdef  AFS_SUN5_ENV
1333     struct stat st;
1334 #endif
1335     afs_int32 vfs1_type = -1;
1336 #ifdef AFS_SGI65_ENV
1337     struct sched_param sp;
1338 #endif
1339
1340 #ifdef AFS_SGI_VNODE_GLUE
1341     if (afs_init_kernel_config(-1) < 0) {
1342         printf("Can't determine NUMA configuration, not starting AFS.\n");
1343         exit(1);
1344     }
1345 #endif
1346
1347     /* call atoi on the appropriate parsed results */
1348     if (as->parms[0].items) {
1349         /* -blocks */
1350         cacheBlocks = atoi(as->parms[0].items->data);
1351         sawCacheBlocks = 1;
1352     }
1353     if (as->parms[1].items) {
1354         /* -files */
1355         cacheFiles = atoi(as->parms[1].items->data);
1356         filesSet = 1;           /* set when spec'd on cmd line */
1357     }
1358     if (as->parms[2].items) {
1359         /* -rootvol */
1360         strcpy(rootVolume, as->parms[2].items->data);
1361         rootVolSet = 1;
1362     }
1363     if (as->parms[3].items) {
1364         /* -stat */
1365         cacheStatEntries = atoi(as->parms[3].items->data);
1366     }
1367     if (as->parms[4].items) {
1368         /* -memcache */
1369         cacheBaseDir[0] = '\0';
1370         sawCacheBaseDir = 1;
1371         cacheFlags |= AFSCALL_INIT_MEMCACHE;
1372         if (chunkSize == 0)
1373             chunkSize = 13;
1374     }
1375     if (as->parms[5].items) {
1376         /* -cachedir */
1377         strcpy(cacheBaseDir, as->parms[5].items->data);
1378         sawCacheBaseDir = 1;
1379     }
1380     if (as->parms[6].items) {
1381         /* -mountdir */
1382         strcpy(cacheMountDir, as->parms[6].items->data);
1383         sawCacheMountDir = 1;
1384     }
1385     if (as->parms[7].items) {
1386         /* -daemons */
1387         nDaemons = atoi(as->parms[7].items->data);
1388     }
1389     if (as->parms[8].items) {
1390         /* -nosettime */
1391         cacheSetTime = FALSE;
1392     }
1393     if (as->parms[9].items) {
1394         /* -verbose */
1395         afsd_verbose = 1;
1396     }
1397     if (as->parms[10].items) {
1398         /* -rmtsys */
1399         afsd_rmtsys = 1;
1400     }
1401     if (as->parms[11].items) {
1402         /* -debug */
1403         afsd_debug = 1;
1404         afsd_verbose = 1;
1405     }
1406     if (as->parms[12].items) {
1407         /* -chunksize */
1408         chunkSize = atoi(as->parms[12].items->data);
1409         if (chunkSize < 0 || chunkSize > 30) {
1410             printf
1411                 ("afsd:invalid chunk size (not in range 0-30), using default\n");
1412             chunkSize = 0;
1413         }
1414     }
1415     if (as->parms[13].items) {
1416         /* -dcache */
1417         dCacheSize = atoi(as->parms[13].items->data);
1418         sawDCacheSize = 1;
1419     }
1420     if (as->parms[14].items) {
1421         /* -volumes */
1422         vCacheSize = atoi(as->parms[14].items->data);
1423     }
1424     if (as->parms[15].items) {
1425         /* -biods */
1426 #ifndef AFS_AIX32_ENV
1427         printf
1428             ("afsd: [-biods] currently only enabled for aix3.x VM supported systems\n");
1429 #else
1430         nBiods = atoi(as->parms[15].items->data);
1431         sawBiod = 1;
1432 #endif
1433     }
1434     if (as->parms[16].items) {
1435         /* -prealloc */
1436         preallocs = atoi(as->parms[16].items->data);
1437     }
1438 #ifdef notdef
1439     if (as->parms[17].items) {
1440         /* -pininodes */
1441         inodes = atoi(as->parms[17].items->data);
1442     }
1443 #endif
1444     strcpy(confDir, AFSDIR_CLIENT_ETC_DIRPATH);
1445     if (as->parms[17].items) {
1446         /* -confdir */
1447         strcpy(confDir, as->parms[17].items->data);
1448     }
1449     sprintf(fullpn_CacheInfo, "%s/%s", confDir, CACHEINFOFILE);
1450     sprintf(fullpn_AFSLogFile, "%s/%s", confDir, AFSLOGFILE);
1451     if (as->parms[18].items) {
1452         /* -logfile */
1453         strcpy(fullpn_AFSLogFile, as->parms[18].items->data);
1454     }
1455     if (as->parms[19].items) {
1456         /* -waitclose */
1457         afsd_CloseSynch = 1;
1458     }
1459     if (as->parms[20].items) {
1460         /* -shutdown */
1461         afs_shutdown = 1;
1462         /* 
1463          * Cold shutdown is the default
1464          */
1465         printf("afsd: Shutting down all afs processes and afs state\n");
1466         code = call_syscall(AFSOP_SHUTDOWN, 1);
1467         if (code) {
1468             printf("afsd: AFS still mounted; Not shutting down\n");
1469             exit(1);
1470         }
1471         exit(0);
1472     }
1473     if (as->parms[21].items) {
1474         /* -enable_peer_stats */
1475         enable_peer_stats = 1;
1476     }
1477     if (as->parms[22].items) {
1478         /* -enable_process_stats */
1479         enable_process_stats = 1;
1480     }
1481     if (as->parms[23].items) {
1482         /* -mem_alloc_sleep */
1483         cacheFlags |= AFSCALL_INIT_MEMCACHE_SLEEP;
1484     }
1485     if (as->parms[24].items) {
1486         /* -afsdb */
1487 #ifdef AFS_AFSDB_ENV
1488         enable_afsdb = 1;
1489 #else
1490         printf("afsd: No AFSDB support; ignoring -afsdb");
1491 #endif
1492     }
1493     if (as->parms[25].items) {
1494         /* -files_per_subdir */
1495         int res = atoi(as->parms[25].items->data);
1496         if (res < 10 || res > 2 ^ 30) {
1497             printf
1498                 ("afsd:invalid number of files per subdir, \"%s\". Ignored\n",
1499                  as->parms[25].items->data);
1500         } else {
1501             nFilesPerDir = res;
1502         }
1503     }
1504     if (as->parms[26].items) {
1505         /* -dynroot */
1506         enable_dynroot = 1;
1507     }
1508     if (as->parms[27].items) {
1509         /* -fakestat */
1510         enable_fakestat = 2;
1511     }
1512     if (as->parms[28].items) {
1513         /* -fakestat-all */
1514         enable_fakestat = 1;
1515     }
1516     if (as->parms[29].items) {
1517         /* -nomount */
1518         enable_nomount = 1;
1519     }
1520     if (as->parms[30].items) {
1521         /* -backuptree */
1522         enable_backuptree = 1;
1523     }
1524     if (as->parms[31].items) {
1525         /* -rxbind */
1526         enable_rxbind = 1;
1527     }
1528     if (as->parms[32].items) {
1529         /* -settime */
1530         cacheSetTime = TRUE;
1531     }
1532
1533     /* set rx_extraPackets */
1534     if (as->parms[33].items) {
1535         /* -rxpck */
1536         int rxpck = atoi(as->parms[33].items->data);
1537         printf("afsd: set rxpck = %d\n", rxpck);
1538         code = call_syscall(AFSOP_SET_RXPCK, rxpck);
1539         if (code) {
1540             printf("afsd: failed to set rxpck\n");
1541             exit(1);
1542         }
1543     }
1544     if (as->parms[34].items) {
1545         char *c;
1546         if (!as->parms[34].items->data ||
1547             ((c = strchr(as->parms[34].items->data, '/')) == NULL))
1548             printf
1549                 ("ignoring splitcache (specify as RW/RO percentages: 60/40)\n");
1550         else {
1551             ropct = atoi((char *)c + 1);
1552             *c = '\0';
1553             rwpct = atoi((char *)as->parms[30].items->data);
1554             if ((rwpct != 0) && (ropct != 0) && (ropct + rwpct == 100)) {
1555                 /* -splitcache */
1556                 enable_splitcache = 1;
1557             }
1558         }
1559     }
1560     /*
1561      * Pull out all the configuration info for the workstation's AFS cache and
1562      * the cellular community we're willing to let our users see.
1563      */
1564     cdir = afsconf_Open(confDir);
1565     if (!cdir) {
1566         printf("afsd: some file missing or bad in %s\n", confDir);
1567         exit(1);
1568     }
1569
1570     lookupResult =
1571         afsconf_GetLocalCell(cdir, LclCellName, sizeof(LclCellName));
1572     if (lookupResult) {
1573         printf("%s: Can't get my home cell name!  [Error is %d]\n", rn,
1574                lookupResult);
1575     } else {
1576         if (afsd_verbose)
1577             printf("%s: My home cell is '%s'\n", rn, LclCellName);
1578     }
1579
1580     /* parse cacheinfo file if this is a diskcache */
1581     if (ParseCacheInfoFile()) {
1582         exit(1);
1583     }
1584
1585     if ((logfd = fopen(fullpn_AFSLogFile, "r+")) == 0) {
1586         if (afsd_verbose)
1587             printf("%s: Creating '%s'\n", rn, fullpn_AFSLogFile);
1588         if (CreateCacheFile(fullpn_AFSLogFile, NULL)) {
1589             printf
1590                 ("%s: Can't create '%s' (You may want to use the -logfile option)\n",
1591                  rn, fullpn_AFSLogFile);
1592             exit(1);
1593         }
1594     } else
1595         fclose(logfd);
1596
1597     /* do some random computations in memcache case to get things to work
1598      * reasonably no matter which parameters you set.
1599      */
1600     if (cacheFlags & AFSCALL_INIT_MEMCACHE) {
1601         /* memory cache: size described either as blocks or dcache entries, but
1602          * not both.
1603          */
1604         if (sawDCacheSize) {
1605             if (sawCacheBlocks) {
1606                 printf
1607                     ("%s: can't set cache blocks and dcache size simultaneously when diskless.\n",
1608                      rn);
1609                 exit(1);
1610             }
1611             /* compute the cache size based on # of chunks times the chunk size */
1612             i = (chunkSize == 0 ? 13 : chunkSize);
1613             i = (1 << i);       /* bytes per chunk */
1614             cacheBlocks = i * dCacheSize;
1615             sawCacheBlocks = 1; /* so that ParseCacheInfoFile doesn't overwrite */
1616         } else {
1617             /* compute the dcache size from overall cache size and chunk size */
1618             i = (chunkSize == 0 ? 13 : chunkSize);
1619             /* dCacheSize = (cacheBlocks << 10) / (1<<i); */
1620             if (i > 10) {
1621                 dCacheSize = (cacheBlocks >> (i - 10));
1622             } else if (i < 10) {
1623                 dCacheSize = (cacheBlocks << (10 - i));
1624             } else {
1625                 dCacheSize = cacheBlocks;
1626             }
1627             /* don't have to set sawDCacheSize here since it isn't overwritten
1628              * by ParseCacheInfoFile.
1629              */
1630         }
1631         /* kernel computes # of dcache entries as min of cacheFiles and dCacheSize,
1632          * so we now make them equal.
1633          */
1634         cacheFiles = dCacheSize;
1635     } else {
1636         /* Disk cache:
1637          * Compute the number of cache files based on cache size,
1638          * but only if -files isn't given on the command line.
1639          * Don't let # files be so small as to prevent full utilization 
1640          * of the cache unless user has explicitly asked for it.
1641          * average V-file is ~10K, according to tentative empirical studies.
1642          */
1643         if (!filesSet) {
1644             cacheFiles = cacheBlocks / 10;
1645             if (cacheFiles < 100)
1646                 cacheFiles = 100;
1647             /* Always allow more files than chunks.  Presume average V-file 
1648              * is ~67% of a chunk...  (another guess, perhaps Honeyman will
1649              * have a grad student write a paper).  i is KILOBYTES.
1650              */
1651             i = 1 << (chunkSize ==
1652                       0 ? 6 : (chunkSize < 10 ? 0 : chunkSize - 10));
1653             cacheFiles = max(cacheFiles, 1.5 * (cacheBlocks / i));
1654             /* never permit more files than blocks, while leaving space for
1655              * VolumeInfo and CacheItems files.  VolumeInfo is usually 20K,
1656              * CacheItems is 50 Bytes / file (== 1K/20)
1657              */
1658 #define VOLINFOSZ 20
1659 #define CACHEITMSZ (cacheFiles / 20)
1660 #ifdef AFS_AIX_ENV
1661             cacheFiles =
1662                 min(cacheFiles, (cacheBlocks - VOLINFOSZ - CACHEITMSZ) / 4);
1663 #else
1664             cacheFiles =
1665                 min(cacheFiles, cacheBlocks - VOLINFOSZ - CACHEITMSZ);
1666 #endif
1667             if (cacheFiles < 100)
1668                 fprintf(stderr, "%s: WARNING: cache probably too small!\n",
1669                         rn);
1670         }
1671         if (!sawDCacheSize) {
1672             if ((cacheFiles / 2) > dCacheSize)
1673                 dCacheSize = cacheFiles / 2;
1674             if (dCacheSize > 2000)
1675                 dCacheSize = 2000;
1676         }
1677     }
1678
1679     /*
1680      * Create and zero the inode table for the desired cache files.
1681      */
1682     inode_for_V = (AFSD_INO_T *) malloc(cacheFiles * sizeof(AFSD_INO_T));
1683     if (inode_for_V == (AFSD_INO_T *) 0) {
1684         printf
1685             ("%s: malloc() failed for cache file inode table with %d entries.\n",
1686              rn, cacheFiles);
1687         exit(1);
1688     }
1689     memset(inode_for_V, '\0', (cacheFiles * sizeof(AFSD_INO_T)));
1690     if (afsd_debug)
1691         printf("%s: %d inode_for_V entries at 0x%x, %d bytes\n", rn,
1692                cacheFiles, inode_for_V, (cacheFiles * sizeof(AFSD_INO_T)));
1693
1694     /*
1695      * Set up all the pathnames we'll need for later.
1696      */
1697     sprintf(fullpn_DCacheFile, "%s/%s", cacheBaseDir, DCACHEFILE);
1698     sprintf(fullpn_VolInfoFile, "%s/%s", cacheBaseDir, VOLINFOFILE);
1699     sprintf(fullpn_CellInfoFile, "%s/%s", cacheBaseDir, CELLINFOFILE);
1700     sprintf(fullpn_VFile, "%s/", cacheBaseDir);
1701     vFilePtr = fullpn_VFile + strlen(fullpn_VFile);
1702
1703     if (!(cacheFlags & AFSCALL_INIT_MEMCACHE)
1704         && (fsTypeMsg = CheckCacheBaseDir(cacheBaseDir))) {
1705         printf("%s: WARNING: Cache dir check failed (%s)\n", rn, fsTypeMsg);
1706     }
1707 #if 0
1708     fputs(AFS_GOVERNMENT_MESSAGE, stdout);
1709     fflush(stdout);
1710 #endif
1711
1712     /*
1713      * Set up all the kernel processes needed for AFS.
1714      */
1715 #ifdef mac2
1716     setpgrp(getpid(), 0);
1717 #endif /* mac2 */
1718
1719     /* Initialize RX daemons and services */
1720
1721     /* initialize the rx random number generator from user space */
1722     {
1723         /* parse multihomed address files */
1724         afs_int32 addrbuf[MAXIPADDRS], maskbuf[MAXIPADDRS],
1725             mtubuf[MAXIPADDRS];
1726         char reason[1024];
1727         code =
1728             parseNetFiles(addrbuf, maskbuf, mtubuf, MAXIPADDRS, reason,
1729                           AFSDIR_CLIENT_NETINFO_FILEPATH,
1730                           AFSDIR_CLIENT_NETRESTRICT_FILEPATH);
1731         if (code > 0) {
1732             if (enable_rxbind)
1733                 code = code | 0x80000000;
1734             call_syscall(AFSOP_ADVISEADDR, code, addrbuf, maskbuf, mtubuf);
1735         } else
1736             printf("ADVISEADDR: Error in specifying interface addresses:%s\n",
1737                    reason);
1738     }
1739
1740     /* Set realtime priority for most threads to same as for biod's. */
1741     SET_AFSD_RTPRI();
1742
1743 #ifdef  AFS_SGI53_ENV
1744 #ifdef AFS_SGI61_ENV
1745     set_staticaddrs();
1746 #else /* AFS_SGI61_ENV */
1747     code = get_nfsstaticaddr();
1748     if (code)
1749         call_syscall(AFSOP_NFSSTATICADDR, code);
1750 #endif /* AFS_SGI61_ENV */
1751 #endif /* AFS_SGI_53_ENV */
1752
1753     /* Start listener, then callback listener. Lastly, start rx event daemon.
1754      * Change in ordering is so that Linux port has socket fd in listener
1755      * process.
1756      * preallocs are passed for both listener and callback server. Only
1757      * the one which actually does the initialization uses them though.
1758      */
1759     if (preallocs < cacheStatEntries + 50)
1760         preallocs = cacheStatEntries + 50;
1761 #ifdef RXK_LISTENER_ENV
1762     if (afsd_verbose)
1763         printf("%s: Forking rx listener daemon.\n", rn);
1764     code = fork();
1765     if (code == 0) {
1766         /* Child */
1767         SET_RX_RTPRI();         /* max advised for non-interrupts */
1768         call_syscall(AFSOP_RXLISTENER_DAEMON, preallocs, enable_peer_stats,
1769                      enable_process_stats);
1770         exit(1);
1771     }
1772 #endif
1773     if (afsd_verbose)
1774         printf("%s: Forking rx callback listener.\n", rn);
1775     code = fork();
1776     if (code == 0) {
1777         /* Child */
1778         call_syscall(AFSOP_START_RXCALLBACK, preallocs);
1779         exit(1);
1780     }
1781 #if defined(AFS_SUN5_ENV) || defined(RXK_LISTENER_ENV)
1782     if (afsd_verbose)
1783         printf("%s: Forking rxevent daemon.\n", rn);
1784     code = fork();
1785     if (code == 0) {
1786         /* Child */
1787         SET_RX_RTPRI();         /* max advised for non-interrupts */
1788         call_syscall(AFSOP_RXEVENT_DAEMON);
1789         exit(1);
1790     }
1791 #endif
1792
1793 #ifdef AFS_AFSDB_ENV
1794     if (enable_afsdb) {
1795         if (afsd_verbose)
1796             printf("%s: Forking AFSDB lookup handler.\n", rn);
1797         code = fork();
1798         if (code == 0) {
1799             /* Since the AFSDB lookup handler runs as a user process, 
1800              * need to drop the controlling TTY, etc.
1801              */
1802             if (daemon(0, 0) == -1) {
1803                 printf("Error starting AFSDB lookup handler: %s\n",
1804                        strerror(errno));
1805                 exit(1);
1806             }
1807             AfsdbLookupHandler();
1808             exit(1);
1809         }
1810     }
1811 #endif
1812
1813     code = call_syscall(AFSOP_BASIC_INIT, 1);
1814     if (code)
1815         printf("%s: Error %d in basic initialization.\n", rn, code);
1816
1817     /*
1818      * Tell the kernel some basic information about the workstation's cache.
1819      */
1820     if (afsd_verbose)
1821         printf
1822             ("%s: Calling AFSOP_CACHEINIT: %d stat cache entries, %d optimum cache files, %d blocks in the cache, flags = 0x%x, dcache entries %d\n",
1823              rn, cacheStatEntries, cacheFiles, cacheBlocks, cacheFlags,
1824              dCacheSize);
1825     memset(&cparams, '\0', sizeof(cparams));
1826     cparams.cacheScaches = cacheStatEntries;
1827     cparams.cacheFiles = cacheFiles;
1828     cparams.cacheBlocks = cacheBlocks;
1829     cparams.cacheDcaches = dCacheSize;
1830     cparams.cacheVolumes = vCacheSize;
1831     cparams.chunkSize = chunkSize;
1832     cparams.setTimeFlag = cacheSetTime;
1833     cparams.memCacheFlag = cacheFlags;
1834 #ifdef notdef
1835     cparams.inodes = inodes;
1836 #endif
1837     call_syscall(AFSOP_CACHEINIT, &cparams);
1838
1839     /* do it before we init the cache inodes */
1840     if (enable_splitcache) {
1841         call_syscall(AFSOP_BUCKETPCT, 1, rwpct);
1842         call_syscall(AFSOP_BUCKETPCT, 2, ropct);
1843     }
1844
1845     if (afsd_CloseSynch)
1846         call_syscall(AFSOP_CLOSEWAIT);
1847
1848     /*
1849      * Sweep the workstation AFS cache directory, remembering the inodes of
1850      * valid files and deleting extraneous files.  Keep sweeping until we
1851      * have the right number of data cache files or we've swept too many
1852      * times.
1853      *
1854      * This also creates files in the cache directory like VolumeItems and
1855      * CellItems, and thus must be ran before those are sent to the kernel.
1856      */
1857     if (afsd_verbose)
1858         printf("%s: Sweeping workstation's AFS cache directory.\n", rn);
1859     cacheIteration = 0;
1860     /* Memory-cache based system doesn't need any of this */
1861     if (!(cacheFlags & AFSCALL_INIT_MEMCACHE)) {
1862         do {
1863             cacheIteration++;
1864             if (SweepAFSCache(&vFilesFound)) {
1865                 printf("%s: Error on sweep %d of workstation AFS cache \
1866                        directory.\n", rn, cacheIteration);
1867                 exit(1);
1868             }
1869             if (afsd_verbose)
1870                 printf
1871                     ("%s: %d out of %d data cache files found in sweep %d.\n",
1872                      rn, vFilesFound, cacheFiles, cacheIteration);
1873         } while ((vFilesFound < cacheFiles)
1874                  && (cacheIteration < MAX_CACHE_LOOPS));
1875     } else if (afsd_verbose)
1876         printf("%s: Using memory cache, not swept\n", rn);
1877
1878     /*
1879      * Pass the kernel the name of the workstation cache file holding the 
1880      * dcache entries.
1881      */
1882     if (afsd_debug)
1883         printf("%s: Calling AFSOP_CACHEINFO: dcache file is '%s'\n", rn,
1884                fullpn_DCacheFile);
1885     /* once again, meaningless for a memory-based cache. */
1886     if (!(cacheFlags & AFSCALL_INIT_MEMCACHE))
1887         call_syscall(AFSOP_CACHEINFO, fullpn_DCacheFile);
1888
1889     /*
1890      * Pass the kernel the name of the workstation cache file holding the
1891      * cell information.
1892      */
1893     if (afsd_debug)
1894         printf("%s: Calling AFSOP_CELLINFO: cell info file is '%s'\n", rn,
1895                fullpn_CellInfoFile);
1896     call_syscall(AFSOP_CELLINFO, fullpn_CellInfoFile);
1897
1898     if (enable_dynroot) {
1899         if (afsd_verbose)
1900             printf("%s: Enabling dynroot support in kernel.\n", rn);
1901         code = call_syscall(AFSOP_SET_DYNROOT, 1);
1902         if (code)
1903             printf("%s: Error enabling dynroot support.\n", rn);
1904     }
1905
1906     if (enable_fakestat) {
1907         if (afsd_verbose)
1908             printf("%s: Enabling fakestat support in kernel.\n", rn);
1909         code = call_syscall(AFSOP_SET_FAKESTAT, enable_fakestat);
1910         if (code)
1911             printf("%s: Error enabling fakestat support.\n", rn);
1912     }
1913
1914     if (enable_backuptree) {
1915         if (afsd_verbose)
1916             printf("%s: Enabling backup tree support in kernel.\n", rn);
1917         code = call_syscall(AFSOP_SET_BACKUPTREE, enable_backuptree);
1918         if (code)
1919             printf("%s: Error enabling backup tree support.\n", rn);
1920     }
1921
1922     /*
1923      * Tell the kernel about each cell in the configuration.
1924      */
1925     afsconf_CellApply(cdir, ConfigCell, NULL);
1926     afsconf_CellAliasApply(cdir, ConfigCellAlias, NULL);
1927
1928     /*
1929      * Set the primary cell name.
1930      */
1931     call_syscall(AFSOP_SET_THISCELL, LclCellName);
1932
1933     /* Initialize AFS daemon threads. */
1934     if (afsd_verbose)
1935         printf("%s: Forking AFS daemon.\n", rn);
1936     code = fork();
1937     if (code == 0) {
1938         /* Child */
1939         call_syscall(AFSOP_START_AFS);
1940         exit(1);
1941     }
1942
1943     if (afsd_verbose)
1944         printf("%s: Forking Check Server Daemon.\n", rn);
1945     code = fork();
1946     if (code == 0) {
1947         /* Child */
1948         code = call_syscall(AFSOP_START_CS);
1949         if (code)
1950             printf("%s: No check server daemon in client.\n", rn);
1951         exit(1);
1952     }
1953
1954     if (afsd_verbose)
1955         printf("%s: Forking %d background daemons.\n", rn, nDaemons);
1956 #if defined(AFS_SGI_ENV) && defined(AFS_SGI_SHORTSTACK)
1957     /* Add one because for sgi we always "steal" the first daemon for a
1958      * different task if we only have a 4K stack.
1959      */
1960     nDaemons++;
1961 #endif
1962     for (i = 0; i < nDaemons; i++) {
1963         code = fork();
1964         if (code == 0) {
1965             /* Child */
1966 #ifdef  AFS_AIX32_ENV
1967             call_syscall(AFSOP_START_BKG, 0);
1968 #else
1969             call_syscall(AFSOP_START_BKG);
1970 #endif
1971             exit(1);
1972         }
1973     }
1974 #ifdef  AFS_AIX32_ENV
1975     if (!sawBiod)
1976         nBiods = nDaemons * 2;
1977     if (nBiods < 5)
1978         nBiods = 5;
1979     for (i = 0; i < nBiods; i++) {
1980         code = fork();
1981         if (code == 0) {        /* Child */
1982             call_syscall(AFSOP_START_BKG, nBiods);
1983             exit(1);
1984         }
1985     }
1986 #endif
1987
1988     /*
1989      * If the root volume has been explicitly set, tell the kernel.
1990      */
1991     if (rootVolSet) {
1992         if (afsd_verbose)
1993             printf("%s: Calling AFSOP_ROOTVOLUME with '%s'\n", rn,
1994                    rootVolume);
1995         call_syscall(AFSOP_ROOTVOLUME, rootVolume);
1996     }
1997
1998     /*
1999      * Pass the kernel the name of the workstation cache file holding the
2000      * volume information.
2001      */
2002     if (afsd_debug)
2003         printf("%s: Calling AFSOP_VOLUMEINFO: volume info file is '%s'\n", rn,
2004                fullpn_VolInfoFile);
2005     /* once again, meaningless for a memory-based cache. */
2006     if (!(cacheFlags & AFSCALL_INIT_MEMCACHE))
2007         call_syscall(AFSOP_VOLUMEINFO, fullpn_VolInfoFile);
2008
2009     /*
2010      * Pass the kernel the name of the afs logging file holding the volume
2011      * information.
2012      */
2013     if (afsd_debug)
2014         printf("%s: Calling AFSOP_AFSLOG: volume info file is '%s'\n", rn,
2015                fullpn_AFSLogFile);
2016 #if defined(AFS_SGI_ENV)
2017     /* permit explicit -logfile argument to enable logging on memcache systems */
2018     if (!(cacheFlags & AFSCALL_INIT_MEMCACHE) || as->parms[18].items)
2019 #else
2020     if (!(cacheFlags & AFSCALL_INIT_MEMCACHE))  /* ... nor this ... */
2021 #endif
2022         call_syscall(AFSOP_AFSLOG, fullpn_AFSLogFile);
2023
2024     /*
2025      * Give the kernel the names of the AFS files cached on the workstation's
2026      * disk.
2027      */
2028     if (afsd_debug)
2029         printf
2030             ("%s: Calling AFSOP_CACHEINODE for each of the %d files in '%s'\n",
2031              rn, cacheFiles, cacheBaseDir);
2032     if (!(cacheFlags & AFSCALL_INIT_MEMCACHE))  /* ... and again ... */
2033         for (currVFile = 0; currVFile < cacheFiles; currVFile++) {
2034 #ifdef AFS_SGI62_ENV
2035             call_syscall(AFSOP_CACHEINODE,
2036                          (afs_uint32) (inode_for_V[currVFile] >> 32),
2037                          (afs_uint32) (inode_for_V[currVFile] & 0xffffffff));
2038 #else
2039             call_syscall(AFSOP_CACHEINODE, inode_for_V[currVFile]);
2040 #endif
2041         }
2042
2043
2044     /*end for */
2045     /*
2046      * All the necessary info has been passed into the kernel to run an AFS
2047      * system.  Give the kernel our go-ahead.
2048      */
2049     if (afsd_debug)
2050         printf("%s: Calling AFSOP_GO with cacheSetTime = %d\n", rn,
2051                cacheSetTime);
2052     call_syscall(AFSOP_GO, cacheSetTime);
2053
2054     /*
2055      * At this point, we have finished passing the kernel all the info 
2056      * it needs to set up the AFS.  Mount the AFS root.
2057      */
2058     printf("%s: All AFS daemons started.\n", rn);
2059
2060     if (afsd_verbose)
2061         printf("%s: Forking trunc-cache daemon.\n", rn);
2062     code = fork();
2063     if (code == 0) {
2064         /* Child */
2065         call_syscall(AFSOP_START_TRUNCDAEMON);
2066         exit(1);
2067     }
2068
2069     if (!enable_nomount) {
2070
2071         mountFlags = 0;         /* Read/write file system, can do setuid() */
2072 #if     defined(AFS_SUN_ENV) || defined(AFS_SUN5_ENV)
2073 #ifdef  AFS_SUN5_ENV
2074         mountFlags |= MS_DATA;
2075 #else
2076         mountFlags |= M_NEWTYPE;        /* This searches by name in vfs_conf.c so don't need to recompile vfs.c because MOUNT_MAXTYPE has changed; it seems that Sun fixed this at last... */
2077 #endif
2078 #endif
2079
2080 #if defined(AFS_HPUX100_ENV)
2081         mountFlags |= MS_DATA;
2082 #endif
2083
2084         if (afsd_verbose)
2085             printf("%s: Mounting the AFS root on '%s', flags: %d.\n", rn,
2086                    cacheMountDir, mountFlags);
2087 #if defined(AFS_FBSD60_ENV)
2088         /* data must be non-NULL but is otherwise ignored */
2089         if ((mount(MOUNT_AFS, cacheMountDir, mountFlags, rn)) < 0) {
2090 #elif defined(AFS_FBSD_ENV)
2091         if ((mount("AFS", cacheMountDir, mountFlags, (caddr_t) 0)) < 0) {
2092 #elif defined(AFS_AIX_ENV)
2093         if (aix_vmount()) {
2094 #elif defined(AFS_HPUX100_ENV)
2095         if ((mount("", cacheMountDir, mountFlags, "afs", NULL, 0)) < 0) {
2096 #elif defined(AFS_SUN5_ENV)
2097         if ((mount("AFS", cacheMountDir, mountFlags, "afs", NULL, 0)) < 0) {
2098 #elif defined(AFS_SGI_ENV)
2099         mountFlags = MS_FSS;
2100         if ((mount(MOUNT_AFS, cacheMountDir, mountFlags, (caddr_t) MOUNT_AFS))
2101             < 0) {
2102 #elif defined(AFS_LINUX20_ENV)
2103         if ((mount("AFS", cacheMountDir, MOUNT_AFS, 0, NULL)) < 0) {
2104 #else
2105 /* This is the standard mount used by the suns and rts */
2106         if ((mount(MOUNT_AFS, cacheMountDir, mountFlags, (caddr_t) 0)) < 0) {
2107 #endif
2108             printf("%s: Can't mount AFS on %s(%d)\n", rn, cacheMountDir,
2109                    errno);
2110             exit(1);
2111         }
2112
2113         HandleMTab();
2114
2115     }
2116
2117     if (afsd_rmtsys) {
2118         if (afsd_verbose)
2119             printf("%s: Forking 'rmtsys' daemon.\n", rn);
2120         code = fork();
2121         if (code == 0) {
2122             /* Child */
2123             rmtsysd();
2124             exit(1);
2125         }
2126     }
2127     /*
2128      * Exit successfully.
2129      */
2130     exit(0);
2131 }
2132
2133 #include "AFS_component_version_number.c"
2134
2135
2136
2137 main(argc, argv)
2138      int argc;
2139      char **argv;
2140 {
2141     struct cmd_syndesc *ts;
2142
2143     ts = cmd_CreateSyntax(NULL, mainproc, NULL, "start AFS");
2144     cmd_AddParm(ts, "-blocks", CMD_SINGLE, CMD_OPTIONAL,
2145                 "1024 byte blocks in cache");
2146     cmd_AddParm(ts, "-files", CMD_SINGLE, CMD_OPTIONAL, "files in cache");
2147     cmd_AddParm(ts, "-rootvol", CMD_SINGLE, CMD_OPTIONAL,
2148                 "name of AFS root volume");
2149     cmd_AddParm(ts, "-stat", CMD_SINGLE, CMD_OPTIONAL,
2150                 "number of stat entries");
2151     cmd_AddParm(ts, "-memcache", CMD_FLAG, CMD_OPTIONAL, "run diskless");
2152     cmd_AddParm(ts, "-cachedir", CMD_SINGLE, CMD_OPTIONAL, "cache directory");
2153     cmd_AddParm(ts, "-mountdir", CMD_SINGLE, CMD_OPTIONAL, "mount location");
2154     cmd_AddParm(ts, "-daemons", CMD_SINGLE, CMD_OPTIONAL,
2155                 "number of daemons to use");
2156     cmd_AddParm(ts, "-nosettime", CMD_FLAG, CMD_OPTIONAL,
2157                 "don't set the time");
2158     cmd_AddParm(ts, "-verbose", CMD_FLAG, CMD_OPTIONAL,
2159                 "display lots of information");
2160     cmd_AddParm(ts, "-rmtsys", CMD_FLAG, CMD_OPTIONAL,
2161                 "start NFS rmtsysd program");
2162     cmd_AddParm(ts, "-debug", CMD_FLAG, CMD_OPTIONAL, "display debug info");
2163     cmd_AddParm(ts, "-chunksize", CMD_SINGLE, CMD_OPTIONAL,
2164                 "log(2) of chunk size");
2165     cmd_AddParm(ts, "-dcache", CMD_SINGLE, CMD_OPTIONAL,
2166                 "number of dcache entries");
2167     cmd_AddParm(ts, "-volumes", CMD_SINGLE, CMD_OPTIONAL,
2168                 "number of volume entries");
2169     cmd_AddParm(ts, "-biods", CMD_SINGLE, CMD_OPTIONAL,
2170                 "number of bkg I/O daemons (aix vm)");
2171
2172     cmd_AddParm(ts, "-prealloc", CMD_SINGLE, CMD_OPTIONAL,
2173                 "number of 'small' preallocated blocks");
2174 #ifdef notdef
2175     cmd_AddParm(ts, "-pininodes", CMD_SINGLE, CMD_OPTIONAL,
2176                 "number of inodes to hog");
2177 #endif
2178     cmd_AddParm(ts, "-confdir", CMD_SINGLE, CMD_OPTIONAL,
2179                 "configuration directory");
2180     cmd_AddParm(ts, "-logfile", CMD_SINGLE, CMD_OPTIONAL,
2181                 "Place to keep the CM log");
2182     cmd_AddParm(ts, "-waitclose", CMD_FLAG, CMD_OPTIONAL,
2183                 "make close calls synchronous");
2184     cmd_AddParm(ts, "-shutdown", CMD_FLAG, CMD_OPTIONAL,
2185                 "Shutdown all afs state");
2186     cmd_AddParm(ts, "-enable_peer_stats", CMD_FLAG, CMD_OPTIONAL | CMD_HIDE,
2187                 "Collect rpc statistics by peer");
2188     cmd_AddParm(ts, "-enable_process_stats", CMD_FLAG,
2189                 CMD_OPTIONAL | CMD_HIDE,
2190                 "Collect rpc statistics for this process");
2191     cmd_AddParm(ts, "-mem_alloc_sleep", CMD_FLAG, (CMD_OPTIONAL | CMD_HIDE),
2192                 "Allow sleeps when allocating memory cache");
2193     cmd_AddParm(ts, "-afsdb", CMD_FLAG, (CMD_OPTIONAL
2194 #ifndef AFS_AFSDB_ENV
2195                                          | CMD_HIDE
2196 #endif
2197                 ), "Enable AFSDB support");
2198     cmd_AddParm(ts, "-files_per_subdir", CMD_SINGLE, CMD_OPTIONAL,
2199                 "log(2) of the number of cache files per cache subdirectory");
2200     cmd_AddParm(ts, "-dynroot", CMD_FLAG, CMD_OPTIONAL,
2201                 "Enable dynroot support");
2202     cmd_AddParm(ts, "-fakestat", CMD_FLAG, CMD_OPTIONAL,
2203                 "Enable fakestat support for cross-cell mounts");
2204     cmd_AddParm(ts, "-fakestat-all", CMD_FLAG, CMD_OPTIONAL,
2205                 "Enable fakestat support for all mounts");
2206     cmd_AddParm(ts, "-nomount", CMD_FLAG, CMD_OPTIONAL, "Do not mount AFS");
2207     cmd_AddParm(ts, "-backuptree", CMD_FLAG, CMD_OPTIONAL,
2208                 "Prefer backup volumes for mointpoints in backup volumes");
2209     cmd_AddParm(ts, "-rxbind", CMD_FLAG, CMD_OPTIONAL,
2210                 "Bind the Rx socket (one interface only)");
2211     cmd_AddParm(ts, "-settime", CMD_FLAG, CMD_OPTIONAL, "don't set the time");
2212     cmd_AddParm(ts, "-rxpck", CMD_SINGLE, CMD_OPTIONAL,
2213                 "set rx_extraPackets to this value");
2214     cmd_AddParm(ts, "-splitcache", CMD_SINGLE, CMD_OPTIONAL,
2215                 "Percentage RW versus RO in cache (specify as 60/40)");
2216
2217     return (cmd_Dispatch(argc, argv));
2218 }
2219
2220
2221 #ifdef  AFS_HPUX_ENV
2222 #define MOUNTED_TABLE   MNT_MNTTAB
2223 #else
2224 #ifdef  AFS_SUN5_ENV
2225 #define MOUNTED_TABLE   MNTTAB
2226 #else
2227 #define MOUNTED_TABLE   MOUNTED
2228 #endif
2229 #endif
2230
2231 static int
2232 HandleMTab()
2233 {
2234 #if (defined (AFS_SUN_ENV) || defined (AFS_HPUX_ENV) || defined(AFS_SUN5_ENV) || defined(AFS_SGI_ENV) || defined(AFS_LINUX20_ENV)) && !defined(AFS_SUN58_ENV)
2235     FILE *tfilep;
2236 #ifdef  AFS_SUN5_ENV
2237     char tbuf[16];
2238     struct mnttab tmntent;
2239
2240     memset(&tmntent, '\0', sizeof(struct mnttab));
2241     if (!(tfilep = fopen(MOUNTED_TABLE, "a+"))) {
2242         printf("Can't open %s\n", MOUNTED_TABLE);
2243         perror(MNTTAB);
2244         exit(-1);
2245     }
2246     tmntent.mnt_special = "AFS";
2247     tmntent.mnt_mountp = cacheMountDir;
2248     tmntent.mnt_fstype = "xx";
2249     tmntent.mnt_mntopts = "rw";
2250     sprintf(tbuf, "%ld", (long)time((time_t *) 0));
2251     tmntent.mnt_time = tbuf;
2252     putmntent(tfilep, &tmntent);
2253     fclose(tfilep);
2254 #else
2255 #if defined(AFS_SGI_ENV) || defined(AFS_LINUX20_ENV)
2256     struct mntent tmntent;
2257
2258     tfilep = setmntent("/etc/mtab", "a+");
2259     tmntent.mnt_fsname = "AFS";
2260     tmntent.mnt_dir = cacheMountDir;
2261     tmntent.mnt_type = "afs";
2262     tmntent.mnt_opts = "rw";
2263     tmntent.mnt_freq = 1;
2264     tmntent.mnt_passno = 3;
2265     addmntent(tfilep, &tmntent);
2266     endmntent(tfilep);
2267 #else
2268     struct mntent tmntent;
2269
2270     memset(&tmntent, '\0', sizeof(struct mntent));
2271     tfilep = setmntent(MOUNTED_TABLE, "a+");
2272     if (!tfilep) {
2273         printf("Can't open %s for write; Not adding afs entry to it\n",
2274                MOUNTED_TABLE);
2275         return 1;
2276     }
2277     tmntent.mnt_fsname = "AFS";
2278     tmntent.mnt_dir = cacheMountDir;
2279     tmntent.mnt_type = "xx";
2280     tmntent.mnt_opts = "rw";
2281     tmntent.mnt_freq = 1;
2282     tmntent.mnt_passno = 3;
2283 #ifdef  AFS_HPUX_ENV
2284     tmntent.mnt_type = "afs";
2285     tmntent.mnt_time = time(0);
2286     tmntent.mnt_cnode = 0;
2287 #endif
2288     addmntent(tfilep, &tmntent);
2289     endmntent(tfilep);
2290 #endif /* AFS_SGI_ENV */
2291 #endif /* AFS_SUN5_ENV */
2292 #endif /* unreasonable systems */
2293 #ifdef AFS_DARWIN_ENV
2294     mach_port_t diskarb_port;
2295     kern_return_t status;
2296
2297     status = DiskArbStart(&diskarb_port);
2298     if (status == KERN_SUCCESS) {
2299         status =
2300             DiskArbDiskAppearedWithMountpointPing_auto("AFS",
2301                                                        DISK_ARB_NETWORK_DISK_FLAG,
2302                                                        cacheMountDir);
2303     }
2304
2305     return status;
2306 #endif /* AFS_DARWIN_ENV */
2307     return 0;
2308 }
2309
2310 #if !defined(AFS_SGI_ENV) && !defined(AFS_AIX32_ENV)
2311
2312 call_syscall(param1, param2, param3, param4, param5, param6, param7)
2313      long param1, param2, param3, param4, param5, param6, param7;
2314 {
2315     int error;
2316 #ifdef AFS_LINUX20_ENV
2317     long eparm[4];
2318     struct afsprocdata syscall_data;
2319     int fd = open(PROC_SYSCALL_FNAME, O_RDWR);
2320     if (fd < 0)
2321         fd = open(PROC_SYSCALL_ARLA_FNAME, O_RDWR);
2322     eparm[0] = param4;
2323     eparm[1] = param5;
2324     eparm[2] = param6;
2325     eparm[3] = param7;
2326
2327     param4 = (long)eparm;
2328
2329     syscall_data.syscall = AFSCALL_CALL;
2330     syscall_data.param1 = param1;
2331     syscall_data.param2 = param2;
2332     syscall_data.param3 = param3;
2333     syscall_data.param4 = param4;
2334     if (fd > 0) {
2335         error = ioctl(fd, VIOC_SYSCALL, &syscall_data);
2336         close(fd);
2337     } else
2338 #endif
2339     error =
2340         syscall(AFS_SYSCALL, AFSCALL_CALL, param1, param2, param3, param4,
2341                 param5, param6, param7);
2342
2343     if (afsd_verbose)
2344         printf("SScall(%d, %d, %d)=%d ", AFS_SYSCALL, AFSCALL_CALL, param1,
2345                error);
2346     return (error);
2347 }
2348 #else /* AFS_AIX32_ENV */
2349 #if defined(AFS_SGI_ENV)
2350 call_syscall(call, parm0, parm1, parm2, parm3, parm4)
2351 {
2352
2353     int error;
2354
2355     error = afs_syscall(call, parm0, parm1, parm2, parm3, parm4);
2356     if (afsd_verbose)
2357         printf("SScall(%d, %d)=%d ", call, parm0, error);
2358
2359     return error;
2360 }
2361 #else
2362 call_syscall(call, parm0, parm1, parm2, parm3, parm4, parm5, parm6)
2363 {
2364
2365     return syscall(AFSCALL_CALL, call, parm0, parm1, parm2, parm3, parm4,
2366                    parm5, parm6);
2367 }
2368 #endif /* AFS_SGI_ENV */
2369 #endif /* AFS_AIX32_ENV */
2370
2371
2372 #ifdef  AFS_AIX_ENV
2373 /* Special handling for AIX's afs mount operation since they require much more miscl. information before making the vmount(2) syscall */
2374 #include <sys/vfs.h>
2375
2376 #define ROUNDUP(x)  (((x) + 3) & ~3)
2377
2378 aix_vmount()
2379 {
2380     struct vmount *vmountp;
2381     int size, error;
2382
2383     size = sizeof(struct vmount) + ROUNDUP(strlen(cacheMountDir) + 1) + 5 * 4;
2384     /* Malloc the vmount structure */
2385     if ((vmountp = (struct vmount *)malloc(size)) == (struct vmount *)NULL) {
2386         printf("Can't allocate space for the vmount structure (AIX)\n");
2387         exit(1);
2388     }
2389
2390     /* zero out the vmount structure */
2391     memset(vmountp, '\0', size);
2392
2393     /* transfer info into the vmount structure */
2394     vmountp->vmt_revision = VMT_REVISION;
2395     vmountp->vmt_length = size;
2396     vmountp->vmt_fsid.fsid_dev = 0;
2397     vmountp->vmt_fsid.fsid_type = AFS_MOUNT_AFS;
2398     vmountp->vmt_vfsnumber = 0;
2399     vmountp->vmt_time = 0;      /* We'll put the time soon! */
2400     vmountp->vmt_flags = VFS_DEVMOUNT;  /* read/write permission */
2401     vmountp->vmt_gfstype = AFS_MOUNT_AFS;
2402     vmountdata(vmountp, "AFS", cacheMountDir, "", "", "", "rw");
2403
2404     /* Do the actual mount system call */
2405     error = vmount(vmountp, size);
2406     free(vmountp);
2407     return (error);
2408 }
2409
2410 vmountdata(vmtp, obj, stub, host, hostsname, info, args)
2411      struct vmount *vmtp;
2412      char *obj, *stub, *host, *hostsname, *info, *args;
2413 {
2414     register struct data {
2415         short vmt_off;
2416         short vmt_size;
2417     } *vdp, *vdprev;
2418     register int size;
2419
2420     vdp = (struct data *)vmtp->vmt_data;
2421     vdp->vmt_off = sizeof(struct vmount);
2422     size = ROUNDUP(strlen(obj) + 1);
2423     vdp->vmt_size = size;
2424     strcpy(vmt2dataptr(vmtp, VMT_OBJECT), obj);
2425
2426     vdprev = vdp;
2427     vdp++;
2428     vdp->vmt_off = vdprev->vmt_off + size;
2429     size = ROUNDUP(strlen(stub) + 1);
2430     vdp->vmt_size = size;
2431     strcpy(vmt2dataptr(vmtp, VMT_STUB), stub);
2432
2433     vdprev = vdp;
2434     vdp++;
2435     vdp->vmt_off = vdprev->vmt_off + size;
2436     size = ROUNDUP(strlen(host) + 1);
2437     vdp->vmt_size = size;
2438     strcpy(vmt2dataptr(vmtp, VMT_HOST), host);
2439
2440     vdprev = vdp;
2441     vdp++;
2442     vdp->vmt_off = vdprev->vmt_off + size;
2443     size = ROUNDUP(strlen(hostsname) + 1);
2444     vdp->vmt_size = size;
2445     strcpy(vmt2dataptr(vmtp, VMT_HOSTNAME), hostsname);
2446
2447
2448     vdprev = vdp;
2449     vdp++;
2450     vdp->vmt_off = vdprev->vmt_off + size;
2451     size = ROUNDUP(strlen(info) + 1);
2452     vdp->vmt_size = size;
2453     strcpy(vmt2dataptr(vmtp, VMT_INFO), info);
2454
2455     vdprev = vdp;
2456     vdp++;
2457     vdp->vmt_off = vdprev->vmt_off + size;
2458     size = ROUNDUP(strlen(args) + 1);
2459     vdp->vmt_size = size;
2460     strcpy(vmt2dataptr(vmtp, VMT_ARGS), args);
2461 }
2462 #endif /* AFS_AIX_ENV */
2463
2464 #ifdef  AFS_SGI53_ENV
2465 #ifdef AFS_SGI61_ENV
2466 /* The dwarf structures are searched to find entry points of static functions
2467  * and the addresses of static variables. The file name as well as the
2468  * sybmol name is reaquired.
2469  */
2470
2471 /* Contains list of names to find in given file. */
2472 typedef struct {
2473     char *name;                 /* Name of variable or function. */
2474     afs_hyper_t addr;           /* Address of function, undefined if not found. */
2475     Dwarf_Half type;            /* DW_AT_location for vars, DW_AT_lowpc for func's */
2476     char found;                 /* set if found. */
2477 } staticAddrList;
2478
2479 typedef struct {
2480     char *file;                 /* Name of file containing vars or funcs */
2481     staticAddrList *addrList;   /* List of vars and/or funcs. */
2482     int nAddrs;                 /* # of addrList's */
2483     int found;                  /* set if we've found this file already. */
2484 } staticNameList;
2485
2486 /* routines used to find addresses in /unix */
2487 #if defined(AFS_SGI62_ENV) && !defined(AFS_SGI65_ENV)
2488 void findMDebugStaticAddresses(staticNameList *, int, int);
2489 #endif
2490 void findDwarfStaticAddresses(staticNameList *, int);
2491 void findElfAddresses(Dwarf_Debug, Dwarf_Die, staticNameList *);
2492 void getElfAddress(Dwarf_Debug, Dwarf_Die, staticAddrList *);
2493
2494 #if defined(AFS_SGI62_ENV) && !defined(AFS_SGI65_ENV)
2495 #define AFS_N_FILELISTS 2
2496 #define AFS_SYMS_NEEDED 3
2497 #else /* AFS_SGI62_ENV */
2498 #define AFS_N_FILELISTS 1
2499 #endif /* AFS_SGI62_ENV */
2500
2501
2502
2503 void
2504 set_staticaddrs(void)
2505 {
2506     staticNameList fileList[AFS_N_FILELISTS];
2507
2508     fileList[0].addrList =
2509         (staticAddrList *) calloc(1, sizeof(staticAddrList));
2510     if (!fileList[0].addrList) {
2511         printf("set_staticaddrs: Can't calloc fileList[0].addrList\n");
2512         return;
2513     }
2514     fileList[0].file = "nfs_server.c";
2515     fileList[0].found = 0;
2516     fileList[0].nAddrs = 1;
2517     fileList[0].addrList[0].name = "rfsdisptab_v2";
2518     fileList[0].addrList[0].type = DW_AT_location;
2519     fileList[0].addrList[0].found = 0;
2520
2521 #if defined(AFS_SGI62_ENV) && !defined(AFS_SGI65_ENV)
2522     fileList[1].addrList =
2523         (staticAddrList *) calloc(2, sizeof(staticAddrList));
2524     if (!fileList[1].addrList) {
2525         printf("set_staticaddrs: Can't malloc fileList[1].addrList\n");
2526         return;
2527     }
2528     fileList[1].file = "uipc_socket.c";
2529     fileList[1].found = 0;
2530     fileList[1].nAddrs = 2;
2531     fileList[1].addrList[0].name = "sblock";
2532     fileList[1].addrList[0].type = DW_AT_low_pc;
2533     fileList[1].addrList[0].found = 0;
2534     fileList[1].addrList[1].name = "sbunlock";
2535     fileList[1].addrList[1].type = DW_AT_low_pc;
2536     fileList[1].addrList[1].found = 0;
2537
2538     if (64 != sysconf(_SC_KERN_POINTERS))
2539         findMDebugStaticAddresses(fileList, AFS_N_FILELISTS, AFS_SYMS_NEEDED);
2540     else
2541 #endif /* AFS_SGI62_ENV */
2542         findDwarfStaticAddresses(fileList, AFS_N_FILELISTS);
2543
2544     if (fileList[0].addrList[0].found) {
2545         call_syscall(AFSOP_NFSSTATICADDR2, fileList[0].addrList[0].addr.high,
2546                      fileList[0].addrList[0].addr.low);
2547     } else {
2548         if (afsd_verbose)
2549             printf("NFS V2 is not present in the kernel.\n");
2550     }
2551     free(fileList[0].addrList);
2552 #if defined(AFS_SGI62_ENV) && !defined(AFS_SGI65_ENV)
2553     if (fileList[1].addrList[0].found && fileList[1].addrList[1].found) {
2554         call_syscall(AFSOP_SBLOCKSTATICADDR2,
2555                      fileList[1].addrList[0].addr.high,
2556                      fileList[1].addrList[0].addr.low,
2557                      fileList[1].addrList[1].addr.high,
2558                      fileList[1].addrList[1].addr.low);
2559     } else {
2560         if (!fileList[1].addrList[0].found)
2561             printf("Can't find %s in kernel. Exiting.\n",
2562                    fileList[1].addrList[0].name);
2563         if (!fileList[1].addrList[0].found)
2564             printf("Can't find %s in kernel. Exiting.\n",
2565                    fileList[1].addrList[1].name);
2566         exit(1);
2567     }
2568     free(fileList[1].addrList);
2569 #endif /* AFS_SGI62_ENV */
2570 }
2571
2572
2573 /* Find addresses for static variables and functions. */
2574 void
2575 findDwarfStaticAddresses(staticNameList * nameList, int nLists)
2576 {
2577     int fd;
2578     int i;
2579     int found = 0;
2580     int code;
2581     char *s;
2582     char *hname = (char *)0;
2583     Dwarf_Unsigned dwarf_access = O_RDONLY;
2584     Dwarf_Debug dwarf_debug;
2585     Dwarf_Error dwarf_error;
2586     Dwarf_Unsigned dwarf_cu_header_length;
2587     Dwarf_Unsigned dwarf_abbrev_offset;
2588     Dwarf_Half dwarf_address_size;
2589     Dwarf_Unsigned next_cu_header;
2590     Dwarf_Die dwarf_die;
2591     Dwarf_Die dwarf_next_die;
2592     Dwarf_Die dwarf_child_die;
2593
2594     if (elf_version(EV_CURRENT) == EV_NONE) {
2595         printf("findDwarfStaticAddresses: Bad elf version.\n");
2596         return;
2597     }
2598
2599     if ((fd = open("/unix", O_RDONLY, 0)) < 0) {
2600         printf("findDwarfStaticAddresses: Failed to open /unix.\n");
2601         return;
2602     }
2603     code =
2604         dwarf_init(fd, dwarf_access, NULL, NULL, &dwarf_debug, &dwarf_error);
2605     if (code != DW_DLV_OK) {
2606         /* Nope hope for the elves and dwarves, try intermediate code. */
2607         close(fd);
2608         return;
2609     }
2610
2611     found = 0;
2612     while (1) {
2613         /* Run through the headers until we find ones for files we've
2614          * specified in nameList.
2615          */
2616         code =
2617             dwarf_next_cu_header(dwarf_debug, &dwarf_cu_header_length, NULL,
2618                                  &dwarf_abbrev_offset, &dwarf_address_size,
2619                                  &next_cu_header, &dwarf_error);
2620         if (code == DW_DLV_NO_ENTRY) {
2621             break;
2622         } else if (code == DW_DLV_ERROR) {
2623             printf("findDwarfStaticAddresses: Error reading headers: %s\n",
2624                    dwarf_errmsg(dwarf_error));
2625             break;
2626         }
2627
2628         code = dwarf_siblingof(dwarf_debug, NULL, &dwarf_die, &dwarf_error);
2629         if (code != DW_DLV_OK) {
2630             printf("findDwarfStaticAddresses: Can't get first die. %s\n",
2631                    (code == DW_DLV_ERROR) ? dwarf_errmsg(dwarf_error) : "");
2632             break;
2633         }
2634
2635         /* This is the header, test the name. */
2636         code = dwarf_diename(dwarf_die, &hname, &dwarf_error);
2637         if (code == DW_DLV_OK) {
2638             s = strrchr(hname, '/');
2639             for (i = 0; i < nLists; i++) {
2640                 if (s && !strcmp(s + 1, nameList[i].file)) {
2641                     findElfAddresses(dwarf_debug, dwarf_die, &nameList[i]);
2642                     found++;
2643                     break;
2644                 }
2645             }
2646         } else {
2647             printf
2648                 ("findDwarfStaticAddresses: Can't get name of current header. %s\n",
2649                  (code == DW_DLV_ERROR) ? dwarf_errmsg(dwarf_error) : "");
2650             break;
2651         }
2652         dwarf_dealloc(dwarf_debug, hname, DW_DLA_STRING);
2653         hname = (char *)0;
2654         if (found >= nLists) {  /* we're done */
2655             break;
2656         }
2657     }
2658
2659     /* Frees up all allocated space. */
2660     (void)dwarf_finish(dwarf_debug, &dwarf_error);
2661     close(fd);
2662 }
2663
2664 void
2665 findElfAddresses(Dwarf_Debug dwarf_debug, Dwarf_Die dwarf_die,
2666                  staticNameList * nameList)
2667 {
2668     int i;
2669     Dwarf_Error dwarf_error;
2670     Dwarf_Die dwarf_next_die;
2671     Dwarf_Die dwarf_child_die;
2672     Dwarf_Attribute dwarf_return_attr;
2673     char *vname = (char *)0;
2674     int found = 0;
2675     int code;
2676
2677     /* Drop into this die to find names in addrList. */
2678     code = dwarf_child(dwarf_die, &dwarf_child_die, &dwarf_error);
2679     if (code != DW_DLV_OK) {
2680         printf("findElfAddresses: Can't get child die. %s\n",
2681                (code == DW_DLV_ERROR) ? dwarf_errmsg(dwarf_error) : "");
2682         return;
2683     }
2684
2685     /* Try to find names in each sibling. */
2686     dwarf_next_die = (Dwarf_Die) 0;
2687     do {
2688         code = dwarf_diename(dwarf_child_die, &vname, &dwarf_error);
2689         /* It's possible that some siblings don't have names. */
2690         if (code == DW_DLV_OK) {
2691             for (i = 0; i < nameList->nAddrs; i++) {
2692                 if (!nameList->addrList[i].found) {
2693                     if (!strcmp(vname, nameList->addrList[i].name)) {
2694                         getElfAddress(dwarf_debug, dwarf_child_die,
2695                                       &(nameList->addrList[i]));
2696                         found++;
2697                         break;
2698                     }
2699                 }
2700             }
2701         }
2702         if (dwarf_next_die)
2703             dwarf_dealloc(dwarf_debug, dwarf_next_die, DW_DLA_DIE);
2704
2705         if (found >= nameList->nAddrs) {        /* we're done. */
2706             break;
2707         }
2708
2709         dwarf_next_die = dwarf_child_die;
2710         code =
2711             dwarf_siblingof(dwarf_debug, dwarf_next_die, &dwarf_child_die,
2712                             &dwarf_error);
2713
2714     } while (code == DW_DLV_OK);
2715 }
2716
2717 /* Get address out of current die. */
2718 void
2719 getElfAddress(Dwarf_Debug dwarf_debug, Dwarf_Die dwarf_child_die,
2720               staticAddrList * addrList)
2721 {
2722     int i;
2723     Dwarf_Error dwarf_error;
2724     Dwarf_Attribute dwarf_return_attr;
2725     Dwarf_Bool dwarf_return_bool;
2726     Dwarf_Locdesc *llbuf = NULL;
2727     Dwarf_Signed listlen;
2728     off64_t addr = (off64_t) 0;
2729     int code;
2730
2731     code =
2732         dwarf_hasattr(dwarf_child_die, addrList->type, &dwarf_return_bool,
2733                       &dwarf_error);
2734     if ((code != DW_DLV_OK) || (!dwarf_return_bool)) {
2735         printf("getElfAddress: no address given for %s. %s\n", addrList->name,
2736                (code == DW_DLV_ERROR) ? dwarf_errmsg(dwarf_error) : "");
2737         return;
2738     }
2739     code =
2740         dwarf_attr(dwarf_child_die, addrList->type, &dwarf_return_attr,
2741                    &dwarf_error);
2742     if (code != DW_DLV_OK) {
2743         printf("getElfAddress: Can't get attribute. %s\n",
2744                (code == DW_DLV_ERROR) ? dwarf_errmsg(dwarf_error) : "");
2745         return;
2746     }
2747
2748     switch (addrList->type) {
2749     case DW_AT_location:
2750         code =
2751             dwarf_loclist(dwarf_return_attr, &llbuf, &listlen, &dwarf_error);
2752         if (code != DW_DLV_OK) {
2753             printf("getElfAddress: Can't get location for %s. %s\n",
2754                    addrList->name,
2755                    (code == DW_DLV_ERROR) ? dwarf_errmsg(dwarf_error) : "");
2756             return;
2757         }
2758         if ((listlen != 1) || (llbuf[0].ld_cents != 1)) {
2759             printf("getElfAddress: %s has more than one address.\n",
2760                    addrList->name);
2761             return;
2762         }
2763         addr = llbuf[0].ld_s[0].lr_number;
2764         break;
2765
2766     case DW_AT_low_pc:
2767         code =
2768             dwarf_lowpc(dwarf_child_die, (Dwarf_Addr *) & addr, &dwarf_error);
2769         if (code != DW_DLV_OK) {
2770             printf("getElfAddress: Can't get lowpc for %s. %s\n",
2771                    addrList->name,
2772                    (code == DW_DLV_ERROR) ? dwarf_errmsg(dwarf_error) : "");
2773             return;
2774         }
2775         break;
2776
2777     default:
2778         printf("getElfAddress: Bad case %d in switch.\n", addrList->type);
2779         return;
2780     }
2781
2782     addrList->addr.high = (addr >> 32) & 0xffffffff;
2783     addrList->addr.low = addr & 0xffffffff;
2784     addrList->found = 1;
2785 }
2786
2787 #if defined(AFS_SGI62_ENV) && !defined(AFS_SGI65_ENV)
2788 /* Find symbols in the .mdebug section for 32 bit kernels. */
2789 /*
2790  * do_mdebug()
2791  * On 32bit platforms, we're still using the ucode compilers to build
2792  * the kernel, so we need to get our static text/data from the .mdebug
2793  * section instead of the .dwarf sections.
2794  */
2795 /* SearchNameList searches our bizarre structs for the given string.
2796  * If found, sets the found bit and the address and returns 1.
2797  * Not found returns 0.
2798  */
2799 int
2800 SearchNameList(char *name, afs_uint32 addr, staticNameList * nameList,
2801                int nLists)
2802 {
2803     int i, j;
2804     for (i = 0; i < nLists; i++) {
2805         for (j = 0; j < nameList[i].nAddrs; j++) {
2806             if (nameList[i].addrList[j].found)
2807                 continue;
2808             if (!strcmp(name, nameList[i].addrList[j].name)) {
2809                 nameList[i].addrList[j].addr.high = 0;
2810                 nameList[i].addrList[j].addr.low = addr;
2811                 nameList[i].addrList[j].found = 1;
2812                 return 1;
2813             }
2814         }
2815     }
2816     return 0;
2817 }
2818
2819 static void
2820 SearchMDebug(Elf_Scn * scnp, Elf32_Shdr * shdrp, staticNameList * nameList,
2821              int nLists, int needed)
2822 {
2823     long *buf = (long *)(elf_getdata(scnp, NULL)->d_buf);
2824     u_long addr, mdoff = shdrp->sh_offset;
2825     HDRR *hdrp;
2826     SYMR *symbase, *symp, *symend;
2827     FDR *fdrbase, *fdrp;
2828     int i, j;
2829     char *strbase, *str;
2830     int ifd;
2831     int nFound = 0;
2832
2833     /* get header */
2834     addr = (__psunsigned_t) buf;
2835     hdrp = (HDRR *) addr;
2836
2837     /* setup base addresses */
2838     addr = (u_long) buf + (u_long) (hdrp->cbFdOffset - mdoff);
2839     fdrbase = (FDR *) addr;
2840     addr = (u_long) buf + (u_long) (hdrp->cbSymOffset - mdoff);
2841     symbase = (SYMR *) addr;
2842     addr = (u_long) buf + (u_long) (hdrp->cbSsOffset - mdoff);
2843     strbase = (char *)addr;
2844
2845 #define KEEPER(a,b)     ((a == stStaticProc && b == scText) || \
2846                          (a == stStatic && (b == scData || b == scBss || \
2847                                             b == scSBss || b == scSData)))
2848
2849     for (fdrp = fdrbase; fdrp < &fdrbase[hdrp->ifdMax]; fdrp++) {
2850         str = strbase + fdrp->issBase + fdrp->rss;
2851
2852         /* local symbols for each fd */
2853         for (symp = &symbase[fdrp->isymBase];
2854              symp < &symbase[fdrp->isymBase + fdrp->csym]; symp++) {
2855             if (KEEPER(symp->st, symp->sc)) {
2856                 if (symp->value == 0)
2857                     continue;
2858
2859                 str = strbase + fdrp->issBase + symp->iss;
2860                 /* Look for AFS symbols of interest */
2861                 if (SearchNameList(str, symp->value, nameList, nLists)) {
2862                     nFound++;
2863                     if (nFound >= needed)
2864                         return;
2865                 }
2866             }
2867         }
2868     }
2869 }
2870
2871 /*
2872  * returns section with the name of scn_name, & puts its header in shdr64 or
2873  * shdr32 based on elf's file type
2874  *
2875  */
2876 Elf_Scn *
2877 findMDebugSection(Elf * elf, char *scn_name)
2878 {
2879     Elf64_Ehdr *ehdr64;
2880     Elf32_Ehdr *ehdr32;
2881     Elf_Scn *scn = NULL;
2882     Elf64_Shdr *shdr64;
2883     Elf32_Shdr *shdr32;
2884
2885     if ((ehdr32 = elf32_getehdr(elf)) == NULL)
2886         return (NULL);
2887     do {
2888         if ((scn = elf_nextscn(elf, scn)) == NULL)
2889             break;
2890         if ((shdr32 = elf32_getshdr(scn)) == NULL)
2891             return (NULL);
2892     } while (strcmp
2893              (scn_name,
2894               elf_strptr(elf, ehdr32->e_shstrndx, shdr32->sh_name)));
2895
2896     return (scn);
2897 }
2898
2899
2900 void
2901 findMDebugStaticAddresses(staticNameList * nameList, int nLists, int needed)
2902 {
2903     int fd;
2904     Elf *elf;
2905     Elf_Scn *mdebug_scn;
2906     Elf32_Shdr *mdebug_shdr;
2907     char *names;
2908
2909     if ((fd = open("/unix", O_RDONLY)) == -1) {
2910         printf("findMDebugStaticAddresses: Failed to open /unix.\n");
2911         return;
2912     }
2913
2914     (void)elf_version(EV_CURRENT);
2915     if ((elf = elf_begin(fd, ELF_C_READ, NULL)) == NULL) {
2916         printf
2917             ("findMDebugStaticAddresses: /unix doesn't seem to be an elf file\n");
2918         close(fd);
2919         return;
2920     }
2921     mdebug_scn = findMDebugSection(elf, ".mdebug");
2922     if (!mdebug_scn) {
2923         printf("findMDebugStaticAddresses: Can't find .mdebug section.\n");
2924         goto find_end;
2925     }
2926     mdebug_shdr = elf32_getshdr(mdebug_scn);
2927     if (!mdebug_shdr) {
2928         printf("findMDebugStaticAddresses: Can't find .mdebug header.\n");
2929         goto find_end;
2930     }
2931
2932     (void)SearchMDebug(mdebug_scn, mdebug_shdr, nameList, nLists, needed);
2933
2934   find_end:
2935     elf_end(elf);
2936     close(fd);
2937 }
2938 #endif /* AFS_SGI62_ENV */
2939
2940 #else /* AFS_SGI61_ENV */
2941 #include <nlist.h>
2942 struct nlist nlunix[] = {
2943     {"rfsdisptab_v2"},
2944     {0},
2945 };
2946
2947 get_nfsstaticaddr()
2948 {
2949     int i, j, kmem, count;
2950
2951     if ((kmem = open("/dev/kmem", O_RDONLY)) < 0) {
2952         printf("Warning: can't open /dev/kmem\n");
2953         return 0;
2954     }
2955     if ((j = nlist("/unix", nlunix)) < 0) {
2956         printf("Warning: can't nlist /unix\n");
2957         return 0;
2958     }
2959     i = nlunix[0].n_value;
2960     if (lseek(kmem, i, L_SET /*0 */ ) != i) {
2961         printf("Warning: can't lseek to %x\n", i);
2962         return 0;
2963     }
2964     if ((j = read(kmem, &count, sizeof count)) != sizeof count) {
2965         printf("WARNING: kmem read at %x failed\n", i);
2966         return 0;
2967     }
2968     return i;
2969 }
2970 #endif /* AFS_SGI61_ENV */
2971 #endif /* AFS_SGI53_ENV */