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