]> git.ipfire.org Git - thirdparty/mdadm.git/blob - super-intel.c
imsm: add 'Create' support
[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 int i, j;
498
499 info->array.major_version = 2000;
500 get_imsm_numerical_version(mpb, &info->array.minor_version,
501 &info->array.patch_version);
502 info->array.raid_disks = mpb->num_disks;
503 info->array.level = LEVEL_CONTAINER;
504 info->array.layout = 0;
505 info->array.md_minor = -1;
506 info->array.ctime = 0; /* N/A for imsm */
507 info->array.utime = 0;
508 info->array.chunk_size = 0;
509
510 info->disk.major = 0;
511 info->disk.minor = 0;
512 info->disk.raid_disk = -1;
513 info->reshape_active = 0;
514 strcpy(info->text_version, "imsm");
515 info->disk.number = -1;
516 info->disk.state = 0;
517
518 if (!super->disks)
519 return;
520
521 info->disk.number = super->disks->index;
522 /* is this disk a member of a raid device? */
523 for (i = 0; i < mpb->num_raid_devs; i++) {
524 struct imsm_dev *dev = get_imsm_dev(mpb, i);
525 struct imsm_map *map = dev->vol.map;
526
527 for (j = 0; j < map->num_members; j++) {
528 __u32 index = get_imsm_disk_idx(map, j);
529
530 if (index == super->disks->index) {
531 info->disk.raid_disk = super->disks->index;
532 break;
533 }
534 }
535 if (info->disk.raid_disk != -1)
536 break;
537 }
538 disk = get_imsm_disk(mpb, super->disks->index);
539 s = __le32_to_cpu(disk->status);
540 info->disk.state = s & CONFIGURED_DISK ? (1 << MD_DISK_ACTIVE) : 0;
541 info->disk.state |= s & FAILED_DISK ? (1 << MD_DISK_FAULTY) : 0;
542 info->disk.state |= s & USABLE_DISK ? (1 << MD_DISK_SYNC) : 0;
543
544 }
545
546 static void getinfo_super_imsm_volume(struct supertype *st, struct mdinfo *info)
547 {
548 struct intel_super *super = st->sb;
549 struct imsm_super *mpb = super->mpb;
550 struct imsm_dev *dev = get_imsm_dev(mpb, info->container_member);
551 struct imsm_map *map = &dev->vol.map[0];
552
553 info->array.major_version = 2000;
554 get_imsm_numerical_version(mpb, &info->array.minor_version,
555 &info->array.patch_version);
556 info->array.raid_disks = map->num_members;
557 info->array.level = get_imsm_raid_level(map);
558 info->array.layout = imsm_level_to_layout(info->array.level);
559 info->array.md_minor = -1;
560 info->array.ctime = 0;
561 info->array.utime = 0;
562 info->array.chunk_size = __le16_to_cpu(map->blocks_per_strip * 512);
563
564 info->data_offset = __le32_to_cpu(map->pba_of_lba0);
565 info->component_size = __le32_to_cpu(map->blocks_per_member);
566
567 info->disk.major = 0;
568 info->disk.minor = 0;
569
570 sprintf(info->text_version, "/%s/%d",
571 devnum2devname(st->container_dev),
572 info->container_member);
573 }
574
575 static int update_super_imsm(struct supertype *st, struct mdinfo *info,
576 char *update, char *devname, int verbose,
577 int uuid_set, char *homehost)
578 {
579 /* FIXME */
580
581 /* For 'assemble' and 'force' we need to return non-zero if any
582 * change was made. For others, the return value is ignored.
583 * Update options are:
584 * force-one : This device looks a bit old but needs to be included,
585 * update age info appropriately.
586 * assemble: clear any 'faulty' flag to allow this device to
587 * be assembled.
588 * force-array: Array is degraded but being forced, mark it clean
589 * if that will be needed to assemble it.
590 *
591 * newdev: not used ????
592 * grow: Array has gained a new device - this is currently for
593 * linear only
594 * resync: mark as dirty so a resync will happen.
595 * name: update the name - preserving the homehost
596 *
597 * Following are not relevant for this imsm:
598 * sparc2.2 : update from old dodgey metadata
599 * super-minor: change the preferred_minor number
600 * summaries: update redundant counters.
601 * uuid: Change the uuid of the array to match watch is given
602 * homehost: update the recorded homehost
603 * _reshape_progress: record new reshape_progress position.
604 */
605 int rv = 0;
606 //struct intel_super *super = st->sb;
607 //struct imsm_super *mpb = super->mpb;
608
609 if (strcmp(update, "grow") == 0) {
610 }
611 if (strcmp(update, "resync") == 0) {
612 /* dev->vol.dirty = 1; */
613 }
614
615 /* IMSM has no concept of UUID or homehost */
616
617 return rv;
618 }
619
620 static size_t disks_to_mpb_size(int disks)
621 {
622 size_t size;
623
624 size = sizeof(struct imsm_super);
625 size += (disks - 1) * sizeof(struct imsm_disk);
626 size += 2 * sizeof(struct imsm_dev);
627 /* up to 2 maps per raid device (-2 for imsm_maps in imsm_dev */
628 size += (4 - 2) * sizeof(struct imsm_map);
629 /* 4 possible disk_ord_tbl's */
630 size += 4 * (disks - 1) * sizeof(__u32);
631
632 return size;
633 }
634
635 static __u64 avail_size_imsm(struct supertype *st, __u64 devsize)
636 {
637 if (devsize < (MPB_SECTOR_CNT + IMSM_RESERVED_SECTORS))
638 return 0;
639
640 return devsize - (MPB_SECTOR_CNT + IMSM_RESERVED_SECTORS);
641 }
642
643 static int compare_super_imsm(struct supertype *st, struct supertype *tst)
644 {
645 /*
646 * return:
647 * 0 same, or first was empty, and second was copied
648 * 1 second had wrong number
649 * 2 wrong uuid
650 * 3 wrong other info
651 */
652 struct intel_super *first = st->sb;
653 struct intel_super *sec = tst->sb;
654
655 if (!first) {
656 st->sb = tst->sb;
657 tst->sb = NULL;
658 return 0;
659 }
660
661 if (memcmp(first->mpb->sig, sec->mpb->sig, MAX_SIGNATURE_LENGTH) != 0)
662 return 3;
663 if (first->mpb->family_num != sec->mpb->family_num)
664 return 3;
665 if (first->mpb->mpb_size != sec->mpb->mpb_size)
666 return 3;
667 if (first->mpb->check_sum != sec->mpb->check_sum)
668 return 3;
669
670 return 0;
671 }
672
673 extern int scsi_get_serial(int fd, void *buf, size_t buf_len);
674
675 static int imsm_read_serial(int fd, char *devname,
676 __u8 serial[MAX_RAID_SERIAL_LEN])
677 {
678 unsigned char scsi_serial[255];
679 int sg_fd;
680 int rv;
681 int rsp_len;
682 int i, cnt;
683
684 memset(scsi_serial, 0, sizeof(scsi_serial));
685
686 sg_fd = sysfs_disk_to_sg(fd);
687 if (sg_fd < 0) {
688 if (devname)
689 fprintf(stderr,
690 Name ": Failed to open sg interface for %s: %s\n",
691 devname, strerror(errno));
692 return 1;
693 }
694
695 rv = scsi_get_serial(sg_fd, scsi_serial, sizeof(scsi_serial));
696 close(sg_fd);
697
698 if (rv != 0) {
699 if (devname)
700 fprintf(stderr,
701 Name ": Failed to retrieve serial for %s\n",
702 devname);
703 return rv;
704 }
705
706 rsp_len = scsi_serial[3];
707 for (i = 0, cnt = 0; i < rsp_len; i++) {
708 if (!isspace(scsi_serial[4 + i]))
709 serial[cnt++] = scsi_serial[4 + i];
710 if (cnt == MAX_RAID_SERIAL_LEN)
711 break;
712 }
713
714 serial[MAX_RAID_SERIAL_LEN - 1] = '\0';
715
716 return 0;
717 }
718
719 static int
720 load_imsm_disk(int fd, struct intel_super *super, char *devname, int keep_fd)
721 {
722 struct imsm_super *mpb = super->mpb;
723 struct dl *dl;
724 struct stat stb;
725 struct imsm_disk *disk;
726 int rv;
727 int i;
728
729 dl = malloc(sizeof(*dl));
730 if (!dl) {
731 if (devname)
732 fprintf(stderr,
733 Name ": failed to allocate disk buffer for %s\n",
734 devname);
735 return 2;
736 }
737 memset(dl, 0, sizeof(*dl));
738
739 fstat(fd, &stb);
740 dl->major = major(stb.st_rdev);
741 dl->minor = minor(stb.st_rdev);
742 dl->next = super->disks;
743 dl->fd = keep_fd ? fd : -1;
744 dl->devname = devname ? strdup(devname) : NULL;
745 dl->index = -1;
746 super->disks = dl;
747 rv = imsm_read_serial(fd, devname, dl->serial);
748
749 if (rv != 0)
750 return 2;
751
752 /* look up this disk's index */
753 for (i = 0; i < mpb->num_disks; i++) {
754 disk = get_imsm_disk(mpb, i);
755
756 if (memcmp(disk->serial, dl->serial, MAX_RAID_SERIAL_LEN) == 0)
757 break;
758 }
759
760 if (i > mpb->num_disks)
761 return 2;
762
763 dl->index = i;
764
765 return 0;
766 }
767
768 /* load_imsm_mpb - read matrix metadata
769 * allocates super->mpb to be freed by free_super
770 */
771 static int load_imsm_mpb(int fd, struct intel_super *super, char *devname)
772 {
773 unsigned long long dsize;
774 size_t len, mpb_size;
775 unsigned long long sectors;
776 struct stat;
777 struct imsm_super anchor;
778 __u32 check_sum;
779
780 memset(super, 0, sizeof(*super));
781 get_dev_size(fd, NULL, &dsize);
782
783 if (lseek64(fd, dsize - (512 * 2), SEEK_SET) < 0) {
784 if (devname)
785 fprintf(stderr,
786 Name ": Cannot seek to anchor block on %s: %s\n",
787 devname, strerror(errno));
788 return 1;
789 }
790
791 len = sizeof(anchor);
792 if (read(fd, &anchor, len) != len) {
793 if (devname)
794 fprintf(stderr,
795 Name ": Cannot read anchor block on %s: %s\n",
796 devname, strerror(errno));
797 return 1;
798 }
799
800 if (strncmp((char *) anchor.sig, MPB_SIGNATURE, MPB_SIG_LEN) != 0) {
801 if (devname)
802 fprintf(stderr,
803 Name ": no IMSM anchor on %s\n", devname);
804 return 2;
805 }
806
807 mpb_size = __le32_to_cpu(anchor.mpb_size);
808 super->mpb = malloc(mpb_size < 512 ? 512 : mpb_size);
809 if (!super->mpb) {
810 if (devname)
811 fprintf(stderr,
812 Name ": unable to allocate %zu byte mpb buffer\n",
813 mpb_size);
814 return 2;
815 }
816 memcpy(super->buf, &anchor, sizeof(anchor));
817
818 /* read the rest of the first block */
819 len = 512 - sizeof(anchor);
820 if (read(fd, super->buf + sizeof(anchor), len) != len) {
821 if (devname)
822 fprintf(stderr,
823 Name ": Cannot read anchor remainder on %s: %s\n",
824 devname, strerror(errno));
825 return 2;
826 }
827
828 sectors = mpb_sectors(&anchor) - 1;
829 if (!sectors)
830 return load_imsm_disk(fd, super, devname, 0);
831
832 /* read the extended mpb */
833 if (lseek64(fd, dsize - (512 * (2 + sectors)), SEEK_SET) < 0) {
834 if (devname)
835 fprintf(stderr,
836 Name ": Cannot seek to extended mpb on %s: %s\n",
837 devname, strerror(errno));
838 return 1;
839 }
840
841 len = mpb_size - 512;
842 if (read(fd, super->buf + 512, len) != len) {
843 if (devname)
844 fprintf(stderr,
845 Name ": Cannot read extended mpb on %s: %s\n",
846 devname, strerror(errno));
847 return 2;
848 }
849
850 check_sum = gen_imsm_checksum(super->mpb);
851 if (check_sum != __le32_to_cpu(super->mpb->check_sum)) {
852 if (devname)
853 fprintf(stderr,
854 Name ": IMSM checksum %x != %x on %s\n",
855 check_sum, __le32_to_cpu(super->mpb->check_sum),
856 devname);
857 return 2;
858 }
859
860 return load_imsm_disk(fd, super, devname, 0);
861 }
862
863 struct superswitch super_imsm_container;
864
865 static void free_imsm_disks(struct intel_super *super)
866 {
867 while (super->disks) {
868 struct dl *d = super->disks;
869
870 super->disks = d->next;
871 if (d->fd >= 0)
872 close(d->fd);
873 if (d->devname)
874 free(d->devname);
875 free(d);
876 }
877 }
878
879 static void free_imsm(struct intel_super *super)
880 {
881 if (super->mpb)
882 free(super->mpb);
883 free_imsm_disks(super);
884 free(super);
885 }
886
887
888 static void free_super_imsm(struct supertype *st)
889 {
890 struct intel_super *super = st->sb;
891
892 if (!super)
893 return;
894
895 free_imsm(super);
896 st->sb = NULL;
897 }
898
899 static struct intel_super *alloc_super(int creating_imsm)
900 {
901 struct intel_super *super = malloc(sizeof(*super));
902
903 if (super) {
904 memset(super, 0, sizeof(*super));
905 super->creating_imsm = creating_imsm;
906 super->creating_dev = -1;
907 }
908
909 return super;
910 }
911
912 #ifndef MDASSEMBLE
913 static int load_super_imsm_all(struct supertype *st, int fd, void **sbp,
914 char *devname, int keep_fd)
915 {
916 struct mdinfo *sra;
917 struct intel_super *super;
918 struct mdinfo *sd, *best = NULL;
919 __u32 bestgen = 0;
920 __u32 gen;
921 char nm[20];
922 int dfd;
923 int rv;
924
925 /* check if this disk is a member of an active array */
926 sra = sysfs_read(fd, 0, GET_LEVEL|GET_VERSION|GET_DEVS|GET_STATE);
927 if (!sra)
928 return 1;
929
930 if (sra->array.major_version != -1 ||
931 sra->array.minor_version != -2 ||
932 strcmp(sra->text_version, "imsm") != 0)
933 return 1;
934
935 super = alloc_super(0);
936 if (!super)
937 return 1;
938
939 /* find the most up to date disk in this array */
940 for (sd = sra->devs; sd; sd = sd->next) {
941 sprintf(nm, "%d:%d", sd->disk.major, sd->disk.minor);
942 dfd = dev_open(nm, keep_fd ? O_RDWR : O_RDONLY);
943 if (!dfd) {
944 free_imsm(super);
945 return 2;
946 }
947 rv = load_imsm_mpb(dfd, super, NULL);
948 if (!keep_fd)
949 close(dfd);
950 if (rv == 0) {
951 gen = __le32_to_cpu(super->mpb->generation_num);
952 if (!best || gen > bestgen) {
953 bestgen = gen;
954 best = sd;
955 }
956 } else {
957 free_imsm(super);
958 return 2;
959 }
960 }
961
962 if (!best) {
963 free_imsm(super);
964 return 1;
965 }
966
967 /* load the most up to date anchor */
968 sprintf(nm, "%d:%d", best->disk.major, best->disk.minor);
969 dfd = dev_open(nm, O_RDONLY);
970 if (!dfd) {
971 free_imsm(super);
972 return 1;
973 }
974 rv = load_imsm_mpb(dfd, super, NULL);
975 close(dfd);
976 if (rv != 0) {
977 free_imsm(super);
978 return 2;
979 }
980
981 /* reset the disk list */
982 free_imsm_disks(super);
983
984 /* populate disk list */
985 for (sd = sra->devs ; sd ; sd = sd->next) {
986 sprintf(nm, "%d:%d", sd->disk.major, sd->disk.minor);
987 dfd = dev_open(nm, keep_fd? O_RDWR : O_RDONLY);
988 if (!dfd) {
989 free_imsm(super);
990 return 2;
991 }
992 load_imsm_disk(dfd, super, NULL, keep_fd);
993 if (!keep_fd)
994 close(dfd);
995 }
996
997 *sbp = super;
998 if (st->ss == NULL) {
999 st->ss = &super_imsm_container;
1000 st->minor_version = 0;
1001 st->max_devs = IMSM_MAX_DEVICES;
1002 st->container_dev = fd2devnum(fd);
1003 }
1004
1005 return 0;
1006 }
1007 #endif
1008
1009 static int load_super_imsm(struct supertype *st, int fd, char *devname)
1010 {
1011 struct intel_super *super;
1012 int rv;
1013
1014 #ifndef MDASSEMBLE
1015 if (load_super_imsm_all(st, fd, &st->sb, devname, 1) == 0)
1016 return 0;
1017 #endif
1018
1019 super = alloc_super(0);
1020 if (!super) {
1021 fprintf(stderr,
1022 Name ": malloc of %zu failed.\n",
1023 sizeof(*super));
1024 return 1;
1025 }
1026
1027 rv = load_imsm_mpb(fd, super, devname);
1028
1029 if (rv) {
1030 if (devname)
1031 fprintf(stderr,
1032 Name ": Failed to load all information "
1033 "sections on %s\n", devname);
1034 free_imsm(super);
1035 return rv;
1036 }
1037
1038 st->sb = super;
1039 if (st->ss == NULL) {
1040 st->ss = &super_imsm;
1041 st->minor_version = 0;
1042 st->max_devs = IMSM_MAX_DEVICES;
1043 }
1044
1045 return 0;
1046 }
1047
1048 static int init_zero_imsm(struct supertype *st, mdu_array_info_t *info,
1049 unsigned long long size, char *name,
1050 char *homehost, int *uuid)
1051 {
1052 printf("%s\n", __FUNCTION__);
1053
1054 return 0;
1055 }
1056
1057 static int init_super_imsm(struct supertype *st, mdu_array_info_t *info,
1058 unsigned long long size, char *name,
1059 char *homehost, int *uuid)
1060 {
1061 /* This is primarily called by Create when creating a new array.
1062 * We will then get add_to_super called for each component, and then
1063 * write_init_super called to write it out to each device.
1064 * For IMSM, Create can create on fresh devices or on a pre-existing
1065 * array.
1066 * To create on a pre-existing array a different method will be called.
1067 * This one is just for fresh drives.
1068 */
1069 struct intel_super *super;
1070 struct imsm_super *mpb;
1071 size_t mpb_size;
1072
1073 super = alloc_super(1);
1074 if (!super)
1075 return 0;
1076 mpb_size = disks_to_mpb_size(info->nr_disks);
1077 mpb = malloc(mpb_size);
1078 if (!mpb) {
1079 free(super);
1080 return 0;
1081 }
1082 memset(mpb, 0, mpb_size);
1083
1084 memcpy(mpb->sig, MPB_SIGNATURE, strlen(MPB_SIGNATURE));
1085 memcpy(mpb->sig + strlen(MPB_SIGNATURE), MPB_VERSION_RAID5,
1086 strlen(MPB_VERSION_RAID5));
1087 mpb->mpb_size = mpb_size;
1088
1089 super->mpb = mpb;
1090 st->sb = super;
1091 return 1;
1092 }
1093
1094 static int init_super_imsm_volume(struct supertype *st, mdu_array_info_t *info,
1095 unsigned long long size, char *name,
1096 char *homehost, int *uuid)
1097 {
1098 /* We are creating a volume inside a pre-existing container.
1099 * so st->sb is already set.
1100 */
1101 struct intel_super *super = st->sb;
1102 struct imsm_super *mpb = super->mpb;
1103 struct imsm_dev *dev;
1104 struct imsm_vol *vol;
1105 struct imsm_map *map;
1106 int idx = mpb->num_raid_devs;
1107 int i;
1108 unsigned long long array_blocks;
1109 unsigned long long sz;
1110 __u32 offset = 0;
1111
1112 if (mpb->num_raid_devs >= 2) {
1113 fprintf(stderr, Name": This imsm-container already has the "
1114 "maximum of 2 volumes\n");
1115 return 0;
1116 }
1117
1118 super->creating_dev = idx;
1119 mpb->num_raid_devs++;
1120 dev = get_imsm_dev(mpb, idx);
1121 strncpy((char *) dev->volume, name, MAX_RAID_SERIAL_LEN);
1122 array_blocks = calc_array_size(info->level, info->raid_disks,
1123 info->layout, info->chunk_size,
1124 info->size*2);
1125 dev->size_low = __cpu_to_le32((__u32) array_blocks);
1126 dev->size_high = __cpu_to_le32((__u32) (array_blocks >> 32));
1127 dev->status = __cpu_to_le32(0);
1128 dev->reserved_blocks = __cpu_to_le32(0);
1129 vol = &dev->vol;
1130 vol->migr_state = 0;
1131 vol->migr_type = 0;
1132 vol->dirty = 0;
1133 for (i = 0; i < idx; i++) {
1134 struct imsm_dev *prev = get_imsm_dev(mpb, i);
1135 struct imsm_map *pmap = &prev->vol.map[0];
1136
1137 offset += __le32_to_cpu(pmap->blocks_per_member);
1138 offset += IMSM_RESERVED_SECTORS;
1139 }
1140 map = &vol->map[0];
1141 map->pba_of_lba0 = __cpu_to_le32(offset);
1142 sz = info->size * 2;
1143 map->blocks_per_member = __cpu_to_le32(sz);
1144 map->blocks_per_strip = __cpu_to_le16(info->chunk_size >> 9);
1145 map->num_data_stripes = __cpu_to_le32(sz / (info->chunk_size >> 9));
1146 map->map_state = info->level ? IMSM_T_STATE_UNINITIALIZED :
1147 IMSM_T_STATE_NORMAL;
1148 if (info->level == 10)
1149 map->raid_level = 1;
1150 else
1151 map->raid_level = info->level;
1152 map->num_members = info->raid_disks;
1153 for (i = 0; i < map->num_members; i++) {
1154 /* initialized in add_to_super */
1155 map->disk_ord_tbl[i] = __cpu_to_le32(0);
1156 }
1157
1158 return 1;
1159 }
1160
1161 static void add_to_super_imsm(struct supertype *st, mdu_disk_info_t *dk,
1162 int fd, char *devname)
1163 {
1164 struct intel_super *super = st->sb;
1165 struct imsm_super *mpb = super->mpb;
1166 struct imsm_disk *disk;
1167 struct dl *dd;
1168 unsigned long long size;
1169 __u32 status, id;
1170 int rv;
1171 struct stat stb;
1172
1173 fstat(fd, &stb);
1174 dd = malloc(sizeof(*dd));
1175 if (!dd) {
1176 fprintf(stderr,
1177 Name ": malloc failed %s:%d.\n", __func__, __LINE__);
1178 abort();
1179 }
1180 memset(dd, 0, sizeof(*dd));
1181 dd->major = major(stb.st_rdev);
1182 dd->minor = minor(stb.st_rdev);
1183 dd->index = dk->number;
1184 dd->devname = devname ? strdup(devname) : NULL;
1185 dd->next = super->disks;
1186 dd->fd = fd;
1187 rv = imsm_read_serial(fd, devname, dd->serial);
1188 if (rv) {
1189 fprintf(stderr,
1190 Name ": failed to retrieve scsi serial "
1191 "using \'%s\' instead\n", devname);
1192 strcpy((char *) dd->serial, devname);
1193 }
1194
1195 if (mpb->num_disks <= dk->number)
1196 mpb->num_disks = dk->number + 1;
1197
1198 disk = get_imsm_disk(mpb, dk->number);
1199 get_dev_size(fd, NULL, &size);
1200 size /= 512;
1201 status = USABLE_DISK | SPARE_DISK;
1202 strcpy((char *) disk->serial, (char *) dd->serial);
1203 disk->total_blocks = __cpu_to_le32(size);
1204 disk->status = __cpu_to_le32(status);
1205 if (sysfs_disk_to_scsi_id(fd, &id) == 0)
1206 disk->scsi_id = __cpu_to_le32(id);
1207 else
1208 disk->scsi_id = __cpu_to_le32(0);
1209
1210 /* update the family number if we are creating a container */
1211 if (super->creating_imsm)
1212 mpb->family_num = __cpu_to_le32(gen_imsm_checksum(mpb));
1213
1214 super->disks = dd;
1215 }
1216
1217 static void add_to_super_imsm_volume(struct supertype *st, mdu_disk_info_t *dk,
1218 int fd, char *devname)
1219 {
1220 struct intel_super *super = st->sb;
1221 struct imsm_super *mpb = super->mpb;
1222 struct dl *dl;
1223 struct imsm_dev *dev;
1224 struct imsm_map *map;
1225 struct imsm_disk *disk;
1226 __u32 status;
1227
1228 if (super->creating_dev == -1) {
1229 fprintf(stderr, Name ": no active raid device\n");
1230 abort();
1231 }
1232
1233 dev = get_imsm_dev(mpb, super->creating_dev);
1234 map = &dev->vol.map[0];
1235
1236 for (dl = super->disks; dl ; dl = dl->next)
1237 if (dl->major == dk->major &&
1238 dl->minor == dk->minor)
1239 break;
1240 if (!dl || ! (dk->state & (1<<MD_DISK_SYNC)))
1241 return;
1242
1243 map->disk_ord_tbl[dk->number] = __cpu_to_le32(dl->index);
1244
1245 disk = get_imsm_disk(mpb, dl->index);
1246 status = CONFIGURED_DISK | USABLE_DISK;
1247 disk->status = __cpu_to_le32(status);
1248 }
1249
1250 static int store_imsm_mpb(int fd, struct intel_super *super);
1251
1252 static int write_super_imsm(struct intel_super *super, int doclose)
1253 {
1254 struct imsm_super *mpb = super->mpb;
1255 struct dl *d;
1256 __u32 generation;
1257 __u32 sum;
1258
1259 /* 'generation' is incremented everytime the metadata is written */
1260 generation = __le32_to_cpu(mpb->generation_num);
1261 generation++;
1262 mpb->generation_num = __cpu_to_le32(generation);
1263
1264 /* recalculate checksum */
1265 sum = gen_imsm_checksum(mpb);
1266 mpb->check_sum = __cpu_to_le32(sum);
1267
1268 for (d = super->disks; d ; d = d->next) {
1269 if (store_imsm_mpb(d->fd, super)) {
1270 fprintf(stderr, "%s: failed for device %d:%d %s\n",
1271 __func__, d->major, d->minor, strerror(errno));
1272 return 0;
1273 }
1274 if (doclose) {
1275 close(d->fd);
1276 d->fd = -1;
1277 }
1278 }
1279
1280 return 1;
1281 }
1282
1283 static int write_init_super_imsm(struct supertype *st)
1284 {
1285 return write_super_imsm(st->sb, 1);
1286 }
1287
1288 static int store_zero_imsm(struct supertype *st, int fd)
1289 {
1290 printf("%s\n", __FUNCTION__);
1291
1292 return 0;
1293 }
1294
1295 static void getinfo_super_n_imsm_container(struct supertype *st, struct mdinfo *info)
1296 {
1297 /* just need offset and size...
1298 * of the metadata
1299 */
1300 struct intel_super *super = st->sb;
1301 struct imsm_super *mpb = super->mpb;
1302 struct imsm_disk *disk = get_imsm_disk(mpb, info->disk.number);
1303
1304 info->data_offset = __le32_to_cpu(disk->total_blocks) -
1305 (MPB_SECTOR_CNT + IMSM_RESERVED_SECTORS);
1306 info->component_size = MPB_SECTOR_CNT + IMSM_RESERVED_SECTORS;
1307 }
1308
1309 static void getinfo_super_n_imsm_volume(struct supertype *st, struct mdinfo *info)
1310 {
1311 /* Find the particular details for info->disk.raid_disk.
1312 * This includes data_offset, component_size,
1313 */
1314 struct intel_super *super = st->sb;
1315 struct imsm_super *mpb = super->mpb;
1316 struct imsm_dev *dev = get_imsm_dev(mpb, super->creating_dev);
1317 struct imsm_map *map = &dev->vol.map[0];
1318
1319 info->data_offset = __le32_to_cpu(map->pba_of_lba0);
1320 info->component_size = __le32_to_cpu(map->blocks_per_member);
1321 }
1322
1323 static int validate_geometry_imsm(struct supertype *st, int level, int layout,
1324 int raiddisks, int chunk, unsigned long long size,
1325 char *dev, unsigned long long *freesize)
1326 {
1327 int fd, cfd;
1328 struct mdinfo *sra;
1329
1330 /* if given unused devices create a container
1331 * if given given devices in a container create a member volume
1332 */
1333 if (level == LEVEL_CONTAINER) {
1334 st->ss = &super_imsm_container;
1335 if (dev) {
1336 /* validate the container, dev == NULL */
1337 int rv = st->ss->validate_geometry(st, level, layout,
1338 raiddisks, chunk,
1339 size,
1340 NULL, freesize);
1341 if (rv)
1342 return rv;
1343 }
1344 return st->ss->validate_geometry(st, level, layout, raiddisks,
1345 chunk, size, dev, freesize);
1346 }
1347
1348 if (st->sb) {
1349 /* creating in a given container */
1350 st->ss = &super_imsm_volume;
1351 if (dev) {
1352 int rv = st->ss->validate_geometry(st, level, layout,
1353 raiddisks, chunk,
1354 size,
1355 NULL, freesize);
1356 if (rv)
1357 return rv;
1358 }
1359 return st->ss->validate_geometry(st, level, layout, raiddisks,
1360 chunk, size, dev, freesize);
1361 }
1362
1363 /* limit creation to the following levels */
1364 if (!dev)
1365 switch (level) {
1366 case 0:
1367 case 1:
1368 case 10:
1369 case 5:
1370 break;
1371 default:
1372 return 1;
1373 }
1374
1375 /* This device needs to be a device in an 'imsm' container */
1376 fd = open(dev, O_RDONLY|O_EXCL, 0);
1377 if (fd >= 0) {
1378 fprintf(stderr,
1379 Name ": Cannot create this array on device %s\n",
1380 dev);
1381 close(fd);
1382 return 0;
1383 }
1384 if (errno != EBUSY || (fd = open(dev, O_RDONLY, 0)) < 0) {
1385 fprintf(stderr, Name ": Cannot open %s: %s\n",
1386 dev, strerror(errno));
1387 return 0;
1388 }
1389 /* Well, it is in use by someone, maybe an 'imsm' container. */
1390 cfd = open_container(fd);
1391 if (cfd < 0) {
1392 close(fd);
1393 fprintf(stderr, Name ": Cannot use %s: It is busy\n",
1394 dev);
1395 return 0;
1396 }
1397 sra = sysfs_read(cfd, 0, GET_VERSION);
1398 close(fd);
1399 if (sra && sra->array.major_version == -1 &&
1400 strcmp(sra->text_version, "imsm") == 0) {
1401 /* This is a member of a imsm container. Load the container
1402 * and try to create a volume
1403 */
1404 struct intel_super *super;
1405 st->ss = &super_imsm_volume;
1406 if (load_super_imsm_all(st, cfd, (void **) &super, NULL, 1) == 0) {
1407 st->sb = super;
1408 st->container_dev = fd2devnum(cfd);
1409 close(cfd);
1410 return st->ss->validate_geometry(st, level, layout,
1411 raiddisks, chunk, size,
1412 dev, freesize);
1413 }
1414 close(cfd);
1415 } else /* may belong to another container */
1416 return 0;
1417
1418 return 1;
1419 }
1420
1421 static int validate_geometry_imsm_container(struct supertype *st, int level,
1422 int layout, int raiddisks, int chunk,
1423 unsigned long long size, char *dev,
1424 unsigned long long *freesize)
1425 {
1426 int fd;
1427 unsigned long long ldsize;
1428
1429 if (level != LEVEL_CONTAINER)
1430 return 0;
1431 if (!dev)
1432 return 1;
1433
1434 fd = open(dev, O_RDONLY|O_EXCL, 0);
1435 if (fd < 0) {
1436 fprintf(stderr, Name ": Cannot open %s: %s\n",
1437 dev, strerror(errno));
1438 return 0;
1439 }
1440 if (!get_dev_size(fd, dev, &ldsize)) {
1441 close(fd);
1442 return 0;
1443 }
1444 close(fd);
1445
1446 *freesize = avail_size_imsm(st, ldsize >> 9);
1447
1448 return 1;
1449 }
1450
1451 /* validate_geometry_imsm_volume - lifted from validate_geometry_ddf_bvd
1452 * FIX ME add ahci details
1453 */
1454 static int validate_geometry_imsm_volume(struct supertype *st, int level,
1455 int layout, int raiddisks, int chunk,
1456 unsigned long long size, char *dev,
1457 unsigned long long *freesize)
1458 {
1459 struct stat stb;
1460 struct intel_super *super = st->sb;
1461 struct dl *dl;
1462 unsigned long long pos = 0;
1463 unsigned long long maxsize;
1464 struct extent *e;
1465 int i;
1466
1467 if (level == LEVEL_CONTAINER)
1468 return 0;
1469
1470 if (level == 1 && raiddisks > 2) {
1471 fprintf(stderr, Name ": imsm does not support more than 2 "
1472 "in a raid1 configuration\n");
1473 return 0;
1474 }
1475
1476 /* We must have the container info already read in. */
1477 if (!super)
1478 return 0;
1479
1480 if (!dev) {
1481 /* General test: make sure there is space for
1482 * 'raiddisks' device extents of size 'size'.
1483 */
1484 unsigned long long minsize = size*2 /* convert to blocks */;
1485 int dcnt = 0;
1486 if (minsize == 0)
1487 minsize = MPB_SECTOR_CNT + IMSM_RESERVED_SECTORS;
1488 for (dl = super->disks; dl ; dl = dl->next) {
1489 int found = 0;
1490
1491 i = 0;
1492 e = get_extents(super, dl);
1493 if (!e) continue;
1494 do {
1495 unsigned long long esize;
1496 esize = e[i].start - pos;
1497 if (esize >= minsize)
1498 found = 1;
1499 pos = e[i].start + e[i].size;
1500 i++;
1501 } while (e[i-1].size);
1502 if (found)
1503 dcnt++;
1504 free(e);
1505 }
1506 if (dcnt < raiddisks) {
1507 fprintf(stderr, Name ": Not enough devices with space "
1508 "for this array (%d < %d)\n",
1509 dcnt, raiddisks);
1510 return 0;
1511 }
1512 return 1;
1513 }
1514 /* This device must be a member of the set */
1515 if (stat(dev, &stb) < 0)
1516 return 0;
1517 if ((S_IFMT & stb.st_mode) != S_IFBLK)
1518 return 0;
1519 for (dl = super->disks ; dl ; dl = dl->next) {
1520 if (dl->major == major(stb.st_rdev) &&
1521 dl->minor == minor(stb.st_rdev))
1522 break;
1523 }
1524 if (!dl) {
1525 fprintf(stderr, Name ": %s is not in the same imsm set\n",
1526 dev);
1527 return 0;
1528 }
1529 e = get_extents(super, dl);
1530 maxsize = 0;
1531 i = 0;
1532 if (e) do {
1533 unsigned long long esize;
1534 esize = e[i].start - pos;
1535 if (esize >= maxsize)
1536 maxsize = esize;
1537 pos = e[i].start + e[i].size;
1538 i++;
1539 } while (e[i-1].size);
1540 *freesize = maxsize;
1541
1542 return 1;
1543 }
1544
1545 static struct mdinfo *container_content_imsm(struct supertype *st)
1546 {
1547 /* Given a container loaded by load_super_imsm_all,
1548 * extract information about all the arrays into
1549 * an mdinfo tree.
1550 *
1551 * For each imsm_dev create an mdinfo, fill it in,
1552 * then look for matching devices in super->disks
1553 * and create appropriate device mdinfo.
1554 */
1555 struct intel_super *super = st->sb;
1556 struct imsm_super *mpb = super->mpb;
1557 struct mdinfo *rest = NULL;
1558 int i;
1559
1560 for (i = 0; i < mpb->num_raid_devs; i++) {
1561 struct imsm_dev *dev = get_imsm_dev(mpb, i);
1562 struct imsm_vol *vol = &dev->vol;
1563 struct imsm_map *map = vol->map;
1564 struct mdinfo *this;
1565 __u64 sz;
1566 int slot;
1567
1568 this = malloc(sizeof(*this));
1569 memset(this, 0, sizeof(*this));
1570 this->next = rest;
1571 rest = this;
1572
1573 this->array.major_version = 2000;
1574 get_imsm_numerical_version(mpb, &this->array.minor_version,
1575 &this->array.patch_version);
1576 this->array.level = get_imsm_raid_level(map);
1577 this->array.raid_disks = map->num_members;
1578 this->array.layout = imsm_level_to_layout(this->array.level);
1579 this->array.md_minor = -1;
1580 this->array.ctime = 0;
1581 this->array.utime = 0;
1582 this->array.chunk_size = __le16_to_cpu(map->blocks_per_strip) << 9;
1583 this->array.state = !vol->dirty;
1584 this->container_member = i;
1585 if (map->map_state == IMSM_T_STATE_UNINITIALIZED || dev->vol.dirty)
1586 this->resync_start = 0;
1587 else
1588 this->resync_start = ~0ULL;
1589
1590 strncpy(this->name, (char *) dev->volume, MAX_RAID_SERIAL_LEN);
1591 this->name[MAX_RAID_SERIAL_LEN] = 0;
1592
1593 sprintf(this->text_version, "/%s/%d",
1594 devnum2devname(st->container_dev),
1595 this->container_member);
1596
1597 memset(this->uuid, 0, sizeof(this->uuid));
1598
1599 sz = __le32_to_cpu(dev->size_high);
1600 sz <<= 32;
1601 sz += __le32_to_cpu(dev->size_low);
1602 this->component_size = sz;
1603 this->array.size = this->component_size / 2;
1604
1605 for (slot = 0 ; slot < map->num_members; slot++) {
1606 struct imsm_disk *disk;
1607 struct mdinfo *info_d;
1608 struct dl *d;
1609 int idx;
1610 __u32 s;
1611
1612 idx = __le32_to_cpu(map->disk_ord_tbl[slot] & ~(0xff << 24));
1613 for (d = super->disks; d ; d = d->next)
1614 if (d->index == idx)
1615 break;
1616
1617 if (d == NULL)
1618 break; /* shouldn't this be continue ?? */
1619
1620 info_d = malloc(sizeof(*info_d));
1621 if (!info_d)
1622 break; /* ditto ?? */
1623 memset(info_d, 0, sizeof(*info_d));
1624 info_d->next = this->devs;
1625 this->devs = info_d;
1626
1627 disk = get_imsm_disk(mpb, idx);
1628 s = __le32_to_cpu(disk->status);
1629
1630 info_d->disk.number = d->index;
1631 info_d->disk.major = d->major;
1632 info_d->disk.minor = d->minor;
1633 info_d->disk.raid_disk = slot;
1634 info_d->disk.state = s & CONFIGURED_DISK ? (1 << MD_DISK_ACTIVE) : 0;
1635 info_d->disk.state |= s & FAILED_DISK ? (1 << MD_DISK_FAULTY) : 0;
1636 info_d->disk.state |= s & USABLE_DISK ? (1 << MD_DISK_SYNC) : 0;
1637
1638 this->array.working_disks++;
1639
1640 info_d->events = __le32_to_cpu(mpb->generation_num);
1641 info_d->data_offset = __le32_to_cpu(map->pba_of_lba0);
1642 info_d->component_size = __le32_to_cpu(map->blocks_per_member);
1643 if (d->devname)
1644 strcpy(info_d->name, d->devname);
1645 }
1646 }
1647
1648 return rest;
1649 }
1650
1651
1652 static int imsm_open_new(struct supertype *c, struct active_array *a,
1653 char *inst)
1654 {
1655 fprintf(stderr, "imsm: open_new %s\n", inst);
1656 a->info.container_member = atoi(inst);
1657 return 0;
1658 }
1659
1660 static void imsm_set_array_state(struct active_array *a, int consistent)
1661 {
1662 int inst = a->info.container_member;
1663 struct intel_super *super = a->container->sb;
1664 struct imsm_dev *dev = get_imsm_dev(super->mpb, inst);
1665 int dirty = !consistent || (a->resync_start != ~0ULL);
1666
1667 if (dev->vol.dirty != dirty) {
1668 fprintf(stderr, "imsm: mark '%s' (%llu)\n",
1669 dirty?"dirty":"clean", a->resync_start);
1670
1671 dev->vol.dirty = dirty;
1672 super->updates_pending++;
1673 }
1674 }
1675
1676 static __u8 imsm_check_degraded(struct imsm_super *mpb, int n, int failed)
1677 {
1678 struct imsm_dev *dev = get_imsm_dev(mpb, n);
1679 struct imsm_map *map = dev->vol.map;
1680
1681 if (!failed)
1682 return map->map_state;
1683
1684 switch (get_imsm_raid_level(map)) {
1685 case 0:
1686 return IMSM_T_STATE_FAILED;
1687 break;
1688 case 1:
1689 if (failed < map->num_members)
1690 return IMSM_T_STATE_DEGRADED;
1691 else
1692 return IMSM_T_STATE_FAILED;
1693 break;
1694 case 10:
1695 {
1696 /**
1697 * check to see if any mirrors have failed,
1698 * otherwise we are degraded
1699 */
1700 int device_per_mirror = 2; /* FIXME is this always the case?
1701 * and are they always adjacent?
1702 */
1703 int failed = 0;
1704 int i;
1705
1706 for (i = 0; i < map->num_members; i++) {
1707 int idx = get_imsm_disk_idx(map, i);
1708 struct imsm_disk *disk = get_imsm_disk(mpb, idx);
1709
1710 if (__le32_to_cpu(disk->status) & FAILED_DISK)
1711 failed++;
1712
1713 if (failed >= device_per_mirror)
1714 return IMSM_T_STATE_FAILED;
1715
1716 /* reset 'failed' for next mirror set */
1717 if (!((i + 1) % device_per_mirror))
1718 failed = 0;
1719 }
1720
1721 return IMSM_T_STATE_DEGRADED;
1722 }
1723 case 5:
1724 if (failed < 2)
1725 return IMSM_T_STATE_DEGRADED;
1726 else
1727 return IMSM_T_STATE_FAILED;
1728 break;
1729 default:
1730 break;
1731 }
1732
1733 return map->map_state;
1734 }
1735
1736 static int imsm_count_failed(struct imsm_super *mpb, struct imsm_map *map)
1737 {
1738 int i;
1739 int failed = 0;
1740 struct imsm_disk *disk;
1741
1742 for (i = 0; i < map->num_members; i++) {
1743 int idx = get_imsm_disk_idx(map, i);
1744
1745 disk = get_imsm_disk(mpb, idx);
1746 if (__le32_to_cpu(disk->status) & FAILED_DISK)
1747 failed++;
1748 }
1749
1750 return failed;
1751 }
1752
1753 static void imsm_set_disk(struct active_array *a, int n, int state)
1754 {
1755 int inst = a->info.container_member;
1756 struct intel_super *super = a->container->sb;
1757 struct imsm_dev *dev = get_imsm_dev(super->mpb, inst);
1758 struct imsm_map *map = dev->vol.map;
1759 struct imsm_disk *disk;
1760 __u32 status;
1761 int failed = 0;
1762 int new_failure = 0;
1763
1764 if (n > map->num_members)
1765 fprintf(stderr, "imsm: set_disk %d out of range 0..%d\n",
1766 n, map->num_members - 1);
1767
1768 if (n < 0)
1769 return;
1770
1771 fprintf(stderr, "imsm: set_disk %d:%x\n", n, state);
1772
1773 disk = get_imsm_disk(super->mpb, get_imsm_disk_idx(map, n));
1774
1775 /* check if we have seen this failure before */
1776 status = __le32_to_cpu(disk->status);
1777 if ((state & DS_FAULTY) && !(status & FAILED_DISK)) {
1778 status |= FAILED_DISK;
1779 disk->status = __cpu_to_le32(status);
1780 new_failure = 1;
1781 }
1782
1783 /**
1784 * the number of failures have changed, count up 'failed' to determine
1785 * degraded / failed status
1786 */
1787 if (new_failure && map->map_state != IMSM_T_STATE_FAILED)
1788 failed = imsm_count_failed(super->mpb, map);
1789
1790 if (failed)
1791 map->map_state = imsm_check_degraded(super->mpb, inst, failed);
1792
1793 if (new_failure)
1794 super->updates_pending++;
1795 }
1796
1797 static int store_imsm_mpb(int fd, struct intel_super *super)
1798 {
1799 struct imsm_super *mpb = super->mpb;
1800 __u32 mpb_size = __le32_to_cpu(mpb->mpb_size);
1801 unsigned long long dsize;
1802 unsigned long long sectors;
1803
1804 get_dev_size(fd, NULL, &dsize);
1805
1806 /* first block is stored on second to last sector of the disk */
1807 if (lseek64(fd, dsize - (512 * 2), SEEK_SET) < 0)
1808 return 1;
1809
1810 if (write(fd, super->buf, 512) != 512)
1811 return 1;
1812
1813 if (mpb_size <= 512)
1814 return 0;
1815
1816 /* -1 because we already wrote a sector */
1817 sectors = mpb_sectors(mpb) - 1;
1818
1819 /* write the extended mpb to the sectors preceeding the anchor */
1820 if (lseek64(fd, dsize - (512 * (2 + sectors)), SEEK_SET) < 0)
1821 return 1;
1822
1823 if (write(fd, super->buf + 512, mpb_size - 512) != mpb_size - 512)
1824 return 1;
1825
1826 fsync(fd);
1827
1828 return 0;
1829 }
1830
1831 static void imsm_sync_metadata(struct supertype *container)
1832 {
1833 struct intel_super *super = container->sb;
1834
1835 if (!super->updates_pending)
1836 return;
1837
1838 write_super_imsm(super, 0);
1839
1840 super->updates_pending = 0;
1841 }
1842
1843 struct superswitch super_imsm = {
1844 #ifndef MDASSEMBLE
1845 .examine_super = examine_super_imsm,
1846 .brief_examine_super = brief_examine_super_imsm,
1847 .detail_super = detail_super_imsm,
1848 .brief_detail_super = brief_detail_super_imsm,
1849 #endif
1850 .match_home = match_home_imsm,
1851 .uuid_from_super= uuid_from_super_imsm,
1852 .getinfo_super = getinfo_super_imsm,
1853 .update_super = update_super_imsm,
1854
1855 .avail_size = avail_size_imsm,
1856
1857 .compare_super = compare_super_imsm,
1858
1859 .load_super = load_super_imsm,
1860 .init_super = init_zero_imsm,
1861 .store_super = store_zero_imsm,
1862 .free_super = free_super_imsm,
1863 .match_metadata_desc = match_metadata_desc_imsm,
1864 .getinfo_super_n = getinfo_super_n_imsm_container,
1865
1866 .validate_geometry = validate_geometry_imsm,
1867 .major = 2000,
1868 .swapuuid = 0,
1869 .external = 1,
1870
1871 /* for mdmon */
1872 .open_new = imsm_open_new,
1873 .load_super = load_super_imsm,
1874 .set_array_state= imsm_set_array_state,
1875 .set_disk = imsm_set_disk,
1876 .sync_metadata = imsm_sync_metadata,
1877 };
1878
1879 /* super_imsm_container is set by validate_geometry_imsm when given a
1880 * device that is not part of any array
1881 */
1882 struct superswitch super_imsm_container = {
1883
1884 .validate_geometry = validate_geometry_imsm_container,
1885 .init_super = init_super_imsm,
1886 .add_to_super = add_to_super_imsm,
1887 .write_init_super = write_init_super_imsm,
1888 .getinfo_super = getinfo_super_imsm,
1889 .getinfo_super_n = getinfo_super_n_imsm_container,
1890 .load_super = load_super_imsm,
1891
1892 #ifndef MDASSEMBLE
1893 .examine_super = examine_super_imsm,
1894 .brief_examine_super = brief_examine_super_imsm,
1895 .detail_super = detail_super_imsm,
1896 .brief_detail_super = brief_detail_super_imsm,
1897 #endif
1898
1899 .free_super = free_super_imsm,
1900
1901 .container_content = container_content_imsm,
1902
1903 .major = 2000,
1904 .swapuuid = 0,
1905 .external = 1,
1906 };
1907
1908 struct superswitch super_imsm_volume = {
1909 .update_super = update_super_imsm,
1910 .init_super = init_super_imsm_volume,
1911 .add_to_super = add_to_super_imsm_volume,
1912 .getinfo_super = getinfo_super_imsm_volume,
1913 .getinfo_super_n = getinfo_super_n_imsm_volume,
1914 .write_init_super = write_init_super_imsm,
1915
1916 .load_super = load_super_imsm,
1917 .free_super = free_super_imsm,
1918 .match_metadata_desc = match_metadata_desc_imsm_volume,
1919
1920
1921 .validate_geometry = validate_geometry_imsm_volume,
1922 .major = 2001,
1923 .swapuuid = 0,
1924 .external = 2,
1925 };