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