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