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