1 /*- 2 * Copyright (c) 1980, 1989, 1993, 1994 3 * The Regents of the University of California. All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 3. Neither the name of the University nor the names of its contributors 14 * may be used to endorse or promote products derived from this software 15 * without specific prior written permission. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 27 * SUCH DAMAGE. 28 * 29 * @(#) Copyright (c) 1980, 1989, 1993, 1994 The Regents of the University of California. All rights reserved. 30 * @(#)mount.c 8.25 (Berkeley) 5/8/95 31 * $FreeBSD: src/sbin/mount/mount.c,v 1.39.2.3 2001/08/01 08:26:23 obrien Exp $ 32 */ 33 34 #include <sys/param.h> 35 #include <sys/mount.h> 36 #include <sys/mountctl.h> 37 #include <sys/stat.h> 38 #include <sys/wait.h> 39 40 #include <err.h> 41 #include <errno.h> 42 #include <fstab.h> 43 #include <pwd.h> 44 #include <signal.h> 45 #include <stdio.h> 46 #include <stdlib.h> 47 #include <string.h> 48 #include <unistd.h> 49 50 #include "extern.h" 51 #include "mntopts.h" 52 #include "pathnames.h" 53 54 /* `meta' options */ 55 #define MOUNT_META_OPTION_FSTAB "fstab" 56 #define MOUNT_META_OPTION_CURRENT "current" 57 58 int debug, fstab_style, verbose; 59 60 static char *catopt(char *, const char *); 61 static struct statfs 62 *getmntpt(const char *); 63 static int hasopt(const char *, const char *); 64 static int ismounted(struct fstab *, struct statfs *, int); 65 static int isremountable(const char *); 66 static void mangle(char *, int *, const char **); 67 static char *update_options(char *, char *, int); 68 static int mountfs(const char *, const char *, const char *, 69 int, const char *, const char *); 70 static void remopt(char *, const char *); 71 static void printdefvals(const struct statfs *); 72 static void prmount(struct statfs *); 73 static void putfsent(const struct statfs *); 74 static void usage(void); 75 static char *flags2opts(int); 76 static char *xstrdup(const char *str); 77 78 /* mount_ufs.c */ 79 int mount_ufs(int, const char **); 80 81 /* 82 * List of VFS types that can be remounted without becoming mounted on top 83 * of each other. 84 * XXX Is this list correct? 85 */ 86 static const char * 87 remountable_fs_names[] = { 88 "ufs", "ffs", "ext2fs", 89 0 90 }; 91 92 int 93 main(int argc, char **argv) 94 { 95 const char *mntfromname, **vfslist, *vfstype; 96 struct fstab *fs; 97 struct statfs *mntbuf; 98 FILE *mountdfp; 99 pid_t pid; 100 int all, ch, i, init_flags, mntsize, rval, have_fstab; 101 char *options; 102 103 all = init_flags = 0; 104 options = NULL; 105 vfslist = NULL; 106 vfstype = "ufs"; 107 while ((ch = getopt(argc, argv, "adF:fo:prwt:uv")) != -1) 108 switch (ch) { 109 case 'a': 110 all = 1; 111 break; 112 case 'd': 113 debug = 1; 114 break; 115 case 'F': 116 setfstab(optarg); 117 break; 118 case 'f': 119 init_flags |= MNT_FORCE; 120 break; 121 case 'o': 122 if (*optarg) 123 options = catopt(options, optarg); 124 break; 125 case 'p': 126 fstab_style = 1; 127 verbose = 1; 128 break; 129 case 'r': 130 options = catopt(options, "ro"); 131 break; 132 case 't': 133 if (vfslist != NULL) 134 errx(1, "only one -t option may be specified"); 135 vfslist = makevfslist(optarg); 136 vfstype = optarg; 137 break; 138 case 'u': 139 init_flags |= MNT_UPDATE; 140 break; 141 case 'v': 142 verbose = 1; 143 break; 144 case 'w': 145 options = catopt(options, "noro"); 146 break; 147 case '?': 148 default: 149 usage(); 150 /* NOTREACHED */ 151 } 152 argc -= optind; 153 argv += optind; 154 155 #define BADTYPE(type) \ 156 (strcmp(type, FSTAB_RO) && \ 157 strcmp(type, FSTAB_RW) && strcmp(type, FSTAB_RQ)) 158 159 rval = 0; 160 switch (argc) { 161 case 0: 162 if ((mntsize = getmntinfo(&mntbuf, MNT_NOWAIT)) == 0) 163 err(1, "getmntinfo"); 164 if (all) { 165 while ((fs = getfsent()) != NULL) { 166 if (BADTYPE(fs->fs_type)) 167 continue; 168 if (checkvfsname(fs->fs_vfstype, vfslist)) 169 continue; 170 if (hasopt(fs->fs_mntops, "noauto")) 171 continue; 172 if (!(init_flags & MNT_UPDATE) && 173 ismounted(fs, mntbuf, mntsize)) 174 continue; 175 options = update_options(options, 176 fs->fs_mntops, mntbuf->f_flags); 177 if (mountfs(fs->fs_vfstype, fs->fs_spec, 178 fs->fs_file, init_flags, options, 179 fs->fs_mntops)) 180 rval = 1; 181 } 182 } else if (fstab_style) { 183 for (i = 0; i < mntsize; i++) { 184 if (checkvfsname(mntbuf[i].f_fstypename, vfslist)) 185 continue; 186 putfsent(&mntbuf[i]); 187 } 188 } else { 189 for (i = 0; i < mntsize; i++) { 190 if (checkvfsname(mntbuf[i].f_fstypename, 191 vfslist)) 192 continue; 193 prmount(&mntbuf[i]); 194 } 195 } 196 exit(rval); 197 case 1: 198 if (vfslist != NULL) 199 usage(); 200 201 rmslashes(*argv, *argv); 202 203 if (init_flags & MNT_UPDATE) { 204 mntfromname = NULL; 205 have_fstab = 0; 206 if ((mntbuf = getmntpt(*argv)) == NULL) 207 errx(1, "not currently mounted %s", *argv); 208 /* 209 * Only get the mntflags from fstab if both mntpoint 210 * and mntspec are identical. Also handle the special 211 * case where just '/' is mounted and 'spec' is not 212 * identical with the one from fstab ('/dev' is missing 213 * in the spec-string at boot-time). 214 */ 215 if ((fs = getfsfile(mntbuf->f_mntonname)) != NULL) { 216 if (strcmp(fs->fs_spec, 217 mntbuf->f_mntfromname) == 0 && 218 strcmp(fs->fs_file, 219 mntbuf->f_mntonname) == 0) { 220 have_fstab = 1; 221 mntfromname = mntbuf->f_mntfromname; 222 } else if (argv[0][0] == '/' && 223 argv[0][1] == '\0') { 224 fs = getfsfile("/"); 225 have_fstab = 1; 226 mntfromname = fs->fs_spec; 227 } 228 } 229 if (have_fstab) { 230 options = update_options(options, fs->fs_mntops, 231 mntbuf->f_flags); 232 } else { 233 mntfromname = mntbuf->f_mntfromname; 234 options = update_options(options, NULL, 235 mntbuf->f_flags); 236 } 237 rval = mountfs(mntbuf->f_fstypename, mntfromname, 238 mntbuf->f_mntonname, init_flags, options, 0); 239 break; 240 } 241 if ((fs = getfsfile(*argv)) == NULL && 242 (fs = getfsspec(*argv)) == NULL) 243 errx(1, "%s: unknown special file or file system", 244 *argv); 245 if (BADTYPE(fs->fs_type)) 246 errx(1, "%s has unknown file system type", 247 *argv); 248 rval = mountfs(fs->fs_vfstype, fs->fs_spec, fs->fs_file, 249 init_flags, options, fs->fs_mntops); 250 break; 251 case 2: 252 /* 253 * If -t flag has not been specified, the path cannot be 254 * found, spec contains either a ':' or a '@', and the 255 * spec is not a file with those characters, then assume 256 * that an NFS filesystem is being specified ala Sun. 257 */ 258 if (vfslist == NULL && strpbrk(argv[0], ":@") != NULL && 259 access(argv[0], 0) == -1) 260 vfstype = "nfs"; 261 rval = mountfs(vfstype, getdevpath(argv[0], 0), argv[1], 262 init_flags, options, NULL); 263 break; 264 default: 265 usage(); 266 /* NOTREACHED */ 267 } 268 269 /* 270 * If the mount was successfully, and done by root, tell mountd the 271 * good news. Pid checks are probably unnecessary, but don't hurt. 272 */ 273 if (rval == 0 && getuid() == 0 && 274 (mountdfp = fopen(_PATH_MOUNTDPID, "r")) != NULL) { 275 if (fscanf(mountdfp, "%d", &pid) == 1 && 276 pid > 0 && kill(pid, SIGHUP) == -1 && errno != ESRCH) 277 err(1, "signal mountd"); 278 fclose(mountdfp); 279 } 280 281 exit(rval); 282 } 283 284 static int 285 ismounted(struct fstab *fs, struct statfs *mntbuf, int mntsize) 286 { 287 int i; 288 289 if (fs->fs_file[0] == '/' && fs->fs_file[1] == '\0') 290 /* the root file system can always be remounted */ 291 return (0); 292 293 for (i = mntsize - 1; i >= 0; --i) 294 if (strcmp(fs->fs_file, mntbuf[i].f_mntonname) == 0 && 295 (!isremountable(fs->fs_vfstype) || 296 strcmp(fs->fs_spec, mntbuf[i].f_mntfromname) == 0)) 297 return (1); 298 return (0); 299 } 300 301 static int 302 isremountable(const char *vfsname) 303 { 304 const char **cp; 305 306 for (cp = remountable_fs_names; *cp; cp++) 307 if (strcmp(*cp, vfsname) == 0) 308 return (1); 309 return (0); 310 } 311 312 static int 313 hasopt(const char *mntopts, const char *option) 314 { 315 int negative, found; 316 char *opt, *optbuf; 317 318 if (option[0] == 'n' && option[1] == 'o') { 319 negative = 1; 320 option += 2; 321 } else 322 negative = 0; 323 optbuf = xstrdup(mntopts); 324 found = 0; 325 for (opt = optbuf; (opt = strtok(opt, ",")) != NULL; opt = NULL) { 326 if (opt[0] == 'n' && opt[1] == 'o') { 327 if (!strcasecmp(opt + 2, option)) 328 found = negative; 329 } else if (!strcasecmp(opt, option)) 330 found = !negative; 331 } 332 free(optbuf); 333 return (found); 334 } 335 336 static int 337 mountfs(const char *vfstype, const char *spec, const char *name, int flags, 338 const char *options, const char *mntopts) 339 { 340 /* List of directories containing mount_xxx subcommands. */ 341 static const char *edirs[] = { 342 _PATH_SBIN, 343 _PATH_USRSBIN, 344 NULL 345 }; 346 const char *argv[100], **edir; 347 struct statfs sf; 348 pid_t pid; 349 int argc, i, status; 350 char *optbuf, execname[MAXPATHLEN + 1], mntpath[MAXPATHLEN]; 351 352 /* resolve the mountpoint with realpath(3) */ 353 checkpath(name, mntpath); 354 name = mntpath; 355 356 if (mntopts == NULL) 357 mntopts = ""; 358 if (options == NULL) { 359 if (*mntopts == '\0') { 360 options = "rw"; 361 } else { 362 options = mntopts; 363 mntopts = ""; 364 } 365 } 366 optbuf = catopt(xstrdup(mntopts), options); 367 368 if (strcmp(name, "/") == 0) 369 flags |= MNT_UPDATE; 370 if (flags & MNT_FORCE) 371 optbuf = catopt(optbuf, "force"); 372 if (flags & MNT_RDONLY) 373 optbuf = catopt(optbuf, "ro"); 374 /* 375 * XXX 376 * The mount_mfs (newfs) command uses -o to select the 377 * optimization mode. We don't pass the default "-o rw" 378 * for that reason. 379 */ 380 if (flags & MNT_UPDATE) 381 optbuf = catopt(optbuf, "update"); 382 383 argc = 0; 384 argv[argc++] = vfstype; 385 mangle(optbuf, &argc, argv); 386 argv[argc++] = spec; 387 argv[argc++] = name; 388 argv[argc] = NULL; 389 390 if (debug) { 391 printf("exec: mount_%s", vfstype); 392 for (i = 1; i < argc; i++) 393 printf(" %s", argv[i]); 394 printf("\n"); 395 return (0); 396 } 397 398 switch (pid = fork()) { 399 case -1: /* Error. */ 400 warn("fork"); 401 free(optbuf); 402 return (1); 403 case 0: /* Child. */ 404 if (strcmp(vfstype, "ufs") == 0) 405 exit(mount_ufs(argc, argv)); 406 407 /* Go find an executable. */ 408 for (edir = edirs; *edir; edir++) { 409 snprintf(execname, 410 sizeof(execname), "%s/mount_%s", *edir, vfstype); 411 execv(execname, __DECONST(char * const *, argv)); 412 } 413 if (errno == ENOENT) { 414 int len = 0; 415 char *cp; 416 for (edir = edirs; *edir; edir++) 417 len += strlen(*edir) + 2; /* ", " */ 418 if ((cp = malloc(len)) == NULL) 419 errx(1, "malloc failed"); 420 cp[0] = '\0'; 421 for (edir = edirs; *edir; edir++) { 422 strcat(cp, *edir); 423 if (edir[1] != NULL) 424 strcat(cp, ", "); 425 } 426 warn("exec mount_%s not found in %s", vfstype, cp); 427 } 428 exit(1); 429 /* NOTREACHED */ 430 default: /* Parent. */ 431 free(optbuf); 432 433 if (waitpid(pid, &status, 0) < 0) { 434 warn("waitpid"); 435 return (1); 436 } 437 438 if (WIFEXITED(status)) { 439 if (WEXITSTATUS(status) != 0) 440 return (WEXITSTATUS(status)); 441 } else if (WIFSIGNALED(status)) { 442 warnx("%s: %s", name, sys_siglist[WTERMSIG(status)]); 443 return (1); 444 } 445 446 if (verbose) { 447 if (statfs(name, &sf) < 0) { 448 warn("statfs %s", name); 449 return (1); 450 } 451 if (fstab_style) 452 putfsent(&sf); 453 else 454 prmount(&sf); 455 } 456 break; 457 } 458 459 return (0); 460 } 461 462 static void 463 prmount(struct statfs *sfp) 464 { 465 struct passwd *pw; 466 char *buf; 467 int error; 468 int len; 469 470 error = 0; 471 len = 256; 472 473 if ((buf = malloc(len)) == NULL) 474 errx(1, "malloc failed"); 475 476 printf("%s on %s (%s", sfp->f_mntfromname, sfp->f_mntonname, 477 sfp->f_fstypename); 478 479 /* Get a string buffer with all the used flags names */ 480 error = mountctl(sfp->f_mntonname, MOUNTCTL_MOUNTFLAGS, 481 -1, NULL, 0, buf, len); 482 483 if (sfp->f_owner) { 484 printf(", mounted by "); 485 if ((pw = getpwuid(sfp->f_owner)) != NULL) 486 printf("%s", pw->pw_name); 487 else 488 printf("%d", sfp->f_owner); 489 } 490 491 if (error != -1 && strlen(buf)) 492 printf(", %s", buf); 493 494 if (verbose) { 495 if (sfp->f_syncwrites != 0 || sfp->f_asyncwrites != 0) 496 printf(", writes: sync %ld async %ld", 497 sfp->f_syncwrites, sfp->f_asyncwrites); 498 if (sfp->f_syncreads != 0 || sfp->f_asyncreads != 0) 499 printf(", reads: sync %ld async %ld", 500 sfp->f_syncreads, sfp->f_asyncreads); 501 } 502 printf(")\n"); 503 } 504 505 static struct statfs * 506 getmntpt(const char *name) 507 { 508 struct statfs *mntbuf; 509 int i, mntsize; 510 511 mntsize = getmntinfo(&mntbuf, MNT_NOWAIT); 512 for (i = mntsize - 1; i >= 0; i--) { 513 if (strcmp(mntbuf[i].f_mntfromname, name) == 0 || 514 strcmp(mntbuf[i].f_mntonname, name) == 0) 515 return (&mntbuf[i]); 516 } 517 return (NULL); 518 } 519 520 static char * 521 catopt(char *s0, const char *s1) 522 { 523 size_t i; 524 char *cp; 525 526 if (s1 == NULL || *s1 == '\0') 527 return s0; 528 529 if (s0 && *s0) { 530 i = strlen(s0) + strlen(s1) + 1 + 1; 531 if ((cp = malloc(i)) == NULL) 532 errx(1, "malloc failed"); 533 snprintf(cp, i, "%s,%s", s0, s1); 534 } else 535 cp = xstrdup(s1); 536 537 if (s0) 538 free(s0); 539 return (cp); 540 } 541 542 static void 543 mangle(char *options, int *argcp, const char **argv) 544 { 545 char *p, *s; 546 int argc; 547 548 argc = *argcp; 549 for (s = options; (p = strsep(&s, ",")) != NULL;) 550 if (*p != '\0') { 551 if (*p == '-') { 552 argv[argc++] = p; 553 p = strchr(p, '='); 554 if (p) { 555 *p = '\0'; 556 argv[argc++] = p+1; 557 } 558 } else if (strcmp(p, "rw") != 0) { 559 argv[argc++] = "-o"; 560 argv[argc++] = p; 561 } 562 } 563 564 *argcp = argc; 565 } 566 567 568 static char * 569 update_options(char *opts, char *fstab, int curflags) 570 { 571 char *o, *p; 572 char *cur; 573 char *expopt, *newopt, *tmpopt; 574 575 if (opts == NULL) 576 return xstrdup(""); 577 578 /* remove meta options from list */ 579 remopt(fstab, MOUNT_META_OPTION_FSTAB); 580 remopt(fstab, MOUNT_META_OPTION_CURRENT); 581 cur = flags2opts(curflags); 582 583 /* 584 * Expand all meta-options passed to us first. 585 */ 586 expopt = NULL; 587 for (p = opts; (o = strsep(&p, ",")) != NULL;) { 588 if (strcmp(MOUNT_META_OPTION_FSTAB, o) == 0) 589 expopt = catopt(expopt, fstab); 590 else if (strcmp(MOUNT_META_OPTION_CURRENT, o) == 0) 591 expopt = catopt(expopt, cur); 592 else 593 expopt = catopt(expopt, o); 594 } 595 free(cur); 596 free(opts); 597 598 /* 599 * Remove previous contradictory arguments. Given option "foo" we 600 * remove all the "nofoo" options. Given "nofoo" we remove "nonofoo" 601 * and "foo" - so we can deal with possible options like "notice". 602 */ 603 newopt = NULL; 604 for (p = expopt; (o = strsep(&p, ",")) != NULL;) { 605 if ((tmpopt = malloc( strlen(o) + 2 + 1 )) == NULL) 606 errx(1, "malloc failed"); 607 608 strcpy(tmpopt, "no"); 609 strcat(tmpopt, o); 610 remopt(newopt, tmpopt); 611 free(tmpopt); 612 613 if (strncmp("no", o, 2) == 0) 614 remopt(newopt, o+2); 615 616 newopt = catopt(newopt, o); 617 } 618 free(expopt); 619 620 return newopt; 621 } 622 623 static void 624 remopt(char *string, const char *opt) 625 { 626 char *o, *p, *r; 627 628 if (string == NULL || *string == '\0' || opt == NULL || *opt == '\0') 629 return; 630 631 r = string; 632 633 for (p = string; (o = strsep(&p, ",")) != NULL;) { 634 if (strcmp(opt, o) != 0) { 635 if (*r == ',' && *o != '\0') 636 r++; 637 while ((*r++ = *o++) != '\0') 638 ; 639 *--r = ','; 640 } 641 } 642 *r = '\0'; 643 } 644 645 static void 646 usage(void) 647 { 648 649 fprintf(stderr, "%s\n%s\n%s\n", 650 "usage: mount [-adfpruvw] [-F fstab] [-o options] [-t type]", 651 " mount [-dfpruvw] {special | node}", 652 " mount [-dfpruvw] [-o options] [-t type] special node"); 653 exit(1); 654 } 655 656 /* 657 * Prints the default values for dump frequency and pass number of fsck. 658 * This happens when mount(8) is called with -p and there is no fstab file 659 * or there is but the values aren't specified. 660 */ 661 static void 662 printdefvals(const struct statfs *ent) 663 { 664 if (strcmp(ent->f_fstypename, "ufs") == 0) { 665 if (strcmp(ent->f_mntonname, "/") == 0) 666 printf("\t1 1\n"); 667 else 668 printf("\t2 2\n"); 669 } else { 670 printf("\t0 0\n"); 671 } 672 } 673 674 static void 675 putfsent(const struct statfs *ent) 676 { 677 struct stat sb; 678 struct fstab *fst; 679 char *opts; 680 681 opts = flags2opts(ent->f_flags); 682 printf("%s\t%s\t%s %s", ent->f_mntfromname, ent->f_mntonname, 683 ent->f_fstypename, opts); 684 free(opts); 685 686 /* 687 * If fstab file is missing don't call getfsspec() or getfsfile() 688 * at all, because the same warning will be printed twice for every 689 * mounted filesystem. 690 */ 691 if (stat(_PATH_FSTAB, &sb) != -1) { 692 if ((fst = getfsspec(ent->f_mntfromname))) 693 printf("\t%u %u\n", fst->fs_freq, fst->fs_passno); 694 else if ((fst = getfsfile(ent->f_mntonname))) 695 printf("\t%u %u\n", fst->fs_freq, fst->fs_passno); 696 else 697 printdefvals(ent); 698 } else { 699 printdefvals(ent); 700 } 701 } 702 703 704 static char * 705 flags2opts(int flags) 706 { 707 char *res; 708 709 res = NULL; 710 711 res = catopt(res, (flags & MNT_RDONLY) ? "ro" : "rw"); 712 713 if (flags & MNT_SYNCHRONOUS) res = catopt(res, "sync"); 714 if (flags & MNT_NOEXEC) res = catopt(res, "noexec"); 715 if (flags & MNT_NOSUID) res = catopt(res, "nosuid"); 716 if (flags & MNT_NODEV) res = catopt(res, "nodev"); 717 if (flags & MNT_ASYNC) res = catopt(res, "async"); 718 if (flags & MNT_NOATIME) res = catopt(res, "noatime"); 719 if (flags & MNT_NOCLUSTERR) res = catopt(res, "noclusterr"); 720 if (flags & MNT_NOCLUSTERW) res = catopt(res, "noclusterw"); 721 if (flags & MNT_NOSYMFOLLOW) res = catopt(res, "nosymfollow"); 722 if (flags & MNT_SUIDDIR) res = catopt(res, "suiddir"); 723 if (flags & MNT_IGNORE) res = catopt(res, "ignore"); 724 725 return res; 726 } 727 728 static char* 729 xstrdup(const char *str) 730 { 731 char* ret = strdup(str); 732 if(ret == NULL) { 733 errx(1, "strdup failed (could not allocate memory)"); 734 } 735 return ret; 736 } 737