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