usr.sbin/fssconfig/fssconfig.c

   1 /*      $NetBSD: fssconfig.c,v 1.5 2005/04/17 16:28:26 hannken Exp $    */
   2
   3 /*-
   4  * Copyright (c) 2003 The NetBSD Foundation, Inc.
   5  * All rights reserved.
   6  *
   7  * This code is derived from software contributed to The NetBSD Foundation
   8  * by Juergen Hannken-Illjes.
   9  *
  10  * Redistribution and use in source and binary forms, with or without
  11  * modification, are permitted provided that the following conditions
  12  * are met:
  13  * 1. Redistributions of source code must retain the above copyright
  14  *    notice, this list of conditions and the following disclaimer.
  15  * 2. Redistributions in binary form must reproduce the above copyright
  16  *    notice, this list of conditions and the following disclaimer in the
  17  *    documentation and/or other materials provided with the distribution.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
  20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
  23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  29  * POSSIBILITY OF SUCH DAMAGE.
  30  */
  31
  32 #include <sys/param.h>
  33 #include <sys/ioctl.h>
  34 #include <sys/mount.h>
  35 #include <sys/stat.h>
  36
  37 #include <err.h>
  38 #include <errno.h>
  39 #include <fcntl.h>
  40 #include <stdlib.h>
  41 #include <string.h>
  42 #include <time.h>
  43 #include <unistd.h>
  44 #include <util.h>
  45
  46 #include <dev/fssvar.h>
  47
  48 int     vflag = 0;
  49 int     xflag = 0;
  50
  51 void    config(int, char **);
  52 void    unconfig(int, char **);
  53 void    list(int, char **);
  54 void    usage(void);
  55
  56 int
  57 main(int argc, char **argv)
  58 {
  59         int ch;
  60         void (*action)(int, char **);
  61
  62         action = config;
  63
  64         while ((ch = getopt(argc, argv, "cluvx")) != -1) {
  65                 switch (ch) {
  66                 case 'c':
  67                         action = config;
  68                         break;
  69                 case 'l':
  70                         action = list;
  71                         break;
  72                 case 'u':
  73                         action = unconfig;
  74                         break;
  75                 case 'v':
  76                         vflag++;
  77                         break;
  78                 case 'x':
  79                         xflag++;
  80                         break;
  81                 default:
  82                 case '?':
  83                         usage();
  84                         /* NOTREACHED */
  85                 }
  86         }
  87
  88         argc -= optind;
  89         argv += optind;
  90
  91         (*action)(argc, argv);
  92
  93         exit(0);
  94 }
  95
  96 void
  97 config(int argc, char **argv)
  98 {
  99         int fd, isreg, istmp, ispersistent;
 100         char full[64], path[MAXPATHLEN];
 101         off_t bssize;
 102         dev_t mountdev;
 103         struct stat sbuf;
 104         struct statvfs fsbuf;
 105         struct fss_set fss;
 106
 107         if (argc < 3)
 108                 usage();
 109
 110         istmp = ispersistent = 0;
 111
 112         fss.fss_mount = argv[1];
 113         fss.fss_bstore = argv[2];
 114
 115         if (statvfs(argv[1], &fsbuf) != 0 || stat(argv[1], &sbuf) != 0)
 116                 err(1, "stat %s", argv[1]);
 117         mountdev = sbuf.st_dev;
 118         if (stat(argv[2], &sbuf) == 0 &&
 119             S_ISREG(sbuf.st_mode) &&
 120             sbuf.st_dev == mountdev) {
 121                 if ((sbuf.st_flags & SF_SNAPSHOT) == 0)
 122                         errx(1, "%s: exists and is not a snapshot", argv[2]);
 123                 if (argc != 3)
 124                         usage();
 125                 isreg = ispersistent = 1;
 126
 127                 goto configure;
 128         }
 129
 130         if (argc > 5)
 131                 usage();
 132
 133         if (argc > 3)
 134                 fss.fss_csize = strsuftoll("cluster size", argv[3], 0, INT_MAX);
 135         else
 136                 fss.fss_csize = 0;
 137         if (argc > 4)
 138                 bssize = strsuftoll("bs size", argv[4], 0, LLONG_MAX);
 139         else
 140                 bssize = (off_t)fsbuf.f_blocks*fsbuf.f_frsize;
 141
 142         /*
 143          * Create the backing store. If it is a directory, create a temporary
 144          * file and set the unlink flag.
 145          */
 146         if ((fd = open(fss.fss_bstore, O_CREAT|O_TRUNC|O_WRONLY, 0600)) < 0) {
 147                 if (errno != EISDIR)
 148                         err(1, "create: %s", fss.fss_bstore);
 149                 snprintf(path, sizeof(path), "%s/XXXXXXXXXX", fss.fss_bstore);
 150                 if ((fd = mkstemp(path)) < 0)
 151                         err(1, "mkstemp: %s", path);
 152                 fss.fss_bstore = path;
 153                 istmp = 1;
 154         }
 155         if (fstat(fd, &sbuf) < 0)
 156                 err(1, "stat: %s", fss.fss_bstore);
 157         if (!ispersistent && sbuf.st_dev == mountdev)
 158                 ispersistent = 1;
 159         isreg = S_ISREG(sbuf.st_mode);
 160         if (!ispersistent && isreg && ftruncate(fd, bssize) < 0)
 161                 err(1, "truncate %s", fss.fss_bstore);
 162         close(fd);
 163
 164 configure:
 165         if ((fd = opendisk(argv[0], O_RDWR, full, sizeof(full), 0)) < 0) {
 166                 if (istmp)
 167                         unlink(fss.fss_bstore);
 168                 err(1, "open: %s", argv[0]);
 169         }
 170
 171         if (ioctl(fd, FSSIOCSET, &fss) < 0) {
 172                 if (istmp)
 173                         unlink(fss.fss_bstore);
 174                 err(1, "%s: FSSIOCSET", full);
 175         }
 176
 177         if ((xflag || istmp) && isreg && unlink(fss.fss_bstore) < 0)
 178                 err(1, "unlink: %s", fss.fss_bstore);
 179
 180         if (vflag)
 181                 list(1, argv);
 182 }
 183
 184 void
 185 unconfig(int argc, char **argv)
 186 {
 187         int fd;
 188         char full[64];
 189
 190         if (argc != 1)
 191                 usage();
 192
 193         if (vflag)
 194                 list(1, argv);
 195
 196         if ((fd = opendisk(argv[0], O_RDWR, full, sizeof(full), 0)) < 0)
 197                 err(1, "open: %s", argv[0]);
 198
 199         if (ioctl(fd, FSSIOCCLR) < 0)
 200                 err(1, "%s: FSSIOCCLR", full);
 201 }
 202
 203 void
 204 list(int argc, char **argv)
 205 {
 206         int n, fd, flags;
 207         char *dev, path[64], full[64];
 208         char clbuf[5], bsbuf[5], tmbuf[64];
 209         time_t t;
 210         struct fss_get fsg;
 211
 212         if (argc > 1)
 213                 usage();
 214
 215         if (argc > 0)
 216                 dev = argv[0];
 217         else
 218                 dev = path;
 219
 220         for (n = 0; ; n++) {
 221                 if (argc == 0)
 222                         snprintf(path, sizeof(path), "fss%d", n);
 223                 if ((fd = opendisk(dev, O_RDONLY, full, sizeof(full), 0)) < 0) {
 224                         if (argc == 0 && (errno == ENOENT || errno == ENXIO))
 225                                 break;
 226                         err(1, "open: %s", dev);
 227                 }
 228
 229                 if (ioctl(fd, FSSIOFGET, &flags) < 0)
 230                         flags = 0;
 231
 232                 if (ioctl(fd, FSSIOCGET, &fsg) < 0) {
 233                         if (errno == ENXIO)
 234                                 printf("%s: not in use\n", dev);
 235                         else
 236                                 err(1, "%s: FSSIOCGET", full);
 237                 } else if (vflag) {
 238                         humanize_number(clbuf, sizeof(clbuf),
 239                             (int64_t)fsg.fsg_csize,
 240                             "", HN_AUTOSCALE, HN_B|HN_NOSPACE);
 241
 242                         humanize_number(bsbuf, sizeof(bsbuf),
 243                             (int64_t)fsg.fsg_bs_size*fsg.fsg_csize,
 244                             "", HN_AUTOSCALE, HN_B|HN_NOSPACE);
 245
 246                         t = fsg.fsg_time.tv_sec;
 247                         strftime(tmbuf, sizeof(tmbuf), "%F %T", localtime(&t));
 248
 249                         printf("%s: %s, taken %s", dev, fsg.fsg_mount, tmbuf);
 250                         if ((flags & FSS_UNCONFIG_ON_CLOSE) != 0)
 251                                 printf(", unconfig on close");
 252                         if (fsg.fsg_csize == 0)
 253                                 printf(", file system internal\n");
 254                         else
 255                                 printf(", %"PRId64" cluster of %s, %s backup\n",
 256                                     fsg.fsg_mount_size, clbuf, bsbuf);
 257                 } else
 258                         printf("%s: %s\n", dev, fsg.fsg_mount);
 259
 260                 close(fd);
 261
 262                 if (argc > 0)
 263                         break;
 264         }
 265 }
 266
 267 void
 268 usage(void)
 269 {
 270         fprintf(stderr, "%s",
 271             "usage: fssconfig [-cxv] device path backup [cluster [size]]\n"
 272             "       fssconfig -u [-v] device\n"
 273             "       fssconfig -l [-v] [device]\n");
 274         exit(1);
 275 }