utils/mountd/mountd.c

   1 /*
   2  * utils/mountd/mountd.c
   3  *
   4  * Authenticate mount requests and retrieve file handle.
   5  *
   6  * Copyright (C) 1995, 1996 Olaf Kirch <okir@monad.swb.de>
   7  */
   8
   9 #ifdef HAVE_CONFIG_H
  10 #include <config.h>
  11 #endif
  12
  13 #include <signal.h>
  14 #include <sys/stat.h>
  15 #include <netinet/in.h>
  16 #include <arpa/inet.h>
  17 #include <unistd.h>
  18 #include <stdlib.h>
  19 #include <string.h>
  20 #include <getopt.h>
  21 #include <errno.h>
  22 #include <fcntl.h>
  23 #include <sys/resource.h>
  24 #include <sys/wait.h>
  25 #include "xmalloc.h"
  26 #include "misc.h"
  27 #include "mountd.h"
  28 #include "rpcmisc.h"
  29 #include "pseudoflavors.h"
  30
  31 extern void my_svc_run(void);
  32
  33 static void             usage(const char *, int exitcode);
  34 static exports          get_exportlist(void);
  35 static struct nfs_fh_len *get_rootfh(struct svc_req *, dirpath *, nfs_export **, mountstat3 *, int v3);
  36
  37 int reverse_resolve = 0;
  38 int new_cache = 0;
  39 int manage_gids;
  40 int use_ipaddr = -1;
  41
  42 /* PRC: a high-availability callout program can be specified with -H
  43  * When this is done, the program will receive callouts whenever clients
  44  * send mount or unmount requests -- the callout is not needed for 2.6 kernel */
  45 char *ha_callout_prog = NULL;
  46
  47 /* Number of mountd threads to start.   Default is 1 and
  48  * that's probably enough unless you need hundreds of
  49  * clients to be able to mount at once.  */
  50 static int num_threads = 1;
  51 /* Arbitrary limit on number of threads */
  52 #define MAX_THREADS 64
  53
  54 static struct option longopts[] =
  55 {
  56         { "foreground", 0, 0, 'F' },
  57         { "descriptors", 1, 0, 'o' },
  58         { "debug", 1, 0, 'd' },
  59         { "help", 0, 0, 'h' },
  60         { "exports-file", 1, 0, 'f' },
  61         { "nfs-version", 1, 0, 'V' },
  62         { "no-nfs-version", 1, 0, 'N' },
  63         { "version", 0, 0, 'v' },
  64         { "port", 1, 0, 'p' },
  65         { "no-tcp", 0, 0, 'n' },
  66         { "ha-callout", 1, 0, 'H' },
  67         { "state-directory-path", 1, 0, 's' },
  68         { "num-threads", 1, 0, 't' },
  69         { "reverse-lookup", 0, 0, 'r' },
  70         { "manage-gids", 0, 0, 'g' },
  71         { NULL, 0, 0, 0 }
  72 };
  73
  74 #define NFSVERSBIT(vers)        (0x1 << (vers - 1))
  75 #define NFSVERSBIT_ALL          (NFSVERSBIT(2) | NFSVERSBIT(3) | NFSVERSBIT(4))
  76
  77 static int nfs_version = NFSVERSBIT_ALL;
  78
  79 static int version2(void)
  80 {
  81         return nfs_version & NFSVERSBIT(2);
  82 }
  83
  84 static int version3(void)
  85 {
  86         return nfs_version & NFSVERSBIT(3);
  87 }
  88
  89 static int version23(void)
  90 {
  91         return nfs_version & (NFSVERSBIT(2) | NFSVERSBIT(3));
  92 }
  93
  94 static int version_any(void)
  95 {
  96         return nfs_version & NFSVERSBIT_ALL;
  97 }
  98
  99 static void
 100 unregister_services (void)
 101 {
 102         nfs_svc_unregister(MOUNTPROG, MOUNTVERS);
 103         nfs_svc_unregister(MOUNTPROG, MOUNTVERS_POSIX);
 104         nfs_svc_unregister(MOUNTPROG, MOUNTVERS_NFSV3);
 105 }
 106
 107 static void
 108 cleanup_lockfiles (void)
 109 {
 110         unlink(_PATH_XTABLCK);
 111         unlink(_PATH_ETABLCK);
 112         unlink(_PATH_RMTABLCK);
 113 }
 114
 115 /* Wait for all worker child processes to exit and reap them */
 116 static void
 117 wait_for_workers (void)
 118 {
 119         int status;
 120         pid_t pid;
 121
 122         for (;;) {
 123
 124                 pid = waitpid(0, &status, 0);
 125
 126                 if (pid < 0) {
 127                         if (errno == ECHILD)
 128                                 return; /* no more children */
 129                         xlog(L_FATAL, "mountd: can't wait: %s\n",
 130                                         strerror(errno));
 131                 }
 132
 133                 /* Note: because we SIG_IGN'd SIGCHLD earlier, this
 134                  * does not happen on 2.6 kernels, and waitpid() blocks
 135                  * until all the children are dead then returns with
 136                  * -ECHILD.  But, we don't need to do anything on the
 137                  * death of individual workers, so we don't care. */
 138                 xlog(L_NOTICE, "mountd: reaped child %d, status %d\n",
 139                                 (int)pid, status);
 140         }
 141 }
 142
 143 /* Fork num_threads worker children and wait for them */
 144 static void
 145 fork_workers(void)
 146 {
 147         int i;
 148         pid_t pid;
 149
 150         xlog(L_NOTICE, "mountd: starting %d threads\n", num_threads);
 151
 152         for (i = 0 ; i < num_threads ; i++) {
 153                 pid = fork();
 154                 if (pid < 0) {
 155                         xlog(L_FATAL, "mountd: cannot fork: %s\n",
 156                                         strerror(errno));
 157                 }
 158                 if (pid == 0) {
 159                         /* worker child */
 160
 161                         /* Re-enable the default action on SIGTERM et al
 162                          * so that workers die naturally when sent them.
 163                          * Only the parent unregisters with pmap and
 164                          * hence needs to do special SIGTERM handling. */
 165                         struct sigaction sa;
 166                         sa.sa_handler = SIG_DFL;
 167                         sa.sa_flags = 0;
 168                         sigemptyset(&sa.sa_mask);
 169                         sigaction(SIGHUP, &sa, NULL);
 170                         sigaction(SIGINT, &sa, NULL);
 171                         sigaction(SIGTERM, &sa, NULL);
 172
 173                         /* fall into my_svc_run in caller */
 174                         return;
 175                 }
 176         }
 177
 178         /* in parent */
 179         wait_for_workers();
 180         unregister_services();
 181         cleanup_lockfiles();
 182         xlog(L_NOTICE, "mountd: no more workers, exiting\n");
 183         exit(0);
 184 }
 185
 186 /*
 187  * Signal handler.
 188  */
 189 static void
 190 killer (int sig)
 191 {
 192         unregister_services();
 193         if (num_threads > 1) {
 194                 /* play Kronos and eat our children */
 195                 kill(0, SIGTERM);
 196                 wait_for_workers();
 197         }
 198         cleanup_lockfiles();
 199         xlog (L_NOTICE, "Caught signal %d, un-registering and exiting.", sig);
 200         exit(0);
 201 }
 202
 203 static void
 204 sig_hup (int sig)
 205 {
 206         /* don't exit on SIGHUP */
 207         xlog (L_NOTICE, "Received SIGHUP... Ignoring.\n", sig);
 208         return;
 209 }
 210
 211 bool_t
 212 mount_null_1_svc(struct svc_req *rqstp, void *UNUSED(argp),
 213         void *UNUSED(resp))
 214 {
 215         struct sockaddr *sap = nfs_getrpccaller(rqstp->rq_xprt);
 216         char buf[INET6_ADDRSTRLEN];
 217
 218         xlog(D_CALL, "Received NULL request from %s",
 219                 host_ntop(sap, buf, sizeof(buf)));
 220
 221         return 1;
 222 }
 223
 224 bool_t
 225 mount_mnt_1_svc(struct svc_req *rqstp, dirpath *path, fhstatus *res)
 226 {
 227         struct sockaddr *sap = nfs_getrpccaller(rqstp->rq_xprt);
 228         char buf[INET6_ADDRSTRLEN];
 229         struct nfs_fh_len *fh;
 230
 231         xlog(D_CALL, "Received MNT1(%s) request from %s", *path,
 232                 host_ntop(sap, buf, sizeof(buf)));
 233
 234         fh = get_rootfh(rqstp, path, NULL, &res->fhs_status, 0);
 235         if (fh)
 236                 memcpy(&res->fhstatus_u.fhs_fhandle, fh->fh_handle, 32);
 237         return 1;
 238 }
 239
 240 bool_t
 241 mount_dump_1_svc(struct svc_req *rqstp, void *UNUSED(argp), mountlist *res)
 242 {
 243         struct sockaddr *sap = nfs_getrpccaller(rqstp->rq_xprt);
 244         char buf[INET6_ADDRSTRLEN];
 245
 246         xlog(D_CALL, "Received DUMP request from %s",
 247                 host_ntop(sap, buf, sizeof(buf)));
 248
 249         *res = mountlist_list();
 250
 251         return 1;
 252 }
 253
 254 bool_t
 255 mount_umnt_1_svc(struct svc_req *rqstp, dirpath *argp, void *UNUSED(resp))
 256 {
 257         struct sockaddr *sap = nfs_getrpccaller(rqstp->rq_xprt);
 258         nfs_export      *exp;
 259         char            *p = *argp;
 260         char            rpath[MAXPATHLEN+1];
 261         char            buf[INET6_ADDRSTRLEN];
 262
 263         if (*p == '\0')
 264                 p = "/";
 265
 266         if (realpath(p, rpath) != NULL) {
 267                 rpath[sizeof (rpath) - 1] = '\0';
 268                 p = rpath;
 269         }
 270
 271         xlog(D_CALL, "Received UMNT(%s) request from %s", p,
 272                 host_ntop(sap, buf, sizeof(buf)));
 273
 274         exp = auth_authenticate("unmount", sap, p);
 275         if (exp == NULL)
 276                 return 1;
 277
 278         mountlist_del(host_ntop(sap, buf, sizeof(buf)), p);
 279         return 1;
 280 }
 281
 282 bool_t
 283 mount_umntall_1_svc(struct svc_req *rqstp, void *UNUSED(argp),
 284         void *UNUSED(resp))
 285 {
 286         struct sockaddr *sap = nfs_getrpccaller(rqstp->rq_xprt);
 287         char            buf[INET6_ADDRSTRLEN];
 288
 289         xlog(D_CALL, "Received UMNTALL request from %s",
 290                 host_ntop(sap, buf, sizeof(buf)));
 291
 292         /* Reload /etc/xtab if necessary */
 293         auth_reload();
 294
 295         mountlist_del_all(nfs_getrpccaller(rqstp->rq_xprt));
 296         return 1;
 297 }
 298
 299 bool_t
 300 mount_export_1_svc(struct svc_req *rqstp, void *UNUSED(argp), exports *resp)
 301 {
 302         struct sockaddr *sap = nfs_getrpccaller(rqstp->rq_xprt);
 303         char buf[INET6_ADDRSTRLEN];
 304
 305         xlog(D_CALL, "Received EXPORT request from %s.",
 306                 host_ntop(sap, buf, sizeof(buf)));
 307
 308         *resp = get_exportlist();
 309
 310         return 1;
 311 }
 312
 313 bool_t
 314 mount_exportall_1_svc(struct svc_req *rqstp, void *UNUSED(argp), exports *resp)
 315 {
 316         struct sockaddr *sap = nfs_getrpccaller(rqstp->rq_xprt);
 317         char buf[INET6_ADDRSTRLEN];
 318
 319         xlog(D_CALL, "Received EXPORTALL request from %s.",
 320                 host_ntop(sap, buf, sizeof(buf)));
 321
 322         *resp = get_exportlist();
 323
 324         return 1;
 325 }
 326
 327 /*
 328  * MNTv2 pathconf procedure
 329  *
 330  * The protocol doesn't include a status field, so Sun apparently considers
 331  * it good practice to let anyone snoop on your system, even if it's
 332  * pretty harmless data such as pathconf. We don't.
 333  *
 334  * Besides, many of the pathconf values don't make much sense on NFS volumes.
 335  * FIFOs and tty device files represent devices on the *client*, so there's
 336  * no point in getting the server's buffer sizes etc.
 337  */
 338 bool_t
 339 mount_pathconf_2_svc(struct svc_req *rqstp, dirpath *path, ppathcnf *res)
 340 {
 341         struct sockaddr *sap = nfs_getrpccaller(rqstp->rq_xprt);
 342         struct stat     stb;
 343         nfs_export      *exp;
 344         char            rpath[MAXPATHLEN+1];
 345         char            *p = *path;
 346         char buf[INET6_ADDRSTRLEN];
 347
 348         memset(res, 0, sizeof(*res));
 349
 350         if (*p == '\0')
 351                 p = "/";
 352
 353         /* Reload /etc/xtab if necessary */
 354         auth_reload();
 355
 356         /* Resolve symlinks */
 357         if (realpath(p, rpath) != NULL) {
 358                 rpath[sizeof (rpath) - 1] = '\0';
 359                 p = rpath;
 360         }
 361
 362         xlog(D_CALL, "Received PATHCONF(%s) request from %s", p,
 363                 host_ntop(sap, buf, sizeof(buf)));
 364
 365         /* Now authenticate the intruder... */
 366         exp = auth_authenticate("pathconf", sap, p);
 367         if (exp == NULL)
 368                 return 1;
 369         else if (stat(p, &stb) < 0) {
 370                 xlog(L_WARNING, "can't stat exported dir %s: %s",
 371                                 p, strerror(errno));
 372                 return 1;
 373         }
 374
 375         res->pc_link_max  = pathconf(p, _PC_LINK_MAX);
 376         res->pc_max_canon = pathconf(p, _PC_MAX_CANON);
 377         res->pc_max_input = pathconf(p, _PC_MAX_INPUT);
 378         res->pc_name_max  = pathconf(p, _PC_NAME_MAX);
 379         res->pc_path_max  = pathconf(p, _PC_PATH_MAX);
 380         res->pc_pipe_buf  = pathconf(p, _PC_PIPE_BUF);
 381         res->pc_vdisable  = pathconf(p, _PC_VDISABLE);
 382
 383         /* Can't figure out what to do with pc_mask */
 384         res->pc_mask[0]   = 0;
 385         res->pc_mask[1]   = 0;
 386
 387         return 1;
 388 }
 389
 390 /*
 391  * We should advertise the preferred flavours first. (See RFC 2623
 392  * section 2.7.)  We leave that to the administrator, by advertising
 393  * flavours in the order they were listed in /etc/exports.  AUTH_NULL is
 394  * dropped from the list to avoid backward compatibility issue with
 395  * older Linux clients, who inspect the list in reversed order.
 396  *
 397  * XXX: It might be more helpful to rearrange these so that flavors
 398  * giving more access (as determined from readonly and id-squashing
 399  * options) come first.  (If we decide to do that we should probably do
 400  * that when reading the exports rather than here.)
 401  */
 402 static void set_authflavors(struct mountres3_ok *ok, nfs_export *exp)
 403 {
 404         struct sec_entry *s;
 405         static int flavors[SECFLAVOR_COUNT];
 406         int i = 0;
 407
 408         for (s = exp->m_export.e_secinfo; s->flav; s++) {
 409                 if (s->flav->fnum == AUTH_NULL)
 410                         continue;
 411                 flavors[i] = s->flav->fnum;
 412                 i++;
 413         }
 414         if (i == 0) {
 415                 /* default when there is no sec= option: */
 416                 i = 1;
 417                 flavors[0] = AUTH_UNIX;
 418         }
 419         ok->auth_flavors.auth_flavors_val = flavors;
 420         ok->auth_flavors.auth_flavors_len = i;
 421 }
 422
 423 /*
 424  * NFSv3 MOUNT procedure
 425  */
 426 bool_t
 427 mount_mnt_3_svc(struct svc_req *rqstp, dirpath *path, mountres3 *res)
 428 {
 429         struct sockaddr *sap = nfs_getrpccaller(rqstp->rq_xprt);
 430         struct mountres3_ok *ok = &res->mountres3_u.mountinfo;
 431         char buf[INET6_ADDRSTRLEN];
 432         nfs_export *exp;
 433         struct nfs_fh_len *fh;
 434
 435         xlog(D_CALL, "Received MNT3(%s) request from %s", *path,
 436                 host_ntop(sap, buf, sizeof(buf)));
 437
 438         fh = get_rootfh(rqstp, path, &exp, &res->fhs_status, 1);
 439         if (!fh)
 440                 return 1;
 441
 442         ok->fhandle.fhandle3_len = fh->fh_size;
 443         ok->fhandle.fhandle3_val = (char *)fh->fh_handle;
 444         set_authflavors(ok, exp);
 445         return 1;
 446 }
 447
 448 static struct nfs_fh_len *
 449 get_rootfh(struct svc_req *rqstp, dirpath *path, nfs_export **expret,
 450                 mountstat3 *error, int v3)
 451 {
 452         struct sockaddr *sap = nfs_getrpccaller(rqstp->rq_xprt);
 453         struct stat     stb, estb;
 454         nfs_export      *exp;
 455         struct nfs_fh_len *fh;
 456         char            rpath[MAXPATHLEN+1];
 457         char            *p = *path;
 458         char            buf[INET6_ADDRSTRLEN];
 459
 460         if (*p == '\0')
 461                 p = "/";
 462
 463         /* Reload /var/lib/nfs/etab if necessary */
 464         auth_reload();
 465
 466         /* Resolve symlinks */
 467         if (realpath(p, rpath) != NULL) {
 468                 rpath[sizeof (rpath) - 1] = '\0';
 469                 p = rpath;
 470         }
 471
 472         /* Now authenticate the intruder... */
 473         exp = auth_authenticate("mount", sap, p);
 474         if (exp == NULL) {
 475                 *error = MNT3ERR_ACCES;
 476                 return NULL;
 477         }
 478         if (stat(p, &stb) < 0) {
 479                 xlog(L_WARNING, "can't stat exported dir %s: %s",
 480                                 p, strerror(errno));
 481                 if (errno == ENOENT)
 482                         *error = MNT3ERR_NOENT;
 483                 else
 484                         *error = MNT3ERR_ACCES;
 485                 return NULL;
 486         }
 487         if (!S_ISDIR(stb.st_mode) && !S_ISREG(stb.st_mode)) {
 488                 xlog(L_WARNING, "%s is not a directory or regular file", p);
 489                 *error = MNT3ERR_NOTDIR;
 490                 return NULL;
 491         }
 492         if (stat(exp->m_export.e_path, &estb) < 0) {
 493                 xlog(L_WARNING, "can't stat export point %s: %s",
 494                      p, strerror(errno));
 495                 *error = MNT3ERR_NOENT;
 496                 return NULL;
 497         }
 498         if (estb.st_dev != stb.st_dev
 499                    && (!new_cache
 500                            || !(exp->m_export.e_flags & NFSEXP_CROSSMOUNT))) {
 501                 xlog(L_WARNING, "request to export directory %s below nearest filesystem %s",
 502                      p, exp->m_export.e_path);
 503                 *error = MNT3ERR_ACCES;
 504                 return NULL;
 505         }
 506         if (exp->m_export.e_mountpoint &&
 507                    !is_mountpoint(exp->m_export.e_mountpoint[0]?
 508                                   exp->m_export.e_mountpoint:
 509                                   exp->m_export.e_path)) {
 510                 xlog(L_WARNING, "request to export an unmounted filesystem: %s",
 511                      p);
 512                 *error = MNT3ERR_NOENT;
 513                 return NULL;
 514         }
 515
 516         if (new_cache) {
 517                 /* This will be a static private nfs_export with just one
 518                  * address.  We feed it to kernel then extract the filehandle,
 519                  *
 520                  */
 521
 522                 if (cache_export(exp, p)) {
 523                         *error = MNT3ERR_ACCES;
 524                         return NULL;
 525                 }
 526                 fh = cache_get_filehandle(exp, v3?64:32, p);
 527                 if (fh == NULL) {
 528                         *error = MNT3ERR_ACCES;
 529                         return NULL;
 530                 }
 531         } else {
 532                 int did_export = 0;
 533         retry:
 534                 if (exp->m_exported<1) {
 535                         export_export(exp);
 536                         did_export = 1;
 537                 }
 538                 if (!exp->m_xtabent)
 539                         xtab_append(exp);
 540
 541                 if (v3)
 542                         fh = getfh_size((struct sockaddr_in *)sap, p, 64);
 543                 if (!v3 || (fh == NULL && errno == EINVAL)) {
 544                         /* We first try the new nfs syscall. */
 545                         fh = getfh((struct sockaddr_in *)sap, p);
 546                         if (fh == NULL && errno == EINVAL)
 547                                 /* Let's try the old one. */
 548                                 fh = getfh_old((struct sockaddr_in *)sap,
 549                                                 stb.st_dev, stb.st_ino);
 550                 }
 551                 if (fh == NULL && !did_export) {
 552                         exp->m_exported = 0;
 553                         goto retry;
 554                 }
 555
 556                 if (fh == NULL) {
 557                         xlog(L_WARNING, "getfh failed: %s", strerror(errno));
 558                         *error = MNT3ERR_ACCES;
 559                         return NULL;
 560                 }
 561         }
 562         *error = MNT_OK;
 563         mountlist_add(host_ntop(sap, buf, sizeof(buf)), p);
 564         if (expret)
 565                 *expret = exp;
 566         return fh;
 567 }
 568
 569 static void remove_all_clients(exportnode *e)
 570 {
 571         struct groupnode *g, *ng;
 572
 573         for (g = e->ex_groups; g; g = ng) {
 574                 ng = g->gr_next;
 575                 xfree(g->gr_name);
 576                 xfree(g);
 577         }
 578         e->ex_groups = NULL;
 579 }
 580
 581 static void free_exportlist(exports *elist)
 582 {
 583         struct exportnode *e, *ne;
 584
 585         for (e = *elist; e != NULL; e = ne) {
 586                 ne = e->ex_next;
 587                 remove_all_clients(e);
 588                 xfree(e->ex_dir);
 589                 xfree(e);
 590         }
 591         *elist = NULL;
 592 }
 593
 594 static void prune_clients(nfs_export *exp, struct exportnode *e)
 595 {
 596         struct addrinfo *ai = NULL;
 597         struct groupnode *c, **cp;
 598
 599         cp = &e->ex_groups;
 600         while ((c = *cp) != NULL) {
 601                 if (client_gettype(c->gr_name) == MCL_FQDN
 602                     && (ai = host_addrinfo(c->gr_name))) {
 603                         if (client_check(exp->m_client, ai)) {
 604                                 *cp = c->gr_next;
 605                                 xfree(c->gr_name);
 606                                 xfree(c);
 607                                 freeaddrinfo(ai);
 608                                 continue;
 609                         }
 610                         freeaddrinfo(ai);
 611                 }
 612                 cp = &(c->gr_next);
 613         }
 614 }
 615
 616 static exportnode *lookup_or_create_elist_entry(exports *elist, nfs_export *exp)
 617 {
 618         exportnode *e;
 619
 620         for (e = *elist; e != NULL; e = e->ex_next) {
 621                 if (!strcmp(exp->m_export.e_path, e->ex_dir))
 622                         return e;
 623         }
 624         e = xmalloc(sizeof(*e));
 625         e->ex_next = *elist;
 626         e->ex_groups = NULL;
 627         e->ex_dir = xstrdup(exp->m_export.e_path);
 628         *elist = e;
 629         return e;
 630 }
 631
 632 static void insert_group(struct exportnode *e, char *newname)
 633 {
 634         struct groupnode *g;
 635
 636         for (g = e->ex_groups; g; g = g->gr_next)
 637                 if (!strcmp(g->gr_name, newname))
 638                         return;
 639
 640         g = xmalloc(sizeof(*g));
 641         g->gr_name = xstrdup(newname);
 642         g->gr_next = e->ex_groups;
 643         e->ex_groups = g;
 644 }
 645
 646 static exports
 647 get_exportlist(void)
 648 {
 649         static exports          elist = NULL;
 650         struct exportnode       *e;
 651         nfs_export              *exp;
 652         int                     i;
 653         static unsigned int     ecounter;
 654         unsigned int            acounter;
 655
 656         acounter = auth_reload();
 657         if (elist && acounter == ecounter)
 658                 return elist;
 659
 660         ecounter = acounter;
 661
 662         free_exportlist(&elist);
 663
 664         for (i = 0; i < MCL_MAXTYPES; i++) {
 665                 for (exp = exportlist[i].p_head; exp; exp = exp->m_next) {
 666                          /* Don't show pseudo exports */
 667                         if (exp->m_export.e_flags & NFSEXP_V4ROOT)
 668                                 continue;
 669                         e = lookup_or_create_elist_entry(&elist, exp);
 670
 671                         /* exports to "*" absorb any others */
 672                         if (i == MCL_ANONYMOUS && e->ex_groups) {
 673                                 remove_all_clients(e);
 674                                 continue;
 675                         }
 676                         /* non-FQDN's absorb FQDN's they contain: */
 677                         if (i != MCL_FQDN && e->ex_groups)
 678                                 prune_clients(exp, e);
 679
 680                         if (exp->m_export.e_hostname[0] != '\0')
 681                                 insert_group(e, exp->m_export.e_hostname);
 682                 }
 683         }
 684
 685         return elist;
 686 }
 687
 688 int
 689 main(int argc, char **argv)
 690 {
 691         char    *export_file = _PATH_EXPORTS;
 692         char    *state_dir = NFS_STATEDIR;
 693         char    *progname;
 694         unsigned int listeners = 0;
 695         int     foreground = 0;
 696         int     port = 0;
 697         int     descriptors = 0;
 698         int     c;
 699         int     vers;
 700         struct sigaction sa;
 701         struct rlimit rlim;
 702
 703         /* Set the basename */
 704         if ((progname = strrchr(argv[0], '/')) != NULL)
 705                 progname++;
 706         else
 707                 progname = argv[0];
 708
 709         /* Parse the command line options and arguments. */
 710         opterr = 0;
 711         while ((c = getopt_long(argc, argv, "o:nFd:f:p:P:hH:N:V:vrs:t:g", longopts, NULL)) != EOF)
 712                 switch (c) {
 713                 case 'g':
 714                         manage_gids = 1;
 715                         break;
 716                 case 'o':
 717                         descriptors = atoi(optarg);
 718                         if (descriptors <= 0) {
 719                                 fprintf(stderr, "%s: bad descriptors: %s\n",
 720                                         progname, optarg);
 721                                 usage(progname, 1);
 722                         }
 723                         break;
 724                 case 'F':
 725                         foreground = 1;
 726                         break;
 727                 case 'd':
 728                         xlog_sconfig(optarg, 1);
 729                         break;
 730                 case 'f':
 731                         export_file = optarg;
 732                         break;
 733                 case 'H': /* PRC: specify a high-availability callout program */
 734                         ha_callout_prog = optarg;
 735                         break;
 736                 case 'h':
 737                         usage(progname, 0);
 738                         break;
 739                 case 'P':       /* XXX for nfs-server compatibility */
 740                 case 'p':
 741                         port = atoi(optarg);
 742                         if (port <= 0 || port > 65535) {
 743                                 fprintf(stderr, "%s: bad port number: %s\n",
 744                                         progname, optarg);
 745                                 usage(progname, 1);
 746                         }
 747                         break;
 748                 case 'N':
 749                         vers = atoi(optarg);
 750                         if (vers < 2 || vers > 4) {
 751                                 fprintf(stderr, "%s: bad version number: %s\n",
 752                                         argv[0], optarg);
 753                                 usage(argv[0], 1);
 754                         }
 755                         nfs_version &= ~NFSVERSBIT(vers);
 756                         break;
 757                 case 'n':
 758                         _rpcfdtype = SOCK_DGRAM;
 759                         break;
 760                 case 'r':
 761                         reverse_resolve = 1;
 762                         break;
 763                 case 's':
 764                         if ((state_dir = xstrdup(optarg)) == NULL) {
 765                                 fprintf(stderr, "%s: xstrdup(%s) failed!\n",
 766                                         progname, optarg);
 767                                 exit(1);
 768                         }
 769                         break;
 770                 case 't':
 771                         num_threads = atoi (optarg);
 772                         break;
 773                 case 'V':
 774                         vers = atoi(optarg);
 775                         if (vers < 2 || vers > 4) {
 776                                 fprintf(stderr, "%s: bad version number: %s\n",
 777                                         argv[0], optarg);
 778                                 usage(argv[0], 1);
 779                         }
 780                         nfs_version |= NFSVERSBIT(vers);
 781                         break;
 782                 case 'v':
 783                         printf("%s version " VERSION "\n", progname);
 784                         exit(0);
 785                 case 0:
 786                         break;
 787                 case '?':
 788                 default:
 789                         usage(progname, 1);
 790                 }
 791
 792         /* No more arguments allowed. */
 793         if (optind != argc || !version_any())
 794                 usage(progname, 1);
 795
 796         if (chdir(state_dir)) {
 797                 fprintf(stderr, "%s: chdir(%s) failed: %s\n",
 798                         progname, state_dir, strerror(errno));
 799                 exit(1);
 800         }
 801
 802         if (getrlimit (RLIMIT_NOFILE, &rlim) != 0)
 803                 fprintf(stderr, "%s: getrlimit (RLIMIT_NOFILE) failed: %s\n",
 804                                 progname, strerror(errno));
 805         else {
 806                 /* glibc sunrpc code dies if getdtablesize > FD_SETSIZE */
 807                 if ((descriptors == 0 && rlim.rlim_cur > FD_SETSIZE) ||
 808                     descriptors > FD_SETSIZE)
 809                         descriptors = FD_SETSIZE;
 810                 if (descriptors) {
 811                         rlim.rlim_cur = descriptors;
 812                         if (setrlimit (RLIMIT_NOFILE, &rlim) != 0) {
 813                                 fprintf(stderr, "%s: setrlimit (RLIMIT_NOFILE) failed: %s\n",
 814                                         progname, strerror(errno));
 815                                 exit(1);
 816                         }
 817                 }
 818         }
 819         /* Initialize logging. */
 820         if (!foreground) xlog_stderr(0);
 821         xlog_open(progname);
 822
 823         sa.sa_handler = SIG_IGN;
 824         sa.sa_flags = 0;
 825         sigemptyset(&sa.sa_mask);
 826         sigaction(SIGHUP, &sa, NULL);
 827         sigaction(SIGINT, &sa, NULL);
 828         sigaction(SIGTERM, &sa, NULL);
 829         sigaction(SIGPIPE, &sa, NULL);
 830         /* WARNING: the following works on Linux and SysV, but not BSD! */
 831         sigaction(SIGCHLD, &sa, NULL);
 832
 833         /* Daemons should close all extra filehandles ... *before* RPC init. */
 834         if (!foreground)
 835                 closeall(3);
 836
 837         new_cache = check_new_cache();
 838         if (new_cache)
 839                 cache_open();
 840
 841         unregister_services();
 842         if (version2()) {
 843                 listeners += nfs_svc_create("mountd", MOUNTPROG,
 844                                         MOUNTVERS, mount_dispatch, port);
 845                 listeners += nfs_svc_create("mountd", MOUNTPROG,
 846                                         MOUNTVERS_POSIX, mount_dispatch, port);
 847         }
 848         if (version3())
 849                 listeners += nfs_svc_create("mountd", MOUNTPROG,
 850                                         MOUNTVERS_NFSV3, mount_dispatch, port);
 851         if (version23() && listeners == 0)
 852                 xlog(L_FATAL, "mountd: could not create listeners\n");
 853
 854         sa.sa_handler = killer;
 855         sigaction(SIGINT, &sa, NULL);
 856         sigaction(SIGTERM, &sa, NULL);
 857         sa.sa_handler = sig_hup;
 858         sigaction(SIGHUP, &sa, NULL);
 859
 860         auth_init(export_file);
 861
 862         if (!foreground) {
 863                 /* We first fork off a child. */
 864                 if ((c = fork()) > 0)
 865                         exit(0);
 866                 if (c < 0) {
 867                         xlog(L_FATAL, "mountd: cannot fork: %s\n",
 868                                                 strerror(errno));
 869                 }
 870                 /* Now we remove ourselves from the foreground.
 871                    Redirect stdin/stdout/stderr first. */
 872                 {
 873                         int fd = open("/dev/null", O_RDWR);
 874                         (void) dup2(fd, 0);
 875                         (void) dup2(fd, 1);
 876                         (void) dup2(fd, 2);
 877                         if (fd > 2) (void) close(fd);
 878                 }
 879                 setsid();
 880         }
 881
 882         /* silently bounds check num_threads */
 883         if (foreground)
 884                 num_threads = 1;
 885         else if (num_threads < 1)
 886                 num_threads = 1;
 887         else if (num_threads > MAX_THREADS)
 888                 num_threads = MAX_THREADS;
 889
 890         if (num_threads > 1)
 891                 fork_workers();
 892
 893         xlog(L_NOTICE, "Version " VERSION " starting");
 894         my_svc_run();
 895
 896         xlog(L_ERROR, "RPC service loop terminated unexpectedly. Exiting...\n");
 897         unregister_services();
 898         exit(1);
 899 }
 900
 901 static void
 902 usage(const char *prog, int n)
 903 {
 904         fprintf(stderr,
 905 "Usage: %s [-F|--foreground] [-h|--help] [-v|--version] [-d kind|--debug kind]\n"
 906 "       [-o num|--descriptors num] [-f exports-file|--exports-file=file]\n"
 907 "       [-p|--port port] [-V version|--nfs-version version]\n"
 908 "       [-N version|--no-nfs-version version] [-n|--no-tcp]\n"
 909 "       [-H ha-callout-prog] [-s|--state-directory-path path]\n"
 910 "       [-g|--manage-gids] [-t num|--num-threads=num]\n", prog);
 911         exit(n);
 912 }