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