utils/mount/mount.c

   1 /*
   2  * mount.c -- Linux NFS mount
   3  *
   4  * Copyright (C) 2006 Amit Gud <agud@redhat.com>
   5  *
   6  * - Basic code and wrapper around mount and umount code of NFS.
   7  *   Based on util-linux/mount/mount.c.
   8  *
   9  * This program is free software; you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License as published by
  11  * the Free Software Foundation; either version 2, or (at your option)
  12  * any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  */
  20
  21 #ifdef HAVE_CONFIG_H
  22 #include <config.h>
  23 #endif
  24
  25 #include <unistd.h>
  26 #include <sys/types.h>
  27 #include <sys/stat.h>
  28 #include <stdio.h>
  29 #include <string.h>
  30 #include <errno.h>
  31 #include <fcntl.h>
  32 #include <sys/mount.h>
  33 #include <getopt.h>
  34 #include <mntent.h>
  35 #include <pwd.h>
  36
  37 #include "fstab.h"
  38 #include "xcommon.h"
  39 #include "nls.h"
  40 #include "mount_constants.h"
  41 #include "mount_config.h"
  42 #include "nfs_paths.h"
  43 #include "nfs_mntent.h"
  44
  45 #include "nfs_mount.h"
  46 #include "nfs4_mount.h"
  47 #include "mount.h"
  48 #include "error.h"
  49 #include "stropts.h"
  50 #include "utils.h"
  51
  52 char *progname;
  53 int nfs_mount_data_version;
  54 int nomtab;
  55 int verbose;
  56 int sloppy;
  57 int string;
  58
  59 #define FOREGROUND      (0)
  60 #define BACKGROUND      (1)
  61
  62 static struct option longopts[] = {
  63   { "fake", 0, 0, 'f' },
  64   { "help", 0, 0, 'h' },
  65   { "no-mtab", 0, 0, 'n' },
  66   { "read-only", 0, 0, 'r' },
  67   { "ro", 0, 0, 'r' },
  68   { "verbose", 0, 0, 'v' },
  69   { "version", 0, 0, 'V' },
  70   { "read-write", 0, 0, 'w' },
  71   { "rw", 0, 0, 'w' },
  72   { "options", 1, 0, 'o' },
  73   { NULL, 0, 0, 0 }
  74 };
  75
  76 /*
  77  * Map from -o and fstab option strings to the flag argument to mount(2).
  78  */
  79 struct opt_map {
  80         const char *opt;        /* option name */
  81         int skip;               /* skip in mtab option string */
  82         int inv;                /* true if flag value should be inverted */
  83         int mask;               /* flag mask value */
  84 };
  85
  86 static const struct opt_map opt_map[] = {
  87   { "defaults", 0, 0, 0         },      /* default options */
  88   { "ro",       1, 0, MS_RDONLY },      /* read-only */
  89   { "rw",       1, 1, MS_RDONLY },      /* read-write */
  90   { "exec",     0, 1, MS_NOEXEC },      /* permit execution of binaries */
  91   { "noexec",   0, 0, MS_NOEXEC },      /* don't execute binaries */
  92   { "suid",     0, 1, MS_NOSUID },      /* honor suid executables */
  93   { "nosuid",   0, 0, MS_NOSUID },      /* don't honor suid executables */
  94   { "dev",      0, 1, MS_NODEV  },      /* interpret device files  */
  95   { "nodev",    0, 0, MS_NODEV  },      /* don't interpret devices */
  96   { "sync",     0, 0, MS_SYNCHRONOUS},  /* synchronous I/O */
  97   { "async",    0, 1, MS_SYNCHRONOUS},  /* asynchronous I/O */
  98   { "dirsync",  0, 0, MS_DIRSYNC},      /* synchronous directory modifications */
  99   { "remount",  0, 0, MS_REMOUNT},      /* Alter flags of mounted FS */
 100   { "bind",     0, 0, MS_BIND   },      /* Remount part of tree elsewhere */
 101   { "rbind",    0, 0, MS_BIND|MS_REC }, /* Idem, plus mounted subtrees */
 102   { "auto",     0, 0, MS_DUMMY },       /* Can be mounted using -a */
 103   { "noauto",   0, 0, MS_DUMMY },       /* Can  only be mounted explicitly */
 104   { "users",    1, 0, MS_USERS },       /* Allow ordinary user to mount */
 105   { "nousers",  0, 1, MS_DUMMY  },      /* Forbid ordinary user to mount */
 106   { "user",     1, 0, MS_USER  },       /* Allow ordinary user to mount */
 107   { "nouser",   0, 1, MS_DUMMY   },     /* Forbid ordinary user to mount */
 108   { "owner",    0, 0, MS_DUMMY  },      /* Let the owner of the device mount */
 109   { "noowner",  0, 0, MS_DUMMY  },      /* Device owner has no special privs */
 110   { "group",    0, 0, MS_DUMMY  },      /* Let the group of the device mount */
 111   { "nogroup",  0, 0, MS_DUMMY  },      /* Device group has no special privs */
 112   { "_netdev",  0, 0, MS_DUMMY},        /* Device requires network */
 113   { "comment",  0, 0, MS_DUMMY},        /* fstab comment only (kudzu,_netdev)*/
 114
 115   /* add new options here */
 116 #ifdef MS_NOSUB
 117   { "sub",      0, 1, MS_NOSUB  },      /* allow submounts */
 118   { "nosub",    0, 0, MS_NOSUB  },      /* don't allow submounts */
 119 #endif
 120 #ifdef MS_SILENT
 121   { "quiet",    0, 0, MS_SILENT    },   /* be quiet  */
 122   { "loud",     0, 1, MS_SILENT    },   /* print out messages. */
 123 #endif
 124 #ifdef MS_MANDLOCK
 125   { "mand",     0, 0, MS_MANDLOCK },    /* Allow mandatory locks on this FS */
 126   { "nomand",   0, 1, MS_MANDLOCK },    /* Forbid mandatory locks on this FS */
 127 #endif
 128   { "loop",     1, 0, MS_DUMMY   },      /* use a loop device */
 129 #ifdef MS_NOATIME
 130   { "atime",    0, 1, MS_NOATIME },     /* Update access time */
 131   { "noatime",  0, 0, MS_NOATIME },     /* Do not update access time */
 132 #endif
 133 #ifdef MS_NODIRATIME
 134   { "diratime", 0, 1, MS_NODIRATIME },  /* Update dir access times */
 135   { "nodiratime", 0, 0, MS_NODIRATIME },/* Do not update dir access times */
 136 #endif
 137 #ifdef MS_RELATIME
 138   { "relatime", 0, 0, MS_RELATIME },   /* Update access times relative to
 139                       mtime/ctime */
 140   { "norelatime", 0, 1, MS_RELATIME }, /* Update access time without regard
 141                       to mtime/ctime */
 142 #endif
 143   { "noquota", 0, 0, MS_DUMMY },        /* Don't enforce quota */
 144   { "quota", 0, 0, MS_DUMMY },          /* Enforce user quota */
 145   { "usrquota", 0, 0, MS_DUMMY },       /* Enforce user quota */
 146   { "grpquota", 0, 0, MS_DUMMY },       /* Enforce group quota */
 147   { NULL,       0, 0, 0         }
 148 };
 149
 150 static void parse_opts(const char *options, int *flags, char **extra_opts);
 151
 152 /*
 153  * Build a canonical mount option string for /etc/mtab.
 154  */
 155 static char *fix_opts_string(int flags, const char *extra_opts)
 156 {
 157         const struct opt_map *om;
 158         char *new_opts;
 159
 160         new_opts = xstrdup((flags & MS_RDONLY) ? "ro" : "rw");
 161         if (flags & MS_USER) {
 162                 /* record who mounted this so they can unmount */
 163                 struct passwd *pw = getpwuid(getuid());
 164                 if(pw)
 165                         new_opts = xstrconcat3(new_opts, ",user=", pw->pw_name);
 166         }
 167         if (flags & MS_USERS)
 168                 new_opts = xstrconcat3(new_opts, ",users", "");
 169
 170         for (om = opt_map; om->opt != NULL; om++) {
 171                 if (om->skip)
 172                         continue;
 173                 if (om->inv || !om->mask || (flags & om->mask) != om->mask)
 174                         continue;
 175                 new_opts = xstrconcat3(new_opts, ",", om->opt);
 176                 flags &= ~om->mask;
 177         }
 178         if (extra_opts && *extra_opts) {
 179                 new_opts = xstrconcat3(new_opts, ",", extra_opts);
 180         }
 181         return new_opts;
 182 }
 183
 184 static void
 185 init_mntent(struct mntent *mnt, char *fsname, char *dir, char *type,
 186                 int flags, char *opts)
 187 {
 188         mnt->mnt_fsname = fsname;
 189         mnt->mnt_dir    = dir;
 190         mnt->mnt_type   = type;
 191         mnt->mnt_opts   = fix_opts_string(flags & ~MS_NOMTAB, opts);
 192
 193         /* these are always zero for NFS */
 194         mnt->mnt_freq   = 0;
 195         mnt->mnt_passno = 0;
 196 }
 197
 198 /* Create mtab with a root entry.  */
 199 static void
 200 create_mtab (void) {
 201         struct mntentchn *fstab;
 202         struct mntent mnt;
 203         int flags;
 204         mntFILE *mfp;
 205
 206         lock_mtab();
 207
 208         mfp = nfs_setmntent (MOUNTED, "a+");
 209         if (mfp == NULL || mfp->mntent_fp == NULL) {
 210                 int errsv = errno;
 211                 die (EX_FILEIO, _("mount: can't open %s for writing: %s"),
 212                      MOUNTED, strerror (errsv));
 213         }
 214
 215         /* Find the root entry by looking it up in fstab */
 216         if ((fstab = getfsfile ("/")) || (fstab = getfsfile ("root"))) {
 217                 char *extra_opts;
 218                 parse_opts (fstab->m.mnt_opts, &flags, &extra_opts);
 219                 init_mntent(&mnt, xstrdup(fstab->m.mnt_fsname), "/",
 220                                 fstab->m.mnt_type, flags, extra_opts);
 221                 free(extra_opts);
 222
 223                 if (nfs_addmntent (mfp, &mnt) == 1) {
 224                         int errsv = errno;
 225                         die (EX_FILEIO, _("mount: error writing %s: %s"),
 226                              _PATH_MOUNTED, strerror (errsv));
 227                 }
 228         }
 229         if (fchmod (fileno (mfp->mntent_fp), 0644) < 0)
 230                 if (errno != EROFS) {
 231                         int errsv = errno;
 232                         die (EX_FILEIO,
 233                              _("mount: error changing mode of %s: %s"),
 234                              _PATH_MOUNTED, strerror (errsv));
 235                 }
 236         nfs_endmntent (mfp);
 237
 238         unlock_mtab();
 239
 240         reset_mtab_info();
 241 }
 242
 243 static int add_mtab(char *spec, char *mount_point, char *fstype,
 244                         int flags, char *opts)
 245 {
 246         struct mntent ment;
 247         int result = EX_SUCCESS;
 248
 249         init_mntent(&ment, spec, mount_point, fstype, flags, opts);
 250
 251         if (!nomtab && mtab_does_not_exist()) {
 252                 if (verbose > 1)
 253                         printf(_("mount: no %s found - creating it..\n"),
 254                                MOUNTED);
 255                 create_mtab ();
 256         }
 257
 258         if (!nomtab && mtab_is_writable()) {
 259                 if (flags & MS_REMOUNT)
 260                         update_mtab(ment.mnt_dir, &ment);
 261                 else {
 262                         mntFILE *mtab;
 263
 264                         lock_mtab();
 265                         mtab = nfs_setmntent(MOUNTED, "a+");
 266                         if (mtab == NULL || mtab->mntent_fp == NULL) {
 267                                 nfs_error(_("Can't open mtab: %s"),
 268                                                 strerror(errno));
 269                                 result = EX_FILEIO;
 270                         } else {
 271                                 if (nfs_addmntent(mtab, &ment) == 1) {
 272                                         nfs_error(_("Can't write mount entry to mtab: %s"),
 273                                                         strerror(errno));
 274                                         result = EX_FILEIO;
 275                                 }
 276                         }
 277                         nfs_endmntent(mtab);
 278                         unlock_mtab();
 279                 }
 280         }
 281
 282         free(ment.mnt_opts);
 283
 284         return result;
 285 }
 286
 287 static void parse_opt(const char *opt, int *mask, char *extra_opts, size_t len)
 288 {
 289         const struct opt_map *om;
 290
 291         for (om = opt_map; om->opt != NULL; om++) {
 292                 if (!strcmp (opt, om->opt)) {
 293                         if (om->inv)
 294                                 *mask &= ~om->mask;
 295                         else
 296                                 *mask |= om->mask;
 297                         return;
 298                 }
 299         }
 300
 301         len -= strlen(extra_opts);
 302
 303         if (*extra_opts && --len > 0)
 304                 strcat(extra_opts, ",");
 305
 306         if ((len -= strlen(opt)) > 0)
 307                 strcat(extra_opts, opt);
 308 }
 309
 310 /*
 311  * Convert the provided mount command-line options into the 4th &
 312  * 5th arguments to mount(2).  Output parameter "@flags" gets the
 313  * standard options (indicated by MS_ bits), and output parameter
 314  * "@extra_opts" gets all the filesystem-specific options.
 315  */
 316 static void parse_opts(const char *options, int *flags, char **extra_opts)
 317 {
 318         if (options != NULL) {
 319                 char *opts = xstrdup(options);
 320                 char *opt, *p;
 321                 size_t len = strlen(opts) + 1;  /* include room for a null */
 322                 int open_quote = 0;
 323
 324                 *extra_opts = xmalloc(len);
 325                 **extra_opts = '\0';
 326
 327                 for (p = opts, opt = NULL; p && *p; p++) {
 328                         if (!opt)
 329                                 opt = p;        /* begin of the option item */
 330                         if (*p == '"')
 331                                 open_quote ^= 1; /* reverse the status */
 332                         if (open_quote)
 333                                 continue;       /* still in a quoted block */
 334                         if (*p == ',')
 335                                 *p = '\0';      /* terminate the option item */
 336
 337                         /* end of option item or last item */
 338                         if (*p == '\0' || *(p + 1) == '\0') {
 339                                 parse_opt(opt, flags, *extra_opts, len);
 340                                 opt = NULL;
 341                         }
 342                 }
 343                 free(opts);
 344         }
 345 }
 346
 347 static int try_mount(char *spec, char *mount_point, int flags,
 348                         char *fs_type, char **extra_opts, char *mount_opts,
 349                         int fake, int bg)
 350 {
 351         int ret;
 352
 353         if (string)
 354                 ret = nfsmount_string(spec, mount_point, fs_type, flags,
 355                                         extra_opts, fake, bg);
 356         else {
 357                 if (strcmp(fs_type, "nfs4") == 0)
 358                         ret = nfs4mount(spec, mount_point, flags,
 359                                         extra_opts, fake, bg);
 360                 else
 361                         ret = nfsmount(spec, mount_point, flags,
 362                                         extra_opts, fake, bg);
 363         }
 364
 365         if (ret)
 366                 return ret;
 367
 368         if (!fake)
 369                 print_one(spec, mount_point, fs_type, mount_opts);
 370
 371         return add_mtab(spec, mount_point, fs_type, flags, *extra_opts);
 372 }
 373
 374 int main(int argc, char *argv[])
 375 {
 376         int c, flags = 0, mnt_err = 1, fake = 0;
 377         char *spec = NULL, *mount_point = NULL, *fs_type = "nfs";
 378         char *extra_opts = NULL, *mount_opts = NULL;
 379         uid_t uid = getuid();
 380
 381         progname = basename(argv[0]);
 382
 383         nfs_mount_data_version = discover_nfs_mount_data_version(&string);
 384
 385         if(!strncmp(progname, "umount", strlen("umount")))
 386                 exit(nfsumount(argc, argv));
 387
 388         if (argv[1] && argv[1][0] == '-') {
 389                 if(argv[1][1] == 'V')
 390                         printf("%s ("PACKAGE_STRING")\n", progname);
 391                 else
 392                         mount_usage();
 393                 exit(EX_SUCCESS);
 394         }
 395
 396         if ((argc < 3)) {
 397                 mount_usage();
 398                 exit(EX_USAGE);
 399         }
 400
 401         mount_config_init(progname);
 402
 403         argv[2] = argv[0]; /* so that getopt error messages are correct */
 404         while ((c = getopt_long(argc - 2, argv + 2, "rvVwfno:hs",
 405                                 longopts, NULL)) != -1) {
 406                 switch (c) {
 407                 case 'r':
 408                         flags |= MS_RDONLY;
 409                         break;
 410                 case 'v':
 411                         ++verbose;
 412                         break;
 413                 case 'V':
 414                         printf("%s: ("PACKAGE_STRING")\n", progname);
 415                         exit(EX_SUCCESS);
 416                 case 'w':
 417                         flags &= ~MS_RDONLY;
 418                         break;
 419                 case 'f':
 420                         ++fake;
 421                         break;
 422                 case 'n':
 423                         ++nomtab;
 424                         break;
 425                 case 'o':              /* specify mount options */
 426                         if (mount_opts)
 427                                 mount_opts = xstrconcat3(mount_opts, ",", optarg);
 428                         else
 429                                 mount_opts = xstrdup(optarg);
 430                         break;
 431                 case 's':
 432                         ++sloppy;
 433                         break;
 434                 case 'h':
 435                 default:
 436                         mount_usage();
 437                         goto out_usage;
 438                 }
 439         }
 440
 441         /*
 442          * Extra non-option words at the end are bogus...
 443          */
 444         if (optind != argc - 2) {
 445                 mount_usage();
 446                 goto out_usage;
 447         } else {
 448                 while (optind < argc) {
 449                         if (!spec)
 450                                 spec = argv[optind];
 451                         else
 452                                 mount_point = argv[optind];
 453                         optind++;
 454                 }
 455         }
 456
 457         if (strcmp(progname, "mount.nfs4") == 0)
 458                 fs_type = "nfs4";
 459
 460         /*
 461          * If a non-root user is attempting to mount, make sure the
 462          * user's requested options match the options specified in
 463          * /etc/fstab; otherwise, don't allow the mount.
 464          */
 465         if (uid != 0) {
 466                 struct mntentchn *mc;
 467
 468                 if ((mc = getfsfile(mount_point)) == NULL ||
 469                     strcmp(mc->m.mnt_fsname, spec) != 0 ||
 470                     strcmp(mc->m.mnt_type, fs_type) != 0) {
 471                         nfs_error(_("%s: permission denied: no match for %s "
 472                                 "found in /etc/fstab"), progname, mount_point);
 473                         goto out_usage;
 474                 }
 475
 476                 /*
 477                  * 'mount' munges the options from fstab before passing them
 478                  * to us, so it is non-trivial to test that we have the correct
 479                  * set of options and we don't want to trust what the user
 480                  * gave us, so just take whatever is in /etc/fstab.
 481                  */
 482                 mount_opts = strdup(mc->m.mnt_opts);
 483         }
 484
 485         mount_point = canonicalize(mount_point);
 486         if (!mount_point) {
 487                 nfs_error(_("%s: no mount point provided"), progname);
 488                 goto out_usage;
 489         }
 490         if (mount_point[0] != '/') {
 491                 nfs_error(_("%s: unrecognized mount point %s"),
 492                         progname, mount_point);
 493                 mnt_err = EX_USAGE;
 494                 goto out;
 495         }
 496         /*
 497          * Concatenate mount options from the configuration file
 498          */
 499         mount_opts = mount_config_opts(spec, mount_point, mount_opts);
 500
 501         parse_opts(mount_opts, &flags, &extra_opts);
 502
 503         if (uid != 0) {
 504                 if (!(flags & (MS_USERS|MS_USER))) {
 505                         nfs_error(_("%s: permission denied"), progname);
 506                         mnt_err = EX_USAGE;
 507                         goto out;
 508                 }
 509
 510                 if (geteuid() != 0) {
 511                         nfs_error(_("%s: not installed setuid - "
 512                                     "\"user\" NFS mounts not supported."), progname);
 513                         exit(EX_FAIL);
 514                 }
 515         }
 516
 517         if (chk_mountpoint(mount_point)) {
 518                 mnt_err = EX_USAGE;
 519                 goto out;
 520         }
 521
 522         mnt_err = try_mount(spec, mount_point, flags, fs_type, &extra_opts,
 523                                 mount_opts, fake, FOREGROUND);
 524         if (mnt_err == EX_BG) {
 525                 printf(_("%s: backgrounding \"%s\"\n"),
 526                         progname, spec);
 527                 printf(_("%s: mount options: \"%s\"\n"),
 528                         progname, extra_opts);
 529
 530                 fflush(stdout);
 531
 532                 /*
 533                  * Parent exits immediately with success.
 534                  */
 535                 if (daemon(0, 0)) {
 536                         nfs_error(_("%s: failed to start "
 537                                         "background process: %s\n"),
 538                                                 progname, strerror(errno));
 539                         exit(EX_FAIL);
 540                 }
 541
 542                 mnt_err = try_mount(spec, mount_point, flags, fs_type,
 543                                         &extra_opts, mount_opts, fake,
 544                                         BACKGROUND);
 545                 if (verbose && mnt_err)
 546                         printf(_("%s: giving up \"%s\"\n"),
 547                                 progname, spec);
 548         }
 549
 550 out:
 551         free(mount_opts);
 552         free(extra_opts);
 553         free(mount_point);
 554         exit(mnt_err);
 555
 556 out_usage:
 557         free(mount_opts);
 558         exit(EX_USAGE);
 559 }