Whamcloud - gitweb
mke2fs: fix mke2fs "invalid inode ratio" error message
[tools/e2fsprogs.git] / misc / mke2fs.c
1 /*
2  * mke2fs.c - Make a ext2fs filesystem.
3  *
4  * Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002,
5  *      2003, 2004, 2005 by Theodore Ts'o.
6  *
7  * %Begin-Header%
8  * This file may be redistributed under the terms of the GNU Public
9  * License.
10  * %End-Header%
11  */
12
13 /* Usage: mke2fs [options] device
14  *
15  * The device may be a block device or a image of one, but this isn't
16  * enforced (but it's not much fun on a character device :-).
17  */
18
19 #define _XOPEN_SOURCE 600 /* for inclusion of PATH_MAX in Solaris */
20
21 #include <stdio.h>
22 #include <string.h>
23 #include <strings.h>
24 #include <fcntl.h>
25 #include <ctype.h>
26 #include <time.h>
27 #ifdef __linux__
28 #include <sys/utsname.h>
29 #endif
30 #ifdef HAVE_GETOPT_H
31 #include <getopt.h>
32 #else
33 extern char *optarg;
34 extern int optind;
35 #endif
36 #ifdef HAVE_UNISTD_H
37 #include <unistd.h>
38 #endif
39 #ifdef HAVE_STDLIB_H
40 #include <stdlib.h>
41 #endif
42 #ifdef HAVE_ERRNO_H
43 #include <errno.h>
44 #endif
45 #ifdef HAVE_MNTENT_H
46 #include <mntent.h>
47 #endif
48 #include <sys/ioctl.h>
49 #include <sys/types.h>
50 #include <sys/stat.h>
51 #include <libgen.h>
52 #include <limits.h>
53 #include <blkid/blkid.h>
54
55 #include "ext2fs/ext2_fs.h"
56 #include "et/com_err.h"
57 #include "uuid/uuid.h"
58 #include "e2p/e2p.h"
59 #include "ext2fs/ext2fs.h"
60 #include "util.h"
61 #include "profile.h"
62 #include "prof_err.h"
63 #include "../version.h"
64 #include "nls-enable.h"
65
66 #define STRIDE_LENGTH 8
67
68 #ifndef __sparc__
69 #define ZAP_BOOTBLOCK
70 #endif
71
72 extern int isatty(int);
73 extern FILE *fpopen(const char *cmd, const char *mode);
74
75 const char * program_name = "mke2fs";
76 const char * device_name /* = NULL */;
77
78 /* Command line options */
79 int     cflag;
80 int     verbose;
81 int     quiet;
82 int     super_only;
83 int     discard = 1;
84 int     force;
85 int     noaction;
86 int     journal_size;
87 int     journal_flags;
88 int     lazy_itable_init;
89 char    *bad_blocks_filename;
90 __u32   fs_stride;
91
92 struct ext2_super_block fs_param;
93 char *fs_uuid = NULL;
94 char *creator_os;
95 char *volume_label;
96 char *mount_dir;
97 char *journal_device;
98 int sync_kludge;        /* Set using the MKE2FS_SYNC env. option */
99 char **fs_types;
100
101 profile_t       profile;
102
103 int sys_page_size = 4096;
104 int linux_version_code = 0;
105
106 static void usage(void)
107 {
108         fprintf(stderr, _("Usage: %s [-c|-l filename] [-b block-size] "
109         "[-f fragment-size]\n\t[-i bytes-per-inode] [-I inode-size] "
110         "[-J journal-options]\n"
111         "\t[-G meta group size] [-N number-of-inodes]\n"
112         "\t[-m reserved-blocks-percentage] [-o creator-os]\n"
113         "\t[-g blocks-per-group] [-L volume-label] "
114         "[-M last-mounted-directory]\n\t[-O feature[,...]] "
115         "[-r fs-revision] [-E extended-option[,...]]\n"
116         "\t[-T fs-type] [-U UUID] [-jnqvFKSV] device [blocks-count]\n"),
117                 program_name);
118         exit(1);
119 }
120
121 static int int_log2(int arg)
122 {
123         int     l = 0;
124
125         arg >>= 1;
126         while (arg) {
127                 l++;
128                 arg >>= 1;
129         }
130         return l;
131 }
132
133 static int int_log10(unsigned int arg)
134 {
135         int     l;
136
137         for (l=0; arg ; l++)
138                 arg = arg / 10;
139         return l;
140 }
141
142 static int parse_version_number(const char *s)
143 {
144         int     major, minor, rev;
145         char    *endptr;
146         const char *cp = s;
147
148         if (!s)
149                 return 0;
150         major = strtol(cp, &endptr, 10);
151         if (cp == endptr || *endptr != '.')
152                 return 0;
153         cp = endptr + 1;
154         minor = strtol(cp, &endptr, 10);
155         if (cp == endptr || *endptr != '.')
156                 return 0;
157         cp = endptr + 1;
158         rev = strtol(cp, &endptr, 10);
159         if (cp == endptr)
160                 return 0;
161         return ((((major * 256) + minor) * 256) + rev);
162 }
163
164 /*
165  * Helper function for read_bb_file and test_disk
166  */
167 static void invalid_block(ext2_filsys fs EXT2FS_ATTR((unused)), blk_t blk)
168 {
169         fprintf(stderr, _("Bad block %u out of range; ignored.\n"), blk);
170         return;
171 }
172
173 /*
174  * Reads the bad blocks list from a file
175  */
176 static void read_bb_file(ext2_filsys fs, badblocks_list *bb_list,
177                          const char *bad_blocks_file)
178 {
179         FILE            *f;
180         errcode_t       retval;
181
182         f = fopen(bad_blocks_file, "r");
183         if (!f) {
184                 com_err("read_bad_blocks_file", errno,
185                         _("while trying to open %s"), bad_blocks_file);
186                 exit(1);
187         }
188         retval = ext2fs_read_bb_FILE(fs, f, bb_list, invalid_block);
189         fclose (f);
190         if (retval) {
191                 com_err("ext2fs_read_bb_FILE", retval,
192                         _("while reading in list of bad blocks from file"));
193                 exit(1);
194         }
195 }
196
197 /*
198  * Runs the badblocks program to test the disk
199  */
200 static void test_disk(ext2_filsys fs, badblocks_list *bb_list)
201 {
202         FILE            *f;
203         errcode_t       retval;
204         char            buf[1024];
205
206         sprintf(buf, "badblocks -b %d -X %s%s%s %u", fs->blocksize,
207                 quiet ? "" : "-s ", (cflag > 1) ? "-w " : "",
208                 fs->device_name, fs->super->s_blocks_count-1);
209         if (verbose)
210                 printf(_("Running command: %s\n"), buf);
211         f = popen(buf, "r");
212         if (!f) {
213                 com_err("popen", errno,
214                         _("while trying to run '%s'"), buf);
215                 exit(1);
216         }
217         retval = ext2fs_read_bb_FILE(fs, f, bb_list, invalid_block);
218         pclose(f);
219         if (retval) {
220                 com_err("ext2fs_read_bb_FILE", retval,
221                         _("while processing list of bad blocks from program"));
222                 exit(1);
223         }
224 }
225
226 static void handle_bad_blocks(ext2_filsys fs, badblocks_list bb_list)
227 {
228         dgrp_t                  i;
229         blk_t                   j;
230         unsigned                must_be_good;
231         blk_t                   blk;
232         badblocks_iterate       bb_iter;
233         errcode_t               retval;
234         blk_t                   group_block;
235         int                     group;
236         int                     group_bad;
237
238         if (!bb_list)
239                 return;
240
241         /*
242          * The primary superblock and group descriptors *must* be
243          * good; if not, abort.
244          */
245         must_be_good = fs->super->s_first_data_block + 1 + fs->desc_blocks;
246         for (i = fs->super->s_first_data_block; i <= must_be_good; i++) {
247                 if (ext2fs_badblocks_list_test(bb_list, i)) {
248                         fprintf(stderr, _("Block %d in primary "
249                                 "superblock/group descriptor area bad.\n"), i);
250                         fprintf(stderr, _("Blocks %u through %u must be good "
251                                 "in order to build a filesystem.\n"),
252                                 fs->super->s_first_data_block, must_be_good);
253                         fputs(_("Aborting....\n"), stderr);
254                         exit(1);
255                 }
256         }
257
258         /*
259          * See if any of the bad blocks are showing up in the backup
260          * superblocks and/or group descriptors.  If so, issue a
261          * warning and adjust the block counts appropriately.
262          */
263         group_block = fs->super->s_first_data_block +
264                 fs->super->s_blocks_per_group;
265
266         for (i = 1; i < fs->group_desc_count; i++) {
267                 group_bad = 0;
268                 for (j=0; j < fs->desc_blocks+1; j++) {
269                         if (ext2fs_badblocks_list_test(bb_list,
270                                                        group_block + j)) {
271                                 if (!group_bad)
272                                         fprintf(stderr,
273 _("Warning: the backup superblock/group descriptors at block %u contain\n"
274 "       bad blocks.\n\n"),
275                                                 group_block);
276                                 group_bad++;
277                                 group = ext2fs_group_of_blk(fs, group_block+j);
278                                 fs->group_desc[group].bg_free_blocks_count++;
279                                 ext2fs_group_desc_csum_set(fs, group);
280                                 fs->super->s_free_blocks_count++;
281                         }
282                 }
283                 group_block += fs->super->s_blocks_per_group;
284         }
285
286         /*
287          * Mark all the bad blocks as used...
288          */
289         retval = ext2fs_badblocks_list_iterate_begin(bb_list, &bb_iter);
290         if (retval) {
291                 com_err("ext2fs_badblocks_list_iterate_begin", retval,
292                         _("while marking bad blocks as used"));
293                 exit(1);
294         }
295         while (ext2fs_badblocks_list_iterate(bb_iter, &blk))
296                 ext2fs_mark_block_bitmap(fs->block_map, blk);
297         ext2fs_badblocks_list_iterate_end(bb_iter);
298 }
299
300 /*
301  * These functions implement a generalized progress meter.
302  */
303 struct progress_struct {
304         char            format[20];
305         char            backup[80];
306         __u32           max;
307         int             skip_progress;
308 };
309
310 static void progress_init(struct progress_struct *progress,
311                           const char *label,__u32 max)
312 {
313         int     i;
314
315         memset(progress, 0, sizeof(struct progress_struct));
316         if (quiet)
317                 return;
318
319         /*
320          * Figure out how many digits we need
321          */
322         i = int_log10(max);
323         sprintf(progress->format, "%%%dd/%%%dld", i, i);
324         memset(progress->backup, '\b', sizeof(progress->backup)-1);
325         progress->backup[sizeof(progress->backup)-1] = 0;
326         if ((2*i)+1 < (int) sizeof(progress->backup))
327                 progress->backup[(2*i)+1] = 0;
328         progress->max = max;
329
330         progress->skip_progress = 0;
331         if (getenv("MKE2FS_SKIP_PROGRESS"))
332                 progress->skip_progress++;
333
334         fputs(label, stdout);
335         fflush(stdout);
336 }
337
338 static void progress_update(struct progress_struct *progress, __u32 val)
339 {
340         if ((progress->format[0] == 0) || progress->skip_progress)
341                 return;
342         printf(progress->format, val, progress->max);
343         fputs(progress->backup, stdout);
344 }
345
346 static void progress_close(struct progress_struct *progress)
347 {
348         if (progress->format[0] == 0)
349                 return;
350         fputs(_("done                            \n"), stdout);
351 }
352
353 static void write_inode_tables(ext2_filsys fs, int lazy_flag)
354 {
355         errcode_t       retval;
356         blk_t           blk;
357         dgrp_t          i;
358         int             num, ipb;
359         struct progress_struct progress;
360
361         if (quiet)
362                 memset(&progress, 0, sizeof(progress));
363         else
364                 progress_init(&progress, _("Writing inode tables: "),
365                               fs->group_desc_count);
366
367         for (i = 0; i < fs->group_desc_count; i++) {
368                 progress_update(&progress, i);
369
370                 blk = fs->group_desc[i].bg_inode_table;
371                 num = fs->inode_blocks_per_group;
372
373                 if (lazy_flag) {
374                         ipb = fs->blocksize / EXT2_INODE_SIZE(fs->super);
375                         num = ((((fs->super->s_inodes_per_group -
376                                   fs->group_desc[i].bg_itable_unused) *
377                                  EXT2_INODE_SIZE(fs->super)) +
378                                 EXT2_BLOCK_SIZE(fs->super) - 1) /
379                                EXT2_BLOCK_SIZE(fs->super));
380                 } else {
381                         /* The kernel doesn't need to zero the itable blocks */
382                         fs->group_desc[i].bg_flags |= EXT2_BG_INODE_ZEROED;
383                         ext2fs_group_desc_csum_set(fs, i);
384                 }
385                 retval = ext2fs_zero_blocks(fs, blk, num, &blk, &num);
386                 if (retval) {
387                         fprintf(stderr, _("\nCould not write %d "
388                                   "blocks in inode table starting at %u: %s\n"),
389                                 num, blk, error_message(retval));
390                         exit(1);
391                 }
392                 if (sync_kludge) {
393                         if (sync_kludge == 1)
394                                 sync();
395                         else if ((i % sync_kludge) == 0)
396                                 sync();
397                 }
398         }
399         ext2fs_zero_blocks(0, 0, 0, 0, 0);
400         progress_close(&progress);
401 }
402
403 static void create_root_dir(ext2_filsys fs)
404 {
405         errcode_t               retval;
406         struct ext2_inode       inode;
407         __u32                   uid, gid;
408
409         retval = ext2fs_mkdir(fs, EXT2_ROOT_INO, EXT2_ROOT_INO, 0);
410         if (retval) {
411                 com_err("ext2fs_mkdir", retval, _("while creating root dir"));
412                 exit(1);
413         }
414         if (geteuid()) {
415                 retval = ext2fs_read_inode(fs, EXT2_ROOT_INO, &inode);
416                 if (retval) {
417                         com_err("ext2fs_read_inode", retval,
418                                 _("while reading root inode"));
419                         exit(1);
420                 }
421                 uid = getuid();
422                 inode.i_uid = uid;
423                 ext2fs_set_i_uid_high(inode, uid >> 16);
424                 if (uid) {
425                         gid = getgid();
426                         inode.i_gid = gid;
427                         ext2fs_set_i_gid_high(inode, gid >> 16);
428                 }
429                 retval = ext2fs_write_new_inode(fs, EXT2_ROOT_INO, &inode);
430                 if (retval) {
431                         com_err("ext2fs_write_inode", retval,
432                                 _("while setting root inode ownership"));
433                         exit(1);
434                 }
435         }
436 }
437
438 static void create_lost_and_found(ext2_filsys fs)
439 {
440         unsigned int            lpf_size = 0;
441         errcode_t               retval;
442         ext2_ino_t              ino;
443         const char              *name = "lost+found";
444         int                     i;
445
446         fs->umask = 077;
447         retval = ext2fs_mkdir(fs, EXT2_ROOT_INO, 0, name);
448         if (retval) {
449                 com_err("ext2fs_mkdir", retval,
450                         _("while creating /lost+found"));
451                 exit(1);
452         }
453
454         retval = ext2fs_lookup(fs, EXT2_ROOT_INO, name, strlen(name), 0, &ino);
455         if (retval) {
456                 com_err("ext2_lookup", retval,
457                         _("while looking up /lost+found"));
458                 exit(1);
459         }
460
461         for (i=1; i < EXT2_NDIR_BLOCKS; i++) {
462                 /* Ensure that lost+found is at least 2 blocks, so we always
463                  * test large empty blocks for big-block filesystems.  */
464                 if ((lpf_size += fs->blocksize) >= 16*1024 &&
465                     lpf_size >= 2 * fs->blocksize)
466                         break;
467                 retval = ext2fs_expand_dir(fs, ino);
468                 if (retval) {
469                         com_err("ext2fs_expand_dir", retval,
470                                 _("while expanding /lost+found"));
471                         exit(1);
472                 }
473         }
474 }
475
476 static void create_bad_block_inode(ext2_filsys fs, badblocks_list bb_list)
477 {
478         errcode_t       retval;
479
480         ext2fs_mark_inode_bitmap(fs->inode_map, EXT2_BAD_INO);
481         ext2fs_inode_alloc_stats2(fs, EXT2_BAD_INO, +1, 0);
482         retval = ext2fs_update_bb_inode(fs, bb_list);
483         if (retval) {
484                 com_err("ext2fs_update_bb_inode", retval,
485                         _("while setting bad block inode"));
486                 exit(1);
487         }
488
489 }
490
491 static void reserve_inodes(ext2_filsys fs)
492 {
493         ext2_ino_t      i;
494
495         for (i = EXT2_ROOT_INO + 1; i < EXT2_FIRST_INODE(fs->super); i++)
496                 ext2fs_inode_alloc_stats2(fs, i, +1, 0);
497         ext2fs_mark_ib_dirty(fs);
498 }
499
500 #define BSD_DISKMAGIC   (0x82564557UL)  /* The disk magic number */
501 #define BSD_MAGICDISK   (0x57455682UL)  /* The disk magic number reversed */
502 #define BSD_LABEL_OFFSET        64
503
504 static void zap_sector(ext2_filsys fs, int sect, int nsect)
505 {
506         char *buf;
507         int retval;
508         unsigned int *magic;
509
510         buf = malloc(512*nsect);
511         if (!buf) {
512                 printf(_("Out of memory erasing sectors %d-%d\n"),
513                        sect, sect + nsect - 1);
514                 exit(1);
515         }
516
517         if (sect == 0) {
518                 /* Check for a BSD disklabel, and don't erase it if so */
519                 retval = io_channel_read_blk(fs->io, 0, -512, buf);
520                 if (retval)
521                         fprintf(stderr,
522                                 _("Warning: could not read block 0: %s\n"),
523                                 error_message(retval));
524                 else {
525                         magic = (unsigned int *) (buf + BSD_LABEL_OFFSET);
526                         if ((*magic == BSD_DISKMAGIC) ||
527                             (*magic == BSD_MAGICDISK))
528                                 return;
529                 }
530         }
531
532         memset(buf, 0, 512*nsect);
533         io_channel_set_blksize(fs->io, 512);
534         retval = io_channel_write_blk(fs->io, sect, -512*nsect, buf);
535         io_channel_set_blksize(fs->io, fs->blocksize);
536         free(buf);
537         if (retval)
538                 fprintf(stderr, _("Warning: could not erase sector %d: %s\n"),
539                         sect, error_message(retval));
540 }
541
542 static void create_journal_dev(ext2_filsys fs)
543 {
544         struct progress_struct progress;
545         errcode_t               retval;
546         char                    *buf;
547         blk_t                   blk, err_blk;
548         int                     c, count, err_count;
549
550         retval = ext2fs_create_journal_superblock(fs,
551                                   fs->super->s_blocks_count, 0, &buf);
552         if (retval) {
553                 com_err("create_journal_dev", retval,
554                         _("while initializing journal superblock"));
555                 exit(1);
556         }
557         if (quiet)
558                 memset(&progress, 0, sizeof(progress));
559         else
560                 progress_init(&progress, _("Zeroing journal device: "),
561                               fs->super->s_blocks_count);
562
563         blk = 0;
564         count = fs->super->s_blocks_count;
565         while (count > 0) {
566                 if (count > 1024)
567                         c = 1024;
568                 else
569                         c = count;
570                 retval = ext2fs_zero_blocks(fs, blk, c, &err_blk, &err_count);
571                 if (retval) {
572                         com_err("create_journal_dev", retval,
573                                 _("while zeroing journal device "
574                                   "(block %u, count %d)"),
575                                 err_blk, err_count);
576                         exit(1);
577                 }
578                 blk += c;
579                 count -= c;
580                 progress_update(&progress, blk);
581         }
582         ext2fs_zero_blocks(0, 0, 0, 0, 0);
583
584         retval = io_channel_write_blk(fs->io,
585                                       fs->super->s_first_data_block+1,
586                                       1, buf);
587         if (retval) {
588                 com_err("create_journal_dev", retval,
589                         _("while writing journal superblock"));
590                 exit(1);
591         }
592         progress_close(&progress);
593 }
594
595 static void show_stats(ext2_filsys fs)
596 {
597         struct ext2_super_block *s = fs->super;
598         char                    buf[80];
599         char                    *os;
600         blk_t                   group_block;
601         dgrp_t                  i;
602         int                     need, col_left;
603
604         if (fs_param.s_blocks_count != s->s_blocks_count)
605                 fprintf(stderr, _("warning: %u blocks unused.\n\n"),
606                        fs_param.s_blocks_count - s->s_blocks_count);
607
608         memset(buf, 0, sizeof(buf));
609         strncpy(buf, s->s_volume_name, sizeof(s->s_volume_name));
610         printf(_("Filesystem label=%s\n"), buf);
611         fputs(_("OS type: "), stdout);
612         os = e2p_os2string(fs->super->s_creator_os);
613         fputs(os, stdout);
614         free(os);
615         printf("\n");
616         printf(_("Block size=%u (log=%u)\n"), fs->blocksize,
617                 s->s_log_block_size);
618         printf(_("Fragment size=%u (log=%u)\n"), fs->fragsize,
619                 s->s_log_frag_size);
620         printf(_("Stride=%u blocks, Stripe width=%u blocks\n"),
621                s->s_raid_stride, s->s_raid_stripe_width);
622         printf(_("%u inodes, %u blocks\n"), s->s_inodes_count,
623                s->s_blocks_count);
624         printf(_("%u blocks (%2.2f%%) reserved for the super user\n"),
625                 s->s_r_blocks_count,
626                100.0 * s->s_r_blocks_count / s->s_blocks_count);
627         printf(_("First data block=%u\n"), s->s_first_data_block);
628         if (s->s_reserved_gdt_blocks)
629                 printf(_("Maximum filesystem blocks=%lu\n"),
630                        (s->s_reserved_gdt_blocks + fs->desc_blocks) *
631                        EXT2_DESC_PER_BLOCK(s) * s->s_blocks_per_group);
632         if (fs->group_desc_count > 1)
633                 printf(_("%u block groups\n"), fs->group_desc_count);
634         else
635                 printf(_("%u block group\n"), fs->group_desc_count);
636         printf(_("%u blocks per group, %u fragments per group\n"),
637                s->s_blocks_per_group, s->s_frags_per_group);
638         printf(_("%u inodes per group\n"), s->s_inodes_per_group);
639
640         if (fs->group_desc_count == 1) {
641                 printf("\n");
642                 return;
643         }
644
645         printf(_("Superblock backups stored on blocks: "));
646         group_block = s->s_first_data_block;
647         col_left = 0;
648         for (i = 1; i < fs->group_desc_count; i++) {
649                 group_block += s->s_blocks_per_group;
650                 if (!ext2fs_bg_has_super(fs, i))
651                         continue;
652                 if (i != 1)
653                         printf(", ");
654                 need = int_log10(group_block) + 2;
655                 if (need > col_left) {
656                         printf("\n\t");
657                         col_left = 72;
658                 }
659                 col_left -= need;
660                 printf("%u", group_block);
661         }
662         printf("\n\n");
663 }
664
665 /*
666  * Set the S_CREATOR_OS field.  Return true if OS is known,
667  * otherwise, 0.
668  */
669 static int set_os(struct ext2_super_block *sb, char *os)
670 {
671         if (isdigit (*os))
672                 sb->s_creator_os = atoi (os);
673         else if (strcasecmp(os, "linux") == 0)
674                 sb->s_creator_os = EXT2_OS_LINUX;
675         else if (strcasecmp(os, "GNU") == 0 || strcasecmp(os, "hurd") == 0)
676                 sb->s_creator_os = EXT2_OS_HURD;
677         else if (strcasecmp(os, "freebsd") == 0)
678                 sb->s_creator_os = EXT2_OS_FREEBSD;
679         else if (strcasecmp(os, "lites") == 0)
680                 sb->s_creator_os = EXT2_OS_LITES;
681         else
682                 return 0;
683         return 1;
684 }
685
686 #define PATH_SET "PATH=/sbin"
687
688 static void parse_extended_opts(struct ext2_super_block *param,
689                                 const char *opts)
690 {
691         char    *buf, *token, *next, *p, *arg, *badopt = 0;
692         int     len;
693         int     r_usage = 0;
694
695         len = strlen(opts);
696         buf = malloc(len+1);
697         if (!buf) {
698                 fprintf(stderr,
699                         _("Couldn't allocate memory to parse options!\n"));
700                 exit(1);
701         }
702         strcpy(buf, opts);
703         for (token = buf; token && *token; token = next) {
704                 p = strchr(token, ',');
705                 next = 0;
706                 if (p) {
707                         *p = 0;
708                         next = p+1;
709                 }
710                 arg = strchr(token, '=');
711                 if (arg) {
712                         *arg = 0;
713                         arg++;
714                 }
715                 if (strcmp(token, "stride") == 0) {
716                         if (!arg) {
717                                 r_usage++;
718                                 badopt = token;
719                                 continue;
720                         }
721                         param->s_raid_stride = strtoul(arg, &p, 0);
722                         if (*p || (param->s_raid_stride == 0)) {
723                                 fprintf(stderr,
724                                         _("Invalid stride parameter: %s\n"),
725                                         arg);
726                                 r_usage++;
727                                 continue;
728                         }
729                 } else if (strcmp(token, "stripe-width") == 0 ||
730                            strcmp(token, "stripe_width") == 0) {
731                         if (!arg) {
732                                 r_usage++;
733                                 badopt = token;
734                                 continue;
735                         }
736                         param->s_raid_stripe_width = strtoul(arg, &p, 0);
737                         if (*p || (param->s_raid_stripe_width == 0)) {
738                                 fprintf(stderr,
739                                         _("Invalid stripe-width parameter: %s\n"),
740                                         arg);
741                                 r_usage++;
742                                 continue;
743                         }
744                 } else if (!strcmp(token, "resize")) {
745                         unsigned long resize, bpg, rsv_groups;
746                         unsigned long group_desc_count, desc_blocks;
747                         unsigned int gdpb, blocksize;
748                         int rsv_gdb;
749
750                         if (!arg) {
751                                 r_usage++;
752                                 badopt = token;
753                                 continue;
754                         }
755
756                         resize = parse_num_blocks(arg,
757                                                   param->s_log_block_size);
758
759                         if (resize == 0) {
760                                 fprintf(stderr,
761                                         _("Invalid resize parameter: %s\n"),
762                                         arg);
763                                 r_usage++;
764                                 continue;
765                         }
766                         if (resize <= param->s_blocks_count) {
767                                 fprintf(stderr,
768                                         _("The resize maximum must be greater "
769                                           "than the filesystem size.\n"));
770                                 r_usage++;
771                                 continue;
772                         }
773
774                         blocksize = EXT2_BLOCK_SIZE(param);
775                         bpg = param->s_blocks_per_group;
776                         if (!bpg)
777                                 bpg = blocksize * 8;
778                         gdpb = EXT2_DESC_PER_BLOCK(param);
779                         group_desc_count =
780                                 ext2fs_div_ceil(param->s_blocks_count, bpg);
781                         desc_blocks = (group_desc_count +
782                                        gdpb - 1) / gdpb;
783                         rsv_groups = ext2fs_div_ceil(resize, bpg);
784                         rsv_gdb = ext2fs_div_ceil(rsv_groups, gdpb) -
785                                 desc_blocks;
786                         if (rsv_gdb > (int) EXT2_ADDR_PER_BLOCK(param))
787                                 rsv_gdb = EXT2_ADDR_PER_BLOCK(param);
788
789                         if (rsv_gdb > 0) {
790                                 if (param->s_rev_level == EXT2_GOOD_OLD_REV) {
791                                         fprintf(stderr,
792         _("On-line resizing not supported with revision 0 filesystems\n"));
793                                         free(buf);
794                                         exit(1);
795                                 }
796                                 param->s_feature_compat |=
797                                         EXT2_FEATURE_COMPAT_RESIZE_INODE;
798
799                                 param->s_reserved_gdt_blocks = rsv_gdb;
800                         }
801                 } else if (!strcmp(token, "test_fs")) {
802                         param->s_flags |= EXT2_FLAGS_TEST_FILESYS;
803                 } else if (!strcmp(token, "lazy_itable_init")) {
804                         if (arg)
805                                 lazy_itable_init = strtoul(arg, &p, 0);
806                         else
807                                 lazy_itable_init = 1;
808                 } else {
809                         r_usage++;
810                         badopt = token;
811                 }
812         }
813         if (r_usage) {
814                 fprintf(stderr, _("\nBad option(s) specified: %s\n\n"
815                         "Extended options are separated by commas, "
816                         "and may take an argument which\n"
817                         "\tis set off by an equals ('=') sign.\n\n"
818                         "Valid extended options are:\n"
819                         "\tstride=<RAID per-disk data chunk in blocks>\n"
820                         "\tstripe-width=<RAID stride * data disks in blocks>\n"
821                         "\tresize=<resize maximum size in blocks>\n"
822                         "\tlazy_itable_init=<0 to disable, 1 to enable>\n"
823                         "\ttest_fs\n\n"),
824                         badopt ? badopt : "");
825                 free(buf);
826                 exit(1);
827         }
828         if (param->s_raid_stride &&
829             (param->s_raid_stripe_width % param->s_raid_stride) != 0)
830                 fprintf(stderr, _("\nWarning: RAID stripe-width %u not an even "
831                                   "multiple of stride %u.\n\n"),
832                         param->s_raid_stripe_width, param->s_raid_stride);
833
834         free(buf);
835 }
836
837 static __u32 ok_features[3] = {
838         /* Compat */
839         EXT3_FEATURE_COMPAT_HAS_JOURNAL |
840                 EXT2_FEATURE_COMPAT_RESIZE_INODE |
841                 EXT2_FEATURE_COMPAT_DIR_INDEX |
842                 EXT2_FEATURE_COMPAT_EXT_ATTR,
843         /* Incompat */
844         EXT2_FEATURE_INCOMPAT_FILETYPE|
845                 EXT3_FEATURE_INCOMPAT_EXTENTS|
846                 EXT3_FEATURE_INCOMPAT_JOURNAL_DEV|
847                 EXT2_FEATURE_INCOMPAT_META_BG|
848                 EXT4_FEATURE_INCOMPAT_FLEX_BG,
849         /* R/O compat */
850         EXT2_FEATURE_RO_COMPAT_LARGE_FILE|
851                 EXT4_FEATURE_RO_COMPAT_HUGE_FILE|
852                 EXT4_FEATURE_RO_COMPAT_DIR_NLINK|
853                 EXT4_FEATURE_RO_COMPAT_EXTRA_ISIZE|
854                 EXT2_FEATURE_RO_COMPAT_SPARSE_SUPER|
855                 EXT4_FEATURE_RO_COMPAT_GDT_CSUM
856 };
857
858
859 static void syntax_err_report(const char *filename, long err, int line_num)
860 {
861         fprintf(stderr,
862                 _("Syntax error in mke2fs config file (%s, line #%d)\n\t%s\n"),
863                 filename, line_num, error_message(err));
864         exit(1);
865 }
866
867 static const char *config_fn[] = { ROOT_SYSCONFDIR "/mke2fs.conf", 0 };
868
869 static void edit_feature(const char *str, __u32 *compat_array)
870 {
871         if (!str)
872                 return;
873
874         if (e2p_edit_feature(str, compat_array, ok_features)) {
875                 fprintf(stderr, _("Invalid filesystem option set: %s\n"),
876                         str);
877                 exit(1);
878         }
879 }
880
881 struct str_list {
882         char **list;
883         int num;
884         int max;
885 };
886
887 static errcode_t init_list(struct str_list *sl)
888 {
889         sl->num = 0;
890         sl->max = 0;
891         sl->list = malloc((sl->max+1) * sizeof(char *));
892         if (!sl->list)
893                 return ENOMEM;
894         sl->list[0] = 0;
895         return 0;
896 }
897
898 static errcode_t push_string(struct str_list *sl, const char *str)
899 {
900         char **new_list;
901
902         if (sl->num >= sl->max) {
903                 sl->max += 2;
904                 new_list = realloc(sl->list, (sl->max+1) * sizeof(char *));
905                 if (!new_list)
906                         return ENOMEM;
907                 sl->list = new_list;
908         }
909         sl->list[sl->num] = malloc(strlen(str)+1);
910         if (sl->list[sl->num] == 0)
911                 return ENOMEM;
912         strcpy(sl->list[sl->num], str);
913         sl->num++;
914         sl->list[sl->num] = 0;
915         return 0;
916 }
917
918 static void print_str_list(char **list)
919 {
920         char **cpp;
921
922         for (cpp = list; *cpp; cpp++) {
923                 printf("'%s'", *cpp);
924                 if (cpp[1])
925                         fputs(", ", stdout);
926         }
927         fputc('\n', stdout);
928 }
929
930 static char **parse_fs_type(const char *fs_type,
931                             const char *usage_types,
932                             struct ext2_super_block *fs_param,
933                             char *progname)
934 {
935         const char      *ext_type = 0;
936         char            *parse_str;
937         char            *profile_type = 0;
938         char            *cp, *t;
939         const char      *size_type;
940         struct str_list list;
941         unsigned long   meg;
942         int             is_hurd = 0;
943
944         if (init_list(&list))
945                 return 0;
946
947         if (creator_os && (!strcasecmp(creator_os, "GNU") ||
948                            !strcasecmp(creator_os, "hurd")))
949                 is_hurd = 1;
950
951         if (fs_type)
952                 ext_type = fs_type;
953         else if (is_hurd)
954                 ext_type = "ext2";
955         else if (!strcmp(program_name, "mke3fs"))
956                 ext_type = "ext3";
957         else if (progname) {
958                 ext_type = strrchr(progname, '/');
959                 if (ext_type)
960                         ext_type++;
961                 else
962                         ext_type = progname;
963
964                 if (!strncmp(ext_type, "mkfs.", 5)) {
965                         ext_type += 5;
966                         if (ext_type[0] == 0)
967                                 ext_type = 0;
968                 } else
969                         ext_type = 0;
970         }
971
972         if (!ext_type) {
973                 profile_get_string(profile, "defaults", "fs_type", 0,
974                                    "ext2", &profile_type);
975                 ext_type = profile_type;
976                 if (!strcmp(ext_type, "ext2") && (journal_size != 0))
977                         ext_type = "ext3";
978         }
979
980         if (!strcmp(ext_type, "ext3") || !strcmp(ext_type, "ext4") ||
981             !strcmp(ext_type, "ext4dev")) {
982                 profile_get_string(profile, "fs_types", ext_type, "features",
983                                    0, &t);
984                 if (!t) {
985                         printf(_("\nWarning!  Your mke2fs.conf file does "
986                                  "not define the %s filesystem type.\n"),
987                                ext_type);
988                         printf(_("You probably need to install an updated "
989                                  "mke2fs.conf file.\n\n"));
990                         sleep(5);
991                 }
992         }
993
994         meg = (1024 * 1024) / EXT2_BLOCK_SIZE(fs_param);
995         if (fs_param->s_blocks_count < 3 * meg)
996                 size_type = "floppy";
997         else if (fs_param->s_blocks_count < 512 * meg)
998                 size_type = "small";
999         else
1000                 size_type = "default";
1001
1002         if (!usage_types)
1003                 usage_types = size_type;
1004
1005         parse_str = malloc(usage_types ? strlen(usage_types)+1 : 1);
1006         if (!parse_str) {
1007                 free(list.list);
1008                 return 0;
1009         }
1010         if (usage_types)
1011                 strcpy(parse_str, usage_types);
1012         else
1013                 *parse_str = '\0';
1014
1015         if (ext_type)
1016                 push_string(&list, ext_type);
1017         cp = parse_str;
1018         while (1) {
1019                 t = strchr(cp, ',');
1020                 if (t)
1021                         *t = '\0';
1022
1023                 if (*cp)
1024                         push_string(&list, cp);
1025                 if (t)
1026                         cp = t+1;
1027                 else {
1028                         cp = "";
1029                         break;
1030                 }
1031         }
1032         free(parse_str);
1033         free(profile_type);
1034         if (is_hurd)
1035                 push_string(&list, "hurd");
1036         return (list.list);
1037 }
1038
1039 static char *get_string_from_profile(char **fs_types, const char *opt,
1040                                      const char *def_val)
1041 {
1042         char *ret = 0;
1043         int i;
1044
1045         for (i=0; fs_types[i]; i++);
1046         for (i-=1; i >=0 ; i--) {
1047                 profile_get_string(profile, "fs_types", fs_types[i],
1048                                    opt, 0, &ret);
1049                 if (ret)
1050                         return ret;
1051         }
1052         profile_get_string(profile, "defaults", opt, 0, def_val, &ret);
1053         return (ret);
1054 }
1055
1056 static int get_int_from_profile(char **fs_types, const char *opt, int def_val)
1057 {
1058         int ret;
1059         char **cpp;
1060
1061         profile_get_integer(profile, "defaults", opt, 0, def_val, &ret);
1062         for (cpp = fs_types; *cpp; cpp++)
1063                 profile_get_integer(profile, "fs_types", *cpp, opt, ret, &ret);
1064         return ret;
1065 }
1066
1067 static int get_bool_from_profile(char **fs_types, const char *opt, int def_val)
1068 {
1069         int ret;
1070         char **cpp;
1071
1072         profile_get_boolean(profile, "defaults", opt, 0, def_val, &ret);
1073         for (cpp = fs_types; *cpp; cpp++)
1074                 profile_get_boolean(profile, "fs_types", *cpp, opt, ret, &ret);
1075         return ret;
1076 }
1077
1078 extern const char *mke2fs_default_profile;
1079 static const char *default_files[] = { "<default>", 0 };
1080
1081 #ifdef HAVE_BLKID_PROBE_GET_TOPOLOGY
1082 /*
1083  * Sets the geometry of a device (stripe/stride), and returns the
1084  * device's alignment offset, if any, or a negative error.
1085  */
1086 static int ext2fs_get_device_geometry(const char *file,
1087                                       struct ext2_super_block *fs_param)
1088 {
1089         int rc = -1;
1090         int blocksize;
1091         blkid_probe pr;
1092         blkid_topology tp;
1093         unsigned long min_io;
1094         unsigned long opt_io;
1095         struct stat statbuf;
1096
1097         /* Nothing to do for a regular file */
1098         if (!stat(file, &statbuf) && S_ISREG(statbuf.st_mode))
1099                 return 0;
1100
1101         pr = blkid_new_probe_from_filename(file);
1102         if (!pr)
1103                 goto out;
1104
1105         tp = blkid_probe_get_topology(pr);
1106         if (!tp)
1107                 goto out;
1108
1109         min_io = blkid_topology_get_minimum_io_size(tp);
1110         opt_io = blkid_topology_get_optimal_io_size(tp);
1111         blocksize = EXT2_BLOCK_SIZE(fs_param);
1112
1113         fs_param->s_raid_stride = min_io / blocksize;
1114         fs_param->s_raid_stripe_width = opt_io / blocksize;
1115
1116         rc = blkid_topology_get_alignment_offset(tp);
1117 out:
1118         blkid_free_probe(pr);
1119         return rc;
1120 }
1121 #endif
1122
1123 static void PRS(int argc, char *argv[])
1124 {
1125         int             b, c;
1126         int             size;
1127         char            *tmp, **cpp;
1128         int             blocksize = 0;
1129         int             inode_ratio = 0;
1130         int             inode_size = 0;
1131         unsigned long   flex_bg_size = 0;
1132         double          reserved_ratio = 5.0;
1133         int             lsector_size = 0, psector_size = 0;
1134         int             show_version_only = 0;
1135         unsigned long long num_inodes = 0; /* unsigned long long to catch too-large input */
1136         errcode_t       retval;
1137         char *          oldpath = getenv("PATH");
1138         char *          extended_opts = 0;
1139         const char *    fs_type = 0;
1140         const char *    usage_types = 0;
1141         blk_t           dev_size;
1142 #ifdef __linux__
1143         struct          utsname ut;
1144 #endif
1145         long            sysval;
1146         int             s_opt = -1, r_opt = -1;
1147         char            *fs_features = 0;
1148         int             use_bsize;
1149         char            *newpath;
1150         int             pathlen = sizeof(PATH_SET) + 1;
1151
1152         if (oldpath)
1153                 pathlen += strlen(oldpath);
1154         newpath = malloc(pathlen);
1155         strcpy(newpath, PATH_SET);
1156
1157         /* Update our PATH to include /sbin  */
1158         if (oldpath) {
1159                 strcat (newpath, ":");
1160                 strcat (newpath, oldpath);
1161         }
1162         putenv (newpath);
1163
1164         tmp = getenv("MKE2FS_SYNC");
1165         if (tmp)
1166                 sync_kludge = atoi(tmp);
1167
1168         /* Determine the system page size if possible */
1169 #ifdef HAVE_SYSCONF
1170 #if (!defined(_SC_PAGESIZE) && defined(_SC_PAGE_SIZE))
1171 #define _SC_PAGESIZE _SC_PAGE_SIZE
1172 #endif
1173 #ifdef _SC_PAGESIZE
1174         sysval = sysconf(_SC_PAGESIZE);
1175         if (sysval > 0)
1176                 sys_page_size = sysval;
1177 #endif /* _SC_PAGESIZE */
1178 #endif /* HAVE_SYSCONF */
1179
1180         if ((tmp = getenv("MKE2FS_CONFIG")) != NULL)
1181                 config_fn[0] = tmp;
1182         profile_set_syntax_err_cb(syntax_err_report);
1183         retval = profile_init(config_fn, &profile);
1184         if (retval == ENOENT) {
1185                 profile_init(default_files, &profile);
1186                 profile_set_default(profile, mke2fs_default_profile);
1187         }
1188
1189         setbuf(stdout, NULL);
1190         setbuf(stderr, NULL);
1191         add_error_table(&et_ext2_error_table);
1192         add_error_table(&et_prof_error_table);
1193         memset(&fs_param, 0, sizeof(struct ext2_super_block));
1194         fs_param.s_rev_level = 1;  /* Create revision 1 filesystems now */
1195
1196 #ifdef __linux__
1197         if (uname(&ut)) {
1198                 perror("uname");
1199                 exit(1);
1200         }
1201         linux_version_code = parse_version_number(ut.release);
1202         if (linux_version_code && linux_version_code < (2*65536 + 2*256))
1203                 fs_param.s_rev_level = 0;
1204 #endif
1205
1206         if (argc && *argv) {
1207                 program_name = get_progname(*argv);
1208
1209                 /* If called as mkfs.ext3, create a journal inode */
1210                 if (!strcmp(program_name, "mkfs.ext3") ||
1211                     !strcmp(program_name, "mke3fs"))
1212                         journal_size = -1;
1213         }
1214
1215         while ((c = getopt (argc, argv,
1216                     "b:cf:g:G:i:jl:m:no:qr:s:t:vE:FI:J:KL:M:N:O:R:ST:U:V")) != EOF) {
1217                 switch (c) {
1218                 case 'b':
1219                         blocksize = strtol(optarg, &tmp, 0);
1220                         b = (blocksize > 0) ? blocksize : -blocksize;
1221                         if (b < EXT2_MIN_BLOCK_SIZE ||
1222                             b > EXT2_MAX_BLOCK_SIZE || *tmp) {
1223                                 com_err(program_name, 0,
1224                                         _("invalid block size - %s"), optarg);
1225                                 exit(1);
1226                         }
1227                         if (blocksize > 4096)
1228                                 fprintf(stderr, _("Warning: blocksize %d not "
1229                                                   "usable on most systems.\n"),
1230                                         blocksize);
1231                         if (blocksize > 0)
1232                                 fs_param.s_log_block_size =
1233                                         int_log2(blocksize >>
1234                                                  EXT2_MIN_BLOCK_LOG_SIZE);
1235                         break;
1236                 case 'c':       /* Check for bad blocks */
1237                         cflag++;
1238                         break;
1239                 case 'f':
1240                         size = strtoul(optarg, &tmp, 0);
1241                         if (size < EXT2_MIN_BLOCK_SIZE ||
1242                             size > EXT2_MAX_BLOCK_SIZE || *tmp) {
1243                                 com_err(program_name, 0,
1244                                         _("invalid fragment size - %s"),
1245                                         optarg);
1246                                 exit(1);
1247                         }
1248                         fs_param.s_log_frag_size =
1249                                 int_log2(size >> EXT2_MIN_BLOCK_LOG_SIZE);
1250                         fprintf(stderr, _("Warning: fragments not supported.  "
1251                                "Ignoring -f option\n"));
1252                         break;
1253                 case 'g':
1254                         fs_param.s_blocks_per_group = strtoul(optarg, &tmp, 0);
1255                         if (*tmp) {
1256                                 com_err(program_name, 0,
1257                                         _("Illegal number for blocks per group"));
1258                                 exit(1);
1259                         }
1260                         if ((fs_param.s_blocks_per_group % 8) != 0) {
1261                                 com_err(program_name, 0,
1262                                 _("blocks per group must be multiple of 8"));
1263                                 exit(1);
1264                         }
1265                         break;
1266                 case 'G':
1267                         flex_bg_size = strtoul(optarg, &tmp, 0);
1268                         if (*tmp) {
1269                                 com_err(program_name, 0,
1270                                         _("Illegal number for flex_bg size"));
1271                                 exit(1);
1272                         }
1273                         if (flex_bg_size < 1 ||
1274                             (flex_bg_size & (flex_bg_size-1)) != 0) {
1275                                 com_err(program_name, 0,
1276                                         _("flex_bg size must be a power of 2"));
1277                                 exit(1);
1278                         }
1279                         break;
1280                 case 'i':
1281                         inode_ratio = strtoul(optarg, &tmp, 0);
1282                         if (inode_ratio < EXT2_MIN_BLOCK_SIZE ||
1283                             inode_ratio > EXT2_MAX_BLOCK_SIZE * 1024 ||
1284                             *tmp) {
1285                                 com_err(program_name, 0,
1286                                         _("invalid inode ratio %s (min %d/max %d)"),
1287                                         optarg, EXT2_MIN_BLOCK_SIZE,
1288                                         EXT2_MAX_BLOCK_SIZE * 1024);
1289                                 exit(1);
1290                         }
1291                         break;
1292                 case 'J':
1293                         parse_journal_opts(optarg);
1294                         break;
1295                 case 'K':
1296                         discard = 0;
1297                         break;
1298                 case 'j':
1299                         if (!journal_size)
1300                                 journal_size = -1;
1301                         break;
1302                 case 'l':
1303                         bad_blocks_filename = malloc(strlen(optarg)+1);
1304                         if (!bad_blocks_filename) {
1305                                 com_err(program_name, ENOMEM,
1306                                         _("in malloc for bad_blocks_filename"));
1307                                 exit(1);
1308                         }
1309                         strcpy(bad_blocks_filename, optarg);
1310                         break;
1311                 case 'm':
1312                         reserved_ratio = strtod(optarg, &tmp);
1313                         if ( *tmp || reserved_ratio > 50 ||
1314                              reserved_ratio < 0) {
1315                                 com_err(program_name, 0,
1316                                         _("invalid reserved blocks percent - %s"),
1317                                         optarg);
1318                                 exit(1);
1319                         }
1320                         break;
1321                 case 'n':
1322                         noaction++;
1323                         break;
1324                 case 'o':
1325                         creator_os = optarg;
1326                         break;
1327                 case 'q':
1328                         quiet = 1;
1329                         break;
1330                 case 'r':
1331                         r_opt = strtoul(optarg, &tmp, 0);
1332                         if (*tmp) {
1333                                 com_err(program_name, 0,
1334                                         _("bad revision level - %s"), optarg);
1335                                 exit(1);
1336                         }
1337                         fs_param.s_rev_level = r_opt;
1338                         break;
1339                 case 's':       /* deprecated */
1340                         s_opt = atoi(optarg);
1341                         break;
1342                 case 'I':
1343                         inode_size = strtoul(optarg, &tmp, 0);
1344                         if (*tmp) {
1345                                 com_err(program_name, 0,
1346                                         _("invalid inode size - %s"), optarg);
1347                                 exit(1);
1348                         }
1349                         break;
1350                 case 'v':
1351                         verbose = 1;
1352                         break;
1353                 case 'F':
1354                         force++;
1355                         break;
1356                 case 'L':
1357                         volume_label = optarg;
1358                         break;
1359                 case 'M':
1360                         mount_dir = optarg;
1361                         break;
1362                 case 'N':
1363                         num_inodes = strtoul(optarg, &tmp, 0);
1364                         if (*tmp) {
1365                                 com_err(program_name, 0,
1366                                         _("bad num inodes - %s"), optarg);
1367                                         exit(1);
1368                         }
1369                         break;
1370                 case 'O':
1371                         fs_features = optarg;
1372                         break;
1373                 case 'E':
1374                 case 'R':
1375                         extended_opts = optarg;
1376                         break;
1377                 case 'S':
1378                         super_only = 1;
1379                         break;
1380                 case 't':
1381                         fs_type = optarg;
1382                         break;
1383                 case 'T':
1384                         usage_types = optarg;
1385                         break;
1386                 case 'U':
1387                         fs_uuid = optarg;
1388                         break;
1389                 case 'V':
1390                         /* Print version number and exit */
1391                         show_version_only++;
1392                         break;
1393                 default:
1394                         usage();
1395                 }
1396         }
1397         if ((optind == argc) && !show_version_only)
1398                 usage();
1399         device_name = argv[optind++];
1400
1401         if (!quiet || show_version_only)
1402                 fprintf (stderr, "mke2fs %s (%s)\n", E2FSPROGS_VERSION,
1403                          E2FSPROGS_DATE);
1404
1405         if (show_version_only) {
1406                 fprintf(stderr, _("\tUsing %s\n"),
1407                         error_message(EXT2_ET_BASE));
1408                 exit(0);
1409         }
1410
1411         /*
1412          * If there's no blocksize specified and there is a journal
1413          * device, use it to figure out the blocksize
1414          */
1415         if (blocksize <= 0 && journal_device) {
1416                 ext2_filsys     jfs;
1417                 io_manager      io_ptr;
1418
1419 #ifdef CONFIG_TESTIO_DEBUG
1420                 if (getenv("TEST_IO_FLAGS") || getenv("TEST_IO_BLOCK")) {
1421                         io_ptr = test_io_manager;
1422                         test_io_backing_manager = unix_io_manager;
1423                 } else
1424 #endif
1425                         io_ptr = unix_io_manager;
1426                 retval = ext2fs_open(journal_device,
1427                                      EXT2_FLAG_JOURNAL_DEV_OK, 0,
1428                                      0, io_ptr, &jfs);
1429                 if (retval) {
1430                         com_err(program_name, retval,
1431                                 _("while trying to open journal device %s\n"),
1432                                 journal_device);
1433                         exit(1);
1434                 }
1435                 if ((blocksize < 0) && (jfs->blocksize < (unsigned) (-blocksize))) {
1436                         com_err(program_name, 0,
1437                                 _("Journal dev blocksize (%d) smaller than "
1438                                   "minimum blocksize %d\n"), jfs->blocksize,
1439                                 -blocksize);
1440                         exit(1);
1441                 }
1442                 blocksize = jfs->blocksize;
1443                 printf(_("Using journal device's blocksize: %d\n"), blocksize);
1444                 fs_param.s_log_block_size =
1445                         int_log2(blocksize >> EXT2_MIN_BLOCK_LOG_SIZE);
1446                 ext2fs_close(jfs);
1447         }
1448
1449         if (blocksize > sys_page_size) {
1450                 if (!force) {
1451                         com_err(program_name, 0,
1452                                 _("%d-byte blocks too big for system (max %d)"),
1453                                 blocksize, sys_page_size);
1454                         proceed_question();
1455                 }
1456                 fprintf(stderr, _("Warning: %d-byte blocks too big for system "
1457                                   "(max %d), forced to continue\n"),
1458                         blocksize, sys_page_size);
1459         }
1460         if (optind < argc) {
1461                 fs_param.s_blocks_count = parse_num_blocks(argv[optind++],
1462                                 fs_param.s_log_block_size);
1463                 if (!fs_param.s_blocks_count) {
1464                         com_err(program_name, 0, _("invalid blocks count - %s"),
1465                                 argv[optind - 1]);
1466                         exit(1);
1467                 }
1468         }
1469         if (optind < argc)
1470                 usage();
1471
1472         if (!force)
1473                 check_plausibility(device_name);
1474         check_mount(device_name, force, _("filesystem"));
1475
1476         fs_param.s_log_frag_size = fs_param.s_log_block_size;
1477
1478         if (noaction && fs_param.s_blocks_count) {
1479                 dev_size = fs_param.s_blocks_count;
1480                 retval = 0;
1481         } else {
1482         retry:
1483                 retval = ext2fs_get_device_size(device_name,
1484                                                 EXT2_BLOCK_SIZE(&fs_param),
1485                                                 &dev_size);
1486                 if ((retval == EFBIG) &&
1487                     (blocksize == 0) &&
1488                     (fs_param.s_log_block_size == 0)) {
1489                         fs_param.s_log_block_size = 2;
1490                         blocksize = 4096;
1491                         goto retry;
1492                 }
1493         }
1494
1495         if (retval == EFBIG) {
1496                 blk64_t big_dev_size;
1497
1498                 if (blocksize < 4096) {
1499                         fs_param.s_log_block_size = 2;
1500                         blocksize = 4096;
1501                 }
1502                 retval = ext2fs_get_device_size2(device_name,
1503                                  EXT2_BLOCK_SIZE(&fs_param), &big_dev_size);
1504                 if (retval)
1505                         goto get_size_failure;
1506                 if (big_dev_size == (1ULL << 32)) {
1507                         dev_size = (blk_t) (big_dev_size - 1);
1508                         goto got_size;
1509                 }
1510                 fprintf(stderr, _("%s: Size of device %s too big "
1511                                   "to be expressed in 32 bits\n\t"
1512                                   "using a blocksize of %d.\n"),
1513                         program_name, device_name, EXT2_BLOCK_SIZE(&fs_param));
1514                 exit(1);
1515         }
1516 get_size_failure:
1517         if (retval && (retval != EXT2_ET_UNIMPLEMENTED)) {
1518                 com_err(program_name, retval,
1519                         _("while trying to determine filesystem size"));
1520                 exit(1);
1521         }
1522 got_size:
1523         if (!fs_param.s_blocks_count) {
1524                 if (retval == EXT2_ET_UNIMPLEMENTED) {
1525                         com_err(program_name, 0,
1526                                 _("Couldn't determine device size; you "
1527                                 "must specify\nthe size of the "
1528                                 "filesystem\n"));
1529                         exit(1);
1530                 } else {
1531                         if (dev_size == 0) {
1532                                 com_err(program_name, 0,
1533                                 _("Device size reported to be zero.  "
1534                                   "Invalid partition specified, or\n\t"
1535                                   "partition table wasn't reread "
1536                                   "after running fdisk, due to\n\t"
1537                                   "a modified partition being busy "
1538                                   "and in use.  You may need to reboot\n\t"
1539                                   "to re-read your partition table.\n"
1540                                   ));
1541                                 exit(1);
1542                         }
1543                         fs_param.s_blocks_count = dev_size;
1544                         if (sys_page_size > EXT2_BLOCK_SIZE(&fs_param))
1545                                 fs_param.s_blocks_count &= ~((sys_page_size /
1546                                            EXT2_BLOCK_SIZE(&fs_param))-1);
1547                 }
1548
1549         } else if (!force && (fs_param.s_blocks_count > dev_size)) {
1550                 com_err(program_name, 0,
1551                         _("Filesystem larger than apparent device size."));
1552                 proceed_question();
1553         }
1554
1555         fs_types = parse_fs_type(fs_type, usage_types, &fs_param, argv[0]);
1556         if (!fs_types) {
1557                 fprintf(stderr, _("Failed to parse fs types list\n"));
1558                 exit(1);
1559         }
1560
1561         /* Figure out what features should be enabled */
1562
1563         tmp = NULL;
1564         if (fs_param.s_rev_level != EXT2_GOOD_OLD_REV) {
1565                 tmp = get_string_from_profile(fs_types, "base_features",
1566                       "sparse_super,filetype,resize_inode,dir_index");
1567                 edit_feature(tmp, &fs_param.s_feature_compat);
1568                 free(tmp);
1569
1570                 for (cpp = fs_types; *cpp; cpp++) {
1571                         tmp = NULL;
1572                         profile_get_string(profile, "fs_types", *cpp,
1573                                            "features", "", &tmp);
1574                         if (tmp && *tmp)
1575                                 edit_feature(tmp, &fs_param.s_feature_compat);
1576                         free(tmp);
1577                 }
1578                 tmp = get_string_from_profile(fs_types, "default_features",
1579                                               "");
1580         }
1581         edit_feature(fs_features ? fs_features : tmp,
1582                      &fs_param.s_feature_compat);
1583         free(tmp);
1584
1585         if (fs_param.s_feature_incompat & EXT3_FEATURE_INCOMPAT_JOURNAL_DEV) {
1586                 fs_types[0] = strdup("journal");
1587                 fs_types[1] = 0;
1588         }
1589
1590         if (verbose) {
1591                 fputs(_("fs_types for mke2fs.conf resolution: "), stdout);
1592                 print_str_list(fs_types);
1593         }
1594
1595         if (r_opt == EXT2_GOOD_OLD_REV &&
1596             (fs_param.s_feature_compat || fs_param.s_feature_incompat ||
1597              fs_param.s_feature_ro_compat)) {
1598                 fprintf(stderr, _("Filesystem features not supported "
1599                                   "with revision 0 filesystems\n"));
1600                 exit(1);
1601         }
1602
1603         if (s_opt > 0) {
1604                 if (r_opt == EXT2_GOOD_OLD_REV) {
1605                         fprintf(stderr, _("Sparse superblocks not supported "
1606                                   "with revision 0 filesystems\n"));
1607                         exit(1);
1608                 }
1609                 fs_param.s_feature_ro_compat |=
1610                         EXT2_FEATURE_RO_COMPAT_SPARSE_SUPER;
1611         } else if (s_opt == 0)
1612                 fs_param.s_feature_ro_compat &=
1613                         ~EXT2_FEATURE_RO_COMPAT_SPARSE_SUPER;
1614
1615         if (journal_size != 0) {
1616                 if (r_opt == EXT2_GOOD_OLD_REV) {
1617                         fprintf(stderr, _("Journals not supported "
1618                                   "with revision 0 filesystems\n"));
1619                         exit(1);
1620                 }
1621                 fs_param.s_feature_compat |=
1622                         EXT3_FEATURE_COMPAT_HAS_JOURNAL;
1623         }
1624
1625         if (fs_param.s_feature_incompat &
1626             EXT3_FEATURE_INCOMPAT_JOURNAL_DEV) {
1627                 reserved_ratio = 0;
1628                 fs_param.s_feature_incompat = EXT3_FEATURE_INCOMPAT_JOURNAL_DEV;
1629                 fs_param.s_feature_compat = 0;
1630                 fs_param.s_feature_ro_compat = 0;
1631         }
1632
1633         if ((fs_param.s_feature_incompat & EXT2_FEATURE_INCOMPAT_META_BG) &&
1634             (fs_param.s_feature_compat & EXT2_FEATURE_COMPAT_RESIZE_INODE)) {
1635                 fprintf(stderr, _("The resize_inode and meta_bg features "
1636                                   "are not compatible.\n"
1637                                   "They can not be both enabled "
1638                                   "simultaneously.\n"));
1639                 exit(1);
1640         }
1641
1642         /* Set first meta blockgroup via an environment variable */
1643         /* (this is mostly for debugging purposes) */
1644         if ((fs_param.s_feature_incompat & EXT2_FEATURE_INCOMPAT_META_BG) &&
1645             ((tmp = getenv("MKE2FS_FIRST_META_BG"))))
1646                 fs_param.s_first_meta_bg = atoi(tmp);
1647
1648         /* Get the hardware sector sizes, if available */
1649         retval = ext2fs_get_device_sectsize(device_name, &lsector_size);
1650         if (retval) {
1651                 com_err(program_name, retval,
1652                         _("while trying to determine hardware sector size"));
1653                 exit(1);
1654         }
1655         retval = ext2fs_get_device_phys_sectsize(device_name, &psector_size);
1656         if (retval) {
1657                 com_err(program_name, retval,
1658                         _("while trying to determine physical sector size"));
1659                 exit(1);
1660         }
1661         /* Older kernels may not have physical/logical distinction */
1662         if (!psector_size)
1663                 psector_size = lsector_size;
1664
1665         if ((tmp = getenv("MKE2FS_DEVICE_SECTSIZE")) != NULL)
1666                 psector_size = atoi(tmp);
1667
1668         if (blocksize <= 0) {
1669                 use_bsize = get_int_from_profile(fs_types, "blocksize", 4096);
1670
1671                 if (use_bsize == -1) {
1672                         use_bsize = sys_page_size;
1673                         if ((linux_version_code < (2*65536 + 6*256)) &&
1674                             (use_bsize > 4096))
1675                                 use_bsize = 4096;
1676                 }
1677                 if (psector_size && use_bsize < psector_size)
1678                         use_bsize = psector_size;
1679                 if ((blocksize < 0) && (use_bsize < (-blocksize)))
1680                         use_bsize = -blocksize;
1681                 blocksize = use_bsize;
1682                 fs_param.s_blocks_count /= blocksize / 1024;
1683         } else {
1684                 if (blocksize < lsector_size ||                 /* Impossible */
1685                     (!force && (blocksize < psector_size))) {   /* Suboptimal */
1686                         com_err(program_name, EINVAL,
1687                                 _("while setting blocksize; too small "
1688                                   "for device\n"));
1689                         exit(1);
1690                 } else if (blocksize < psector_size) {
1691                         fprintf(stderr, _("Warning: specified blocksize %d is "
1692                                 "less than device physical sectorsize %d, "
1693                                 "forced to continue\n"), blocksize,
1694                                 psector_size);
1695                 }
1696         }
1697
1698         if (inode_ratio == 0) {
1699                 inode_ratio = get_int_from_profile(fs_types, "inode_ratio",
1700                                                    8192);
1701                 if (inode_ratio < blocksize)
1702                         inode_ratio = blocksize;
1703         }
1704
1705         fs_param.s_log_frag_size = fs_param.s_log_block_size =
1706                 int_log2(blocksize >> EXT2_MIN_BLOCK_LOG_SIZE);
1707
1708 #ifdef HAVE_BLKID_PROBE_GET_TOPOLOGY
1709         retval = ext2fs_get_device_geometry(device_name, &fs_param);
1710         if (retval < 0) {
1711                 fprintf(stderr,
1712                         _("warning: Unable to get device geometry for %s\n"),
1713                         device_name);
1714         } else if (retval) {
1715                 printf(_("%s alignment is offset by %lu bytes.\n"),
1716                        device_name, retval);
1717                 printf(_("This may result in very poor performance, "
1718                           "(re)-partitioning suggested.\n"));
1719         }
1720 #endif
1721
1722         blocksize = EXT2_BLOCK_SIZE(&fs_param);
1723
1724         lazy_itable_init = get_bool_from_profile(fs_types,
1725                                                  "lazy_itable_init", 0);
1726
1727         /* Get options from profile */
1728         for (cpp = fs_types; *cpp; cpp++) {
1729                 tmp = NULL;
1730                 profile_get_string(profile, "fs_types", *cpp, "options", "", &tmp);
1731                         if (tmp && *tmp)
1732                                 parse_extended_opts(&fs_param, tmp);
1733                         free(tmp);
1734         }
1735
1736         if (extended_opts)
1737                 parse_extended_opts(&fs_param, extended_opts);
1738
1739         /* Since sparse_super is the default, we would only have a problem
1740          * here if it was explicitly disabled.
1741          */
1742         if ((fs_param.s_feature_compat & EXT2_FEATURE_COMPAT_RESIZE_INODE) &&
1743             !(fs_param.s_feature_ro_compat&EXT2_FEATURE_RO_COMPAT_SPARSE_SUPER)) {
1744                 com_err(program_name, 0,
1745                         _("reserved online resize blocks not supported "
1746                           "on non-sparse filesystem"));
1747                 exit(1);
1748         }
1749
1750         if (fs_param.s_blocks_per_group) {
1751                 if (fs_param.s_blocks_per_group < 256 ||
1752                     fs_param.s_blocks_per_group > 8 * (unsigned) blocksize) {
1753                         com_err(program_name, 0,
1754                                 _("blocks per group count out of range"));
1755                         exit(1);
1756                 }
1757         }
1758
1759         if (inode_size == 0)
1760                 inode_size = get_int_from_profile(fs_types, "inode_size", 0);
1761         if (!flex_bg_size && (fs_param.s_feature_incompat &
1762                               EXT4_FEATURE_INCOMPAT_FLEX_BG))
1763                 flex_bg_size = get_int_from_profile(fs_types,
1764                                                     "flex_bg_size", 16);
1765         if (flex_bg_size) {
1766                 if (!(fs_param.s_feature_incompat &
1767                       EXT4_FEATURE_INCOMPAT_FLEX_BG)) {
1768                         com_err(program_name, 0,
1769                                 _("Flex_bg feature not enabled, so "
1770                                   "flex_bg size may not be specified"));
1771                         exit(1);
1772                 }
1773                 fs_param.s_log_groups_per_flex = int_log2(flex_bg_size);
1774         }
1775
1776         if (inode_size && fs_param.s_rev_level >= EXT2_DYNAMIC_REV) {
1777                 if (inode_size < EXT2_GOOD_OLD_INODE_SIZE ||
1778                     inode_size > EXT2_BLOCK_SIZE(&fs_param) ||
1779                     inode_size & (inode_size - 1)) {
1780                         com_err(program_name, 0,
1781                                 _("invalid inode size %d (min %d/max %d)"),
1782                                 inode_size, EXT2_GOOD_OLD_INODE_SIZE,
1783                                 blocksize);
1784                         exit(1);
1785                 }
1786                 fs_param.s_inode_size = inode_size;
1787         }
1788
1789         /* Make sure number of inodes specified will fit in 32 bits */
1790         if (num_inodes == 0) {
1791                 unsigned long long n;
1792                 n = (unsigned long long) fs_param.s_blocks_count * blocksize / inode_ratio;
1793                 if (n > ~0U) {
1794                         com_err(program_name, 0,
1795                             _("too many inodes (%llu), raise inode ratio?"), n);
1796                         exit(1);
1797                 }
1798         } else if (num_inodes > ~0U) {
1799                 com_err(program_name, 0,
1800                         _("too many inodes (%llu), specify < 2^32 inodes"),
1801                           num_inodes);
1802                 exit(1);
1803         }
1804         /*
1805          * Calculate number of inodes based on the inode ratio
1806          */
1807         fs_param.s_inodes_count = num_inodes ? num_inodes :
1808                 ((__u64) fs_param.s_blocks_count * blocksize)
1809                         / inode_ratio;
1810
1811         if ((((long long)fs_param.s_inodes_count) *
1812              (inode_size ? inode_size : EXT2_GOOD_OLD_INODE_SIZE)) >=
1813             (((long long)fs_param.s_blocks_count) *
1814              EXT2_BLOCK_SIZE(&fs_param))) {
1815                 com_err(program_name, 0, _("inode_size (%u) * inodes_count "
1816                                           "(%u) too big for a\n\t"
1817                                           "filesystem with %lu blocks, "
1818                                           "specify higher inode_ratio (-i)\n\t"
1819                                           "or lower inode count (-N).\n"),
1820                         inode_size ? inode_size : EXT2_GOOD_OLD_INODE_SIZE,
1821                         fs_param.s_inodes_count,
1822                         (unsigned long) fs_param.s_blocks_count);
1823                 exit(1);
1824         }
1825
1826         /*
1827          * Calculate number of blocks to reserve
1828          */
1829         fs_param.s_r_blocks_count = (unsigned int) (reserved_ratio *
1830                                         fs_param.s_blocks_count / 100.0);
1831 }
1832
1833 static int should_do_undo(const char *name)
1834 {
1835         errcode_t retval;
1836         io_channel channel;
1837         __u16   s_magic;
1838         struct ext2_super_block super;
1839         io_manager manager = unix_io_manager;
1840         int csum_flag, force_undo;
1841
1842         csum_flag = EXT2_HAS_RO_COMPAT_FEATURE(&fs_param,
1843                                                EXT4_FEATURE_RO_COMPAT_GDT_CSUM);
1844         force_undo = get_int_from_profile(fs_types, "force_undo", 0);
1845         if (!force_undo && (!csum_flag || !lazy_itable_init))
1846                 return 0;
1847
1848         retval = manager->open(name, IO_FLAG_EXCLUSIVE,  &channel);
1849         if (retval) {
1850                 /*
1851                  * We don't handle error cases instead we
1852                  * declare that the file system doesn't exist
1853                  * and let the rest of mke2fs take care of
1854                  * error
1855                  */
1856                 retval = 0;
1857                 goto open_err_out;
1858         }
1859
1860         io_channel_set_blksize(channel, SUPERBLOCK_OFFSET);
1861         retval = io_channel_read_blk(channel, 1, -SUPERBLOCK_SIZE, &super);
1862         if (retval) {
1863                 retval = 0;
1864                 goto err_out;
1865         }
1866
1867 #if defined(WORDS_BIGENDIAN)
1868         s_magic = ext2fs_swab16(super.s_magic);
1869 #else
1870         s_magic = super.s_magic;
1871 #endif
1872
1873         if (s_magic == EXT2_SUPER_MAGIC)
1874                 retval = 1;
1875
1876 err_out:
1877         io_channel_close(channel);
1878
1879 open_err_out:
1880
1881         return retval;
1882 }
1883
1884 static int mke2fs_setup_tdb(const char *name, io_manager *io_ptr)
1885 {
1886         errcode_t retval = 0;
1887         char *tdb_dir, *tdb_file;
1888         char *device_name, *tmp_name;
1889
1890         /*
1891          * Configuration via a conf file would be
1892          * nice
1893          */
1894         tdb_dir = getenv("E2FSPROGS_UNDO_DIR");
1895         if (!tdb_dir)
1896                 profile_get_string(profile, "defaults",
1897                                    "undo_dir", 0, "/var/lib/e2fsprogs",
1898                                    &tdb_dir);
1899
1900         if (!strcmp(tdb_dir, "none") || (tdb_dir[0] == 0) ||
1901             access(tdb_dir, W_OK))
1902                 return 0;
1903
1904         tmp_name = strdup(name);
1905         if (!tmp_name) {
1906         alloc_fn_fail:
1907                 com_err(program_name, ENOMEM, 
1908                         _("Couldn't allocate memory for tdb filename\n"));
1909                 return ENOMEM;
1910         }
1911         device_name = basename(tmp_name);
1912         tdb_file = malloc(strlen(tdb_dir) + 8 + strlen(device_name) + 7 + 1);
1913         if (!tdb_file)
1914                 goto alloc_fn_fail;
1915         sprintf(tdb_file, "%s/mke2fs-%s.e2undo", tdb_dir, device_name);
1916
1917         if (!access(tdb_file, F_OK)) {
1918                 if (unlink(tdb_file) < 0) {
1919                         retval = errno;
1920                         com_err(program_name, retval,
1921                                 _("while trying to delete %s"),
1922                                 tdb_file);
1923                         free(tdb_file);
1924                         return retval;
1925                 }
1926         }
1927
1928         set_undo_io_backing_manager(*io_ptr);
1929         *io_ptr = undo_io_manager;
1930         set_undo_io_backup_file(tdb_file);
1931         printf(_("Overwriting existing filesystem; this can be undone "
1932                  "using the command:\n"
1933                  "    e2undo %s %s\n\n"), tdb_file, name);
1934
1935         free(tdb_file);
1936         free(tmp_name);
1937         return retval;
1938 }
1939
1940 #ifdef __linux__
1941
1942 #ifndef BLKDISCARD
1943 #define BLKDISCARD      _IO(0x12,119)
1944 #endif
1945
1946 static void mke2fs_discard_blocks(ext2_filsys fs)
1947 {
1948         int fd;
1949         int ret;
1950         int blocksize;
1951         __u64 blocks;
1952         __uint64_t range[2];
1953
1954         blocks = fs->super->s_blocks_count;
1955         blocksize = EXT2_BLOCK_SIZE(fs->super);
1956         range[0] = 0;
1957         range[1] = blocks * blocksize;
1958
1959         fd = open64(fs->device_name, O_RDWR);
1960
1961         /*
1962          * We don't care about whether the ioctl succeeds; it's only an
1963          * optmization for SSDs or sparse storage.
1964          */
1965         if (fd > 0) {
1966                 ret = ioctl(fd, BLKDISCARD, &range);
1967                 if (verbose) {
1968                         printf(_("Calling BLKDISCARD from %llu to %llu "),
1969                                (unsigned long long) range[0],
1970                                (unsigned long long) range[1]);
1971                         if (ret)
1972                                 printf(_("failed.\n"));
1973                         else
1974                                 printf(_("succeeded.\n"));
1975                 }
1976                 close(fd);
1977         }
1978 }
1979 #else
1980 #define mke2fs_discard_blocks(fs)
1981 #endif
1982
1983 int main (int argc, char *argv[])
1984 {
1985         errcode_t       retval = 0;
1986         ext2_filsys     fs;
1987         badblocks_list  bb_list = 0;
1988         unsigned int    journal_blocks;
1989         unsigned int    i;
1990         int             val, hash_alg;
1991         io_manager      io_ptr;
1992         char            tdb_string[40];
1993         char            *hash_alg_str;
1994
1995 #ifdef ENABLE_NLS
1996         setlocale(LC_MESSAGES, "");
1997         setlocale(LC_CTYPE, "");
1998         bindtextdomain(NLS_CAT_NAME, LOCALEDIR);
1999         textdomain(NLS_CAT_NAME);
2000 #endif
2001         PRS(argc, argv);
2002
2003 #ifdef CONFIG_TESTIO_DEBUG
2004         if (getenv("TEST_IO_FLAGS") || getenv("TEST_IO_BLOCK")) {
2005                 io_ptr = test_io_manager;
2006                 test_io_backing_manager = unix_io_manager;
2007         } else
2008 #endif
2009                 io_ptr = unix_io_manager;
2010
2011         if (should_do_undo(device_name)) {
2012                 retval = mke2fs_setup_tdb(device_name, &io_ptr);
2013                 if (retval)
2014                         exit(1);
2015         }
2016
2017         /*
2018          * Initialize the superblock....
2019          */
2020         retval = ext2fs_initialize(device_name, EXT2_FLAG_EXCLUSIVE, &fs_param,
2021                                    io_ptr, &fs);
2022         if (retval) {
2023                 com_err(device_name, retval, _("while setting up superblock"));
2024                 exit(1);
2025         }
2026
2027         /* Can't undo discard ... */
2028         if (discard && (io_ptr != undo_io_manager))
2029                 mke2fs_discard_blocks(fs);
2030
2031         sprintf(tdb_string, "tdb_data_size=%d", fs->blocksize <= 4096 ?
2032                 32768 : fs->blocksize * 8);
2033         io_channel_set_options(fs->io, tdb_string);
2034
2035         if (fs_param.s_flags & EXT2_FLAGS_TEST_FILESYS)
2036                 fs->super->s_flags |= EXT2_FLAGS_TEST_FILESYS;
2037
2038         if ((fs_param.s_feature_incompat &
2039              (EXT3_FEATURE_INCOMPAT_EXTENTS|EXT4_FEATURE_INCOMPAT_FLEX_BG)) ||
2040             (fs_param.s_feature_ro_compat &
2041              (EXT4_FEATURE_RO_COMPAT_HUGE_FILE|EXT4_FEATURE_RO_COMPAT_GDT_CSUM|
2042               EXT4_FEATURE_RO_COMPAT_DIR_NLINK|
2043               EXT4_FEATURE_RO_COMPAT_EXTRA_ISIZE)))
2044                 fs->super->s_kbytes_written = 1;
2045
2046         /*
2047          * Wipe out the old on-disk superblock
2048          */
2049         if (!noaction)
2050                 zap_sector(fs, 2, 6);
2051
2052         /*
2053          * Parse or generate a UUID for the filesystem
2054          */
2055         if (fs_uuid) {
2056                 if (uuid_parse(fs_uuid, fs->super->s_uuid) !=0) {
2057                         com_err(device_name, 0, "could not parse UUID: %s\n",
2058                                 fs_uuid);
2059                         exit(1);
2060                 }
2061         } else
2062                 uuid_generate(fs->super->s_uuid);
2063
2064         /*
2065          * Initialize the directory index variables
2066          */
2067         hash_alg_str = get_string_from_profile(fs_types, "hash_alg",
2068                                                "half_md4");
2069         hash_alg = e2p_string2hash(hash_alg_str);
2070         fs->super->s_def_hash_version = (hash_alg >= 0) ? hash_alg :
2071                 EXT2_HASH_HALF_MD4;
2072         uuid_generate((unsigned char *) fs->super->s_hash_seed);
2073
2074         /*
2075          * Add "jitter" to the superblock's check interval so that we
2076          * don't check all the filesystems at the same time.  We use a
2077          * kludgy hack of using the UUID to derive a random jitter value.
2078          */
2079         for (i = 0, val = 0 ; i < sizeof(fs->super->s_uuid); i++)
2080                 val += fs->super->s_uuid[i];
2081         fs->super->s_max_mnt_count += val % EXT2_DFL_MAX_MNT_COUNT;
2082
2083         /*
2084          * Override the creator OS, if applicable
2085          */
2086         if (creator_os && !set_os(fs->super, creator_os)) {
2087                 com_err (program_name, 0, _("unknown os - %s"), creator_os);
2088                 exit(1);
2089         }
2090
2091         /*
2092          * For the Hurd, we will turn off filetype since it doesn't
2093          * support it.
2094          */
2095         if (fs->super->s_creator_os == EXT2_OS_HURD)
2096                 fs->super->s_feature_incompat &=
2097                         ~EXT2_FEATURE_INCOMPAT_FILETYPE;
2098
2099         /*
2100          * Set the volume label...
2101          */
2102         if (volume_label) {
2103                 memset(fs->super->s_volume_name, 0,
2104                        sizeof(fs->super->s_volume_name));
2105                 strncpy(fs->super->s_volume_name, volume_label,
2106                         sizeof(fs->super->s_volume_name));
2107         }
2108
2109         /*
2110          * Set the last mount directory
2111          */
2112         if (mount_dir) {
2113                 memset(fs->super->s_last_mounted, 0,
2114                        sizeof(fs->super->s_last_mounted));
2115                 strncpy(fs->super->s_last_mounted, mount_dir,
2116                         sizeof(fs->super->s_last_mounted));
2117         }
2118
2119         if (!quiet || noaction)
2120                 show_stats(fs);
2121
2122         if (noaction)
2123                 exit(0);
2124
2125         if (fs->super->s_feature_incompat &
2126             EXT3_FEATURE_INCOMPAT_JOURNAL_DEV) {
2127                 create_journal_dev(fs);
2128                 exit(ext2fs_close(fs) ? 1 : 0);
2129         }
2130
2131         if (bad_blocks_filename)
2132                 read_bb_file(fs, &bb_list, bad_blocks_filename);
2133         if (cflag)
2134                 test_disk(fs, &bb_list);
2135
2136         handle_bad_blocks(fs, bb_list);
2137         fs->stride = fs_stride = fs->super->s_raid_stride;
2138         retval = ext2fs_allocate_tables(fs);
2139         if (retval) {
2140                 com_err(program_name, retval,
2141                         _("while trying to allocate filesystem tables"));
2142                 exit(1);
2143         }
2144         if (super_only) {
2145                 fs->super->s_state |= EXT2_ERROR_FS;
2146                 fs->flags &= ~(EXT2_FLAG_IB_DIRTY|EXT2_FLAG_BB_DIRTY);
2147         } else {
2148                 /* rsv must be a power of two (64kB is MD RAID sb alignment) */
2149                 unsigned int rsv = 65536 / fs->blocksize;
2150                 unsigned long blocks = fs->super->s_blocks_count;
2151                 unsigned long start;
2152                 blk_t ret_blk;
2153
2154 #ifdef ZAP_BOOTBLOCK
2155                 zap_sector(fs, 0, 2);
2156 #endif
2157
2158                 /*
2159                  * Wipe out any old MD RAID (or other) metadata at the end
2160                  * of the device.  This will also verify that the device is
2161                  * as large as we think.  Be careful with very small devices.
2162                  */
2163                 start = (blocks & ~(rsv - 1));
2164                 if (start > rsv)
2165                         start -= rsv;
2166                 if (start > 0)
2167                         retval = ext2fs_zero_blocks(fs, start, blocks - start,
2168                                                     &ret_blk, NULL);
2169
2170                 if (retval) {
2171                         com_err(program_name, retval,
2172                                 _("while zeroing block %u at end of filesystem"),
2173                                 ret_blk);
2174                 }
2175                 write_inode_tables(fs, lazy_itable_init);
2176                 create_root_dir(fs);
2177                 create_lost_and_found(fs);
2178                 reserve_inodes(fs);
2179                 create_bad_block_inode(fs, bb_list);
2180                 if (fs->super->s_feature_compat &
2181                     EXT2_FEATURE_COMPAT_RESIZE_INODE) {
2182                         retval = ext2fs_create_resize_inode(fs);
2183                         if (retval) {
2184                                 com_err("ext2fs_create_resize_inode", retval,
2185                                 _("while reserving blocks for online resize"));
2186                                 exit(1);
2187                         }
2188                 }
2189         }
2190
2191         if (journal_device) {
2192                 ext2_filsys     jfs;
2193
2194                 if (!force)
2195                         check_plausibility(journal_device);
2196                 check_mount(journal_device, force, _("journal"));
2197
2198                 retval = ext2fs_open(journal_device, EXT2_FLAG_RW|
2199                                      EXT2_FLAG_JOURNAL_DEV_OK, 0,
2200                                      fs->blocksize, unix_io_manager, &jfs);
2201                 if (retval) {
2202                         com_err(program_name, retval,
2203                                 _("while trying to open journal device %s\n"),
2204                                 journal_device);
2205                         exit(1);
2206                 }
2207                 if (!quiet) {
2208                         printf(_("Adding journal to device %s: "),
2209                                journal_device);
2210                         fflush(stdout);
2211                 }
2212                 retval = ext2fs_add_journal_device(fs, jfs);
2213                 if(retval) {
2214                         com_err (program_name, retval,
2215                                  _("\n\twhile trying to add journal to device %s"),
2216                                  journal_device);
2217                         exit(1);
2218                 }
2219                 if (!quiet)
2220                         printf(_("done\n"));
2221                 ext2fs_close(jfs);
2222                 free(journal_device);
2223         } else if ((journal_size) ||
2224                    (fs_param.s_feature_compat &
2225                     EXT3_FEATURE_COMPAT_HAS_JOURNAL)) {
2226                 journal_blocks = figure_journal_size(journal_size, fs);
2227
2228                 if (super_only) {
2229                         printf(_("Skipping journal creation in super-only mode\n"));
2230                         fs->super->s_journal_inum = EXT2_JOURNAL_INO;
2231                         goto no_journal;
2232                 }
2233
2234                 if (!journal_blocks) {
2235                         fs->super->s_feature_compat &=
2236                                 ~EXT3_FEATURE_COMPAT_HAS_JOURNAL;
2237                         goto no_journal;
2238                 }
2239                 if (!quiet) {
2240                         printf(_("Creating journal (%u blocks): "),
2241                                journal_blocks);
2242                         fflush(stdout);
2243                 }
2244                 retval = ext2fs_add_journal_inode(fs, journal_blocks,
2245                                                   journal_flags);
2246                 if (retval) {
2247                         com_err (program_name, retval,
2248                                  _("\n\twhile trying to create journal"));
2249                         exit(1);
2250                 }
2251                 if (!quiet)
2252                         printf(_("done\n"));
2253         }
2254 no_journal:
2255
2256         if (!quiet)
2257                 printf(_("Writing superblocks and "
2258                        "filesystem accounting information: "));
2259         retval = ext2fs_flush(fs);
2260         if (retval) {
2261                 fprintf(stderr,
2262                         _("\nWarning, had trouble writing out superblocks."));
2263         }
2264         if (!quiet) {
2265                 printf(_("done\n\n"));
2266                 if (!getenv("MKE2FS_SKIP_CHECK_MSG"))
2267                         print_check_message(fs);
2268         }
2269         val = ext2fs_close(fs);
2270         remove_error_table(&et_ext2_error_table);
2271         remove_error_table(&et_prof_error_table);
2272         profile_release(profile);
2273         return (retval || val) ? 1 : 0;
2274 }