only do name lookup for nfs filesystems
[unix-history] / usr / src / sbin / umount / umount.c
index 2df186c..25b7eb2 100644 (file)
@@ -1,92 +1,87 @@
 /*-
 /*-
- * Copyright (c) 1980, 1989 The Regents of the University of California.
- * All rights reserved.
+ * Copyright (c) 1980, 1989, 1993
+ *     The Regents of the University of California.  All rights reserved.
  *
  * %sccs.include.redist.c%
  */
 
 #ifndef lint
  *
  * %sccs.include.redist.c%
  */
 
 #ifndef lint
-char copyright[] =
-"@(#) Copyright (c) 1980, 1989 The Regents of the University of California.\n\
- All rights reserved.\n";
+static char copyright[] =
+"@(#) Copyright (c) 1980, 1989, 1993\n\
      The Regents of the University of California.  All rights reserved.\n";
 #endif /* not lint */
 
 #ifndef lint
 #endif /* not lint */
 
 #ifndef lint
-static char sccsid[] = "@(#)umount.c   5.18 (Berkeley) %G%";
+static char sccsid[] = "@(#)umount.c   8.6 (Berkeley) %G%";
 #endif /* not lint */
 
 #include <sys/param.h>
 #include <sys/stat.h>
 #include <sys/mount.h>
 #endif /* not lint */
 
 #include <sys/param.h>
 #include <sys/stat.h>
 #include <sys/mount.h>
-
-#ifdef NFS
 #include <sys/time.h>
 #include <sys/socket.h>
 #include <sys/socketvar.h>
 #include <sys/time.h>
 #include <sys/socket.h>
 #include <sys/socketvar.h>
+
 #include <netdb.h>
 #include <rpc/rpc.h>
 #include <rpc/pmap_clnt.h>
 #include <rpc/pmap_prot.h>
 #include <nfs/rpcv2.h>
 #include <netdb.h>
 #include <rpc/rpc.h>
 #include <rpc/pmap_clnt.h>
 #include <rpc/pmap_prot.h>
 #include <nfs/rpcv2.h>
-#endif
 
 
+#include <err.h>
 #include <fstab.h>
 #include <stdio.h>
 #include <fstab.h>
 #include <stdio.h>
+#include <stdlib.h>
 #include <string.h>
 #include <string.h>
+#include <unistd.h>
 
 
-#ifdef NFS
-int xdr_dir();
-char *nfshost;
-#endif
-
-int    vflag, all, errs, fake;
-int    fflag = 0;
-char   *getmntname();
+typedef enum { MNTON, MNTFROM } mntwhat;
 
 
-#define        MNTON   1
-#define        MNTFROM 2
-#define        MNTTYPE 3
+int    fake, fflag, vflag, *typelist;
+char   *nfshost;
 
 
-int *typelist, *maketypelist();
-
-char *namelist[] = INITMOUNTNAMES;
+int     fsnametotype __P((char *));
+char   *getmntname __P((char *, mntwhat, int *));
+void    maketypelist __P((char *));
+int     selected __P((int));
+int     namematch __P((struct hostent *));
+int     umountall __P((void));
+int     umountfs __P((char *));
+void    usage __P((void));
+int     xdr_dir __P((XDR *, char *));
 
 
+int
 main(argc, argv)
        int argc;
 main(argc, argv)
        int argc;
