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 <getopt.h>
  30 #include <mntent.h>
  31 #include <pwd.h>
  32
  33 #include "fstab.h"
  34 #include "xcommon.h"
  35 #include "mount_constants.h"
  36 #include "nfs_paths.h"
  37
  38 #include "nfs_mount.h"
  39 #include "nfs4_mount.h"
  40 #include "nfsumount.h"
  41 #include "mount.h"
  42
  43 char *progname;
  44 int nomtab;
  45 int verbose;
  46 int mounttype;
  47 int sloppy;
  48
  49 static struct option longopts[] = {
  50   { "fake", 0, 0, 'f' },
  51   { "help", 0, 0, 'h' },
  52   { "no-mtab", 0, 0, 'n' },
  53   { "read-only", 0, 0, 'r' },
  54   { "ro", 0, 0, 'r' },
  55   { "verbose", 0, 0, 'v' },
  56   { "version", 0, 0, 'V' },
  57   { "read-write", 0, 0, 'w' },
  58   { "rw", 0, 0, 'w' },
  59   { "options", 1, 0, 'o' },
  60   { "nfsvers", 1, 0, 't' },
  61   { "bind", 0, 0, 128 },
  62   { "replace", 0, 0, 129 },
  63   { "after", 0, 0, 130 },
  64   { "before", 0, 0, 131 },
  65   { "over", 0, 0, 132 },
  66   { "move", 0, 0, 133 },
  67   { "rbind", 0, 0, 135 },
  68   { NULL, 0, 0, 0 }
  69 };
  70
  71 /* Map from -o and fstab option strings to the flag argument to mount(2).  */
  72 struct opt_map {
  73   const char *opt;              /* option name */
  74   int  skip;                    /* skip in mtab option string */
  75   int  inv;                     /* true if flag value should be inverted */
  76   int  mask;                    /* flag mask value */
  77 };
  78
  79 /* Custom mount options for our own purposes.  */
  80 #define MS_DUMMY        0x00000000
  81 #define MS_USERS        0x40000000
  82 #define MS_USER         0x80000000
  83
  84 static const struct opt_map opt_map[] = {
  85   { "defaults", 0, 0, 0         },      /* default options */
  86   { "ro",       1, 0, MS_RDONLY },      /* read-only */
  87   { "rw",       1, 1, MS_RDONLY },      /* read-write */
  88   { "exec",     0, 1, MS_NOEXEC },      /* permit execution of binaries */
  89   { "noexec",   0, 0, MS_NOEXEC },      /* don't execute binaries */
  90   { "suid",     0, 1, MS_NOSUID },      /* honor suid executables */
  91   { "nosuid",   0, 0, MS_NOSUID },      /* don't honor suid executables */
  92   { "dev",      0, 1, MS_NODEV  },      /* interpret device files  */
  93   { "nodev",    0, 0, MS_NODEV  },      /* don't interpret devices */
  94   { "sync",     0, 0, MS_SYNCHRONOUS},  /* synchronous I/O */
  95   { "async",    0, 1, MS_SYNCHRONOUS},  /* asynchronous I/O */
  96   { "dirsync",  0, 0, MS_DIRSYNC},      /* synchronous directory modifications */
  97   { "remount",  0, 0, MS_REMOUNT},      /* Alter flags of mounted FS */
  98   { "bind",     0, 0, MS_BIND   },      /* Remount part of tree elsewhere */
  99   { "rbind",    0, 0, MS_BIND|MS_REC }, /* Idem, plus mounted subtrees */
 100   { "auto",     0, 0, MS_DUMMY },       /* Can be mounted using -a */
 101   { "noauto",   0, 0, MS_DUMMY },       /* Can  only be mounted explicitly */
 102   { "users",    1, 0, MS_USERS },       /* Allow ordinary user to mount */
 103   { "nousers",  0, 1, MS_DUMMY  },      /* Forbid ordinary user to mount */
 104   { "user",     1, 0, MS_USER  },       /* Allow ordinary user to mount */
 105   { "nouser",   0, 1, MS_DUMMY   },     /* Forbid ordinary user to mount */
 106   { "owner",    0, 0, MS_DUMMY  },      /* Let the owner of the device mount */
 107   { "noowner",  0, 0, MS_DUMMY  },      /* Device owner has no special privs */
 108   { "group",    0, 0, MS_DUMMY  },      /* Let the group of the device mount */
 109   { "nogroup",  0, 0, MS_DUMMY  },      /* Device group has no special privs */
 110   { "_netdev",  0, 0, MS_DUMMY},        /* Device requires network */
 111   { "comment",  0, 0, MS_DUMMY},        /* fstab comment only (kudzu,_netdev)*/
 112
 113   /* add new options here */
 114 #ifdef MS_NOSUB
 115   { "sub",      0, 1, MS_NOSUB  },      /* allow submounts */
 116   { "nosub",    0, 0, MS_NOSUB  },      /* don't allow submounts */
 117 #endif
 118 #ifdef MS_SILENT
 119   { "quiet",    0, 0, MS_SILENT    },   /* be quiet  */
 120   { "loud",     0, 1, MS_SILENT    },   /* print out messages. */
 121 #endif
 122 #ifdef MS_MANDLOCK
 123   { "mand",     0, 0, MS_MANDLOCK },    /* Allow mandatory locks on this FS */
 124   { "nomand",   0, 1, MS_MANDLOCK },    /* Forbid mandatory locks on this FS */
 125 #endif
 126   { "loop",     1, 0, MS_DUMMY   },      /* use a loop device */
 127 #ifdef MS_NOATIME
 128   { "atime",    0, 1, MS_NOATIME },     /* Update access time */
 129   { "noatime",  0, 0, MS_NOATIME },     /* Do not update access time */
 130 #endif
 131 #ifdef MS_NODIRATIME
 132   { "diratime", 0, 1, MS_NODIRATIME },  /* Update dir access times */
 133   { "nodiratime", 0, 0, MS_NODIRATIME },/* Do not update dir access times */
 134 #endif
 135   { NULL,       0, 0, 0         }
 136 };
 137
 138 /* Try to build a canonical options string.  */
 139 static char * fix_opts_string (int flags, const char *extra_opts) {
 140         const struct opt_map *om;
 141         char *new_opts;
 142
 143         new_opts = xstrdup((flags & MS_RDONLY) ? "ro" : "rw");
 144         if (flags & MS_USER) {
 145                 /* record who mounted this so they can unmount */
 146                 struct passwd *pw = getpwuid(getuid());
 147                 if(pw)
 148                         new_opts = xstrconcat3(new_opts, ",user=", pw->pw_name);
 149         }
 150         if (flags & MS_USERS)
 151                 new_opts = xstrconcat3(new_opts, ",users", "");
 152
 153         for (om = opt_map; om->opt != NULL; om++) {
 154                 if (om->skip)
 155                         continue;
 156                 if (om->inv || !om->mask || (flags & om->mask) != om->mask)
 157                         continue;
 158                 new_opts = xstrconcat3(new_opts, ",", om->opt);
 159                 flags &= ~om->mask;
 160         }
 161         if (extra_opts && *extra_opts) {
 162                 new_opts = xstrconcat3(new_opts, ",", extra_opts);
 163         }
 164         return new_opts;
 165 }
 166
 167
 168 int add_mtab(char *fsname, char *mount_point, char *fstype, int flags, char *opts, int freq, int passno)
 169 {
 170         struct mntent ment;
 171         FILE *mtab;
 172
 173         ment.mnt_fsname = fsname;
 174         ment.mnt_dir = mount_point;
 175         ment.mnt_type = fstype;
 176         ment.mnt_opts = fix_opts_string(flags, opts);
 177         ment.mnt_freq = 0;
 178         ment.mnt_passno= 0;
 179
 180         if(flags & MS_REMOUNT) {
 181                 update_mtab(ment.mnt_dir, &ment);
 182                 return 0;
 183         }
 184
 185         lock_mtab();
 186
 187         if ((mtab = setmntent(MOUNTED, "a+")) == NULL) {
 188                 fprintf(stderr, "Can't open " MOUNTED);
 189                 return 1;
 190         }
 191
 192         if (addmntent(mtab, &ment) == 1) {
 193                 endmntent(mtab);
 194                 unlock_mtab();
 195                 fprintf(stderr, "Can't write mount entry");
 196                 return 1;
 197         }
 198
 199         if (fchmod(fileno(mtab), 0644) == -1) {
 200                 endmntent(mtab);
 201                 unlock_mtab();
 202                 fprintf(stderr, "Can't set perms on " MOUNTED);
 203                 return 1;
 204         }
 205
 206         endmntent(mtab);
 207
 208         unlock_mtab();
 209
 210         return 0;
 211 }
 212
 213 int do_mount_syscall(char *spec, char *node, char *type, int flags, void *data)
 214 {
 215         return mount(spec, node, type, flags, data);
 216 }
 217
 218 void mount_usage()
 219 {
 220         printf("usage: %s remotetarget dir [-rvVwfnh] [-t version] [-o nfsoptions]\n", progname);
 221         printf("options:\n\t-r\t\tMount file system readonly\n");
 222         printf("\t-v\t\tVerbose\n");
 223         printf("\t-V\t\tPrint version\n");
 224         printf("\t-w\t\tMount file system read-write\n");
 225         printf("\t-f\t\tFake mount, don't actually mount\n");
 226         printf("\t-n\t\tDo not update /etc/mtab\n");
 227         printf("\t-s\t\tTolerate sloppy mount options rather than failing.\n");
 228         printf("\t-h\t\tPrint this help\n");
 229         printf("\tversion\t\tnfs4 - NFS version 4, nfs - older NFS version supported\n");
 230         printf("\tnfsoptions\tRefer mount.nfs(8) or nfs(5)\n\n");
 231 }
 232
 233 static inline void
 234 parse_opt(const char *opt, int *mask, char *extra_opts, int len) {
 235         const struct opt_map *om;
 236
 237         for (om = opt_map; om->opt != NULL; om++) {
 238                 if (!strcmp (opt, om->opt)) {
 239                         if (om->inv)
 240                                 *mask &= ~om->mask;
 241                         else
 242                                 *mask |= om->mask;
 243                         return;
 244                 }
 245         }
 246
 247         len -= strlen(extra_opts);
 248
 249         if (*extra_opts && --len > 0)
 250                 strcat(extra_opts, ",");
 251
 252         if ((len -= strlen(opt)) > 0)
 253                 strcat(extra_opts, opt);
 254 }
 255
 256 /* Take -o options list and compute 4th and 5th args to mount(2).  flags
 257    gets the standard options (indicated by bits) and extra_opts all the rest */
 258 static void parse_opts (const char *options, int *flags, char **extra_opts)
 259 {
 260         if (options != NULL) {
 261                 char *opts = xstrdup(options);
 262                 char *opt, *p;
 263                 int len = strlen(opts) + 1;             /* include room for a null */
 264                 int open_quote = 0;
 265
 266                 *extra_opts = xmalloc(len);
 267                 **extra_opts = '\0';
 268
 269                 for (p=opts, opt=NULL; p && *p; p++) {
 270                         if (!opt)
 271                                 opt = p;                /* begin of the option item */
 272                         if (*p == '"')
 273                                 open_quote ^= 1;        /* reverse the status */
 274                         if (open_quote)
 275                                 continue;               /* still in a quoted block */
 276                         if (*p == ',')
 277                                 *p = '\0';              /* terminate the option item */
 278                         /* end of option item or last item */
 279                         if (*p == '\0' || *(p+1) == '\0') {
 280                                 parse_opt(opt, flags, *extra_opts, len);
 281                                 opt = NULL;
 282                         }
 283                 }
 284                 free(opts);
 285         }
 286 }
 287
 288 static void mount_error(char *node)
 289 {
 290         switch(errno) {
 291                 case ENOTDIR:
 292                         fprintf(stderr, "%s: mount point %s is not a directory\n", progname, node);
 293                         break;
 294                 case EBUSY:
 295                         fprintf(stderr, "%s: %s is already mounted or busy\n", progname, node);
 296                         break;
 297                 case ENOENT:
 298                         fprintf(stderr, "%s: mount point %s does not exist\n", progname, node);
 299                         break;
 300                 default:
 301                         fprintf(stderr, "%s: %s\n", progname, strerror(errno));
 302         }
 303 }
 304
 305 static void start_statd()
 306 {
 307         /* If /var/run/rpc.statd.pid exists and is non-empty,
 308          * assume statd already running.
 309          * If START_STATD not defined, or defined to a non-existent file,
 310          * don't bother,
 311          * else run that file (typically a shell script)
 312          */
 313         struct stat stb;
 314         if (stat("/var/run/rpc.statd.pid", &stb) == 0 &&
 315             stb.st_size > 0)
 316                 return;
 317 #ifdef START_STATD
 318         if (stat(START_STATD, &stb) ==0 &&
 319             S_ISREG(stb.st_mode) &&
 320             (stb.st_mode & S_IXUSR))
 321                 system(START_STATD);
 322 #endif
 323 }
 324
 325 int main(int argc, char *argv[])
 326 {
 327         int c, flags = 0, nfs_mount_vers = 0, mnt_err = 1, fake = 0;
 328         char *spec, *mount_point, *extra_opts = NULL;
 329         char *mount_opts = NULL, *p;
 330         uid_t uid = getuid();
 331
 332         progname = argv[0];
 333         if (!progname)
 334                 exit(2);
 335
 336         if ((p = strrchr(progname, '/')) != NULL)
 337                 progname = p+1;
 338
 339         if(!strncmp(progname, "umount", strlen("umount"))) {
 340                 if(argc < 2) {
 341                         umount_usage();
 342                         exit(1);
 343                 }
 344                 exit(nfsumount(argc, argv) ? 0 : 1);
 345         }
 346
 347         if(argv[1] && argv[1][0] == '-') {
 348                 if(argv[1][1] == 'V')
 349                         printf("%s ("PACKAGE_STRING")\n", progname);
 350                 else
 351                         mount_usage();
 352                 return 0;
 353         }
 354
 355         if ((argc < 3)) {
 356                 mount_usage();
 357                 exit(1);
 358         }
 359
 360         spec = argv[1];
 361         mount_point = argv[2];
 362
 363         argv[2] = argv[0]; /* so that getopt error messages are correct */
 364         while ((c = getopt_long (argc - 2, argv + 2, "rt:vVwfno:hs",
 365                                 longopts, NULL)) != -1) {
 366                 switch (c) {
 367                 case 'r':
 368                         flags |= MS_RDONLY;
 369                         break;
 370                 case 't':
 371                         if (strcmp(optarg, "nfs4") == 0)
 372                                 nfs_mount_vers = 4;
 373                         else if (strcmp(optarg, "nfs") == 0)
 374                                 nfs_mount_vers = 0;
 375                         else {
 376                                 fprintf(stderr, "%s: unknown filesystem type: %s\n",
 377                                         progname, optarg);
 378                                 exit(1);
 379                         }
 380                         break;
 381                 case 'v':
 382                         ++verbose;
 383                         break;
 384                 case 'V':
 385                         printf("%s: ("PACKAGE_STRING")\n", progname);
 386                         return 0;
 387                 case 'w':
 388                         flags &= ~MS_RDONLY;
 389                         break;
 390                 case 'f':
 391                         ++fake;
 392                         break;
 393                 case 'n':
 394                         ++nomtab;
 395                         break;
 396                 case 'o':              /* specify mount options */
 397                         if (mount_opts)
 398                                 mount_opts = xstrconcat3(mount_opts, ",", optarg);
 399                         else
 400                                 mount_opts = xstrdup(optarg);
 401                         break;
 402                 case 's':
 403                         ++sloppy;
 404                         break;
 405                 case 128: /* bind */
 406                         mounttype = MS_BIND;
 407                         break;
 408                 case 129: /* replace */
 409                         mounttype = MS_REPLACE;
 410                         break;
 411                 case 130: /* after */
 412                         mounttype = MS_AFTER;
 413                         break;
 414                 case 131: /* before */
 415                         mounttype = MS_BEFORE;
 416                         break;
 417                 case 132: /* over */
 418                         mounttype = MS_OVER;
 419                         break;
 420                 case 133: /* move */
 421                         mounttype = MS_MOVE;
 422                         break;
 423                 case 135: /* rbind */
 424                         mounttype = MS_BIND | MS_REC;
 425                         break;
 426                 case 'h':
 427                 default:
 428                         mount_usage();
 429                         exit(1);
 430                 }
 431         }
 432         if (optind != argc-2) {
 433                 /* Extra non-option words at the end... */
 434                 mount_usage();
 435                 exit(1);
 436         }
 437
 438         if (strcmp(progname, "mount.nfs4") == 0)
 439                 nfs_mount_vers = 4;
 440
 441         if (uid != 0) {
 442                 /* don't even think about it unless options exactly
 443                  * match fstab
 444                  */
 445                 struct mntentchn *mc;
 446
 447                 if ((mc = getfsfile(mount_point)) == NULL ||
 448                     strcmp(mc->m.mnt_fsname, spec) != 0 ||
 449                     strcmp(mc->m.mnt_type, (nfs_mount_vers == 4 ? "nfs4":"nfs")) != 0
 450                     ) {
 451                         fprintf(stderr, "%s: permission died - no match for fstab\n",
 452                                 progname);
 453                         exit(1);
 454                 }
 455                 /* 'mount' munges the options from fstab before passing them
 456                  * to us, so it is non-trivial to test that we have the correct
 457                  * set of options and we don't want to trust what the user
 458                  * gave us, so just take whatever is in fstab
 459                  */
 460                 mount_opts = strdup(mc->m.mnt_opts);
 461                 mounttype = 0;
 462         }
 463
 464         mount_point = canonicalize(mount_point);
 465         if (mount_point == NULL ||
 466             mount_point[0] != '/') {
 467                 fprintf(stderr, "%s: unknown mount point %s\n",
 468                         progname, mount_point ? : "");
 469                 exit(1);
 470         }
 471
 472         parse_opts(mount_opts, &flags, &extra_opts);
 473
 474         if (uid != 0) {
 475             if (! (flags & (MS_USERS | MS_USER))) {
 476                     fprintf(stderr, "%s: permission denied\n", progname);
 477                     exit(1);
 478             }
 479         }
 480
 481         if (nfs_mount_vers == 4)
 482                 mnt_err = nfs4mount(spec, mount_point, &flags, &extra_opts, &mount_opts, 0);
 483         else {
 484                 int need_statd = 0;
 485                 mnt_err = nfsmount(spec, mount_point, &flags,
 486                                    &extra_opts, &mount_opts,
 487                                    0, &need_statd);
 488                 if (!mnt_err && !fake && need_statd)
 489                         start_statd();
 490         }
 491
 492         if (mnt_err)
 493                 exit(EX_FAIL);
 494
 495         if (!fake) {
 496                 mnt_err = do_mount_syscall(spec, mount_point,
 497                                            nfs_mount_vers == 4 ? "nfs4" : "nfs",
 498                                            flags & ~(MS_USER|MS_USERS) ,
 499                                            mount_opts);
 500
 501                 if (mnt_err) {
 502                         mount_error(mount_point);
 503                         exit(EX_FAIL);
 504                 }
 505         }
 506
 507         if (!nomtab)
 508                 add_mtab(spec, mount_point,
 509                          nfs_mount_vers == 4 ? "nfs4" : "nfs",
 510                          flags, extra_opts, 0, 0);
 511
 512         return 0;
 513 }
 514