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