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