src/afsd/afsd.c

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