iRiver Boot loader
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@5694 a1c6a512-1295-4272-9138-f99709370657
diff --git a/bootloader/main.c b/bootloader/main.c
new file mode 100644
index 0000000..5cc2eda
--- /dev/null
+++ b/bootloader/main.c
@@ -0,0 +1,233 @@
+/***************************************************************************
+ * __________ __ ___.
+ * 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 "config.h"
+
+#include <stdlib.h>
+#include <stdio.h>
+#include "cpu.h"
+#include "system.h"
+#include "lcd.h"
+#include "kernel.h"
+#include "thread.h"
+#include "ata.h"
+#include "disk.h"
+#include "font.h"
+#include "adc.h"
+#include "backlight.h"
+#include "button.h"
+#include "panic.h"
+#include "power.h"
+#include "file.h"
+
+int line = 0;
+
+int usb_screen(void)
+{
+ return 0;
+}
+
+void start_iriver_fw(void)
+{
+ asm(" move.w #0x2700,%sr");
+ asm(" move.l #0,%d0");
+ asm(" movec.l %d0,%vbr");
+ asm(" move.l 0,%sp");
+ asm(" lea.l 8,%a0");
+ asm(" jmp (%a0)");
+}
+
+int load_firmware(void)
+{
+ int fd;
+ int rc;
+ int len;
+ unsigned long chksum;
+ unsigned long sum;
+ int i;
+ unsigned char *buf = (unsigned char *)0x30000000;
+ char str[80];
+
+ fd = open("/rockbox.bin", O_RDONLY);
+ if(fd < 0)
+ return -1;
+
+ len = lseek(fd, 0, SEEK_END) - 8;
+
+ snprintf(str, 80, "Length: %x", len);
+ lcd_puts(0, line++, str);
+ lcd_update();
+
+ lseek(fd, 0, SEEK_SET);
+
+ rc = read(fd, &chksum, 4);
+ if(rc < 4)
+ return -2;
+
+ snprintf(str, 80, "Checksum: %x", chksum);
+ lcd_puts(0, line++, str);
+ lcd_update();
+
+ lseek(fd, 4, SEEK_CUR);
+
+ rc = read(fd, buf, len);
+ if(rc < len)
+ return -4;
+
+ close(fd);
+
+ sum = 0;
+
+ for(i = 0;i < len;i++) {
+ sum += buf[i];
+ }
+
+ snprintf(str, 80, "Sum: %x", sum);
+ lcd_puts(0, line++, str);
+ lcd_update();
+
+ if(sum != chksum)
+ return -5;
+
+ return 0;
+}
+
+void start_firmware(void)
+{
+ asm(" move.w #0x2700,%sr");
+ asm(" move.l #0x30000000,%d0");
+ asm(" movec.l %d0,%vbr");
+ asm(" move.l 0x30000000,%sp");
+ asm(" move.l 0x30000004,%a0");
+ asm(" jmp (%a0)");
+}
+
+int main(void)
+{
+ int i;
+ int rc;
+ int button;
+ char buf[256];
+
+ power_init();
+ system_init();
+ kernel_init();
+ backlight_init();
+ set_irq_level(0);
+ lcd_init();
+ font_init();
+ adc_init();
+ button_init();
+
+ lcd_setfont(FONT_SYSFIXED);
+
+ sleep(HZ/10); /* Allow the button driver to check the buttons */
+
+ if(button_status() & BUTTON_REC) {
+ lcd_puts(0, 8, "Ninjax");
+ lcd_update();
+ sleep(HZ);
+ start_iriver_fw();
+ }
+
+ GPIO_FUNCTION |= 0x40000040;
+ GPIO1_FUNCTION |= 0x00000062;
+
+ GPIO1_ENABLE |= 0x00000000;
+
+ IDECONFIG1 = 0x00107000;
+ IDECONFIG2 = 0x00040000;
+
+ /* Hard drive power */
+ GPIO_OUT &= ~0x00000040;
+ GPIO_ENABLE |= 0x00040240;
+ GPIO_FUNCTION |= 0x00040200;
+
+ rc = ata_init();
+ if(rc)
+ {
+#ifdef HAVE_LCD_BITMAP
+ char str[32];
+ lcd_clear_display();
+ snprintf(str, 31, "ATA error: %d", rc);
+ lcd_puts(0, 1, str);
+ lcd_puts(0, 3, "Press ON to debug");
+ lcd_update();
+ while(!(button_get(true) & BUTTON_REL));
+#endif
+ panicf("ata: %d", rc);
+ }
+
+ disk_init();
+
+ /* FixMe: the same kind of mounting happens in usb.c, share the code. */
+ rc = disk_mount_all();
+ if (rc<=0)
+ {
+ lcd_clear_display();
+ lcd_puts(0, 0, "No partition");
+ lcd_puts(0, 1, "found.");
+ while(button_get(true) != SYS_USB_CONNECTED) {};
+ }
+
+ lcd_puts(0, line++, "Loading firmware");
+ i = load_firmware();
+ snprintf(buf, 256, "Result: %d", i);
+ lcd_puts(0, line++, buf);
+ lcd_update();
+
+ if(i == 0)
+ start_firmware();
+
+ while(1) {
+ button = button_get_w_tmo(HZ/2);
+ if(button)
+ {
+ if(button == (BUTTON_OFF | BUTTON_REPEAT))
+ power_off();
+ }
+ }
+}
+
+/* These functions are present in the firmware library, but we reimplement
+ them here because the originals do a lot more than we want */
+
+void reset_poweroff_timer(void)
+{
+}
+
+void screen_dump(void)
+{
+}
+
+int dbg_ports(void)
+{
+ return 0;
+}
+
+void mpeg_stop(void)
+{
+}
+
+void usb_acknowledge(void)
+{
+}
+
+void usb_wait_for_disconnect(void)
+{
+}