-       char **argv;
+       char *argv[];
 {
 {
-       extern char *optarg;
-       extern int optind;
-       int ch;
+       int all, ch, errs;
 
 
+       /* Start disks transferring immediately. */
        sync();
        sync();
-       while ((ch = getopt(argc, argv, "afFh:t:v")) != EOF)
-               switch((char)ch) {
-               case 'v':
-                       vflag++;
+
+       all = 0;
+       while ((ch = getopt(argc, argv, "aFfh:t:v")) != EOF)
+               switch (ch) {
+               case 'a':
+                       all = 1;
+                       break;
+               case 'F':
+                       fake = 1;
                        break;
                case 'f':
                        fflag = MNT_FORCE;
                        break;
                        break;
                case 'f':
                        fflag = MNT_FORCE;
                        break;
-               case 'F':
-                       fake++;
-                       break;
-               case 'a':
-                       all++;
+               case 'h':       /* -h implies -a. */
+                       all = 1;
+                       nfshost = optarg;
                        break;
                case 't':
                        break;
                case 't':
-                       typelist = maketypelist(optarg);
+                       maketypelist(optarg);
                        break;
                        break;
-#ifdef NFS
-               case 'h':
-                       /* -h flag implies -a, and "-t nfs" if no -t flag */
-                       nfshost = optarg;
-                       all++;
-                       if (typelist == NULL)
-                               typelist = maketypelist("nfs");
+               case 'v':
+                       vflag = 1;
                        break;
                        break;
-#endif /* NFS */
-               case '?':
                default:
                        usage();
                        /* NOTREACHED */
                default:
                        usage();
                        /* NOTREACHED */
@@ -94,154 +89,158 @@ main(argc, argv)
        argc -= optind;
        argv += optind;
 
        argc -= optind;
        argv += optind;
 
-       if (argc == 0 && !all)
+       if (argc == 0 && !all || argc != 0 && all)
                usage();
                usage();
+
+       /* -h implies "-t nfs" if no -t flag. */
+       if ((nfshost != NULL) && (typelist == NULL))
+               maketypelist("nfs");
+               
        if (all) {
        if (all) {
-               if (argc > 0)
-                       usage();
                if (setfsent() == 0)
                if (setfsent() == 0)
-                       perror(FSTAB), exit(1);
-               umountall(typelist);
-               exit(0);
+                       err(1, "%s", _PATH_FSTAB);
+               errs = umountall();
        } else
        } else
-               setfsent();
-       while (argc > 0) {
-               if (umountfs(*argv++, 0) == 0)
-                       errs++;
-               argc--;
-       }
+               for (errs = 0; *argv != NULL; ++argv)
+                       if (umountfs(*argv) != 0)
+                               errs = 1;
        exit(errs);
 }
 
        exit(errs);
 }
 
-usage()
-{
-       fprintf(stderr,
-               "%s\n%s\n",
-               "Usage: umount [-fv] special | node",
-#ifndef        NFS
-               "    or umount -a[fv] [-t fstypelist]"
-#else
-               "    or umount -a[fv] [-h host] [-t fstypelist]"
-#endif
-             );
-       exit(1);
-}
-
-umountall(typelist)
-       char **typelist;
+int
+umountall()
 {
 {
-       register struct fstab *fs;
+       struct fstab *fs;
+       int rval, type;
        char *cp;
 
        char *cp;
 
-       while (fs = getfsent()) {
-               if (badtype(fsnametotype(fs->fs_vfstype), typelist))
-                       continue;
+       while ((fs = getfsent()) != NULL) {
+               /* Ignore the root. */
                if (strcmp(fs->fs_file, "/") == 0)
                        continue;
                if (strcmp(fs->fs_file, "/") == 0)
                        continue;
+               /*
+                * !!!
+                * Historic practice: ignore unknown FSTAB_* fields.
+                */
                if (strcmp(fs->fs_type, FSTAB_RW) &&
                    strcmp(fs->fs_type, FSTAB_RO) &&
                    strcmp(fs->fs_type, FSTAB_RQ))
                        continue;
                if (strcmp(fs->fs_type, FSTAB_RW) &&
                    strcmp(fs->fs_type, FSTAB_RO) &&
                    strcmp(fs->fs_type, FSTAB_RQ))
                        continue;
-               cp = (char *)malloc((unsigned)strlen(fs->fs_file) + 1);
-               if (cp == NULL) {
-                       fprintf(stderr, "Out of memory.\n");
-                       exit(2);
+               /* If an unknown file system type, complain. */
+               if ((type = fsnametotype(fs->fs_vfstype)) == MOUNT_NONE) {
+                       warnx("%s: unknown mount type", fs->fs_vfstype);
+                       continue;
                }
                }
-               strcpy(cp, fs->fs_file);
-               umountall(typelist);
-               break;
-       }
-       if (fs) {
-               (void) umountfs(cp, typelist);
-               free(cp);
+               if (!selected(type))
+                       continue;
+
+               /* 
+                * We want to unmount the file systems in the reverse order
+                * that they were mounted.  So, we save off the file name
+                * in some allocated memory, and then call recursively.
+                */
+               if ((cp = malloc((size_t)strlen(fs->fs_file) + 1)) == NULL)
+                       err(1, NULL);
+               (void)strcpy(cp, fs->fs_file);
+               rval = umountall();
+               return (umountfs(cp) || rval);
        }
        }
+       return (0);
 }
 
 }
 
-umountfs(name, typelist)
+int
+umountfs(name)
        char *name;
        char *name;
-       int *typelist;
 {
 {
-       char *mntpt;
-       struct stat stbuf;
-       int type;
-#ifdef NFS
-       register CLIENT *clp;
-       struct hostent *hp = 0;
+       enum clnt_stat clnt_stat;
+       struct hostent *hp;
        struct sockaddr_in saddr;
        struct sockaddr_in saddr;
+       struct stat sb;
        struct timeval pertry, try;
        struct timeval pertry, try;
-       enum clnt_stat clnt_stat;
-       int so = RPC_ANYSOCK;
-       char *hostp, *delimp;
-#endif /* NFS */
-
-       if (stat(name, &stbuf) < 0) {
-               if (getmntname(name, MNTFROM, &type) != 0)
-                       mntpt = name;
-               else if ((mntpt = getmntname(name, MNTON, &type)) == 0) {
-                       fprintf(stderr, "%s: not currently mounted\n", name);
-                       return (0);
+       CLIENT *clp;
+       int so, type;
+       char *delimp, *hostp, *mntpt, rname[MAXPATHLEN];
+
+       if (realpath(name, rname) == NULL) {
+               warn("%s", rname);
+               return (1);
+       }
+
+       name = rname;
+
+       if (stat(name, &sb) < 0) {
+               if (((mntpt = getmntname(name, MNTFROM, &type)) == NULL) &&
+                   ((mntpt = getmntname(name, MNTON, &type)) == NULL)) {
+                       warnx("%s: not currently mounted", name);
+                       return (1);
                }
                }
-       } else if ((stbuf.st_mode & S_IFMT) == S_IFBLK) {
-               if ((mntpt = getmntname(name, MNTON, &type)) == 0) {
-                       fprintf(stderr, "%s: not currently mounted\n", name);
-                       return (0);
+       } else if (S_ISBLK(sb.st_mode)) {
+               if ((mntpt = getmntname(name, MNTON, &type)) == NULL) {
+                       warnx("%s: not currently mounted", name);
+                       return (1);
                }
                }
-       } else if ((stbuf.st_mode & S_IFMT) == S_IFDIR) {
+       } else if (S_ISDIR(sb.st_mode)) {
                mntpt = name;
                mntpt = name;
-               if (getmntname(mntpt, MNTFROM, &type) == 0) {
-                       fprintf(stderr, "%s: not currently mounted\n", name);
-                       return (0);
+               if ((name = getmntname(mntpt, MNTFROM, &type)) == NULL) {
+                       warnx("%s: not currently mounted", mntpt);
+                       return (1);
                }
        } else {
                }
        } else {
-               fprintf(stderr, "%s: not a directory or special device\n",
-                       name);
-               return (0);
+               warnx("%s: not a directory or special device", name);
+               return (1);
        }
 
        }
 
-       if (badtype(type, typelist))
-               return(1);
-#ifdef NFS
-       if ((delimp = index(name, '@')) != NULL) {
-               hostp = delimp + 1;
-               *delimp = '\0';
-               hp = gethostbyname(hostp);
-               *delimp = '@';
-       } else if ((delimp = index(name, ':')) != NULL) {
-               *delimp = '\0';
-               hostp = name;
-               hp = gethostbyname(hostp);
-               name = delimp+1;
-               *delimp = ':';
+       if (!selected(type))
+               return (1);
+
+       hp = NULL;
+       if (type == MOUNT_NFS) {
+               if ((delimp = strchr(name, '@')) != NULL) {
+                       hostp = delimp + 1;
+                       *delimp = '\0';
+                       hp = gethostbyname(hostp);
+                       *delimp = '@';
+               } else if ((delimp = strchr(name, ':')) != NULL) {
+                       *delimp = '\0';
+                       hostp = name;
+                       hp = gethostbyname(hostp);
+                       name = delimp + 1;
+                       *delimp = ':';
+               }
        }
 
        }
 
-       if (!namematch(hp, nfshost))
-               return(1);
-#endif /* NFS */
-       if (!fake && unmount(mntpt, fflag) < 0) {
-               perror(mntpt);
+       if (!namematch(hp))
+               return (1);
+
+       if (vflag)
+               (void)printf("%s: unmount from %s\n", name, mntpt);
+       if (fake)
                return (0);
                return (0);
+
+       if (unmount(mntpt, fflag) < 0) {
+               warn("%s", mntpt);
+               return (1);
        }
        }
-       if (vflag)
-               fprintf(stderr, "%s: Unmounted from %s\n", name, mntpt);
 
 
-#ifdef NFS
-       if (!fake && hp != NULL && (fflag & MNT_FORCE) == 0) {
+       if ((hp != NULL) && !(fflag & MNT_FORCE)) {
                *delimp = '\0';
                *delimp = '\0';
-               bcopy(hp->h_addr,(caddr_t)&saddr.sin_addr,hp->h_length);
+               memset(&saddr, 0, sizeof(saddr));
                saddr.sin_family = AF_INET;
                saddr.sin_port = 0;
                saddr.sin_family = AF_INET;
                saddr.sin_port = 0;
+               memmove(&saddr.sin_addr, hp->h_addr, hp->h_length);
                pertry.tv_sec = 3;
                pertry.tv_usec = 0;
                pertry.tv_sec = 3;
                pertry.tv_usec = 0;
-               if ((clp = clntudp_create(&saddr, RPCPROG_MNT, RPCMNT_VER1,
-                   pertry, &so)) == NULL) {
+               so = RPC_ANYSOCK;
+               if ((clp = clntudp_create(&saddr,
+                   RPCPROG_MNT, RPCMNT_VER1, pertry, &so)) == NULL) {
                        clnt_pcreateerror("Cannot MNT PRC");
                        return (1);
                }
                clp->cl_auth = authunix_create_default();
                try.tv_sec = 20;
                try.tv_usec = 0;
                        clnt_pcreateerror("Cannot MNT PRC");
                        return (1);
                }
                clp->cl_auth = authunix_create_default();
                try.tv_sec = 20;
                try.tv_usec = 0;
-               clnt_stat = clnt_call(clp, RPCMNT_UMOUNT, xdr_dir, name,
-                       xdr_void, (caddr_t)0, try);
+               clnt_stat = clnt_call(clp,
+                   RPCMNT_UMOUNT, xdr_dir, name, xdr_void, (caddr_t)0, try);
                if (clnt_stat != RPC_SUCCESS) {
                        clnt_perror(clp, "Bad MNT RPC");
                        return (1);
                if (clnt_stat != RPC_SUCCESS) {
                        clnt_perror(clp, "Bad MNT RPC");
                        return (1);
@@ -249,130 +248,153 @@ umountfs(name, typelist)
                auth_destroy(clp->cl_auth);
                clnt_destroy(clp);
        }
                auth_destroy(clp->cl_auth);
                clnt_destroy(clp);
        }
-#endif /* NFS */
-       return (1);
+       return (0);
 }
 
 char *
 getmntname(name, what, type)
        char *name;
 }
 
 char *
 getmntname(name, what, type)
        char *name;
-       int what;
+       mntwhat what;
        int *type;
 {
        int *type;
 {
-       int mntsize, i;
        struct statfs *mntbuf;
        struct statfs *mntbuf;
+       int i, mntsize;
 
        if ((mntsize = getmntinfo(&mntbuf, MNT_NOWAIT)) == 0) {
 
        if ((mntsize = getmntinfo(&mntbuf, MNT_NOWAIT)) == 0) {
-               perror("umount");
-               return (0);
+               warn("getmntinfo");
+               return (NULL);
        }
        for (i = 0; i < mntsize; i++) {
        }
        for (i = 0; i < mntsize; i++) {
-               if (what == MNTON && !strcmp(mntbuf[i].f_mntfromname, name)) {
+               if ((what == MNTON) && !strcmp(mntbuf[i].f_mntfromname, name)) {
                        if (type)
                                *type = mntbuf[i].f_type;
                        return (mntbuf[i].f_mntonname);
                }
                        if (type)
                                *type = mntbuf[i].f_type;
                        return (mntbuf[i].f_mntonname);
                }
-               if (what == MNTFROM && !strcmp(mntbuf[i].f_mntonname, name)) {
+               if ((what == MNTFROM) && !strcmp(mntbuf[i].f_mntonname, name)) {
                        if (type)
                                *type = mntbuf[i].f_type;
                        return (mntbuf[i].f_mntfromname);
                }
        }
                        if (type)
                                *type = mntbuf[i].f_type;
                        return (mntbuf[i].f_mntfromname);
                }
        }
-       return (0);
+       return (NULL);
 }
 
 }
 
-static int skipvfs;
+static enum { IN_LIST, NOT_IN_LIST } which;
 
 
-badtype(type, typelist)
+int
+selected(type)
        int type;
        int type;
-       int *typelist;
 {
 {
-       if (typelist == 0)
-               return(0);
-       while (*typelist) {
+       int *av;
+
+       /* If no type specified, it's always selected. */
+       if (typelist == NULL)
+               return (1);
+       for (av = typelist; *av != NULL; ++av)
                if (type == *typelist)
                if (type == *typelist)
-                       return(skipvfs);
-               typelist++;
-       }
-       return(!skipvfs);
+                       return (which == IN_LIST ? 1 : 0);
+       return (which == IN_LIST ? 0 : 1);
 }
 
 }
 
-int *
+void
 maketypelist(fslist)
        char *fslist;
 {
 maketypelist(fslist)
        char *fslist;
 {
-       register char *nextcp;
-       register int *av, i;
+       int *av, i;
+       char *nextcp;
+
+       if ((fslist == NULL) || (fslist[0] == '\0'))
+               errx(1, "empty type list");
 
 
-       if (fslist == NULL)
-               return(NULL);
+       /*
+        * XXX
+        * Note: the syntax is "noxxx,yyy" for no xxx's and
+        * no yyy's, not the more intuitive "noyyy,noyyy".
+        */
        if (fslist[0] == 'n' && fslist[1] == 'o') {
                fslist += 2;
        if (fslist[0] == 'n' && fslist[1] == 'o') {
                fslist += 2;
-               skipvfs = 1;
+               which = NOT_IN_LIST;
        } else
        } else
-               skipvfs = 0;
-       for (i = 0, nextcp = fslist; *nextcp; nextcp++)
+               which = IN_LIST;
+
+       /* Count the number of types. */
+       for (i = 0, nextcp = fslist; *nextcp != NULL; ++nextcp)
                if (*nextcp == ',')
                        i++;
                if (*nextcp == ',')
                        i++;
-       av = (int *)malloc((i+2) * sizeof(int));
-       if (av == NULL)
-               return(NULL);
-       for (i = 0; fslist; fslist = nextcp) {
-               if (nextcp = index(fslist, ','))
+
+       /* Build an array of that many types. */
+       if ((av = typelist = malloc((i + 2) * sizeof(int))) == NULL)
+               err(1, NULL);
+       for (i = 0; fslist != NULL; fslist = nextcp, ++i) {
+               if ((nextcp = strchr(fslist, ',')) != NULL)
                        *nextcp++ = '\0';
                        *nextcp++ = '\0';
-               av[i++] = fsnametotype(fslist);
+               av[i] = fsnametotype(fslist);
+               if (av[i] == MOUNT_NONE)
+                       errx(1, "%s: unknown mount type", fslist);
        }
        }
-       av[i++] = 0;
-       return(av);
+       /* Terminate the array. */
+       av[i++] = MOUNT_NONE;
 }
 
 }
 
+int
 fsnametotype(name)
        char *name;
 {
 fsnametotype(name)
        char *name;
 {
-       char **cp;
+       static char const *namelist[] = INITMOUNTNAMES;
+       char const **cp;
 
 
-       for (cp = namelist; *cp; cp++)
+       for (cp = namelist; *cp; ++cp)
                if (strcmp(name, *cp) == 0)
                        return (cp - namelist);
        return (MOUNT_NONE);
 }
 
                if (strcmp(name, *cp) == 0)
                        return (cp - namelist);
        return (MOUNT_NONE);
 }
 
-#ifdef NFS
-namematch(hp, nfshost)
+int
+namematch(hp)
        struct hostent *hp;
        struct hostent *hp;
-       char *nfshost;
 {
 {
-       register char *cp;
-       register char **np;
+       char *cp, **np;
+
+       if ((hp == NULL) || (nfshost == NULL))
+               return (1);
 
 
-       if (hp == NULL || nfshost == NULL)
-               return(1);
        if (strcasecmp(nfshost, hp->h_name) == 0)
        if (strcasecmp(nfshost, hp->h_name) == 0)
-               return(1);
-       if (cp = index(hp->h_name, '.')) {
+               return (1);
+
+       if ((cp = strchr(hp->h_name, '.')) != NULL) {
                *cp = '\0';
                if (strcasecmp(nfshost, hp->h_name) == 0)
                *cp = '\0';
                if (strcasecmp(nfshost, hp->h_name) == 0)
-                       return(1);
+                       return (1);
        }
        for (np = hp->h_aliases; *np; np++) {
                if (strcasecmp(nfshost, *np) == 0)
        }
        for (np = hp->h_aliases; *np; np++) {
                if (strcasecmp(nfshost, *np) == 0)
-                       return(1);
-               if (cp = index(*np, '.')) {
+                       return (1);
+               if ((cp = strchr(*np, '.')) != NULL) {
                        *cp = '\0';
                        if (strcasecmp(nfshost, *np) == 0)
                        *cp = '\0';
                        if (strcasecmp(nfshost, *np) == 0)
-                               return(1);
+                               return (1);
                }
        }
                }
        }
-       return(0);
+       return (0);
 }
 
 /*
  * xdr routines for mount rpc's
  */
 }
 
 /*
  * xdr routines for mount rpc's
  */
+int
 xdr_dir(xdrsp, dirp)
        XDR *xdrsp;
        char *dirp;
 {
        return (xdr_string(xdrsp, &dirp, RPCMNT_PATHLEN));
 }
 xdr_dir(xdrsp, dirp)
        XDR *xdrsp;
        char *dirp;
 {
        return (xdr_string(xdrsp, &dirp, RPCMNT_PATHLEN));
 }
-#endif /* NFS */
+
+void
+usage()
+{
+       (void)fprintf(stderr,
+           "usage: %s\n       %s\n",
+           "umount [-fv] [-t fstypelist] special | node",
+           "umount -a[fv] [-h host] [-t fstypelist]");
+       exit(1);
+}