Add crc32 files.
[thirdparty/mdadm.git] / super0.c
1 /*
2  * mdadm - manage Linux "md" devices aka RAID arrays.
3  *
4  * Copyright (C) 2001-2006 Neil Brown <neilb@suse.de>
5  *
6  *
7  *    This program is free software; you can redistribute it and/or modify
8  *    it under the terms of the GNU General Public License as published by
9  *    the Free Software Foundation; either version 2 of the License, or
10  *    (at your option) any later version.
11  *
12  *    This program is distributed in the hope that it will be useful,
13  *    but WITHOUT ANY WARRANTY; without even the implied warranty of
14  *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  *    GNU General Public License for more details.
16  *
17  *    You should have received a copy of the GNU General Public License
18  *    along with this program; if not, write to the Free Software
19  *    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
20  *
21  *    Author: Neil Brown
22  *    Email: <neilb@cse.unsw.edu.au>
23  *    Paper: Neil Brown
24  *           School of Computer Science and Engineering
25  *           The University of New South Wales
26  *           Sydney, 2052
27  *           Australia
28  */
29
30 #define HAVE_STDINT_H 1
31 #include "mdadm.h"
32 #include "sha1.h"
33 /*
34  * All handling for the 0.90.0 version superblock is in
35  * this file.
36  * This includes:
37  *   - finding, loading, and writing the superblock.
38  *   - initialising a new superblock
39  *   - printing the superblock for --examine
40  *   - printing part of the superblock for --detail
41  * .. other stuff
42  */
43
44
45 static unsigned long calc_sb0_csum(mdp_super_t *super)
46 {
47         unsigned long csum = super->sb_csum;
48         unsigned long newcsum;
49         super->sb_csum= 0 ;
50         newcsum = calc_csum(super, MD_SB_BYTES);
51         super->sb_csum = csum;
52         return newcsum;
53 }
54
55
56 void super0_swap_endian(struct mdp_superblock_s *sb)
57 {
58         /* as super0 superblocks are host-endian, it is sometimes
59          * useful to be able to swap the endianness
60          * as (almost) everything is u32's we byte-swap every 4byte
61          * number.
62          * We then also have to swap the events_hi and events_lo
63          */
64         char *sbc = (char *)sb;
65         __u32 t32;
66         int i;
67
68         for (i=0; i < MD_SB_BYTES ; i+=4) {
69                 char t = sbc[i];
70                 sbc[i] = sbc[i+3];
71                 sbc[i+3] = t;
72                 t=sbc[i+1];
73                 sbc[i+1]=sbc[i+2];
74                 sbc[i+2]=t;
75         }
76         t32 = sb->events_hi;
77         sb->events_hi = sb->events_lo;
78         sb->events_lo = t32;
79
80         t32 = sb->cp_events_hi;
81         sb->cp_events_hi = sb->cp_events_lo;
82         sb->cp_events_lo = t32;
83
84 }
85
86 #ifndef MDASSEMBLE
87
88 static void examine_super0(struct supertype *st, char *homehost)
89 {
90         mdp_super_t *sb = st->sb;
91         time_t atime;
92         int d;
93         char *c;
94
95         printf("          Magic : %08x\n", sb->md_magic);
96         printf("        Version : %02d.%02d.%02d\n", sb->major_version, sb->minor_version,
97                sb->patch_version);
98         if (sb->minor_version >= 90) {
99                 printf("           UUID : %08x:%08x:%08x:%08x", sb->set_uuid0, sb->set_uuid1,
100                        sb->set_uuid2, sb->set_uuid3);
101                 if (homehost) {
102                         char buf[20];
103                         void *hash = sha1_buffer(homehost,
104                                                  strlen(homehost),
105                                                  buf);
106                         if (memcmp(&sb->set_uuid2, hash, 8)==0)
107                                 printf(" (local to host %s)", homehost);
108                 }
109                 printf("\n");
110         } else
111                 printf("           UUID : %08x\n", sb->set_uuid0);
112
113         if (sb->not_persistent)
114                 printf("           Eedk : not persistent\n");
115
116         atime = sb->ctime;
117         printf("  Creation Time : %.24s\n", ctime(&atime));
118         c=map_num(pers, sb->level);
119         printf("     Raid Level : %s\n", c?c:"-unknown-");
120         if ((int)sb->level >= 0) {
121                 int ddsks=0;
122                 printf("  Used Dev Size : %d%s\n", sb->size,
123                        human_size((long long)sb->size<<10));
124                 switch(sb->level) {
125                 case 1: ddsks=1;break;
126                 case 4:
127                 case 5: ddsks = sb->raid_disks-1; break;
128                 case 6: ddsks = sb->raid_disks-2; break;
129                 case 10: ddsks = sb->raid_disks / (sb->layout&255) / ((sb->layout>>8)&255);
130                 }
131                 if (ddsks)
132                         printf("     Array Size : %llu%s\n", (unsigned long long)ddsks * sb->size,
133                                human_size(ddsks*(long long)sb->size<<10));
134         }
135         printf("   Raid Devices : %d\n", sb->raid_disks);
136         printf("  Total Devices : %d\n", sb->nr_disks);
137         printf("Preferred Minor : %d\n", sb->md_minor);
138         printf("\n");
139         if (sb->minor_version > 90 && (sb->reshape_position+1) != 0) {
140                 printf("  Reshape pos'n : %llu%s\n", (unsigned long long)sb->reshape_position/2, human_size((long long)sb->reshape_position<<9));
141                 if (sb->delta_disks) {
142                         printf("  Delta Devices : %d", sb->delta_disks);
143                         if (sb->delta_disks)
144                                 printf(" (%d->%d)\n", sb->raid_disks-sb->delta_disks, sb->raid_disks);
145                         else
146                                 printf(" (%d->%d)\n", sb->raid_disks, sb->raid_disks+sb->delta_disks);
147                 }
148                 if (sb->new_level != sb->level) {
149                         c = map_num(pers, sb->new_level);
150                         printf("      New Level : %s\n", c?c:"-unknown-");
151                 }
152                 if (sb->new_layout != sb->layout) {
153                         if (sb->level == 5) {
154                                 c = map_num(r5layout, sb->new_layout);
155                                 printf("     New Layout : %s\n", c?c:"-unknown-");
156                         }
157                         if (sb->level == 10) {
158                                 printf("     New Layout : near=%d, %s=%d\n",
159                                        sb->new_layout&255,
160                                        (sb->new_layout&0x10000)?"offset":"far",
161                                        (sb->new_layout>>8)&255);
162                         }
163                 }
164                 if (sb->new_chunk != sb->chunk_size)
165                         printf("  New Chunksize : %d\n", sb->new_chunk);
166                 printf("\n");
167         }
168         atime = sb->utime;
169         printf("    Update Time : %.24s\n", ctime(&atime));
170         printf("          State : %s\n",
171                (sb->state&(1<<MD_SB_CLEAN))?"clean":"active");
172         if (sb->state & (1<<MD_SB_BITMAP_PRESENT))
173                 printf("Internal Bitmap : present\n");
174         printf(" Active Devices : %d\n", sb->active_disks);
175         printf("Working Devices : %d\n", sb->working_disks);
176         printf(" Failed Devices : %d\n", sb->failed_disks);
177         printf("  Spare Devices : %d\n", sb->spare_disks);
178         if (calc_sb0_csum(sb) == sb->sb_csum)
179                 printf("       Checksum : %x - correct\n", sb->sb_csum);
180         else
181                 printf("       Checksum : %x - expected %lx\n", sb->sb_csum, calc_sb0_csum(sb));
182         printf("         Events : %llu\n",
183                ((unsigned long long)sb->events_hi << 32)
184                + sb->events_lo);
185         printf("\n");
186         if (sb->level == 5) {
187                 c = map_num(r5layout, sb->layout);
188                 printf("         Layout : %s\n", c?c:"-unknown-");
189         }
190         if (sb->level == 10) {
191                 printf("         Layout : near=%d, %s=%d\n",
192                        sb->layout&255,
193                        (sb->layout&0x10000)?"offset":"far",
194                        (sb->layout>>8)&255);
195         }
196         switch(sb->level) {
197         case 0:
198         case 4:
199         case 5:
200         case 6:
201         case 10:
202                 printf("     Chunk Size : %dK\n", sb->chunk_size/1024);
203                 break;
204         case -1:
205                 printf("       Rounding : %dK\n", sb->chunk_size/1024);
206                 break;
207         default: break;
208         }
209         printf("\n");
210         printf("      Number   Major   Minor   RaidDevice State\n");
211         for (d= -1; d<(signed int)(sb->raid_disks+sb->spare_disks); d++) {
212                 mdp_disk_t *dp;
213                 char *dv;
214                 char nb[5];
215                 int wonly;
216                 if (d>=0) dp = &sb->disks[d];
217                 else dp = &sb->this_disk;
218                 snprintf(nb, sizeof(nb), "%4d", d);
219                 printf("%4s %5d   %5d    %5d    %5d     ", d < 0 ? "this" :  nb,
220                        dp->number, dp->major, dp->minor, dp->raid_disk);
221                 wonly = dp->state & (1<<MD_DISK_WRITEMOSTLY);
222                 dp->state &= ~(1<<MD_DISK_WRITEMOSTLY);
223                 if (dp->state & (1<<MD_DISK_FAULTY)) printf(" faulty");
224                 if (dp->state & (1<<MD_DISK_ACTIVE)) printf(" active");
225                 if (dp->state & (1<<MD_DISK_SYNC)) printf(" sync");
226                 if (dp->state & (1<<MD_DISK_REMOVED)) printf(" removed");
227                 if (wonly) printf(" write-mostly");
228                 if (dp->state == 0) printf(" spare");
229                 if ((dv=map_dev(dp->major, dp->minor, 0)))
230                         printf("   %s", dv);
231                 printf("\n");
232                 if (d == -1) printf("\n");
233         }
234 }
235
236 static void brief_examine_super0(struct supertype *st)
237 {
238         mdp_super_t *sb = st->sb;
239         char *c=map_num(pers, sb->level);
240         char devname[20];
241
242         sprintf(devname, "/dev/md%d", sb->md_minor);
243
244         printf("ARRAY %s level=%s num-devices=%d UUID=",
245                devname,
246                c?c:"-unknown-", sb->raid_disks);
247         if (sb->minor_version >= 90)
248                 printf("%08x:%08x:%08x:%08x", sb->set_uuid0, sb->set_uuid1,
249                        sb->set_uuid2, sb->set_uuid3);
250         else
251                 printf("%08x", sb->set_uuid0);
252         printf("\n");
253 }
254
255 static void export_examine_super0(struct supertype *st)
256 {
257         mdp_super_t *sb = st->sb;
258
259         printf("MD_LEVEL=%s\n", map_num(pers, sb->level));
260         printf("MD_DEVICES=%d\n", sb->raid_disks);
261         if (sb->minor_version >= 90)
262                 printf("MD_UUID=%08x:%08x:%08x:%08x\n",
263                        sb->set_uuid0, sb->set_uuid1,
264                        sb->set_uuid2, sb->set_uuid3);
265         else
266                 printf("MD_UUID=%08x\n", sb->set_uuid0);
267         printf("MD_UPDATE_TIME=%llu\n",
268                __le64_to_cpu(sb->ctime) & 0xFFFFFFFFFFULL);
269         printf("MD_EVENTS=%llu\n",
270                ((unsigned long long)sb->events_hi << 32)
271                + sb->events_lo);
272 }
273
274 static void detail_super0(struct supertype *st, char *homehost)
275 {
276         mdp_super_t *sb = st->sb;
277         printf("           UUID : ");
278         if (sb->minor_version >= 90)
279                 printf("%08x:%08x:%08x:%08x", sb->set_uuid0, sb->set_uuid1,
280                        sb->set_uuid2, sb->set_uuid3);
281         else
282                 printf("%08x", sb->set_uuid0);
283         if (homehost) {
284                 char buf[20];
285                 void *hash = sha1_buffer(homehost,
286                                          strlen(homehost),
287                                          buf);
288                 if (memcmp(&sb->set_uuid2, hash, 8)==0)
289                         printf(" (local to host %s)", homehost);
290         }
291         printf("\n         Events : %d.%d\n\n", sb->events_hi, sb->events_lo);
292 }
293
294 static void brief_detail_super0(struct supertype *st)
295 {
296         mdp_super_t *sb = st->sb;
297         printf(" UUID=");
298         if (sb->minor_version >= 90)
299                 printf("%08x:%08x:%08x:%08x", sb->set_uuid0, sb->set_uuid1,
300                        sb->set_uuid2, sb->set_uuid3);
301         else
302                 printf("%08x", sb->set_uuid0);
303 }
304
305 static void export_detail_super0(struct supertype *st)
306 {
307         mdp_super_t *sb = st->sb;
308         printf("MD_UUID=");
309         if (sb->minor_version >= 90)
310                 printf("%08x:%08x:%08x:%08x", sb->set_uuid0, sb->set_uuid1,
311                        sb->set_uuid2, sb->set_uuid3);
312         else
313                 printf("%08x", sb->set_uuid0);
314         printf("\n");
315 }
316 #endif
317
318 static int match_home0(struct supertype *st, char *homehost)
319 {
320         mdp_super_t *sb = st->sb;
321         char buf[20];
322         char *hash = sha1_buffer(homehost,
323                                  strlen(homehost),
324                                  buf);
325
326         return (memcmp(&sb->set_uuid2, hash, 8)==0);
327 }
328
329 static void uuid_from_super0(struct supertype *st, int uuid[4])
330 {
331         mdp_super_t *super = st->sb;
332         uuid[0] = super->set_uuid0;
333         if (super->minor_version >= 90) {
334                 uuid[1] = super->set_uuid1;
335                 uuid[2] = super->set_uuid2;
336                 uuid[3] = super->set_uuid3;
337         } else {
338                 uuid[1] = 0;
339                 uuid[2] = 0;
340                 uuid[3] = 0;
341         }
342 }
343
344 static void getinfo_super0(struct supertype *st, struct mdinfo *info)
345 {
346         mdp_super_t *sb = st->sb;
347         int working = 0;
348         int i;
349
350         info->array.major_version = sb->major_version;
351         info->array.minor_version = sb->minor_version;
352         info->array.patch_version = sb->patch_version;
353         info->array.raid_disks = sb->raid_disks;
354         info->array.level = sb->level;
355         info->array.layout = sb->layout;
356         info->array.md_minor = sb->md_minor;
357         info->array.ctime = sb->ctime;
358         info->array.utime = sb->utime;
359         info->array.chunk_size = sb->chunk_size;
360         info->array.state = sb->state;
361         info->component_size = sb->size*2;
362
363         info->disk.state = sb->this_disk.state;
364         info->disk.major = sb->this_disk.major;
365         info->disk.minor = sb->this_disk.minor;
366         info->disk.raid_disk = sb->this_disk.raid_disk;
367         info->disk.number = sb->this_disk.number;
368
369         info->events = md_event(sb);
370         info->data_offset = 0;
371
372         uuid_from_super0(st, info->uuid);
373
374         if (sb->minor_version > 90 && (sb->reshape_position+1) != 0) {
375                 info->reshape_active = 1;
376                 info->reshape_progress = sb->reshape_position;
377                 info->new_level = sb->new_level;
378                 info->delta_disks = sb->delta_disks;
379                 info->new_layout = sb->new_layout;
380                 info->new_chunk = sb->new_chunk;
381         } else
382                 info->reshape_active = 0;
383
384         sprintf(info->name, "%d", sb->md_minor);
385         /* work_disks is calculated rather than read directly */
386         for (i=0; i < MD_SB_DISKS; i++)
387                 if ((sb->disks[i].state & (1<<MD_DISK_SYNC)) &&
388                     (sb->disks[i].raid_disk < info->array.raid_disks) &&
389                     (sb->disks[i].state & (1<<MD_DISK_ACTIVE)) &&
390                     !(sb->disks[i].state & (1<<MD_DISK_FAULTY)))
391                         working ++;
392         info->array.working_disks = working;
393 }
394
395
396 static int update_super0(struct supertype *st, struct mdinfo *info,
397                          char *update,
398                          char *devname, int verbose,
399                          int uuid_set, char *homehost)
400 {
401         /* NOTE: for 'assemble' and 'force' we need to return non-zero if any change was made.
402          * For others, the return value is ignored.
403          */
404         int rv = 0;
405         mdp_super_t *sb = st->sb;
406         if (strcmp(update, "sparc2.2")==0 ) {
407                 /* 2.2 sparc put the events in the wrong place
408                  * So we copy the tail of the superblock
409                  * up 4 bytes before continuing
410                  */
411                 __u32 *sb32 = (__u32*)sb;
412                 memcpy(sb32+MD_SB_GENERIC_CONSTANT_WORDS+7,
413                        sb32+MD_SB_GENERIC_CONSTANT_WORDS+7+1,
414                        (MD_SB_WORDS - (MD_SB_GENERIC_CONSTANT_WORDS+7+1))*4);
415                 if (verbose >= 0)
416                         fprintf (stderr, Name ": adjusting superblock of %s for 2.2/sparc compatability.\n",
417                                  devname);
418         }
419         if (strcmp(update, "super-minor") ==0) {
420                 sb->md_minor = info->array.md_minor;
421                 if (verbose > 0)
422                         fprintf(stderr, Name ": updating superblock of %s with minor number %d\n",
423                                 devname, info->array.md_minor);
424         }
425         if (strcmp(update, "summaries") == 0) {
426                 int i;
427                 /* set nr_disks, active_disks, working_disks,
428                  * failed_disks, spare_disks based on disks[]
429                  * array in superblock.
430                  * Also make sure extra slots aren't 'failed'
431                  */
432                 sb->nr_disks = sb->active_disks =
433                         sb->working_disks = sb->failed_disks =
434                         sb->spare_disks = 0;
435                 for (i=0; i < MD_SB_DISKS ; i++)
436                         if (sb->disks[i].major ||
437                             sb->disks[i].minor) {
438                                 int state = sb->disks[i].state;
439                                 if (state & (1<<MD_DISK_REMOVED))
440                                         continue;
441                                 sb->nr_disks++;
442                                 if (state & (1<<MD_DISK_ACTIVE))
443                                         sb->active_disks++;
444                                 if (state & (1<<MD_DISK_FAULTY))
445                                         sb->failed_disks++;
446                                 else
447                                         sb->working_disks++;
448                                 if (state == 0)
449                                         sb->spare_disks++;
450                         } else if (i >= sb->raid_disks && sb->disks[i].number == 0)
451                                 sb->disks[i].state = 0;
452         }
453         if (strcmp(update, "force-one")==0) {
454                 /* Not enough devices for a working array, so
455                  * bring this one up-to-date.
456                  */
457                 __u32 ehi = sb->events_hi, elo = sb->events_lo;
458                 sb->events_hi = (info->events>>32) & 0xFFFFFFFF;
459                 sb->events_lo = (info->events) & 0xFFFFFFFF;
460                 if (sb->events_hi != ehi ||
461                     sb->events_lo != elo)
462                         rv = 1;
463         }
464         if (strcmp(update, "force-array")==0) {
465                 /* degraded array and 'force' requested, so
466                  * maybe need to mark it 'clean'
467                  */
468                 if ((sb->level == 5 || sb->level == 4 || sb->level == 6) &&
469                     (sb->state & (1 << MD_SB_CLEAN)) == 0) {
470                         /* need to force clean */
471                         sb->state |= (1 << MD_SB_CLEAN);
472                         rv = 1;
473                 }
474         }
475         if (strcmp(update, "assemble")==0) {
476                 int d = info->disk.number;
477                 int wonly = sb->disks[d].state & (1<<MD_DISK_WRITEMOSTLY);
478                 if ((sb->disks[d].state & ~(1<<MD_DISK_WRITEMOSTLY))
479                     != info->disk.state) {
480                         sb->disks[d].state = info->disk.state | wonly;
481                         rv = 1;
482                 }
483         }
484         if (strcmp(update, "linear-grow-new") == 0) {
485                 memset(&sb->disks[info->disk.number], 0, sizeof(sb->disks[0]));
486                 sb->disks[info->disk.number].number = info->disk.number;
487                 sb->disks[info->disk.number].major = info->disk.major;
488                 sb->disks[info->disk.number].minor = info->disk.minor;
489                 sb->disks[info->disk.number].raid_disk = info->disk.raid_disk;
490                 sb->disks[info->disk.number].state = info->disk.state;
491                 sb->this_disk = sb->disks[info->disk.number];
492         }
493         if (strcmp(update, "linear-grow-update") == 0) {
494                 sb->raid_disks = info->array.raid_disks;
495                 sb->nr_disks = info->array.nr_disks;
496                 sb->active_disks = info->array.active_disks;
497                 sb->working_disks = info->array.working_disks;
498                 memset(&sb->disks[info->disk.number], 0, sizeof(sb->disks[0]));
499                 sb->disks[info->disk.number].number = info->disk.number;
500                 sb->disks[info->disk.number].major = info->disk.major;
501                 sb->disks[info->disk.number].minor = info->disk.minor;
502                 sb->disks[info->disk.number].raid_disk = info->disk.raid_disk;
503                 sb->disks[info->disk.number].state = info->disk.state;
504         }
505         if (strcmp(update, "resync") == 0) {
506                 /* make sure resync happens */
507                 sb->state &= ~(1<<MD_SB_CLEAN);
508                 sb->recovery_cp = 0;
509         }
510         if (strcmp(update, "homehost") == 0 &&
511             homehost) {
512                 uuid_set = 0;
513                 update = "uuid";
514                 info->uuid[0] = sb->set_uuid0;
515                 info->uuid[1] = sb->set_uuid1;
516         }
517         if (strcmp(update, "uuid") == 0) {
518                 if (!uuid_set && homehost) {
519                         char buf[20];
520                         char *hash = sha1_buffer(homehost,
521                                                  strlen(homehost),
522                                                  buf);
523                         memcpy(info->uuid+2, hash, 8);
524                 }
525                 sb->set_uuid0 = info->uuid[0];
526                 sb->set_uuid1 = info->uuid[1];
527                 sb->set_uuid2 = info->uuid[2];
528                 sb->set_uuid3 = info->uuid[3];
529                 if (sb->state & (1<<MD_SB_BITMAP_PRESENT)) {
530                         struct bitmap_super_s *bm;
531                         bm = (struct bitmap_super_s*)(sb+1);
532                         uuid_from_super0(st, (int*)bm->uuid);
533                 }
534         }
535         if (strcmp(update, "_reshape_progress")==0)
536                 sb->reshape_position = info->reshape_progress;
537
538         sb->sb_csum = calc_sb0_csum(sb);
539         return rv;
540 }
541
542 /*
543  * For verion-0 superblock, the homehost is 'stored' in the
544  * uuid.  8 bytes for a hash of the host leaving 8 bytes
545  * of random material.
546  * We use the first 8 bytes (64bits) of the sha1 of the
547  * host name
548  */
549
550
551 static int init_super0(struct supertype *st, mdu_array_info_t *info,
552                        unsigned long long size, char *ignored_name, char *homehost,
553                        int *uuid)
554 {
555         mdp_super_t *sb = malloc(MD_SB_BYTES + sizeof(bitmap_super_t));
556         int spares;
557         memset(sb, 0, MD_SB_BYTES + sizeof(bitmap_super_t));
558
559         st->sb = sb;
560         if (info->major_version == -1) {
561                 /* zeroing the superblock */
562                 return 0;
563         }
564
565         spares = info->working_disks - info->active_disks;
566         if (info->raid_disks + spares  > MD_SB_DISKS) {
567                 fprintf(stderr, Name ": too many devices requested: %d+%d > %d\n",
568                         info->raid_disks , spares, MD_SB_DISKS);
569                 return 0;
570         }
571
572         sb->md_magic = MD_SB_MAGIC;
573         sb->major_version = 0;
574         sb->minor_version = 90;
575         sb->patch_version = 0;
576         sb->gvalid_words = 0; /* ignored */
577         sb->ctime = time(0);
578         sb->level = info->level;
579         if (size != info->size)
580                 return 0;
581         sb->size = info->size;
582         sb->nr_disks = info->nr_disks;
583         sb->raid_disks = info->raid_disks;
584         sb->md_minor = info->md_minor;
585         sb->not_persistent = 0;
586         if (uuid) {
587                 sb->set_uuid0 = uuid[0];
588                 sb->set_uuid1 = uuid[1];
589                 sb->set_uuid2 = uuid[2];
590                 sb->set_uuid3 = uuid[3];
591         } else {
592                 int rfd = open("/dev/urandom", O_RDONLY);
593                 if (rfd < 0 || read(rfd, &sb->set_uuid0, 4) != 4)
594                         sb->set_uuid0 = random();
595                 if (rfd < 0 || read(rfd, &sb->set_uuid1, 12) != 12) {
596                         sb->set_uuid1 = random();
597                         sb->set_uuid2 = random();
598                         sb->set_uuid3 = random();
599                 }
600                 if (rfd >= 0)
601                         close(rfd);
602         }
603         if (homehost) {
604                 char buf[20];
605                 char *hash = sha1_buffer(homehost,
606                                          strlen(homehost),
607                                          buf);
608                 memcpy(&sb->set_uuid2, hash, 8);
609         }
610
611         sb->utime = sb->ctime;
612         sb->state = info->state;
613         sb->active_disks = info->active_disks;
614         sb->working_disks = info->working_disks;
615         sb->failed_disks = info->failed_disks;
616         sb->spare_disks = info->spare_disks;
617         sb->events_hi = 0;
618         sb->events_lo = 1;
619
620         sb->layout = info->layout;
621         sb->chunk_size = info->chunk_size;
622
623         return 1;
624 }
625
626 /* Add a device to the superblock being created */
627 static void add_to_super0(struct supertype *st, mdu_disk_info_t *dinfo)
628 {
629         mdp_super_t *sb = st->sb;
630         mdp_disk_t *dk = &sb->disks[dinfo->number];
631
632         dk->number = dinfo->number;
633         dk->major = dinfo->major;
634         dk->minor = dinfo->minor;
635         dk->raid_disk = dinfo->raid_disk;
636         dk->state = dinfo->state;
637 }
638
639 static int store_super0(struct supertype *st, int fd)
640 {
641         unsigned long long dsize;
642         unsigned long long offset;
643         mdp_super_t *super = st->sb;
644
645         if (!get_dev_size(fd, NULL, &dsize))
646                 return 1;
647
648         if (dsize < MD_RESERVED_SECTORS*512)
649                 return 2;
650
651         offset = MD_NEW_SIZE_SECTORS(dsize>>9);
652
653         offset *= 512;
654
655         if (lseek64(fd, offset, 0)< 0LL)
656                 return 3;
657
658         if (write(fd, super, sizeof(*super)) != sizeof(*super))
659                 return 4;
660
661         if (super->state & (1<<MD_SB_BITMAP_PRESENT)) {
662                 struct bitmap_super_s * bm = (struct bitmap_super_s*)(super+1);
663                 if (__le32_to_cpu(bm->magic) == BITMAP_MAGIC)
664                         if (write(fd, bm, sizeof(*bm)) != sizeof(*bm))
665                             return 5;
666         }
667
668         fsync(fd);
669         return 0;
670 }
671
672 static int write_init_super0(struct supertype *st,
673                              mdu_disk_info_t *dinfo, char *devname)
674 {
675         mdp_super_t *sb = st->sb;
676         int fd = open(devname, O_RDWR|O_EXCL);
677         int rv;
678
679         if (fd < 0) {
680                 fprintf(stderr, Name ": Failed to open %s to write superblock\n", devname);
681                 return -1;
682         }
683
684         sb->disks[dinfo->number].state &= ~(1<<MD_DISK_FAULTY);
685
686         sb->this_disk = sb->disks[dinfo->number];
687         sb->sb_csum = calc_sb0_csum(sb);
688         rv = store_super0(st, fd);
689
690         if (rv == 0 && (sb->state & (1<<MD_SB_BITMAP_PRESENT)))
691                 rv = st->ss->write_bitmap(st, fd);
692
693         close(fd);
694         if (rv)
695                 fprintf(stderr, Name ": failed to write superblock to %s\n", devname);
696         return rv;
697 }
698
699 static int compare_super0(struct supertype *st, struct supertype *tst)
700 {
701         /*
702          * return:
703          *  0 same, or first was empty, and second was copied
704          *  1 second had wrong number
705          *  2 wrong uuid
706          *  3 wrong other info
707          */
708         mdp_super_t *first = st->sb;
709         mdp_super_t *second = tst->sb;
710         int uuid1[4], uuid2[4];
711
712         if (second->md_magic != MD_SB_MAGIC)
713                 return 1;
714         if (!first) {
715                 first = malloc(MD_SB_BYTES + sizeof(struct bitmap_super_s));
716                 memcpy(first, second, MD_SB_BYTES + sizeof(struct bitmap_super_s));
717                 st->sb = first;
718                 return 0;
719         }
720
721         uuid_from_super0(st, uuid1);
722         uuid_from_super0(tst, uuid2);
723         if (!same_uuid(uuid1, uuid2, 0))
724                 return 2;
725         if (first->major_version != second->major_version ||
726             first->minor_version != second->minor_version ||
727             first->patch_version != second->patch_version ||
728             first->gvalid_words  != second->gvalid_words  ||
729             first->ctime         != second->ctime         ||
730             first->level         != second->level         ||
731             first->size          != second->size          ||
732             first->raid_disks    != second->raid_disks    )
733                 return 3;
734
735         return 0;
736 }
737
738
739 static void free_super0(struct supertype *st);
740
741 static int load_super0(struct supertype *st, int fd, char *devname)
742 {
743         /* try to read in the superblock
744          * Return:
745          *  0 on success
746          *  1 on cannot get superblock
747          *  2 on superblock meaningless
748          */
749         unsigned long long dsize;
750         unsigned long long offset;
751         mdp_super_t *super;
752         int uuid[4];
753         struct bitmap_super_s *bsb;
754
755         free_super0(st);
756
757         if (!get_dev_size(fd, devname, &dsize))
758                 return 1;
759
760         if (dsize < MD_RESERVED_SECTORS*512) {
761                 if (devname)
762                         fprintf(stderr, Name
763                             ": %s is too small for md: size is %llu sectors.\n",
764                                 devname, dsize);
765                 return 1;
766         }
767
768         offset = MD_NEW_SIZE_SECTORS(dsize>>9);
769
770         offset *= 512;
771
772         ioctl(fd, BLKFLSBUF, 0); /* make sure we read current data */
773
774         if (lseek64(fd, offset, 0)< 0LL) {
775                 if (devname)
776                         fprintf(stderr, Name ": Cannot seek to superblock on %s: %s\n",
777                                 devname, strerror(errno));
778                 return 1;
779         }
780
781         super = malloc(MD_SB_BYTES + sizeof(bitmap_super_t));
782
783         if (read(fd, super, sizeof(*super)) != MD_SB_BYTES) {
784                 if (devname)
785                         fprintf(stderr, Name ": Cannot read superblock on %s\n",
786                                 devname);
787                 free(super);
788                 return 1;
789         }
790
791         if (st->ss && st->minor_version == 9)
792                 super0_swap_endian(super);
793
794         if (super->md_magic != MD_SB_MAGIC) {
795                 if (devname)
796                         fprintf(stderr, Name ": No super block found on %s (Expected magic %08x, got %08x)\n",
797                                 devname, MD_SB_MAGIC, super->md_magic);
798                 free(super);
799                 return 2;
800         }
801
802         if (super->major_version != 0) {
803                 if (devname)
804                         fprintf(stderr, Name ": Cannot interpret superblock on %s - version is %d\n",
805                                 devname, super->major_version);
806                 free(super);
807                 return 2;
808         }
809         st->sb = super;
810
811         if (st->ss == NULL) {
812                 st->ss = &super0;
813                 st->minor_version = super->minor_version;
814                 st->max_devs = MD_SB_DISKS;
815         }
816
817         /* Now check on the bitmap superblock */
818         if ((super->state & (1<<MD_SB_BITMAP_PRESENT)) == 0)
819                 return 0;
820         /* Read the bitmap superblock and make sure it looks
821          * valid.  If it doesn't clear the bit.  An --assemble --force
822          * should get that written out.
823          */
824         if (read(fd, super+1, sizeof(struct bitmap_super_s))
825             != sizeof(struct bitmap_super_s))
826                 goto no_bitmap;
827
828         uuid_from_super0(st, uuid);
829         bsb = (struct bitmap_super_s *)(super+1);
830         if (__le32_to_cpu(bsb->magic) != BITMAP_MAGIC ||
831             memcmp(bsb->uuid, uuid, 16) != 0)
832                 goto no_bitmap;
833         return 0;
834
835  no_bitmap:
836         super->state &= ~(1<<MD_SB_BITMAP_PRESENT);
837
838         return 0;
839 }
840
841 static struct supertype *match_metadata_desc0(char *arg)
842 {
843         struct supertype *st = malloc(sizeof(*st));
844         if (!st) return st;
845
846         st->ss = &super0;
847         st->minor_version = 90;
848         st->max_devs = MD_SB_DISKS;
849         st->sb = NULL;
850         if (strcmp(arg, "0") == 0 ||
851             strcmp(arg, "0.90") == 0 ||
852             strcmp(arg, "0.91") == 0 ||
853             strcmp(arg, "default") == 0 ||
854             strcmp(arg, "") == 0 /* no metadata */
855                 )
856                 return st;
857
858         st->minor_version = 9; /* flag for 'byte-swapped' */
859         if (strcmp(arg, "0.swap")==0 ||
860             strcmp(arg, "0.9") == 0) /* For dup_super support */
861                 return st;
862
863         free(st);
864         return NULL;
865 }
866
867 static __u64 avail_size0(struct supertype *st, __u64 devsize)
868 {
869         if (devsize < MD_RESERVED_SECTORS)
870                 return 0ULL;
871         return MD_NEW_SIZE_SECTORS(devsize);
872 }
873
874 static int add_internal_bitmap0(struct supertype *st, int *chunkp,
875                                 int delay, int write_behind,
876                                 unsigned long long size, int may_change,
877                                 int major)
878 {
879         /*
880          * The bitmap comes immediately after the superblock and must be 60K in size
881          * at most.  The default size is between 30K and 60K
882          *
883          * size is in sectors,  chunk is in bytes !!!
884          */
885         unsigned long long bits;
886         unsigned long long max_bits = 60*1024*8;
887         unsigned long long min_chunk;
888         int chunk = *chunkp;
889         mdp_super_t *sb = st->sb;
890         bitmap_super_t *bms = (bitmap_super_t*)(((char*)sb) + MD_SB_BYTES);
891
892
893         min_chunk = 4096; /* sub-page chunks don't work yet.. */
894         bits = (size * 512) / min_chunk + 1;
895         while (bits > max_bits) {
896                 min_chunk *= 2;
897                 bits = (bits+1)/2;
898         }
899         if (chunk == UnSet)
900                 chunk = min_chunk;
901         else if (chunk < min_chunk)
902                 return 0; /* chunk size too small */
903
904         sb->state |= (1<<MD_SB_BITMAP_PRESENT);
905
906         memset(bms, 0, sizeof(*bms));
907         bms->magic = __cpu_to_le32(BITMAP_MAGIC);
908         bms->version = __cpu_to_le32(major);
909         uuid_from_super0(st, (int*)bms->uuid);
910         bms->chunksize = __cpu_to_le32(chunk);
911         bms->daemon_sleep = __cpu_to_le32(delay);
912         bms->sync_size = __cpu_to_le64(size);
913         bms->write_behind = __cpu_to_le32(write_behind);
914         *chunkp = chunk;
915         return 1;
916 }
917
918
919 void locate_bitmap0(struct supertype *st, int fd)
920 {
921         unsigned long long dsize;
922         unsigned long long offset;
923
924         if (!get_dev_size(fd, NULL, &dsize))
925                 return;
926
927         if (dsize < MD_RESERVED_SECTORS*512)
928                 return;
929
930         offset = MD_NEW_SIZE_SECTORS(dsize>>9);
931
932         offset *= 512;
933
934         offset += MD_SB_BYTES;
935
936         lseek64(fd, offset, 0);
937 }
938
939 int write_bitmap0(struct supertype *st, int fd)
940 {
941         unsigned long long dsize;
942         unsigned long long offset;
943         mdp_super_t *sb = st->sb;
944
945         int rv = 0;
946
947         int towrite, n;
948         char buf[4096];
949
950         if (!get_dev_size(fd, NULL, &dsize))
951                 return 1;
952
953
954         if (dsize < MD_RESERVED_SECTORS*512)
955                 return -1;
956
957         offset = MD_NEW_SIZE_SECTORS(dsize>>9);
958
959         offset *= 512;
960
961         if (lseek64(fd, offset + 4096, 0)< 0LL)
962                 return 3;
963
964
965         if (write(fd, ((char*)sb)+MD_SB_BYTES, sizeof(bitmap_super_t)) !=
966             sizeof(bitmap_super_t))
967                 return -2;
968         towrite = 64*1024 - MD_SB_BYTES - sizeof(bitmap_super_t);
969         memset(buf, 0xff, sizeof(buf));
970         while (towrite > 0) {
971                 n = towrite;
972                 if (n > sizeof(buf))
973                         n = sizeof(buf);
974                 n = write(fd, buf, n);
975                 if (n > 0)
976                         towrite -= n;
977                 else
978                         break;
979         }
980         fsync(fd);
981         if (towrite)
982                 rv = -2;
983
984         return rv;
985 }
986
987 static void free_super0(struct supertype *st)
988 {
989         if (st->sb)
990                 free(st->sb);
991         st->sb = NULL;
992 }
993
994 static int validate_geometry0(struct supertype *st, int level,
995                               int layout, int raiddisks,
996                               int chunk, unsigned long long size,
997                               char *subdev, unsigned long long *freesize)
998 {
999         unsigned long long ldsize;
1000         int fd;
1001
1002         if (level == LEVEL_CONTAINER)
1003                 return 0;
1004         if (raiddisks > MD_SB_DISKS)
1005                 return 0;
1006         if (size > (0x7fffffffULL<<10))
1007                 return 0;
1008         if (!subdev)
1009                 return 1;
1010
1011         fd = open(subdev, O_RDONLY|O_EXCL, 0);
1012         if (fd < 0) {
1013                 fprintf(stderr, Name ": Cannot open %s: %s\n",
1014                         subdev, strerror(errno));
1015                 return 0;
1016         }
1017         if (!get_dev_size(fd, subdev, &ldsize)) {
1018                 close(fd);
1019                 return 0;
1020         }
1021         close(fd);
1022
1023         if (ldsize < MD_RESERVED_SECTORS * 512)
1024                 return 0;
1025         if (size > (0x7fffffffULL<<10))
1026                 return 0;
1027         *freesize = MD_NEW_SIZE_SECTORS(ldsize >> 9);
1028         return 1;
1029 }
1030
1031 struct superswitch super0 = {
1032 #ifndef MDASSEMBLE
1033         .examine_super = examine_super0,
1034         .brief_examine_super = brief_examine_super0,
1035         .export_examine_super = export_examine_super0,
1036         .detail_super = detail_super0,
1037         .brief_detail_super = brief_detail_super0,
1038         .export_detail_super = export_detail_super0,
1039 #endif
1040         .match_home = match_home0,
1041         .uuid_from_super = uuid_from_super0,
1042         .getinfo_super = getinfo_super0,
1043         .update_super = update_super0,
1044         .init_super = init_super0,
1045         .add_to_super = add_to_super0,
1046         .store_super = store_super0,
1047         .write_init_super = write_init_super0,
1048         .compare_super = compare_super0,
1049         .load_super = load_super0,
1050         .match_metadata_desc = match_metadata_desc0,
1051         .avail_size = avail_size0,
1052         .add_internal_bitmap = add_internal_bitmap0,
1053         .locate_bitmap = locate_bitmap0,
1054         .write_bitmap = write_bitmap0,
1055         .free_super = free_super0,
1056         .validate_geometry = validate_geometry0,
1057         .major = 0,
1058         .swapuuid = 0,
1059 };