]> git.ipfire.org Git - thirdparty/mdadm.git/blobdiff - Monitor.c
Check all member devices in enough_fd
[thirdparty/mdadm.git] / Monitor.c
index cbc5d0fe9ebf5ca3a2b6de6f06ad8276dd8d85d7..101bca4cc8053198a0a09ec0f87be96e5a4687c3 100644 (file)
--- a/Monitor.c
+++ b/Monitor.c
@@ -1,7 +1,7 @@
 /*
  * mdadm - manage Linux "md" devices aka RAID arrays.
  *
- * Copyright (C) 2001-2006 Neil Brown <neilb@suse.de>
+ * Copyright (C) 2001-2009 Neil Brown <neilb@suse.de>
  *
  *
  *    This program is free software; you can redistribute it and/or modify
  *    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  *
  *    Author: Neil Brown
- *    Email: <neilb@cse.unsw.edu.au>
- *    Paper: Neil Brown
- *           School of Computer Science and Engineering
- *           The University of New South Wales
- *           Sydney, 2052
- *           Australia
+ *    Email: <neilb@suse.de>
  */
 
 #include       "mdadm.h"
 #include       <limits.h>
 #include       <syslog.h>
 
-static void alert(char *event, char *dev, char *disc, char *mailaddr, char *mailfrom,
-                 char *cmd, int dosyslog);
-
-static char *percentalerts[] = {
-       "RebuildStarted",
-       "Rebuild20",
-       "Rebuild40",
-       "Rebuild60",
-       "Rebuild80",
-};
-
 /* The largest number of disks current arrays can manage is 384
  * This really should be dynamically, but that will have to wait
  * At least it isn't MD_SB_DISKS.
  */
 #define MaxDisks 384
