]> git.ipfire.org Git - thirdparty/mdadm.git/blob - super-intel.c
projects / thirdparty / mdadm.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
imsm: write anchor last
[thirdparty/mdadm.git] / super-intel.c
1 /*
2 * mdadm - Intel(R) Matrix Storage Manager Support
3 *
4 * Copyright (C) 2002-2007 Intel Corporation
5 *
6 * This program is free software; you can redistribute it and/or modify it
7 * under the terms and conditions of the GNU General Public License,
8 * version 2, as published by the Free Software Foundation.
9 *
10 * This program is distributed in the hope it will be useful, but WITHOUT
11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
13 * more details.
14 *
15 * You should have received a copy of the GNU General Public License along with
16 * this program; if not, write to the Free Software Foundation, Inc.,
17 * 51 Franklin St - Fifth Floor, Boston, MA 02110-1301 USA.
18 */
19
20 #include "mdadm.h"
21 #include "mdmon.h"
22 #include <values.h>
23 #include <scsi/sg.h>
24 #include <ctype.h>
25
26 /* MPB == Metadata Parameter Block */
27 #define MPB_SIGNATURE "Intel Raid ISM Cfg Sig. "
28 #define MPB_SIG_LEN (strlen(MPB_SIGNATURE))
29 #define MPB_VERSION_RAID0 "1.0.00"
30 #define MPB_VERSION_RAID1 "1.1.00"
31 #define MPB_VERSION_RAID5 "1.2.02"
32 #define MAX_SIGNATURE_LENGTH 32
33 #define MAX_RAID_SERIAL_LEN 16
34 #define MPB_SECTOR_CNT 418
35 #define IMSM_RESERVED_SECTORS 4096
36
37 /* Disk configuration info. */
38 #define IMSM_MAX_DEVICES 255
39 struct imsm_disk {
40 __u8 serial[MAX_RAID_SERIAL_LEN];/* 0xD8 - 0xE7 ascii serial number */
41 __u32 total_blocks; /* 0xE8 - 0xEB total blocks */
42 __u32 scsi_id; /* 0xEC - 0xEF scsi ID */
43 __u32 status; /* 0xF0 - 0xF3 */
44 #define SPARE_DISK 0x01 /* Spare */
45 #define CONFIGURED_DISK 0x02 /* Member of some RaidDev */
46 #define FAILED_DISK 0x04 /* Permanent failure */
47 #define USABLE_DISK 0x08 /* Fully usable unless FAILED_DISK is set */
48
49 #define IMSM_DISK_FILLERS 5
50 __u32 filler[IMSM_DISK_FILLERS]; /* 0xF4 - 0x107 MPB_DISK_FILLERS for future expansion */
51 };
52
53 /* RAID map configuration infos. */
54 struct imsm_map {
55 __u32 pba_of_lba0; /* start address of partition */
56 __u32 blocks_per_member;/* blocks per member */
57 __u32 num_data_stripes; /* number of data stripes */
58 __u16 blocks_per_strip;
59 __u8 map_state; /* Normal, Uninitialized, Degraded, Failed */
60 #define IMSM_T_STATE_NORMAL 0
61 #define IMSM_T_STATE_UNINITIALIZED 1
62 #define IMSM_T_STATE_DEGRADED 2 /* FIXME: is this correct? */
63 #define IMSM_T_STATE_FAILED 3 /* FIXME: is this correct? */
64 __u8 raid_level;
65 #define IMSM_T_RAID0 0
66 #define IMSM_T_RAID1 1
67 #define IMSM_T_RAID5 5 /* since metadata version 1.2.02 ? */
68 __u8 num_members; /* number of member disks */
69 __u8 reserved[3];
70 __u32 filler[7]; /* expansion area */
71 __u32 disk_ord_tbl[1]; /* disk_ord_tbl[num_members],
72 top byte special */
73 } __attribute__ ((packed));
74
75 struct imsm_vol {
76 __u32 reserved[2];
77 __u8 migr_state; /* Normal or Migrating */
78 __u8 migr_type; /* Initializing, Rebuilding, ... */
79 __u8 dirty;
80 __u8 fill[1];
81 __u32 filler[5];
82 struct imsm_map map[1];
83 /* here comes another one if migr_state */
84 } __attribute__ ((packed));
85
86 struct imsm_dev {
87 __u8 volume[MAX_RAID_SERIAL_LEN];
88 __u32 size_low;
89 __u32 size_high;
90 __u32 status; /* Persistent RaidDev status */
91 __u32 reserved_blocks; /* Reserved blocks at beginning of volume */
92 #define IMSM_DEV_FILLERS 12
93 __u32 filler[IMSM_DEV_FILLERS];
94 struct imsm_vol vol;
95 } __attribute__ ((packed));
96
97 struct imsm_super {
98 __u8 sig[MAX_SIGNATURE_LENGTH]; /* 0x00 - 0x1F */
99 __u32 check_sum; /* 0x20 - 0x23 MPB Checksum */
100 __u32 mpb_size; /* 0x24 - 0x27 Size of MPB */
101 __u32 family_num; /* 0x28 - 0x2B Checksum from first time this config was written */
102 __u32 generation_num; /* 0x2C - 0x2F Incremented each time this array's MPB is written */
103 __u32 reserved[2]; /* 0x30 - 0x37 */
104 __u8 num_disks; /* 0x38 Number of configured disks */
105 __u8 num_raid_devs; /* 0x39 Number of configured volumes */
106 __u8 fill[2]; /* 0x3A - 0x3B */
107 #define IMSM_FILLERS 39
108 __u32 filler[IMSM_FILLERS]; /* 0x3C - 0xD7 RAID_MPB_FILLERS */
109 struct imsm_disk disk[1]; /* 0xD8 diskTbl[numDisks] */
110 /* here comes imsm_dev[num_raid_devs] */
111 } __attribute__ ((packed));
112
113 #ifndef MDASSEMBLE
114 static char *map_state_str[] = { "normal", "uninitialized", "degraded", "failed" };
115 #endif
116
117 static unsigned int sector_count(__u32 bytes)
118 {
119 return ((bytes + (512-1)) & (~(512-1))) / 512;
120 }
121
122 static unsigned int mpb_sectors(struct imsm_super *mpb)
123 {
124 return sector_count(__le32_to_cpu(mpb->mpb_size));
125 }
126
127 /* internal representation of IMSM metadata */
128 struct intel_super {
129 union {
130 struct imsm_super *mpb;
131 void *buf;
132 };
133 int updates_pending; /* count of pending updates for mdmon */
134 int creating_imsm; /* flag to indicate container creation */
135 int creating_dev; /* index of raid device undergoing creation */
136 struct dl {
137 struct dl *next;
138 int index;
139 __u8 serial[MAX_RAID_SERIAL_LEN];
140 int major, minor;
141 char *devname;
142 int fd;
143 } *disks;
144 };
145
146 struct extent {
147 unsigned long long start, size;
148 };
149
150 static struct supertype *match_metadata_desc_imsm(char *arg)
151 {
152 struct supertype *st;
153
154 if (strcmp(arg, "imsm") != 0 &&
155 strcmp(arg, "default") != 0
156 )
157 return NULL;
158
159 st = malloc(sizeof(*st));
160 st->ss = &super_imsm;
161 st->max_devs = IMSM_MAX_DEVICES;
162 st->minor_version = 0;
163 st->sb = NULL;
164 return st;
165 }
166
167 static struct supertype *match_metadata_desc_imsm_volume(char *arg)
168 {
169 struct supertype *st;
170
171 if (strcmp(arg, "imsm/volume") != 0 &&
172 strcmp(arg, "raid") != 0 &&
173 strcmp(arg, "default") != 0
174 )
175 return NULL;
176
177 st = malloc(sizeof(*st));
178 st->ss = &super_imsm_volume;
179 st->max_devs = IMSM_MAX_DEVICES;
180 st->minor_version = 0;
181 st->sb = NULL;
182 return st;
183 }
184
185 static __u8 *get_imsm_version(struct imsm_super *mpb)
186 {
187 return &mpb->sig[MPB_SIG_LEN];
188 }
189
190 static struct imsm_disk *get_imsm_disk(struct imsm_super *mpb, __u8 index)
191 {
192 if (index > mpb->num_disks - 1)
193 return NULL;
194 return &mpb->disk[index];
195 }
196
197 static __u32 gen_imsm_checksum(struct imsm_super *mpb)
198 {
199 __u32 end = mpb->mpb_size / sizeof(end);
200 __u32 *p = (__u32 *) mpb;
201 __u32 sum = 0;
202
203 while (end--)
204 sum += __le32_to_cpu(*p++);
205
206 return sum - __le32_to_cpu(mpb->check_sum);
207 }
208
209 static size_t sizeof_imsm_dev(struct imsm_dev *dev)
210 {
211 size_t size = sizeof(*dev);
212
213 /* each map has disk_ord_tbl[num_members - 1] additional space */
214 size += sizeof(__u32) * (dev->vol.map[0].num_members - 1);
215
216 /* migrating means an additional map */
217 if (dev->vol.migr_state) {
218 size += sizeof(struct imsm_map);
219 size += sizeof(__u32) * (dev->vol.map[1].num_members - 1);
220 }
221
222 return size;
223 }
224
225 static struct imsm_dev *get_imsm_dev(struct imsm_super *mpb, __u8 index)
226 {
227 int offset;
228 int i;
229 void *_mpb = mpb;
230
231 if (index > mpb->num_raid_devs - 1)
232 return NULL;
233
234 /* devices start after all disks */
235 offset = ((void *) &mpb->disk[mpb->num_disks]) - _mpb;
236
237 for (i = 0; i <= index; i++)
238 if (i == index)
239 return _mpb + offset;
240 else
241 offset += sizeof_imsm_dev(_mpb + offset);
242
243 return NULL;
244 }
245
246 static __u32 get_imsm_disk_idx(struct imsm_map *map, int slot)
247 {
248 __u32 *ord_tbl = &map->disk_ord_tbl[slot];
249
250 /* top byte is 'special' */
251 return __le32_to_cpu(*ord_tbl & ~(0xff << 24));
252 }
253
254 static int get_imsm_raid_level(struct imsm_map *map)
255 {
256 if (map->raid_level == 1) {
257 if (map->num_members == 2)
258 return 1;
259 else
260 return 10;
261 }
262
263 return map->raid_level;
264 }
265
266 static int cmp_extent(const void *av, const void *bv)
267 {
268 const struct extent *a = av;
269 const struct extent *b = bv;
270 if (a->start < b->start)
271 return -1;
272 if (a->start > b->start)
273 return 1;
274 return 0;
275 }
276
277 static struct extent *get_extents(struct intel_super *super, struct dl *dl)
278 {
279 /* find a list of used extents on the given physical device */
280 struct imsm_super *mpb = super->mpb;
281 struct imsm_disk *disk;
282 struct extent *rv, *e;
283 int i, j;
284 int memberships = 0;
285
286 disk = get_imsm_disk(mpb, dl->index);
287 if (!disk)
288 return NULL;
289
290 for (i = 0; i < mpb->num_raid_devs; i++) {
291 struct imsm_dev *dev = get_imsm_dev(mpb, i);
292 struct imsm_map *map = dev->vol.map;
293
294 for (j = 0; j < map->num_members; j++) {
295 __u32 index = get_imsm_disk_idx(map, j);
296
297 if (index == dl->index)
298 memberships++;
299 }
300 }
301 rv = malloc(sizeof(struct extent) * (memberships + 1));
302 if (!rv)
303 return NULL;
304 e = rv;
305
306 for (i = 0; i < mpb->num_raid_devs; i++) {
307 struct imsm_dev *dev = get_imsm_dev(mpb, i);
308 struct imsm_map *map = dev->vol.map;
309
310 for (j = 0; j < map->num_members; j++) {
311 __u32 index = get_imsm_disk_idx(map, j);
312
313 if (index == dl->index) {
314 e->start = __le32_to_cpu(map->pba_of_lba0);
315 e->size = __le32_to_cpu(map->blocks_per_member);
316 e++;
317 }
318 }
319 }
320 qsort(rv, memberships, sizeof(*rv), cmp_extent);
321
322 e->start = __le32_to_cpu(disk->total_blocks) -
323 (MPB_SECTOR_CNT + IMSM_RESERVED_SECTORS);
324 e->size = 0;
325 return rv;
326 }
327
328 #ifndef MDASSEMBLE
329 static void print_imsm_dev(struct imsm_dev *dev, int index)
330 {
331 __u64 sz;
332 int slot;
333 struct imsm_map *map = dev->vol.map;
334
335 printf("\n");
336 printf("[%s]:\n", dev->volume);
337 printf(" RAID Level : %d\n", get_imsm_raid_level(map));
338 printf(" Members : %d\n", map->num_members);
339 for (slot = 0; slot < map->num_members; slot++)
340 if (index == get_imsm_disk_idx(map, slot))
341 break;
342 if (slot < map->num_members)
343 printf(" This Slot : %d\n", slot);
344 else
345 printf(" This Slot : ?\n");
346 sz = __le32_to_cpu(dev->size_high);
347 sz <<= 32;
348 sz += __le32_to_cpu(dev->size_low);
349 printf(" Array Size : %llu%s\n", (unsigned long long)sz,
350 human_size(sz * 512));
351 sz = __le32_to_cpu(map->blocks_per_member);
352 printf(" Per Dev Size : %llu%s\n", (unsigned long long)sz,
353 human_size(sz * 512));
354 printf(" Sector Offset : %u\n",
355 __le32_to_cpu(map->pba_of_lba0));
356 printf(" Num Stripes : %u\n",
357 __le32_to_cpu(map->num_data_stripes));
358 printf(" Chunk Size : %u KiB\n",
359 __le16_to_cpu(map->blocks_per_strip) / 2);
360 printf(" Reserved : %d\n", __le32_to_cpu(dev->reserved_blocks));
361 printf(" Migrate State : %s\n", dev->vol.migr_state ? "migrating" : "idle");
362 printf(" Dirty State : %s\n", dev->vol.dirty ? "dirty" : "clean");
363 printf(" Map State : %s\n", map_state_str[map->map_state]);
364 }
365
366 static void print_imsm_disk(struct imsm_super *mpb, int index)
367 {
368 struct imsm_disk *disk = get_imsm_disk(mpb, index);
369 char str[MAX_RAID_SERIAL_LEN];
370 __u32 s;
371 __u64 sz;
372
373 printf("\n");
374 snprintf(str, MAX_RAID_SERIAL_LEN, "%s", disk->serial);
375 printf(" Disk%02d Serial : %s\n", index, str);
376 s = __le32_to_cpu(disk->status);
377 printf(" State :%s%s%s%s\n", s&SPARE_DISK ? " spare" : "",
378 s&CONFIGURED_DISK ? " active" : "",
379 s&FAILED_DISK ? " failed" : "",
380 s&USABLE_DISK ? " usable" : "");
381 printf(" Id : %08x\n", __le32_to_cpu(disk->scsi_id));
382 sz = __le32_to_cpu(disk->total_blocks) -
383 (MPB_SECTOR_CNT + IMSM_RESERVED_SECTORS * mpb->num_raid_devs);
384 printf(" Usable Size : %llu%s\n", (unsigned long long)sz,
385 human_size(sz * 512));
386 }
387
388 static void examine_super_imsm(struct supertype *st, char *homehost)
389 {
390 struct intel_super *super = st->sb;
391 struct imsm_super *mpb = super->mpb;
392 char str[MAX_SIGNATURE_LENGTH];
393 int i;
394 __u32 sum;
395
396 snprintf(str, MPB_SIG_LEN, "%s", mpb->sig);
397 printf(" Magic : %s\n", str);
398 snprintf(str, strlen(MPB_VERSION_RAID0), "%s", get_imsm_version(mpb));
399 printf(" Version : %s\n", get_imsm_version(mpb));
400 printf(" Family : %08x\n", __le32_to_cpu(mpb->family_num));
401 printf(" Generation : %08x\n", __le32_to_cpu(mpb->generation_num));
402 sum = __le32_to_cpu(mpb->check_sum);
403 printf(" Checksum : %08x %s\n", sum,
404 gen_imsm_checksum(mpb) == sum ? "correct" : "incorrect");
405 printf(" MPB Sectors : %d\n", mpb_sectors(mpb));
406 printf(" Disks : %d\n", mpb->num_disks);
407 printf(" RAID Devices : %d\n", mpb->num_raid_devs);
408 print_imsm_disk(mpb, super->disks->index);
409 for (i = 0; i < mpb->num_raid_devs; i++)
410 print_imsm_dev(get_imsm_dev(mpb, i), super->disks->index);
411 for (i = 0; i < mpb->num_disks; i++) {
412 if (i == super->disks->index)
413 continue;
414 print_imsm_disk(mpb, i);
415 }
416 }
417
418 static void brief_examine_super_imsm(struct supertype *st)
419 {
420 struct intel_super *super = st->sb;
421 struct imsm_super *mpb = super->mpb;
422
423 printf("ARRAY /dev/imsm family=%08x metadata=external:imsm\n",
424 __le32_to_cpu(mpb->family_num));
425 }
426
427 static void detail_super_imsm(struct supertype *st, char *homehost)
428 {
429 printf("%s\n", __FUNCTION__);
430 }
431
432 static void brief_detail_super_imsm(struct supertype *st)
433 {
434 printf("%s\n", __FUNCTION__);
435 }
436 #endif
437
438 static int match_home_imsm(struct supertype *st, char *homehost)
439 {
440 printf("%s\n", __FUNCTION__);
441
442 return 0;
443 }
444
445 static void uuid_from_super_imsm(struct supertype *st, int uuid[4])
446 {
447 printf("%s\n", __FUNCTION__);
448 }
449
450 static void
451 get_imsm_numerical_version(struct imsm_super *mpb, int *m, int *p)
452 {
453 __u8 *v = get_imsm_version(mpb);
454 __u8 *end = mpb->sig + MAX_SIGNATURE_LENGTH;
455 char major[] = { 0, 0, 0 };
456 char minor[] = { 0 ,0, 0 };
457 char patch[] = { 0, 0, 0 };
458 char *ver_parse[] = { major, minor, patch };
459 int i, j;
460
461 i = j = 0;
462 while (*v != '\0' && v < end) {
463 if (*v != '.' && j < 2)
464 ver_parse[i][j++] = *v;
465 else {
466 i++;
467 j = 0;
468 }
469 v++;
470 }
471
472 *m = strtol(minor, NULL, 0);
473 *p = strtol(patch, NULL, 0);
474 }
475
476 static int imsm_level_to_layout(int level)
477 {
478 switch (level) {
479 case 0:
480 case 1:
481 return 0;
482 case 5:
483 case 6:
484 return ALGORITHM_LEFT_SYMMETRIC;
485 case 10:
486 return 0x102; //FIXME is this correct?
487 }
488 return -1;
489 }
490
491 static void getinfo_super_imsm(struct supertype *st, struct mdinfo *info)
492 {
493 struct intel_super *super = st->sb;
494 struct imsm_super *mpb = super->mpb;
495 struct imsm_disk *disk;
496 __u32 s;
497
498 info->array.major_version = 2000;
499 get_imsm_numerical_version(mpb, &info->array.minor_version,
500 &info->array.patch_version);
501 info->array.raid_disks = mpb->num_disks;
502 info->array.level = LEVEL_CONTAINER;
503 info->array.layout = 0;
504 info->array.md_minor = -1;
505 info->array.ctime = 0; /* N/A for imsm */
506 info->array.utime = 0;
507 info->array.chunk_size = 0;
508
509 info->disk.major = 0;
510 info->disk.minor = 0;
511 info->disk.raid_disk = -1;
512 info->reshape_active = 0;
513 strcpy(info->text_version, "imsm");
514 info->disk.number = -1;
515 info->disk.state = 0;
516
517 if (super->disks) {
518 info->disk.number = super->disks->index;
519 info->disk.raid_disk = super->disks->index;
520 disk = get_imsm_disk(mpb, super->disks->index);
521 s = __le32_to_cpu(disk->status);
522 info->disk.state = s & CONFIGURED_DISK ? (1 << MD_DISK_ACTIVE) : 0;
523 info->disk.state |= s & FAILED_DISK ? (1 << MD_DISK_FAULTY) : 0;
524 info->disk.state |= s & USABLE_DISK ? (1 << MD_DISK_SYNC) : 0;
525 }
526 }
527
528 static void getinfo_super_imsm_volume(struct supertype *st, struct mdinfo *info)
529 {
530 struct intel_super *super = st->sb;
531 struct imsm_super *mpb = super->mpb;
532 struct imsm_dev *dev = get_imsm_dev(mpb, info->container_member);
533 struct imsm_map *map = &dev->vol.map[0];
534
535 info->array.major_version = 2000;
536 get_imsm_numerical_version(mpb, &info->array.minor_version,
537 &info->array.patch_version);
538 info->array.raid_disks = map->num_members;
539 info->array.level = get_imsm_raid_level(map);
540 info->array.layout = imsm_level_to_layout(info->array.level);
541 info->array.md_minor = -1;
542 info->array.ctime = 0;
543 info->array.utime = 0;
544 info->array.chunk_size = __le16_to_cpu(map->blocks_per_strip * 512);
545
546 info->data_offset = __le32_to_cpu(map->pba_of_lba0);
547 info->component_size = __le32_to_cpu(map->blocks_per_member);
548
549 info->disk.major = 0;
550 info->disk.minor = 0;
551
552 sprintf(info->text_version, "/%s/%d",
553 devnum2devname(st->container_dev),
554 info->container_member);
555 }
556
557 static int update_super_imsm(struct supertype *st, struct mdinfo *info,
558 char *update, char *devname, int verbose,
559 int uuid_set, char *homehost)
560 {
561 /* FIXME */
562
563 /* For 'assemble' and 'force' we need to return non-zero if any
564 * change was made. For others, the return value is ignored.
565 * Update options are:
566 * force-one : This device looks a bit old but needs to be included,
567 * update age info appropriately.
568 * assemble: clear any 'faulty' flag to allow this device to
569 * be assembled.
570 * force-array: Array is degraded but being forced, mark it clean
571 * if that will be needed to assemble it.
572 *
573 * newdev: not used ????
574 * grow: Array has gained a new device - this is currently for
575 * linear only
576 * resync: mark as dirty so a resync will happen.
577 * name: update the name - preserving the homehost
578 *
579 * Following are not relevant for this imsm:
580 * sparc2.2 : update from old dodgey metadata
581 * super-minor: change the preferred_minor number
582 * summaries: update redundant counters.
583 * uuid: Change the uuid of the array to match watch is given
584 * homehost: update the recorded homehost
585 * _reshape_progress: record new reshape_progress position.
586 */
587 int rv = 0;
588 //struct intel_super *super = st->sb;
589 //struct imsm_super *mpb = super->mpb;
590
591 if (strcmp(update, "grow") == 0) {
592 }
593 if (strcmp(update, "resync") == 0) {
594 /* dev->vol.dirty = 1; */
595 }
596
597 /* IMSM has no concept of UUID or homehost */
598
599 return rv;
600 }
601
602 static size_t disks_to_mpb_size(int disks)
603 {
604 size_t size;
605
606 size = sizeof(struct imsm_super);
607 size += (disks - 1) * sizeof(struct imsm_disk);
608 size += 2 * sizeof(struct imsm_dev);
609 /* up to 2 maps per raid device (-2 for imsm_maps in imsm_dev */
610 size += (4 - 2) * sizeof(struct imsm_map);
611 /* 4 possible disk_ord_tbl's */
612 size += 4 * (disks - 1) * sizeof(__u32);
613
614 return size;
615 }
616
617 static __u64 avail_size_imsm(struct supertype *st, __u64 devsize)
618 {
619 if (devsize < (MPB_SECTOR_CNT + IMSM_RESERVED_SECTORS))
620 return 0;
621
622 return devsize - (MPB_SECTOR_CNT + IMSM_RESERVED_SECTORS);
623 }
624
625 static int compare_super_imsm(struct supertype *st, struct supertype *tst)
626 {
627 /*
628 * return:
629 * 0 same, or first was empty, and second was copied
630 * 1 second had wrong number
631 * 2 wrong uuid
632 * 3 wrong other info
633 */
634 struct intel_super *first = st->sb;
635 struct intel_super *sec = tst->sb;
636
637 if (!first) {
638 st->sb = tst->sb;
639 tst->sb = NULL;
640 return 0;
641 }
642
643 if (memcmp(first->mpb->sig, sec->mpb->sig, MAX_SIGNATURE_LENGTH) != 0)
644 return 3;
645 if (first->mpb->family_num != sec->mpb->family_num)
646 return 3;
647 if (first->mpb->mpb_size != sec->mpb->mpb_size)
648 return 3;
649 if (first->mpb->check_sum != sec->mpb->check_sum)
650 return 3;
651
652 return 0;
653 }
654
655 extern int scsi_get_serial(int fd, void *buf, size_t buf_len);
656
657 static int imsm_read_serial(int fd, char *devname,
658 __u8 serial[MAX_RAID_SERIAL_LEN])
659 {
660 unsigned char scsi_serial[255];
661 int sg_fd;
662 int rv;
663 int rsp_len;
664 int i, cnt;
665
666 memset(scsi_serial, 0, sizeof(scsi_serial));
667
668 sg_fd = sysfs_disk_to_sg(fd);
669 if (sg_fd < 0) {
670 if (devname)
671 fprintf(stderr,
672 Name ": Failed to open sg interface for %s: %s\n",
673 devname, strerror(errno));
674 return 1;
675 }
676
677 rv = scsi_get_serial(sg_fd, scsi_serial, sizeof(scsi_serial));
678 close(sg_fd);
679
680 if (rv != 0) {
681 if (devname)
682 fprintf(stderr,
683 Name ": Failed to retrieve serial for %s\n",
684 devname);
685 return rv;
686 }
687
688 rsp_len = scsi_serial[3];
689 for (i = 0, cnt = 0; i < rsp_len; i++) {
690 if (!isspace(scsi_serial[4 + i]))
691 serial[cnt++] = scsi_serial[4 + i];
692 if (cnt == MAX_RAID_SERIAL_LEN)
693 break;
694 }
695
696 serial[MAX_RAID_SERIAL_LEN - 1] = '\0';
697
698 return 0;
699 }
700
701 static int
702 load_imsm_disk(int fd, struct intel_super *super, char *devname, int keep_fd)
703 {
704 struct imsm_super *mpb = super->mpb;
705 struct dl *dl;
706 struct stat stb;
707 struct imsm_disk *disk;
708 int rv;
709 int i;
710
711 dl = malloc(sizeof(*dl));
712 if (!dl) {
713 if (devname)
714 fprintf(stderr,
715 Name ": failed to allocate disk buffer for %s\n",
716 devname);
717 return 2;
718 }
719 memset(dl, 0, sizeof(*dl));
720
721 fstat(fd, &stb);
722 dl->major = major(stb.st_rdev);
723 dl->minor = minor(stb.st_rdev);
724 dl->next = super->disks;
725 dl->fd = keep_fd ? fd : -1;
726 dl->devname = devname ? strdup(devname) : NULL;
727 dl->index = -1;
728 super->disks = dl;
729 rv = imsm_read_serial(fd, devname, dl->serial);
730
731 if (rv != 0)
732 return 2;
733
734 /* look up this disk's index */
735 for (i = 0; i < mpb->num_disks; i++) {
736 disk = get_imsm_disk(mpb, i);
737
738 if (memcmp(disk->serial, dl->serial, MAX_RAID_SERIAL_LEN) == 0)
739 break;
740 }
741
742 if (i > mpb->num_disks)
743 return 2;
744
745 dl->index = i;
746
747 return 0;
748 }
749
750 /* load_imsm_mpb - read matrix metadata
751 * allocates super->mpb to be freed by free_super
752 */
753 static int load_imsm_mpb(int fd, struct intel_super *super, char *devname)
754 {
755 unsigned long long dsize;
756 size_t len, mpb_size;
757 unsigned long long sectors;
758 struct stat;
759 struct imsm_super anchor;
760 __u32 check_sum;
761
762 memset(super, 0, sizeof(*super));
763 get_dev_size(fd, NULL, &dsize);
764
765 if (lseek64(fd, dsize - (512 * 2), SEEK_SET) < 0) {
766 if (devname)
767 fprintf(stderr,
768 Name ": Cannot seek to anchor block on %s: %s\n",
769 devname, strerror(errno));
770 return 1;
771 }
772
773 len = sizeof(anchor);
774 if (read(fd, &anchor, len) != len) {
775 if (devname)
776 fprintf(stderr,
777 Name ": Cannot read anchor block on %s: %s\n",
778 devname, strerror(errno));
779 return 1;
780 }
781
782 if (strncmp((char *) anchor.sig, MPB_SIGNATURE, MPB_SIG_LEN) != 0) {
783 if (devname)
784 fprintf(stderr,
785 Name ": no IMSM anchor on %s\n", devname);
786 return 2;
787 }
788
789 mpb_size = __le32_to_cpu(anchor.mpb_size);
790 super->mpb = malloc(mpb_size < 512 ? 512 : mpb_size);
791 if (!super->mpb) {
792 if (devname)
793 fprintf(stderr,
794 Name ": unable to allocate %zu byte mpb buffer\n",
795 mpb_size);
796 return 2;
797 }
798 memcpy(super->buf, &anchor, sizeof(anchor));
799
800 /* read the rest of the first block */
801 len = 512 - sizeof(anchor);
802 if (read(fd, super->buf + sizeof(anchor), len) != len) {
803 if (devname)
804 fprintf(stderr,
805 Name ": Cannot read anchor remainder on %s: %s\n",
806 devname, strerror(errno));
807 return 2;
808 }
809
810 sectors = mpb_sectors(&anchor) - 1;
811 if (!sectors)
812 return load_imsm_disk(fd, super, devname, 0);
813
814 /* read the extended mpb */
815 if (lseek64(fd, dsize - (512 * (2 + sectors)), SEEK_SET) < 0) {
816 if (devname)
817 fprintf(stderr,
818 Name ": Cannot seek to extended mpb on %s: %s\n",
819 devname, strerror(errno));
820 return 1;
821 }
822
823 len = mpb_size - 512;
824 if (read(fd, super->buf + 512, len) != len) {
825 if (devname)
826 fprintf(stderr,
827 Name ": Cannot read extended mpb on %s: %s\n",
828 devname, strerror(errno));
829 return 2;
830 }
831
832 check_sum = gen_imsm_checksum(super->mpb);
833 if (check_sum != __le32_to_cpu(super->mpb->check_sum)) {
834 if (devname)
835 fprintf(stderr,
836 Name ": IMSM checksum %x != %x on %s\n",
837 check_sum, __le32_to_cpu(super->mpb->check_sum),
838 devname);
839 return 2;
840 }
841
842 return load_imsm_disk(fd, super, devname, 0);
843 }
844
845 struct superswitch super_imsm_container;
846
847 static void free_imsm_disks(struct intel_super *super)
848 {
849 while (super->disks) {
850 struct dl *d = super->disks;
851
852 super->disks = d->next;
853 if (d->fd >= 0)
854 close(d->fd);
855 if (d->devname)
856 free(d->devname);
857 free(d);
858 }
859 }
860
861 static void free_imsm(struct intel_super *super)
862 {
863 if (super->mpb)
864 free(super->mpb);
865 free_imsm_disks(super);
866 free(super);
867 }
868
869
870 static void free_super_imsm(struct supertype *st)
871 {
872 struct intel_super *super = st->sb;
873
874 if (!super)
875 return;
876
877 free_imsm(super);
878 st->sb = NULL;
879 }
880
881 static struct intel_super *alloc_super(int creating_imsm)
882 {
883 struct intel_super *super = malloc(sizeof(*super));
884
885 if (super) {
886 memset(super, 0, sizeof(*super));
887 super->creating_imsm = creating_imsm;
888 super->creating_dev = -1;
889 }
890
891 return super;
892 }
893
894 #ifndef MDASSEMBLE
895 static int load_super_imsm_all(struct supertype *st, int fd, void **sbp,
896 char *devname, int keep_fd)
897 {
898 struct mdinfo *sra;
899 struct intel_super *super;
900 struct mdinfo *sd, *best = NULL;
901 __u32 bestgen = 0;
902 __u32 gen;
903 char nm[20];
904 int dfd;
905 int rv;
906
907 /* check if this disk is a member of an active array */
908 sra = sysfs_read(fd, 0, GET_LEVEL|GET_VERSION|GET_DEVS|GET_STATE);
909 if (!sra)
910 return 1;
911
912 if (sra->array.major_version != -1 ||
913 sra->array.minor_version != -2 ||
914 strcmp(sra->text_version, "imsm") != 0)
915 return 1;
916
917 super = alloc_super(0);
918 if (!super)
919 return 1;
920
921 /* find the most up to date disk in this array */
922 for (sd = sra->devs; sd; sd = sd->next) {
923 sprintf(nm, "%d:%d", sd->disk.major, sd->disk.minor);
924 dfd = dev_open(nm, keep_fd ? O_RDWR : O_RDONLY);
925 if (!dfd) {
926 free_imsm(super);
927 return 2;
928 }
929 rv = load_imsm_mpb(dfd, super, NULL);
930 if (!keep_fd)
931 close(dfd);
932 if (rv == 0) {
933 gen = __le32_to_cpu(super->mpb->generation_num);
934 if (!best || gen > bestgen) {
935 bestgen = gen;
936 best = sd;
937 }
938 } else {
939 free_imsm(super);
940 return 2;
941 }
942 }
943
944 if (!best) {
945 free_imsm(super);
946 return 1;
947 }
948
949 /* load the most up to date anchor */
950 sprintf(nm, "%d:%d", best->disk.major, best->disk.minor);
951 dfd = dev_open(nm, O_RDONLY);
952 if (!dfd) {
953 free_imsm(super);
954 return 1;
955 }
956 rv = load_imsm_mpb(dfd, super, NULL);
957 close(dfd);
958 if (rv != 0) {
959 free_imsm(super);
960 return 2;
961 }
962
963 /* reset the disk list */
964 free_imsm_disks(super);
965
966 /* populate disk list */
967 for (sd = sra->devs ; sd ; sd = sd->next) {
968 sprintf(nm, "%d:%d", sd->disk.major, sd->disk.minor);
969 dfd = dev_open(nm, keep_fd? O_RDWR : O_RDONLY);
970 if (!dfd) {
971 free_imsm(super);
972 return 2;
973 }
974 load_imsm_disk(dfd, super, NULL, keep_fd);
975 if (!keep_fd)
976 close(dfd);
977 }
978
979 *sbp = super;
980 if (st->ss == NULL) {
981 st->ss = &super_imsm_container;
982 st->minor_version = 0;
983 st->max_devs = IMSM_MAX_DEVICES;
984 st->container_dev = fd2devnum(fd);
985 }
986
987 return 0;
988 }
989 #endif
990
991 static int load_super_imsm(struct supertype *st, int fd, char *devname)
992 {
993 struct intel_super *super;
994 int rv;
995
996 #ifndef MDASSEMBLE
997 if (load_super_imsm_all(st, fd, &st->sb, devname, 1) == 0)
998 return 0;
999 #endif
1000
1001 super = alloc_super(0);
1002 if (!super) {
1003 fprintf(stderr,
1004 Name ": malloc of %zu failed.\n",
1005 sizeof(*super));
1006 return 1;
1007 }
1008
1009 rv = load_imsm_mpb(fd, super, devname);
1010
1011 if (rv) {
1012 if (devname)
1013 fprintf(stderr,
1014 Name ": Failed to load all information "
1015 "sections on %s\n", devname);
1016 free_imsm(super);
1017 return rv;
1018 }
1019
1020 st->sb = super;
1021 if (st->ss == NULL) {
1022 st->ss = &super_imsm;
1023 st->minor_version = 0;
1024 st->max_devs = IMSM_MAX_DEVICES;
1025 }
1026
1027 return 0;
1028 }
1029
1030 static int init_zero_imsm(struct supertype *st, mdu_array_info_t *info,
1031 unsigned long long size, char *name,
1032 char *homehost, int *uuid)
1033 {
1034 st->sb = NULL;
1035 return 0;
1036 }
1037
1038 static int init_super_imsm(struct supertype *st, mdu_array_info_t *info,
1039 unsigned long long size, char *name,
1040 char *homehost, int *uuid)
1041 {
1042 /* This is primarily called by Create when creating a new array.
1043 * We will then get add_to_super called for each component, and then
1044 * write_init_super called to write it out to each device.
1045 * For IMSM, Create can create on fresh devices or on a pre-existing
1046 * array.
1047 * To create on a pre-existing array a different method will be called.
1048 * This one is just for fresh drives.
1049 */
1050 struct intel_super *super;
1051 struct imsm_super *mpb;
1052 size_t mpb_size;
1053
1054 super = alloc_super(1);
1055 if (!super)
1056 return 0;
1057 mpb_size = disks_to_mpb_size(info->nr_disks);
1058 mpb = malloc(mpb_size);
1059 if (!mpb) {
1060 free(super);
1061 return 0;
1062 }
1063 memset(mpb, 0, mpb_size);
1064
1065 memcpy(mpb->sig, MPB_SIGNATURE, strlen(MPB_SIGNATURE));
1066 memcpy(mpb->sig + strlen(MPB_SIGNATURE), MPB_VERSION_RAID5,
1067 strlen(MPB_VERSION_RAID5));
1068 mpb->mpb_size = mpb_size;
1069
1070 super->mpb = mpb;
1071 st->sb = super;
1072 return 1;
1073 }
1074
1075 static int init_super_imsm_volume(struct supertype *st, mdu_array_info_t *info,
1076 unsigned long long size, char *name,
1077 char *homehost, int *uuid)
1078 {
1079 /* We are creating a volume inside a pre-existing container.
1080 * so st->sb is already set.
1081 */
1082 struct intel_super *super = st->sb;
1083 struct imsm_super *mpb = super->mpb;
1084 struct imsm_dev *dev;
1085 struct imsm_vol *vol;
1086 struct imsm_map *map;
1087 int idx = mpb->num_raid_devs;
1088 int i;
1089 unsigned long long array_blocks;
1090 unsigned long long sz;
1091 __u32 offset = 0;
1092
1093 if (mpb->num_raid_devs >= 2) {
1094 fprintf(stderr, Name": This imsm-container already has the "
1095 "maximum of 2 volumes\n");
1096 return 0;
1097 }
1098
1099 super->creating_dev = idx;
1100 mpb->num_raid_devs++;
1101 dev = get_imsm_dev(mpb, idx);
1102 strncpy((char *) dev->volume, name, MAX_RAID_SERIAL_LEN);
1103 array_blocks = calc_array_size(info->level, info->raid_disks,
1104 info->layout, info->chunk_size,
1105 info->size*2);
1106 dev->size_low = __cpu_to_le32((__u32) array_blocks);
1107 dev->size_high = __cpu_to_le32((__u32) (array_blocks >> 32));
1108 dev->status = __cpu_to_le32(0);
1109 dev->reserved_blocks = __cpu_to_le32(0);
1110 vol = &dev->vol;
1111 vol->migr_state = 0;
1112 vol->migr_type = 0;
1113 vol->dirty = 0;
1114 for (i = 0; i < idx; i++) {
1115 struct imsm_dev *prev = get_imsm_dev(mpb, i);
1116 struct imsm_map *pmap = &prev->vol.map[0];
1117
1118 offset += __le32_to_cpu(pmap->blocks_per_member);
1119 offset += IMSM_RESERVED_SECTORS;
1120 }
1121 map = &vol->map[0];
1122 map->pba_of_lba0 = __cpu_to_le32(offset);
1123 sz = info->size * 2;
1124 map->blocks_per_member = __cpu_to_le32(sz);
1125 map->blocks_per_strip = __cpu_to_le16(info->chunk_size >> 9);
1126 map->num_data_stripes = __cpu_to_le32(sz / (info->chunk_size >> 9));
1127 map->map_state = info->level ? IMSM_T_STATE_UNINITIALIZED :
1128 IMSM_T_STATE_NORMAL;
1129 if (info->level == 10)
1130 map->raid_level = 1;
1131 else
1132 map->raid_level = info->level;
1133 map->num_members = info->raid_disks;
1134 for (i = 0; i < map->num_members; i++) {
1135 /* initialized in add_to_super */
1136 map->disk_ord_tbl[i] = __cpu_to_le32(0);
1137 }
1138
1139 return 1;
1140 }
1141
1142 static void add_to_super_imsm(struct supertype *st, mdu_disk_info_t *dk,
1143 int fd, char *devname)
1144 {
1145 struct intel_super *super = st->sb;
1146 struct imsm_super *mpb = super->mpb;
1147 struct imsm_disk *disk;
1148 struct dl *dd;
1149 unsigned long long size;
1150 __u32 status, id;
1151 int rv;
1152 struct stat stb;
1153
1154 fstat(fd, &stb);
1155 dd = malloc(sizeof(*dd));
1156 if (!dd) {
1157 fprintf(stderr,
1158 Name ": malloc failed %s:%d.\n", __func__, __LINE__);
1159 abort();
1160 }
1161 memset(dd, 0, sizeof(*dd));
1162 dd->major = major(stb.st_rdev);
1163 dd->minor = minor(stb.st_rdev);
1164 dd->index = dk->number;
1165 dd->devname = devname ? strdup(devname) : NULL;
1166 dd->next = super->disks;
1167 dd->fd = fd;
1168 rv = imsm_read_serial(fd, devname, dd->serial);
1169 if (rv) {
1170 fprintf(stderr,
1171 Name ": failed to retrieve scsi serial "
1172 "using \'%s\' instead\n", devname);
1173 strcpy((char *) dd->serial, devname);
1174 }
1175
1176 if (mpb->num_disks <= dk->number)
1177 mpb->num_disks = dk->number + 1;
1178
1179 disk = get_imsm_disk(mpb, dk->number);
1180 get_dev_size(fd, NULL, &size);
1181 size /= 512;
1182 status = USABLE_DISK | SPARE_DISK;
1183 strcpy((char *) disk->serial, (char *) dd->serial);
1184 disk->total_blocks = __cpu_to_le32(size);
1185 disk->status = __cpu_to_le32(status);
1186 if (sysfs_disk_to_scsi_id(fd, &id) == 0)
1187 disk->scsi_id = __cpu_to_le32(id);
1188 else
1189 disk->scsi_id = __cpu_to_le32(0);
1190
1191 /* update the family number if we are creating a container */
1192 if (super->creating_imsm)
1193 mpb->family_num = __cpu_to_le32(gen_imsm_checksum(mpb));
1194
1195 super->disks = dd;
1196 }
1197
1198 static void add_to_super_imsm_volume(struct supertype *st, mdu_disk_info_t *dk,
1199 int fd, char *devname)
1200 {
1201 struct intel_super *super = st->sb;
1202 struct imsm_super *mpb = super->mpb;
1203 struct dl *dl;
1204 struct imsm_dev *dev;
1205 struct imsm_map *map;
1206 struct imsm_disk *disk;
1207 __u32 status;
1208
1209 if (super->creating_dev == -1) {
1210 fprintf(stderr, Name ": no active raid device\n");
1211 abort();
1212 }
1213
1214 dev = get_imsm_dev(mpb, super->creating_dev);
1215 map = &dev->vol.map[0];
1216
1217 for (dl = super->disks; dl ; dl = dl->next)
1218 if (dl->major == dk->major &&
1219 dl->minor == dk->minor)
1220 break;
1221 if (!dl || ! (dk->state & (1<<MD_DISK_SYNC)))
1222 return;
1223
1224 map->disk_ord_tbl[dk->number] = __cpu_to_le32(dl->index);
1225
1226 disk = get_imsm_disk(mpb, dl->index);
1227 status = CONFIGURED_DISK | USABLE_DISK;
1228 disk->status = __cpu_to_le32(status);
1229 }
1230
1231 static int store_imsm_mpb(int fd, struct intel_super *super);
1232
1233 static int write_super_imsm(struct intel_super *super, int doclose)
1234 {
1235 struct imsm_super *mpb = super->mpb;
1236 struct dl *d;
1237 __u32 generation;
1238 __u32 sum;
1239
1240 /* 'generation' is incremented everytime the metadata is written */
1241 generation = __le32_to_cpu(mpb->generation_num);
1242 generation++;
1243 mpb->generation_num = __cpu_to_le32(generation);
1244
1245 /* recalculate checksum */
1246 sum = gen_imsm_checksum(mpb);
1247 mpb->check_sum = __cpu_to_le32(sum);
1248
1249 for (d = super->disks; d ; d = d->next) {
1250 if (store_imsm_mpb(d->fd, super)) {
1251 fprintf(stderr, "%s: failed for device %d:%d %s\n",
1252 __func__, d->major, d->minor, strerror(errno));
1253 return 0;
1254 }
1255 if (doclose) {
1256 close(d->fd);
1257 d->fd = -1;
1258 }
1259 }
1260
1261 return 1;
1262 }
1263
1264 static int write_init_super_imsm(struct supertype *st)
1265 {
1266 return write_super_imsm(st->sb, 1);
1267 }
1268
1269 static int store_zero_imsm(struct supertype *st, int fd)
1270 {
1271 unsigned long long dsize;
1272 char buf[512];
1273
1274 get_dev_size(fd, NULL, &dsize);
1275
1276 /* first block is stored on second to last sector of the disk */
1277 if (lseek64(fd, dsize - (512 * 2), SEEK_SET) < 0)
1278 return 1;
1279
1280 memset(buf, 0, sizeof(buf));
1281 if (write(fd, buf, sizeof(buf)) != sizeof(buf))
1282 return 1;
1283
1284 return 0;
1285 }
1286
1287 static void getinfo_super_n_imsm_container(struct supertype *st, struct mdinfo *info)
1288 {
1289 /* just need offset and size...
1290 * of the metadata
1291 */
1292 struct intel_super *super = st->sb;
1293 struct imsm_super *mpb = super->mpb;
1294 struct imsm_disk *disk = get_imsm_disk(mpb, info->disk.number);
1295
1296 info->data_offset = __le32_to_cpu(disk->total_blocks) -
1297 (MPB_SECTOR_CNT + IMSM_RESERVED_SECTORS);
1298 info->component_size = MPB_SECTOR_CNT + IMSM_RESERVED_SECTORS;
1299 }
1300
1301 static void getinfo_super_n_imsm_volume(struct supertype *st, struct mdinfo *info)
1302 {
1303 /* Find the particular details for info->disk.raid_disk.
1304 * This includes data_offset, component_size,
1305 */
1306 struct intel_super *super = st->sb;
1307 struct imsm_super *mpb = super->mpb;
1308 struct imsm_dev *dev = get_imsm_dev(mpb, super->creating_dev);
1309 struct imsm_map *map = &dev->vol.map[0];
1310
1311 info->data_offset = __le32_to_cpu(map->pba_of_lba0);
1312 info->component_size = __le32_to_cpu(map->blocks_per_member);
1313 }
1314
1315 static int validate_geometry_imsm(struct supertype *st, int level, int layout,
1316 int raiddisks, int chunk, unsigned long long size,
1317 char *dev, unsigned long long *freesize)
1318 {
1319 int fd, cfd;
1320 struct mdinfo *sra;
1321
1322 /* if given unused devices create a container
1323 * if given given devices in a container create a member volume
1324 */
1325 if (level == LEVEL_CONTAINER) {
1326 st->ss = &super_imsm_container;
1327 if (dev) {
1328 /* validate the container, dev == NULL */
1329 int rv = st->ss->validate_geometry(st, level, layout,
1330 raiddisks, chunk,
1331 size,
1332 NULL, freesize);
1333 if (rv)
1334 return rv;
1335 }
1336 return st->ss->validate_geometry(st, level, layout, raiddisks,
1337 chunk, size, dev, freesize);
1338 }
1339
1340 if (st->sb) {
1341 /* creating in a given container */
1342 st->ss = &super_imsm_volume;
1343 if (dev) {
1344 int rv = st->ss->validate_geometry(st, level, layout,
1345 raiddisks, chunk,
1346 size,
1347 NULL, freesize);
1348 if (rv)
1349 return rv;
1350 }
1351 return st->ss->validate_geometry(st, level, layout, raiddisks,
1352 chunk, size, dev, freesize);
1353 }
1354
1355 /* limit creation to the following levels */
1356 if (!dev)
1357 switch (level) {
1358 case 0:
1359 case 1:
1360 case 10:
1361 case 5:
1362 break;
1363 default:
1364 return 1;
1365 }
1366
1367 /* This device needs to be a device in an 'imsm' container */
1368 fd = open(dev, O_RDONLY|O_EXCL, 0);
1369 if (fd >= 0) {
1370 fprintf(stderr,
1371 Name ": Cannot create this array on device %s\n",
1372 dev);
1373 close(fd);
1374 return 0;
1375 }
1376 if (errno != EBUSY || (fd = open(dev, O_RDONLY, 0)) < 0) {
1377 fprintf(stderr, Name ": Cannot open %s: %s\n",
1378 dev, strerror(errno));
1379 return 0;
1380 }
1381 /* Well, it is in use by someone, maybe an 'imsm' container. */
1382 cfd = open_container(fd);
1383 if (cfd < 0) {
1384 close(fd);
1385 fprintf(stderr, Name ": Cannot use %s: It is busy\n",
1386 dev);
1387 return 0;
1388 }
1389 sra = sysfs_read(cfd, 0, GET_VERSION);
1390 close(fd);
1391 if (sra && sra->array.major_version == -1 &&
1392 strcmp(sra->text_version, "imsm") == 0) {
1393 /* This is a member of a imsm container. Load the container
1394 * and try to create a volume
1395 */
1396 struct intel_super *super;
1397 st->ss = &super_imsm_volume;
1398 if (load_super_imsm_all(st, cfd, (void **) &super, NULL, 1) == 0) {
1399 st->sb = super;
1400 st->container_dev = fd2devnum(cfd);
1401 close(cfd);
1402 return st->ss->validate_geometry(st, level, layout,
1403 raiddisks, chunk, size,
1404 dev, freesize);
1405 }
1406 close(cfd);
1407 } else /* may belong to another container */
1408 return 0;
1409
1410 return 1;
1411 }
1412
1413 static int validate_geometry_imsm_container(struct supertype *st, int level,
1414 int layout, int raiddisks, int chunk,
1415 unsigned long long size, char *dev,
1416 unsigned long long *freesize)
1417 {
1418 int fd;
1419 unsigned long long ldsize;
1420
1421 if (level != LEVEL_CONTAINER)
1422 return 0;
1423 if (!dev)
1424 return 1;
1425
1426 fd = open(dev, O_RDONLY|O_EXCL, 0);
1427 if (fd < 0) {
1428 fprintf(stderr, Name ": Cannot open %s: %s\n",
1429 dev, strerror(errno));
1430 return 0;
1431 }
1432 if (!get_dev_size(fd, dev, &ldsize)) {
1433 close(fd);
1434 return 0;
1435 }
1436 close(fd);
1437
1438 *freesize = avail_size_imsm(st, ldsize >> 9);
1439
1440 return 1;
1441 }
1442
1443 /* validate_geometry_imsm_volume - lifted from validate_geometry_ddf_bvd
1444 * FIX ME add ahci details
1445 */
1446 static int validate_geometry_imsm_volume(struct supertype *st, int level,
1447 int layout, int raiddisks, int chunk,
1448 unsigned long long size, char *dev,
1449 unsigned long long *freesize)
1450 {
1451 struct stat stb;
1452 struct intel_super *super = st->sb;
1453 struct dl *dl;
1454 unsigned long long pos = 0;
1455 unsigned long long maxsize;
1456 struct extent *e;
1457 int i;
1458
1459 if (level == LEVEL_CONTAINER)
1460 return 0;
1461
1462 if (level == 1 && raiddisks > 2) {
1463 fprintf(stderr, Name ": imsm does not support more than 2 "
1464 "in a raid1 configuration\n");
1465 return 0;
1466 }
1467
1468 /* We must have the container info already read in. */
1469 if (!super)
1470 return 0;
1471
1472 if (!dev) {
1473 /* General test: make sure there is space for
1474 * 'raiddisks' device extents of size 'size'.
1475 */
1476 unsigned long long minsize = size*2 /* convert to blocks */;
1477 int dcnt = 0;
1478 if (minsize == 0)
1479 minsize = MPB_SECTOR_CNT + IMSM_RESERVED_SECTORS;
1480 for (dl = super->disks; dl ; dl = dl->next) {
1481 int found = 0;
1482
1483 i = 0;
1484 e = get_extents(super, dl);
1485 if (!e) continue;
1486 do {
1487 unsigned long long esize;
1488 esize = e[i].start - pos;
1489 if (esize >= minsize)
1490 found = 1;
1491 pos = e[i].start + e[i].size;
1492 i++;
1493 } while (e[i-1].size);
1494 if (found)
1495 dcnt++;
1496 free(e);
1497 }
1498 if (dcnt < raiddisks) {
1499 fprintf(stderr, Name ": Not enough devices with space "
1500 "for this array (%d < %d)\n",
1501 dcnt, raiddisks);
1502 return 0;
1503 }
1504 return 1;
1505 }
1506 /* This device must be a member of the set */
1507 if (stat(dev, &stb) < 0)
1508 return 0;
1509 if ((S_IFMT & stb.st_mode) != S_IFBLK)
1510 return 0;
1511 for (dl = super->disks ; dl ; dl = dl->next) {
1512 if (dl->major == major(stb.st_rdev) &&
1513 dl->minor == minor(stb.st_rdev))
1514 break;
1515 }
1516 if (!dl) {
1517 fprintf(stderr, Name ": %s is not in the same imsm set\n",
1518 dev);
1519 return 0;
1520 }
1521 e = get_extents(super, dl);
1522 maxsize = 0;
1523 i = 0;
1524 if (e) do {
1525 unsigned long long esize;
1526 esize = e[i].start - pos;
1527 if (esize >= maxsize)
1528 maxsize = esize;
1529 pos = e[i].start + e[i].size;
1530 i++;
1531 } while (e[i-1].size);
1532 *freesize = maxsize;
1533
1534 return 1;
1535 }
1536
1537 static struct mdinfo *container_content_imsm(struct supertype *st)
1538 {
1539 /* Given a container loaded by load_super_imsm_all,
1540 * extract information about all the arrays into
1541 * an mdinfo tree.
1542 *
1543 * For each imsm_dev create an mdinfo, fill it in,
1544 * then look for matching devices in super->disks
1545 * and create appropriate device mdinfo.
1546 */
1547 struct intel_super *super = st->sb;
1548 struct imsm_super *mpb = super->mpb;
1549 struct mdinfo *rest = NULL;
1550 int i;
1551
1552 for (i = 0; i < mpb->num_raid_devs; i++) {
1553 struct imsm_dev *dev = get_imsm_dev(mpb, i);
1554 struct imsm_vol *vol = &dev->vol;
1555 struct imsm_map *map = vol->map;
1556 struct mdinfo *this;
1557 __u64 sz;
1558 int slot;
1559
1560 this = malloc(sizeof(*this));
1561 memset(this, 0, sizeof(*this));
1562 this->next = rest;
1563 rest = this;
1564
1565 this->array.major_version = 2000;
1566 get_imsm_numerical_version(mpb, &this->array.minor_version,
1567 &this->array.patch_version);
1568 this->array.level = get_imsm_raid_level(map);
1569 this->array.raid_disks = map->num_members;
1570 this->array.layout = imsm_level_to_layout(this->array.level);
1571 this->array.md_minor = -1;
1572 this->array.ctime = 0;
1573 this->array.utime = 0;
1574 this->array.chunk_size = __le16_to_cpu(map->blocks_per_strip) << 9;
1575 this->array.state = !vol->dirty;
1576 this->container_member = i;
1577 if (map->map_state == IMSM_T_STATE_UNINITIALIZED || dev->vol.dirty)
1578 this->resync_start = 0;
1579 else
1580 this->resync_start = ~0ULL;
1581
1582 strncpy(this->name, (char *) dev->volume, MAX_RAID_SERIAL_LEN);
1583 this->name[MAX_RAID_SERIAL_LEN] = 0;
1584
1585 sprintf(this->text_version, "/%s/%d",
1586 devnum2devname(st->container_dev),
1587 this->container_member);
1588
1589 memset(this->uuid, 0, sizeof(this->uuid));
1590
1591 sz = __le32_to_cpu(dev->size_high);
1592 sz <<= 32;
1593 sz += __le32_to_cpu(dev->size_low);
1594 this->component_size = sz;
1595 this->array.size = this->component_size / 2;
1596
1597 for (slot = 0 ; slot < map->num_members; slot++) {
1598 struct imsm_disk *disk;
1599 struct mdinfo *info_d;
1600 struct dl *d;
1601 int idx;
1602 __u32 s;
1603
1604 idx = __le32_to_cpu(map->disk_ord_tbl[slot] & ~(0xff << 24));
1605 for (d = super->disks; d ; d = d->next)
1606 if (d->index == idx)
1607 break;
1608
1609 if (d == NULL)
1610 break; /* shouldn't this be continue ?? */
1611
1612 info_d = malloc(sizeof(*info_d));
1613 if (!info_d)
1614 break; /* ditto ?? */
1615 memset(info_d, 0, sizeof(*info_d));
1616 info_d->next = this->devs;
1617 this->devs = info_d;
1618
1619 disk = get_imsm_disk(mpb, idx);
1620 s = __le32_to_cpu(disk->status);
1621
1622 info_d->disk.number = d->index;
1623 info_d->disk.major = d->major;
1624 info_d->disk.minor = d->minor;
1625 info_d->disk.raid_disk = slot;
1626 info_d->disk.state = s & CONFIGURED_DISK ? (1 << MD_DISK_ACTIVE) : 0;
1627 info_d->disk.state |= s & FAILED_DISK ? (1 << MD_DISK_FAULTY) : 0;
1628 info_d->disk.state |= s & USABLE_DISK ? (1 << MD_DISK_SYNC) : 0;
1629
1630 this->array.working_disks++;
1631
1632 info_d->events = __le32_to_cpu(mpb->generation_num);
1633 info_d->data_offset = __le32_to_cpu(map->pba_of_lba0);
1634 info_d->component_size = __le32_to_cpu(map->blocks_per_member);
1635 if (d->devname)
1636 strcpy(info_d->name, d->devname);
1637 }
1638 }
1639
1640 return rest;
1641 }
1642
1643
1644 static int imsm_open_new(struct supertype *c, struct active_array *a,
1645 char *inst)
1646 {
1647 fprintf(stderr, "imsm: open_new %s\n", inst);
1648 a->info.container_member = atoi(inst);
1649 return 0;
1650 }
1651
1652 static void imsm_set_array_state(struct active_array *a, int consistent)
1653 {
1654 int inst = a->info.container_member;
1655 struct intel_super *super = a->container->sb;
1656 struct imsm_dev *dev = get_imsm_dev(super->mpb, inst);
1657 int dirty = !consistent || (a->resync_start != ~0ULL);
1658
1659 if (dev->vol.dirty != dirty) {
1660 fprintf(stderr, "imsm: mark '%s' (%llu)\n",
1661 dirty?"dirty":"clean", a->resync_start);
1662
1663 dev->vol.dirty = dirty;
1664 super->updates_pending++;
1665 }
1666 }
1667
1668 static __u8 imsm_check_degraded(struct imsm_super *mpb, int n, int failed)
1669 {
1670 struct imsm_dev *dev = get_imsm_dev(mpb, n);
1671 struct imsm_map *map = dev->vol.map;
1672
1673 if (!failed)
1674 return map->map_state;
1675
1676 switch (get_imsm_raid_level(map)) {
1677 case 0:
1678 return IMSM_T_STATE_FAILED;
1679 break;
1680 case 1:
1681 if (failed < map->num_members)
1682 return IMSM_T_STATE_DEGRADED;
1683 else
1684 return IMSM_T_STATE_FAILED;
1685 break;
1686 case 10:
1687 {
1688 /**
1689 * check to see if any mirrors have failed,
1690 * otherwise we are degraded
1691 */
1692 int device_per_mirror = 2; /* FIXME is this always the case?
1693 * and are they always adjacent?
1694 */
1695 int failed = 0;
1696 int i;
1697
1698 for (i = 0; i < map->num_members; i++) {
1699 int idx = get_imsm_disk_idx(map, i);
1700 struct imsm_disk *disk = get_imsm_disk(mpb, idx);
1701
1702 if (__le32_to_cpu(disk->status) & FAILED_DISK)
1703 failed++;
1704
1705 if (failed >= device_per_mirror)
1706 return IMSM_T_STATE_FAILED;
1707
1708 /* reset 'failed' for next mirror set */
1709 if (!((i + 1) % device_per_mirror))
1710 failed = 0;
1711 }
1712
1713 return IMSM_T_STATE_DEGRADED;
1714 }
1715 case 5:
1716 if (failed < 2)
1717 return IMSM_T_STATE_DEGRADED;
1718 else
1719 return IMSM_T_STATE_FAILED;
1720 break;
1721 default:
1722 break;
1723 }
1724
1725 return map->map_state;
1726 }
1727
1728 static int imsm_count_failed(struct imsm_super *mpb, struct imsm_map *map)
1729 {
1730 int i;
1731 int failed = 0;
1732 struct imsm_disk *disk;
1733
1734 for (i = 0; i < map->num_members; i++) {
1735 int idx = get_imsm_disk_idx(map, i);
1736
1737 disk = get_imsm_disk(mpb, idx);
1738 if (__le32_to_cpu(disk->status) & FAILED_DISK)
1739 failed++;
1740 }
1741
1742 return failed;
1743 }
1744
1745 static void imsm_set_disk(struct active_array *a, int n, int state)
1746 {
1747 int inst = a->info.container_member;
1748 struct intel_super *super = a->container->sb;
1749 struct imsm_dev *dev = get_imsm_dev(super->mpb, inst);
1750 struct imsm_map *map = dev->vol.map;
1751 struct imsm_disk *disk;
1752 __u32 status;
1753 int failed = 0;
1754 int new_failure = 0;
1755
1756 if (n > map->num_members)
1757 fprintf(stderr, "imsm: set_disk %d out of range 0..%d\n",
1758 n, map->num_members - 1);
1759
1760 if (n < 0)
1761 return;
1762
1763 fprintf(stderr, "imsm: set_disk %d:%x\n", n, state);
1764
1765 disk = get_imsm_disk(super->mpb, get_imsm_disk_idx(map, n));
1766
1767 /* check if we have seen this failure before */
1768 status = __le32_to_cpu(disk->status);
1769 if ((state & DS_FAULTY) && !(status & FAILED_DISK)) {
1770 status |= FAILED_DISK;
1771 disk->status = __cpu_to_le32(status);
1772 new_failure = 1;
1773 }
1774
1775 /**
1776 * the number of failures have changed, count up 'failed' to determine
1777 * degraded / failed status
1778 */
1779 if (new_failure && map->map_state != IMSM_T_STATE_FAILED)
1780 failed = imsm_count_failed(super->mpb, map);
1781
1782 if (failed)
1783 map->map_state = imsm_check_degraded(super->mpb, inst, failed);
1784
1785 if (new_failure)
1786 super->updates_pending++;
1787 }
1788
1789 static int store_imsm_mpb(int fd, struct intel_super *super)
1790 {
1791 struct imsm_super *mpb = super->mpb;
1792 __u32 mpb_size = __le32_to_cpu(mpb->mpb_size);
1793 unsigned long long dsize;
1794 unsigned long long sectors;
1795
1796 get_dev_size(fd, NULL, &dsize);
1797
1798 if (mpb_size > 512) {
1799 /* -1 to account for anchor */
1800 sectors = mpb_sectors(mpb) - 1;
1801
1802 /* write the extended mpb to the sectors preceeding the anchor */
1803 if (lseek64(fd, dsize - (512 * (2 + sectors)), SEEK_SET) < 0)
1804 return 1;
1805
1806 if (write(fd, super->buf + 512, mpb_size - 512) != mpb_size - 512)
1807 return 1;
1808 }
1809
1810 /* first block is stored on second to last sector of the disk */
1811 if (lseek64(fd, dsize - (512 * 2), SEEK_SET) < 0)
1812 return 1;
1813
1814 if (write(fd, super->buf, 512) != 512)
1815 return 1;
1816
1817 fsync(fd);
1818
1819 return 0;
1820 }
1821
1822 static void imsm_sync_metadata(struct supertype *container)
1823 {
1824 struct intel_super *super = container->sb;
1825
1826 if (!super->updates_pending)
1827 return;
1828
1829 write_super_imsm(super, 0);
1830
1831 super->updates_pending = 0;
1832 }
1833
1834 struct superswitch super_imsm = {
1835 #ifndef MDASSEMBLE
1836 .examine_super = examine_super_imsm,
1837 .brief_examine_super = brief_examine_super_imsm,
1838 .detail_super = detail_super_imsm,
1839 .brief_detail_super = brief_detail_super_imsm,
1840 #endif
1841 .match_home = match_home_imsm,
1842 .uuid_from_super= uuid_from_super_imsm,
1843 .getinfo_super = getinfo_super_imsm,
1844 .update_super = update_super_imsm,
1845
1846 .avail_size = avail_size_imsm,
1847
1848 .compare_super = compare_super_imsm,
1849
1850 .load_super = load_super_imsm,
1851 .init_super = init_zero_imsm,
1852 .store_super = store_zero_imsm,
1853 .free_super = free_super_imsm,
1854 .match_metadata_desc = match_metadata_desc_imsm,
1855 .getinfo_super_n = getinfo_super_n_imsm_container,
1856
1857 .validate_geometry = validate_geometry_imsm,
1858 .major = 2000,
1859 .swapuuid = 0,
1860 .external = 1,
1861
1862 /* for mdmon */
1863 .open_new = imsm_open_new,
1864 .load_super = load_super_imsm,
1865 .set_array_state= imsm_set_array_state,
1866 .set_disk = imsm_set_disk,
1867 .sync_metadata = imsm_sync_metadata,
1868 };
1869
1870 /* super_imsm_container is set by validate_geometry_imsm when given a
1871 * device that is not part of any array
1872 */
1873 struct superswitch super_imsm_container = {
1874
1875 .validate_geometry = validate_geometry_imsm_container,
1876 .init_super = init_super_imsm,
1877 .add_to_super = add_to_super_imsm,
1878 .write_init_super = write_init_super_imsm,
1879 .getinfo_super = getinfo_super_imsm,
1880 .getinfo_super_n = getinfo_super_n_imsm_container,
1881 .load_super = load_super_imsm,
1882
1883 #ifndef MDASSEMBLE
1884 .examine_super = examine_super_imsm,
1885 .brief_examine_super = brief_examine_super_imsm,
1886 .detail_super = detail_super_imsm,
1887 .brief_detail_super = brief_detail_super_imsm,
1888 #endif
1889
1890 .free_super = free_super_imsm,
1891
1892 .container_content = container_content_imsm,
1893
1894 .major = 2000,
1895 .swapuuid = 0,
1896 .external = 1,
1897 };
1898
1899 struct superswitch super_imsm_volume = {
1900 .update_super = update_super_imsm,
1901 .init_super = init_super_imsm_volume,
1902 .add_to_super = add_to_super_imsm_volume,
1903 .getinfo_super = getinfo_super_imsm_volume,
1904 .getinfo_super_n = getinfo_super_n_imsm_volume,
1905 .write_init_super = write_init_super_imsm,
1906
1907 .load_super = load_super_imsm,
1908 .free_super = free_super_imsm,
1909 .match_metadata_desc = match_metadata_desc_imsm_volume,
1910
1911
1912 .validate_geometry = validate_geometry_imsm_volume,
1913 .major = 2001,
1914 .swapuuid = 0,
1915 .external = 2,
1916 };
Unnamed repository; edit this file 'description' to name the repository.