lib/libutil/getmntopts.c

   1 /*-
   2  * Copyright (c) 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  * @(#)getmntopts.c     8.3 (Berkeley) 3/29/95
  30  * $FreeBSD: src/sbin/mount/getmntopts.c,v 1.9 1999/10/09 11:54:06 phk Exp $
  31  */
  32
  33 #include <sys/param.h>
  34 #include <sys/stat.h>
  35
  36 #include <err.h>
  37 #include <errno.h>
  38 #include <mntopts.h>
  39 #include <stdlib.h>
  40 #include <string.h>
  41 #include <sysexits.h>
  42
  43 int getmnt_silent = 0;
  44
  45 void
  46 getmntopts(const char *options, const struct mntopt *m0, int *flagp,
  47            int *altflagp)
  48 {
  49         const struct mntopt *m;
  50         int negative;
  51         char *opt, *optbuf, *p;
  52         int *thisflagp;
  53
  54         /* Copy option string, since it is about to be torn asunder... */
  55         if ((optbuf = strdup(options)) == NULL)
  56                 err(1, NULL);
  57
  58         for (opt = optbuf; (opt = strtok(opt, ",")) != NULL; opt = NULL) {
  59                 /* Check for "no" prefix. */
  60                 if (opt[0] == 'n' && opt[1] == 'o') {
  61                         negative = 1;
  62                         opt += 2;
  63                 } else
  64                         negative = 0;
  65
  66                 /*
  67                  * for options with assignments in them (ie. quotas)
  68                  * ignore the assignment as it's handled elsewhere
  69                  */
  70                 p = strchr(opt, '=');
  71                 if (p)
  72                          *++p = '\0';
  73
  74                 /* Scan option table. */
  75                 for (m = m0; m->m_option != NULL; ++m) {
  76                         if (strcasecmp(opt, m->m_option) == 0)
  77                                 break;
  78                 }
  79
  80                 /* Save flag, or fail if option is not recognized. */
  81                 if (m->m_option) {
  82                         thisflagp = m->m_altloc ? altflagp : flagp;
  83                         if (negative == m->m_inverse)
  84                                 *thisflagp |= m->m_flag;
  85                         else
  86                                 *thisflagp &= ~m->m_flag;
  87                 } else if (!getmnt_silent) {
  88                         errx(1, "-o %s: option not supported", opt);
  89                 }
  90         }
  91
  92         free(optbuf);
  93 }
  94
  95 void
  96 rmslashes(char *rrpin, char *rrpout)
  97 {
  98         char *rrpoutstart;
  99
 100         *rrpout = *rrpin;
 101         for (rrpoutstart = rrpout; *rrpin != '\0'; *rrpout++ = *rrpin++) {
 102
 103                 /* skip all double slashes */
 104                 while (*rrpin == '/' && *(rrpin + 1) == '/')
 105                          rrpin++;
 106         }
 107
 108         /* remove trailing slash if necessary */
 109         if (rrpout - rrpoutstart > 1 && *(rrpout - 1) == '/')
 110                 *(rrpout - 1) = '\0';
 111         else
 112                 *rrpout = '\0';
 113 }
 114
 115 void
 116 checkpath(const char *path, char *resolved)
 117 {
 118         struct stat sb;
 119
 120         if (realpath(path, resolved) != NULL && stat(resolved, &sb) == 0) {
 121                 if (!S_ISDIR(sb.st_mode))
 122                         errx(EX_USAGE, "%s: not a directory", resolved);
 123         } else
 124                 errx(EX_USAGE, "%s: %s", resolved, strerror(errno));
 125 }