New tool to insert the rockbox boot loader into the original firmware (iRiver)

git-svn-id: svn://svn.rockbox.org/rockbox/trunk@5690 a1c6a512-1295-4272-9138-f99709370657

2 files changed, 168 insertions, 2 deletions

diff --git a/tools/Makefile b/tools/Makefile
index 8e82d0f8ee..b98c269642 100644
--- a/tools/Makefile
+++ b/tools/Makefile
@@ -6,9 +6,10 @@
 #                     \/            \/     \/    \/            \/
 # $Id$
 #
-CFLAGS := -O -ansi
+CFLAGS := -O -ansi -g
+LDFLAGS := -g
 
-TARGETS := scramble descramble sh2d bmp2rb convbdf generate_rocklatin
+TARGETS := scramble descramble sh2d bmp2rb convbdf generate_rocklatin mkboot
 
 all: $(TARGETS)
         @echo "tools done"
@@ -25,6 +26,9 @@ sh2d: sh2d.c
 bmp2rb: bmp2rb.c
         $(CC) -DAPPLICATION_NAME=\"$@\" -g $+ -o $@
 
+mkboot: mkboot.c
+        $(CC) -g $+ -o $@
+
 convbdf: convbdf.c
         $(CC) -g $+ -o $@
 
diff --git a/tools/mkboot.c b/tools/mkboot.c
new file mode 100644
index 0000000000..e2d971d740
--- /dev/null
+++ b/tools/mkboot.c
@@ -0,0 +1,162 @@
+/***************************************************************************
+ *             __________               __   ___.
+ *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
+ *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
+ *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
+ *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
+ *                     \/            \/     \/    \/            \/
+ * $Id$
+ *
+ * Copyright (C) 2005 by Linus Nielsen Feltzing
+ *
+ * All files in this archive are subject to the GNU General Public License.
+ * See the file COPYING in the source tree root for full license agreement.
+ *
+ * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
+ * KIND, either express or implied.
+ *
+ ****************************************************************************/
+#include <stdio.h>
+#include <stdlib.h>
+
+void usage(void)
+{
+    printf("usage: mkboot <firmware file> <boot file> <output file>\n");
+
+    exit(1);
+}
+
+char image[0x200000 + 0x220 + 0x200000/0x200];
+
+int main(int argc, char *argv[])
+{
+    char *infile, *bootfile, *outfile;
+    FILE *f;
+    long pos;
+    int i;
+    int file_length;
+    int len;
+    int actual_length, total_length, binary_length, num_chksums;
+    
+    if(argc < 3) {
+        usage();
+    }
+
+    infile = argv[1];
+    bootfile = argv[2];
+    outfile = argv[3];
+
+    memset(image, 0xff, sizeof(image));
+
+    /* First, read the iriver original firmware into the image */
+    f = fopen(infile, "rb");
+    if(!f) {
+        perror(infile);
+        exit(1);
+    }
+
+    i = fread(image, 1, 16, f);
+    if(i < 16) {
+        perror(infile);
+        exit(1);
+    }
+
+    /* This is the length of the binary image without the scrambling
+       overhead (but including the ESTFBINR header) */
+    binary_length = image[4] + (image[5] << 8) +
+        (image[6] << 16) + (image[7] << 24);
+
+    /* Read the rest of the binary data, but not the checksum block */
+    len = binary_length+0x200-16;
+    i = fread(image+16, 1, len, f);
+    if(i < len) {
+        perror(infile);
+        exit(1);
+    }
+    
+    fclose(f);
+
+    /* Now, read the boot loader into the image */
+    f = fopen(bootfile, "rb");
+    if(!f) {
+        perror(bootfile);
+        exit(1);
+    }
+
+    fseek(f, 0, SEEK_END);
+    len = ftell(f);
+
+    fseek(f, 0, SEEK_SET);
+
+    i = fread(image+0x220 + 0x1f0000, 1, len, f);
+    if(i < len) {
+        perror(bootfile);
+        exit(1);
+    }
+
+    fclose(f);
+
+    f = fopen(outfile, "wb");
+    if(!f) {
+        perror(outfile);
+        exit(1);
+    }
+
+    /* Patch the reset vector to start the boot loader */
+    image[0x220 + 4] = image[0x1f0000 + 0x220 + 4];
+    image[0x220 + 5] = image[0x1f0000 + 0x220 + 5];
+    image[0x220 + 6] = image[0x1f0000 + 0x220 + 6];
+    image[0x220 + 7] = image[0x1f0000 + 0x220 + 7];
+
+    /* This is the actual length of the binary, excluding all headers */
+    actual_length = 0x1f0000 + len;
+
+    /* Patch the ESTFBINR header */
+    image[0x20c] = (actual_length >> 24) & 0xff;
+    image[0x20d] = (actual_length >> 16) & 0xff;
+    image[0x20e] = (actual_length >> 8) & 0xff;
+    image[0x20f] = actual_length & 0xff;
+    
+    image[0x21c] = (actual_length >> 24) & 0xff;
+    image[0x21d] = (actual_length >> 16) & 0xff;
+    image[0x21e] = (actual_length >> 8) & 0xff;
+    image[0x21f] = actual_length & 0xff;
+
+    /* This is the length of the binary, including the ESTFBINR header and
+       rounded up to the nearest 0x200 boundary */
+    binary_length = (actual_length + 0x20 + 0x1ff) & 0xfffffe00;
+
+    /* The number of checksums, i.e number of 0x200 byte blocks */
+    num_chksums = binary_length / 0x200;
+
+    /* The total file length, including all headers and checksums */
+    total_length = binary_length + num_chksums + 0x200;
+
+    /* Patch the scrambler header with the new length info */
+    image[0] = total_length & 0xff;
+    image[1] = (total_length >> 8) & 0xff;
+    image[2] = (total_length >> 16) & 0xff;
+    image[3] = (total_length >> 24) & 0xff;
+    
+    image[4] = binary_length & 0xff;
+    image[5] = (binary_length >> 8) & 0xff;
+    image[6] = (binary_length >> 16) & 0xff;
+    image[7] = (binary_length >> 24) & 0xff;
+    
+    image[8] = num_chksums & 0xff;
+    image[9] = (num_chksums >> 8) & 0xff;
+    image[10] = (num_chksums >> 16) & 0xff;
+    image[11] = (num_chksums >> 24) & 0xff;
+    
+    i = fwrite(image, 1, total_length, f);
+    if(i < total_length) {
+        perror(outfile);
+        exit(1);
+    }
+
+    printf("Wrote 0x%x bytes in %s\n", total_length, outfile);
+    
+    fclose(f);
+    
+    return 0;
+}