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