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