src/viced/viced.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 /*  viced.c     - File Server main loop                                  */
  11 /*                                                                       */
  12 /*  Date: 5/1/85                                                         */
  13 /*                                                                       */
  14 /*  Function    - This routine has the initialization code for           */
  15 /*                FileServer II                                          */
  16 /*                                                                       */
  17 /* ********************************************************************** */
  18
  19 #include <afsconfig.h>
  20 #include <afs/param.h>
  21
  22 RCSID("$Header$");
  23
  24 #include <stdio.h>
  25 #include <stdlib.h>
  26 #include <errno.h>
  27 #include <sys/types.h>
  28 #include <afs/procmgmt.h>  /* signal(), kill(), wait(), etc. */
  29 #include <sys/stat.h>
  30 #ifdef AFS_NT40_ENV
  31 #include <fcntl.h>
  32 #include <io.h>
  33 #include <windows.h>
  34 #include <WINNT/afsevent.h>
  35 #else
  36 #include <sys/file.h>
  37 #include <netinet/in.h>
  38 #include <netdb.h>
  39 #include <unistd.h>     /* sysconf() */
  40
  41 #ifdef HAVE_STRING_H
  42 #include <string.h>
  43 #else
  44 #ifdef HAVE_STRINGS_H
  45 #include <strings.h>
  46 #endif
  47 #endif
  48
  49 #ifndef ITIMER_REAL
  50 #include <sys/time.h>
  51 #endif /* ITIMER_REAL */
  52 #include <sys/resource.h>
  53 #endif /* AFS_NT40_ENV */
  54 #include <afs/stds.h>
  55 #undef SHARED
  56 #include <rx/xdr.h>
  57 #include <afs/nfs.h>
  58 #ifdef AFS_PTHREAD_ENV
  59 #include <assert.h>
  60 #else /* AFS_PTHREAD_ENV */
  61 #include <afs/assert.h>
  62 #endif /* AFS_PTHREAD_ENV */
  63 #include <lwp.h>
  64 #include <lock.h>
  65 #include <afs/ptclient.h>
  66 #include <afs/afsint.h>
  67 #include <afs/vldbint.h>
  68 #include <afs/errors.h>
  69 #include <afs/ihandle.h>
  70 #include <afs/vnode.h>
  71 #include <afs/volume.h>
  72 #include <afs/auth.h>
  73 #include <afs/cellconfig.h>
  74 #include <afs/acl.h>
  75 #include <afs/prs_fs.h>
  76 #include <rx/rx.h>
  77 #include <rx/rxkad.h>
  78 #include <afs/keys.h>
  79 #include <afs/afs_args.h>
  80 #include <afs/vlserver.h>
  81 #include <afs/afsutil.h>
  82 #include <afs/fileutil.h>
  83 #ifndef AFS_NT40_ENV
  84 #include <afs/netutils.h>
  85 #endif
  86 #include "viced.h"
  87 #include "host.h"
  88 #ifdef AFS_PTHREAD_ENV
  89 #include "softsig.h"
  90 #endif
  91 #if defined(AFS_SGI_ENV)
  92 #include "sys/schedctl.h"
  93 #include "sys/lock.h"
  94 #endif
  95 #include <rx/rx_globals.h>
  96
  97
  98 extern int      BreakVolumeCallBacks(), InitCallBack();
  99 extern int      BreakVolumeCallBacks(), InitCallBack(), BreakLaterCallBacks();
 100 extern int BreakVolumeCallBacksLater();
 101 extern  int     LogLevel, etext;
 102 extern afs_int32        BlocksSpare, PctSpare;
 103
 104 void            ShutDown(void);
 105 static void     ClearXStatValues(), NewParms(), PrintCounters();
 106 static void     ResetCheckDescriptors(void), ResetCheckSignal(void);
 107 static void     CheckSignal(void);
 108 extern  int     GetKeysFromToken();
 109 extern int RXAFS_ExecuteRequest();
 110 extern int RXSTATS_ExecuteRequest();
 111
 112 int eventlog = 0, rxlog = 0;
 113 FILE *debugFile;
 114 FILE * console = NULL;
 115
 116 #ifdef AFS_PTHREAD_ENV
 117 pthread_mutex_t fsync_glock_mutex;
 118 pthread_cond_t fsync_cond;
 119 #else
 120 char fsync_wait[1];
 121 #endif /* AFS_PTHREAD_ENV */
 122
 123 #ifdef AFS_NT40_ENV
 124 #define AFS_QUIETFS_ENV 1
 125 #define NT_OPEN_MAX    1024 /* This is an arbitrary no. we came up with for
 126                              * now. We hope this will be replaced by a more
 127                              * intelligent estimate later. */
 128 #endif
 129
 130 int     SystemId;               /* ViceID of "Administrators"*/
 131 int     SystemAnyUser;          /* Viceid of "System:AnyUser" */
 132 prlist  SystemAnyUserCPS;       /* CPS for "system:AnyUser */
 133 int     AnonymousID = 0;        /* ViceId of "Anonymous"*/
 134 prlist  AnonCPS;                /* CPS for "Anonymous"*/
 135
 136 struct afsconf_dir *confDir;    /* Configuration dir object */
 137
 138 int     restartMode = RESTART_ORDINARY;
 139
 140 int Testing = 0; /* for ListViceInodes */
 141
 142 /*
 143  * Home for the performance statistics.
 144  */
 145 struct afs_PerfStats afs_perfstats;
 146
 147 extern  int     LogLevel;
 148 extern  int     Statistics;
 149
 150 int     busyonrst = 1;
 151 int     timeout = 30;
 152 int     SawSpare;
 153 int     SawPctSpare;
 154 int     debuglevel = 0;
 155 int     printBanner = 0;
 156 int     rxJumbograms = 1; /* default is to send and receive jumbograms. */
 157 afs_int32       implicitAdminRights = PRSFS_LOOKUP;     /* The ADMINISTER right is
 158                                                    already implied */
 159 afs_int32       readonlyServer = 0;
 160
 161 int     stack = 24;
 162 int     stackSize = 24000;
 163 int     fiveminutes = 300;              /* 5 minutes.  Change this for debugging only */
 164 int     CurrentConnections = 0;
 165 int     hostaclRefresh = 7200;          /* refresh host clients' acls every 2 hrs */
 166 #if defined(AFS_SGI_ENV)
 167 int     SawLock;
 168 #endif
 169 time_t  StartTime;
 170
 171 int     rxpackets = 150;        /* 100 */
 172 int     nSmallVns = 400;        /* 200 */
 173 int     large = 400;            /* 200 */
 174 int     volcache = 400;         /* 400 */
 175 int     numberofcbs = 60000;    /* 60000 */
 176 int     lwps = 9;               /* 6 */
 177 int     buffs = 90;             /* 70 */
 178 int     novbc = 0;              /* Enable Volume Break calls */
 179 int     busy_threshold = 600;
 180 int     abort_threshold = 10;
 181 int     udpBufSize = 0;         /* UDP buffer size for receive*/
 182 int     sendBufSize = 16384;    /* send buffer size */
 183
 184 struct timeval  tp;
 185
 186 /*
 187  * FileServer's name and IP address, both network byte order and
 188  * host byte order.
 189  */
 190 #define ADDRSPERSITE 16     /* Same global is in rx/rx_user.c */
 191
 192 char FS_HostName[128] = "localhost";
 193 afs_uint32 FS_HostAddr_NBO;
 194 afs_uint32 FS_HostAddr_HBO;
 195 afs_uint32 FS_HostAddrs[ADDRSPERSITE], FS_HostAddr_cnt = 0, FS_registered=0;
 196 /* All addresses in FS_HostAddrs are in NBO */
 197 afsUUID FS_HostUUID;
 198
 199 static void FlagMsg();
 200
 201 /*
 202  * Home for the performance statistics.
 203  */
 204
 205 /* DEBUG HACK */
 206 static void CheckDescriptors()
 207 {
 208 #ifndef AFS_NT40_ENV
 209     struct stat status;
 210     register int tsize = getdtablesize();
 211     register int i;
 212     for (i = 0; i<tsize; i++) {
 213         if (fstat(i, &status) != -1) {
 214             printf("%d: dev %x, inode %u, length %u, type/mode %x\n",
 215                    i, status.st_dev, status.st_ino,
 216                    status.st_size, status.st_mode);
 217         }
 218     }
 219     fflush(stdout);
 220     ResetCheckDescriptors();
 221 #endif
 222 } /*CheckDescriptors*/
 223
 224
 225 #ifdef AFS_PTHREAD_ENV
 226 void CheckSignal_Signal(x)       {CheckSignal();}
 227 void ShutDown_Signal(x)          {ShutDown();}
 228 void CheckDescriptors_Signal(x)  {CheckDescriptors();}
 229 #else /* AFS_PTHREAD_ENV */
 230 void CheckSignal_Signal(x)       {IOMGR_SoftSig(CheckSignal, 0);}
 231 void ShutDown_Signal(x)          {IOMGR_SoftSig(ShutDown, 0);}
 232 void CheckDescriptors_Signal(x)  {IOMGR_SoftSig(CheckDescriptors, 0);}
 233 #endif /* AFS_PTHREAD_ENV */
 234
 235 /* check whether caller is authorized to manage RX statistics */
 236 int fs_rxstat_userok(struct rx_call *call)
 237 {
 238     return afsconf_SuperUser(confDir, call, NULL);
 239 }
 240
 241 static void ResetCheckSignal(void)
 242 {
 243     int signo;
 244
 245 #if defined(AFS_HPUX_ENV)
 246     signo = SIGPOLL;
 247 #else
 248 #if defined(AFS_NT40_ENV)
 249     signo = SIGUSR2;
 250 #else
 251     signo = SIGXCPU;
 252 #endif
 253 #endif
 254
 255 #if defined(AFS_PTHREAD_ENV) && !defined(AFS_NT40_ENV)
 256     softsig_signal(signo, CheckSignal_Signal);
 257 #else
 258     signal(signo, CheckSignal_Signal);
 259 #endif
 260 }
 261
 262 static void ResetCheckDescriptors(void)
 263 {
 264 #ifndef AFS_NT40_ENV
 265 #if defined(AFS_PTHREAD_ENV)
 266     softsig_signal(SIGTERM, CheckDescriptors_Signal);
 267 #else
 268     signal(SIGTERM, CheckDescriptors_Signal);
 269 #endif
 270 #endif
 271 }
 272
 273
 274 /* proc called by rxkad module to get a key */
 275 static int get_key(char *arock, register afs_int32 akvno, char *akey)
 276 {
 277     /* find the key */
 278     static struct afsconf_key tkey;
 279     register afs_int32 code;
 280
 281     if (!confDir) {
 282         ViceLog(0, ("conf dir not open\n"));
 283         return 1;
 284     }
 285     code = afsconf_GetKey(confDir, akvno, tkey.key);
 286     if (code)
 287         return code;
 288     memcpy(akey, tkey.key, sizeof(tkey.key));
 289     return 0;
 290
 291 } /*get_key*/
 292
 293 #ifndef AFS_NT40_ENV
 294 int viced_syscall(afs_uint32 a3, afs_uint32 a4, void * a5)
 295 {
 296   afs_uint32 rcode;
 297   void (*old)();
 298
 299 #ifndef AFS_LINUX20_ENV
 300   old = (void (*)())signal(SIGSYS, SIG_IGN);
 301 #endif
 302   rcode = syscall (AFS_SYSCALL, 28 /* AFSCALL_CALL */, a3, a4, a5);
 303 #ifndef AFS_LINUX20_ENV
 304   signal(SIGSYS, old);
 305 #endif
 306
 307   return rcode;
 308 }
 309 #endif
 310
 311 #if !defined(AFS_NT40_ENV)
 312 #include "AFS_component_version_number.c"
 313 #endif /* !AFS_NT40_ENV */
 314
 315 #define MAXADMINNAME 64
 316 char adminName[MAXADMINNAME];
 317
 318 static void
 319 CheckAdminName()
 320 {
 321     int             fd = 0;
 322     struct stat     status;
 323
 324     if ((stat("/AdminName", &status)) ||        /* if file does not exist */
 325         (status.st_size <= 0) ||                /* or it is too short */
 326         (status.st_size >= (MAXADMINNAME)) ||   /* or it is too long */
 327         !(fd = open("/AdminName", O_RDONLY, 0))) {      /* or the open fails */
 328         strcpy(adminName, "System:Administrators");     /* use the default name */
 329     }
 330     else {
 331         read(fd, adminName, status.st_size);    /* use name from the file */
 332     }
 333     if (fd)
 334         close(fd);      /* close fd if it was opened */
 335
 336 } /*CheckAdminName*/
 337
 338
 339 static void setThreadId(char *s)
 340 {
 341 #if defined(AFS_PTHREAD_ENV) && !defined(AFS_NT40_ENV)
 342     /* set our 'thread-id' so that the host hold table works */
 343     MUTEX_ENTER(&rx_stats_mutex);   /* protects rxi_pthread_hinum */
 344     ++rxi_pthread_hinum;
 345     pthread_setspecific(rx_thread_id_key, (void *)rxi_pthread_hinum);
 346     MUTEX_EXIT(&rx_stats_mutex);
 347     ViceLog(0,("Set thread id %d for '%s'\n", pthread_getspecific(rx_thread_id_key), s));
 348 #endif
 349 }
 350
 351 /* This LWP does things roughly every 5 minutes */
 352 static void FiveMinuteCheckLWP()
 353 {
 354     static int msg  = 0;
 355     char tbuffer[32];
 356
 357     ViceLog(1, ("Starting five minute check process\n"));
 358     setThreadId("FiveMinuteCheckLWP");
 359     while (1) {
 360 #ifdef AFS_PTHREAD_ENV
 361         sleep(fiveminutes);
 362 #else /* AFS_PTHREAD_ENV */
 363         IOMGR_Sleep(fiveminutes);
 364 #endif /* AFS_PTHREAD_ENV */
 365
 366         /* close the log so it can be removed */
 367         ReOpenLog(AFSDIR_SERVER_FILELOG_FILEPATH); /* don't trunc, just append */
 368         ViceLog(2, ("Cleaning up timed out callbacks\n"));
 369         if(CleanupTimedOutCallBacks())
 370             ViceLog(5,("Timed out callbacks deleted\n"));
 371         ViceLog(2, ("Set disk usage statistics\n"));
 372         VSetDiskUsage();
 373         if (FS_registered == 1) Do_VLRegisterRPC();
 374         /* Force wakeup in case we missed something; pthreads does timedwait */
 375 #ifndef AFS_PTHREAD_ENV
 376         LWP_NoYieldSignal(&fsync_wait);
 377 #endif
 378         if(printBanner && (++msg&1)) { /* Every 10 minutes */
 379             time_t now = FT_ApproxTime();
 380             if (console != NULL) {
 381 #ifndef AFS_QUIETFS_ENV
 382                 fprintf(console,"File server is running at %s\r",
 383                         afs_ctime(&now, tbuffer, sizeof(tbuffer)));
 384 #endif /* AFS_QUIETFS_ENV */
 385                 ViceLog(2, ("File server is running at %s\n",
 386                         afs_ctime(&now, tbuffer, sizeof(tbuffer))));
 387             }
 388         }
 389     }
 390 } /*FiveMinuteCheckLWP*/
 391
 392
 393 /* This LWP does host checks every 5 minutes:  it should not be used for
 394  * other 5 minute activities because it may be delayed by timeouts when
 395  * it probes the workstations
 396  */
 397 static void HostCheckLWP()
 398 {
 399     ViceLog(1, ("Starting Host check process\n"));
 400     setThreadId("HostCheckLWP");
 401     while(1) {
 402 #ifdef AFS_PTHREAD_ENV
 403         sleep(fiveminutes);
 404 #else /* AFS_PTHREAD_ENV */
 405         IOMGR_Sleep(fiveminutes);
 406 #endif /* AFS_PTHREAD_ENV */
 407         ViceLog(2, ("Checking for dead venii & clients\n"));
 408         h_CheckHosts();
 409     }
 410 } /*HostCheckLWP*/
 411
 412 /* This LWP does fsync checks every 5 minutes:  it should not be used for
 413  * other 5 minute activities because it may be delayed by timeouts when
 414  * it probes the workstations
 415  */
 416 static FsyncCheckLWP()
 417 {
 418     afs_int32 code;
 419 #ifdef AFS_PTHREAD_ENV
 420     struct timespec fsync_next;
 421 #endif
 422     ViceLog(1, ("Starting fsync check process\n"));
 423
 424     setThreadId("FsyncCheckLWP");
 425
 426 #ifdef AFS_PTHREAD_ENV
 427     assert(pthread_cond_init(&fsync_cond, NULL) == 0);
 428     assert(pthread_mutex_init(&fsync_glock_mutex, NULL) == 0);
 429 #endif
 430
 431     FSYNC_LOCK
 432     while(1) {
 433 #ifdef AFS_PTHREAD_ENV
 434         /* rounding is fine */
 435         fsync_next.tv_nsec = 0;
 436         fsync_next.tv_sec = time(0) + fiveminutes;
 437
 438         code = pthread_cond_timedwait(&fsync_cond, &fsync_glock_mutex,
 439                                       &fsync_next);
 440         if (code != 0 && code != ETIMEDOUT)
 441             ViceLog(0, ("pthread_cond_timedwait returned %d\n", code));
 442 #else /* AFS_PTHREAD_ENV */
 443         if (( code = LWP_WaitProcess(&fsync_wait)) != LWP_SUCCESS)
 444             ViceLog(0, ("LWP_WaitProcess returned %d\n", code));
 445 #endif /* AFS_PTHREAD_ENV */
 446         ViceLog(2, ("Checking for fsync events\n"));
 447         do {
 448             code = BreakLaterCallBacks();
 449         } while (code != 0);
 450     }
 451 }
 452
 453 /*------------------------------------------------------------------------
 454  * PRIVATE ClearXStatValues
 455  *
 456  * Description:
 457  *      Initialize all of the values collected via the xstat
 458  *      interface.
 459  *
 460  * Arguments:
 461  *      None.
 462  *
 463  * Returns:
 464  *      Nothing.
 465  *
 466  * Environment:
 467  *      Must be called during File Server initialization.
 468  *
 469  * Side Effects:
 470  *      As advertised.
 471  *------------------------------------------------------------------------*/
 472
 473 static void ClearXStatValues()
 474 { /*ClearXStatValues*/
 475
 476     struct fs_stats_opTimingData *opTimeP;      /*Ptr to timing struct*/
 477     struct fs_stats_xferData *opXferP;          /*Ptr to xfer struct*/
 478     int i;                                      /*Loop counter*/
 479
 480     /*
 481      * Zero all xstat-related structures.
 482      */
 483     memset((char *)(&afs_perfstats), 0, sizeof(struct afs_PerfStats));
 484 #if FS_STATS_DETAILED
 485     memset((char *)(&afs_FullPerfStats), 0, sizeof(struct fs_stats_FullPerfStats));
 486
 487     /*
 488      * That's not enough.  We have to set reasonable minima for
 489      * time and xfer values in the detailed stats.
 490      */
 491     opTimeP = &(afs_FullPerfStats.det.rpcOpTimes[0]);
 492     for (i = 0; i < FS_STATS_NUM_RPC_OPS; i++, opTimeP++)
 493         opTimeP->minTime.tv_sec = 999999;
 494
 495     opXferP = &(afs_FullPerfStats.det.xferOpTimes[0]);
 496     for (i = 0; i < FS_STATS_NUM_XFER_OPS; i++, opXferP++) {
 497         opXferP->minTime.tv_sec = 999999;
 498         opXferP->minBytes = 999999999;
 499     }
 500
 501     /*
 502      * There's more.  We have to set our unique system identifier, as
 503      * declared in param.h.  If such a thing is not defined, we bitch
 504      * and declare ourselves to be an unknown system type.
 505      */
 506 #ifdef SYS_NAME_ID
 507     afs_perfstats.sysname_ID = SYS_NAME_ID;
 508 #else
 509 #ifndef AFS_NT40_ENV
 510     ViceLog(0, ("Sys name ID constant not defined in param.h!!\n"));
 511     ViceLog(0, ("[Choosing ``undefined'' sys name ID.\n"));
 512 #endif
 513     afs_perfstats.sysname_ID = SYS_NAME_ID_UNDEFINED;
 514 #endif /* SYS_NAME_ID */
 515 #endif
 516
 517 } /*ClearXStatValues*/
 518
 519
 520 static void PrintCounters()
 521 {
 522     int dirbuff, dircall, dirio;
 523     struct timeval  tpl;
 524     int workstations, activeworkstations, delworkstations;
 525     int processSize = 0;
 526     char tbuffer[32];
 527
 528     TM_GetTimeOfDay(&tpl, 0);
 529     Statistics = 1;
 530     ViceLog(0, ("Vice was last started at %s\n",
 531                 afs_ctime(&StartTime, tbuffer, sizeof(tbuffer))));
 532
 533     VPrintCacheStats();
 534     VPrintDiskStats();
 535     DStat(&dirbuff, &dircall, &dirio);
 536     ViceLog(0,("With %d directory buffers; %d reads resulted in %d read I/Os\n",
 537             dirbuff, dircall, dirio));
 538     rx_PrintStats(stderr);
 539     h_PrintStats();
 540     PrintCallBackStats();
 541 #ifdef AFS_NT40_ENV
 542     processSize = -1; /* TODO: */
 543 #else
 544     processSize = (int)((long) sbrk(0) >> 10);
 545 #endif
 546     ViceLog(0,("There are %d connections, process size %d\n",  CurrentConnections, processSize));
 547     h_GetWorkStats(&workstations, &activeworkstations, &delworkstations,
 548          tpl.tv_sec-15*60);
 549     ViceLog(0,
 550             ("There are %d workstations, %d are active (req in < 15 mins), %d marked \"down\"\n",
 551             workstations, activeworkstations, delworkstations));
 552     Statistics = 0;
 553
 554 } /*PrintCounters*/
 555
 556
 557
 558 static void CheckSignal()
 559 {
 560     if (FS_registered > 0)  {
 561         /*
 562          * We have proper ip addresses; tell the vlserver what we got; the following
 563          * routine will do the proper reporting for us
 564          */
 565         Do_VLRegisterRPC();
 566     }
 567     h_DumpHosts();
 568     h_PrintClients();
 569     DumpCallBackState();
 570     PrintCounters();
 571     ResetCheckSignal();
 572
 573 } /*CheckSignal*/
 574
 575 void ShutDownAndCore(int dopanic)
 576 {
 577     time_t now = time(0);
 578     char *tstr;
 579     char tbuffer[32];
 580
 581     ViceLog(0, ("Shutting down file server at %s",
 582                 afs_ctime(&now, tbuffer, sizeof(tbuffer))));
 583     if (dopanic)
 584         ViceLog(0, ("ABNORMAL SHUTDOWN, see core file.\n"));
 585 #ifndef AFS_QUIETFS_ENV
 586     if (console != NULL) {
 587         fprintf(console,"File server restart/shutdown received at %s\r",
 588                 afs_ctime(&now, tbuffer, sizeof(tbuffer)));
 589     }
 590 #endif
 591     DFlush();
 592     PrintCounters();
 593
 594     /* do not allows new reqests to be served from now on, all new requests
 595        are returned with an error code of RX_RESTARTING ( transient failure ) */
 596     rx_SetRxTranquil();                 /* dhruba */
 597     VShutdown();
 598
 599     if (debugFile) {
 600         rx_PrintStats(debugFile);
 601         fflush(debugFile);
 602     }
 603     if (console != NULL) {
 604         now = time(0);
 605         if (dopanic) {
 606 #ifndef AFS_QUIETFS_ENV
 607             fprintf(console, "File server has terminated abnormally at %s\r",
 608                     afs_ctime(&now, tbuffer, sizeof(tbuffer)));
 609 #endif
 610             ViceLog(0, ("File server has terminated abnormally at %s\n",
 611                 afs_ctime(&now, tbuffer, sizeof(tbuffer))));
 612         } else {
 613 #ifndef AFS_QUIETFS_ENV
 614             fprintf(console, "File server has terminated normally at %s\r",
 615                     afs_ctime(&now, tbuffer, sizeof(tbuffer)));
 616 #endif
 617             ViceLog(0, ("File server has terminated normally at %s\n",
 618                 afs_ctime(&now, tbuffer, sizeof(tbuffer))));
 619         }
 620     }
 621
 622     exit(0);
 623
 624 } /*ShutDown*/
 625
 626 void ShutDown(void) /* backward compatibility */
 627 {
 628   ShutDownAndCore(DONTPANIC);
 629 }
 630
 631
 632 static void FlagMsg()
 633 {
 634     char buffer[1024];
 635
 636         /* default supports help flag */
 637
 638     strcpy(buffer, "Usage: fileserver ");
 639     strcat(buffer, "[-d <debug level>] ");
 640     strcat(buffer, "[-p <number of processes>] ");
 641     strcat(buffer, "[-spare <number of spare blocks>] ");
 642     strcat(buffer, "[-pctspare <percentage spare>] ");
 643     strcat(buffer, "[-b <buffers>] ");
 644     strcat(buffer, "[-l <large vnodes>] ");
 645     strcat(buffer, "[-s <small vnodes>] ");
 646     strcat(buffer, "[-vc <volume cachesize>] ");
 647     strcat(buffer, "[-w <call back wait interval>] ");
 648     strcat(buffer, "[-cb <number of call backs>] ");
 649     strcat(buffer, "[-banner (print banner every 10 minutes)] ");
 650     strcat(buffer, "[-novbc (whole volume cbs disabled)] ");
 651     strcat(buffer, "[-implicit <admin mode bits: rlidwka>] ");
 652     strcat(buffer, "[-readonly (read-only file server)] ");
 653     strcat(buffer, "[-hr <number of hours between refreshing the host cps>] ");
 654     strcat(buffer, "[-busyat <redirect clients when queue > n>] ");
 655     strcat(buffer, "[-nobusy <no VBUSY before a volume is attached>] ");
 656     strcat(buffer, "[-rxpck <number of rx extra packets>] ");
 657     strcat(buffer, "[-rxdbg (enable rx debugging)] ");
 658     strcat(buffer, "[-rxdbge (enable rxevent debugging)] ");
 659 #ifdef  AFS_AIX32_ENV
 660     strcat(buffer, "[-m <min percentage spare in partition>] ");
 661 #endif
 662 #if defined(AFS_SGI_ENV)
 663     strcat(buffer, "[-lock (keep fileserver from swapping)] ");
 664 #endif
 665     strcat(buffer, "[-L (large server conf)] ");
 666     strcat(buffer, "[-S (small server conf)] ");
 667     strcat(buffer, "[-k <stack size>] ");
 668     strcat(buffer, "[-realm <Kerberos realm name>] ");
 669     strcat(buffer, "[-udpsize <size of socket buffer in bytes>] ");
 670     strcat(buffer, "[-sendsize <size of send buffer in bytes>] ");
 671 /*   strcat(buffer, "[-enable_peer_stats] "); */
 672 /*   strcat(buffer, "[-enable_process_stats] "); */
 673     strcat(buffer, "[-help]\n");
 674 /*
 675     ViceLog(0, ("%s", buffer));
 676 */
 677
 678         printf("%s",buffer);
 679         fflush(stdout);
 680
 681 } /*FlagMsg*/
 682
 683
 684 static afs_int32 ParseRights(char *arights)
 685 {
 686     afs_int32 mode = 0;
 687     int i, len;
 688     char tc;
 689
 690     if (!arights || !strcmp(arights, "")) {
 691         printf("Missing list of mode bits on -implicit option\n");
 692         return -1;
 693     }
 694     if (!strcmp(arights, "none"))
 695       mode = 0;
 696     else if (!strcmp(arights, "read"))
 697       mode = PRSFS_READ | PRSFS_LOOKUP;
 698     else if (!strcmp(arights, "write"))
 699       mode = PRSFS_READ | PRSFS_LOOKUP | PRSFS_INSERT |
 700              PRSFS_DELETE | PRSFS_WRITE | PRSFS_LOCK;
 701     else if (!strcmp(arights, "all"))
 702       mode = PRSFS_READ | PRSFS_LOOKUP | PRSFS_INSERT |
 703              PRSFS_DELETE | PRSFS_WRITE | PRSFS_LOCK | PRSFS_ADMINISTER;
 704     else {
 705         len = strlen(arights);
 706         for(i=0;i<len;i++) {
 707             tc = *arights++;
 708             if (tc == 'r') mode |= PRSFS_READ;
 709             else if (tc == 'l') mode |= PRSFS_LOOKUP;
 710             else if (tc == 'i') mode |= PRSFS_INSERT;
 711             else if (tc == 'd') mode |= PRSFS_DELETE;
 712             else if (tc == 'w') mode |= PRSFS_WRITE;
 713             else if (tc == 'k') mode |= PRSFS_LOCK;
 714             else if (tc == 'a') mode |= PRSFS_ADMINISTER;
 715             else if (tc == 'A') mode |= PRSFS_USR0;
 716             else if (tc == 'B') mode |= PRSFS_USR1;
 717             else if (tc == 'C') mode |= PRSFS_USR2;
 718             else if (tc == 'D') mode |= PRSFS_USR3;
 719             else if (tc == 'E') mode |= PRSFS_USR4;
 720             else if (tc == 'F') mode |= PRSFS_USR5;
 721             else if (tc == 'G') mode |= PRSFS_USR6;
 722             else if (tc == 'H') mode |= PRSFS_USR7;
 723             else {
 724                 printf("Illegal -implicit rights character '%c'.\n", tc);
 725                 return -1;
 726             }
 727         }
 728     }
 729     return mode;
 730 }
 731
 732 /*
 733  * Limit MAX_FILESERVER_THREAD by the system limit on the number of
 734  * pthreads (sysconf(_SC_THREAD_THREADS_MAX)), if applicable and
 735  * available.
 736  *
 737  * AIX:         sysconf() limit is real
 738  * HP-UX:       sysconf() limit is real
 739  * IRIX:        sysconf() limit is apparently NOT real -- too small
 740  * DUX:         sysconf() limit is apparently NOT real -- too big
 741  * Linux:       sysconf() limit is apparently NOT real -- too big
 742  * Solaris:     no sysconf() limit
 743  */
 744 static int
 745 max_fileserver_thread(void)
 746 {
 747 #if defined(AFS_PTHREAD_ENV)
 748 #if defined(AFS_AIX_ENV) || defined(AFS_HPUX_ENV)
 749         long ans;
 750
 751         ans = sysconf(_SC_THREAD_THREADS_MAX);
 752         if (0 < ans && ans < MAX_FILESERVER_THREAD)
 753                 return (int) ans;
 754 #endif
 755 #endif /* defined(AFS_PTHREAD_ENV) */
 756         return MAX_FILESERVER_THREAD;
 757 }
 758
 759 static int ParseArgs(int argc, char *argv[])
 760 {
 761     int SawL=0, SawS=0, SawVC=0;
 762     int Sawrxpck = 0, Sawsmall=0, Sawlarge=0, Sawcbs=0, Sawlwps=0, Sawbufs=0;
 763     int Sawbusy=0;
 764     int i;
 765     int bufSize = 0;      /* temp variable to read in udp socket buf size*/
 766
 767     for (i = 1; i < argc; i++) {
 768         if (!strcmp(argv[i], "-d")) {
 769             debuglevel = atoi(argv[++i]);
 770             LogLevel = debuglevel;
 771         }
 772         else
 773             if (!strcmp(argv[i], "-banner")) {
 774                 printBanner = 1;
 775         } else
 776             if (!strcmp(argv[i], "-implicit")) {
 777                 implicitAdminRights = ParseRights(argv[++i]);
 778                 if (implicitAdminRights < 0) return implicitAdminRights;
 779         } else
 780             if (!strcmp(argv[i], "-readonly")) {
 781                 readonlyServer = 1;
 782         } else
 783             if (!strcmp(argv[i], "-L")) {
 784                 SawL = 1;
 785         } else
 786             if (!strcmp(argv[i], "-S")) {
 787                 SawS = 1;
 788         }
 789         else
 790             if (!strcmp(argv[i], "-p")) {
 791                 int lwps_max = max_fileserver_thread() - FILESERVER_HELPER_THREADS;
 792                 Sawlwps = 1;
 793                 lwps = atoi(argv[++i]);
 794                 if (lwps > lwps_max)
 795                     lwps = lwps_max;
 796                 else if (lwps < 6)
 797                     lwps = 6;
 798             }
 799         else
 800             if (!strcmp(argv[i], "-b")) {
 801                 Sawbufs = 1;
 802                 buffs = atoi(argv[++i]);
 803             }
 804         else
 805             if (!strcmp(argv[i], "-l")) {
 806                 Sawlarge = 1;
 807                 large = atoi(argv[++i]);
 808             }
 809         else
 810             if (!strcmp(argv[i], "-vc")) {
 811                 SawVC = 1;
 812                 volcache = atoi(argv[++i]);
 813             }
 814         else
 815             if (!strcmp(argv[i], "-novbc")) {
 816                 novbc = 1;
 817             }
 818         else
 819             if (!strcmp(argv[i], "-rxpck")) {
 820                 Sawrxpck = 1;
 821                 rxpackets = atoi(argv[++i]);
 822             }
 823         else
 824             if (!strcmp(argv[i], "-s")) {
 825                 Sawsmall = 1;
 826                 nSmallVns = atoi(argv[++i]);
 827             }
 828         else
 829             if (!strcmp(argv[i], "-abortthreshold")) {
 830                 abort_threshold = atoi(argv[++i]);
 831             }
 832         else
 833             if (!strcmp(argv[i], "-k"))
 834                 stack = atoi(argv[++i]);
 835 #if defined(AFS_SGI_ENV)
 836         else
 837             if (!strcmp(argv[i], "-lock")) {
 838                 SawLock = 1;
 839             }
 840 #endif
 841         else
 842             if (!strcmp(argv[i], "-spare")) {
 843                 BlocksSpare = atoi(argv[++i]);
 844                 SawSpare = 1;
 845             }
 846         else
 847             if (!strcmp(argv[i], "-pctspare")) {
 848                 PctSpare = atoi(argv[++i]);
 849                 BlocksSpare = 0;                /* has non-zero default */
 850                 SawPctSpare = 1;
 851             }
 852         else
 853             if (!strcmp(argv[i], "-w"))
 854                 fiveminutes = atoi(argv[++i]);
 855         else
 856             if (!strcmp(argv[i], "-hr")) {
 857                 int hr = atoi(argv[++i]);
 858                 if ((hr < 1) || (hr > 36)) {
 859                     printf("host acl refresh interval of %d hours is invalid; hours must be between 1 and 36\n\n",
 860                            hr);
 861                     return -1;
 862                 }
 863                 hostaclRefresh = hr*60*60;
 864         } else
 865             if (!strcmp(argv[i], "-rxdbg"))
 866                 rxlog = 1;
 867         else
 868             if (!strcmp(argv[i], "-rxdbge"))
 869                 eventlog = 1;
 870         else
 871             if (!strcmp(argv[i], "-cb")) {
 872                 Sawcbs = 1;
 873                 numberofcbs = atoi(argv[++i]);
 874                 if ((numberofcbs < 10000) || (numberofcbs > 2147483647)) {
 875                     printf("number of cbs %d invalid; must be between 10000 and 2147483647\n",
 876                            numberofcbs);
 877                     return -1;
 878                 }
 879             }
 880             else
 881               if (!strcmp(argv[i], "-busyat")) {
 882                 Sawbusy = 1;
 883                 busy_threshold = atoi(argv[++i]);
 884                 if (busy_threshold < 10) {
 885                     printf("Busy threshold %d is too low, will compute default.\n",
 886                            busy_threshold);
 887                     Sawbusy = 0;
 888                 }
 889               }
 890             else
 891               if (!strcmp(argv[i], "-nobusy"))
 892                 busyonrst=0;
 893 #ifdef  AFS_AIX32_ENV
 894         else
 895             if (!strcmp(argv[i], "-m")) {
 896                 extern int aixlow_water;
 897                  aixlow_water = atoi(argv[++i]);
 898                 if ((aixlow_water < 0) || (aixlow_water > 30)) {
 899                     printf("space reserved %d% invalid; must be between 0-30%\n", aixlow_water);
 900                     return -1;
 901                 }
 902             }
 903 #endif
 904         else
 905             if (!strcmp(argv[i], "-nojumbo")) {
 906                 rxJumbograms = 0;
 907             }
 908         else
 909             if (!strcmp(argv[i], "-realm")) {
 910                 extern char local_realm[AFS_REALM_SZ];
 911                 if (strlen(argv[++i]) >= AFS_REALM_SZ) {
 912                     printf("-realm argument must contain fewer than %d characters.\n",AFS_REALM_SZ);
 913                     return -1;
 914                 }
 915                 strncpy (local_realm, argv[i], AFS_REALM_SZ);
 916             }
 917         else
 918             if ( !strcmp(argv[i], "-udpsize")) {
 919                 if ( (i+1) >= argc ) {
 920                     printf("You have to specify -udpsize <integer value>\n");
 921                     return -1;
 922                 }
 923                 bufSize = atoi(argv[++i]);
 924                 if ( bufSize < rx_GetMinUdpBufSize() )
 925                     printf("Warning:udpsize %d is less than minimum %d; ignoring\n",
 926                                 bufSize, rx_GetMinUdpBufSize() );
 927                 else
 928                     udpBufSize = bufSize;
 929             }
 930         else
 931             if ( !strcmp(argv[i], "-sendsize")) {
 932                 if ( (i+1) >= argc ) {
 933                     printf("You have to specify -sendsize <integer value>\n");
 934                     return -1;
 935                 }
 936                 bufSize = atoi(argv[++i]);
 937                 if ( bufSize < 16384 )
 938                     printf("Warning:sendsize %d is less than minimum %d; ignoring\n",
 939                                 bufSize, 16384);
 940                 else
 941                     sendBufSize = bufSize;
 942             }
 943         else
 944             if (!strcmp(argv[i], "-enable_peer_stats")) {
 945                 rx_enablePeerRPCStats();
 946             }
 947         else
 948             if (!strcmp(argv[i], "-enable_process_stats")) {
 949                 rx_enableProcessRPCStats();
 950             }
 951 #ifndef AFS_NT40_ENV
 952         else
 953             if (strcmp(argv[i], "-syslog")==0) {
 954                 /* set syslog logging flag */
 955                 serverLogSyslog = 1;
 956             }
 957         else
 958             if (strncmp(argv[i], "-syslog=", 8)==0) {
 959                 serverLogSyslog = 1;
 960                 serverLogSyslogFacility = atoi(argv[i]+8);
 961             }
 962 #endif
 963         else {
 964             return(-1);
 965         }
 966     }
 967     if (SawS && SawL) {
 968         printf("Only one of -L, or -S must be specified\n");
 969         return -1;
 970     }
 971     if (SawS) {
 972         if (!Sawrxpck) rxpackets = 100;
 973         if (!Sawsmall) nSmallVns = 200;
 974         if (!Sawlarge) large = 200;
 975         if (!Sawcbs) numberofcbs = 20000;
 976         if (!Sawlwps) lwps = 6;
 977         if (!Sawbufs) buffs = 70;
 978         if (!SawVC) volcache = 200;
 979     }
 980     if (SawL) {
 981         if (!Sawrxpck) rxpackets = 200;
 982         if (!Sawsmall) nSmallVns = 600;
 983         if (!Sawlarge) large = 600;
 984         if (!Sawcbs) numberofcbs = 64000;
 985         if (!Sawlwps) lwps = 12;
 986         if (!Sawbufs) buffs = 120;
 987         if (!SawVC) volcache = 600;
 988     }
 989     if (!Sawbusy)
 990         busy_threshold = 3*rxpackets/2;
 991
 992     return(0);
 993
 994 } /*ParseArgs*/
 995
 996
 997 #define MAXPARMS 15
 998
 999 static void NewParms(int initializing)
