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