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