sbin/devfs/rule.c

   1 /*-
   2  * Copyright (c) 2002 Dima Dorfman.
   3  * 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  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  24  * SUCH DAMAGE.
  25  */
  26
  27 /*
  28  * Rule subsystem manipulation.
  29  */
  30
  31 #include <sys/cdefs.h>
  32 __FBSDID("$FreeBSD$");
  33
  34 #include <sys/param.h>
  35 #include <sys/conf.h>
  36 #include <sys/ioctl.h>
  37
  38 #include <assert.h>
  39 #include <err.h>
  40 #include <errno.h>
  41 #include <grp.h>
  42 #include <pwd.h>
  43 #include <stdio.h>
  44 #include <stdlib.h>
  45 #include <string.h>
  46 #include <unistd.h>
  47
  48 #include "extern.h"
  49
  50 static void rulespec_infp(FILE *fp, unsigned long request, devfs_rsnum rsnum);
  51 static void rulespec_instr(struct devfs_rule *dr, const char *str,
  52     devfs_rsnum rsnum);
  53 static void rulespec_intok(struct devfs_rule *dr, int ac, char **av,
  54     devfs_rsnum rsnum);
  55 static void rulespec_outfp(FILE *fp, struct devfs_rule *dr);
  56
  57 static command_t rule_add, rule_apply, rule_applyset;
  58 static command_t rule_del, rule_delset, rule_show, rule_showsets;
  59
  60 static ctbl_t ctbl_rule = {
  61         { "add",                rule_add },
  62         { "apply",              rule_apply },
  63         { "applyset",           rule_applyset },
  64         { "del",                rule_del },
  65         { "delset",             rule_delset },
  66         { "show",               rule_show },
  67         { "showsets",           rule_showsets },
  68         { NULL,                 NULL }
  69 };
  70
  71 static struct intstr ist_type[] = {
  72         { "disk",               D_DISK },
  73         { "mem",                D_MEM },
  74         { "tape",               D_TAPE },
  75         { "tty",                D_TTY },
  76         { NULL,                 -1 }
  77 };
  78
  79 static devfs_rsnum in_rsnum;
  80
  81 int
  82 rule_main(int ac, char **av)
  83 {
  84         struct cmd *c;
  85         int ch;
  86
  87         setprogname("devfs rule");
  88         optreset = optind = 1;
  89         while ((ch = getopt(ac, av, "s:")) != -1)
  90                 switch (ch) {
  91                 case 's':
  92                         in_rsnum = eatonum(optarg);
  93                         break;
  94                 default:
  95                         usage();
  96                 }
  97         ac -= optind;
  98         av += optind;
  99         if (ac < 1)
 100                 usage();
 101
 102         for (c = ctbl_rule; c->name != NULL; ++c)
 103                 if (strcmp(c->name, av[0]) == 0)
 104                         exit((*c->handler)(ac, av));
 105         errx(1, "unknown command: %s", av[0]);
 106 }
 107
 108 static int
 109 rule_add(int ac, char **av)
 110 {
 111         struct devfs_rule dr;
 112         int rv;
 113
 114         if (ac < 2)
 115                 usage();
 116         if (strcmp(av[1], "-") == 0)
 117                 rulespec_infp(stdin, DEVFSIO_RADD, in_rsnum);
 118         else {
 119                 rulespec_intok(&dr, ac - 1, av + 1, in_rsnum);
 120                 rv = ioctl(mpfd, DEVFSIO_RADD, &dr);
 121                 if (rv == -1)
 122                         err(1, "ioctl DEVFSIO_RADD");
 123         }
 124         return (0);
 125 }
 126
 127 static int
 128 rule_apply(int ac __unused, char **av __unused)
 129 {
 130         struct devfs_rule dr;
 131         devfs_rnum rnum;
 132         devfs_rid rid;
 133         int rv;
 134
 135         if (ac < 2)
 136                 usage();
 137         if (!atonum(av[1], &rnum)) {
 138                 if (strcmp(av[1], "-") == 0)
 139                         rulespec_infp(stdin, DEVFSIO_RAPPLY, in_rsnum);
 140                 else {
 141                         rulespec_intok(&dr, ac - 1, av + 1, in_rsnum);
 142                         rv = ioctl(mpfd, DEVFSIO_RAPPLY, &dr);
 143                         if (rv == -1)
 144                                 err(1, "ioctl DEVFSIO_RAPPLY");
 145                 }
 146         } else {
 147                 rid = mkrid(in_rsnum, rnum);
 148                 rv = ioctl(mpfd, DEVFSIO_RAPPLYID, &rid);
 149                 if (rv == -1)
 150                         err(1, "ioctl DEVFSIO_RAPPLYID");
 151         }
 152         return (0);
 153 }
 154
 155 static int
 156 rule_applyset(int ac, char **av __unused)
 157 {
 158         int rv;
 159
 160         if (ac != 1)
 161                 usage();
 162         rv = ioctl(mpfd, DEVFSIO_SAPPLY, &in_rsnum);
 163         if (rv == -1)
 164                 err(1, "ioctl DEVFSIO_SAPPLY");
 165         return (0);
 166 }
 167
 168 static int
 169 rule_del(int ac __unused, char **av)
 170 {
 171         devfs_rid rid;
 172         int rv;
 173
 174         if (av[1] == NULL)
 175                 usage();
 176         rid = mkrid(in_rsnum, eatoi(av[1]));
 177         rv = ioctl(mpfd, DEVFSIO_RDEL, &rid);
 178         if (rv == -1)
 179                 err(1, "ioctl DEVFSIO_RDEL");
 180         return (0);
 181 }
 182
 183 static int
 184 rule_delset(int ac, char **av __unused)
 185 {
 186         struct devfs_rule dr;
 187         int rv;
 188
 189         if (ac != 1)
 190                 usage();
 191         memset(&dr, '\0', sizeof(dr));
 192         dr.dr_magic = DEVFS_MAGIC;
 193         dr.dr_id = mkrid(in_rsnum, 0);
 194         while (ioctl(mpfd, DEVFSIO_RGETNEXT, &dr) != -1) {
 195                 rv = ioctl(mpfd, DEVFSIO_RDEL, &dr.dr_id);
 196                 if (rv == -1)
 197                         err(1, "ioctl DEVFSIO_RDEL");
 198         }
 199         if (errno != ENOENT)
 200                 err(1, "ioctl DEVFSIO_RGETNEXT");
 201         return (0);
 202 }
 203
 204 static int
 205 rule_show(int ac __unused, char **av)
 206 {
 207         struct devfs_rule dr;
 208         devfs_rnum rnum;
 209         int rv;
 210
 211         memset(&dr, '\0', sizeof(dr));
 212         dr.dr_magic = DEVFS_MAGIC;
 213         if (av[1] != NULL) {
 214                 rnum = eatoi(av[1]);
 215                 dr.dr_id = mkrid(in_rsnum, rnum - 1);
 216                 rv = ioctl(mpfd, DEVFSIO_RGETNEXT, &dr);
 217                 if (rv == -1)
 218                         err(1, "ioctl DEVFSIO_RGETNEXT");
 219                 if (rid2rn(dr.dr_id) == rnum)
 220                         rulespec_outfp(stdout, &dr);
 221         } else {
 222                 dr.dr_id = mkrid(in_rsnum, 0);
 223                 while (ioctl(mpfd, DEVFSIO_RGETNEXT, &dr) != -1)
 224                         rulespec_outfp(stdout, &dr);
 225                 if (errno != ENOENT)
 226                         err(1, "ioctl DEVFSIO_RGETNEXT");
 227         }
 228         return (0);
 229 }
 230
 231 static int
 232 rule_showsets(int ac, char **av __unused)
 233 {
 234         devfs_rsnum rsnum;
 235
 236         if (ac != 1)
 237                 usage();
 238         rsnum = 0;
 239         while (ioctl(mpfd, DEVFSIO_SGETNEXT, &rsnum) != -1)
 240                 printf("%d\n", rsnum);
 241         if (errno != ENOENT)
 242                 err(1, "ioctl DEVFSIO_SGETNEXT");
 243         return (0);
 244 }
 245
 246 int
 247 ruleset_main(int ac, char **av)
 248 {
 249         devfs_rsnum rsnum;
 250         int rv;
 251
 252         setprogname("devfs ruleset");
 253         if (ac < 2)
 254                 usage();
 255         rsnum = eatonum(av[1]);
 256         rv = ioctl(mpfd, DEVFSIO_SUSE, &rsnum);
 257         if (rv == -1)
 258                 err(1, "ioctl DEVFSIO_SUSE");
 259         return (0);
 260 }
 261
 262
 263 /*
 264  * Input rules from a file (probably the standard input).  This
 265  * differs from the other rulespec_in*() routines in that it also
 266  * calls ioctl() for the rules, since it is impractical (and not very
 267  * useful) to return a list (or array) of rules, just so the caller
 268  * can call call ioctl() for each of them.
 269  */
 270 static void
 271 rulespec_infp(FILE *fp, unsigned long request, devfs_rsnum rsnum)
 272 {
 273         struct devfs_rule dr;
 274         char *line;
 275         int rv;
 276
 277         assert(fp == stdin);    /* XXX: De-hardcode "stdin" from error msg. */
 278         while (efgetln(fp, &line)) {
 279                 rulespec_instr(&dr, line, rsnum);
 280                 rv = ioctl(mpfd, request, &dr);
 281                 if (rv == -1)
 282                         err(1, "ioctl");
 283                 free(line);     /* efgetln() always malloc()s. */
 284         }
 285         if (ferror(stdin))
 286                 err(1, "stdin");
 287 }
 288
 289 /*
 290  * Construct a /struct devfs_rule/ from a string.
 291  */
 292 static void
 293 rulespec_instr(struct devfs_rule *dr, const char *str, devfs_rsnum rsnum)
 294 {
 295         char **av;
 296         int ac;
 297
 298         tokenize(str, &ac, &av);
 299         if (ac == 0)
 300                 errx(1, "unexpected end of rulespec");
 301         rulespec_intok(dr, ac, av, rsnum);
 302         free(av[0]);
 303         free(av);
 304 }
 305
 306 /*
 307  * Construct a /struct devfs_rule/ from ac and av.
 308  */
 309 static void
 310 rulespec_intok(struct devfs_rule *dr, int ac __unused, char **av,
 311     devfs_rsnum rsnum)
 312 {
 313         struct intstr *is;
 314         struct passwd *pw;
 315         struct group *gr;
 316         devfs_rnum rnum;
 317         void *set;
 318
 319         memset(dr, '\0', sizeof(*dr));
 320
 321         /*
 322          * We don't maintain ac hereinafter.
 323          */
 324         if (av[0] == NULL)
 325                 errx(1, "unexpected end of rulespec");
 326
 327         /* If the first argument is an integer, treat it as a rule number. */
 328         if (!atonum(av[0], &rnum))
 329                 rnum = 0;               /* auto-number */
 330         else
 331                 ++av;
 332
 333         /*
 334          * These aren't table-driven since that would result in more
 335          * tiny functions than I care to deal with.
 336          */
 337         for (;;) {
 338                 if (av[0] == NULL)
 339                         break;
 340                 else if (strcmp(av[0], "type") == 0) {
 341                         if (av[1] == NULL)
 342                                 errx(1, "expecting argument for type");
 343                         for (is = ist_type; is->s != NULL; ++is)
 344                                 if (strcmp(av[1], is->s) == 0) {
 345                                         dr->dr_dswflags |= is->i;
 346                                         break;
 347                                 }
 348                         if (is->s == NULL)
 349                                 errx(1, "unknown type: %s", av[1]);
 350                         dr->dr_icond |= DRC_DSWFLAGS;
 351                         av += 2;
 352                 } else if (strcmp(av[0], "path") == 0) {
 353                         if (av[1] == NULL)
 354                                 errx(1, "expecting argument for path");
 355                         if (strlcpy(dr->dr_pathptrn, av[1], DEVFS_MAXPTRNLEN)
 356                             >= DEVFS_MAXPTRNLEN)
 357                                 warnx("pattern specified too long; truncated");
 358                         dr->dr_icond |= DRC_PATHPTRN;
 359                         av += 2;
 360                 } else
 361                         break;
 362         }
 363         while (av[0] != NULL) {
 364                 if (strcmp(av[0], "hide") == 0) {
 365                         dr->dr_iacts |= DRA_BACTS;
 366                         dr->dr_bacts |= DRB_HIDE;
 367                         ++av;
 368                 } else if (strcmp(av[0], "unhide") == 0) {
 369                         dr->dr_iacts |= DRA_BACTS;
 370                         dr->dr_bacts |= DRB_UNHIDE;
 371                         ++av;
 372                 } else if (strcmp(av[0], "user") == 0) {
 373                         if (av[1] == NULL)
 374                                 errx(1, "expecting argument for user");
 375                         dr->dr_iacts |= DRA_UID;
 376                         pw = getpwnam(av[1]);
 377                         if (pw != NULL)
 378                                 dr->dr_uid = pw->pw_uid;
 379                         else
 380                                 dr->dr_uid = eatoi(av[1]); /* XXX overflow */
 381                         av += 2;
 382                 } else if (strcmp(av[0], "group") == 0) {
 383                         if (av[1] == NULL)
 384                                 errx(1, "expecting argument for group");
 385                         dr->dr_iacts |= DRA_GID;
 386                         gr = getgrnam(av[1]);
 387                         if (gr != NULL)
 388                                 dr->dr_gid = gr->gr_gid;
 389                         else
 390                                 dr->dr_gid = eatoi(av[1]); /* XXX overflow */
 391                         av += 2;
 392                 } else if (strcmp(av[0], "mode") == 0) {
 393                         if (av[1] == NULL)
 394                                 errx(1, "expecting argument for mode");
 395                         dr->dr_iacts |= DRA_MODE;
 396                         set = setmode(av[1]);
 397                         if (set == NULL)
 398                                 errx(1, "invalid mode: %s", av[1]);
 399                         dr->dr_mode = getmode(set, 0);
 400                         av += 2;
 401                 } else if (strcmp(av[0], "include") == 0) {
 402                         if (av[1] == NULL)
 403                                 errx(1, "expecting argument for include");
 404                         dr->dr_iacts |= DRA_INCSET;
 405                         dr->dr_incset = eatonum(av[1]);
 406                         av += 2;
 407                 } else
 408                         errx(1, "unknown argument: %s", av[0]);
 409         }
 410
 411         dr->dr_id = mkrid(rsnum, rnum);
 412         dr->dr_magic = DEVFS_MAGIC;
 413 }
 414
 415 /*
 416  * Write a human-readable (and machine-parsable, by rulespec_in*())
 417  * representation of dr to bufp.  *bufp should be free(3)'d when the
 418  * caller is finished with it.
 419  */
 420 static void
 421 rulespec_outfp(FILE *fp, struct devfs_rule *dr)
 422 {
 423         struct intstr *is;
 424         struct passwd *pw;
 425         struct group *gr;
 426
 427         fprintf(fp, "%d", rid2rn(dr->dr_id));
 428
 429         if (dr->dr_icond & DRC_DSWFLAGS)
 430                 for (is = ist_type; is->s != NULL; ++is)
 431                         if (dr->dr_dswflags & is->i)
 432                                 fprintf(fp, " type %s", is->s);
 433         if (dr->dr_icond & DRC_PATHPTRN)
 434                 fprintf(fp, " path %s", dr->dr_pathptrn);
 435
 436         if (dr->dr_iacts & DRA_BACTS) {
 437                 if (dr->dr_bacts & DRB_HIDE)
 438                         fprintf(fp, " hide");
 439                 if (dr->dr_bacts & DRB_UNHIDE)
 440                         fprintf(fp, " unhide");
 441         }
 442         if (dr->dr_iacts & DRA_UID) {
 443                 pw = getpwuid(dr->dr_uid);
 444                 if (pw == NULL)
 445                         fprintf(fp, " user %d", dr->dr_uid);
 446                 else
 447                         fprintf(fp, " user %s", pw->pw_name);
 448         }
 449         if (dr->dr_iacts & DRA_GID) {
 450                 gr = getgrgid(dr->dr_gid);
 451                 if (gr == NULL)
 452                         fprintf(fp, " group %d", dr->dr_gid);
 453                 else
 454                         fprintf(fp, " group %s", gr->gr_name);
 455         }
 456         if (dr->dr_iacts & DRA_MODE)
 457                 fprintf(fp, " mode %o", dr->dr_mode);
 458         if (dr->dr_iacts & DRA_INCSET)
 459                 fprintf(fp, " include %d", dr->dr_incset);
 460
 461         fprintf(fp, "\n");
 462 }