config.c

   1 /*
   2  * mdadm - manage Linux "md" devices aka RAID arrays.
   3  *
   4  * Copyright (C) 2001-2009 Neil Brown <neilb@suse.de>
   5  *
   6  *
   7  *    This program is free software; you can redistribute it and/or modify
   8  *    it under the terms of the GNU General Public License as published by
   9  *    the Free Software Foundation; either version 2 of the License, or
  10  *    (at your option) any later version.
  11  *
  12  *    This program is distributed in the hope that it will be useful,
  13  *    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  *    GNU General Public License for more details.
  16  *
  17  *    You should have received a copy of the GNU General Public License
  18  *    along with this program; if not, write to the Free Software
  19  *    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  20  *
  21  *    Author: Neil Brown
  22  *    Email: <neilb@suse.de>
  23  */
  24
  25 #include        "mdadm.h"
  26 #include        "dlink.h"
  27 #include        <dirent.h>
  28 #include        <glob.h>
  29 #include        <fnmatch.h>
  30 #include        <ctype.h>
  31 #include        <pwd.h>
  32 #include        <grp.h>
  33
  34 /*
  35  * Read the config file
  36  *
  37  * conf_get_uuids gets a list of devicename+uuid pairs
  38  * conf_get_devs gets device names after expanding wildcards
  39  *
  40  * Each keeps the returned list and frees it when asked to make
  41  * a new list.
  42  *
  43  * The format of the config file needs to be fairly extensible.
  44  * Now, arrays only have names and uuids and devices merely are.
  45  * But later arrays might want names, and devices might want superblock
  46  * versions, and who knows what else.
  47  * I like free format, abhore backslash line continuation, adore
  48  *   indentation for structure and am ok about # comments.
  49  *
  50  * So, each line that isn't blank or a #comment must either start
  51  *  with a key word, and not be indented, or must start with a
  52  *  non-key-word and must be indented.
  53  *
  54  * Keywords are DEVICE and ARRAY ... and several others.
  55  * DEV{ICE} introduces some devices that might contain raid components.
  56  * e.g.
  57  *   DEV style=0 /dev/sda* /dev/hd*
  58  *   DEV style=1 /dev/sd[b-f]*
  59  * ARR{AY} describes an array giving md device and attributes like uuid=whatever
  60  * e.g.
  61  *   ARRAY /dev/md0 uuid=whatever name=something
  62  * Spaces separate words on each line.  Quoting, with "" or '' protects them,
  63  * but may not wrap over lines
  64  *
  65  */
  66 #ifndef _POSIX_C_SOURCE
  67 #define _POSIX_C_SOURCE 200809L
  68 #endif
  69
  70 #ifndef CONFFILE
  71 #define CONFFILE "/etc/mdadm.conf"
  72 #endif
  73 #ifndef CONFFILE2
  74 /* for Debian compatibility .... */
  75 #define CONFFILE2 "/etc/mdadm/mdadm.conf"
  76 #endif
  77 char DefaultConfFile[] = CONFFILE;
  78 char DefaultConfDir[] = CONFFILE ".d";
  79 char DefaultAltConfFile[] = CONFFILE2;
  80 char DefaultAltConfDir[] = CONFFILE2 ".d";
  81
  82 enum linetype { Devices, Array, Mailaddr, Mailfrom, Program, CreateDev,
  83                 Homehost, HomeCluster, AutoMode, Policy, PartPolicy, Sysfs,
  84                 MonitorDelay, LTEnd };
  85 char *keywords[] = {
  86         [Devices]  = "devices",
  87         [Array]    = "array",
  88         [Mailaddr] = "mailaddr",
  89         [Mailfrom] = "mailfrom",
  90         [Program]  = "program",
  91         [CreateDev]= "create",
  92         [Homehost] = "homehost",
  93         [HomeCluster] = "homecluster",
  94         [AutoMode] = "auto",
  95         [Policy]   = "policy",
  96         [PartPolicy]="part-policy",
  97         [Sysfs]    = "sysfs",
  98         [MonitorDelay] = "monitordelay",
  99         [LTEnd]    = NULL
 100 };
 101
 102 /*
 103  * match_keyword returns an index into the keywords array, or -1 for no match
 104  * case is ignored, and at least three characters must be given
 105  */
 106
 107 int match_keyword(char *word)
 108 {
 109         int len = strlen(word);
 110         int n;
 111
 112         if (len < 3)
 113                 return -1;
 114         for (n = 0; keywords[n]; n++) {
 115                 if (strncasecmp(word, keywords[n], len) == 0)
 116                         return n;
 117         }
 118
 119         return -1;
 120 }
 121
 122 /**
 123  * ident_init() - Set defaults.
 124  * @ident: ident pointer, not NULL.
 125  */
 126 inline void ident_init(struct mddev_ident *ident)
 127 {
 128         assert(ident);
 129
 130         ident->assembled = false;
 131         ident->autof = 0;
 132         ident->bitmap_fd = -1;
 133         ident->bitmap_file = NULL;
 134         ident->container = NULL;
 135         ident->devices = NULL;
 136         ident->devname = NULL;
 137         ident->level = UnSet;
 138         ident->member = NULL;
 139         ident->name[0] = 0;
 140         ident->next = NULL;
 141         ident->raid_disks = UnSet;
 142         ident->spare_group = NULL;
 143         ident->spare_disks = 0;
 144         ident->st = NULL;
 145         ident->super_minor = UnSet;
 146         ident->uuid[0] = 0;
 147         ident->uuid_set = 0;
 148 }
 149
 150 struct conf_dev {
 151         struct conf_dev *next;
 152         char *name;
 153 } *cdevlist = NULL;
 154
 155 struct mddev_dev *load_partitions(void)
 156 {
 157         FILE *f = fopen("/proc/partitions", "r");
 158         char buf[1024];
 159         struct mddev_dev *rv = NULL;
 160
 161         if (f == NULL) {
 162                 pr_err("cannot open /proc/partitions\n");
 163                 return NULL;
 164         }
 165         while (fgets(buf, 1024, f)) {
 166                 int major, minor;
 167                 char *name, *mp;
 168                 struct mddev_dev *d;
 169
 170                 buf[1023] = '\0';
 171                 if (buf[0] != ' ')
 172                         continue;
 173                 major = strtoul(buf, &mp, 10);
 174                 if (mp == buf || *mp != ' ')
 175                         continue;
 176                 minor = strtoul(mp, NULL, 10);
 177
 178                 name = map_dev(major, minor, 1);
 179                 if (!name)
 180                         continue;
 181                 d = xcalloc(1, sizeof(*d));
 182                 d->devname = xstrdup(name);
 183                 d->next = rv;
 184                 rv = d;
 185         }
 186         fclose(f);
 187         return rv;
 188 }
 189
 190 struct mddev_dev *load_containers(void)
 191 {
 192         struct mdstat_ent *mdstat = mdstat_read(0, 0);
 193         struct mdstat_ent *ent;
 194         struct mddev_dev *d;
 195         struct mddev_dev *rv = NULL;
 196         struct map_ent *map = NULL, *me;
 197
 198         if (!mdstat)
 199                 return NULL;
 200
 201         for (ent = mdstat; ent; ent = ent->next)
 202                 if (ent->metadata_version &&
 203                     strncmp(ent->metadata_version, "external:", 9) == 0 &&
 204                     !is_subarray(&ent->metadata_version[9])) {
 205                         d = xcalloc(1, sizeof(*d));
 206                         me = map_by_devnm(&map, ent->devnm);
 207                         if (me)
 208                                 d->devname = xstrdup(me->path);
 209                         else if (asprintf(&d->devname, "/dev/%s", ent->devnm) < 0) {
 210                                 free(d);
 211                                 continue;
 212                         }
 213                         d->next = rv;
 214                         rv = d;
 215                         map_free(map);
 216                         map = NULL;
 217                 }
 218         free_mdstat(mdstat);
 219
 220         return rv;
 221 }
 222
 223 struct createinfo createinfo = {
 224         .autof = 2, /* by default, create devices with standard names */
 225         .names = 0, /* By default, stick with numbered md devices. */
 226         .bblist = 1, /* Use a bad block list by default */
 227 #ifdef DEBIAN
 228         .gid = 6, /* disk */
 229         .mode = 0660,
 230 #else
 231         .mode = 0600,
 232 #endif
 233 };
 234
 235 int parse_auto(char *str, char *msg, int config)
 236 {
 237         int autof;
 238         if (str == NULL || *str == 0)
 239                 autof = 2;
 240         else if (strcasecmp(str, "no") == 0)
 241                 autof = 1;
 242         else if (strcasecmp(str, "yes") == 0)
 243                 autof = 2;
 244         else if (strcasecmp(str, "md") == 0)
 245                 autof = config ? 5:3;
 246         else {
 247                 /* There might be digits, and maybe a hypen, at the end */
 248                 char *e = str + strlen(str);
 249                 int num = 4;
 250                 int len;
 251                 while (e > str && isdigit(e[-1]))
 252                         e--;
 253                 if (*e) {
 254                         num = atoi(e);
 255                         if (num <= 0)
 256                                 num = 1;
 257                 }
 258                 if (e > str && e[-1] == '-')
 259                         e--;
 260                 len = e - str;
 261                 if ((len == 2 && strncasecmp(str, "md", 2) == 0)) {
 262                         autof = config ? 5 : 3;
 263                 } else if ((len == 3 && strncasecmp(str, "yes", 3) == 0)) {
 264                         autof = 2;
 265                 } else if ((len == 3 && strncasecmp(str, "mdp", 3) == 0)) {
 266                         autof = config ? 6 : 4;
 267                 } else if ((len == 1 && strncasecmp(str, "p", 1) == 0) ||
 268                            (len >= 4 && strncasecmp(str, "part", 4) == 0)) {
 269                         autof = 6;
 270                 } else {
 271                         pr_err("%s arg of \"%s\" unrecognised: use no,yes,md,mdp,part\n"
 272                                 "        optionally followed by a number.\n",
 273                                 msg, str);
 274                         exit(2);
 275                 }
 276                 autof |= num << 3;
 277         }
 278         return autof;
 279 }
 280
 281 static void createline(char *line)
 282 {
 283         char *w;
 284         char *ep;
 285
 286         for (w = dl_next(line); w != line; w = dl_next(w)) {
 287                 if (strncasecmp(w, "auto=", 5) == 0)
 288                         createinfo.autof = parse_auto(w + 5, "auto=", 1);
 289                 else if (strncasecmp(w, "owner=", 6) == 0) {
 290                         if (w[6] == 0) {
 291                                 pr_err("missing owner name\n");
 292                                 continue;
 293                         }
 294                         createinfo.uid = strtoul(w + 6, &ep, 10);
 295                         if (*ep != 0) {
 296                                 struct passwd *pw;
 297                                 /* must be a name */
 298                                 pw = getpwnam(w + 6);
 299                                 if (pw)
 300                                         createinfo.uid = pw->pw_uid;
 301                                 else
 302                                         pr_err("CREATE user %s not found\n",
 303                                                w + 6);
 304                         }
 305                 } else if (strncasecmp(w, "group=", 6) == 0) {
 306                         if (w[6] == 0) {
 307                                 pr_err("missing group name\n");
 308                                 continue;
 309                         }
 310                         createinfo.gid = strtoul(w + 6, &ep, 10);
 311                         if (*ep != 0) {
 312                                 struct group *gr;
 313                                 /* must be a name */
 314                                 gr = getgrnam(w + 6);
 315                                 if (gr)
 316                                         createinfo.gid = gr->gr_gid;
 317                                 else
 318                                         pr_err("CREATE group %s not found\n",
 319                                                w + 6);
 320                         }
 321                 } else if (strncasecmp(w, "mode=", 5) == 0) {
 322                         if (w[5] == 0) {
 323                                 pr_err("missing CREATE mode\n");
 324                                 continue;
 325                         }
 326                         createinfo.mode = strtoul(w + 5, &ep, 8);
 327                         if (*ep != 0) {
 328                                 createinfo.mode = 0600;
 329                                 pr_err("unrecognised CREATE mode %s\n",
 330                                         w + 5);
 331                         }
 332                 } else if (strncasecmp(w, "metadata=", 9) == 0) {
 333                         /* style of metadata to use by default */
 334                         int i;
 335                         for (i = 0; superlist[i] && !createinfo.supertype; i++)
 336                                 createinfo.supertype = superlist[i]->match_metadata_desc(w + 9);
 337                         if (!createinfo.supertype)
 338                                 pr_err("metadata format %s unknown, ignoring\n",
 339                                         w+9);
 340                 } else if (strncasecmp(w, "names=yes", 12) == 0)
 341                         createinfo.names = 1;
 342                 else if  (strncasecmp(w, "names=no", 11) == 0)
 343                         createinfo.names = 0;
 344                 else if  (strncasecmp(w, "bbl=no", 11) == 0)
 345                         createinfo.bblist = 0;
 346                 else if  (strncasecmp(w, "bbl=yes", 11) == 0)
 347                         createinfo.bblist = 1;
 348                 else {
 349                         pr_err("unrecognised word on CREATE line: %s\n",
 350                                 w);
 351                 }
 352         }
 353 }
 354
 355 void devline(char *line)
 356 {
 357         char *w;
 358         struct conf_dev *cd;
 359
 360         for (w = dl_next(line); w != line; w = dl_next(w)) {
 361                 if (w[0] == '/' || strcasecmp(w, "partitions") == 0 ||
 362                     strcasecmp(w, "containers") == 0) {
 363                         cd = xmalloc(sizeof(*cd));
 364                         cd->name = xstrdup(w);
 365                         cd->next = cdevlist;
 366                         cdevlist = cd;
 367                 } else {
 368                         pr_err("unreconised word on DEVICE line: %s\n", w);
 369                 }
 370         }
 371 }
 372
 373 struct mddev_ident *mddevlist = NULL;
 374 struct mddev_ident **mddevlp = &mddevlist;
 375
 376 static int is_number(char *w)
 377 {
 378         /* check if there are 1 or more digits and nothing else */
 379         int digits = 0;
 380         while (*w && isdigit(*w)) {
 381                 digits++;
 382                 w++;
 383         }
 384         return (digits && ! *w);
 385 }
 386
 387 void arrayline(char *line)
 388 {
 389         char *w;
 390
 391         struct mddev_ident mis;
 392         struct mddev_ident *mi;
 393
 394         ident_init(&mis);
 395
 396         for (w = dl_next(line); w != line; w = dl_next(w)) {
 397                 if (w[0] == '/' || strchr(w, '=') == NULL) {
 398                         /* This names the device, or is '<ignore>'.
 399                          * The rules match those in create_mddev.
 400                          * 'w' must be:
 401                          *  /dev/md/{anything}
 402                          *  /dev/mdNN
 403                          *  /dev/md_dNN
 404                          *  <ignore>
 405                          *  or anything that doesn't start '/' or '<'
 406                          */
 407                         if (strcasecmp(w, "<ignore>") == 0 ||
 408                             strncmp(w, DEV_MD_DIR, DEV_MD_DIR_LEN) == 0 ||
 409                             (w[0] != '/' && w[0] != '<') ||
 410                             (strncmp(w, DEV_NUM_PREF, DEV_NUM_PREF_LEN) == 0 &&
 411                              is_number(w + DEV_NUM_PREF_LEN)) ||
 412                             (strncmp(w, "/dev/md_d", 9) == 0 &&
 413                              is_number(w + 9))) {
 414                                 /* This is acceptable */;
 415                                 if (mis.devname)
 416                                         pr_err("only give one device per ARRAY line: %s and %s\n",
 417                                                 mis.devname, w);
 418                                 else
 419                                         mis.devname = w;
 420                         }else {
 421                                 pr_err("%s is an invalid name for an md device - ignored.\n", w);
 422                         }
 423                 } else if (strncasecmp(w, "uuid=", 5) == 0) {
 424                         if (mis.uuid_set)
 425                                 pr_err("only specify uuid once, %s ignored.\n",
 426                                        w);
 427                         else {
 428                                 if (parse_uuid(w + 5, mis.uuid))
 429                                         mis.uuid_set = 1;
 430                                 else
 431                                         pr_err("bad uuid: %s\n", w);
 432                         }
 433                 } else if (strncasecmp(w, "super-minor=", 12) == 0) {
 434                         if (mis.super_minor != UnSet)
 435                                 pr_err("only specify super-minor once, %s ignored.\n",
 436                                         w);
 437                         else {
 438                                 char *endptr;
 439                                 int minor = strtol(w + 12, &endptr, 10);
 440
 441                                 if (w[12] == 0 || endptr[0] != 0 || minor < 0)
 442                                         pr_err("invalid super-minor number: %s\n",
 443                                                w);
 444                                 else
 445                                         mis.super_minor = minor;
 446                         }
 447                 } else if (strncasecmp(w, "name=", 5) == 0) {
 448                         if (mis.name[0])
 449                                 pr_err("only specify name once, %s ignored.\n",
 450                                         w);
 451                         else if (strlen(w + 5) > 32)
 452                                 pr_err("name too long, ignoring %s\n", w);
 453                         else
 454                                 strcpy(mis.name, w + 5);
 455
 456                 } else if (strncasecmp(w, "bitmap=", 7) == 0) {
 457                         if (mis.bitmap_file)
 458                                 pr_err("only specify bitmap file once. %s ignored\n",
 459                                         w);
 460                         else
 461                                 mis.bitmap_file = xstrdup(w + 7);
 462
 463                 } else if (strncasecmp(w, "devices=", 8 ) == 0) {
 464                         if (mis.devices)
 465                                 pr_err("only specify devices once (use a comma separated list). %s ignored\n",
 466                                         w);
 467                         else
 468                                 mis.devices = xstrdup(w + 8);
 469                 } else if (strncasecmp(w, "spare-group=", 12) == 0) {
 470                         if (mis.spare_group)
 471                                 pr_err("only specify one spare group per array. %s ignored.\n",
 472                                         w);
 473                         else
 474                                 mis.spare_group = xstrdup(w + 12);
 475                 } else if (strncasecmp(w, "level=", 6) == 0 ) {
 476                         /* this is mainly for compatability with --brief output */
 477                         mis.level = map_name(pers, w + 6);
 478                 } else if (strncasecmp(w, "disks=", 6) == 0) {
 479                         /* again, for compat */
 480                         mis.raid_disks = atoi(w + 6);
 481                 } else if (strncasecmp(w, "num-devices=", 12) == 0) {
 482                         /* again, for compat */
 483                         mis.raid_disks = atoi(w + 12);
 484                 } else if (strncasecmp(w, "spares=", 7) == 0) {
 485                         /* for warning if not all spares present */
 486                         mis.spare_disks = atoi(w + 7);
 487                 } else if (strncasecmp(w, "metadata=", 9) == 0) {
 488                         /* style of metadata on the devices. */
 489                         int i;
 490
 491                         for(i=0; superlist[i] && !mis.st; i++)
 492                                 mis.st = superlist[i]->
 493                                         match_metadata_desc(w + 9);
 494
 495                         if (!mis.st)
 496                                 pr_err("metadata format %s unknown, ignored.\n",
 497                                        w + 9);
 498                 } else if (strncasecmp(w, "auto=", 5) == 0 ) {
 499                         /* whether to create device special files as needed */
 500                         mis.autof = parse_auto(w + 5, "auto type", 0);
 501                 } else if (strncasecmp(w, "member=", 7) == 0) {
 502                         /* subarray within a container */
 503                         mis.member = xstrdup(w + 7);
 504                 } else if (strncasecmp(w, "container=", 10) == 0) {
 505                         /* The container holding this subarray.
 506                          * Either a device name or a uuid */
 507                         mis.container = xstrdup(w + 10);
 508                 } else {
 509                         pr_err("unrecognised word on ARRAY line: %s\n",
 510                                 w);
 511                 }
 512         }
 513         if (mis.uuid_set == 0 && mis.devices == NULL &&
 514             mis.super_minor == UnSet && mis.name[0] == 0 &&
 515             (mis.container == NULL || mis.member == NULL))
 516                 pr_err("ARRAY line %s has no identity information.\n",
 517                        mis.devname);
 518         else {
 519                 mi = xmalloc(sizeof(*mi));
 520                 *mi = mis;
 521                 mi->devname = mis.devname ? xstrdup(mis.devname) : NULL;
 522                 mi->next = NULL;
 523                 *mddevlp = mi;
 524                 mddevlp = &mi->next;
 525         }
 526 }
 527
 528 static char *alert_email = NULL;
 529 void mailline(char *line)
 530 {
 531         char *w;
 532
 533         for (w = dl_next(line); w != line; w = dl_next(w))
 534                 if (alert_email == NULL)
 535                         alert_email = xstrdup(w);
 536 }
 537
 538 static char *alert_mail_from = NULL;
 539 void mailfromline(char *line)
 540 {
 541         char *w;
 542
 543         for (w = dl_next(line); w != line; w = dl_next(w)) {
 544                 if (alert_mail_from == NULL)
 545                         alert_mail_from = xstrdup(w);
 546                 else {
 547                         char *t = NULL;
 548
 549                         if (xasprintf(&t, "%s %s", alert_mail_from, w) > 0) {
 550                                 free(alert_mail_from);
 551                                 alert_mail_from = t;
 552                         }
 553                 }
 554         }
 555 }
 556
 557 static char *alert_program = NULL;
 558 void programline(char *line)
 559 {
 560         char *w;
 561
 562         for (w = dl_next(line); w != line; w = dl_next(w))
 563                 if (alert_program == NULL)
 564                         alert_program = xstrdup(w);
 565 }
 566
 567 static char *home_host = NULL;
 568 static int require_homehost = 1;
 569 void homehostline(char *line)
 570 {
 571         char *w;
 572
 573         for (w = dl_next(line); w != line; w = dl_next(w)) {
 574                 if (strcasecmp(w, "<ignore>") == 0)
 575                         require_homehost = 0;
 576                 else if (home_host == NULL) {
 577                         if (strcasecmp(w, "<none>") == 0)
 578                                 home_host = xstrdup("");
 579                         else
 580                                 home_host = xstrdup(w);
 581                 }
 582         }
 583 }
 584
 585 static char *home_cluster = NULL;
 586 void homeclusterline(char *line)
 587 {
 588         char *w;
 589
 590         for (w = dl_next(line); w != line; w = dl_next(w)) {
 591                 if (home_cluster == NULL) {
 592                         if (strcasecmp(w, "<none>") == 0)
 593                                 home_cluster = xstrdup("");
 594                         else
 595                                 home_cluster = xstrdup(w);
 596                 }
 597         }
 598 }
 599
 600 static int monitor_delay;
 601 void monitordelayline(char *line)
 602 {
 603         char *w;
 604
 605         for (w = dl_next(line); w != line; w = dl_next(w)) {
 606                 if (monitor_delay == 0)
 607                         monitor_delay = strtol(w, NULL, 10);
 608         }
 609 }
 610
 611 char auto_yes[] = "yes";
 612 char auto_no[] = "no";
 613 char auto_homehost[] = "homehost";
 614
 615 static int auto_seen = 0;
 616 void autoline(char *line)
 617 {
 618         char *w;
 619         char *seen;
 620         int super_cnt;
 621         char *dflt = auto_yes;
 622         int homehost = 0;
 623         int i;
 624
 625         if (auto_seen)
 626                 return;
 627         auto_seen = 1;
 628
 629         /*
 630          * Parse the 'auto' line creating policy statements for the 'auto'
 631          * policy.
 632          *
 633          * The default is 'yes' but the 'auto' line might over-ride that.
 634          * Words in the line are processed in order with the first
 635          * match winning.
 636          * word can be:
 637          *   +version   - that version can be assembled
 638          *   -version   - that version cannot be auto-assembled
 639          *   yes or +all - any other version can be assembled
 640          *   no or -all  - no other version can be assembled.
 641          *   homehost   - any array associated by 'homehost' to this
 642          *                host can be assembled.
 643          *
 644          * Thus:
 645          *   +ddf -0.90 homehost -all
 646          * will auto-assemble any ddf array, no 0.90 array, and
 647          * any other array (imsm, 1.x) if and only if it is identified
 648          * as belonging to this host.
 649          *
 650          * We translate that to policy by creating 'auto=yes' when we see
 651          * a '+version' line, 'auto=no' if we see '-version' before 'homehost',
 652          * or 'auto=homehost' if we see '-version' after 'homehost'.
 653          * When we see yes, no, +all or -all we stop and any version that hasn't
 654          * been seen gets an appropriate auto= entry.
 655          */
 656
 657         /*
 658          * If environment variable MDADM_CONF_AUTO is defined, then
 659          * it is prepended to the auto line.  This allow a script
 660          * to easily disable some metadata types.
 661          */
 662         w = getenv("MDADM_CONF_AUTO");
 663         if (w && *w) {
 664                 char *l = xstrdup(w);
 665                 char *head = line;
 666                 w = strtok(l, " \t");
 667                 while (w) {
 668                         char *nw = dl_strdup(w);
 669                         dl_insert(head, nw);
 670                         head = nw;
 671                         w = strtok(NULL, " \t");
 672                 }
 673                 free(l);
 674         }
 675
 676         for (super_cnt = 0; superlist[super_cnt]; super_cnt++)
 677                 ;
 678         seen = xcalloc(super_cnt, 1);
 679
 680         for (w = dl_next(line); w != line; w = dl_next(w)) {
 681                 char *val;
 682
 683                 if (strcasecmp(w, "yes") == 0) {
 684                         dflt = auto_yes;
 685                         break;
 686                 }
 687                 if (strcasecmp(w, "no") == 0) {
 688                         if (homehost)
 689                                 dflt = auto_homehost;
 690                         else
 691                                 dflt = auto_no;
 692                         break;
 693                 }
 694                 if (strcasecmp(w, "homehost") == 0) {
 695                         homehost = 1;
 696                         continue;
 697                 }
 698                 if (w[0] == '+')
 699                         val = auto_yes;
 700                 else if (w[0] == '-') {
 701                         if (homehost)
 702                                 val = auto_homehost;
 703                         else
 704                                 val = auto_no;
 705                 } else
 706                         continue;
 707
 708                 if (strcasecmp(w + 1, "all") == 0) {
 709                         dflt = val;
 710                         break;
 711                 }
 712                 for (i = 0; superlist[i]; i++) {
 713                         const char *version = superlist[i]->name;
 714                         if (strcasecmp(w + 1, version) == 0)
 715                                 break;
 716                         /* 1 matches 1.x, 0 matches 0.90 */
 717                         if (version[1] == '.' && strlen(w + 1) == 1 &&
 718                             w[1] == version[0])
 719                                 break;
 720                         /* 1.anything matches 1.x */
 721                         if (strcmp(version, "1.x") == 0 &&
 722                             strncmp(w + 1, "1.", 2) == 0)
 723                                 break;
 724                 }
 725                 if (superlist[i] == NULL)
 726                         /* ignore this word */
 727                         continue;
 728                 if (seen[i])
 729                         /* already know about this metadata */
 730                         continue;
 731                 policy_add(rule_policy, pol_auto, val, pol_metadata,
 732                            superlist[i]->name, NULL);
 733                 seen[i] = 1;
 734         }
 735         for (i = 0; i < super_cnt; i++)
 736                 if (!seen[i])
 737                         policy_add(rule_policy, pol_auto, dflt, pol_metadata,
 738                                    superlist[i]->name, NULL);
 739
 740         free(seen);
 741 }
 742
 743 int loaded = 0;
 744
 745 static char *conffile = NULL;
 746 void set_conffile(char *file)
 747 {
 748         conffile = file;
 749 }
 750
 751 void conf_file(FILE *f)
 752 {
 753         char *line;
 754         while ((line = conf_line(f))) {
 755                 switch(match_keyword(line)) {
 756                 case Devices:
 757                         devline(line);
 758                         break;
 759                 case Array:
 760                         arrayline(line);
 761                         break;
 762                 case Mailaddr:
 763                         mailline(line);
 764                         break;
 765                 case Mailfrom:
 766                         mailfromline(line);
 767                         break;
 768                 case Program:
 769                         programline(line);
 770                         break;
 771                 case CreateDev:
 772                         createline(line);
 773                         break;
 774                 case Homehost:
 775                         homehostline(line);
 776                         break;
 777                 case HomeCluster:
 778                         homeclusterline(line);
 779                         break;
 780                 case AutoMode:
 781                         autoline(line);
 782                         break;
 783                 case Policy:
 784                         policyline(line, rule_policy);
 785                         break;
 786                 case PartPolicy:
 787                         policyline(line, rule_part);
 788                         break;
 789                 case Sysfs:
 790                         sysfsline(line);
 791                         break;
 792                 case MonitorDelay:
 793                         monitordelayline(line);
 794                         break;
 795                 default:
 796                         pr_err("Unknown keyword %s\n", line);
 797                 }
 798                 free_line(line);
 799         }
 800 }
 801
 802 struct fname {
 803         struct fname *next;
 804         char name[];
 805 };
 806
 807 void conf_file_or_dir(FILE *f)
 808 {
 809         struct stat st;
 810         DIR *dir;
 811         struct dirent *dp;
 812         struct fname *list = NULL;
 813
 814         fstat(fileno(f), &st);
 815         if (S_ISREG(st.st_mode))
 816                 conf_file(f);
 817         else if (!S_ISDIR(st.st_mode))
 818                 return;
 819 #if _XOPEN_SOURCE >= 700 || _POSIX_C_SOURCE >= 200809L
 820         dir = fdopendir(fileno(f));
 821         if (!dir)
 822                 return;
 823         while ((dp = readdir(dir)) != NULL) {
 824                 int l;
 825                 struct fname *fn, **p;
 826                 if (dp->d_ino == 0)
 827                         continue;
 828                 if (dp->d_name[0] == '.')
 829                         continue;
 830                 l = strlen(dp->d_name);
 831                 if (l < 6 || strcmp(dp->d_name + l - 5, ".conf") != 0)
 832                         continue;
 833                 fn = xmalloc(sizeof(*fn) + l + 1);
 834                 strcpy(fn->name, dp->d_name);
 835                 for (p = &list;
 836                      *p && strcmp((*p)->name, fn->name) < 0;
 837                      p = & (*p)->next)
 838                         ;
 839                 fn->next = *p;
 840                 *p = fn;
 841         }
 842         while (list) {
 843                 int fd;
 844                 FILE *f2;
 845                 struct fname *fn = list;
 846                 list = list->next;
 847                 fd = openat(fileno(f), fn->name, O_RDONLY);
 848                 free(fn);
 849                 if (fd < 0)
 850                         continue;
 851                 f2 = fdopen(fd, "r");
 852                 if (!f2) {
 853                         close(fd);
 854                         continue;
 855                 }
 856                 conf_file(f2);
 857                 fclose(f2);
 858         }
 859         closedir(dir);
 860 #endif
 861 }
 862
 863 void load_conffile(void)
 864 {
 865         FILE *f;
 866         char *confdir = NULL;
 867         char *head;
 868
 869         if (loaded)
 870                 return;
 871         if (conffile == NULL) {
 872                 conffile = DefaultConfFile;
 873                 confdir = DefaultConfDir;
 874         }
 875
 876         if (strcmp(conffile, "partitions") == 0) {
 877                 char *list = dl_strdup("DEV");
 878                 dl_init(list);
 879                 dl_add(list, dl_strdup("partitions"));
 880                 devline(list);
 881                 free_line(list);
 882         } else if (strcmp(conffile, "none") != 0) {
 883                 f = fopen(conffile, "r");
 884                 /* Debian chose to relocate mdadm.conf into /etc/mdadm/.
 885                  * To allow Debian users to compile from clean source and still
 886                  * have a working mdadm, we read /etc/mdadm/mdadm.conf
 887                  * if /etc/mdadm.conf doesn't exist
 888                  */
 889                 if (f == NULL && conffile == DefaultConfFile) {
 890                         f = fopen(DefaultAltConfFile, "r");
 891                         if (f) {
 892                                 conffile = DefaultAltConfFile;
 893                                 confdir = DefaultAltConfDir;
 894                         }
 895                 }
 896                 if (f) {
 897                         conf_file_or_dir(f);
 898                         fclose(f);
 899                 }
 900                 if (confdir) {
 901                         f = fopen(confdir, "r");
 902                         if (f) {
 903                                 conf_file_or_dir(f);
 904                                 fclose(f);
 905                         }
 906                 }
 907         }
 908         /* If there was no AUTO line, process an empty line
 909          * now so that the MDADM_CONF_AUTO env var gets processed.
 910          */
 911         head = dl_strdup("AUTO");
 912         dl_init(head);
 913         autoline(head);
 914         free_line(head);
 915
 916         loaded = 1;
 917 }
 918
 919 char *conf_get_mailaddr(void)
 920 {
 921         load_conffile();
 922         return alert_email;
 923 }
 924
 925 char *conf_get_mailfrom(void)
 926 {
 927         load_conffile();
 928         return alert_mail_from;
 929 }
 930
 931 char *conf_get_program(void)
 932 {
 933         load_conffile();
 934         return alert_program;
 935 }
 936
 937 char *conf_get_homehost(int *require_homehostp)
 938 {
 939         load_conffile();
 940         if (require_homehostp)
 941                 *require_homehostp = require_homehost;
 942         return home_host;
 943 }
 944
 945 char *conf_get_homecluster(void)
 946 {
 947         load_conffile();
 948         return home_cluster;
 949 }
 950
 951 int conf_get_monitor_delay(void)
 952 {
 953         load_conffile();
 954         return monitor_delay;
 955 }
 956
 957 struct createinfo *conf_get_create_info(void)
 958 {
 959         load_conffile();
 960         return &createinfo;
 961 }
 962
 963 struct mddev_ident *conf_get_ident(char *dev)
 964 {
 965         struct mddev_ident *rv;
 966         load_conffile();
 967         rv = mddevlist;
 968         while (dev && rv && (rv->devname == NULL ||
 969                              !devname_matches(dev, rv->devname)))
 970                 rv = rv->next;
 971         return rv;
 972 }
 973
 974 static void append_dlist(struct mddev_dev **dlp, struct mddev_dev *list)
 975 {
 976         while (*dlp)
 977                 dlp = &(*dlp)->next;
 978         *dlp = list;
 979 }
 980
 981 struct mddev_dev *conf_get_devs()
 982 {
 983         glob_t globbuf;
 984         struct conf_dev *cd;
 985         int flags = 0;
 986         static struct mddev_dev *dlist = NULL;
 987         unsigned int i;
 988
 989         while (dlist) {
 990                 struct mddev_dev *t = dlist;
 991                 dlist = dlist->next;
 992                 free(t->devname);
 993                 free(t);
 994         }
 995
 996         load_conffile();
 997
 998         if (cdevlist == NULL) {
 999                 /* default to 'partitions' and 'containers' */
1000                 dlist = load_partitions();
1001                 append_dlist(&dlist, load_containers());
1002         }
1003
1004         for (cd = cdevlist; cd; cd = cd->next) {
1005                 if (strcasecmp(cd->name, "partitions") == 0)
1006                         append_dlist(&dlist, load_partitions());
1007                 else if (strcasecmp(cd->name, "containers") == 0)
1008                         append_dlist(&dlist, load_containers());
1009                 else {
1010                         glob(cd->name, flags, NULL, &globbuf);
1011                         flags |= GLOB_APPEND;
1012                 }
1013         }
1014         if (flags & GLOB_APPEND) {
1015                 for (i = 0; i < globbuf.gl_pathc; i++) {
1016                         struct mddev_dev *t;
1017                         t = xcalloc(1, sizeof(*t));
1018                         t->devname = xstrdup(globbuf.gl_pathv[i]);
1019                         t->next = dlist;
1020                         dlist = t;
1021 /*      printf("one dev is %s\n", t->devname);*/
1022                 }
1023                 globfree(&globbuf);
1024         }
1025
1026         return dlist;
1027 }
1028
1029 int conf_test_dev(char *devname)
1030 {
1031         struct conf_dev *cd;
1032         if (cdevlist == NULL)
1033                 /* allow anything by default */
1034                 return 1;
1035         for (cd = cdevlist; cd; cd = cd->next) {
1036                 if (strcasecmp(cd->name, "partitions") == 0)
1037                         return 1;
1038                 if (fnmatch(cd->name, devname, FNM_PATHNAME) == 0)
1039                         return 1;
1040         }
1041         return 0;
1042 }
1043
1044 int conf_test_metadata(const char *version, struct dev_policy *pol, int is_homehost)
1045 {
1046         /* If anyone said 'yes', that sticks.
1047          * else if homehost applies, use that
1048          * else if there is a 'no', say 'no'.
1049          * else 'yes'.
1050          */
1051         struct dev_policy *p;
1052         int no = 0, found_homehost = 0;
1053         load_conffile();
1054
1055         pol = pol_find(pol, pol_auto);
1056         pol_for_each(p, pol, version) {
1057                 if (strcmp(p->value, "yes") == 0)
1058                         return 1;
1059                 if (strcmp(p->value, "homehost") == 0)
1060                         found_homehost = 1;
1061                 if (strcmp(p->value, "no") == 0)
1062                         no = 1;
1063         }
1064         if (is_homehost && found_homehost)
1065                 return 1;
1066         if (no)
1067                 return 0;
1068         return 1;
1069 }
1070
1071 int match_oneof(char *devices, char *devname)
1072 {
1073         /* check if one of the comma separated patterns in devices
1074          * matches devname
1075          */
1076
1077         while (devices && *devices) {
1078                 char patn[1024];
1079                 char *p = devices;
1080                 devices = strchr(devices, ',');
1081                 if (!devices)
1082                         devices = p + strlen(p);
1083                 if (devices-p < 1024) {
1084                         strncpy(patn, p, devices - p);
1085                         patn[devices-p] = 0;
1086                         if (fnmatch(patn, devname, FNM_PATHNAME) == 0)
1087                                 return 1;
1088                 }
1089                 if (*devices == ',')
1090                         devices++;
1091         }
1092         return 0;
1093 }
1094
1095 int devname_matches(char *name, char *match)
1096 {
1097         /* See if the given array name matches the
1098          * given match from config file.
1099          *
1100          * First strip and /dev/md/ or /dev/, then
1101          * see if there might be a numeric match of
1102          *  mdNN with NN
1103          * then just strcmp
1104          */
1105         if (strncmp(name, DEV_MD_DIR, DEV_MD_DIR_LEN) == 0)
1106                 name += DEV_MD_DIR_LEN;
1107         else if (strncmp(name, "/dev/", 5) == 0)
1108                 name += 5;
1109
1110         if (strncmp(match, DEV_MD_DIR, DEV_MD_DIR_LEN) == 0)
1111                 match += DEV_MD_DIR_LEN;
1112         else if (strncmp(match, "/dev/", 5) == 0)
1113                 match += 5;
1114
1115         if (strncmp(name, "md", 2) == 0 && isdigit(name[2]))
1116                 name += 2;
1117         if (strncmp(match, "md", 2) == 0 && isdigit(match[2]))
1118                 match += 2;
1119
1120         return (strcmp(name, match) == 0);
1121 }
1122
1123 int conf_name_is_free(char *name)
1124 {
1125         /* Check if this name is already taken by an ARRAY entry in
1126          * the config file.
1127          * It can be taken either by a match on devname, name, or
1128          * even super-minor.
1129          */
1130         struct mddev_ident *dev;
1131
1132         load_conffile();
1133         for (dev = mddevlist; dev; dev = dev->next) {
1134                 char nbuf[100];
1135                 if (dev->devname && devname_matches(name, dev->devname))
1136                         return 0;
1137                 if (dev->name[0] && devname_matches(name, dev->name))
1138                         return 0;
1139                 sprintf(nbuf, "%d", dev->super_minor);
1140                 if (dev->super_minor != UnSet && devname_matches(name, nbuf))
1141                         return 0;
1142         }
1143         return 1;
1144 }
1145
1146 struct mddev_ident *conf_match(struct supertype *st,
1147                                struct mdinfo *info,
1148                                char *devname,
1149                                int verbose, int *rvp)
1150 {
1151         struct mddev_ident *array_list, *match;
1152         array_list = conf_get_ident(NULL);
1153         match = NULL;
1154         for (; array_list; array_list = array_list->next) {
1155                 if (array_list->uuid_set &&
1156                     same_uuid(array_list->uuid, info->uuid,
1157                               st->ss->swapuuid) == 0) {
1158                         if (verbose >= 2 && array_list->devname)
1159                                 pr_err("UUID differs from %s.\n",
1160                                        array_list->devname);
1161                         continue;
1162                 }
1163                 if (array_list->name[0] &&
1164                     strcasecmp(array_list->name, info->name) != 0) {
1165                         if (verbose >= 2 && array_list->devname)
1166                                 pr_err("Name differs from %s.\n",
1167                                        array_list->devname);
1168                         continue;
1169                 }
1170                 if (array_list->devices && devname &&
1171                     !match_oneof(array_list->devices, devname)) {
1172                         if (verbose >= 2 && array_list->devname)
1173                                 pr_err("Not a listed device for %s.\n",
1174                                        array_list->devname);
1175                         continue;
1176                 }
1177                 if (array_list->super_minor != UnSet &&
1178                     array_list->super_minor != info->array.md_minor) {
1179                         if (verbose >= 2 && array_list->devname)
1180                                 pr_err("Different super-minor to %s.\n",
1181                                        array_list->devname);
1182                         continue;
1183                 }
1184                 if (!array_list->uuid_set && !array_list->name[0] &&
1185                     !array_list->devices && array_list->super_minor == UnSet) {
1186                         if (verbose >= 2 && array_list->devname)
1187                                 pr_err("%s doesn't have any identifying information.\n",
1188                                        array_list->devname);
1189                         continue;
1190                 }
1191                 /* FIXME, should I check raid_disks and level too?? */
1192
1193                 if (match) {
1194                         if (verbose >= 0) {
1195                                 if (match->devname && array_list->devname)
1196                                         pr_err("we match both %s and %s - cannot decide which to use.\n",
1197                                                match->devname,
1198                                                array_list->devname);
1199                                 else
1200                                         pr_err("multiple lines in mdadm.conf match\n");
1201                         }
1202                         if (rvp)
1203                                 *rvp = 2;
1204                         match = NULL;
1205                         break;
1206                 }
1207                 match = array_list;
1208         }
1209         return match;
1210 }
1211
1212 int conf_verify_devnames(struct mddev_ident *array_list)
1213 {
1214         struct mddev_ident *a1, *a2;
1215
1216         for (a1 = array_list; a1; a1 = a1->next) {
1217                 if (!a1->devname)
1218                         continue;
1219                 if (strcmp(a1->devname, "<ignore>") == 0)
1220                         continue;
1221                 for (a2 = a1->next; a2; a2 = a2->next) {
1222                         if (!a2->devname)
1223                                 continue;
1224                         if (strcmp(a1->devname, a2->devname) != 0)
1225                                 continue;
1226
1227                         if (a1->uuid_set && a2->uuid_set) {
1228                                 char nbuf[64];
1229                                 __fname_from_uuid(a1->uuid, 0, nbuf, ':');
1230                                 pr_err("Devices %s and ",
1231                                        nbuf);
1232                                 __fname_from_uuid(a2->uuid, 0, nbuf, ':');
1233                                 fprintf(stderr,
1234                                         "%s have the same name: %s\n",
1235                                         nbuf, a1->devname);
1236                         } else
1237                                 pr_err("Device %s given twice in config file\n", a1->devname);
1238                         return 1;
1239                 }
1240         }
1241
1242         return 0;
1243 }