SAFE public projects git trees. - safe/jmp/linux-2.6/blob - init/do_mounts_rd.c

   1
   2 #include <linux/kernel.h>
   3 #include <linux/fs.h>
   4 #include <linux/minix_fs.h>
   5 #include <linux/ext2_fs.h>
   6 #include <linux/romfs_fs.h>
   7 #include <linux/cramfs_fs.h>
   8 #include <linux/initrd.h>
   9 #include <linux/string.h>
  10
  11 #include "do_mounts.h"
  12
  13 #include <linux/decompress/generic.h>
  14
  15
  16 int __initdata rd_prompt = 1;/* 1 = prompt for RAM disk, 0 = don't prompt */
  17
  18 static int __init prompt_ramdisk(char *str)
  19 {
  20         rd_prompt = simple_strtol(str,NULL,0) & 1;
  21         return 1;
  22 }
  23 __setup("prompt_ramdisk=", prompt_ramdisk);
  24
  25 int __initdata rd_image_start;          /* starting block # of image */
  26
  27 static int __init ramdisk_start_setup(char *str)
  28 {
  29         rd_image_start = simple_strtol(str,NULL,0);
  30         return 1;
  31 }
  32 __setup("ramdisk_start=", ramdisk_start_setup);
  33
  34 static int __init crd_load(int in_fd, int out_fd, decompress_fn deco);
  35
  36 /*
  37  * This routine tries to find a RAM disk image to load, and returns the
  38  * number of blocks to read for a non-compressed image, 0 if the image
  39  * is a compressed image, and -1 if an image with the right magic
  40  * numbers could not be found.
  41  *
  42  * We currently check for the following magic numbers:
  43  *      minix
  44  *      ext2
  45  *      romfs
  46  *      cramfs
  47  *      gzip
  48  */
  49 static int __init
  50 identify_ramdisk_image(int fd, int start_block, decompress_fn *decompressor)
  51 {
  52         const int size = 512;
  53         struct minix_super_block *minixsb;
  54         struct ext2_super_block *ext2sb;
  55         struct romfs_super_block *romfsb;
  56         struct cramfs_super *cramfsb;
  57         int nblocks = -1;
  58         unsigned char *buf;
  59         const char *compress_name;
  60
  61         buf = kmalloc(size, GFP_KERNEL);
  62         if (!buf)
  63                 return -1;
  64
  65         minixsb = (struct minix_super_block *) buf;
  66         ext2sb = (struct ext2_super_block *) buf;
  67         romfsb = (struct romfs_super_block *) buf;
  68         cramfsb = (struct cramfs_super *) buf;
  69         memset(buf, 0xe5, size);
  70
  71         /*
  72          * Read block 0 to test for compressed kernel
  73          */
  74         sys_lseek(fd, start_block * BLOCK_SIZE, 0);
  75         sys_read(fd, buf, size);
  76
  77         *decompressor = decompress_method(buf, size, &compress_name);
  78         if (*decompressor) {
  79                 printk(KERN_NOTICE "RAMDISK: %s image found at block %d\n",
  80                        compress_name, start_block);
  81                 nblocks = 0;
  82                 goto done;
  83         }
  84
  85         /* romfs is at block zero too */
  86         if (romfsb->word0 == ROMSB_WORD0 &&
  87             romfsb->word1 == ROMSB_WORD1) {
  88                 printk(KERN_NOTICE
  89                        "RAMDISK: romfs filesystem found at block %d\n",
  90                        start_block);
  91                 nblocks = (ntohl(romfsb->size)+BLOCK_SIZE-1)>>BLOCK_SIZE_BITS;
  92                 goto done;
  93         }
  94
  95         if (cramfsb->magic == CRAMFS_MAGIC) {
  96                 printk(KERN_NOTICE
  97                        "RAMDISK: cramfs filesystem found at block %d\n",
  98                        start_block);
  99                 nblocks = (cramfsb->size + BLOCK_SIZE - 1) >> BLOCK_SIZE_BITS;
 100                 goto done;
 101         }
 102
 103         /*
 104          * Read block 1 to test for minix and ext2 superblock
 105          */
 106         sys_lseek(fd, (start_block+1) * BLOCK_SIZE, 0);
 107         sys_read(fd, buf, size);
 108
 109         /* Try minix */
 110         if (minixsb->s_magic == MINIX_SUPER_MAGIC ||
 111             minixsb->s_magic == MINIX_SUPER_MAGIC2) {
 112                 printk(KERN_NOTICE
 113                        "RAMDISK: Minix filesystem found at block %d\n",
 114                        start_block);
 115                 nblocks = minixsb->s_nzones << minixsb->s_log_zone_size;
 116                 goto done;
 117         }
 118
 119         /* Try ext2 */
 120         if (ext2sb->s_magic == cpu_to_le16(EXT2_SUPER_MAGIC)) {
 121                 printk(KERN_NOTICE
 122                        "RAMDISK: ext2 filesystem found at block %d\n",
 123                        start_block);
 124                 nblocks = le32_to_cpu(ext2sb->s_blocks_count) <<
 125                         le32_to_cpu(ext2sb->s_log_block_size);
 126                 goto done;
 127         }
 128
 129         printk(KERN_NOTICE
 130                "RAMDISK: Couldn't find valid RAM disk image starting at %d.\n",
 131                start_block);
 132
 133 done:
 134         sys_lseek(fd, start_block * BLOCK_SIZE, 0);
 135         kfree(buf);
 136         return nblocks;
 137 }
 138
 139 int __init rd_load_image(char *from)
 140 {
 141         int res = 0;
 142         int in_fd, out_fd;
 143         unsigned long rd_blocks, devblocks;
 144         int nblocks, i, disk;
 145         char *buf = NULL;
 146         unsigned short rotate = 0;
 147         decompress_fn decompressor = NULL;
 148 #if !defined(CONFIG_S390) && !defined(CONFIG_PPC_ISERIES)
 149         char rotator[4] = { '|' , '/' , '-' , '\\' };
 150 #endif
 151
 152         out_fd = sys_open("/dev/ram", O_RDWR, 0);
 153         if (out_fd < 0)
 154                 goto out;
 155
 156         in_fd = sys_open(from, O_RDONLY, 0);
 157         if (in_fd < 0)
 158                 goto noclose_input;
 159
 160         nblocks = identify_ramdisk_image(in_fd, rd_image_start, &decompressor);
 161         if (nblocks < 0)
 162                 goto done;
 163
 164         if (nblocks == 0) {
 165                 if (crd_load(in_fd, out_fd, decompressor) == 0)
 166                         goto successful_load;
 167                 goto done;
 168         }
 169
 170         /*
 171          * NOTE NOTE: nblocks is not actually blocks but
 172          * the number of kibibytes of data to load into a ramdisk.
 173          * So any ramdisk block size that is a multiple of 1KiB should
 174          * work when the appropriate ramdisk_blocksize is specified
 175          * on the command line.
 176          *
 177          * The default ramdisk_blocksize is 1KiB and it is generally
 178          * silly to use anything else, so make sure to use 1KiB
 179          * blocksize while generating ext2fs ramdisk-images.
 180          */
 181         if (sys_ioctl(out_fd, BLKGETSIZE, (unsigned long)&rd_blocks) < 0)
 182                 rd_blocks = 0;
 183         else
 184                 rd_blocks >>= 1;
 185
 186         if (nblocks > rd_blocks) {
 187                 printk("RAMDISK: image too big! (%dKiB/%ldKiB)\n",
 188                        nblocks, rd_blocks);
 189                 goto done;
 190         }
 191
 192         /*
 193          * OK, time to copy in the data
 194          */
 195         if (sys_ioctl(in_fd, BLKGETSIZE, (unsigned long)&devblocks) < 0)
 196                 devblocks = 0;
 197         else
 198                 devblocks >>= 1;
 199
 200         if (strcmp(from, "/initrd.image") == 0)
 201                 devblocks = nblocks;
 202
 203         if (devblocks == 0) {
 204                 printk(KERN_ERR "RAMDISK: could not determine device size\n");
 205                 goto done;
 206         }
 207
 208         buf = kmalloc(BLOCK_SIZE, GFP_KERNEL);
 209         if (!buf) {
 210                 printk(KERN_ERR "RAMDISK: could not allocate buffer\n");
 211                 goto done;
 212         }
 213
 214         printk(KERN_NOTICE "RAMDISK: Loading %dKiB [%ld disk%s] into ram disk... ",
 215                 nblocks, ((nblocks-1)/devblocks)+1, nblocks>devblocks ? "s" : "");
 216         for (i = 0, disk = 1; i < nblocks; i++) {
 217                 if (i && (i % devblocks == 0)) {
 218                         printk("done disk #%d.\n", disk++);
 219                         rotate = 0;
 220                         if (sys_close(in_fd)) {
 221                                 printk("Error closing the disk.\n");
 222                                 goto noclose_input;
 223                         }
 224                         change_floppy("disk #%d", disk);
 225                         in_fd = sys_open(from, O_RDONLY, 0);
 226                         if (in_fd < 0)  {
 227                                 printk("Error opening disk.\n");
 228                                 goto noclose_input;
 229                         }
 230                         printk("Loading disk #%d... ", disk);
 231                 }
 232                 sys_read(in_fd, buf, BLOCK_SIZE);
 233                 sys_write(out_fd, buf, BLOCK_SIZE);
 234 #if !defined(CONFIG_S390) && !defined(CONFIG_PPC_ISERIES)
 235                 if (!(i % 16)) {
 236                         printk("%c\b", rotator[rotate & 0x3]);
 237                         rotate++;
 238                 }
 239 #endif
 240         }
 241         printk("done.\n");
 242
 243 successful_load:
 244         res = 1;
 245 done:
 246         sys_close(in_fd);
 247 noclose_input:
 248         sys_close(out_fd);
 249 out:
 250         kfree(buf);
 251         sys_unlink("/dev/ram");
 252         return res;
 253 }
 254
 255 int __init rd_load_disk(int n)
 256 {
 257         if (rd_prompt)
 258                 change_floppy("root floppy disk to be loaded into RAM disk");
 259         create_dev("/dev/root", ROOT_DEV);
 260         create_dev("/dev/ram", MKDEV(RAMDISK_MAJOR, n));
 261         return rd_load_image("/dev/root");
 262 }
 263
 264 static int exit_code;
 265 static int decompress_error;
 266 static int crd_infd, crd_outfd;
 267
 268 static int __init compr_fill(void *buf, unsigned int len)
 269 {
 270         int r = sys_read(crd_infd, buf, len);
 271         if (r < 0)
 272                 printk(KERN_ERR "RAMDISK: error while reading compressed data");
 273         else if (r == 0)
 274                 printk(KERN_ERR "RAMDISK: EOF while reading compressed data");
 275         return r;
 276 }
 277
 278 static int __init compr_flush(void *window, unsigned int outcnt)
 279 {
 280         int written = sys_write(crd_outfd, window, outcnt);
 281         if (written != outcnt) {
 282                 if (decompress_error == 0)
 283                         printk(KERN_ERR
 284                                "RAMDISK: incomplete write (%d != %d)\n",
 285                                written, outcnt);
 286                 decompress_error = 1;
 287                 return -1;
 288         }
 289         return outcnt;
 290 }
 291
 292 static void __init error(char *x)
 293 {
 294         printk(KERN_ERR "%s\n", x);
 295         exit_code = 1;
 296         decompress_error = 1;
 297 }
 298
 299 static int __init crd_load(int in_fd, int out_fd, decompress_fn deco)
 300 {
 301         int result;
 302         crd_infd = in_fd;
 303         crd_outfd = out_fd;
 304         result = deco(NULL, 0, compr_fill, compr_flush, NULL, NULL, error);
 305         if (decompress_error)
 306                 result = 1;
 307         return result;
 308 }