]> git.ipfire.org Git - thirdparty/mdadm.git/blob - Monitor.c
Monitor: Allow correct monitoring of more member devices.
[thirdparty/mdadm.git] / Monitor.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 "md_p.h"
27 #include "md_u.h"
28 #include <sys/wait.h>
29 #include <signal.h>
30 #include <limits.h>
31 #include <syslog.h>
32
33 struct state {
34 char *devname;
35 int devnum; /* to sync with mdstat info */
36 long utime;
37 int err;
38 char *spare_group;
39 int active, working, failed, spare, raid;
40 int expected_spares;
41 int devstate[MAX_DISKS];
42 dev_t devid[MAX_DISKS];
43 int percent;
44 int parent_dev; /* For subarray, devnum of parent.
45 * For others, NoMdDev
46 */
47 struct supertype *metadata;
48 struct state *subarray;/* for a container it is a link to first subarray
49 * for a subarray it is a link to next subarray
50 * in the same container */
51 struct state *parent; /* for a subarray it is a link to its container
52 */
53 struct state *next;
54 };
55
56 struct alert_info {
57 char *mailaddr;
58 char *mailfrom;
59 char *alert_cmd;
60 int dosyslog;
61 };
62 static int make_daemon(char *pidfile);
63 static int check_one_sharer(int scan);
64 static void alert(char *event, char *dev, char *disc, struct alert_info *info);
65 static int check_array(struct state *st, struct mdstat_ent *mdstat,
66 int test, struct alert_info *info,
67 int increments, char *prefer);
68 static int add_new_arrays(struct mdstat_ent *mdstat, struct state **statelist,
69 int test, struct alert_info *info);
70 static void try_spare_migration(struct state *statelist, struct alert_info *info);
71 static void link_containers_with_subarrays(struct state *list);
72
73 int Monitor(struct mddev_dev *devlist,
74 char *mailaddr, char *alert_cmd,
75 int period, int daemonise, int scan, int oneshot,
76 int dosyslog, int test, char *pidfile, int increments,
77 int share, char *prefer)
78 {
79 /*
80 * Every few seconds, scan every md device looking for changes
81 * When a change is found, log it, possibly run the alert command,
82 * and possibly send Email
83 *
84 * For each array, we record:
85 * Update time
86 * active/working/failed/spare drives
87 * State of each device.
88 * %rebuilt if rebuilding
89 *
90 * If the update time changes, check out all the data again
91 * It is possible that we cannot get the state of each device
92 * due to bugs in the md kernel module.
93 * We also read /proc/mdstat to get rebuild percent,
94 * and to get state on all active devices incase of kernel bug.
95 *
96 * Events are:
97 * Fail
98 * An active device had Faulty set or Active/Sync removed
99 * FailSpare
100 * A spare device had Faulty set
101 * SpareActive
102 * An active device had a reverse transition
103 * RebuildStarted
104 * percent went from -1 to +ve
105 * RebuildNN
106 * percent went from below to not-below NN%
107 * DeviceDisappeared
108 * Couldn't access a device which was previously visible
109 *
110 * if we detect an array with active<raid and spare==0
111 * we look at other arrays that have same spare-group
112 * If we find one with active==raid and spare>0,
113 * and if we can get_disk_info and find a name
114 * Then we hot-remove and hot-add to the other array
115 *
116 * If devlist is NULL, then we can monitor everything because --scan
117 * was given. We get an initial list from config file and add anything
118 * that appears in /proc/mdstat
119 */
120
121 struct state *statelist = NULL;
122 struct state *st2;
123 int finished = 0;
124 struct mdstat_ent *mdstat = NULL;
125 char *mailfrom = NULL;
126 struct alert_info info;
127
128 if (!mailaddr) {
129 mailaddr = conf_get_mailaddr();
130 if (mailaddr && ! scan)
131 fprintf(stderr, Name ": Monitor using email address \"%s\" from config file\n",
132 mailaddr);
133 }
134 mailfrom = conf_get_mailfrom();
135
136 if (!alert_cmd) {
137 alert_cmd = conf_get_program();
138 if (alert_cmd && ! scan)
139 fprintf(stderr, Name ": Monitor using program \"%s\" from config file\n",
140 alert_cmd);
141 }
142 if (scan && !mailaddr && !alert_cmd && !dosyslog) {
143 fprintf(stderr, Name ": No mail address or alert command - not monitoring.\n");
144 return 1;
145 }
146 info.alert_cmd = alert_cmd;
147 info.mailaddr = mailaddr;
148 info.mailfrom = mailfrom;
149 info.dosyslog = dosyslog;
150
151 if (daemonise) {
152 int rv = make_daemon(pidfile);
153 if (rv >= 0)
154 return rv;
155 }
156
157 if (share)
158 if (check_one_sharer(scan))
159 return 1;
160
161 if (devlist == NULL) {
162 struct mddev_ident *mdlist = conf_get_ident(NULL);
163 for (; mdlist; mdlist=mdlist->next) {
164 struct state *st;
165 if (mdlist->devname == NULL)
166 continue;
167 if (strcasecmp(mdlist->devname, "<ignore>") == 0)
168 continue;
169 st = calloc(1, sizeof *st);
170 if (st == NULL)
171 continue;
172 if (mdlist->devname[0] == '/')
173 st->devname = strdup(mdlist->devname);
174 else {
175 st->devname = malloc(8+strlen(mdlist->devname)+1);
176 strcpy(strcpy(st->devname, "/dev/md/"),
177 mdlist->devname);
178 }
179 st->next = statelist;
180 st->devnum = INT_MAX;
181 st->percent = -2;
182 st->expected_spares = mdlist->spare_disks;
183 if (mdlist->spare_group)
184 st->spare_group = strdup(mdlist->spare_group);
185 statelist = st;
186 }
187 } else {
188 struct mddev_dev *dv;
189 for (dv=devlist ; dv; dv=dv->next) {
190 struct mddev_ident *mdlist = conf_get_ident(dv->devname);
191 struct state *st = calloc(1, sizeof *st);
192 if (st == NULL)
193 continue;
194 st->devname = strdup(dv->devname);
195 st->next = statelist;
196 st->devnum = INT_MAX;
197 st->percent = -2;
198 st->expected_spares = -1;
199 if (mdlist) {
200 st->expected_spares = mdlist->spare_disks;
201 if (mdlist->spare_group)
202 st->spare_group = strdup(mdlist->spare_group);
203 }
204 statelist = st;
205 }
206 }
207
208
209 while (! finished) {
210 int new_found = 0;
211 struct state *st;
212 int anydegraded = 0;
213
214 if (mdstat)
215 free_mdstat(mdstat);
216 mdstat = mdstat_read(oneshot?0:1, 0);
217
218 for (st=statelist; st; st=st->next)
219 if (check_array(st, mdstat, test, &info,
220 increments, prefer))
221 anydegraded = 1;
222
223 /* now check if there are any new devices found in mdstat */
224 if (scan)
225 new_found = add_new_arrays(mdstat, &statelist, test,
226 &info);
227
228 /* If an array has active < raid && spare == 0 && spare_group != NULL
229 * Look for another array with spare > 0 and active == raid and same spare_group
230 * if found, choose a device and hotremove/hotadd
231 */
232 if (share && anydegraded)
233 try_spare_migration(statelist, &info);
234 if (!new_found) {
235 if (oneshot)
236 break;
237 else
238 mdstat_wait(period);
239 }
240 test = 0;
241 }
242 for (st2 = statelist; st2; st2 = statelist) {
243 statelist = st2->next;
244 free(st2);
245 }
246
247 if (pidfile)
248 unlink(pidfile);
249 return 0;
250 }
251
252 static int make_daemon(char *pidfile)
253 {
254 /* Return:
255 * -1 in the forked daemon
256 * 0 in the parent
257 * 1 on error
258 * so a none-negative becomes the exit code.
259 */
260 int pid = fork();
261 if (pid > 0) {
262 if (!pidfile)
263 printf("%d\n", pid);
264 else {
265 FILE *pid_file;
266 pid_file=fopen(pidfile, "w");
267 if (!pid_file)
268 perror("cannot create pid file");
269 else {
270 fprintf(pid_file,"%d\n", pid);
271 fclose(pid_file);
272 }
273 }
274 return 0;
275 }
276 if (pid < 0) {
277 perror("daemonise");
278 return 1;
279 }
280 close(0);
281 open("/dev/null", O_RDWR);
282 dup2(0,1);
283 dup2(0,2);
284 setsid();
285 return -1;
286 }
287
288 static int check_one_sharer(int scan)
289 {
290 int pid, rv;
291 FILE *fp;
292 char dir[20];
293 char path[100];
294 struct stat buf;
295 sprintf(path, "%s/autorebuild.pid", MDMON_DIR);
296 fp = fopen(path, "r");
297 if (fp) {
298 if (fscanf(fp, "%d", &pid) != 1)
299 pid = -1;
300 sprintf(dir, "/proc/%d", pid);
301 rv = stat(dir, &buf);
302 if (rv != -1) {
303 if (scan) {
304 fprintf(stderr, Name ": Only one "
305 "autorebuild process allowed"
306 " in scan mode, aborting\n");
307 fclose(fp);
308 return 1;
309 } else {
310 fprintf(stderr, Name ": Warning: One"
311 " autorebuild process already"
312 " running.\n");
313 }
314 }
315 fclose(fp);
316 }
317 if (scan) {
318 if (mkdir(MDMON_DIR, S_IRWXU) < 0 &&
319 errno != EEXIST) {
320 fprintf(stderr, Name ": Can't create "
321 "autorebuild.pid file\n");
322 } else {
323 fp = fopen(path, "w");
324 if (!fp)
325 fprintf(stderr, Name ": Cannot create"
326 " autorebuild.pid"
327 "file\n");
328 else {
329 pid = getpid();
330 fprintf(fp, "%d\n", pid);
331 fclose(fp);
332 }
333 }
334 }
335 return 0;
336 }
337
338 static void alert(char *event, char *dev, char *disc, struct alert_info *info)
339 {
340 int priority;
341
342 if (!info->alert_cmd && !info->mailaddr && !info->dosyslog) {
343 time_t now = time(0);
344
345 printf("%1.15s: %s on %s %s\n", ctime(&now)+4, event, dev, disc?disc:"unknown device");
346 }
347 if (info->alert_cmd) {
348 int pid = fork();
349 switch(pid) {
350 default:
351 waitpid(pid, NULL, 0);
352 break;
353 case -1:
354 break;
355 case 0:
356 execl(info->alert_cmd, info->alert_cmd,
357 event, dev, disc, NULL);
358 exit(2);
359 }
360 }
361 if (info->mailaddr &&
362 (strncmp(event, "Fail", 4)==0 ||
363 strncmp(event, "Test", 4)==0 ||
364 strncmp(event, "Spares", 6)==0 ||
365 strncmp(event, "Degrade", 7)==0)) {
366 FILE *mp = popen(Sendmail, "w");
367 if (mp) {
368 FILE *mdstat;
369 char hname[256];
370 gethostname(hname, sizeof(hname));
371 signal(SIGPIPE, SIG_IGN);
372 if (info->mailfrom)
373 fprintf(mp, "From: %s\n", info->mailfrom);
374 else
375 fprintf(mp, "From: " Name " monitoring <root>\n");
376 fprintf(mp, "To: %s\n", info->mailaddr);
377 fprintf(mp, "Subject: %s event on %s:%s\n\n",
378 event, dev, hname);
379
380 fprintf(mp,
381 "This is an automatically generated"
382 " mail message from " Name "\n");
383 fprintf(mp, "running on %s\n\n", hname);
384
385 fprintf(mp,
386 "A %s event had been detected on"
387 " md device %s.\n\n", event, dev);
388
389 if (disc && disc[0] != ' ')
390 fprintf(mp,
391 "It could be related to"
392 " component device %s.\n\n", disc);
393 if (disc && disc[0] == ' ')
394 fprintf(mp, "Extra information:%s.\n\n", disc);
395
396 fprintf(mp, "Faithfully yours, etc.\n");
397
398 mdstat = fopen("/proc/mdstat", "r");
399 if (mdstat) {
400 char buf[8192];
401 int n;
402 fprintf(mp,
403 "\nP.S. The /proc/mdstat file"
404 " currently contains the following:\n\n");
405 while ( (n=fread(buf, 1, sizeof(buf), mdstat)) > 0)
406 n=fwrite(buf, 1, n, mp);
407 fclose(mdstat);
408 }
409 pclose(mp);
410 }
411 }
412
413 /* log the event to syslog maybe */
414 if (info->dosyslog) {
415 /* Log at a different severity depending on the event.
416 *
417 * These are the critical events: */
418 if (strncmp(event, "Fail", 4)==0 ||
419 strncmp(event, "Degrade", 7)==0 ||
420 strncmp(event, "DeviceDisappeared", 17)==0)
421 priority = LOG_CRIT;
422 /* Good to know about, but are not failures: */
423 else if (strncmp(event, "Rebuild", 7)==0 ||
424 strncmp(event, "MoveSpare", 9)==0 ||
425 strncmp(event, "Spares", 6) != 0)
426 priority = LOG_WARNING;
427 /* Everything else: */
428 else
429 priority = LOG_INFO;
430
431 if (disc)
432 syslog(priority,
433 "%s event detected on md device %s,"
434 " component device %s", event, dev, disc);
435 else
436 syslog(priority,
437 "%s event detected on md device %s",
438 event, dev);
439 }
440 }
441
442 static int check_array(struct state *st, struct mdstat_ent *mdstat,
443 int test, struct alert_info *ainfo,
444 int increments, char *prefer)
445 {
446 /* Update the state 'st' to reflect any changes shown in mdstat,
447 * or found by directly examining the array, and return
448 * '1' if the array is degraded, or '0' if it is optimal (or dead).
449 */
450 struct { int state, major, minor; } info[MAX_DISKS];
451 mdu_array_info_t array;
452 struct mdstat_ent *mse = NULL, *mse2;
453 char *dev = st->devname;
454 int fd;
455 int i;
456 int remaining_disks;
457 int last_disk;
458
459 if (test)
460 alert("TestMessage", dev, NULL, ainfo);
461 fd = open(dev, O_RDONLY);
462 if (fd < 0) {
463 if (!st->err)
464 alert("DeviceDisappeared", dev, NULL, ainfo);
465 st->err=1;
466 return 0;
467 }
468 fcntl(fd, F_SETFD, FD_CLOEXEC);
469 if (ioctl(fd, GET_ARRAY_INFO, &array)<0) {
470 if (!st->err)
471 alert("DeviceDisappeared", dev, NULL, ainfo);
472 st->err=1;
473 close(fd);
474 return 0;
475 }
476 /* It's much easier to list what array levels can't
477 * have a device disappear than all of them that can
478 */
479 if (array.level == 0 || array.level == -1) {
480 if (!st->err)
481 alert("DeviceDisappeared", dev, "Wrong-Level", ainfo);
482 st->err = 1;
483 close(fd);
484 return 0;
485 }
486 if (st->devnum == INT_MAX) {
487 struct stat stb;
488 if (fstat(fd, &stb) == 0 &&
489 (S_IFMT&stb.st_mode)==S_IFBLK) {
490 if (major(stb.st_rdev) == MD_MAJOR)
491 st->devnum = minor(stb.st_rdev);
492 else
493 st->devnum = -1- (minor(stb.st_rdev)>>6);
494 }
495 }
496
497 for (mse2 = mdstat ; mse2 ; mse2=mse2->next)
498 if (mse2->devnum == st->devnum) {
499 mse2->devnum = INT_MAX; /* flag it as "used" */
500 mse = mse2;
501 }
502
503 if (!mse) {
504 /* duplicated array in statelist
505 * or re-created after reading mdstat*/
506 st->err = 1;
507 close(fd);
508 return 0;
509 }
510 /* this array is in /proc/mdstat */
511 if (array.utime == 0)
512 /* external arrays don't update utime, so
513 * just make sure it is always different. */
514 array.utime = st->utime + 1;;
515
516 if (st->utime == array.utime &&
517 st->failed == array.failed_disks &&
518 st->working == array.working_disks &&
519 st->spare == array.spare_disks &&
520 (mse == NULL || (
521 mse->percent == st->percent
522 ))) {
523 close(fd);
524 st->err = 0;
525 if ((st->active < st->raid) && st->spare == 0)
526 return 1;
527 else
528 return 0;
529 }
530 if (st->utime == 0 && /* new array */
531 mse->pattern && strchr(mse->pattern, '_') /* degraded */
532 )
533 alert("DegradedArray", dev, NULL, ainfo);
534
535 if (st->utime == 0 && /* new array */
536 st->expected_spares > 0 &&
537 array.spare_disks < st->expected_spares)
538 alert("SparesMissing", dev, NULL, ainfo);
539 if (st->percent == -1 &&
540 mse->percent >= 0)
541 alert("RebuildStarted", dev, NULL, ainfo);
542 if (st->percent >= 0 &&
543 mse->percent >= 0 &&
544 (mse->percent / increments) > (st->percent / increments)) {
545 char percentalert[15]; // "RebuildNN" (10 chars) or "RebuildStarted" (15 chars)
546
547 if((mse->percent / increments) == 0)
548 snprintf(percentalert, sizeof(percentalert), "RebuildStarted");
549 else
550 snprintf(percentalert, sizeof(percentalert), "Rebuild%02d", mse->percent);
551
552 alert(percentalert, dev, NULL, ainfo);
553 }
554
555 if (mse->percent == -1 &&
556 st->percent >= 0) {
557 /* Rebuild/sync/whatever just finished.
558 * If there is a number in /mismatch_cnt,
559 * we should report that.
560 */
561 struct mdinfo *sra =
562 sysfs_read(-1, st->devnum, GET_MISMATCH);
563 if (sra && sra->mismatch_cnt > 0) {
564 char cnt[80];
565 snprintf(cnt, sizeof(cnt),
566 " mismatches found: %d (on raid level %d)",
567 sra->mismatch_cnt, array.level);
568 alert("RebuildFinished", dev, cnt, ainfo);
569 } else
570 alert("RebuildFinished", dev, NULL, ainfo);
571 if (sra)
572 free(sra);
573 }
574 st->percent = mse->percent;
575
576 remaining_disks = array.nr_disks;
577 for (i=0; i<MAX_DISKS && remaining_disks > 0;
578 i++) {
579 mdu_disk_info_t disc;
580 disc.number = i;
581 if (ioctl(fd, GET_DISK_INFO, &disc) >= 0) {
582 info[i].state = disc.state;
583 info[i].major = disc.major;
584 info[i].minor = disc.minor;
585 if (disc.major || disc.minor)
586 remaining_disks --;
587 } else
588 info[i].major = info[i].minor = 0;
589 }
590 last_disk = i;
591
592 if (mse->metadata_version &&
593 strncmp(mse->metadata_version, "external:", 9) == 0 &&
594 is_subarray(mse->metadata_version+9))
595 st->parent_dev =
596 devname2devnum(mse->metadata_version+10);
597 else
598 st->parent_dev = NoMdDev;
599 if (st->metadata == NULL &&
600 st->parent_dev == NoMdDev)
601 st->metadata = super_by_fd(fd, NULL);
602
603 close(fd);
604
605 for (i=0; i<MAX_DISKS; i++) {
606 mdu_disk_info_t disc = {0,0,0,0,0};
607 int newstate=0;
608 int change;
609 char *dv = NULL;
610 disc.number = i;
611 if (i >= last_disk) {
612 newstate = 0;
613 disc.major = disc.minor = 0;
614 } else if (info[i].major || info[i].minor) {
615 newstate = info[i].state;
616 dv = map_dev_preferred(
617 info[i].major, info[i].minor, 1,
618 prefer);
619 disc.state = newstate;
620 disc.major = info[i].major;
621 disc.minor = info[i].minor;
622 } else if (mse && mse->pattern && i < (int)strlen(mse->pattern)) {
623 switch(mse->pattern[i]) {
624 case 'U': newstate = 6 /* ACTIVE/SYNC */; break;
625 case '_': newstate = 8 /* REMOVED */; break;
626 }
627 disc.major = disc.minor = 0;
628 }
629 if (dv == NULL && st->devid[i])
630 dv = map_dev_preferred(
631 major(st->devid[i]),
632 minor(st->devid[i]), 1, prefer);
633 change = newstate ^ st->devstate[i];
634 if (st->utime && change && !st->err) {
635 if (i < array.raid_disks &&
636 (((newstate&change)&(1<<MD_DISK_FAULTY)) ||
637 ((st->devstate[i]&change)&(1<<MD_DISK_ACTIVE)) ||
638 ((st->devstate[i]&change)&(1<<MD_DISK_SYNC)))
639 )
640 alert("Fail", dev, dv, ainfo);
641 else if (i >= array.raid_disks &&
642 (disc.major || disc.minor) &&
643 st->devid[i] == makedev(disc.major, disc.minor) &&
644 ((newstate&change)&(1<<MD_DISK_FAULTY))
645 )
646 alert("FailSpare", dev, dv, ainfo);
647 else if (i < array.raid_disks &&
648 ! (newstate & (1<<MD_DISK_REMOVED)) &&
649 (((st->devstate[i]&change)&(1<<MD_DISK_FAULTY)) ||
650 ((newstate&change)&(1<<MD_DISK_ACTIVE)) ||
651 ((newstate&change)&(1<<MD_DISK_SYNC)))
652 )
653 alert("SpareActive", dev, dv, ainfo);
654 }
655 st->devstate[i] = newstate;
656 st->devid[i] = makedev(disc.major, disc.minor);
657 }
658 st->active = array.active_disks;
659 st->working = array.working_disks;
660 st->spare = array.spare_disks;
661 st->failed = array.failed_disks;
662 st->utime = array.utime;
663 st->raid = array.raid_disks;
664 st->err = 0;
665 if ((st->active < st->raid) && st->spare == 0)
666 return 1;
667 return 0;
668 }
669
670 static int add_new_arrays(struct mdstat_ent *mdstat, struct state **statelist,
671 int test, struct alert_info *info)
672 {
673 struct mdstat_ent *mse;
674 int new_found = 0;
675
676 for (mse=mdstat; mse; mse=mse->next)
677 if (mse->devnum != INT_MAX &&
678 (!mse->level || /* retrieve containers */
679 (strcmp(mse->level, "raid0") != 0 &&
680 strcmp(mse->level, "linear") != 0))
681 ) {
682 struct state *st = calloc(1, sizeof *st);
683 mdu_array_info_t array;
684 int fd;
685 if (st == NULL)
686 continue;
687 st->devname = strdup(get_md_name(mse->devnum));
688 if ((fd = open(st->devname, O_RDONLY)) < 0 ||
689 ioctl(fd, GET_ARRAY_INFO, &array)< 0) {
690 /* no such array */
691 if (fd >=0) close(fd);
692 put_md_name(st->devname);
693 free(st->devname);
694 if (st->metadata) {
695 st->metadata->ss->free_super(st->metadata);
696 free(st->metadata);
697 }
698 free(st);
699 continue;
700 }
701 close(fd);
702 st->next = *statelist;
703 st->err = 1;
704 st->devnum = mse->devnum;
705 st->percent = -2;
706 st->expected_spares = -1;
707 if (mse->metadata_version &&
708 strncmp(mse->metadata_version, "external:", 9) == 0 &&
709 is_subarray(mse->metadata_version+9))
710 st->parent_dev =
711 devname2devnum(mse->metadata_version+10);
712 else
713 st->parent_dev = NoMdDev;
714 *statelist = st;
715 if (test)
716 alert("TestMessage", st->devname, NULL, info);
717 alert("NewArray", st->devname, NULL, info);
718 new_found = 1;
719 }
720 return new_found;
721 }
722
723 static int get_min_spare_size_required(struct state *st, unsigned long long *sizep)
724 {
725 int fd;
726
727 if (!st->metadata ||
728 !st->metadata->ss->min_acceptable_spare_size) {
729 *sizep = 0;
730 return 0;
731 }
732
733 fd = open(st->devname, O_RDONLY);
734 if (fd < 0)
735 return 1;
736 if (st->metadata->ss->external)
737 st->metadata->ss->load_container(st->metadata, fd, st->devname);
738 else
739 st->metadata->ss->load_super(st->metadata, fd, st->devname);
740 close(fd);
741 if (!st->metadata->sb)
742 return 1;
743 *sizep = st->metadata->ss->min_acceptable_spare_size(st->metadata);
744 st->metadata->ss->free_super(st->metadata);
745
746 return 0;
747 }
748
749 static int check_donor(struct state *from, struct state *to)
750 {
751 struct state *sub;
752
753 if (from == to)
754 return 0;
755 if (from->parent)
756 /* Cannot move from a member */
757 return 0;
758 if (from->err)
759 return 0;
760 for (sub = from->subarray; sub; sub = sub->subarray)
761 /* If source array has degraded subarrays, don't
762 * remove anything
763 */
764 if (sub->active < sub->raid)
765 return 0;
766 if (from->metadata->ss->external == 0)
767 if (from->active < from->raid)
768 return 0;
769 if (from->spare <= 0)
770 return 0;
771 return 1;
772 }
773
774 static dev_t choose_spare(struct state *from, struct state *to,
775 struct domainlist *domlist, unsigned long long min_size)
776 {
777 int d;
778 dev_t dev = 0;
779
780 for (d = from->raid; !dev && d < MAX_DISKS; d++) {
781 if (from->devid[d] > 0 &&
782 from->devstate[d] == 0) {
783 struct dev_policy *pol;
784 unsigned long long dev_size;
785
786 if (to->metadata->ss->external &&
787 test_partition_from_id(from->devid[d]))
788 continue;
789
790 if (min_size &&
791 dev_size_from_id(from->devid[d], &dev_size) &&
792 dev_size < min_size)
793 continue;
794
795 pol = devnum_policy(from->devid[d]);
796 if (from->spare_group)
797 pol_add(&pol, pol_domain,
798 from->spare_group, NULL);
799 if (domain_test(domlist, pol, to->metadata->ss->name) == 1)
800 dev = from->devid[d];
801 dev_policy_free(pol);
802 }
803 }
804 return dev;
805 }
806
807 static dev_t container_choose_spare(struct state *from, struct state *to,
808 struct domainlist *domlist,
809 unsigned long long min_size, int active)
810 {
811 /* This is similar to choose_spare, but we cannot trust devstate,
812 * so we need to read the metadata instead
813 */
814 struct mdinfo *list;
815 struct supertype *st = from->metadata;
816 int fd = open(from->devname, O_RDONLY);
817 int err;
818 dev_t dev = 0;
819
820 if (fd < 0)
821 return 0;
822 if (!st->ss->getinfo_super_disks) {
823 close(fd);
824 return 0;
825 }
826
827 err = st->ss->load_container(st, fd, NULL);
828 close(fd);
829 if (err)
830 return 0;
831
832 if (from == to) {
833 /* We must check if number of active disks has not increased
834 * since ioctl in main loop. mdmon may have added spare
835 * to subarray. If so we do not need to look for more spares
836 * so return non zero value */
837 int active_cnt = 0;
838 struct mdinfo *dp;
839 list = st->ss->getinfo_super_disks(st);
840 if (!list) {
841 st->ss->free_super(st);
842 return 1;
843 }
844 dp = list->devs;
845 while (dp) {
846 if (dp->disk.state & (1<<MD_DISK_SYNC) &&
847 !(dp->disk.state & (1<<MD_DISK_FAULTY)))
848 active_cnt++;
849 dp = dp->next;
850 }
851 sysfs_free(list);
852 if (active < active_cnt) {
853 /* Spare just activated.*/
854 st->ss->free_super(st);
855 return 1;
856 }
857 }
858
859 /* We only need one spare so full list not needed */
860 list = container_choose_spares(st, min_size, domlist, from->spare_group,
861 to->metadata->ss->name, 1);
862 if (list) {
863 struct mdinfo *disks = list->devs;
864 if (disks)
865 dev = makedev(disks->disk.major, disks->disk.minor);
866 sysfs_free(list);
867 }
868 st->ss->free_super(st);
869 return dev;
870 }
871
872
873 static void try_spare_migration(struct state *statelist, struct alert_info *info)
874 {
875 struct state *from;
876 struct state *st;
877
878 link_containers_with_subarrays(statelist);
879 for (st = statelist; st; st = st->next)
880 if (st->active < st->raid &&
881 st->spare == 0 && !st->err) {
882 struct domainlist *domlist = NULL;
883 int d;
884 struct state *to = st;
885 unsigned long long min_size;
886
887 if (to->parent_dev != NoMdDev && !to->parent)
888 /* subarray monitored without parent container
889 * we can't move spares here */
890 continue;
891
892 if (to->parent)
893 /* member of a container */
894 to = to->parent;
895
896 if (get_min_spare_size_required(to, &min_size))
897 continue;
898 if (to->metadata->ss->external) {
899 /* We must make sure there is
900 * no suitable spare in container already.
901 * If there is we don't add more */
902 dev_t devid = container_choose_spare(
903 to, to, NULL, min_size, st->active);
904 if (devid > 0)
905 continue;
906 }
907 for (d = 0; d < MAX_DISKS; d++)
908 if (to->devid[d])
909 domainlist_add_dev(&domlist,
910 to->devid[d],
911 to->metadata->ss->name);
912 if (to->spare_group)
913 domain_add(&domlist, to->spare_group);
914 /*
915 * No spare migration if the destination
916 * has no domain. Skip this array.
917 */
918 if (!domlist)
919 continue;
920 for (from=statelist ; from ; from=from->next) {
921 dev_t devid;
922 if (!check_donor(from, to))
923 continue;
924 if (from->metadata->ss->external)
925 devid = container_choose_spare(
926 from, to, domlist, min_size, 0);
927 else
928 devid = choose_spare(from, to, domlist,
929 min_size);
930 if (devid > 0
931 && move_spare(from->devname, to->devname, devid)) {
932 alert("MoveSpare", to->devname, from->devname, info);
933 break;
934 }
935 }
936 domain_free(domlist);
937 }
938 }
939
940 /* search the statelist to connect external
941 * metadata subarrays with their containers
942 * We always completely rebuild the tree from scratch as
943 * that is safest considering the possibility of entries
944 * disappearing or changing.
945 */
946 static void link_containers_with_subarrays(struct state *list)
947 {
948 struct state *st;
949 struct state *cont;
950 for (st = list; st; st = st->next) {
951 st->parent = NULL;
952 st->subarray = NULL;
953 }
954 for (st = list; st; st = st->next)
955 if (st->parent_dev != NoMdDev)
956 for (cont = list; cont; cont = cont->next)
957 if (!cont->err &&
958 cont->parent_dev == NoMdDev &&
959 cont->devnum == st->parent_dev) {
960 st->parent = cont;
961 st->subarray = cont->subarray;
962 cont->subarray = st;
963 break;
964 }
965 }
966
967 /* Not really Monitor but ... */
968 int Wait(char *dev)
969 {
970 struct stat stb;
971 int devnum;
972 int rv = 1;
973
974 if (stat(dev, &stb) != 0) {
975 fprintf(stderr, Name ": Cannot find %s: %s\n", dev,
976 strerror(errno));
977 return 2;
978 }
979 devnum = stat2devnum(&stb);
980
981 while(1) {
982 struct mdstat_ent *ms = mdstat_read(1, 0);
983 struct mdstat_ent *e;
984
985 for (e=ms ; e; e=e->next)
986 if (e->devnum == devnum)
987 break;
988
989 if (!e || e->percent < 0) {
990 if (e && e->metadata_version &&
991 strncmp(e->metadata_version, "external:", 9) == 0) {
992 if (is_subarray(&e->metadata_version[9]))
993 ping_monitor(&e->metadata_version[9]);
994 else
995 ping_monitor_by_id(devnum);
996 }
997 free_mdstat(ms);
998 return rv;
999 }
1000 free_mdstat(ms);
1001 rv = 0;
1002 mdstat_wait(5);
1003 }
1004 }
1005
1006 #ifndef MDASSEMBLE
1007
1008 static char *clean_states[] = {
1009 "clear", "inactive", "readonly", "read-auto", "clean", NULL };
1010
1011 int WaitClean(char *dev, int sock, int verbose)
1012 {
1013 int fd;
1014 struct mdinfo *mdi;
1015 int rv = 1;
1016 int devnum;
1017
1018 fd = open(dev, O_RDONLY);
1019 if (fd < 0) {
1020 if (verbose)
1021 fprintf(stderr, Name ": Couldn't open %s: %s\n", dev, strerror(errno));
1022 return 1;
1023 }
1024
1025 devnum = fd2devnum(fd);
1026 mdi = sysfs_read(fd, devnum, GET_VERSION|GET_LEVEL|GET_SAFEMODE);
1027 if (!mdi) {
1028 if (verbose)
1029 fprintf(stderr, Name ": Failed to read sysfs attributes for "
1030 "%s\n", dev);
1031 close(fd);
1032 return 0;
1033 }
1034
1035 switch(mdi->array.level) {
1036 case LEVEL_LINEAR:
1037 case LEVEL_MULTIPATH:
1038 case 0:
1039 /* safemode delay is irrelevant for these levels */
1040 rv = 0;
1041 }
1042
1043 /* for internal metadata the kernel handles the final clean
1044 * transition, containers can never be dirty
1045 */
1046 if (!is_subarray(mdi->text_version))
1047 rv = 0;
1048
1049 /* safemode disabled ? */
1050 if (mdi->safe_mode_delay == 0)
1051 rv = 0;
1052
1053 if (rv) {
1054 int state_fd = sysfs_open(fd2devnum(fd), NULL, "array_state");
1055 char buf[20];
1056 fd_set fds;
1057 struct timeval tm;
1058
1059 /* minimize the safe_mode_delay and prepare to wait up to 5s
1060 * for writes to quiesce
1061 */
1062 sysfs_set_safemode(mdi, 1);
1063 tm.tv_sec = 5;
1064 tm.tv_usec = 0;
1065
1066 FD_ZERO(&fds);
1067
1068 /* wait for array_state to be clean */
1069 while (1) {
1070 rv = read(state_fd, buf, sizeof(buf));
1071 if (rv < 0)
1072 break;
1073 if (sysfs_match_word(buf, clean_states) <= 4)
1074 break;
1075 FD_SET(state_fd, &fds);
1076 rv = select(state_fd + 1, NULL, NULL, &fds, &tm);
1077 if (rv < 0 && errno != EINTR)
1078 break;
1079 lseek(state_fd, 0, SEEK_SET);
1080 }
1081 if (rv < 0)
1082 rv = 1;
1083 else if (fping_monitor(sock) == 0 ||
1084 ping_monitor(mdi->text_version) == 0) {
1085 /* we need to ping to close the window between array
1086 * state transitioning to clean and the metadata being
1087 * marked clean
1088 */
1089 rv = 0;
1090 } else
1091 rv = 1;
1092 if (rv && verbose)
1093 fprintf(stderr, Name ": Error waiting for %s to be clean\n",
1094 dev);
1095
1096 /* restore the original safe_mode_delay */
1097 sysfs_set_safemode(mdi, mdi->safe_mode_delay);
1098 close(state_fd);
1099 }
1100
1101 sysfs_free(mdi);
1102 close(fd);
1103
1104 return rv;
1105 }
1106 #endif /* MDASSEMBLE */