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