1000 {
1001     static struct stat sbuf;
1002     register int i, fd;
1003     char *parms;
1004     char *argv[MAXPARMS];
1005     register int argc;
1006
1007     if (!(stat("/vice/file/parms",&sbuf))) {
1008         parms = (char *)malloc(sbuf.st_size);
1009         if(!parms) return;
1010         fd = open("parms", O_RDONLY, 0666);
1011         if(fd <= 0) {
1012             ViceLog(0, ("Open for parms failed with errno = %d\n", errno));
1013             return;
1014         }
1015
1016         i = read(fd, parms, sbuf.st_size);
1017         close(fd);
1018         if(i != sbuf.st_size) {
1019             if (i < 0 ) {
1020                 ViceLog(0, ("Read on parms failed with errno = %d\n", errno));
1021             } else {
1022                 ViceLog(0,
1023                         ("Read on parms failed; expected %d bytes but read %d\n",
1024                         sbuf.st_size, i));
1025             }
1026             free(parms);
1027             return;
1028         }
1029
1030         for (i = 0;i < MAXPARMS; argv[i++] = 0 );
1031
1032         for (argc = i = 0; i < sbuf.st_size; i++) {
1033             if ((*(parms + i) != ' ') && (*(parms + i) != '\n')){
1034                 if(argv[argc] == 0) argv[argc] = (parms+i);
1035             }
1036             else {
1037                 *(parms + i) = '\0';
1038                 if(argv[argc] != 0) {
1039                     if(++argc == MAXPARMS) break;
1040                 }
1041                 while ((*(parms + i + 1) == ' ') || (*(parms + i + 1) == '\n'))
1042                     i++;
1043             }
1044         }
1045         if(ParseArgs(argc, argv) == 0) {
1046             ViceLog(0, ("Change parameters to:"));
1047         } else {
1048             ViceLog(0, ("Invalid parameter in:"));
1049         }
1050         for(i = 0; i < argc; i++) {
1051             ViceLog(0, (" %s", argv[i]));
1052         }
1053         ViceLog(0,("\n"));
1054         free(parms);
1055     }
1056     else
1057         if(!initializing)
1058             ViceLog(0, ("Received request to change parms but no parms file exists\n"));
1059
1060 } /*NewParms*/
1061
1062
1063 /* Miscellaneous routines */
1064 void Die (char *msg)
1065 {
1066     ViceLog (0,("%s\n", msg));
1067     assert(0);
1068
1069 } /*Die*/
1070
1071
1072 afs_int32 InitPR()
1073 {
1074     register code;
1075
1076     /*
1077      * If this fails, it's because something major is wrong, and is not
1078      * likely to be time dependent.
1079      */
1080     code = pr_Initialize(2, AFSDIR_SERVER_ETC_DIRPATH, 0);
1081     if (code != 0) {
1082         ViceLog(0, ("Couldn't initialize protection library; code=%d.\n", code));
1083         return code;
1084     }
1085     SystemId = SYSADMINID;
1086     SystemAnyUser = ANYUSERID;
1087     SystemAnyUserCPS.prlist_len = 0;
1088     SystemAnyUserCPS.prlist_val = NULL;
1089     AnonCPS.prlist_len = 0;
1090     AnonCPS.prlist_val = NULL;
1091     while (1) {
1092         code = pr_GetCPS(SystemAnyUser, &SystemAnyUserCPS);
1093         if (code != 0) {
1094             ViceLog(0,
1095                     ("Couldn't get CPS for AnyUser, will try again in 30 seconds; code=%d.\n",
1096                     code));
1097             goto sleep;
1098         }
1099         code = pr_GetCPS(ANONYMOUSID,&AnonCPS);
1100         if (code != 0) {
1101             ViceLog(0,("Couldn't get Anonymous CPS, exiting; code=%d.\n", code));
1102             return -1;
1103         }
1104         AnonymousID = ANONYMOUSID;
1105         return 0;
1106 sleep:
1107 #ifdef AFS_PTHREAD_ENV
1108         sleep(30);
1109 #else /* AFS_PTHREAD_ENV */
1110         IOMGR_Sleep(30);
1111 #endif /* AFS_PTHREAD_ENV */
1112     }
1113 } /*InitPR*/
1114
1115 struct rx_connection *serverconns[MAXSERVERS];
1116 struct ubik_client *cstruct;
1117
1118 afs_int32 vl_Initialize(char *confDir)
1119 {   afs_int32 code, scIndex = 0, i;
1120     struct afsconf_dir *tdir;
1121     struct rx_securityClass *sc;
1122     struct afsconf_cell info;
1123
1124     tdir = afsconf_Open(confDir);
1125     if (!tdir) {
1126         ViceLog(0, ("Could not open configuration directory (%s).\n", confDir));
1127         exit(1);
1128     }
1129     code = afsconf_ClientAuth(tdir, &sc, &scIndex);
1130     if (code) {
1131         ViceLog(0, ("Could not get security object for localAuth\n"));
1132         exit(1);
1133     }
1134     code = afsconf_GetCellInfo(tdir,NULL, AFSCONF_VLDBSERVICE, &info);
1135     if (info.numServers > MAXSERVERS) {
1136         ViceLog(0, ("vl_Initialize: info.numServers=%d (> MAXSERVERS=%d)\n",info.numServers, MAXSERVERS));
1137         exit(1);
1138     }
1139     for (i = 0;i<info.numServers;i++)
1140         serverconns[i] = rx_NewConnection(info.hostAddr[i].sin_addr.s_addr, info.hostAddr[i].sin_port,
1141                                           USER_SERVICE_ID, sc, scIndex);
1142     code = ubik_ClientInit(serverconns, &cstruct);
1143     if (code) {
1144         ViceLog(0, ("vl_Initialize: ubik client init failed.\n"));
1145         return code;
1146     }
1147     return 0;
1148 }
1149
1150 #define SYSIDMAGIC      0x88aabbcc
1151 #define SYSIDVERSION    1
1152
1153 afs_int32
1154 ReadSysIdFile() {
1155     afs_int32 fd, nentries, i;
1156     struct versionStamp vsn;
1157     struct stat     status;
1158     afsUUID uuid;
1159
1160     if ((stat(AFSDIR_SERVER_SYSID_FILEPATH, &status)) || (status.st_size <= 0)) {
1161         ViceLog(0, ("%s: doesn't exist\n", AFSDIR_SERVER_SYSID_FILEPATH));
1162         return ENOENT;
1163     }
1164     if (!(fd = open(AFSDIR_SERVER_SYSID_FILEPATH, O_RDONLY, 0))) {
1165         ViceLog(0, ("%s: can't open (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1166         return EIO;
1167     }
1168     if ((i = read(fd, (char *)&vsn, sizeof(vsn))) != sizeof(vsn)) {
1169         ViceLog(0, ("%s: Read failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1170         return EIO;
1171     }
1172     if (vsn.magic != SYSIDMAGIC) {
1173         ViceLog(0, ("%s: wrong magic %x (we support %x)\n", AFSDIR_SERVER_SYSID_FILEPATH, vsn.magic, SYSIDMAGIC));
1174         return EIO;
1175     }
1176     if (vsn.version != SYSIDVERSION) {
1177         ViceLog(0, ("%s: wrong version %d (we support %d)\n", AFSDIR_SERVER_SYSID_FILEPATH, vsn.version, SYSIDVERSION));
1178         return EIO;
1179     }
1180     if ((i = read(fd, (char *)&uuid, sizeof(struct afsUUID))) != sizeof(struct afsUUID)) {
1181         ViceLog(0, ("%s: read of uuid failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1182         return EIO;
1183     }
1184     afs_ntohuuid(&uuid);
1185     FS_HostUUID = uuid;
1186     if ((i = read(fd, (char *)&nentries, sizeof(afs_int32))) != sizeof(afs_int32)) {
1187         ViceLog(0, ("%s: Read of entries failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1188         return EIO;
1189     }
1190     if (nentries <= 0 || nentries > ADDRSPERSITE) {
1191         ViceLog(0, ("%s: invalid num of interfaces: %d\n", AFSDIR_SERVER_SYSID_FILEPATH, nentries));
1192         return EIO;
1193     }
1194     FS_HostAddr_cnt = nentries;
1195     for (i = 0; i < nentries; i++) {
1196         if (read(fd, (char *)&FS_HostAddrs[i], sizeof(afs_int32)) != sizeof(afs_int32)) {
1197             ViceLog(0, ("%s: Read of addresses failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1198             FS_HostAddr_cnt = 0;        /* reset it */
1199             return EIO;
1200         }
1201     }
1202     close(fd);
1203     return 0;
1204 }
1205
1206 afs_int32
1207 WriteSysIdFile() {
1208     afs_int32 fd, nentries, i;
1209     struct versionStamp vsn;
1210     struct stat     status;
1211     afsUUID uuid;
1212
1213     if (!stat(AFSDIR_SERVER_SYSID_FILEPATH, &status)) {
1214         /*
1215          * File exists; keep the old one around
1216          */
1217         renamefile(AFSDIR_SERVER_SYSID_FILEPATH, AFSDIR_SERVER_OLDSYSID_FILEPATH);
1218     }
1219     fd = open(AFSDIR_SERVER_SYSID_FILEPATH, O_WRONLY|O_TRUNC|O_CREAT, 0666);
1220     if (fd < 1) {
1221         ViceLog(0, ("%s: can't create (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1222         return EIO;
1223     }
1224     vsn.magic = SYSIDMAGIC;
1225     vsn.version = 1;
1226     if ((i = write(fd, (char *)&vsn, sizeof(vsn))) != sizeof(vsn)) {
1227         ViceLog(0, ("%s: write failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1228         return EIO;
1229     }
1230     uuid = FS_HostUUID;
1231     afs_htonuuid(&uuid);
1232     if ((i = write(fd, (char *)&uuid, sizeof(struct afsUUID))) != sizeof(struct afsUUID)) {
1233         ViceLog(0, ("%s: write of uuid failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1234         return EIO;
1235     }
1236     if ((i = write(fd, (char *)&FS_HostAddr_cnt, sizeof(afs_int32))) != sizeof(afs_int32)) {
1237         ViceLog(0, ("%s: write of # of entries failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1238         return EIO;
1239     }
1240     for (i = 0; i < FS_HostAddr_cnt; i++) {
1241         if (write(fd, (char *)&FS_HostAddrs[i], sizeof(afs_int32)) != sizeof(afs_int32)) {
1242             ViceLog(0, ("%s: write of addresses failed (%d)\n", AFSDIR_SERVER_SYSID_FILEPATH, errno));
1243             return EIO;
1244         }
1245     }
1246     close(fd);
1247     return 0;
1248 }
1249
1250 /*
1251  * defect 10966
1252  * This routine sets up the buffers for the VL_RegisterAddrs RPC. All addresses
1253  * in FS_HostAddrs[] are in NBO, while the RPC treats them as a "blob" of data
1254  * and so we need to convert each of them into HBO which is what the extra
1255  * array called FS_HostAddrs_HBO is used here.
1256  */
1257 afs_int32
1258 Do_VLRegisterRPC() {
1259     register int code;
1260     bulkaddrs addrs;
1261     extern int VL_RegisterAddrs();
1262     afs_uint32 FS_HostAddrs_HBO[ADDRSPERSITE];
1263     int i=0;
1264
1265     for (i=0; i < FS_HostAddr_cnt ; i++)
1266      FS_HostAddrs_HBO[i]=ntohl(FS_HostAddrs[i]);
1267     addrs.bulkaddrs_len = FS_HostAddr_cnt;
1268     addrs.bulkaddrs_val = (afs_uint32 *)FS_HostAddrs_HBO;
1269     code = ubik_Call(VL_RegisterAddrs, cstruct, 0, &FS_HostUUID, 0, &addrs);
1270     if (code) {
1271        if (code == VL_MULTIPADDR) {
1272           ViceLog(0, ("VL_RegisterAddrs rpc failed; The ethernet address exist on a different server; repair it\n"));
1273           ViceLog(0, ("VL_RegisterAddrs rpc failed; See VLLog for details\n"));
1274           return code;
1275        } else if (code == RXGEN_OPCODE) {
1276           ViceLog(0, ("vlserver doesn't support VL_RegisterAddrs rpc; ignored\n"));
1277           FS_registered = 2;    /* So we don't have to retry in the gc daemon */
1278        } else {
1279           ViceLog(0, ("VL_RegisterAddrs rpc failed; will retry periodically (code=%d, err=%d)\n",
1280                       code, errno));
1281        }
1282     } else {
1283        FS_registered = 2;       /* So we don't have to retry in the gc daemon */
1284        WriteSysIdFile();
1285     }
1286
1287     return 0;
1288 }
1289
1290 afs_int32 InitVL() {
1291     int (*old)();
1292     afs_int32 code;
1293     afs_int32 cnt, i;
1294     extern int rxi_numNetAddrs;
1295     extern afs_uint32 rxi_NetAddrs[];
1296
1297     /*
1298      * If this fails, it's because something major is wrong, and is not
1299      * likely to be time dependent.
1300      */
1301     code = vl_Initialize(AFSDIR_SERVER_ETC_DIRPATH);
1302     if (code != 0) {
1303         ViceLog(0, ("Couldn't initialize protection library; code=%d.\n", code));
1304         return code;
1305     }
1306
1307     /* Read or create the sysid file and register the fileserver's
1308      * IP addresses with the vlserver.
1309      */
1310     code = ReadSysIdFile();
1311     if (code) {
1312        /* Need to create the file */
1313        ViceLog(0, ("Creating new SysID file\n"));
1314        if ((code = afs_uuid_create(&FS_HostUUID))) {
1315           ViceLog(0, ("Failed to create new uuid: %d\n", code));
1316           exit(1);
1317        }
1318     }
1319     /* A good sysid file exists; inform the vlserver. If any conflicts,
1320      * we always use the latest interface available as the real truth.
1321      */
1322 #ifndef AFS_NT40_ENV
1323     if(AFSDIR_SERVER_NETRESTRICT_FILEPATH || AFSDIR_SERVER_NETINFO_FILEPATH) {
1324       /*
1325        * Find addresses we are supposed to register as per the netrestrict
1326        * and netinfo files (/usr/afs/local/NetInfo and
1327        * /usr/afs/local/NetRestict)
1328        */
1329       char reason[1024];
1330       afs_int32 code = parseNetFiles(FS_HostAddrs,NULL, NULL,
1331                                  ADDRSPERSITE, reason,
1332                                  AFSDIR_SERVER_NETINFO_FILEPATH,
1333                                  AFSDIR_SERVER_NETRESTRICT_FILEPATH);
1334       if (code < 0) {
1335         ViceLog(0,("Can't register any valid addresses: %s\n",reason));
1336         exit(1);
1337       }
1338       FS_HostAddr_cnt = (afs_uint32) code;
1339     }
1340     else
1341 #endif
1342     {
1343       FS_HostAddr_cnt = rx_getAllAddr(FS_HostAddrs, ADDRSPERSITE);
1344     }
1345
1346     FS_registered = 1;
1347     code = Do_VLRegisterRPC();
1348     return code;
1349 }
1350
1351 int
1352 main(int argc, char * argv[])
1353 {
1354     int     i;
1355     afs_int32    code;
1356     FILE   *file;
1357     char tbuffer[32];
1358     struct rx_securityClass *sc[4];
1359     struct rx_service *tservice;
1360 #ifdef AFS_PTHREAD_ENV
1361     pthread_t parentPid, serverPid;
1362     pthread_attr_t tattr;
1363 #else /* AFS_PTHREAD_ENV */
1364     PROCESS parentPid, serverPid;
1365 #endif /* AFS_PTHREAD_ENV */
1366     struct hostent *he;
1367     int minVnodesRequired;      /* min size of vnode cache */
1368 #ifndef AFS_NT40_ENV
1369     struct rlimit rlim;         /* max number of open file descriptors */
1370 #endif
1371     int curLimit;
1372
1373 #ifdef  AFS_AIX32_ENV
1374     struct sigaction nsa;
1375
1376     sigemptyset(&nsa.sa_mask);
1377     nsa.sa_handler = SIG_DFL;
1378     nsa.sa_flags = SA_FULLDUMP;
1379     sigaction(SIGABRT, &nsa, NULL);
1380     sigaction(SIGSEGV, &nsa, NULL);
1381 #endif
1382
1383     /* Initialize dirpaths */
1384     if (!(initAFSDirPath() & AFSDIR_SERVER_PATHS_OK)) {
1385 #ifdef AFS_NT40_ENV
1386         ReportErrorEventAlt(AFSEVT_SVR_NO_INSTALL_DIR, 0, argv[0],0);
1387 #endif
1388         fprintf(stderr,"%s: Unable to obtain AFS server directory.\n", argv[0]);
1389         exit(2);
1390     }
1391
1392 #ifndef AFS_QUIETFS_ENV
1393     console = fopen("/dev/console","w");
1394 #endif
1395
1396     if(ParseArgs(argc,argv)) {
1397         FlagMsg();
1398         exit(-1);
1399     }
1400
1401 #ifdef AFS_PTHREAD_ENV
1402     assert(pthread_mutex_init(&fileproc_glock_mutex, NULL) == 0);
1403 #endif /* AFS_PTHREAD_ENV */
1404
1405 #ifdef AFS_SGI_VNODE_GLUE
1406     if (afs_init_kernel_config(-1) <0) {
1407         printf("Can't determine NUMA configuration, not starting fileserver.\n");
1408         exit(1);
1409     }
1410 #endif
1411     confDir = afsconf_Open(AFSDIR_SERVER_ETC_DIRPATH);
1412     if (!confDir) {
1413         fprintf(stderr, "Unable to open config directory %s\n",
1414                 AFSDIR_SERVER_ETC_DIRPATH);
1415         exit(-1);
1416     }
1417
1418     NewParms(1);
1419
1420     /* Open FileLog on stdout, stderr, fd 1 and fd2 (for perror), sigh. */
1421     OpenLog(AFSDIR_SERVER_FILELOG_FILEPATH);
1422     SetupLogSignals();
1423
1424     if (SawSpare && SawPctSpare) {
1425         ViceLog(0, ("Both -spare and -pctspare specified, exiting.\n"));
1426         exit(-1);
1427     }
1428
1429 #ifdef AFS_SGI_XFS_IOPS_ENV
1430     ViceLog(0, ("XFS/EFS File server starting\n"));
1431 #else
1432     ViceLog(0, ("File server starting\n"));
1433 #endif
1434
1435 #if defined(AFS_PTHREAD_ENV) && !defined(AFS_NT40_ENV)
1436     /* initialize the pthread soft signal handler thread */
1437     softsig_init();
1438 #endif
1439
1440     /* install signal handlers for controlling the fileserver process */
1441     ResetCheckSignal();  /* set CheckSignal_Signal() sig handler */
1442     ResetCheckDescriptors();  /* set CheckDescriptors_Signal() sig handler */
1443
1444 #if defined(AFS_SGI_ENV)
1445     /* give this guy a non-degrading priority so help busy servers */
1446     schedctl(NDPRI, 0, NDPNORMMAX);
1447     if (SawLock)
1448         plock(PROCLOCK);
1449 #else
1450 #ifndef AFS_NT40_ENV
1451     nice(-5); /* TODO: */
1452 #endif
1453 #endif
1454     assert(DInit(buffs) == 0);
1455
1456 #ifdef AFS_NT40_ENV
1457     if (afs_winsockInit()<0) {
1458         ReportErrorEventAlt(AFSEVT_SVR_WINSOCK_INIT_FAILED, 0, argv[0], 0);
1459         ViceLog(0, ("File server failed to intialize winsock.\n"));
1460         exit(1);
1461     }
1462 #endif
1463     CheckAdminName();
1464
1465     /* if we support more than 16 threads, then we better have the ability
1466     ** to keep open a large number of files simultaneously
1467     */
1468 #if     defined(AFS_AIX_ENV) && !defined(AFS_AIX42_ENV)
1469     curLimit = OPEN_MAX;        /* for pre AIX 4.2 systems */
1470 #elif defined(AFS_NT40_ENV)
1471     curLimit = NT_OPEN_MAX;     /* open file descriptor limit on NT */
1472 #else
1473
1474     curLimit = 0;               /* the number of open file descriptors */
1475     code     = getrlimit(RLIMIT_NOFILE, &rlim);
1476     if (code == 0) {
1477         curLimit      = rlim.rlim_cur;
1478         rlim.rlim_cur = rlim.rlim_max;
1479         code = setrlimit(RLIMIT_NOFILE, &rlim);
1480         if ( code == 0 )
1481             curLimit  = rlim.rlim_max;
1482     }
1483     if ( code != 0 )
1484         ViceLog(0, ("Failed to increase open file limit, using default\n"));
1485
1486 #endif /* defined(AFS_AIX_ENV) && !defined(AFS_AIX42_ENV) */
1487
1488     curLimit -= 32;             /* leave a slack of 32 file descriptors */
1489     if ( lwps > curLimit ) {
1490         if ( curLimit > 0)
1491             lwps = curLimit;
1492         else if ( lwps > 16 )
1493             lwps = 16;            /* default to a maximum of 16 threads */
1494         ViceLog(0, ("The system supports a max of %d open files and we are starting %d threads\n", curLimit, lwps));
1495     }
1496
1497
1498 #ifndef AFS_PTHREAD_ENV
1499     assert(LWP_InitializeProcessSupport(LWP_MAX_PRIORITY - 2, &parentPid) == LWP_SUCCESS);
1500 #endif /* !AFS_PTHREAD_ENV */
1501
1502     /* Initialize volume support */
1503     if (!novbc) {
1504         V_BreakVolumeCallbacks = BreakVolumeCallBacksLater;
1505     }
1506
1507     /* initialize libacl routines */
1508     acl_Initialize(ACL_VERSION);
1509
1510     /* initialize RX support */
1511 #ifndef AFS_NT40_ENV
1512     rxi_syscallp = viced_syscall;
1513 #endif
1514     rx_extraPackets = rxpackets;
1515     rx_extraQuota = 4;  /* for outgoing prserver calls from R threads */
1516     rx_SetBusyThreshold(busy_threshold, VBUSY);
1517     rx_SetCallAbortThreshold(abort_threshold);
1518     rx_SetConnAbortThreshold(abort_threshold);
1519     stackSize = lwps * 4000;
1520     if (stackSize < 32000)
1521         stackSize = 32000;
1522     else if (stackSize > 44000)
1523         stackSize = 44000;
1524 #if    defined(AFS_HPUX_ENV) || defined(AFS_SUN_ENV) || defined(AFS_SGI51_ENV)
1525     rx_SetStackSize(1, stackSize);
1526 #endif
1527     if ( udpBufSize )
1528         rx_SetUdpBufSize(udpBufSize);/* set the UDP buffer size for receive */
1529     if (rx_Init((int)htons(7000))<0) {
1530         ViceLog(0, ("Cannot initialize RX\n"));
1531         exit(1);
1532     }
1533     if (!rxJumbograms) {
1534         /* Don't send and don't allow 3.4 clients to send jumbograms. */
1535         rx_SetNoJumbo();
1536     }
1537     rx_GetIFInfo();
1538     rx_SetRxDeadTime(30);
1539     sc[0] = rxnull_NewServerSecurityObject();
1540     sc[1] = 0; /* rxvab_NewServerSecurityObject(key1, 0) */
1541     sc[2] = rxkad_NewServerSecurityObject (rxkad_clear, NULL,
1542                                            get_key, NULL);
1543     sc[3] = rxkad_NewServerSecurityObject (rxkad_crypt, NULL,
1544                                            get_key, NULL);
1545     tservice = rx_NewService
1546         (/* port */ 0, /* service id */ 1, /*service name */ "AFS",
1547          /* security classes */ sc, /* numb sec classes */ 4,
1548          RXAFS_ExecuteRequest);
1549     if (!tservice) {
1550         ViceLog(0, ("Failed to initialize RX, probably two servers running.\n"));
1551         exit(-1);
1552     }
1553     rx_SetDestroyConnProc(tservice, (void (*)())h_FreeConnection);
1554     rx_SetMinProcs(tservice, 3);
1555     rx_SetMaxProcs(tservice, lwps);
1556     rx_SetCheckReach(tservice, 1);
1557
1558     tservice = rx_NewService(0,  RX_STATS_SERVICE_ID, "rpcstats", sc, 4, RXSTATS_ExecuteRequest);
1559     if (!tservice) {
1560         ViceLog(0, ("Failed to initialize rpc stat service.\n"));
1561         exit(-1);
1562     }
1563     rx_SetMinProcs(tservice, 2);
1564     rx_SetMaxProcs(tservice, 4);
1565
1566     /*
1567      * Enable RX hot threads, which allows the listener thread to trade
1568      * places with an idle thread and moves the context switch from listener
1569      * to worker out of the critical path.
1570      */
1571     rx_EnableHotThread();
1572
1573     /* Some rx debugging */
1574     if (rxlog || eventlog) {
1575         debugFile = fopen("rx_dbg", "w");
1576         if (rxlog) rx_debugFile = debugFile;
1577         if (eventlog) rxevent_debugFile = debugFile;
1578     }
1579
1580     init_sys_error_to_et(); /* Set up error table translation */
1581     h_InitHostPackage();  /* set up local cellname and realmname */
1582     InitCallBack(numberofcbs);
1583     ClearXStatValues();
1584
1585     code = InitVL();
1586     if (code) {
1587         ViceLog(0,("Fatal error in library initialization, exiting!!\n"));
1588         exit(1);
1589     }
1590
1591     code = InitPR();
1592     if (code) {
1593         ViceLog(0,("Fatal error in protection initialization, exiting!!\n"));
1594         exit(1);
1595     }
1596
1597     /* allow super users to manage RX statistics */
1598     rx_SetRxStatUserOk(fs_rxstat_userok);
1599
1600     rx_StartServer(0);  /* now start handling requests */
1601
1602     /* we ensure that there is enough space in the vnode buffer to satisfy
1603     ** requests from all concurrent threads.
1604     ** the maximum number of vnodes used by a single thread at any one time
1605     ** is three ( "link" uses three vnodes simultaneously, one vLarge and
1606     ** two vSmall for linking files and two vLarge and one vSmall for linking
1607     ** files  ) : dhruba
1608     */
1609     minVnodesRequired = 2 * lwps + 1;
1610     if ( minVnodesRequired > nSmallVns ) {
1611         nSmallVns = minVnodesRequired;
1612         ViceLog(0, ("Overriding -s command line parameter with %d\n",
1613                     nSmallVns));
1614     }
1615     if ( minVnodesRequired > large ) {
1616         large = minVnodesRequired;
1617         ViceLog(0, ("Overriding -l command line parameter with %d\n", large));
1618     }
1619
1620     /* We now do this after getting the listener up and running, so that client
1621        connections don't timeout (maybe) if a file server is restarted, since it
1622        will be available "real soon now".  Worry about whether we can satisfy the
1623        calls in the volume package itself.
1624      */
1625     if (VInitVolumePackage(fileServer,large,nSmallVns,0, volcache)) {
1626         ViceLog(0, ("Shutting down: errors encountered initializing volume package\n"));
1627         VShutdown();
1628         exit(1);
1629     }
1630
1631     /*
1632      * We are done calling fopen/fdopen. It is safe to use a large
1633      * of the file descriptor cache.
1634      */
1635     ih_UseLargeCache();
1636
1637 #ifdef AFS_PTHREAD_ENV
1638     ViceLog(5, ("Starting pthreads\n"));
1639     assert(pthread_attr_init(&tattr) == 0);
1640     assert(pthread_attr_setdetachstate(&tattr, PTHREAD_CREATE_DETACHED) == 0);
1641
1642     assert(pthread_create(&serverPid, &tattr, (void *)FiveMinuteCheckLWP, &fiveminutes) == 0);
1643     assert(pthread_create(&serverPid, &tattr, (void *)HostCheckLWP, &fiveminutes) == 0);
1644     assert(pthread_create(&serverPid, &tattr, (void *)FsyncCheckLWP, &fiveminutes) == 0);
1645 #else /* AFS_PTHREAD_ENV */
1646     ViceLog(5, ("Starting LWP\n"));
1647     assert(LWP_CreateProcess(FiveMinuteCheckLWP, stack*1024, LWP_MAX_PRIORITY - 2,
1648                              (void *) &fiveminutes, "FiveMinuteChecks", &serverPid) == LWP_SUCCESS);
1649
1650     assert(LWP_CreateProcess(HostCheckLWP, stack*1024, LWP_MAX_PRIORITY - 2,
1651             (void *) &fiveminutes, "HostCheck", &serverPid) == LWP_SUCCESS);
1652     assert(LWP_CreateProcess(FsyncCheckLWP, stack*1024, LWP_MAX_PRIORITY - 2,
1653             (void *) &fiveminutes, "FsyncCheck", &serverPid) == LWP_SUCCESS);
1654 #endif /* AFS_PTHREAD_ENV */
1655
1656     TM_GetTimeOfDay(&tp, 0);
1657
1658 #ifndef AFS_QUIETFS_ENV
1659     if (console != NULL) {
1660         fprintf(console, "File server has started at %s\r",
1661                 afs_ctime(&tp.tv_sec, tbuffer, sizeof(tbuffer)));
1662     }
1663 #endif
1664
1665     /*
1666      * Figure out the FileServer's name and primary address.
1667      */
1668     ViceLog(0, ("Getting FileServer name...\n"));
1669     code = gethostname(FS_HostName, 64);
1670     if (code) {
1671         ViceLog(0, ("gethostname() failed\n"));
1672     }
1673     ViceLog(0, ("FileServer host name is '%s'\n", FS_HostName));
1674
1675     ViceLog(0, ("Getting FileServer address...\n"));
1676     he = gethostbyname(FS_HostName);
1677     if (!he) {
1678         ViceLog(0, ("Can't find address for FileServer '%s'\n", FS_HostName));
1679     }
1680     else {
1681         char hoststr[16];
1682         memcpy(&FS_HostAddr_NBO, he->h_addr, 4);
1683         afs_inet_ntoa_r(FS_HostAddr_NBO, hoststr);
1684         FS_HostAddr_HBO = ntohl(FS_HostAddr_NBO);
1685         ViceLog(0,("FileServer %s has address %s (0x%x or 0x%x in host byte order)\n",
1686                    FS_HostName, hoststr, FS_HostAddr_NBO, FS_HostAddr_HBO));
1687     }
1688
1689     /* Install handler to catch the shutdown signal;
1690      * bosserver assumes SIGQUIT shutdown
1691      */
1692 #if defined(AFS_PTHREAD_ENV) && !defined(AFS_NT40_ENV)
1693     softsig_signal(SIGQUIT, ShutDown_Signal);
1694 #else
1695     signal(SIGQUIT, ShutDown_Signal);
1696 #endif
1697
1698     ViceLog(0,("File Server started %s",
1699                afs_ctime(&tp.tv_sec, tbuffer, sizeof(tbuffer))));
1700 #if FS_STATS_DETAILED
1701     afs_FullPerfStats.det.epoch.tv_sec = StartTime = tp.tv_sec;
1702 #endif
1703 #ifdef AFS_PTHREAD_ENV
1704     while(1) {
1705         sleep(1000); /* long time */
1706     }
1707 #else /* AFS_PTHREAD_ENV */
1708     assert(LWP_WaitProcess(&parentPid) == LWP_SUCCESS);
1709 #endif /* AFS_PTHREAD_ENV */
1710 }
1711