]> git.ipfire.org Git - thirdparty/mdadm.git/blame - util.c
Allow a uuid of all f's to always match
[thirdparty/mdadm.git] / util.c
CommitLineData
64c4757e 1/*
9a9dab36 2 * mdadm - manage Linux "md" devices aka RAID arrays.
64c4757e 3 *
4f589ad0 4 * Copyright (C) 2001-2006 Neil Brown <neilb@suse.de>
64c4757e
NB
5 *
6 *
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
11 *
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 *
21 * Author: Neil Brown
22 * Email: <neilb@cse.unsw.edu.au>
23 * Paper: Neil Brown
24 * School of Computer Science and Engineering
25 * The University of New South Wales
26 * Sydney, 2052
27 * Australia
28 */
29
9a9dab36 30#include "mdadm.h"
64c4757e 31#include "md_p.h"
edd8d13c 32#include <sys/socket.h>
64c4757e 33#include <sys/utsname.h>
9fe32043 34#include <sys/wait.h>
edd8d13c 35#include <sys/un.h>
98c6faba 36#include <ctype.h>
a322f70c 37#include <dirent.h>
a931db9e 38#include <signal.h>
0a816ef9
NB
39
40/*
41 * following taken from linux/blkpg.h because they aren't
42 * anywhere else and it isn't safe to #include linux/ * stuff.
43 */
44
45#define BLKPG _IO(0x12,105)
46
47/* The argument structure */
48struct blkpg_ioctl_arg {
49 int op;
50 int flags;
51 int datalen;
52 void *data;
53};
54
55/* The subfunctions (for the op field) */
56#define BLKPG_ADD_PARTITION 1
57#define BLKPG_DEL_PARTITION 2
58
59/* Sizes of name fields. Unused at present. */
60#define BLKPG_DEVNAMELTH 64
61#define BLKPG_VOLNAMELTH 64
62
63/* The data structure for ADD_PARTITION and DEL_PARTITION */
64struct blkpg_partition {
65 long long start; /* starting offset in bytes */
66 long long length; /* length in bytes */
67 int pno; /* partition number */
68 char devname[BLKPG_DEVNAMELTH]; /* partition name, like sda5 or c0d1p2,
69 to be used in kernel messages */
70 char volname[BLKPG_VOLNAMELTH]; /* volume label */
71};
64c4757e
NB
72
73/*
74 * Parse a 128 bit uuid in 4 integers
75 * format is 32 hexx nibbles with options :.<space> separator
76 * If not exactly 32 hex digits are found, return 0
77 * else return 1
78 */
79int parse_uuid(char *str, int uuid[4])
80{
aba69144
NB
81 int hit = 0; /* number of Hex digIT */
82 int i;
83 char c;
84 for (i=0; i<4; i++) uuid[i]=0;
85
86 while ((c= *str++)) {
87 int n;
88 if (c>='0' && c<='9')
89 n = c-'0';
90 else if (c>='a' && c <= 'f')
91 n = 10 + c - 'a';
92 else if (c>='A' && c <= 'F')
93 n = 10 + c - 'A';
94 else if (strchr(":. -", c))
95 continue;
96 else return 0;
97
98 if (hit<32) {
99 uuid[hit/8] <<= 4;
100 uuid[hit/8] += n;
101 }
102 hit++;
82b27616 103 }
aba69144
NB
104 if (hit == 32)
105 return 1;
106 return 0;
64c4757e
NB
107}
108
109
110/*
111 * Get the md version number.
112 * We use the RAID_VERSION ioctl if it is supported
113 * If not, but we have a block device with major '9', we assume
114 * 0.36.0
115 *
116 * Return version number as 24 but number - assume version parts
117 * always < 255
118 */
119
120int md_get_version(int fd)
121{
122 struct stat stb;
123 mdu_version_t vers;
124
125 if (fstat(fd, &stb)<0)
126 return -1;
127 if ((S_IFMT&stb.st_mode) != S_IFBLK)
128 return -1;
129
130 if (ioctl(fd, RAID_VERSION, &vers) == 0)
682c7051 131 return (vers.major*10000) + (vers.minor*100) + vers.patchlevel;
5787fa49
NB
132 if (errno == EACCES)
133 return -1;
0df46c2a 134 if (major(stb.st_rdev) == MD_MAJOR)
682c7051 135 return (3600);
64c4757e
NB
136 return -1;
137}
138
64c4757e
NB
139int get_linux_version()
140{
141 struct utsname name;
98c6faba 142 char *cp;
64c4757e
NB
143 int a,b,c;
144 if (uname(&name) <0)
145 return -1;
146
98c6faba
NB
147 cp = name.release;
148 a = strtoul(cp, &cp, 10);
149 if (*cp != '.') return -1;
150 b = strtoul(cp+1, &cp, 10);
151 if (*cp != '.') return -1;
152 c = strtoul(cp+1, NULL, 10);
153
682c7051 154 return (a*1000000)+(b*1000)+c;
64c4757e
NB
155}
156
0430ed48
NB
157void remove_partitions(int fd)
158{
159 /* remove partitions from this block devices.
160 * This is used for components added to an array
161 */
162#ifdef BLKPG_DEL_PARTITION
163 struct blkpg_ioctl_arg a;
164 struct blkpg_partition p;
165
166 a.op = BLKPG_DEL_PARTITION;
167 a.data = (void*)&p;
168 a.datalen = sizeof(p);
169 a.flags = 0;
170 memset(a.data, 0, a.datalen);
171 for (p.pno=0; p.pno < 16; p.pno++)
172 ioctl(fd, BLKPG, &a);
173#endif
174}
175
583315d9 176int enough(int level, int raid_disks, int layout, int clean,
265e0f17 177 char *avail, int avail_disks)
64c4757e 178{
265e0f17 179 int copies, first;
64c4757e 180 switch (level) {
265e0f17
NB
181 case 10:
182 /* This is the tricky one - we need to check
183 * which actual disks are present.
184 */
702b557b 185 copies = (layout&255)* ((layout>>8) & 255);
265e0f17
NB
186 first=0;
187 do {
188 /* there must be one of the 'copies' form 'first' */
189 int n = copies;
190 int cnt=0;
191 while (n--) {
192 if (avail[first])
193 cnt++;
194 first = (first+1) % raid_disks;
195 }
196 if (cnt == 0)
197 return 0;
198
199 } while (first != 0);
200 return 1;
e5329c37 201
e0d19036
NB
202 case -4:
203 return avail_disks>= 1;
64c4757e
NB
204 case -1:
205 case 0:
206 return avail_disks == raid_disks;
207 case 1:
208 return avail_disks >= 1;
209 case 4:
210 case 5:
583315d9
NB
211 if (clean)
212 return avail_disks >= raid_disks-1;
213 else
214 return avail_disks >= raid_disks;
98c6faba 215 case 6:
583315d9
NB
216 if (clean)
217 return avail_disks >= raid_disks-2;
218 else
219 return avail_disks >= raid_disks;
64c4757e
NB
220 default:
221 return 0;
222 }
223}
224
36ba7d48 225const int uuid_match_any[4] = { ~0, ~0, ~0, ~0 };
f277ce36 226int same_uuid(int a[4], int b[4], int swapuuid)
64c4757e 227{
36ba7d48
DW
228 if (memcmp(a, uuid_match_any, sizeof(int[4])) == 0 ||
229 memcmp(b, uuid_match_any, sizeof(int[4])) == 0)
230 return 1;
231
f277ce36
NB
232 if (swapuuid) {
233 /* parse uuids are hostendian.
234 * uuid's from some superblocks are big-ending
aba69144 235 * if there is a difference, we need to swap..
f277ce36
NB
236 */
237 unsigned char *ac = (unsigned char *)a;
238 unsigned char *bc = (unsigned char *)b;
239 int i;
240 for (i=0; i<16; i+= 4) {
241 if (ac[i+0] != bc[i+3] ||
242 ac[i+1] != bc[i+2] ||
243 ac[i+2] != bc[i+1] ||
244 ac[i+3] != bc[i+0])
245 return 0;
246 }
247 return 1;
248 } else {
249 if (a[0]==b[0] &&
250 a[1]==b[1] &&
251 a[2]==b[2] &&
252 a[3]==b[3])
253 return 1;
254 return 0;
255 }
64c4757e 256}
350f29f9
NB
257void copy_uuid(void *a, int b[4], int swapuuid)
258{
259 if (swapuuid) {
260 /* parse uuids are hostendian.
261 * uuid's from some superblocks are big-ending
262 * if there is a difference, we need to swap..
263 */
264 unsigned char *ac = (unsigned char *)a;
265 unsigned char *bc = (unsigned char *)b;
266 int i;
267 for (i=0; i<16; i+= 4) {
268 ac[i+0] = bc[i+3];
269 ac[i+1] = bc[i+2];
270 ac[i+2] = bc[i+1];
271 ac[i+3] = bc[i+0];
272 }
273 } else
274 memcpy(a, b, 16);
275}
64c4757e 276
ff54de6e 277char *fname_from_uuid(struct supertype *st, struct mdinfo *info, char *buf, char sep)
d7288ddc 278{
9968e376
DW
279 int i, j;
280 int id;
d7288ddc
N
281 char uuid[16];
282 char *c = buf;
283 strcpy(c, "UUID-");
284 c += strlen(c);
285 copy_uuid(uuid, info->uuid, st->ss->swapuuid);
9968e376
DW
286 for (i = 0; i < 4; i++) {
287 id = uuid[i];
288 if (i)
ff54de6e 289 *c++ = sep;
9968e376
DW
290 for (j = 3; j >= 0; j--) {
291 sprintf(c,"%02x", (unsigned char) uuid[j+4*i]);
292 c+= 2;
293 }
d7288ddc
N
294 }
295 return buf;
296}
297
435d4ebb 298#ifndef MDASSEMBLE
682c7051
NB
299int check_ext2(int fd, char *name)
300{
301 /*
302 * Check for an ext2fs file system.
303 * Superblock is always 1K at 1K offset
304 *
305 * s_magic is le16 at 56 == 0xEF53
306 * report mtime - le32 at 44
307 * blocks - le32 at 4
308 * logblksize - le32 at 24
309 */
310 unsigned char sb[1024];
311 time_t mtime;
312 int size, bsize;
313 if (lseek(fd, 1024,0)!= 1024)
314 return 0;
315 if (read(fd, sb, 1024)!= 1024)
316 return 0;
317 if (sb[56] != 0x53 || sb[57] != 0xef)
318 return 0;
319
320 mtime = sb[44]|(sb[45]|(sb[46]|sb[47]<<8)<<8)<<8;
321 bsize = sb[24]|(sb[25]|(sb[26]|sb[27]<<8)<<8)<<8;
322 size = sb[4]|(sb[5]|(sb[6]|sb[7]<<8)<<8)<<8;
323 fprintf(stderr, Name ": %s appears to contain an ext2fs file system\n",
324 name);
325 fprintf(stderr," size=%dK mtime=%s",
326 size*(1<<bsize), ctime(&mtime));
327 return 1;
328}
329
330int check_reiser(int fd, char *name)
331{
332 /*
333 * superblock is at 64K
334 * size is 1024;
335 * Magic string "ReIsErFs" or "ReIsEr2Fs" at 52
336 *
337 */
338 unsigned char sb[1024];
881990a2 339 unsigned long size;
682c7051
NB
340 if (lseek(fd, 64*1024, 0) != 64*1024)
341 return 0;
342 if (read(fd, sb, 1024) != 1024)
343 return 0;
a46f4061
NB
344 if (strncmp((char*)sb+52, "ReIsErFs",8)!=0 &&
345 strncmp((char*)sb+52, "ReIsEr2Fs",9)!=0)
682c7051
NB
346 return 0;
347 fprintf(stderr, Name ": %s appears to contain a reiserfs file system\n",name);
348 size = sb[0]|(sb[1]|(sb[2]|sb[3]<<8)<<8)<<8;
881990a2 349 fprintf(stderr, " size = %luK\n", size*4);
aba69144 350
682c7051
NB
351 return 1;
352}
353
354int check_raid(int fd, char *name)
355{
4b1ac34b 356 struct mdinfo info;
682c7051 357 time_t crtime;
d078d77c 358 char *level;
82d9eba6 359 struct supertype *st = guess_super(fd);
f9ce90ba 360
82d9eba6 361 if (!st) return 0;
3da92f27 362 st->ss->load_super(st, fd, name);
82d9eba6
NB
363 /* Looks like a raid array .. */
364 fprintf(stderr, Name ": %s appears to be part of a raid array:\n",
365 name);
3da92f27
NB
366 st->ss->getinfo_super(st, &info);
367 st->ss->free_super(st);
82d9eba6 368 crtime = info.array.ctime;
d078d77c
NB
369 level = map_num(pers, info.array.level);
370 if (!level) level = "-unknown-";
371 fprintf(stderr, " level=%s devices=%d ctime=%s",
372 level, info.array.raid_disks, ctime(&crtime));
82d9eba6 373 return 1;
682c7051
NB
374}
375
682c7051
NB
376int ask(char *mesg)
377{
378 char *add = "";
379 int i;
380 for (i=0; i<5; i++) {
381 char buf[100];
382 fprintf(stderr, "%s%s", mesg, add);
383 fflush(stderr);
384 if (fgets(buf, 100, stdin)==NULL)
385 return 0;
386 if (buf[0]=='y' || buf[0]=='Y')
387 return 1;
388 if (buf[0]=='n' || buf[0]=='N')
389 return 0;
390 add = "(y/n) ";
391 }
392 fprintf(stderr, Name ": assuming 'no'\n");
393 return 0;
394}
435d4ebb 395#endif /* MDASSEMBLE */
682c7051
NB
396
397char *map_num(mapping_t *map, int num)
398{
399 while (map->name) {
400 if (map->num == num)
401 return map->name;
402 map++;
403 }
404 return NULL;
405}
406
407int map_name(mapping_t *map, char *name)
408{
409 while (map->name) {
410 if (strcmp(map->name, name)==0)
411 return map->num;
412 map++;
413 }
98c6faba 414 return UnSet;
682c7051 415}
82b27616 416
e5329c37 417
8d80900b 418int is_standard(char *dev, int *nump)
e5329c37
NB
419{
420 /* tests if dev is a "standard" md dev name.
421 * i.e if the last component is "/dNN" or "/mdNN",
aba69144 422 * where NN is a string of digits
598f0d58
NB
423 * Returns 1 if a partitionable standard,
424 * -1 if non-partitonable,
425 * 0 if not a standard name.
e5329c37 426 */
8d80900b
NB
427 char *d = strrchr(dev, '/');
428 int type=0;
429 int num;
430 if (!d)
e5329c37 431 return 0;
8d80900b
NB
432 if (strncmp(d, "/d",2)==0)
433 d += 2, type=1; /* /dev/md/dN{pM} */
434 else if (strncmp(d, "/md_d", 5)==0)
435 d += 5, type=1; /* /dev/md_dNpM */
436 else if (strncmp(d, "/md", 3)==0)
437 d += 3, type=-1; /* /dev/mdN */
438 else if (d-dev > 3 && strncmp(d-2, "md/", 3)==0)
5a6d1148 439 d += 1, type=-1; /* /dev/md/N */
e5329c37
NB
440 else
441 return 0;
8d80900b 442 if (!*d)
e5329c37 443 return 0;
8d80900b
NB
444 num = atoi(d);
445 while (isdigit(*d))
446 d++;
447 if (*d)
e5329c37 448 return 0;
8d80900b
NB
449 if (nump) *nump = num;
450
451 return type;
e5329c37
NB
452}
453
454
82b27616
NB
455/*
456 * convert a major/minor pair for a block device into a name in /dev, if possible.
457 * On the first call, walk /dev collecting name.
458 * Put them in a simple linked listfor now.
459 */
460struct devmap {
461 int major, minor;
462 char *name;
463 struct devmap *next;
464} *devlist = NULL;
465int devlist_ready = 0;
466
82b27616
NB
467int add_dev(const char *name, const struct stat *stb, int flag, struct FTW *s)
468{
bed256c2
NB
469 struct stat st;
470 if (S_ISLNK(stb->st_mode)) {
471 stat(name, &st);
472 stb = &st;
82b27616 473 }
bed256c2
NB
474
475 if ((stb->st_mode&S_IFMT)== S_IFBLK) {
476 char *n = strdup(name);
477 struct devmap *dm = malloc(sizeof(*dm));
478 if (strncmp(n, "/dev/./", 7)==0)
479 strcpy(n+4, name+6);
480 if (dm) {
481 dm->major = major(stb->st_rdev);
482 dm->minor = minor(stb->st_rdev);
483 dm->name = n;
484 dm->next = devlist;
485 devlist = dm;
486 }
487 }
488 return 0;
82b27616
NB
489}
490
45e878bb
NB
491#ifndef HAVE_NFTW
492#ifdef HAVE_FTW
493int add_dev_1(const char *name, const struct stat *stb, int flag)
494{
495 return add_dev(name, stb, flag, NULL);
496}
497int nftw(const char *path, int (*han)(const char *name, const struct stat *stb, int flag, struct FTW *s), int nopenfd, int flags)
498{
499 return ftw(path, add_dev_1, nopenfd);
500}
501#else
45e878bb
NB
502int nftw(const char *path, int (*han)(const char *name, const struct stat *stb, int flag, struct FTW *s), int nopenfd, int flags)
503{
504 return 0;
505}
506#endif /* HAVE_FTW */
507#endif /* HAVE_NFTW */
508
dd0781e5
NB
509/*
510 * Find a block device with the right major/minor number.
b79713f8
NB
511 * If we find multiple names, choose the shortest.
512 * If we find a non-standard name, it is probably there
513 * deliberately so prefer it over a standard name.
514 * This applies only to names for MD devices.
dd0781e5 515 */
16c6fa80 516char *map_dev(int major, int minor, int create)
82b27616 517{
dd0781e5 518 struct devmap *p;
b79713f8 519 char *std = NULL, *nonstd=NULL;
e7bb5d23 520 int did_check = 0;
eed35d66 521
e81cdd9f 522 if (major == 0 && minor == 0)
eed35d66 523 return NULL;
e81cdd9f 524
e7bb5d23 525 retry:
dd0781e5 526 if (!devlist_ready) {
0a416ec3
NB
527 char *dev = "/dev";
528 struct stat stb;
eed35d66
NB
529 while(devlist) {
530 struct devmap *d = devlist;
531 devlist = d->next;
532 free(d->name);
533 free(d);
534 }
0a416ec3
NB
535 if (lstat(dev, &stb)==0 &&
536 S_ISLNK(stb.st_mode))
537 dev = "/dev/.";
538 nftw(dev, add_dev, 10, FTW_PHYS);
dd0781e5 539 devlist_ready=1;
e7bb5d23 540 did_check = 1;
dd0781e5 541 }
82b27616 542
dd0781e5
NB
543 for (p=devlist; p; p=p->next)
544 if (p->major == major &&
545 p->minor == minor) {
b79713f8
NB
546 if (is_standard(p->name, NULL)) {
547 if (std == NULL ||
548 strlen(p->name) < strlen(std))
549 std = p->name;
550 } else {
551 if (nonstd == NULL ||
552 strlen(p->name) < strlen(nonstd))
553 nonstd = p->name;
554 }
dd0781e5 555 }
e7bb5d23
NB
556 if (!std && !nonstd && !did_check) {
557 devlist_ready = 0;
558 goto retry;
559 }
16c6fa80
NB
560 if (create && !std && !nonstd) {
561 static char buf[30];
382245c3 562 snprintf(buf, sizeof(buf), "%d:%d", major, minor);
16c6fa80
NB
563 nonstd = buf;
564 }
565
b79713f8 566 return nonstd ? nonstd : std;
82b27616
NB
567}
568
4b1ac34b 569unsigned long calc_csum(void *super, int bytes)
82b27616 570{
56eb10c0 571 unsigned long long newcsum = 0;
82b27616 572 int i;
4b1ac34b
NB
573 unsigned int csum;
574 unsigned int *superc = (unsigned int*) super;
82b27616 575
4b1ac34b 576 for(i=0; i<bytes/4; i++)
82b27616
NB
577 newcsum+= superc[i];
578 csum = (newcsum& 0xffffffff) + (newcsum>>32);
570c0542 579#ifdef __alpha__
aba69144 580/* The in-kernel checksum calculation is always 16bit on
570c0542
NB
581 * the alpha, though it is 32 bit on i386...
582 * I wonder what it is elsewhere... (it uses and API in
583 * a way that it shouldn't).
584 */
585 csum = (csum & 0xffff) + (csum >> 16);
586 csum = (csum & 0xffff) + (csum >> 16);
587#endif
82b27616
NB
588 return csum;
589}
cd29a5c8 590
435d4ebb 591#ifndef MDASSEMBLE
56eb10c0 592char *human_size(long long bytes)
cd29a5c8
NB
593{
594 static char buf[30];
d5d3721e
NB
595
596 /* We convert bytes to either centi-M{ega,ibi}bytes or
597 * centi-G{igi,ibi}bytes, with appropriate rounding,
598 * and then print 1/100th of those as a decimal.
599 * We allow upto 2048Megabytes before converting to
600 * gigabytes, as that shows more precision and isn't
601 * too large a number.
602 * Terrabytes are not yet handled.
603 */
cd29a5c8 604
56eb10c0 605 if (bytes < 5000*1024)
cd29a5c8 606 buf[0]=0;
d5d3721e
NB
607 else if (bytes < 2*1024LL*1024LL*1024LL) {
608 long cMiB = (bytes / ( (1LL<<20) / 200LL ) +1) /2;
609 long cMB = (bytes / ( 1000000LL / 200LL ) +1) /2;
8f23b0b3 610 snprintf(buf, sizeof(buf), " (%ld.%02ld MiB %ld.%02ld MB)",
d5d3721e
NB
611 cMiB/100 , cMiB % 100,
612 cMB/100, cMB % 100);
613 } else {
614 long cGiB = (bytes / ( (1LL<<30) / 200LL ) +1) /2;
615 long cGB = (bytes / (1000000000LL/200LL ) +1) /2;
8f23b0b3 616 snprintf(buf, sizeof(buf), " (%ld.%02ld GiB %ld.%02ld GB)",
d5d3721e
NB
617 cGiB/100 , cGiB % 100,
618 cGB/100, cGB % 100);
619 }
cd29a5c8
NB
620 return buf;
621}
e0d19036
NB
622
623char *human_size_brief(long long bytes)
624{
625 static char buf[30];
e0d19036
NB
626
627 if (bytes < 5000*1024)
8f23b0b3 628 snprintf(buf, sizeof(buf), "%ld.%02ldKiB",
bd526cee 629 (long)(bytes>>10), (long)(((bytes&1023)*100+512)/1024)
e0d19036
NB
630 );
631 else if (bytes < 2*1024LL*1024LL*1024LL)
8f23b0b3 632 snprintf(buf, sizeof(buf), "%ld.%02ldMiB",
e0d19036 633 (long)(bytes>>20),
bd526cee 634 (long)((bytes&0xfffff)+0x100000/200)/(0x100000/100)
e0d19036
NB
635 );
636 else
8f23b0b3 637 snprintf(buf, sizeof(buf), "%ld.%02ldGiB",
e0d19036 638 (long)(bytes>>30),
bd526cee 639 (long)(((bytes>>10)&0xfffff)+0x100000/200)/(0x100000/100)
e0d19036
NB
640 );
641 return buf;
642}
435d4ebb 643#endif
e0d19036 644
5f8097be
NB
645unsigned long long calc_array_size(int level, int raid_disks, int layout,
646 int chunksize, unsigned long long devsize)
647{
648 int data_disks = 0;
649 switch (level) {
650 case 0: data_disks = raid_disks; break;
651 case 1: data_disks = 1; break;
652 case 4:
653 case 5: data_disks = raid_disks - 1; break;
654 case 6: data_disks = raid_disks - 2; break;
655 case 10: data_disks = raid_disks / (layout & 255) / ((layout>>8)&255);
656 break;
657 }
658 devsize &= ~(unsigned long long)((chunksize>>9)-1);
659 return data_disks * devsize;
660}
661
dd0781e5 662int get_mdp_major(void)
98c6faba 663{
dd0781e5
NB
664static int mdp_major = -1;
665 FILE *fl;
98c6faba
NB
666 char *w;
667 int have_block = 0;
668 int have_devices = 0;
669 int last_num = -1;
dd0781e5
NB
670
671 if (mdp_major != -1)
672 return mdp_major;
673 fl = fopen("/proc/devices", "r");
98c6faba 674 if (!fl)
dd0781e5 675 return -1;
98c6faba
NB
676 while ((w = conf_word(fl, 1))) {
677 if (have_block && strcmp(w, "devices:")==0)
678 have_devices = 1;
679 have_block = (strcmp(w, "Block")==0);
680 if (isdigit(w[0]))
681 last_num = atoi(w);
682 if (have_devices && strcmp(w, "mdp")==0)
683 mdp_major = last_num;
684 free(w);
685 }
686 fclose(fl);
dd0781e5 687 return mdp_major;
98c6faba
NB
688}
689
0e600426 690#if !defined(MDASSEMBLE) || defined(MDASSEMBLE) && defined(MDASSEMBLE_AUTO)
e0d19036
NB
691char *get_md_name(int dev)
692{
693 /* find /dev/md%d or /dev/md/%d or make a device /dev/.tmp.md%d */
98c6faba 694 /* if dev < 0, want /dev/md/d%d or find mdp in /proc/devices ... */
e0d19036
NB
695 static char devname[50];
696 struct stat stb;
98c6faba 697 dev_t rdev;
dd0781e5 698 char *dn;
98c6faba
NB
699
700 if (dev < 0) {
dd0781e5
NB
701 int mdp = get_mdp_major();
702 if (mdp < 0) return NULL;
0df46c2a 703 rdev = makedev(mdp, (-1-dev)<<6);
8f23b0b3 704 snprintf(devname, sizeof(devname), "/dev/md/d%d", -1-dev);
98c6faba
NB
705 if (stat(devname, &stb) == 0
706 && (S_IFMT&stb.st_mode) == S_IFBLK
707 && (stb.st_rdev == rdev))
708 return devname;
709 } else {
0df46c2a 710 rdev = makedev(MD_MAJOR, dev);
8f23b0b3 711 snprintf(devname, sizeof(devname), "/dev/md%d", dev);
98c6faba
NB
712 if (stat(devname, &stb) == 0
713 && (S_IFMT&stb.st_mode) == S_IFBLK
714 && (stb.st_rdev == rdev))
715 return devname;
716
8f23b0b3 717 snprintf(devname, sizeof(devname), "/dev/md/%d", dev);
98c6faba
NB
718 if (stat(devname, &stb) == 0
719 && (S_IFMT&stb.st_mode) == S_IFBLK
720 && (stb.st_rdev == rdev))
721 return devname;
722 }
16c6fa80 723 dn = map_dev(major(rdev), minor(rdev), 0);
dd0781e5
NB
724 if (dn)
725 return dn;
8f23b0b3 726 snprintf(devname, sizeof(devname), "/dev/.tmp.md%d", dev);
e0d19036 727 if (mknod(devname, S_IFBLK | 0600, rdev) == -1)
dd0781e5
NB
728 if (errno != EEXIST)
729 return NULL;
e0d19036
NB
730
731 if (stat(devname, &stb) == 0
732 && (S_IFMT&stb.st_mode) == S_IFBLK
733 && (stb.st_rdev == rdev))
734 return devname;
735 unlink(devname);
736 return NULL;
737}
738
739void put_md_name(char *name)
740{
741 if (strncmp(name, "/dev/.tmp.md", 12)==0)
742 unlink(name);
743}
ea24acd0 744
ea24acd0
NB
745int find_free_devnum(int use_partitions)
746{
747 int devnum;
748 for (devnum = 127; devnum != 128;
749 devnum = devnum ? devnum-1 : (1<<22)-1) {
750 char *dn;
751 int _devnum;
752
753 _devnum = use_partitions ? (-1-devnum) : devnum;
754 if (mddev_busy(_devnum))
755 continue;
756 /* make sure it is new to /dev too, at least as a
757 * non-standard */
758 dn = map_dev(dev2major(_devnum), dev2minor(_devnum), 0);
759 if (dn && ! is_standard(dn, NULL))
760 continue;
761 break;
762 }
763 if (devnum == 128)
764 return NoMdDev;
765 return use_partitions ? (-1-devnum) : devnum;
766}
435d4ebb 767#endif /* !defined(MDASSEMBLE) || defined(MDASSEMBLE) && defined(MDASSEMBLE_AUTO) */
f9ce90ba 768
8b0dabea
NB
769int dev_open(char *dev, int flags)
770{
771 /* like 'open', but if 'dev' matches %d:%d, create a temp
772 * block device and open that
773 */
774 char *e;
775 int fd = -1;
776 char devname[32];
e81cdd9f 777 int major;
8b0dabea 778 int minor;
e81cdd9f
NB
779
780 if (!dev) return -1;
781
782 major = strtoul(dev, &e, 0);
8b0dabea
NB
783 if (e > dev && *e == ':' && e[1] &&
784 (minor = strtoul(e+1, &e, 0)) >= 0 &&
785 *e == 0) {
8c210183
NB
786 snprintf(devname, sizeof(devname), "/dev/.tmp.md.%d:%d:%d",
787 (int)getpid(), major, minor);
8b0dabea 788 if (mknod(devname, S_IFBLK|0600, makedev(major, minor))==0) {
6416d527 789 fd = open(devname, flags|O_DIRECT);
8b0dabea
NB
790 unlink(devname);
791 }
792 } else
6416d527 793 fd = open(dev, flags|O_DIRECT);
8b0dabea
NB
794 return fd;
795}
f9ce90ba 796
a931db9e
NB
797int open_dev_excl(int devnum)
798{
799 char buf[20];
800 int i;
801
802 sprintf(buf, "%d:%d", dev2major(devnum), dev2minor(devnum));
803 for (i=0 ; i<25 ; i++) {
804 int fd = dev_open(buf, O_RDWR|O_EXCL);
805 if (fd >= 0)
806 return fd;
807 if (errno != EBUSY)
808 return fd;
809 usleep(200000);
810 }
811 return -1;
812}
813
cdddbdbc 814struct superswitch *superlist[] = { &super0, &super1, &super_ddf, &super_imsm, NULL };
f9ce90ba 815
ea24acd0 816#if !defined(MDASSEMBLE) || defined(MDASSEMBLE) && defined(MDASSEMBLE_AUTO)
f7dd881f 817
1686dc25 818struct supertype *super_by_fd(int fd)
f9ce90ba 819{
1686dc25
NB
820 mdu_array_info_t array;
821 int vers;
822 int minor;
823 struct supertype *st = NULL;
7e0f6979 824 struct mdinfo *sra;
142cb9e1 825 char *verstr;
1686dc25
NB
826 char version[20];
827 int i;
f7e7067b 828 char *subarray = NULL;
1686dc25
NB
829
830 sra = sysfs_read(fd, 0, GET_VERSION);
831
832 if (sra) {
7e0f6979
NB
833 vers = sra->array.major_version;
834 minor = sra->array.minor_version;
142cb9e1 835 verstr = sra->text_version;
1686dc25
NB
836 } else {
837 if (ioctl(fd, GET_ARRAY_INFO, &array))
838 array.major_version = array.minor_version = 0;
839 vers = array.major_version;
840 minor = array.minor_version;
142cb9e1 841 verstr = "";
6fbba4c9 842 }
82d9eba6 843
1686dc25
NB
844 if (vers != -1) {
845 sprintf(version, "%d.%d", vers, minor);
846 verstr = version;
6fbba4c9 847 }
3c558363 848 if (minor == -2 && is_subarray(verstr)) {
f7e7067b
NB
849 char *dev = verstr+1;
850 subarray = strchr(dev, '/');
851 int devnum;
852 if (subarray)
853 *subarray++ = '\0';
77472ff8 854 devnum = devname2devnum(dev);
f7e7067b
NB
855 subarray = strdup(subarray);
856 if (sra)
857 sysfs_free(sra);
858 sra = sysfs_read(-1, devnum, GET_VERSION);
859 verstr = sra->text_version ? : "-no-metadata-";
860 }
861
862 for (i = 0; st == NULL && superlist[i] ; i++)
863 st = superlist[i]->match_metadata_desc(verstr);
1686dc25
NB
864
865 if (sra)
866 sysfs_free(sra);
f7e7067b 867 if (st) {
3b0896f8 868 st->sb = NULL;
f7e7067b
NB
869 if (subarray) {
870 strncpy(st->subarray, subarray, 32);
871 st->subarray[31] = 0;
872 free(subarray);
873 } else
874 st->subarray[0] = 0;
875 }
82d9eba6 876 return st;
f9ce90ba 877}
ea24acd0
NB
878#endif /* !defined(MDASSEMBLE) || defined(MDASSEMBLE) && defined(MDASSEMBLE_AUTO) */
879
f9ce90ba 880
159c3a1a 881struct supertype *dup_super(struct supertype *orig)
3da92f27 882{
159c3a1a 883 struct supertype *st;
1686dc25 884
d2ca6449
NB
885 if (!orig)
886 return orig;
159c3a1a 887 st = malloc(sizeof(*st));
3da92f27
NB
888 if (!st)
889 return st;
ef609477 890 memset(st, 0, sizeof(*st));
159c3a1a
NB
891 st->ss = orig->ss;
892 st->max_devs = orig->max_devs;
893 st->minor_version = orig->minor_version;
f7e7067b 894 strcpy(st->subarray, orig->subarray);
159c3a1a
NB
895 st->sb = NULL;
896 st->info = NULL;
897 return st;
3da92f27
NB
898}
899
82d9eba6 900struct supertype *guess_super(int fd)
f9ce90ba
NB
901{
902 /* try each load_super to find the best match,
903 * and return the best superswitch
904 */
82d9eba6
NB
905 struct superswitch *ss;
906 struct supertype *st;
570c0542
NB
907 unsigned long besttime = 0;
908 int bestsuper = -1;
f9ce90ba
NB
909 int i;
910
82d9eba6 911 st = malloc(sizeof(*st));
f9ce90ba
NB
912 for (i=0 ; superlist[i]; i++) {
913 int rv;
914 ss = superlist[i];
ef609477 915 memset(st, 0, sizeof(*st));
3da92f27 916 rv = ss->load_super(st, fd, NULL);
570c0542
NB
917 if (rv == 0) {
918 struct mdinfo info;
3da92f27 919 st->ss->getinfo_super(st, &info);
570c0542
NB
920 if (bestsuper == -1 ||
921 besttime < info.array.ctime) {
922 bestsuper = i;
923 besttime = info.array.ctime;
570c0542 924 }
3da92f27 925 ss->free_super(st);
570c0542
NB
926 }
927 }
928 if (bestsuper != -1) {
929 int rv;
ef609477 930 memset(st, 0, sizeof(*st));
3da92f27 931 rv = superlist[bestsuper]->load_super(st, fd, NULL);
f9ce90ba 932 if (rv == 0) {
5e747af2 933 superlist[bestsuper]->free_super(st);
82d9eba6 934 return st;
f9ce90ba
NB
935 }
936 }
570c0542 937 free(st);
f9ce90ba
NB
938 return NULL;
939}
fe6729fa 940
beae1dfe
NB
941/* Return size of device in bytes */
942int get_dev_size(int fd, char *dname, unsigned long long *sizep)
943{
944 unsigned long long ldsize;
c2c9bb6f
NB
945 struct stat st;
946
947 if (fstat(fd, &st) != -1 && S_ISREG(st.st_mode))
948 ldsize = (unsigned long long)st.st_size;
949 else
beae1dfe
NB
950#ifdef BLKGETSIZE64
951 if (ioctl(fd, BLKGETSIZE64, &ldsize) != 0)
952#endif
953 {
954 unsigned long dsize;
955 if (ioctl(fd, BLKGETSIZE, &dsize) == 0) {
956 ldsize = dsize;
957 ldsize <<= 9;
958 } else {
959 if (dname)
960 fprintf(stderr, Name ": Cannot get size of %s: %s\b",
961 dname, strerror(errno));
962 return 0;
963 }
964 }
965 *sizep = ldsize;
966 return 1;
967}
8fac0577 968
8382f19b
NB
969void get_one_disk(int mdfd, mdu_array_info_t *ainf, mdu_disk_info_t *disk)
970{
971 int d;
972 ioctl(mdfd, GET_ARRAY_INFO, ainf);
973 for (d = 0 ; d < ainf->raid_disks + ainf->nr_disks ; d++)
974 if (ioctl(mdfd, GET_DISK_INFO, disk) == 0)
975 return;
976}
63152c1b 977
a322f70c
DW
978int open_container(int fd)
979{
980 /* 'fd' is a block device. Find out if it is in use
981 * by a container, and return an open fd on that container.
982 */
983 char path[256];
984 char *e;
985 DIR *dir;
986 struct dirent *de;
987 int dfd, n;
988 char buf[200];
989 int major, minor;
990 struct stat st;
991
992 if (fstat(fd, &st) != 0)
993 return -1;
994 sprintf(path, "/sys/dev/block/%d:%d/holders",
995 (int)major(st.st_rdev), (int)minor(st.st_rdev));
996 e = path + strlen(path);
997
998 dir = opendir(path);
999 if (!dir)
1000 return -1;
1001 while ((de = readdir(dir))) {
1002 if (de->d_ino == 0)
1003 continue;
1004 if (de->d_name[0] == '.')
1005 continue;
1006 sprintf(e, "/%s/dev", de->d_name);
1007 dfd = open(path, O_RDONLY);
1008 if (dfd < 0)
1009 continue;
1010 n = read(dfd, buf, sizeof(buf));
1011 close(dfd);
1012 if (n <= 0 || n >= sizeof(buf))
1013 continue;
1014 buf[n] = 0;
1015 if (sscanf(buf, "%d:%d", &major, &minor) != 2)
1016 continue;
1017 sprintf(buf, "%d:%d", major, minor);
1018 dfd = dev_open(buf, O_RDONLY);
1019 if (dfd >= 0) {
1020 closedir(dir);
1021 return dfd;
1022 }
1023 }
355726fa 1024 closedir(dir);
a322f70c
DW
1025 return -1;
1026}
1027
7801ac20
N
1028int add_disk(int mdfd, struct supertype *st,
1029 struct mdinfo *sra, struct mdinfo *info)
1030{
1031 /* Add a device to an array, in one of 2 ways. */
1032 int rv;
1033#ifndef MDASSEMBLE
1034 if (st->ss->external) {
1035 rv = sysfs_add_disk(sra, info);
1036 if (! rv) {
1037 struct mdinfo *sd2;
f35f2525
N
1038 for (sd2 = sra->devs; sd2; sd2=sd2->next)
1039 if (sd2 == info)
1040 break;
1041 if (sd2 == NULL) {
1042 sd2 = malloc(sizeof(*sd2));
1043 *sd2 = *info;
1044 sd2->next = sra->devs;
1045 sra->devs = sd2;
1046 }
7801ac20
N
1047 }
1048 } else
1049#endif
1050 rv = ioctl(mdfd, ADD_NEW_DISK, &info->disk);
1051 return rv;
1052}
1053
f35f2525
N
1054int set_array_info(int mdfd, struct supertype *st, struct mdinfo *info)
1055{
1056 /* Initialise kernel's knowledge of array.
1057 * This varies between externally managed arrays
1058 * and older kernels
1059 */
1060 int vers = md_get_version(mdfd);
1061 int rv;
1062
1063#ifndef MDASSEMBLE
1064 if (st->ss->external)
1065 rv = sysfs_set_array(info, vers);
1066 else
1067#endif
1068 if ((vers % 100) >= 1) { /* can use different versions */
1069 mdu_array_info_t inf;
1070 memset(&inf, 0, sizeof(inf));
1071 inf.major_version = info->array.major_version;
1072 inf.minor_version = info->array.minor_version;
1073 rv = ioctl(mdfd, SET_ARRAY_INFO, &inf);
1074 } else
1075 rv = ioctl(mdfd, SET_ARRAY_INFO, NULL);
1076 return rv;
1077}
1078
2f6079dc
NB
1079char *devnum2devname(int num)
1080{
1081 char name[100];
1082 if (num > 0)
1083 sprintf(name, "md%d", num);
1084 else
1085 sprintf(name, "md_d%d", -1-num);
1086 return strdup(name);
1087}
1088
77472ff8
NB
1089int devname2devnum(char *name)
1090{
1091 char *ep;
1092 int num;
1093 if (strncmp(name, "md_d", 4)==0)
1094 num = -1-strtoul(name+4, &ep, 10);
1095 else
1096 num = strtoul(name+2, &ep, 10);
1097 return num;
1098}
1099
c94709e8 1100int stat2devnum(struct stat *st)
2f6079dc 1101{
c94709e8
DW
1102 if ((S_IFMT & st->st_mode) == S_IFBLK) {
1103 if (major(st->st_rdev) == MD_MAJOR)
1104 return minor(st->st_rdev);
2f6079dc 1105 else
c94709e8 1106 return -1- (minor(st->st_rdev)>>6);
2f6079dc
NB
1107 }
1108 return -1;
c94709e8
DW
1109
1110}
1111
1112int fd2devnum(int fd)
1113{
1114 struct stat stb;
1115 if (fstat(fd, &stb) == 0)
1116 return stat2devnum(&stb);
1117 return -1;
2f6079dc
NB
1118}
1119
a931db9e
NB
1120int mdmon_running(int devnum)
1121{
1122 char path[100];
1123 char pid[10];
1124 int fd;
1125 int n;
1126 sprintf(path, "/var/run/mdadm/%s.pid", devnum2devname(devnum));
1127 fd = open(path, O_RDONLY, 0);
1128
1129 if (fd < 0)
1130 return 0;
1131 n = read(fd, pid, 9);
1132 close(fd);
1133 if (n <= 0)
1134 return 0;
1135 if (kill(atoi(pid), 0) == 0)
1136 return 1;
1137 return 0;
1138}
1139
1140int signal_mdmon(int devnum)
1141{
1142 char path[100];
1143 char pid[10];
1144 int fd;
1145 int n;
1146 sprintf(path, "/var/run/mdadm/%s.pid", devnum2devname(devnum));
1147 fd = open(path, O_RDONLY, 0);
1148
1149 if (fd < 0)
1150 return 0;
1151 n = read(fd, pid, 9);
1152 close(fd);
1153 if (n <= 0)
1154 return 0;
1155 if (kill(atoi(pid), SIGUSR1) == 0)
1156 return 1;
1157 return 0;
1158}
1159
8850ee3e
N
1160int start_mdmon(int devnum)
1161{
1162 int i;
44d2e365 1163 int len;
9fe32043
N
1164 pid_t pid;
1165 int status;
44d2e365
N
1166 char pathbuf[1024];
1167 char *paths[4] = {
1168 pathbuf,
1169 "/sbin/mdmon",
1170 "mdmon",
1171 NULL
1172 };
8850ee3e
N
1173
1174 if (env_no_mdmon())
1175 return 0;
1176
44d2e365
N
1177 len = readlink("/proc/self/exe", pathbuf, sizeof(pathbuf));
1178 if (len > 0) {
1179 char *sl;
1180 pathbuf[len] = 0;
1181 sl = strrchr(pathbuf, '/');
1182 if (sl)
1183 sl++;
1184 else
1185 sl = pathbuf;
1186 strcpy(sl, "mdmon");
1187 } else
1188 pathbuf[0] = '\0';
1189
8850ee3e
N
1190 switch(fork()) {
1191 case 0:
1192 /* FIXME yuk. CLOSE_EXEC?? */
1193 for (i=3; i < 100; i++)
1194 close(i);
44d2e365
N
1195 for (i=0; paths[i]; i++)
1196 if (paths[i][0])
1197 execl(paths[i], "mdmon",
1198 map_dev(dev2major(devnum),
1199 dev2minor(devnum),
1200 1), NULL);
8850ee3e
N
1201 exit(1);
1202 case -1: fprintf(stderr, Name ": cannot run mdmon. "
1203 "Array remains readonly\n");
1204 return -1;
9fe32043
N
1205 default: /* parent - good */
1206 pid = wait(&status);
1207 if (pid < 0 || status != 0)
1208 return -1;
8850ee3e
N
1209 }
1210 return 0;
1211}
1212
5dcfcb71
DW
1213int env_no_mdmon(void)
1214{
1215 char *val = getenv("MDADM_NO_MDMON");
1216
1217 if (val && atoi(val) == 1)
1218 return 1;
1219
1220 return 0;
1221}
1222
0e600426 1223#ifndef MDASSEMBLE
edd8d13c
NB
1224int flush_metadata_updates(struct supertype *st)
1225{
1226 int sfd;
1227 if (!st->updates) {
1228 st->update_tail = NULL;
1229 return -1;
1230 }
1231
1232 sfd = connect_monitor(devnum2devname(st->container_dev));
1233 if (sfd < 0)
1234 return -1;
1235
1236 while (st->updates) {
1237 struct metadata_update *mu = st->updates;
1238 st->updates = mu->next;
1239
1240 send_message(sfd, mu, 0);
1241 wait_reply(sfd, 0);
1242 free(mu->buf);
1243 free(mu);
1244 }
1245 ack(sfd, 0);
1246 wait_reply(sfd, 0);
1247 close(sfd);
1248 st->update_tail = NULL;
1249 return 0;
1250}
1251
1252void append_metadata_update(struct supertype *st, void *buf, int len)
1253{
1254
1255 struct metadata_update *mu = malloc(sizeof(*mu));
1256
1257 mu->buf = buf;
1258 mu->len = len;
1259 mu->space = NULL;
1260 mu->next = NULL;
1261 *st->update_tail = mu;
1262 st->update_tail = &mu->next;
1263}
0e600426 1264#endif /* MDASSEMBLE */
a931db9e 1265
fe6729fa
NB
1266#ifdef __TINYC__
1267/* tinyc doesn't optimize this check in ioctl.h out ... */
1268unsigned int __invalid_size_argument_for_IOC = 0;
1269#endif
1270