config.c

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