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