src/afsd/afsd.c

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