-int Monitor(mddev_dev_t devlist,
+struct state {
+       char *devname;
+       int devnum;     /* to sync with mdstat info */
+       long utime;
+       int err;
+       char *spare_group;
+       int active, working, failed, spare, raid;
+       int expected_spares;
+       int devstate[MaxDisks];
+       dev_t devid[MaxDisks];
+       int percent;
+       int parent_dev; /* For subarray, devnum of parent.
+                        * For others, NoMdDev
+                        */
+       struct supertype *metadata;
+       struct state *subarray;/* for a container it is a link to first subarray
+                               * for a subarray it is a link to next subarray
+                               * in the same container */
+       struct state *parent;  /* for a subarray it is a link to its container
+                               */
+       struct state *next;
+};
+
+struct alert_info {
+       char *mailaddr;
+       char *mailfrom;
+       char *alert_cmd;
+       int dosyslog;
+};
+static int make_daemon(char *pidfile);
+static int check_one_sharer(int scan);
+static void alert(char *event, char *dev, char *disc, struct alert_info *info);
+static int check_array(struct state *st, struct mdstat_ent *mdstat,
+                      int test, struct alert_info *info,
+                      int increments);
+static int add_new_arrays(struct mdstat_ent *mdstat, struct state **statelist,
+                         int test, struct alert_info *info);
+static void try_spare_migration(struct state *statelist, struct alert_info *info);
+static void link_containers_with_subarrays(struct state *list);
+
+int Monitor(struct mddev_dev *devlist,
            char *mailaddr, char *alert_cmd,
            int period, int daemonise, int scan, int oneshot,
-           int dosyslog, int test, char* pidfile)
+           int dosyslog, int test, char *pidfile, int increments,
+           int share)
 {
        /*
         * Every few seconds, scan every md device looking for changes
@@ -82,8 +107,8 @@ int Monitor(mddev_dev_t devlist,
         *      An active device had a reverse transition
         *    RebuildStarted
         *      percent went from -1 to +ve
-        *    Rebuild20 Rebuild40 Rebuild60 Rebuild80
-        *      percent went from below to not-below that number
+        *    RebuildNN
+        *      percent went from below to not-below NN%
         *    DeviceDisappeared
         *      Couldn't access a device which was previously visible
         *
@@ -98,22 +123,11 @@ int Monitor(mddev_dev_t devlist,
         * that appears in /proc/mdstat
         */
 
-       struct state {
-               char *devname;
-               int devnum;     /* to sync with mdstat info */
-               long utime;
-               int err;
-               char *spare_group;
-               int active, working, failed, spare, raid;
-               int expected_spares;
-               int devstate[MaxDisks];
-               int devid[MaxDisks];
-               int percent;
-               struct state *next;
-       } *statelist = NULL;
+       struct state *statelist = NULL;
        int finished = 0;
        struct mdstat_ent *mdstat = NULL;
        char *mailfrom = NULL;
+       struct alert_info info;
 
        if (!mailaddr) {
                mailaddr = conf_get_mailaddr();
@@ -129,76 +143,63 @@ int Monitor(mddev_dev_t devlist,
                        fprintf(stderr, Name ": Monitor using program \"%s\" from config file\n",
                               alert_cmd);
        }
-       if (scan && !mailaddr && !alert_cmd) {
+       if (scan && !mailaddr && !alert_cmd && !dosyslog) {
                fprintf(stderr, Name ": No mail address or alert command - not monitoring.\n");
                return 1;
        }
+       info.alert_cmd = alert_cmd;
+       info.mailaddr = mailaddr;
+       info.mailfrom = mailfrom;
+       info.dosyslog = dosyslog;
 
        if (daemonise) {
-               int pid = fork();
-               if (pid > 0) {
-                       if (!pidfile)
-                               printf("%d\n", pid);
-                       else {
-                               FILE *pid_file;
-                               pid_file=fopen(pidfile, "w");
-                               if (!pid_file)
-                                       perror("cannot create pid file");
-                               else {
-                                       fprintf(pid_file,"%d\n", pid);
-                                       fclose(pid_file);
-                               }
-                       }
-                       return 0;
-               }
-               if (pid < 0) {
-                       perror("daemonise");
-                       return 1;
-               }
-               close(0);
-               open("/dev/null", O_RDWR);
-               dup2(0,1);
-               dup2(0,2);
-               setsid();
+               int rv = make_daemon(pidfile);
+               if (rv >= 0)
+                       return rv;
        }
 
+       if (share) 
+               if (check_one_sharer(scan))
+                       return 1;
+
        if (devlist == NULL) {
-               mddev_ident_t mdlist = conf_get_ident(NULL);
+               struct mddev_ident *mdlist = conf_get_ident(NULL);
                for (; mdlist; mdlist=mdlist->next) {
                        struct state *st;
                        if (mdlist->devname == NULL)
                                continue;
-                       st = malloc(sizeof *st);
+                       if (strcasecmp(mdlist->devname, "<ignore>") == 0)
+                               continue;
+                       st = calloc(1, sizeof *st);
                        if (st == NULL)
                                continue;
-                       st->devname = strdup(mdlist->devname);
-                       st->utime = 0;
+                       if (mdlist->devname[0] == '/')
+                               st->devname = strdup(mdlist->devname);
+                       else {
+                               st->devname = malloc(8+strlen(mdlist->devname)+1);
+                               strcpy(strcpy(st->devname, "/dev/md/"),
+                                      mdlist->devname);
+                       }
                        st->next = statelist;
-                       st->err = 0;
                        st->devnum = INT_MAX;
                        st->percent = -2;
                        st->expected_spares = mdlist->spare_disks;
                        if (mdlist->spare_group)
                                st->spare_group = strdup(mdlist->spare_group);
-                       else
-                               st->spare_group = NULL;
                        statelist = st;
                }
        } else {
-               mddev_dev_t dv;
+               struct mddev_dev *dv;
                for (dv=devlist ; dv; dv=dv->next) {
-                       mddev_ident_t mdlist = conf_get_ident(dv->devname);
-                       struct state *st = malloc(sizeof *st);
+                       struct mddev_ident *mdlist = conf_get_ident(dv->devname);
+                       struct state *st = calloc(1, sizeof *st);
                        if (st == NULL)
                                continue;
                        st->devname = strdup(dv->devname);
-                       st->utime = 0;
                        st->next = statelist;
-                       st->err = 0;
                        st->devnum = INT_MAX;
                        st->percent = -2;
                        st->expected_spares = -1;
-                       st->spare_group = NULL;
                        if (mdlist) {
                                st->expected_spares = mdlist->spare_disks;
                                if (mdlist->spare_group)
@@ -212,281 +213,27 @@ int Monitor(mddev_dev_t devlist,
        while (! finished) {
                int new_found = 0;
                struct state *st;
+               int anydegraded = 0;
 
                if (mdstat)
                        free_mdstat(mdstat);
                mdstat = mdstat_read(oneshot?0:1, 0);
 
-               for (st=statelist; st; st=st->next) {
-                       struct { int state, major, minor; } info[MaxDisks];
-                       mdu_array_info_t array;
-                       struct mdstat_ent *mse = NULL, *mse2;
-                       char *dev = st->devname;
-                       int fd;
-                       unsigned int i;
-
-                       if (test)
-                               alert("TestMessage", dev, NULL, mailaddr, mailfrom, alert_cmd, dosyslog);
-                       fd = open(dev, O_RDONLY);
-                       if (fd < 0) {
-                               if (!st->err)
-                                       alert("DeviceDisappeared", dev, NULL,
-                                             mailaddr, mailfrom, alert_cmd, dosyslog);
-/*                                     fprintf(stderr, Name ": cannot open %s: %s\n",
-                                               dev, strerror(errno));
-*/                             st->err=1;
-                               continue;
-                       }
-                       fcntl(fd, F_SETFD, FD_CLOEXEC);
-                       if (ioctl(fd, GET_ARRAY_INFO, &array)<0) {
-                               if (!st->err)
-                                       alert("DeviceDisappeared", dev, NULL,
-                                             mailaddr, mailfrom, alert_cmd, dosyslog);
-/*                                     fprintf(stderr, Name ": cannot get array info for %s: %s\n",
-                                               dev, strerror(errno));
-*/                             st->err=1;
-                               close(fd);
-                               continue;
-                       }
-                       /* It's much easier to list what array levels can't
-                        * have a device disappear than all of them that can
-                        */
-                       if (array.level == 0 || array.level == -1) {
-                               if (!st->err)
-                                       alert("DeviceDisappeared", dev, "Wrong-Level",
-                                             mailaddr, mailfrom, alert_cmd, dosyslog);
-                               st->err = 1;
-                               close(fd);
-                               continue;
-                       }
-                       if (st->devnum == INT_MAX) {
-                               struct stat stb;
-                               if (fstat(fd, &stb) == 0 &&
-                                   (S_IFMT&stb.st_mode)==S_IFBLK) {
-                                       if (major(stb.st_rdev) == MD_MAJOR)
-                                               st->devnum = minor(stb.st_rdev);
-                                       else
-                                               st->devnum = -1- (minor(stb.st_rdev)>>6);
-                               }
-                       }
-
-                       for (mse2 = mdstat ; mse2 ; mse2=mse2->next)
-                               if (mse2->devnum == st->devnum) {
-                                       mse2->devnum = INT_MAX; /* flag it as "used" */
-                                       mse = mse2;
-                               }
-
-                       if (st->utime == array.utime &&
-                           st->failed == array.failed_disks &&
-                           st->working == array.working_disks &&
-                           st->spare == array.spare_disks &&
-                           (mse == NULL  || (
-                                   mse->percent == st->percent
-                                   ))) {
-                               close(fd);
-                               st->err = 0;
-                               continue;
-                       }
-                       if (st->utime == 0 && /* new array */
-                           mse &&      /* is in /proc/mdstat */
-                           mse->pattern && strchr(mse->pattern, '_') /* degraded */
-                               )
-                               alert("DegradedArray", dev, NULL, mailaddr, mailfrom, alert_cmd, dosyslog);
-
-                       if (st->utime == 0 && /* new array */
-                           st->expected_spares > 0 &&
-                           array.spare_disks < st->expected_spares)
-                               alert("SparesMissing", dev, NULL, mailaddr, mailfrom, alert_cmd, dosyslog);
-                       if (mse &&
-                           st->percent == -1 &&
-                           mse->percent >= 0)
-                               alert("RebuildStarted", dev, NULL, mailaddr, mailfrom, alert_cmd, dosyslog);
-                       if (mse &&
-                           st->percent >= 0 &&
-                           mse->percent >= 0 &&
-                           (mse->percent / 20) > (st->percent / 20))
-                               alert(percentalerts[mse->percent/20],
-                                     dev, NULL, mailaddr, mailfrom, alert_cmd, dosyslog);
-
-                       if (mse &&
-                           mse->percent == -1 &&
-                           st->percent >= 0) {
-                               /* Rebuild/sync/whatever just finished.
-                                * If there is a number in /mismatch_cnt,
-                                * we should report that.
-                                */
-                               struct mdinfo *sra =
-                                      sysfs_read(-1, st->devnum, GET_MISMATCH);
-                               if (sra && sra->mismatch_cnt > 0) {
-                                       char cnt[40];
-                                       sprintf(cnt, " mismatches found: %d", sra->mismatch_cnt);
-                                       alert("RebuildFinished", dev, cnt, mailaddr, mailfrom, alert_cmd, dosyslog);
-                               } else
-                                       alert("RebuildFinished", dev, NULL, mailaddr, mailfrom, alert_cmd, dosyslog);
-                               if (sra)
-                                       free(sra);
-                       }
-
-                       if (mse)
-                               st->percent = mse->percent;
-
-
-                       for (i=0; i<MaxDisks && i <= array.raid_disks + array.nr_disks;
-                            i++) {
-                               mdu_disk_info_t disc;
-                               disc.number = i;
-                               if (ioctl(fd, GET_DISK_INFO, &disc) >= 0) {
-                                       info[i].state = disc.state;
-                                       info[i].major = disc.major;
-                                       info[i].minor = disc.minor;
-                               } else
-                                       info[i].major = info[i].minor = 0;
-                       }
-                       close(fd);
-
-                       for (i=0; i<MaxDisks; i++) {
-                               mdu_disk_info_t disc = {0};
-                               int newstate=0;
-                               int change;
-                               char *dv = NULL;
-                               disc.number = i;
-                               if (i > array.raid_disks + array.nr_disks) {
-                                       newstate = 0;
-                                       disc.major = disc.minor = 0;
-                               } else if (info[i].major || info[i].minor) {
-                                       newstate = info[i].state;
-                                       dv = map_dev(info[i].major, info[i].minor, 1);
-                                       disc.state = newstate;
-                                       disc.major = info[i].major;
-                                       disc.minor = info[i].minor;
-                               } else if (mse &&  mse->pattern && i < strlen(mse->pattern)) {
-                                       switch(mse->pattern[i]) {
-                                       case 'U': newstate = 6 /* ACTIVE/SYNC */; break;
-                                       case '_': newstate = 0; break;
-                                       }
-                                       disc.major = disc.minor = 0;
-                               }
-                               if (dv == NULL && st->devid[i])
-                                       dv = map_dev(major(st->devid[i]),
-                                                    minor(st->devid[i]), 1);
-                               change = newstate ^ st->devstate[i];
-                               if (st->utime && change && !st->err) {
-                                       if (i < (unsigned)array.raid_disks &&
-                                           (((newstate&change)&(1<<MD_DISK_FAULTY)) ||
-                                            ((st->devstate[i]&change)&(1<<MD_DISK_ACTIVE)) ||
-                                            ((st->devstate[i]&change)&(1<<MD_DISK_SYNC)))
-                                               )
-                                               alert("Fail", dev, dv, mailaddr, mailfrom, alert_cmd, dosyslog);
-                                       else if (i >= (unsigned)array.raid_disks &&
-                                                (disc.major || disc.minor) &&
-                                                st->devid[i] == makedev(disc.major, disc.minor) &&
-                                                ((newstate&change)&(1<<MD_DISK_FAULTY))
-                                               )
-                                               alert("FailSpare", dev, dv, mailaddr, mailfrom, alert_cmd, dosyslog);
-                                       else if (i < (unsigned)array.raid_disks &&
-                                                (((st->devstate[i]&change)&(1<<MD_DISK_FAULTY)) ||
-                                                 ((newstate&change)&(1<<MD_DISK_ACTIVE)) ||
-                                                 ((newstate&change)&(1<<MD_DISK_SYNC)))
-                                               )
-                                               alert("SpareActive", dev, dv, mailaddr, mailfrom, alert_cmd, dosyslog);
-                               }
-                               st->devstate[i] = newstate;
-                               st->devid[i] = makedev(disc.major, disc.minor);
-                       }
-                       st->active = array.active_disks;
-                       st->working = array.working_disks;
-                       st->spare = array.spare_disks;
-                       st->failed = array.failed_disks;
-                       st->utime = array.utime;
-                       st->raid = array.raid_disks;
-                       st->err = 0;
-               }
+               for (st=statelist; st; st=st->next)
+                       if (check_array(st, mdstat, test, &info, increments))
+                               anydegraded = 1;
+               
                /* now check if there are any new devices found in mdstat */
-               if (scan) {
-                       struct mdstat_ent *mse;
-                       for (mse=mdstat; mse; mse=mse->next)
-                               if (mse->devnum != INT_MAX &&
-                                   mse->level &&
-                                   (strcmp(mse->level, "raid0")!=0 &&
-                                    strcmp(mse->level, "linear")!=0)
-                                       ) {
-                                       struct state *st = malloc(sizeof *st);
-                                       mdu_array_info_t array;
-                                       int fd;
-                                       if (st == NULL)
-                                               continue;
-                                       st->devname = strdup(get_md_name(mse->devnum));
-                                       if ((fd = open(st->devname, O_RDONLY)) < 0 ||
-                                           ioctl(fd, GET_ARRAY_INFO, &array)< 0) {
-                                               /* no such array */
-                                               if (fd >=0) close(fd);
-                                               put_md_name(st->devname);
-                                               free(st->devname);
-                                               free(st);
-                                               continue;
-                                       }
-                                       close(fd);
-                                       st->utime = 0;
-                                       st->next = statelist;
-                                       st->err = 1;
-                                       st->devnum = mse->devnum;
-                                       st->percent = -2;
-                                       st->spare_group = NULL;
-                                       st->expected_spares = -1;
-                                       statelist = st;
-                                       alert("NewArray", st->devname, NULL, mailaddr, mailfrom, alert_cmd, dosyslog);
-                                       new_found = 1;
-                               }
-               }
+               if (scan)
+                       new_found = add_new_arrays(mdstat, &statelist, test,
+                                                  &info);
+
                /* If an array has active < raid && spare == 0 && spare_group != NULL
                 * Look for another array with spare > 0 and active == raid and same spare_group
                 *  if found, choose a device and hotremove/hotadd
                 */
-               for (st = statelist; st; st=st->next)
-                       if (st->active < st->raid &&
-                           st->spare == 0 &&
-                           st->spare_group != NULL) {
-                               struct state *st2;
-                               for (st2=statelist ; st2 ; st2=st2->next)
-                                       if (st2 != st &&
-                                           st2->spare > 0 &&
-                                           st2->active == st2->raid &&
-                                           st2->spare_group != NULL &&
-                                           strcmp(st->spare_group, st2->spare_group) == 0) {
-                                               /* try to remove and add */
-                                               int fd1 = open(st->devname, O_RDONLY);
-                                               int fd2 = open(st2->devname, O_RDONLY);
-                                               int dev = -1;
-                                               int d;
-                                               if (fd1 < 0 || fd2 < 0) {
-                                                       if (fd1>=0) close(fd1);
-                                                       if (fd2>=0) close(fd2);
-                                                       continue;
-                                               }
-                                               for (d=st2->raid; d < MaxDisks; d++) {
-                                                       if (st2->devid[d] > 0 &&
-                                                           st2->devstate[d] == 0) {
-                                                               dev = st2->devid[d];
-                                                               break;
-                                                       }
-                                               }
-                                               if (dev > 0) {
-                                                       if (ioctl(fd2, HOT_REMOVE_DISK,
-                                                                 (unsigned long)dev) == 0) {
-                                                               if (ioctl(fd1, HOT_ADD_DISK,
-                                                                         (unsigned long)dev) == 0) {
-                                                                       alert("MoveSpare", st->devname, st2->devname, mailaddr, mailfrom, alert_cmd, dosyslog);
-                                                                       close(fd1);
-                                                                       close(fd2);
-                                                                       break;
-                                                               }
-                                                               else ioctl(fd2, HOT_ADD_DISK, (unsigned long) dev);
-                                                       }
-                                               }
-                                               close(fd1);
-                                               close(fd2);
-                                       }
-                       }
+               if (share && anydegraded)
+                       try_spare_migration(statelist, &info);
                if (!new_found) {
                        if (oneshot)
                                break;
@@ -500,18 +247,100 @@ int Monitor(mddev_dev_t devlist,
        return 0;
 }
 
+static int make_daemon(char *pidfile)
+{
+       /* Return:
+        * -1 in the forked daemon
+        *  0 in the parent
+        *  1 on error
+        * so a none-negative becomes the exit code.
+        */
+       int pid = fork();
+       if (pid > 0) {
+               if (!pidfile)
+                       printf("%d\n", pid);
+               else {
+                       FILE *pid_file;
+                       pid_file=fopen(pidfile, "w");
+                       if (!pid_file)
+                               perror("cannot create pid file");
+                       else {
+                               fprintf(pid_file,"%d\n", pid);
+                               fclose(pid_file);
+                       }
+               }
+               return 0;
+       }
+       if (pid < 0) {
+               perror("daemonise");
+               return 1;
+       }
+       close(0);
+       open("/dev/null", O_RDWR);
+       dup2(0,1);
+       dup2(0,2);
+       setsid();
+       return -1;
+}
 
-static void alert(char *event, char *dev, char *disc, char *mailaddr, char *mailfrom, char *cmd,
-                 int dosyslog)
+static int check_one_sharer(int scan)
+{
+       int pid, rv;
+       FILE *fp;
+       char dir[20];
+       struct stat buf;
+       fp = fopen("/var/run/mdadm/autorebuild.pid", "r");
+       if (fp) {
+               if (fscanf(fp, "%d", &pid) != 1)
+                       pid = -1;
+               sprintf(dir, "/proc/%d", pid);
+               rv = stat(dir, &buf);
+               if (rv != -1) {
+                       if (scan) {
+                               fprintf(stderr, Name ": Only one "
+                                       "autorebuild process allowed"
+                                       " in scan mode, aborting\n");
+                               fclose(fp);
+                               return 1;
+                       } else {
+                               fprintf(stderr, Name ": Warning: One"
+                                       " autorebuild process already"
+                                       " running.\n");
+                       }
+               }
+               fclose(fp);
+       }
+       if (scan) {
+               if (mkdir("/var/run/mdadm", S_IRWXU) < 0 &&
+                   errno != EEXIST) {
+                       fprintf(stderr, Name ": Can't create "
+                               "autorebuild.pid file\n");
+               } else {
+                       fp = fopen("/var/run/mdadm/autorebuild.pid", "w");
+                       if (!fp)
+                               fprintf(stderr, Name ": Cannot create"
+                                       " autorebuild.pid"
+                                       "file\n");
+                       else {
+                               pid = getpid();
+                               fprintf(fp, "%d\n", pid);
+                               fclose(fp);
+                       }
+               }
+       }
+       return 0;
+}
+
+static void alert(char *event, char *dev, char *disc, struct alert_info *info)
 {
        int priority;
 
-       if (!cmd && !mailaddr) {
+       if (!info->alert_cmd && !info->mailaddr && !info->dosyslog) {
                time_t now = time(0);
 
                printf("%1.15s: %s on %s %s\n", ctime(&now)+4, event, dev, disc?disc:"unknown device");
        }
-       if (cmd) {
+       if (info->alert_cmd) {
                int pid = fork();
                switch(pid) {
                default:
@@ -520,11 +349,12 @@ static void alert(char *event, char *dev, char *disc, char *mailaddr, char *mail
                case -1:
                        break;
                case 0:
-                       execl(cmd, cmd, event, dev, disc, NULL);
+                       execl(info->alert_cmd, info->alert_cmd,
+                             event, dev, disc, NULL);
                        exit(2);
                }
        }
-       if (mailaddr &&
+       if (info->mailaddr &&
            (strncmp(event, "Fail", 4)==0 ||
             strncmp(event, "Test", 4)==0 ||
             strncmp(event, "Spares", 6)==0 ||
@@ -535,20 +365,27 @@ static void alert(char *event, char *dev, char *disc, char *mailaddr, char *mail
                        char hname[256];
                        gethostname(hname, sizeof(hname));
                        signal(SIGPIPE, SIG_IGN);
-                       if (mailfrom)
-                               fprintf(mp, "From: %s\n", mailfrom);
+                       if (info->mailfrom)
+                               fprintf(mp, "From: %s\n", info->mailfrom);
                        else
                                fprintf(mp, "From: " Name " monitoring <root>\n");
-                       fprintf(mp, "To: %s\n", mailaddr);
-                       fprintf(mp, "Subject: %s event on %s:%s\n\n", event, dev, hname);
+                       fprintf(mp, "To: %s\n", info->mailaddr);
+                       fprintf(mp, "Subject: %s event on %s:%s\n\n",
+                               event, dev, hname);
 
-                       fprintf(mp, "This is an automatically generated mail message from " Name "\n");
+                       fprintf(mp,
+                               "This is an automatically generated"
+                               " mail message from " Name "\n");
                        fprintf(mp, "running on %s\n\n", hname);
 
-                       fprintf(mp, "A %s event had been detected on md device %s.\n\n", event, dev);
+                       fprintf(mp,
+                               "A %s event had been detected on"
+                               " md device %s.\n\n", event, dev);
 
                        if (disc && disc[0] != ' ')
-                               fprintf(mp, "It could be related to component device %s.\n\n", disc);
+                               fprintf(mp,
+                                       "It could be related to"
+                                       " component device %s.\n\n", disc);
                        if (disc && disc[0] == ' ')
                                fprintf(mp, "Extra information:%s.\n\n", disc);
 
@@ -558,18 +395,19 @@ static void alert(char *event, char *dev, char *disc, char *mailaddr, char *mail
                        if (mdstat) {
                                char buf[8192];
                                int n;
-                               fprintf(mp, "\nP.S. The /proc/mdstat file currently contains the following:\n\n");
+                               fprintf(mp,
+                                       "\nP.S. The /proc/mdstat file"
+                                       " currently contains the following:\n\n");
                                while ( (n=fread(buf, 1, sizeof(buf), mdstat)) > 0)
-                                       n=fwrite(buf, 1, n, mp); /* yes, i don't care about the result */
+                                       n=fwrite(buf, 1, n, mp);
                                fclose(mdstat);
                        }
-                       fclose(mp);
+                       pclose(mp);
                }
-
        }
 
        /* log the event to syslog maybe */
-       if (dosyslog) {
+       if (info->dosyslog) {
                /* Log at a different severity depending on the event.
                 *
                 * These are the critical events:  */
@@ -587,10 +425,534 @@ static void alert(char *event, char *dev, char *disc, char *mailaddr, char *mail
                        priority = LOG_INFO;
 
                if (disc)
-                       syslog(priority, "%s event detected on md device %s, component device %s", event, dev, disc);
+                       syslog(priority,
+                              "%s event detected on md device %s,"
+                              " component device %s", event, dev, disc);
+               else
+                       syslog(priority,
+                              "%s event detected on md device %s",
+                              event, dev);
+       }
+}
+
+static int check_array(struct state *st, struct mdstat_ent *mdstat,
+                      int test, struct alert_info *ainfo,
+                      int increments)
+{
+       /* Update the state 'st' to reflect any changes shown in mdstat,
+        * or found by directly examining the array, and return
+        * '1' if the array is degraded, or '0' if it is optimal (or dead).
+        */
+       struct { int state, major, minor; } info[MaxDisks];
+       mdu_array_info_t array;
+       struct mdstat_ent *mse = NULL, *mse2;
+       char *dev = st->devname;
+       int fd;
+       int i;
+       int remaining_disks;
+       int last_disk;
+
+       if (test)
+               alert("TestMessage", dev, NULL, ainfo);
+       fd = open(dev, O_RDONLY);
+       if (fd < 0) {
+               if (!st->err)
+                       alert("DeviceDisappeared", dev, NULL, ainfo);
+               st->err=1;
+               return 0;
+       }
+       fcntl(fd, F_SETFD, FD_CLOEXEC);
+       if (ioctl(fd, GET_ARRAY_INFO, &array)<0) {
+               if (!st->err)
+                       alert("DeviceDisappeared", dev, NULL, ainfo);
+               st->err=1;
+               close(fd);
+               return 0;
+       }
+       /* It's much easier to list what array levels can't
+        * have a device disappear than all of them that can
+        */
+       if (array.level == 0 || array.level == -1) {
+               if (!st->err)
+                       alert("DeviceDisappeared", dev, "Wrong-Level", ainfo);
+               st->err = 1;
+               close(fd);
+               return 0;
+       }
+       if (st->devnum == INT_MAX) {
+               struct stat stb;
+               if (fstat(fd, &stb) == 0 &&
+                   (S_IFMT&stb.st_mode)==S_IFBLK) {
+                       if (major(stb.st_rdev) == MD_MAJOR)
+                               st->devnum = minor(stb.st_rdev);
+                       else
+                               st->devnum = -1- (minor(stb.st_rdev)>>6);
+               }
+       }
+
+       for (mse2 = mdstat ; mse2 ; mse2=mse2->next)
+               if (mse2->devnum == st->devnum) {
+                       mse2->devnum = INT_MAX; /* flag it as "used" */
+                       mse = mse2;
+               }
+
+       if (!mse) {
+               /* duplicated array in statelist
+                * or re-created after reading mdstat*/
+               st->err = 1;
+               close(fd);
+               return 0;
+       }
+       /* this array is in /proc/mdstat */
+       if (array.utime == 0)
+               /* external arrays don't update utime, so
+                * just make sure it is always different. */
+               array.utime = st->utime + 1;;
+
+       if (st->utime == array.utime &&
+           st->failed == array.failed_disks &&
+           st->working == array.working_disks &&
+           st->spare == array.spare_disks &&
+           (mse == NULL  || (
+                   mse->percent == st->percent
+                   ))) {
+               close(fd);
+               st->err = 0;
+               if ((st->active < st->raid) && st->spare == 0)
+                       return 1;
                else
-                       syslog(priority, "%s event detected on md device %s", event, dev);
+                       return 0;
+       }
+       if (st->utime == 0 && /* new array */
+           mse->pattern && strchr(mse->pattern, '_') /* degraded */
+               )
+               alert("DegradedArray", dev, NULL, ainfo);
+
+       if (st->utime == 0 && /* new array */
+           st->expected_spares > 0 &&
+           array.spare_disks < st->expected_spares)
+               alert("SparesMissing", dev, NULL, ainfo);
+       if (st->percent == -1 &&
+           mse->percent >= 0)
+               alert("RebuildStarted", dev, NULL, ainfo);
+       if (st->percent >= 0 &&
+           mse->percent >= 0 &&
+           (mse->percent / increments) > (st->percent / increments)) {
+               char percentalert[15]; // "RebuildNN" (10 chars) or "RebuildStarted" (15 chars)
+
+               if((mse->percent / increments) == 0)
+                       snprintf(percentalert, sizeof(percentalert), "RebuildStarted");
+               else
+                       snprintf(percentalert, sizeof(percentalert), "Rebuild%02d", mse->percent);
+
+               alert(percentalert, dev, NULL, ainfo);
+       }
+
+       if (mse->percent == -1 &&
+           st->percent >= 0) {
+               /* Rebuild/sync/whatever just finished.
+                * If there is a number in /mismatch_cnt,
+                * we should report that.
+                */
+               struct mdinfo *sra =
+                       sysfs_read(-1, st->devnum, GET_MISMATCH);
+               if (sra && sra->mismatch_cnt > 0) {
+                       char cnt[40];
+                       sprintf(cnt, " mismatches found: %d", sra->mismatch_cnt);
+                       alert("RebuildFinished", dev, cnt, ainfo);
+               } else
+                       alert("RebuildFinished", dev, NULL, ainfo);
+               if (sra)
+                       free(sra);
+       }
+       st->percent = mse->percent;
+
+       remaining_disks = array.nr_disks;
+       for (i=0; i<MaxDisks && remaining_disks > 0;
+            i++) {
+               mdu_disk_info_t disc;
+               disc.number = i;
+               if (ioctl(fd, GET_DISK_INFO, &disc) >= 0) {
+                       info[i].state = disc.state;
+                       info[i].major = disc.major;
+                       info[i].minor = disc.minor;
+                       if (disc.major || disc.minor)
+                               remaining_disks --;
+               } else
+                       info[i].major = info[i].minor = 0;
+       }
+       last_disk = i;
+
+       if (mse->metadata_version &&
+           strncmp(mse->metadata_version, "external:", 9) == 0 &&
+           is_subarray(mse->metadata_version+9))
+               st->parent_dev =
+                       devname2devnum(mse->metadata_version+10);
+       else
+               st->parent_dev = NoMdDev;
+       if (st->metadata == NULL &&
+           st->parent_dev == NoMdDev)
+               st->metadata = super_by_fd(fd, NULL);
+
+       close(fd);
+
+       for (i=0; i<MaxDisks; i++) {
+               mdu_disk_info_t disc = {0,0,0,0,0};
+               int newstate=0;
+               int change;
+               char *dv = NULL;
+               disc.number = i;
+               if (i >= last_disk) {
+                       newstate = 0;
+                       disc.major = disc.minor = 0;
+               } else if (info[i].major || info[i].minor) {
+                       newstate = info[i].state;
+                       dv = map_dev(info[i].major, info[i].minor, 1);
+                       disc.state = newstate;
+                       disc.major = info[i].major;
+                       disc.minor = info[i].minor;
+               } else if (mse &&  mse->pattern && i < (int)strlen(mse->pattern)) {
+                       switch(mse->pattern[i]) {
+                       case 'U': newstate = 6 /* ACTIVE/SYNC */; break;
+                       case '_': newstate = 8 /* REMOVED */; break;
+                       }
+                       disc.major = disc.minor = 0;
+               }
+               if (dv == NULL && st->devid[i])
+                       dv = map_dev(major(st->devid[i]),
+                                    minor(st->devid[i]), 1);
+               change = newstate ^ st->devstate[i];
+               if (st->utime && change && !st->err) {
+                       if (i < array.raid_disks &&
+                           (((newstate&change)&(1<<MD_DISK_FAULTY)) ||
+                            ((st->devstate[i]&change)&(1<<MD_DISK_ACTIVE)) ||
+                            ((st->devstate[i]&change)&(1<<MD_DISK_SYNC)))
+                               )
+                               alert("Fail", dev, dv, ainfo);
+                       else if (i >= array.raid_disks &&
+                                (disc.major || disc.minor) &&
+                                st->devid[i] == makedev(disc.major, disc.minor) &&
+                                ((newstate&change)&(1<<MD_DISK_FAULTY))
+                               )
+                               alert("FailSpare", dev, dv, ainfo);
+                       else if (i < array.raid_disks &&
+                                ! (newstate & (1<<MD_DISK_REMOVED)) &&
+                                (((st->devstate[i]&change)&(1<<MD_DISK_FAULTY)) ||
+                                 ((newstate&change)&(1<<MD_DISK_ACTIVE)) ||
+                                 ((newstate&change)&(1<<MD_DISK_SYNC)))
+                               )
+                               alert("SpareActive", dev, dv, ainfo);
+               }
+               st->devstate[i] = newstate;
+               st->devid[i] = makedev(disc.major, disc.minor);
        }
+       st->active = array.active_disks;
+       st->working = array.working_disks;
+       st->spare = array.spare_disks;
+       st->failed = array.failed_disks;
+       st->utime = array.utime;
+       st->raid = array.raid_disks;
+       st->err = 0;
+       if ((st->active < st->raid) && st->spare == 0)
+               return 1;
+       return 0;
+}
+
+static int add_new_arrays(struct mdstat_ent *mdstat, struct state **statelist,
+                         int test, struct alert_info *info)
+{
+       struct mdstat_ent *mse;
+       int new_found = 0;
+
+       for (mse=mdstat; mse; mse=mse->next)
+               if (mse->devnum != INT_MAX &&
+                   (!mse->level  || /* retrieve containers */
+                    (strcmp(mse->level, "raid0") != 0 &&
+                     strcmp(mse->level, "linear") != 0))
+                       ) {
+                       struct state *st = calloc(1, sizeof *st);
+                       mdu_array_info_t array;
+                       int fd;
+                       if (st == NULL)
+                               continue;
+                       st->devname = strdup(get_md_name(mse->devnum));
+                       if ((fd = open(st->devname, O_RDONLY)) < 0 ||
+                           ioctl(fd, GET_ARRAY_INFO, &array)< 0) {
+                               /* no such array */
+                               if (fd >=0) close(fd);
+                               put_md_name(st->devname);
+                               free(st->devname);
+                               if (st->metadata) {
+                                       st->metadata->ss->free_super(st->metadata);
+                                       free(st->metadata);
+                               }
+                               free(st);
+                               continue;
+                       }
+                       close(fd);
+                       st->next = *statelist;
+                       st->err = 1;
+                       st->devnum = mse->devnum;
+                       st->percent = -2;
+                       st->expected_spares = -1;
+                       if (mse->metadata_version &&
+                           strncmp(mse->metadata_version, "external:", 9) == 0 &&
+                           is_subarray(mse->metadata_version+9))
+                               st->parent_dev =
+                                       devname2devnum(mse->metadata_version+10);
+                       else
+                               st->parent_dev = NoMdDev;
+                       *statelist = st;
+                       if (test)
+                               alert("TestMessage", st->devname, NULL, info);
+                       alert("NewArray", st->devname, NULL, info);
+                       new_found = 1;
+               }
+       return new_found;
+}
+
+static int get_min_spare_size_required(struct state *st, unsigned long long *sizep)
+{
+       int fd;
+
+       if (!st->metadata ||
+           !st->metadata->ss->min_acceptable_spare_size) {
+               *sizep = 0;
+               return 0;
+       }
+
+       fd = open(st->devname, O_RDONLY);
+       if (fd < 0)
+               return 1;
+       if (st->metadata->ss->external)
+               st->metadata->ss->load_container(st->metadata, fd, st->devname);
+       else
+               st->metadata->ss->load_super(st->metadata, fd, st->devname);
+       close(fd);
+       if (!st->metadata->sb)
+               return 1;
+       *sizep = st->metadata->ss->min_acceptable_spare_size(st->metadata);
+       st->metadata->ss->free_super(st->metadata);
+
+       return 0;
+}
+
+static int check_donor(struct state *from, struct state *to)
+{
+       struct state *sub;
+
+       if (from == to)
+               return 0;
+       if (from->parent)
+               /* Cannot move from a member */
+               return 0;
+       if (from->err)
+               return 0;
+       for (sub = from->subarray; sub; sub = sub->subarray)
+               /* If source array has degraded subarrays, don't
+                * remove anything
+                */
+               if (sub->active < sub->raid)
+                       return 0;
+       if (from->metadata->ss->external == 0)
+               if (from->active < from->raid)
+                       return 0;
+       if (from->spare <= 0)
+               return 0;
+       return 1;
+}
+
+static dev_t choose_spare(struct state *from, struct state *to,
+                       struct domainlist *domlist, unsigned long long min_size)
+{
+       int d;
+       dev_t dev = 0;
+
+       for (d = from->raid; !dev && d < MaxDisks; d++) {
+               if (from->devid[d] > 0 &&
+                   from->devstate[d] == 0) {
+                       struct dev_policy *pol;
+                       unsigned long long dev_size;
+
+                       if (to->metadata->ss->external &&
+                           test_partition_from_id(from->devid[d]))
+                               continue;
+
+                       if (min_size &&
+                           dev_size_from_id(from->devid[d], &dev_size) &&
+                           dev_size < min_size)
+                               continue;
+
+                       pol = devnum_policy(from->devid[d]);
+                       if (from->spare_group)
+                               pol_add(&pol, pol_domain,
+                                       from->spare_group, NULL);
+                       if (domain_test(domlist, pol, to->metadata->ss->name) == 1)
+                           dev = from->devid[d];
+                       dev_policy_free(pol);
+               }
+       }
+       return dev;
+}
+
+static dev_t container_choose_spare(struct state *from, struct state *to,
+                                   struct domainlist *domlist,
+                                   unsigned long long min_size, int active)
+{
+       /* This is similar to choose_spare, but we cannot trust devstate,
+        * so we need to read the metadata instead
+        */
+       struct mdinfo *list;
+       struct supertype *st = from->metadata;
+       int fd = open(from->devname, O_RDONLY);
+       int err;
+       dev_t dev = 0;
+
+       if (fd < 0)
+               return 0;
+       if (!st->ss->getinfo_super_disks) {
+               close(fd);
+               return 0;
+       }
+       
+       err = st->ss->load_container(st, fd, NULL);
+       close(fd);
+       if (err)
+               return 0;
+       
+       if (from == to) {
+               /* We must check if number of active disks has not increased
+                * since ioctl in main loop. mdmon may have added spare
+                * to subarray. If so we do not need to look for more spares
+                * so return non zero value */
+               int active_cnt = 0;
+               struct mdinfo *dp;
+               list = st->ss->getinfo_super_disks(st);
+               if (!list) {
+                       st->ss->free_super(st);
+                       return 1;
+               }
+               dp = list->devs;
+               while (dp) {
+                       if (dp->disk.state & (1<<MD_DISK_SYNC) &&
+                           !(dp->disk.state & (1<<MD_DISK_FAULTY)))
+                               active_cnt++;
+                       dp = dp->next;
+               }
+               sysfs_free(list);
+               if (active < active_cnt) {
+                       /* Spare just activated.*/
+                       st->ss->free_super(st);
+                       return 1;
+               }
+       }
+
+       /* We only need one spare so full list not needed */
+       list = container_choose_spares(st, min_size, domlist, from->spare_group,
+                                      to->metadata->ss->name, 1);
+       if (list) {
+               struct mdinfo *disks = list->devs;
+               if (disks)
+                       dev = makedev(disks->disk.major, disks->disk.minor);
+               sysfs_free(list);
+       }
+       st->ss->free_super(st);
+       return dev;
+}
+
+
+static void try_spare_migration(struct state *statelist, struct alert_info *info)
+{
+       struct state *from;
+       struct state *st;
+
+       link_containers_with_subarrays(statelist);
+       for (st = statelist; st; st = st->next)
+               if (st->active < st->raid &&
+                   st->spare == 0 && !st->err) {
+                       struct domainlist *domlist = NULL;
+                       int d;
+                       struct state *to = st;
+                       unsigned long long min_size;
+
+                       if (to->parent_dev != NoMdDev && !to->parent)
+                               /* subarray monitored without parent container
+                                * we can't move spares here */
+                               continue;
+                       
+                       if (to->parent)
+                               /* member of a container */
+                               to = to->parent;
+
+                       if (get_min_spare_size_required(to, &min_size))
+                               continue;
+                       if (to->metadata->ss->external) {
+                               /* We must make sure there is
+                                * no suitable spare in container already.
+                                * If there is we don't add more */
+                               dev_t devid = container_choose_spare(
+                                       to, to, NULL, min_size, st->active);
+                               if (devid > 0)
+                                       continue;
+                       }
+                       for (d = 0; d < MaxDisks; d++)
+                               if (to->devid[d])
+                                       domainlist_add_dev(&domlist,
+                                                          to->devid[d],
+                                                          to->metadata->ss->name);
+                       if (to->spare_group)
+                               domain_add(&domlist, to->spare_group);
+                       /*
+                        * No spare migration if the destination
+                        * has no domain. Skip this array.
+                        */
+                       if (!domlist)
+                               continue;
+                       for (from=statelist ; from ; from=from->next) {
+                               dev_t devid;
+                               if (!check_donor(from, to))
+                                       continue;
+                               if (from->metadata->ss->external)
+                                       devid = container_choose_spare(
+                                               from, to, domlist, min_size, 0);
+                               else
+                                       devid = choose_spare(from, to, domlist,
+                                                            min_size);
+                               if (devid > 0
+                                   && move_spare(from->devname, to->devname, devid)) {
+                                       alert("MoveSpare", to->devname, from->devname, info);
+                                       break;
+                               }
+                       }
+                       domain_free(domlist);
+               }
+}
+
+/* search the statelist to connect external
+ * metadata subarrays with their containers
+ * We always completely rebuild the tree from scratch as
+ * that is safest considering the possibility of entries
+ * disappearing or changing.
+ */
+static void link_containers_with_subarrays(struct state *list)
+{
+       struct state *st;
+       struct state *cont;
+       for (st = list; st; st = st->next) {
+               st->parent = NULL;
+               st->subarray = NULL;
+       }
+       for (st = list; st; st = st->next)
+               if (st->parent_dev != NoMdDev)
+                       for (cont = list; cont; cont = cont->next)
+                               if (!cont->err &&
+                                   cont->parent_dev == NoMdDev &&
+                                   cont->devnum == st->parent_dev) {
+                                       st->parent = cont;
+                                       st->subarray = cont->subarray;
+                                       cont->subarray = st;
+                                       break;
+                               }
 }
 
 /* Not really Monitor but ... */
@@ -621,7 +983,7 @@ int Wait(char *dev)
                                if (is_subarray(&e->metadata_version[9]))
                                        ping_monitor(&e->metadata_version[9]);
                                else
-                                       ping_monitor(devnum2devname(devnum));
+                                       ping_monitor_by_id(devnum);
                        }
                        free_mdstat(ms);
                        return rv;
@@ -632,17 +994,19 @@ int Wait(char *dev)
        }
 }
 
+#ifndef MDASSEMBLE
+
 static char *clean_states[] = {
        "clear", "inactive", "readonly", "read-auto", "clean", NULL };
 
-int WaitClean(char *dev, int verbose)
+int WaitClean(char *dev, int sock, int verbose)
 {
        int fd;
        struct mdinfo *mdi;
        int rv = 1;
        int devnum;
 
-       fd = open(dev, O_RDONLY); 
+       fd = open(dev, O_RDONLY);
        if (fd < 0) {
                if (verbose)
                        fprintf(stderr, Name ": Couldn't open %s: %s\n", dev, strerror(errno));
@@ -665,7 +1029,6 @@ int WaitClean(char *dev, int verbose)
        case 0:
                /* safemode delay is irrelevant for these levels */
                rv = 0;
-               
        }
 
        /* for internal metadata the kernel handles the final clean
@@ -691,9 +1054,6 @@ int WaitClean(char *dev, int verbose)
                tm.tv_sec = 5;
                tm.tv_usec = 0;
 
-               /* give mdmon a chance to checkpoint resync */
-               sysfs_set_str(mdi, NULL, "sync_action", "idle");
-
                FD_ZERO(&fds);
 
                /* wait for array_state to be clean */
@@ -704,14 +1064,15 @@ int WaitClean(char *dev, int verbose)
                        if (sysfs_match_word(buf, clean_states) <= 4)
                                break;
                        FD_SET(state_fd, &fds);
-                       rv = select(state_fd + 1, &fds, NULL, NULL, &tm);
+                       rv = select(state_fd + 1, NULL, NULL, &fds, &tm);
                        if (rv < 0 && errno != EINTR)
                                break;
                        lseek(state_fd, 0, SEEK_SET);
                }
                if (rv < 0)
                        rv = 1;
-               else if (ping_monitor(mdi->text_version) == 0) {
+               else if (fping_monitor(sock) == 0 ||
+                        ping_monitor(mdi->text_version) == 0) {
                        /* we need to ping to close the window between array
                         * state transitioning to clean and the metadata being
                         * marked clean
@@ -733,5 +1094,4 @@ int WaitClean(char *dev, int verbose)
 
        return rv;
 }
-
-
+#endif /* MDASSEMBLE */