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