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 #include "config.h"
  10
  11 #include <signal.h>
  12 #include <sys/stat.h>
  13 #include <netinet/in.h>
  14 #include <arpa/inet.h>
  15 #include <unistd.h>
  16 #include <stdlib.h>
  17 #include <getopt.h>
  18 #include <errno.h>
  19 #include <fcntl.h>
  20 #include "xmalloc.h"
  21 #include "misc.h"
  22 #include "mountd.h"
  23 #include "rpcmisc.h"
  24
  25 static void             usage(const char *, int exitcode);
  26 static exports          get_exportlist(void);
  27 static struct nfs_fh_len *get_rootfh(struct svc_req *, dirpath *, int *, int v3);
  28
  29 static struct option longopts[] =
  30 {
  31         { "foreground", 0, 0, 'F' },
  32         { "debug", 1, 0, 'd' },
  33         { "help", 0, 0, 'h' },
  34         { "exports-file", 1, 0, 'f' },
  35         { "nfs-version", 1, 0, 'V' },
  36         { "no-nfs-version", 1, 0, 'N' },
  37         { "version", 0, 0, 'v' },
  38         { "port", 1, 0, 'p' },
  39         { "no-tcp", 0, 0, 'n' },
  40         { NULL, 0, 0, 0 }
  41 };
  42
  43 static int nfs_version = -1;
  44
  45 /*
  46  * Signal handler.
  47  */
  48 static void
  49 killer (int sig)
  50 {
  51   if (nfs_version & 0x1)
  52     pmap_unset (MOUNTPROG, MOUNTVERS);
  53   if (nfs_version & (0x1 << 1))
  54     pmap_unset (MOUNTPROG, MOUNTVERS_POSIX);
  55   if (nfs_version & (0x1 << 2))
  56     pmap_unset (MOUNTPROG, MOUNTVERS_NFSV3);
  57   xlog (L_FATAL, "Caught signal %d, un-registering and exiting.", sig);
  58 }
  59
  60 bool_t
  61 mount_null_1_svc(struct svc_req *rqstp, void *argp, void *resp)
  62 {
  63         return 1;
  64 }
  65
  66 bool_t
  67 mount_mnt_1_svc(struct svc_req *rqstp, dirpath *path, fhstatus *res)
  68 {
  69         struct nfs_fh_len *fh;
  70
  71         xlog(D_CALL, "MNT1(%s) called", *path);
  72         if ((fh = get_rootfh(rqstp, path, &res->fhs_status, 0)) != NULL)
  73                 memcpy(&res->fhstatus_u.fhs_fhandle, fh->fh_handle, 32);
  74         return 1;
  75 }
  76
  77 bool_t
  78 mount_dump_1_svc(struct svc_req *rqstp, void *argp, mountlist *res)
  79 {
  80         struct sockaddr_in *addr =
  81                 (struct sockaddr_in *) svc_getcaller(rqstp->rq_xprt);
  82         xlog(L_NOTICE, "dump request from %s",
  83                 inet_ntoa(addr->sin_addr));
  84
  85         *res = mountlist_list();
  86         return 1;
  87 }
  88
  89 bool_t
  90 mount_umnt_1_svc(struct svc_req *rqstp, dirpath *argp, void *resp)
  91 {
  92         struct sockaddr_in *sin
  93                 = (struct sockaddr_in *) svc_getcaller(rqstp->rq_xprt);
  94         nfs_export      *exp;
  95         char            *p = *argp;
  96         char            rpath[MAXPATHLEN+1];
  97
  98         if (*p == '\0')
  99                 p = "/";
 100
 101         if (realpath(p, rpath) != NULL) {
 102                 rpath[sizeof (rpath) - 1] = '\0';
 103                 p = rpath;
 104         }
 105
 106         if (!(exp = auth_authenticate("unmount", sin, p))) {
 107                 return 1;
 108         }
 109         mountlist_del(exp, p);
 110         export_reset (exp);
 111         return 1;
 112 }
 113
 114 bool_t
 115 mount_umntall_1_svc(struct svc_req *rqstp, void *argp, void *resp)
 116 {
 117         /* Reload /etc/xtab if necessary */
 118         auth_reload();
 119
 120         mountlist_del_all((struct sockaddr_in *) svc_getcaller(rqstp->rq_xprt));
 121         return 1;
 122 }
 123
 124 bool_t
 125 mount_export_1_svc(struct svc_req *rqstp, void *argp, exports *resp)
 126 {
 127         struct sockaddr_in *addr =
 128                 (struct sockaddr_in *) svc_getcaller(rqstp->rq_xprt);
 129         xlog(L_NOTICE, "export request from %s",
 130                 inet_ntoa(addr->sin_addr));
 131         *resp = get_exportlist();
 132         return 1;
 133 }
 134
 135 bool_t
 136 mount_exportall_1_svc(struct svc_req *rqstp, void *argp, exports *resp)
 137 {
 138         struct sockaddr_in *addr =
 139                 (struct sockaddr_in *) svc_getcaller(rqstp->rq_xprt);
 140         xlog(L_NOTICE, "exportall request from %s",
 141                 inet_ntoa(addr->sin_addr));
 142         *resp = get_exportlist();
 143         return 1;
 144 }
 145
 146 /*
 147  * MNTv2 pathconf procedure
 148  *
 149  * The protocol doesn't include a status field, so Sun apparently considers
 150  * it good practice to let anyone snoop on your system, even if it's
 151  * pretty harmless data such as pathconf. We don't.
 152  *
 153  * Besides, many of the pathconf values don't make much sense on NFS volumes.
 154  * FIFOs and tty device files represent devices on the *client*, so there's
 155  * no point in getting the server's buffer sizes etc.
 156  */
 157 bool_t
 158 mount_pathconf_2_svc(struct svc_req *rqstp, dirpath *path, ppathcnf *res)
 159 {
 160         struct sockaddr_in *sin
 161                 = (struct sockaddr_in *) svc_getcaller(rqstp->rq_xprt);
 162         struct stat     stb;
 163         nfs_export      *exp;
 164         char            rpath[MAXPATHLEN+1];
 165         char            *p = *path;
 166
 167         memset(res, 0, sizeof(*res));
 168
 169         if (*p == '\0')
 170                 p = "/";
 171
 172         /* Reload /etc/xtab if necessary */
 173         auth_reload();
 174
 175         /* Resolve symlinks */
 176         if (realpath(p, rpath) != NULL) {
 177                 rpath[sizeof (rpath) - 1] = '\0';
 178                 p = rpath;
 179         }
 180
 181         /* Now authenticate the intruder... */
 182         if (!(exp = auth_authenticate("mount", sin, p))) {
 183                 return 1;
 184         } else if (stat(p, &stb) < 0) {
 185                 xlog(L_WARNING, "can't stat exported dir %s: %s",
 186                                 p, strerror(errno));
 187                 export_reset (exp);
 188                 return 1;
 189         }
 190
 191         res->pc_link_max  = pathconf(p, _PC_LINK_MAX);
 192         res->pc_max_canon = pathconf(p, _PC_MAX_CANON);
 193         res->pc_max_input = pathconf(p, _PC_MAX_INPUT);
 194         res->pc_name_max  = pathconf(p, _PC_NAME_MAX);
 195         res->pc_path_max  = pathconf(p, _PC_PATH_MAX);
 196         res->pc_pipe_buf  = pathconf(p, _PC_PIPE_BUF);
 197         res->pc_vdisable  = pathconf(p, _PC_VDISABLE);
 198
 199         /* Can't figure out what to do with pc_mask */
 200         res->pc_mask[0]   = 0;
 201         res->pc_mask[1]   = 0;
 202
 203         export_reset (exp);
 204
 205         return 1;
 206 }
 207
 208 /*
 209  * NFSv3 MOUNT procedure
 210  */
 211 bool_t
 212 mount_mnt_3_svc(struct svc_req *rqstp, dirpath *path, mountres3 *res)
 213 {
 214         static int      flavors[] = { AUTH_NULL, AUTH_UNIX };
 215         struct nfs_fh_len *fh;
 216
 217         xlog(D_CALL, "MNT3(%s) called", *path);
 218         if ((fh = get_rootfh(rqstp, path, (int *) &res->fhs_status, 1)) != NULL) {
 219                 struct mountres3_ok     *ok = &res->mountres3_u.mountinfo;
 220
 221                 ok->fhandle.fhandle3_len = fh->fh_size;
 222                 ok->fhandle.fhandle3_val = fh->fh_handle;
 223                 ok->auth_flavors.auth_flavors_len = 2;
 224                 ok->auth_flavors.auth_flavors_val = flavors;
 225         }
 226         return 1;
 227 }
 228
 229 static struct nfs_fh_len *
 230 get_rootfh(struct svc_req *rqstp, dirpath *path, int *error, int v3)
 231 {
 232         struct sockaddr_in *sin =
 233                 (struct sockaddr_in *) svc_getcaller(rqstp->rq_xprt);
 234         struct stat     stb;
 235         nfs_export      *exp;
 236         char            rpath[MAXPATHLEN+1];
 237         char            *p = *path;
 238
 239         if (*p == '\0')
 240                 p = "/";
 241
 242         /* Reload /var/lib/nfs/etab if necessary */
 243         auth_reload();
 244
 245         /* Resolve symlinks */
 246         if (realpath(p, rpath) != NULL) {
 247                 rpath[sizeof (rpath) - 1] = '\0';
 248                 p = rpath;
 249         }
 250
 251         /* Now authenticate the intruder... */
 252         if (!(exp = auth_authenticate("mount", sin, p))) {
 253                 *error = NFSERR_ACCES;
 254         } else if (stat(p, &stb) < 0) {
 255                 xlog(L_WARNING, "can't stat exported dir %s: %s",
 256                                 p, strerror(errno));
 257                 if (errno == ENOENT)
 258                         *error = NFSERR_NOENT;
 259                 else
 260                         *error = NFSERR_ACCES;
 261         } else if (!S_ISDIR(stb.st_mode) && !S_ISREG(stb.st_mode)) {
 262                 xlog(L_WARNING, "%s is not a directory or regular file", p);
 263                 *error = NFSERR_NOTDIR;
 264         } else {
 265                 struct nfs_fh_len  *fh;
 266
 267                 if (exp->m_exported<1)
 268                         export_export(exp);
 269                 if (!exp->m_xtabent)
 270                         xtab_append(exp);
 271
 272                 if (v3)
 273                         fh = getfh_size ((struct sockaddr *) sin, p, 64);
 274                 if (!v3 || (fh == NULL && errno == EINVAL)) {
 275                         /* We first try the new nfs syscall. */
 276                         fh = getfh ((struct sockaddr *) sin, p);
 277                         if (fh == NULL && errno == EINVAL)
 278                                 /* Let's try the old one. */
 279                                 fh = getfh_old ((struct sockaddr *) sin,
 280                                                 stb.st_dev, stb.st_ino);
 281                 }
 282                 if (fh != NULL) {
 283                         mountlist_add(exp, p);
 284                         *error = NFS_OK;
 285                         export_reset (exp);
 286                         return fh;
 287                 }
 288                 xlog(L_WARNING, "getfh failed: %s", strerror(errno));
 289                 *error = NFSERR_ACCES;
 290         }
 291         export_reset (exp);
 292         return NULL;
 293 }
 294
 295 static exports
 296 get_exportlist(void)
 297 {
 298         static exports          elist = NULL;
 299         struct exportnode       *e, *ne;
 300         struct groupnode        *g, *ng, *c, **cp;
 301         nfs_export              *exp;
 302         int                     i;
 303
 304         if (!auth_reload() && elist)
 305                 return elist;
 306
 307         for (e = elist; e != NULL; e = ne) {
 308                 ne = e->ex_next;
 309                 for (g = e->ex_groups; g != NULL; g = ng) {
 310                         ng = g->gr_next;
 311                         xfree(g->gr_name);
 312                         xfree(g);
 313                 }
 314                 xfree(e->ex_dir);
 315                 xfree(e);
 316         }
 317         elist = NULL;
 318
 319         for (i = 0; i < MCL_MAXTYPES; i++) {
 320                 for (exp = exportlist[i]; exp; exp = exp->m_next) {
 321                         for (e = elist; e != NULL; e = e->ex_next) {
 322                                 if (!strcmp(exp->m_export.m_path, e->ex_dir))
 323                                         break;
 324                         }
 325                         if (!e) {
 326                                 e = (struct exportnode *) xmalloc(sizeof(*e));
 327                                 e->ex_next = elist;
 328                                 e->ex_groups = NULL;
 329                                 e->ex_dir = xstrdup(exp->m_export.m_path);
 330                                 elist = e;
 331                         }
 332
 333                         /* We need to check if we should remove
 334                            previous ones. */
 335                         if (i == MCL_ANONYMOUS && e->ex_groups) {
 336                                 for (g = e->ex_groups; g; g = ng) {
 337                                         ng = g->gr_next;
 338                                         xfree(g->gr_name);
 339                                         xfree(g);
 340                                 }
 341                                 e->ex_groups = NULL;
 342                                 continue;
 343                         }
 344
 345                         if (i != MCL_FQDN && e->ex_groups) {
 346                           struct hostent        *hp;
 347
 348                           cp = &e->ex_groups;
 349                           while ((c = *cp) != NULL) {
 350                             if (client_gettype (c->gr_name) == MCL_FQDN
 351                                 && (hp = gethostbyname(c->gr_name))) {
 352                               hp = hostent_dup (hp);
 353                               if (client_check(exp->m_client, hp)) {
 354                                 *cp = c->gr_next;
 355                                 xfree(c->gr_name);
 356                                 xfree(c);
 357                                 xfree (hp);
 358                                 if ((c = *cp) == NULL)
 359                                   break;
 360                               }
 361                               else
 362                                 xfree (hp);
 363                             }
 364                             cp = &(c->gr_next);
 365                           }
 366                         }
 367
 368                         if (exp->m_export.e_hostname [0] != '\0') {
 369                                 for (g = e->ex_groups; g; g = g->gr_next)
 370                                         if (strcmp (exp->m_export.e_hostname,
 371                                                     g->gr_name) == 0)
 372                                                 break;
 373                                 if (g)
 374                                         continue;
 375                                 g = (struct groupnode *) xmalloc(sizeof(*g));
 376                                 g->gr_name = xstrdup(exp->m_export.e_hostname);
 377                                 g->gr_next = e->ex_groups;
 378                                 e->ex_groups = g;
 379                         }
 380                 }
 381         }
 382
 383         return elist;
 384 }
 385
 386 int
 387 main(int argc, char **argv)
 388 {
 389         char    *export_file = _PATH_EXPORTS;
 390         int     foreground = 0;
 391         int     port = 0;
 392         int     c;
 393         struct sigaction sa;
 394
 395         /* Parse the command line options and arguments. */
 396         opterr = 0;
 397         while ((c = getopt_long(argc, argv, "Fd:f:p:P:hN:V:v", longopts, NULL)) != EOF)
 398                 switch (c) {
 399                 case 'F':
 400                         foreground = 1;
 401                         break;
 402                 case 'd':
 403                         xlog_sconfig(optarg, 1);
 404                         break;
 405                 case 'f':
 406                         export_file = optarg;
 407                         break;
 408                 case 'h':
 409                         usage(argv [0], 0);
 410                         break;
 411                 case 'P':       /* XXX for nfs-server compatibility */
 412                 case 'p':
 413                         port = atoi(optarg);
 414                         if (port <= 0 || port > 65535) {
 415                                 fprintf(stderr, "%s: bad port number: %s\n",
 416                                         argv [0], optarg);
 417                                 usage(argv [0], 1);
 418                         }
 419                         break;
 420                 case 'N':
 421                         nfs_version &= ~(1 << (atoi (optarg) - 1));
 422                         break;
 423                 case 'n':
 424                         _rpcfdtype = SOCK_DGRAM;
 425                         break;
 426                 case 'V':
 427                         nfs_version |= 1 << (atoi (optarg) - 1);
 428                         break;
 429                 case 'v':
 430                         printf("kmountd %s\n", VERSION);
 431                         exit(0);
 432                 case 0:
 433                         break;
 434                 case '?':
 435                 default:
 436                         usage(argv [0], 1);
 437                 }
 438
 439         /* No more arguments allowed. */
 440         if (optind != argc || !(nfs_version & 0x7))
 441                 usage(argv [0], 1);
 442
 443         /* Initialize logging. */
 444 /*      xlog_open("mountd"); */
 445
 446         sa.sa_handler = SIG_IGN;
 447         sa.sa_flags = 0;
 448         sigemptyset(&sa.sa_mask);
 449         sigaction(SIGHUP, &sa, NULL);
 450         sigaction(SIGINT, &sa, NULL);
 451         sigaction(SIGTERM, &sa, NULL);
 452         /* WARNING: the following works on Linux and SysV, but not BSD! */
 453         sigaction(SIGCHLD, &sa, NULL);
 454
 455         if (nfs_version & 0x1)
 456                 rpc_init("mountd", MOUNTPROG, MOUNTVERS,
 457                          mount_dispatch, port);
 458         if (nfs_version & (0x1 << 1))
 459                 rpc_init("mountd", MOUNTPROG, MOUNTVERS_POSIX,
 460                          mount_dispatch, port);
 461         if (nfs_version & (0x1 << 2))
 462                 rpc_init("mountd", MOUNTPROG, MOUNTVERS_NFSV3,
 463                          mount_dispatch, port);
 464
 465         sa.sa_handler = killer;
 466         sigaction(SIGHUP, &sa, NULL);
 467         sigaction(SIGINT, &sa, NULL);
 468         sigaction(SIGTERM, &sa, NULL);
 469
 470         auth_init(export_file);
 471
 472         if (!foreground) {
 473                 /* We first fork off a child. */
 474                 if ((c = fork()) > 0)
 475                         exit(0);
 476                 if (c < 0) {
 477                         xlog(L_FATAL, "mountd: cannot fork: %s\n",
 478                                                 strerror(errno));
 479                 }
 480                 /* Now we remove ourselves from the foreground.
 481                    Redirect stdin/stdout/stderr first. */
 482                 {
 483                         int fd = open("/dev/null", O_RDWR);
 484                         (void) dup2(fd, 0);
 485                         (void) dup2(fd, 1);
 486                         (void) dup2(fd, 2);
 487                         if (fd > 2) (void) close(fd);
 488                 }
 489                 setsid();
 490                 xlog_background();
 491         }
 492
 493         svc_run();
 494
 495         xlog(L_ERROR, "Ack! Gack! svc_run returned!\n");
 496         exit(1);
 497 }
 498
 499 static void
 500 usage(const char *prog, int n)
 501 {
 502         fprintf(stderr,
 503 "Usage: %s [-Fhnv] [-d kind] [-f exports-file] [-V version]\n"
 504 "       [-N version] [--debug kind] [-p|--port port] [--help] [--version]\n"
 505 "       [--exports-file=file] [--nfs-version version]\n"
 506 "       [--no-nfs-version version] [--no-tcp]\n", prog);
 507         exit(n);
 508 }