src/ptserver/ptserver.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  *                      A general description of the supergroup changes
  12  *                      to ptserver:
  13  *
  14  *                      In AFS users can be members of groups. When you add
  15  *                      a user, u1, to a group, g1, you add the user id for u1
  16  *                      to an entries list in g1. This is a list of all the
  17  *                      members of g1.
  18  *                      You also add the id for g1 to an entries list in u1.
  19  *                      This is a list of all the groups this user is a
  20  *                      member of.
  21  *                      The list has room for 10 entries. If more are required,
  22  *                      a continuation record is created.
  23  *
  24  *                      With UMICH mods, u1 can be a group. When u1 is a group
  25  *                      a new field is required to list the groups this group
  26  *                      is a member of (since the entries field is used to
  27  *                      list it's members). This new field is supergroups and
  28  *                      has two entries. If more are required, a continuation
  29  *                      record is formed.
  30  *                      There are two additional fields required, nextsg is
  31  *                      an address of the next continuation record for this
  32  *                      group, and countsg is the count for the number of
  33  *                      groups this group is a member of.
  34  *
  35  *
  36  *
  37  *      09/18/95 jjm    Add mdw's changes to afs-3.3a Changes:
  38  *                      (1) Add the parameter -groupdepth or -depth to
  39  *                          define the maximum search depth for supergroups.
  40  *                          Define the variable depthsg to be the value of
  41  *                          the parameter. The default value is set to 5.
  42  *
  43  *                      (3) Make sure the sizes of the struct prentry and
  44  *                          struct prentryg are equal. If they aren't equal
  45  *                          the pt database will be corrupted.
  46  *                          The error is reported with an fprintf statement,
  47  *                          but this doesn't print when ptserver is started by
  48  *                          bos, so all you see is an error message in the
  49  *                          /usr/afs/logs/BosLog file. If you start the
  50  *                          ptserver without bos the fprintf will print
  51  *                          on stdout.
  52  *                          The program will terminate with a PT_EXIT(1).
  53  *
  54  *
  55  *                      Transarc does not currently use opcodes past 520, but
  56  *                      they *could* decide at any time to use more opcodes.
  57  *                      If they did, then one part of our local mods,
  58  *                      ListSupergroups, would break.  I've therefore
  59  *                      renumbered it to 530, and put logic in to enable the
  60  *                      old opcode to work (for now).
  61  *
  62  *      2/1/98 jjm      Add mdw's changes for bit mapping for supergroups
  63  *                      Overview:
  64  *                      Before fetching a supergroup, this version of ptserver
  65  *                      checks to see if it was marked "found" and "not a
  66  *                      member".  If and only if so, it doesn't fetch the group.
  67  *                      Since this should be the case with most groups, this
  68  *                      should save a significant amount of CPU in redundant
  69  *                      fetches of the same group.  After fetching the group,
  70  *                      it sets "found", and either sets or clears "not a
  71  *                      member", depending on if the group was a member of
  72  *                      other groups.  When it writes group entries to the
  73  *                      database, it clears the "found" flag.
  74  */
  75
  76 #if defined(SUPERGROUPS)
  77 /*
  78  *  A general description of the supergroup changes
  79  *  to ptserver:
  80  *
  81  *  In AFS users can be members of groups. When you add a user, u1,
  82  *  to a group, g1, you add the user id for u1 to an entries list
  83  *  in g1. This is a list of all the members of g1.  You also add
  84  *  the id for g1 to an entries list in u1.  This is a list of all
  85  *  the groups this user is a member of.  The list has room for 10
  86  *  entries. If more are required, a continuation record is created.
  87  *
  88  *  With UMICH mods, u1 can be a group. When u1 is a group a new
  89  *  field is required to list the groups this group is a member of
  90  *  (since the entries field is used to list it's members). This
  91  *  new field is supergroups and has two entries. If more are
  92  *  required, a continuation record is formed.
  93  *
  94  *  There are two additional fields required, nextsg is an address
  95  *  of the next continuation record for this group, and countsg is
  96  *  the count for the number of groups this group is a member of.
  97  *
  98  *  Bit mapping support for supergroups:
  99  *
 100  *  Before fetching a supergroup, this version of ptserver checks to
 101  *  see if it was marked "found" and "not a member".  If and only if
 102  *  so, it doesn't fetch the group.  Since this should be the case
 103  *  with most groups, this should save a significant amount of CPU in
 104  *  redundant fetches of the same group.  After fetching the group, it
 105  *  sets "found", and either sets or clears "not a member", depending
 106  *  on if the group was a member of other groups.  When it writes
 107  *  group entries to the database, it clears the "found" flag.
 108  */
 109 #endif
 110
 111 #include <afsconfig.h>
 112 #include <afs/param.h>
 113 #include <afs/stds.h>
 114
 115 #include <roken.h>
 116 #include <afs/opr.h>
 117
 118 #ifdef AFS_NT40_ENV
 119 #include <WINNT/afsevent.h>
 120 #endif
 121
 122 #include <rx/xdr.h>
 123 #include <rx/rx.h>
 124 #include <rx/rx_globals.h>
 125 #include <rx/rxstat.h>
 126 #include <lock.h>
 127 #include <ubik.h>
 128 #include <afs/cmd.h>
 129 #include <afs/cellconfig.h>
 130 #include <afs/auth.h>
 131 #include <afs/keys.h>
 132 #include <afs/afsutil.h>
 133 #include <afs/audit.h>
 134 #include <afs/com_err.h>
 135
 136 #include "ptserver.h"
 137 #include "ptprototypes.h"
 138 #include "error_macros.h"
 139
 140 /* make all of these into a structure if you want */
 141 struct prheader cheader;
 142 struct ubik_dbase *dbase;
 143 struct afsconf_dir *prdir;
 144
 145 #if defined(SUPERGROUPS)
 146 extern afs_int32 depthsg;
 147 #endif
 148
 149 char *pr_realmName;
 150
 151 int restricted = 0;
 152 int rxMaxMTU = -1;
 153 int rxBind = 0;
 154 int rxkadDisableDotCheck = 0;
 155
 156 #define ADDRSPERSITE 16         /* Same global is in rx/rx_user.c */
 157 afs_uint32 SHostAddrs[ADDRSPERSITE];
 158
 159 static struct afsconf_cell info;
 160
 161 extern int prp_group_default;
 162 extern int prp_user_default;
 163
 164 #include "AFS_component_version_number.c"
 165
 166 int
 167 prp_access_mask(char *s)
 168 {
 169     int r;
 170     if (*s >= '0' && *s <= '9') {
 171         return strtol(s, NULL, 0);
 172     }
 173     r = 0;
 174     while (*s) switch(*s++)
 175     {
 176     case 'S':   r |= PRP_STATUS_ANY; break;
 177     case 's':   r |= PRP_STATUS_MEM; break;
 178     case 'O':   r |= PRP_OWNED_ANY; break;
 179     case 'M':   r |= PRP_MEMBER_ANY; break;
 180     case 'm':   r |= PRP_MEMBER_MEM; break;
 181     case 'A':   r |= PRP_ADD_ANY; break;
 182     case 'a':   r |= PRP_ADD_MEM; break;
 183     case 'r':   r |= PRP_REMOVE_MEM; break;
 184     }
 185     return r;
 186 }
 187
 188 /* check whether caller is authorized to manage RX statistics */
 189 int
 190 pr_rxstat_userok(struct rx_call *call)
 191 {
 192     return afsconf_SuperUser(prdir, call, NULL);
 193 }
 194
 195 enum optionsList {
 196     OPT_database,
 197     OPT_access,
 198     OPT_groupdepth,
 199     OPT_restricted,
 200     OPT_auditlog,
 201     OPT_auditiface,
 202     OPT_config,
 203     OPT_debug,
 204     OPT_logfile,
 205     OPT_threads,
 206     OPT_syslog,
 207     OPT_peer,
 208     OPT_process,
 209     OPT_rxbind,
 210     OPT_rxmaxmtu,
 211     OPT_dotted
 212 };
 213
 214 int
 215 main(int argc, char **argv)
 216 {
 217     afs_int32 code;
 218     afs_uint32 myHost;
 219     struct hostent *th;
 220     char hostname[64];
 221     struct rx_service *tservice;
 222     struct rx_securityClass **securityClasses;
 223     afs_int32 numClasses;
 224     int lwps = 3;
 225     char clones[MAXHOSTSPERCELL];
 226     afs_uint32 host = htonl(INADDR_ANY);
 227     struct cmd_syndesc *opts;
 228     struct cmd_item *list;
 229
 230     char *pr_dbaseName;
 231     char *configDir;
 232     char *logFile;
 233     char *whoami = "ptserver";
 234
 235     char *auditFileName = NULL;
 236     char *interface = NULL;
 237
 238 #ifdef  AFS_AIX32_ENV
 239     /*
 240      * The following signal action for AIX is necessary so that in case of a
 241      * crash (i.e. core is generated) we can include the user's data section
 242      * in the core dump. Unfortunately, by default, only a partial core is
 243      * generated which, in many cases, isn't too useful.
 244      */
 245     struct sigaction nsa;
 246
 247     sigemptyset(&nsa.sa_mask);
 248     nsa.sa_handler = SIG_DFL;
 249     nsa.sa_flags = SA_FULLDUMP;
 250     sigaction(SIGABRT, &nsa, NULL);
 251     sigaction(SIGSEGV, &nsa, NULL);
 252 #endif
 253     osi_audit_init();
 254     osi_audit(PTS_StartEvent, 0, AUD_END);
 255
 256     /* Initialize dirpaths */
 257     if (!(initAFSDirPath() & AFSDIR_SERVER_PATHS_OK)) {
 258 #ifdef AFS_NT40_ENV
 259         ReportErrorEventAlt(AFSEVT_SVR_NO_INSTALL_DIR, 0, argv[0], 0);
 260 #endif
 261         fprintf(stderr, "%s: Unable to obtain AFS server directory.\n",
 262                 argv[0]);
 263         exit(2);
 264     }
 265
 266     pr_dbaseName = strdup(AFSDIR_SERVER_PRDB_FILEPATH);
 267     configDir = strdup(AFSDIR_SERVER_ETC_DIRPATH);
 268     logFile = strdup(AFSDIR_SERVER_PTLOG_FILEPATH);
 269
 270 #if defined(SUPERGROUPS)
 271     /* make sure the structures for database records are the same size */
 272     if ((sizeof(struct prentry) != ENTRYSIZE)
 273         || (sizeof(struct prentryg) != ENTRYSIZE)) {
 274         fprintf(stderr,
 275                 "The structures for the database records are different"
 276                 " sizes\n" "struct prentry = %" AFS_SIZET_FMT "\n"
 277                 "struct prentryg = %" AFS_SIZET_FMT "\n"
 278                 "ENTRYSIZE = %d\n", sizeof(struct prentry),
 279                 sizeof(struct prentryg), ENTRYSIZE);
 280         PT_EXIT(1);
 281     }
 282 #endif
 283
 284     cmd_DisableAbbreviations();
 285     cmd_DisablePositionalCommands();
 286     opts = cmd_CreateSyntax(NULL, NULL, NULL, NULL);
 287
 288 /* ptserver specific options */
 289     cmd_AddParmAtOffset(opts, OPT_database, "-database", CMD_SINGLE,
 290                         CMD_OPTIONAL, "database file");
 291     cmd_AddParmAlias(opts, OPT_database, "db");
 292
 293     cmd_AddParmAtOffset(opts, OPT_access, "-default_access", CMD_SINGLE,
 294                         CMD_OPTIONAL, "default access flags for new entries");
 295 #if defined(SUPERGROUPS)
 296     cmd_AddParmAtOffset(opts, OPT_groupdepth, "-groupdepth", CMD_SINGLE,
 297                         CMD_OPTIONAL, "max search depth for supergroups");
 298     cmd_AddParmAlias(opts, OPT_groupdepth, "depth");
 299 #endif
 300     cmd_AddParmAtOffset(opts, OPT_restricted, "-restricted", CMD_FLAG,
 301                         CMD_OPTIONAL, "enable restricted mode");
 302
 303     /* general server options */
 304     cmd_AddParmAtOffset(opts, OPT_auditlog, "-auditlog", CMD_SINGLE,
 305                         CMD_OPTIONAL, "location of audit log");
 306     cmd_AddParmAtOffset(opts, OPT_auditiface, "-audit-interface", CMD_SINGLE,
 307                         CMD_OPTIONAL, "interface to use for audit logging");
 308     cmd_AddParmAtOffset(opts, OPT_config, "-config", CMD_SINGLE,
 309                         CMD_OPTIONAL, "configuration location");
 310     cmd_AddParmAtOffset(opts, OPT_debug, "-d", CMD_SINGLE,
 311                         CMD_OPTIONAL, "debug level");
 312     cmd_AddParmAtOffset(opts, OPT_logfile, "-logfile", CMD_SINGLE,
 313                         CMD_OPTIONAL, "location of logfile");
 314     cmd_AddParmAtOffset(opts, OPT_threads, "-p", CMD_SINGLE,
 315                         CMD_OPTIONAL, "number of threads");
 316 #if !defined(AFS_NT40_ENV)
 317     cmd_AddParmAtOffset(opts, OPT_syslog, "-syslog", CMD_SINGLE_OR_FLAG,
 318                         CMD_OPTIONAL, "log to syslog");
 319 #endif
 320
 321     /* rx options */
 322     cmd_AddParmAtOffset(opts, OPT_peer, "-enable_peer_stats", CMD_FLAG,
 323                         CMD_OPTIONAL, "enable RX transport statistics");
 324     cmd_AddParmAtOffset(opts, OPT_process, "-enable_process_stats", CMD_FLAG,
 325                         CMD_OPTIONAL, "enable RX RPC statistics");
 326     cmd_AddParmAtOffset(opts, OPT_rxbind, "-rxbind", CMD_FLAG,
 327                         CMD_OPTIONAL, "bind only to the primary interface");
 328     cmd_AddParmAtOffset(opts, OPT_rxmaxmtu, "-rxmaxmtu", CMD_SINGLE,
 329                         CMD_OPTIONAL, "maximum MTU for RX");
 330
 331     /* rxkad options */
 332     cmd_AddParmAtOffset(opts, OPT_dotted, "-allow-dotted-principals",
 333                         CMD_FLAG, CMD_OPTIONAL,
 334                         "permit Kerberos 5 principals with dots");
 335
 336     code = cmd_Parse(argc, argv, &opts);
 337     if (code)
 338         PT_EXIT(1);
 339
 340     if (cmd_OptionAsList(opts, OPT_access, &list) == 0) {
 341         prp_user_default = prp_access_mask(list->data);
 342         if (list->next == NULL || list->next->data == NULL) {
 343             fprintf(stderr, "Missing second argument for -default_access\n");
 344             PT_EXIT(1);
 345         }
 346         prp_group_default = prp_access_mask(list->next->data);
 347     }
 348
 349 #if defined(SUPERGROUPS)
 350     cmd_OptionAsInt(opts, OPT_groupdepth, &depthsg);
 351 #endif
 352
 353     cmd_OptionAsFlag(opts, OPT_restricted, &restricted);
 354
 355     /* general server options */
 356     cmd_OptionAsString(opts, OPT_auditlog, &auditFileName);
 357
 358     if (cmd_OptionAsString(opts, OPT_auditiface, &interface) == 0) {
 359         if (osi_audit_interface(interface)) {
 360             printf("Invalid audit interface '%s'\n", interface);
 361             PT_EXIT(1);
 362         }
 363         free(interface);
 364     }
 365
 366     cmd_OptionAsString(opts, OPT_config, &configDir);
 367     cmd_OptionAsInt(opts, OPT_debug, &LogLevel);
 368     cmd_OptionAsString(opts, OPT_database, &pr_dbaseName);
 369     cmd_OptionAsString(opts, OPT_logfile, &logFile);
 370
 371     if (cmd_OptionAsInt(opts, OPT_threads, &lwps) == 0) {
 372         if (lwps > 16) {        /* maximum of 16 */
 373             printf("Warning: '-p %d' is too big; using %d instead\n",
 374                    lwps, 16);
 375             lwps = 16;
 376         } else if (lwps < 3) {  /* minimum of 3 */
 377             printf("Warning: '-p %d' is too small; using %d instead\n",
 378                    lwps, 3);
 379             lwps = 3;
 380         }
 381     }
 382
 383 #ifndef AFS_NT40_ENV
 384     if (cmd_OptionPresent(opts, OPT_syslog)) {
 385         serverLogSyslog = 1;
 386         cmd_OptionAsInt(opts, OPT_syslog, &serverLogSyslogFacility);
 387     }
 388 #endif
 389
 390     /* rx options */
 391     if (cmd_OptionPresent(opts, OPT_peer))
 392         rx_enablePeerRPCStats();
 393
 394     if (cmd_OptionPresent(opts, OPT_process))
 395         rx_enableProcessRPCStats();
 396
 397     cmd_OptionAsFlag(opts, OPT_rxbind, &rxBind);
 398
 399     cmd_OptionAsInt(opts, OPT_rxmaxmtu, &rxMaxMTU);
 400
 401     /* rxkad options */
 402     cmd_OptionAsFlag(opts, OPT_dotted, &rxkadDisableDotCheck);
 403
 404     cmd_FreeOptions(&opts);
 405
 406     if (auditFileName) {
 407         osi_audit_file(auditFileName);
 408         osi_audit(PTS_StartEvent, 0, AUD_END);
 409     }
 410
 411 #ifndef AFS_NT40_ENV
 412     serverLogSyslogTag = "ptserver";
 413 #endif
 414     OpenLog(logFile);   /* set up logging */
 415     SetupLogSignals();
 416
 417     prdir = afsconf_Open(configDir);
 418     if (!prdir) {
 419         fprintf(stderr, "ptserver: can't open configuration directory.\n");
 420         PT_EXIT(1);
 421     }
 422     if (afsconf_GetNoAuthFlag(prdir))
 423         printf("ptserver: running unauthenticated\n");
 424
 425 #ifdef AFS_NT40_ENV
 426     /* initialize winsock */
 427     if (afs_winsockInit() < 0) {
 428         ReportErrorEventAlt(AFSEVT_SVR_WINSOCK_INIT_FAILED, 0, argv[0], 0);
 429
 430         fprintf(stderr, "ptserver: couldn't initialize winsock. \n");
 431         PT_EXIT(1);
 432     }
 433 #endif
 434     /* get this host */
 435     gethostname(hostname, sizeof(hostname));
 436     th = gethostbyname(hostname);
 437     if (!th) {
 438         fprintf(stderr, "ptserver: couldn't get address of this host.\n");
 439         PT_EXIT(1);
 440     }
 441     memcpy(&myHost, th->h_addr, sizeof(afs_uint32));
 442
 443     /* get list of servers */
 444     code =
 445         afsconf_GetExtendedCellInfo(prdir, NULL, "afsprot", &info, clones);
 446     if (code) {
 447         afs_com_err(whoami, code, "Couldn't get server list");
 448         PT_EXIT(2);
 449     }
 450     pr_realmName = info.name;
 451
 452     /* initialize ubik */
 453     ubik_SetClientSecurityProcs(afsconf_ClientAuth, afsconf_UpToDate, prdir);
 454     ubik_SetServerSecurityProcs(afsconf_BuildServerSecurityObjects,
 455                                 afsconf_CheckAuth, prdir);
 456
 457     /* The max needed is when deleting an entry.  A full CoEntry deletion
 458      * required removal from 39 entries.  Each of which may refers to the entry
 459      * being deleted in one of its CoEntries.  If a CoEntry is freed its
 460      * predecessor CoEntry will be modified as well.  Any freed blocks also
 461      * modifies the database header.  Counting the entry being deleted and its
 462      * CoEntry this adds up to as much as 1+1+39*3 = 119.  If all these entries
 463      * and the header are in separate Ubik buffers then 120 buffers may be
 464      * required. */
 465     ubik_nBuffers = 120 + /*fudge */ 40;
 466
 467     if (rxBind) {
 468         afs_int32 ccode;
 469         if (AFSDIR_SERVER_NETRESTRICT_FILEPATH ||
 470             AFSDIR_SERVER_NETINFO_FILEPATH) {
 471             char reason[1024];
 472             ccode = parseNetFiles(SHostAddrs, NULL, NULL,
 473                                            ADDRSPERSITE, reason,
 474                                            AFSDIR_SERVER_NETINFO_FILEPATH,
 475                                            AFSDIR_SERVER_NETRESTRICT_FILEPATH);
 476         } else
 477         {
 478             ccode = rx_getAllAddr(SHostAddrs, ADDRSPERSITE);
 479         }
 480         if (ccode == 1) {
 481             host = SHostAddrs[0];
 482             /* the following call is idempotent so if/when it gets called
 483              * again by the ubik init stuff, it doesn't really matter
 484              * -- klm
 485              */
 486             rx_InitHost(host, htons(AFSCONF_PROTPORT));
 487         }
 488     }
 489
 490     code =
 491         ubik_ServerInitByInfo(myHost, htons(AFSCONF_PROTPORT), &info, clones,
 492                               pr_dbaseName, &dbase);
 493     if (code) {
 494         afs_com_err(whoami, code, "Ubik init failed");
 495         PT_EXIT(2);
 496     }
 497 #if defined(SUPERGROUPS)
 498     pt_hook_write();
 499 #endif
 500
 501     afsconf_BuildServerSecurityObjects(prdir, &securityClasses, &numClasses);
 502
 503     /* Disable jumbograms */
 504     rx_SetNoJumbo();
 505
 506     if (rxMaxMTU != -1) {
 507         if (rx_SetMaxMTU(rxMaxMTU) != 0) {
 508             printf("rxMaxMTU %d is invalid\n", rxMaxMTU);
 509             PT_EXIT(1);
 510         }
 511     }
 512
 513     tservice =
 514         rx_NewServiceHost(host, 0, PRSRV, "Protection Server", securityClasses,
 515                           numClasses, PR_ExecuteRequest);
 516     if (tservice == (struct rx_service *)0) {
 517         fprintf(stderr, "ptserver: Could not create new rx service.\n");
 518         PT_EXIT(3);
 519     }
 520     rx_SetMinProcs(tservice, 2);
 521     rx_SetMaxProcs(tservice, lwps);
 522     if (rxkadDisableDotCheck) {
 523         rx_SetSecurityConfiguration(tservice, RXS_CONFIG_FLAGS,
 524                                     (void *)RXS_CONFIG_FLAGS_DISABLE_DOTCHECK);
 525     }
 526
 527     tservice =
 528         rx_NewServiceHost(host, 0, RX_STATS_SERVICE_ID, "rpcstats",
 529                           securityClasses, numClasses, RXSTATS_ExecuteRequest);
 530     if (tservice == (struct rx_service *)0) {
 531         fprintf(stderr, "ptserver: Could not create new rx service.\n");
 532         PT_EXIT(3);
 533     }
 534     rx_SetMinProcs(tservice, 2);
 535     rx_SetMaxProcs(tservice, 4);
 536
 537     /* allow super users to manage RX statistics */
 538     rx_SetRxStatUserOk(pr_rxstat_userok);
 539
 540     LogCommandLine(argc, argv, "ptserver",
 541 #if defined(SUPERGROUPS)
 542                    "1.1",
 543 #else
 544                    "1.0",
 545 #endif
 546                    "Starting AFS", FSLog);
 547
 548     rx_StartServer(1);
 549     osi_audit(PTS_FinishEvent, -1, AUD_END);
 550     exit(0);
 551 }