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