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