2 * mdadm - manage Linux "md" devices aka RAID arrays.
4 * Copyright (C) 2001-2009 Neil Brown <neilb@suse.de>
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.
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.
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
22 * Email: <neilb@suse.de>
27 #include <sys/socket.h>
28 #include <sys/utsname.h>
38 * following taken from linux/blkpg.h because they aren't
39 * anywhere else and it isn't safe to #include linux/ * stuff.
42 #define BLKPG _IO(0x12,105)
44 /* The argument structure */
45 struct blkpg_ioctl_arg
{
52 /* The subfunctions (for the op field) */
53 #define BLKPG_ADD_PARTITION 1
54 #define BLKPG_DEL_PARTITION 2
56 /* Sizes of name fields. Unused at present. */
57 #define BLKPG_DEVNAMELTH 64
58 #define BLKPG_VOLNAMELTH 64
60 /* The data structure for ADD_PARTITION and DEL_PARTITION */
61 struct blkpg_partition
{
62 long long start
; /* starting offset in bytes */
63 long long length
; /* length in bytes */
64 int pno
; /* partition number */
65 char devname
[BLKPG_DEVNAMELTH
]; /* partition name, like sda5 or c0d1p2,
66 to be used in kernel messages */
67 char volname
[BLKPG_VOLNAMELTH
]; /* volume label */
72 /* Force a compilation error if condition is true */
73 #define BUILD_BUG_ON(condition) ((void)BUILD_BUG_ON_ZERO(condition))
75 /* Force a compilation error if condition is true, but also produce a
76 result (of value 0 and type size_t), so the expression can be used
77 e.g. in a structure initializer (or where-ever else comma expressions
79 #define BUILD_BUG_ON_ZERO(e) (sizeof(struct { int:-!!(e); }))
82 * Parse a 128 bit uuid in 4 integers
83 * format is 32 hexx nibbles with options :.<space> separator
84 * If not exactly 32 hex digits are found, return 0
87 int parse_uuid(char *str
, int uuid
[4])
89 int hit
= 0; /* number of Hex digIT */
92 for (i
=0; i
<4; i
++) uuid
[i
]=0;
98 else if (c
>='a' && c
<= 'f')
100 else if (c
>='A' && c
<= 'F')
102 else if (strchr(":. -", c
))
119 * Get the md version number.
120 * We use the RAID_VERSION ioctl if it is supported
121 * If not, but we have a block device with major '9', we assume
124 * Return version number as 24 but number - assume version parts
128 int md_get_version(int fd
)
133 if (fstat(fd
, &stb
)<0)
135 if ((S_IFMT
&stb
.st_mode
) != S_IFBLK
)
138 if (ioctl(fd
, RAID_VERSION
, &vers
) == 0)
139 return (vers
.major
*10000) + (vers
.minor
*100) + vers
.patchlevel
;
142 if (major(stb
.st_rdev
) == MD_MAJOR
)
147 int get_linux_version()
151 int a
= 0, b
= 0,c
= 0;
156 a
= strtoul(cp
, &cp
, 10);
158 b
= strtoul(cp
+1, &cp
, 10);
160 c
= strtoul(cp
+1, &cp
, 10);
162 return (a
*1000000)+(b
*1000)+c
;
166 int mdadm_version(char *version
)
174 cp
= strchr(version
, '-');
175 if (!cp
|| *(cp
+1) != ' ' || *(cp
+2) != 'v')
178 a
= strtoul(cp
, &cp
, 10);
181 b
= strtoul(cp
+1, &cp
, 10);
183 c
= strtoul(cp
+1, &cp
, 10);
186 if (*cp
!= ' ' && *cp
!= '-')
188 return (a
*1000000)+(b
*1000)+c
;
191 long long parse_size(char *size
)
193 /* parse 'size' which should be a number optionally
194 * followed by 'K', 'M', or 'G'.
195 * Without a suffix, K is assumed.
196 * Number returned is in sectors (half-K)
197 * -1 returned on error.
200 long long s
= strtoll(size
, &c
, 10);
214 s
*= 1024 * 1024 * 2;
223 int parse_layout_10(char *layout
)
227 /* Parse the layout string for raid10 */
228 /* 'f', 'o' or 'n' followed by a number <= raid_disks */
229 if ((layout
[0] != 'n' && layout
[0] != 'f' && layout
[0] != 'o') ||
230 (copies
= strtoul(layout
+1, &cp
, 10)) < 1 ||
234 if (layout
[0] == 'n')
236 else if (layout
[0] == 'o')
237 rv
= 0x10000 + (copies
<<8) + 1;
239 rv
= 1 + (copies
<<8);
243 int parse_layout_faulty(char *layout
)
245 /* Parse the layout string for 'faulty' */
246 int ln
= strcspn(layout
, "0123456789");
247 char *m
= xstrdup(layout
);
250 mode
= map_name(faultylayout
, m
);
254 return mode
| (atoi(layout
+ln
)<< ModeShift
);
257 long parse_num(char *num
)
259 /* Either return a valid number, or -1 */
261 long rv
= strtol(num
, &c
, 10);
262 if (rv
< 0 || *c
|| !num
[0])
269 void remove_partitions(int fd
)
271 /* remove partitions from this block devices.
272 * This is used for components added to an array
274 #ifdef BLKPG_DEL_PARTITION
275 struct blkpg_ioctl_arg a
;
276 struct blkpg_partition p
;
278 a
.op
= BLKPG_DEL_PARTITION
;
280 a
.datalen
= sizeof(p
);
282 memset(a
.data
, 0, a
.datalen
);
283 for (p
.pno
=0; p
.pno
< 16; p
.pno
++)
284 ioctl(fd
, BLKPG
, &a
);
288 int test_partition(int fd
)
290 /* Check if fd is a whole-disk or a partition.
291 * BLKPG will return EINVAL on a partition, and BLKPG_DEL_PARTITION
292 * will return ENXIO on an invalid partition number.
294 struct blkpg_ioctl_arg a
;
295 struct blkpg_partition p
;
296 a
.op
= BLKPG_DEL_PARTITION
;
298 a
.datalen
= sizeof(p
);
300 memset(a
.data
, 0, a
.datalen
);
302 if (ioctl(fd
, BLKPG
, &a
) == 0)
303 /* Very unlikely, but not a partition */
306 /* not a partition */
312 int test_partition_from_id(dev_t id
)
317 sprintf(buf
, "%d:%d", major(id
), minor(id
));
318 fd
= dev_open(buf
, O_RDONLY
);
321 rv
= test_partition(fd
);
326 int enough(int level
, int raid_disks
, int layout
, int clean
, char *avail
)
332 for (i
= 0; i
< raid_disks
; i
++)
333 avail_disks
+= !!avail
[i
];
337 /* This is the tricky one - we need to check
338 * which actual disks are present.
340 copies
= (layout
&255)* ((layout
>>8) & 255);
343 /* there must be one of the 'copies' form 'first' */
349 first
= (first
+1) % raid_disks
;
354 } while (first
!= 0);
357 case LEVEL_MULTIPATH
:
358 return avail_disks
>= 1;
361 return avail_disks
== raid_disks
;
363 return avail_disks
>= 1;
367 return avail_disks
>= raid_disks
-1;
369 return avail_disks
>= raid_disks
;
372 return avail_disks
>= raid_disks
-2;
374 return avail_disks
>= raid_disks
;
380 int enough_fd(int fd
)
382 struct mdu_array_info_s array
;
383 struct mdu_disk_info_s disk
;
388 if (ioctl(fd
, GET_ARRAY_INFO
, &array
) != 0 ||
389 array
.raid_disks
<= 0)
391 avail
= xcalloc(array
.raid_disks
, 1);
392 for (i
=0; i
< MAX_DISKS
&& array
.nr_disks
> 0; i
++) {
394 if (ioctl(fd
, GET_DISK_INFO
, &disk
) != 0)
396 if (disk
.major
== 0 && disk
.minor
== 0)
400 if (! (disk
.state
& (1<<MD_DISK_SYNC
)))
402 if (disk
.raid_disk
< 0 || disk
.raid_disk
>= array
.raid_disks
)
405 avail
[disk
.raid_disk
] = 1;
407 /* This is used on an active array, so assume it is clean */
408 rv
= enough(array
.level
, array
.raid_disks
, array
.layout
,
415 const int uuid_zero
[4] = { 0, 0, 0, 0 };
417 int same_uuid(int a
[4], int b
[4], int swapuuid
)
420 /* parse uuids are hostendian.
421 * uuid's from some superblocks are big-ending
422 * if there is a difference, we need to swap..
424 unsigned char *ac
= (unsigned char *)a
;
425 unsigned char *bc
= (unsigned char *)b
;
427 for (i
=0; i
<16; i
+= 4) {
428 if (ac
[i
+0] != bc
[i
+3] ||
429 ac
[i
+1] != bc
[i
+2] ||
430 ac
[i
+2] != bc
[i
+1] ||
444 void copy_uuid(void *a
, int b
[4], int swapuuid
)
447 /* parse uuids are hostendian.
448 * uuid's from some superblocks are big-ending
449 * if there is a difference, we need to swap..
451 unsigned char *ac
= (unsigned char *)a
;
452 unsigned char *bc
= (unsigned char *)b
;
454 for (i
=0; i
<16; i
+= 4) {
464 char *__fname_from_uuid(int id
[4], int swap
, char *buf
, char sep
)
471 copy_uuid(uuid
, id
, swap
);
472 for (i
= 0; i
< 4; i
++) {
475 for (j
= 3; j
>= 0; j
--) {
476 sprintf(c
,"%02x", (unsigned char) uuid
[j
+4*i
]);
484 char *fname_from_uuid(struct supertype
*st
, struct mdinfo
*info
, char *buf
, char sep
)
486 // dirty hack to work around an issue with super1 superblocks...
487 // super1 superblocks need swapuuid set in order for assembly to
488 // work, but can't have it set if we want this printout to match
489 // all the other uuid printouts in super1.c, so we force swapuuid
490 // to 1 to make our printout match the rest of super1
491 return __fname_from_uuid(info
->uuid
, (st
->ss
== &super1
) ? 1 : st
->ss
->swapuuid
, buf
, sep
);
495 int check_ext2(int fd
, char *name
)
498 * Check for an ext2fs file system.
499 * Superblock is always 1K at 1K offset
501 * s_magic is le16 at 56 == 0xEF53
502 * report mtime - le32 at 44
504 * logblksize - le32 at 24
506 unsigned char sb
[1024];
509 if (lseek(fd
, 1024,0)!= 1024)
511 if (read(fd
, sb
, 1024)!= 1024)
513 if (sb
[56] != 0x53 || sb
[57] != 0xef)
516 mtime
= sb
[44]|(sb
[45]|(sb
[46]|sb
[47]<<8)<<8)<<8;
517 bsize
= sb
[24]|(sb
[25]|(sb
[26]|sb
[27]<<8)<<8)<<8;
518 size
= sb
[4]|(sb
[5]|(sb
[6]|sb
[7]<<8)<<8)<<8;
519 pr_err("%s appears to contain an ext2fs file system\n",
521 fprintf(stderr
," size=%dK mtime=%s",
522 size
*(1<<bsize
), ctime(&mtime
));
526 int check_reiser(int fd
, char *name
)
529 * superblock is at 64K
531 * Magic string "ReIsErFs" or "ReIsEr2Fs" at 52
534 unsigned char sb
[1024];
536 if (lseek(fd
, 64*1024, 0) != 64*1024)
538 if (read(fd
, sb
, 1024) != 1024)
540 if (strncmp((char*)sb
+52, "ReIsErFs",8)!=0 &&
541 strncmp((char*)sb
+52, "ReIsEr2Fs",9)!=0)
543 pr_err("%s appears to contain a reiserfs file system\n",name
);
544 size
= sb
[0]|(sb
[1]|(sb
[2]|sb
[3]<<8)<<8)<<8;
545 fprintf(stderr
, " size = %luK\n", size
*4);
550 int check_raid(int fd
, char *name
)
555 struct supertype
*st
= guess_super(fd
);
558 st
->ignore_hw_compat
= 1;
559 st
->ss
->load_super(st
, fd
, name
);
560 /* Looks like a raid array .. */
561 pr_err("%s appears to be part of a raid array:\n",
563 st
->ss
->getinfo_super(st
, &info
, NULL
);
564 st
->ss
->free_super(st
);
565 crtime
= info
.array
.ctime
;
566 level
= map_num(pers
, info
.array
.level
);
567 if (!level
) level
= "-unknown-";
568 fprintf(stderr
, " level=%s devices=%d ctime=%s",
569 level
, info
.array
.raid_disks
, ctime(&crtime
));
577 for (i
=0; i
<5; i
++) {
579 fprintf(stderr
, "%s%s", mesg
, add
);
581 if (fgets(buf
, 100, stdin
)==NULL
)
583 if (buf
[0]=='y' || buf
[0]=='Y')
585 if (buf
[0]=='n' || buf
[0]=='N')
589 pr_err("assuming 'no'\n");
592 #endif /* MDASSEMBLE */
594 int is_standard(char *dev
, int *nump
)
596 /* tests if dev is a "standard" md dev name.
597 * i.e if the last component is "/dNN" or "/mdNN",
598 * where NN is a string of digits
599 * Returns 1 if a partitionable standard,
600 * -1 if non-partitonable,
601 * 0 if not a standard name.
603 char *d
= strrchr(dev
, '/');
608 if (strncmp(d
, "/d",2)==0)
609 d
+= 2, type
=1; /* /dev/md/dN{pM} */
610 else if (strncmp(d
, "/md_d", 5)==0)
611 d
+= 5, type
=1; /* /dev/md_dN{pM} */
612 else if (strncmp(d
, "/md", 3)==0)
613 d
+= 3, type
=-1; /* /dev/mdN */
614 else if (d
-dev
> 3 && strncmp(d
-2, "md/", 3)==0)
615 d
+= 1, type
=-1; /* /dev/md/N */
625 if (nump
) *nump
= num
;
630 unsigned long calc_csum(void *super
, int bytes
)
632 unsigned long long newcsum
= 0;
635 unsigned int *superc
= (unsigned int*) super
;
637 for(i
=0; i
<bytes
/4; i
++)
639 csum
= (newcsum
& 0xffffffff) + (newcsum
>>32);
641 /* The in-kernel checksum calculation is always 16bit on
642 * the alpha, though it is 32 bit on i386...
643 * I wonder what it is elsewhere... (it uses and API in
644 * a way that it shouldn't).
646 csum
= (csum
& 0xffff) + (csum
>> 16);
647 csum
= (csum
& 0xffff) + (csum
>> 16);
653 char *human_size(long long bytes
)
657 /* We convert bytes to either centi-M{ega,ibi}bytes or
658 * centi-G{igi,ibi}bytes, with appropriate rounding,
659 * and then print 1/100th of those as a decimal.
660 * We allow upto 2048Megabytes before converting to
661 * gigabytes, as that shows more precision and isn't
662 * too large a number.
663 * Terabytes are not yet handled.
666 if (bytes
< 5000*1024)
668 else if (bytes
< 2*1024LL*1024LL*1024LL) {
669 long cMiB
= (bytes
/ ( (1LL<<20) / 200LL ) +1) /2;
670 long cMB
= (bytes
/ ( 1000000LL / 200LL ) +1) /2;
671 snprintf(buf
, sizeof(buf
), " (%ld.%02ld MiB %ld.%02ld MB)",
672 cMiB
/100 , cMiB
% 100,
675 long cGiB
= (bytes
/ ( (1LL<<30) / 200LL ) +1) /2;
676 long cGB
= (bytes
/ (1000000000LL/200LL ) +1) /2;
677 snprintf(buf
, sizeof(buf
), " (%ld.%02ld GiB %ld.%02ld GB)",
678 cGiB
/100 , cGiB
% 100,
684 char *human_size_brief(long long bytes
)
688 if (bytes
< 5000*1024)
689 snprintf(buf
, sizeof(buf
), "%ld.%02ldKiB",
690 (long)(bytes
>>10), (long)(((bytes
&1023)*100+512)/1024)
692 else if (bytes
< 2*1024LL*1024LL*1024LL)
693 snprintf(buf
, sizeof(buf
), "%ld.%02ldMiB",
695 (long)((bytes
&0xfffff)+0x100000/200)/(0x100000/100)
698 snprintf(buf
, sizeof(buf
), "%ld.%02ldGiB",
700 (long)(((bytes
>>10)&0xfffff)+0x100000/200)/(0x100000/100)
705 void print_r10_layout(int layout
)
707 int near
= layout
& 255;
708 int far
= (layout
>> 8) & 255;
709 int offset
= (layout
&0x10000);
713 printf("%s near=%d", sep
, near
);
717 printf("%s %s=%d", sep
, offset
?"offset":"far", far
);
719 printf("NO REDUNDANCY");
723 unsigned long long calc_array_size(int level
, int raid_disks
, int layout
,
724 int chunksize
, unsigned long long devsize
)
728 devsize
&= ~(unsigned long long)((chunksize
>>9)-1);
729 return get_data_disks(level
, layout
, raid_disks
) * devsize
;
732 int get_data_disks(int level
, int layout
, int raid_disks
)
736 case 0: data_disks
= raid_disks
; break;
737 case 1: data_disks
= 1; break;
739 case 5: data_disks
= raid_disks
- 1; break;
740 case 6: data_disks
= raid_disks
- 2; break;
741 case 10: data_disks
= raid_disks
/ (layout
& 255) / ((layout
>>8)&255);
748 #if !defined(MDASSEMBLE) || defined(MDASSEMBLE) && defined(MDASSEMBLE_AUTO)
749 char *get_md_name(int dev
)
751 /* find /dev/md%d or /dev/md/%d or make a device /dev/.tmp.md%d */
752 /* if dev < 0, want /dev/md/d%d or find mdp in /proc/devices ... */
753 static char devname
[50];
759 int mdp
= get_mdp_major();
760 if (mdp
< 0) return NULL
;
761 rdev
= makedev(mdp
, (-1-dev
)<<6);
762 snprintf(devname
, sizeof(devname
), "/dev/md/d%d", -1-dev
);
763 if (stat(devname
, &stb
) == 0
764 && (S_IFMT
&stb
.st_mode
) == S_IFBLK
765 && (stb
.st_rdev
== rdev
))
768 rdev
= makedev(MD_MAJOR
, dev
);
769 snprintf(devname
, sizeof(devname
), "/dev/md%d", dev
);
770 if (stat(devname
, &stb
) == 0
771 && (S_IFMT
&stb
.st_mode
) == S_IFBLK
772 && (stb
.st_rdev
== rdev
))
775 snprintf(devname
, sizeof(devname
), "/dev/md/%d", dev
);
776 if (stat(devname
, &stb
) == 0
777 && (S_IFMT
&stb
.st_mode
) == S_IFBLK
778 && (stb
.st_rdev
== rdev
))
781 dn
= map_dev(major(rdev
), minor(rdev
), 0);
784 snprintf(devname
, sizeof(devname
), "/dev/.tmp.md%d", dev
);
785 if (mknod(devname
, S_IFBLK
| 0600, rdev
) == -1)
789 if (stat(devname
, &stb
) == 0
790 && (S_IFMT
&stb
.st_mode
) == S_IFBLK
791 && (stb
.st_rdev
== rdev
))
797 void put_md_name(char *name
)
799 if (strncmp(name
, "/dev/.tmp.md", 12)==0)
803 int find_free_devnum(int use_partitions
)
806 for (devnum
= 127; devnum
!= 128;
807 devnum
= devnum
? devnum
-1 : (1<<20)-1) {
811 _devnum
= use_partitions
? (-1-devnum
) : devnum
;
812 if (mddev_busy(_devnum
))
814 /* make sure it is new to /dev too, at least as a
816 dn
= map_dev(dev2major(_devnum
), dev2minor(_devnum
), 0);
817 if (dn
&& ! is_standard(dn
, NULL
))
823 return use_partitions
? (-1-devnum
) : devnum
;
825 #endif /* !defined(MDASSEMBLE) || defined(MDASSEMBLE) && defined(MDASSEMBLE_AUTO) */
827 int dev_open(char *dev
, int flags
)
829 /* like 'open', but if 'dev' matches %d:%d, create a temp
830 * block device and open that
841 major
= strtoul(dev
, &e
, 0);
842 if (e
> dev
&& *e
== ':' && e
[1] &&
843 (minor
= strtoul(e
+1, &e
, 0)) >= 0 &&
845 char *path
= map_dev(major
, minor
, 0);
847 fd
= open(path
, flags
);
849 snprintf(devname
, sizeof(devname
), "/dev/.tmp.md.%d:%d:%d",
850 (int)getpid(), major
, minor
);
851 if (mknod(devname
, S_IFBLK
|0600, makedev(major
, minor
))==0) {
852 fd
= open(devname
, flags
);
857 snprintf(devname
, sizeof(devname
), "/tmp/.tmp.md.%d:%d:%d",
858 (int)getpid(), major
, minor
);
859 if (mknod(devname
, S_IFBLK
|0600, makedev(major
, minor
))==0) {
860 fd
= open(devname
, flags
);
865 fd
= open(dev
, flags
);
869 int open_dev_flags(int devnum
, int flags
)
873 sprintf(buf
, "%d:%d", dev2major(devnum
), dev2minor(devnum
));
874 return dev_open(buf
, flags
);
877 int open_dev(int devnum
)
879 return open_dev_flags(devnum
, O_RDONLY
);
882 int open_dev_excl(int devnum
)
888 sprintf(buf
, "%d:%d", dev2major(devnum
), dev2minor(devnum
));
889 for (i
=0 ; i
<25 ; i
++) {
890 int fd
= dev_open(buf
, flags
|O_EXCL
);
893 if (errno
== EACCES
&& flags
== O_RDWR
) {
904 int same_dev(char *one
, char *two
)
906 struct stat st1
, st2
;
907 if (stat(one
, &st1
) != 0)
909 if (stat(two
, &st2
) != 0)
911 if ((st1
.st_mode
& S_IFMT
) != S_IFBLK
)
913 if ((st2
.st_mode
& S_IFMT
) != S_IFBLK
)
915 return st1
.st_rdev
== st2
.st_rdev
;
918 void wait_for(char *dev
, int fd
)
921 struct stat stb_want
;
923 if (fstat(fd
, &stb_want
) != 0 ||
924 (stb_want
.st_mode
& S_IFMT
) != S_IFBLK
)
927 for (i
=0 ; i
<25 ; i
++) {
929 if (stat(dev
, &stb
) == 0 &&
930 (stb
.st_mode
& S_IFMT
) == S_IFBLK
&&
931 (stb
.st_rdev
== stb_want
.st_rdev
))
936 dprintf("%s: timeout waiting for %s\n", __func__
, dev
);
939 struct superswitch
*superlist
[] =
942 &super_ddf
, &super_imsm
,
946 #if !defined(MDASSEMBLE) || defined(MDASSEMBLE) && defined(MDASSEMBLE_AUTO)
948 struct supertype
*super_by_fd(int fd
, char **subarrayp
)
950 mdu_array_info_t array
;
953 struct supertype
*st
= NULL
;
958 char *subarray
= NULL
;
959 int container
= NoMdDev
;
961 sra
= sysfs_read(fd
, 0, GET_VERSION
);
964 vers
= sra
->array
.major_version
;
965 minor
= sra
->array
.minor_version
;
966 verstr
= sra
->text_version
;
968 if (ioctl(fd
, GET_ARRAY_INFO
, &array
))
969 array
.major_version
= array
.minor_version
= 0;
970 vers
= array
.major_version
;
971 minor
= array
.minor_version
;
976 sprintf(version
, "%d.%d", vers
, minor
);
979 if (minor
== -2 && is_subarray(verstr
)) {
980 char *dev
= verstr
+1;
982 subarray
= strchr(dev
, '/');
985 subarray
= xstrdup(subarray
);
987 container
= devname2devnum(dev
);
990 sra
= sysfs_read(-1, container
, GET_VERSION
);
991 if (sra
&& sra
->text_version
[0])
992 verstr
= sra
->text_version
;
994 verstr
= "-no-metadata-";
997 for (i
= 0; st
== NULL
&& superlist
[i
] ; i
++)
998 st
= superlist
[i
]->match_metadata_desc(verstr
);
1005 *subarrayp
= subarray
;
1006 st
->container_dev
= container
;
1007 st
->devnum
= fd2devnum(fd
);
1013 #endif /* !defined(MDASSEMBLE) || defined(MDASSEMBLE) && defined(MDASSEMBLE_AUTO) */
1015 int dev_size_from_id(dev_t id
, unsigned long long *size
)
1020 sprintf(buf
, "%d:%d", major(id
), minor(id
));
1021 fd
= dev_open(buf
, O_RDONLY
);
1024 if (get_dev_size(fd
, NULL
, size
)) {
1032 struct supertype
*dup_super(struct supertype
*orig
)
1034 struct supertype
*st
;
1038 st
= xcalloc(1, sizeof(*st
));
1040 st
->max_devs
= orig
->max_devs
;
1041 st
->minor_version
= orig
->minor_version
;
1047 struct supertype
*guess_super_type(int fd
, enum guess_types guess_type
)
1049 /* try each load_super to find the best match,
1050 * and return the best superswitch
1052 struct superswitch
*ss
;
1053 struct supertype
*st
;
1054 time_t besttime
= 0;
1058 st
= xcalloc(1, sizeof(*st
));
1059 st
->container_dev
= NoMdDev
;
1061 for (i
=0 ; superlist
[i
]; i
++) {
1064 if (guess_type
== guess_array
&& ss
->add_to_super
== NULL
)
1066 if (guess_type
== guess_partitions
&& ss
->add_to_super
!= NULL
)
1068 memset(st
, 0, sizeof(*st
));
1069 st
->ignore_hw_compat
= 1;
1070 rv
= ss
->load_super(st
, fd
, NULL
);
1073 st
->ss
->getinfo_super(st
, &info
, NULL
);
1074 if (bestsuper
== -1 ||
1075 besttime
< info
.array
.ctime
) {
1077 besttime
= info
.array
.ctime
;
1082 if (bestsuper
!= -1) {
1084 memset(st
, 0, sizeof(*st
));
1085 st
->ignore_hw_compat
= 1;
1086 rv
= superlist
[bestsuper
]->load_super(st
, fd
, NULL
);
1088 superlist
[bestsuper
]->free_super(st
);
1089 st
->ignore_hw_compat
= 0;
1097 /* Return size of device in bytes */
1098 int get_dev_size(int fd
, char *dname
, unsigned long long *sizep
)
1100 unsigned long long ldsize
;
1103 if (fstat(fd
, &st
) != -1 && S_ISREG(st
.st_mode
))
1104 ldsize
= (unsigned long long)st
.st_size
;
1107 if (ioctl(fd
, BLKGETSIZE64
, &ldsize
) != 0)
1110 unsigned long dsize
;
1111 if (ioctl(fd
, BLKGETSIZE
, &dsize
) == 0) {
1116 pr_err("Cannot get size of %s: %s\b",
1117 dname
, strerror(errno
));
1125 /* Return true if this can only be a container, not a member device.
1126 * i.e. is and md device and size is zero
1128 int must_be_container(int fd
)
1130 unsigned long long size
;
1131 if (md_get_version(fd
) < 0)
1133 if (get_dev_size(fd
, NULL
, &size
) == 0)
1140 /* Sets endofpart parameter to the last block used by the last GPT partition on the device.
1141 * Returns: 1 if successful
1142 * -1 for unknown partition type
1143 * 0 for other errors
1145 static int get_gpt_last_partition_end(int fd
, unsigned long long *endofpart
)
1148 unsigned char empty_gpt_entry
[16]= {0};
1149 struct GPT_part_entry
*part
;
1151 unsigned long long curr_part_end
;
1152 unsigned all_partitions
, entry_size
;
1157 BUILD_BUG_ON(sizeof(gpt
) != 512);
1158 /* skip protective MBR */
1159 lseek(fd
, 512, SEEK_SET
);
1160 /* read GPT header */
1161 if (read(fd
, &gpt
, 512) != 512)
1164 /* get the number of partition entries and the entry size */
1165 all_partitions
= __le32_to_cpu(gpt
.part_cnt
);
1166 entry_size
= __le32_to_cpu(gpt
.part_size
);
1168 /* Check GPT signature*/
1169 if (gpt
.magic
!= GPT_SIGNATURE_MAGIC
)
1173 if (all_partitions
> 1024 ||
1174 entry_size
> sizeof(buf
))
1177 part
= (struct GPT_part_entry
*)buf
;
1179 for (part_nr
=0; part_nr
< all_partitions
; part_nr
++) {
1180 /* read partition entry */
1181 if (read(fd
, buf
, entry_size
) != (ssize_t
)entry_size
)
1184 /* is this valid partition? */
1185 if (memcmp(part
->type_guid
, empty_gpt_entry
, 16) != 0) {
1186 /* check the last lba for the current partition */
1187 curr_part_end
= __le64_to_cpu(part
->ending_lba
);
1188 if (curr_part_end
> *endofpart
)
1189 *endofpart
= curr_part_end
;
1196 /* Sets endofpart parameter to the last block used by the last partition on the device.
1197 * Returns: 1 if successful
1198 * -1 for unknown partition type
1199 * 0 for other errors
1201 static int get_last_partition_end(int fd
, unsigned long long *endofpart
)
1203 struct MBR boot_sect
;
1204 struct MBR_part_record
*part
;
1205 unsigned long long curr_part_end
;
1211 BUILD_BUG_ON(sizeof(boot_sect
) != 512);
1214 if (read(fd
, &boot_sect
, 512) != 512)
1217 /* check MBP signature */
1218 if (boot_sect
.magic
== MBR_SIGNATURE_MAGIC
) {
1220 /* found the correct signature */
1221 part
= boot_sect
.parts
;
1223 for (part_nr
=0; part_nr
< MBR_PARTITIONS
; part_nr
++) {
1224 /* check for GPT type */
1225 if (part
->part_type
== MBR_GPT_PARTITION_TYPE
) {
1226 retval
= get_gpt_last_partition_end(fd
, endofpart
);
1229 /* check the last used lba for the current partition */
1230 curr_part_end
= __le32_to_cpu(part
->first_sect_lba
) +
1231 __le32_to_cpu(part
->blocks_num
);
1232 if (curr_part_end
> *endofpart
)
1233 *endofpart
= curr_part_end
;
1238 /* Unknown partition table */
1245 int check_partitions(int fd
, char *dname
, unsigned long long freesize
,
1246 unsigned long long size
)
1249 * Check where the last partition ends
1251 unsigned long long endofpart
;
1254 if ((ret
= get_last_partition_end(fd
, &endofpart
)) > 0) {
1255 /* There appears to be a partition table here */
1256 if (freesize
== 0) {
1257 /* partitions will not be visible in new device */
1258 pr_err("partition table exists on %s but will be lost or\n"
1259 " meaningless after creating array\n",
1262 } else if (endofpart
> freesize
) {
1263 /* last partition overlaps metadata */
1264 pr_err("metadata will over-write last partition on %s.\n",
1267 } else if (size
&& endofpart
> size
) {
1268 /* partitions will be truncated in new device */
1269 pr_err("array size is too small to cover all partitions on %s.\n",
1277 void get_one_disk(int mdfd
, mdu_array_info_t
*ainf
, mdu_disk_info_t
*disk
)
1281 ioctl(mdfd
, GET_ARRAY_INFO
, ainf
);
1282 for (d
= 0 ; d
< MAX_DISKS
; d
++) {
1283 if (ioctl(mdfd
, GET_DISK_INFO
, disk
) == 0 &&
1284 (disk
->major
|| disk
->minor
))
1289 int open_container(int fd
)
1291 /* 'fd' is a block device. Find out if it is in use
1292 * by a container, and return an open fd on that container.
1303 if (fstat(fd
, &st
) != 0)
1305 sprintf(path
, "/sys/dev/block/%d:%d/holders",
1306 (int)major(st
.st_rdev
), (int)minor(st
.st_rdev
));
1307 e
= path
+ strlen(path
);
1309 dir
= opendir(path
);
1312 while ((de
= readdir(dir
))) {
1315 if (de
->d_name
[0] == '.')
1317 sprintf(e
, "/%s/dev", de
->d_name
);
1318 dfd
= open(path
, O_RDONLY
);
1321 n
= read(dfd
, buf
, sizeof(buf
));
1323 if (n
<= 0 || (unsigned)n
>= sizeof(buf
))
1326 if (sscanf(buf
, "%d:%d", &major
, &minor
) != 2)
1328 sprintf(buf
, "%d:%d", major
, minor
);
1329 dfd
= dev_open(buf
, O_RDONLY
);
1339 struct superswitch
*version_to_superswitch(char *vers
)
1343 for (i
= 0; superlist
[i
]; i
++) {
1344 struct superswitch
*ss
= superlist
[i
];
1346 if (strcmp(vers
, ss
->name
) == 0)
1353 int is_container_member(struct mdstat_ent
*mdstat
, char *container
)
1355 if (mdstat
->metadata_version
== NULL
||
1356 strncmp(mdstat
->metadata_version
, "external:", 9) != 0 ||
1357 !is_subarray(mdstat
->metadata_version
+9) ||
1358 strncmp(mdstat
->metadata_version
+10, container
, strlen(container
)) != 0 ||
1359 mdstat
->metadata_version
[10+strlen(container
)] != '/')
1365 int is_subarray_active(char *subarray
, char *container
)
1367 struct mdstat_ent
*mdstat
= mdstat_read(0, 0);
1368 struct mdstat_ent
*ent
;
1370 for (ent
= mdstat
; ent
; ent
= ent
->next
)
1371 if (is_container_member(ent
, container
))
1372 if (strcmp(to_subarray(ent
, container
), subarray
) == 0)
1375 free_mdstat(mdstat
);
1380 /* open_subarray - opens a subarray in a container
1381 * @dev: container device name
1382 * @st: empty supertype
1383 * @quiet: block reporting errors flag
1385 * On success returns an fd to a container and fills in *st
1387 int open_subarray(char *dev
, char *subarray
, struct supertype
*st
, int quiet
)
1390 struct mdinfo
*info
;
1393 fd
= open(dev
, O_RDWR
|O_EXCL
);
1396 pr_err("Couldn't open %s, aborting\n",
1401 st
->devnum
= fd2devnum(fd
);
1402 if (st
->devnum
== NoMdDev
) {
1404 pr_err("Failed to determine device number for %s\n",
1409 mdi
= sysfs_read(fd
, st
->devnum
, GET_VERSION
|GET_LEVEL
);
1412 pr_err("Failed to read sysfs for %s\n",
1417 if (mdi
->array
.level
!= UnSet
) {
1419 pr_err("%s is not a container\n", dev
);
1423 st
->ss
= version_to_superswitch(mdi
->text_version
);
1426 pr_err("Operation not supported for %s metadata\n",
1431 st
->devname
= devnum2devname(st
->devnum
);
1434 pr_err("Failed to allocate device name\n");
1438 if (!st
->ss
->load_container
) {
1440 pr_err("%s is not a container\n", dev
);
1444 if (st
->ss
->load_container(st
, fd
, NULL
)) {
1446 pr_err("Failed to load metadata for %s\n",
1451 info
= st
->ss
->container_content(st
, subarray
);
1454 pr_err("Failed to find subarray-%s in %s\n",
1464 st
->ss
->free_super(st
);
1480 int add_disk(int mdfd
, struct supertype
*st
,
1481 struct mdinfo
*sra
, struct mdinfo
*info
)
1483 /* Add a device to an array, in one of 2 ways. */
1486 if (st
->ss
->external
) {
1487 if (info
->disk
.state
& (1<<MD_DISK_SYNC
))
1488 info
->recovery_start
= MaxSector
;
1490 info
->recovery_start
= 0;
1491 rv
= sysfs_add_disk(sra
, info
, 0);
1494 for (sd2
= sra
->devs
; sd2
; sd2
=sd2
->next
)
1498 sd2
= xmalloc(sizeof(*sd2
));
1500 sd2
->next
= sra
->devs
;
1506 rv
= ioctl(mdfd
, ADD_NEW_DISK
, &info
->disk
);
1510 int remove_disk(int mdfd
, struct supertype
*st
,
1511 struct mdinfo
*sra
, struct mdinfo
*info
)
1514 /* Remove the disk given by 'info' from the array */
1516 if (st
->ss
->external
)
1517 rv
= sysfs_set_str(sra
, info
, "slot", "none");
1520 rv
= ioctl(mdfd
, HOT_REMOVE_DISK
, makedev(info
->disk
.major
,
1525 int set_array_info(int mdfd
, struct supertype
*st
, struct mdinfo
*info
)
1527 /* Initialise kernel's knowledge of array.
1528 * This varies between externally managed arrays
1531 int vers
= md_get_version(mdfd
);
1535 if (st
->ss
->external
)
1536 rv
= sysfs_set_array(info
, vers
);
1539 if ((vers
% 100) >= 1) { /* can use different versions */
1540 mdu_array_info_t inf
;
1541 memset(&inf
, 0, sizeof(inf
));
1542 inf
.major_version
= info
->array
.major_version
;
1543 inf
.minor_version
= info
->array
.minor_version
;
1544 rv
= ioctl(mdfd
, SET_ARRAY_INFO
, &inf
);
1546 rv
= ioctl(mdfd
, SET_ARRAY_INFO
, NULL
);
1550 unsigned long long min_recovery_start(struct mdinfo
*array
)
1552 /* find the minimum recovery_start in an array for metadata
1553 * formats that only record per-array recovery progress instead
1556 unsigned long long recovery_start
= MaxSector
;
1559 for (d
= array
->devs
; d
; d
= d
->next
)
1560 recovery_start
= min(recovery_start
, d
->recovery_start
);
1562 return recovery_start
;
1565 int mdmon_pid(int devnum
)
1571 char *devname
= devnum2devname(devnum
);
1573 sprintf(path
, "%s/%s.pid", MDMON_DIR
, devname
);
1576 fd
= open(path
, O_RDONLY
| O_NOATIME
, 0);
1580 n
= read(fd
, pid
, 9);
1587 int mdmon_running(int devnum
)
1589 int pid
= mdmon_pid(devnum
);
1592 if (kill(pid
, 0) == 0)
1597 int start_mdmon(int devnum
)
1611 if (check_env("MDADM_NO_MDMON"))
1614 len
= readlink("/proc/self/exe", pathbuf
, sizeof(pathbuf
)-1);
1618 sl
= strrchr(pathbuf
, '/');
1623 strcpy(sl
, "mdmon");
1629 /* FIXME yuk. CLOSE_EXEC?? */
1631 for (i
=3; skipped
< 20; i
++)
1637 for (i
=0; paths
[i
]; i
++)
1640 execl(paths
[i
], "mdmon", "--offroot",
1641 devnum2devname(devnum
),
1644 execl(paths
[i
], "mdmon",
1645 devnum2devname(devnum
),
1650 case -1: pr_err("cannot run mdmon. "
1651 "Array remains readonly\n");
1653 default: /* parent - good */
1654 pid
= wait(&status
);
1655 if (pid
< 0 || status
!= 0)
1661 int check_env(char *name
)
1663 char *val
= getenv(name
);
1665 if (val
&& atoi(val
) == 1)
1671 __u32
random32(void)
1674 int rfd
= open("/dev/urandom", O_RDONLY
);
1675 if (rfd
< 0 || read(rfd
, &rv
, 4) != 4)
1683 int flush_metadata_updates(struct supertype
*st
)
1687 st
->update_tail
= NULL
;
1691 sfd
= connect_monitor(devnum2devname(st
->container_dev
));
1695 while (st
->updates
) {
1696 struct metadata_update
*mu
= st
->updates
;
1697 st
->updates
= mu
->next
;
1699 send_message(sfd
, mu
, 0);
1707 st
->update_tail
= NULL
;
1711 void append_metadata_update(struct supertype
*st
, void *buf
, int len
)
1714 struct metadata_update
*mu
= xmalloc(sizeof(*mu
));
1719 mu
->space_list
= NULL
;
1721 *st
->update_tail
= mu
;
1722 st
->update_tail
= &mu
->next
;
1724 #endif /* MDASSEMBLE */
1727 /* tinyc doesn't optimize this check in ioctl.h out ... */
1728 unsigned int __invalid_size_argument_for_IOC
= 0;
1731 int experimental(void)
1733 if (check_env("MDADM_EXPERIMENTAL"))
1736 pr_err("To use this feature MDADM_EXPERIMENTAL"
1737 " environment variable has to be defined.\n");
1742 /* Pick all spares matching given criteria from a container
1743 * if min_size == 0 do not check size
1744 * if domlist == NULL do not check domains
1745 * if spare_group given add it to domains of each spare
1746 * metadata allows to test domains using metadata of destination array */
1747 struct mdinfo
*container_choose_spares(struct supertype
*st
,
1748 unsigned long long min_size
,
1749 struct domainlist
*domlist
,
1751 const char *metadata
, int get_one
)
1753 struct mdinfo
*d
, **dp
, *disks
= NULL
;
1755 /* get list of all disks in container */
1756 if (st
->ss
->getinfo_super_disks
)
1757 disks
= st
->ss
->getinfo_super_disks(st
);
1761 /* find spare devices on the list */
1763 disks
->array
.spare_disks
= 0;
1767 if (d
->disk
.state
== 0) {
1768 /* check if size is acceptable */
1769 unsigned long long dev_size
;
1770 dev_t dev
= makedev(d
->disk
.major
,d
->disk
.minor
);
1773 (dev_size_from_id(dev
, &dev_size
) &&
1774 dev_size
>= min_size
))
1776 /* check if domain matches */
1777 if (found
&& domlist
) {
1778 struct dev_policy
*pol
= devnum_policy(dev
);
1780 pol_add(&pol
, pol_domain
,
1782 if (domain_test(domlist
, pol
, metadata
) != 1)
1784 dev_policy_free(pol
);
1789 disks
->array
.spare_disks
++;
1803 void *xmalloc(size_t len
)
1805 void *rv
= malloc(len
);
1809 msg
= Name
": memory allocation failure - aborting\n";
1810 exit(4+!!write(2, msg
, strlen(msg
)));
1813 void *xrealloc(void *ptr
, size_t len
)
1815 void *rv
= realloc(ptr
, len
);
1819 msg
= Name
": memory allocation failure - aborting\n";
1820 exit(4+!!write(2, msg
, strlen(msg
)));
1823 void *xcalloc(size_t num
, size_t size
)
1825 void *rv
= calloc(num
, size
);
1829 msg
= Name
": memory allocation failure - aborting\n";
1830 exit(4+!!write(2, msg
, strlen(msg
)));
1833 char *xstrdup(const char *str
)
1835 char *rv
= strdup(str
);
1839 msg
= Name
": memory allocation failure - aborting\n";
1840 exit(4+!!write(2, msg
, strlen(msg
)));