| /*************************************************************************** |
| * __________ __ ___. |
| * Open \______ \ ____ ____ | | _\_ |__ _______ ___ |
| * Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ / |
| * Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < < |
| * Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \ |
| * \/ \/ \/ \/ \/ |
| * $Id$ |
| * |
| * Copyright (C) 2005 by Dave Chapman |
| * |
| * Based on Rockbox iriver bootloader by Linus Nielsen Feltzing |
| * and the ipodlinux bootloader by Daniel Palffy and Bernard Leach |
| * |
| * 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 <string.h> |
| #include <stdarg.h> |
| #include "cpu.h" |
| #include "system.h" |
| #include "lcd.h" |
| #include "kernel.h" |
| #include "thread.h" |
| #include "ata.h" |
| #include "fat.h" |
| #include "disk.h" |
| #include "font.h" |
| #include "adc.h" |
| #include "backlight.h" |
| #include "panic.h" |
| #include "power.h" |
| #include "file.h" |
| #include "common.h" |
| |
| #define XSC(X) #X |
| #define SC(X) XSC(X) |
| |
| /* Maximum allowed firmware image size. The largest known current |
| (December 2006) firmware is about 7.5MB (Apple's firmware for the ipod video) |
| so we set this to 8MB. */ |
| #define MAX_LOADSIZE (8*1024*1024) |
| |
| /* A buffer to load the Linux kernel or Rockbox into */ |
| unsigned char *loadbuffer = (unsigned char *)DRAM_START; |
| |
| /* Bootloader version */ |
| char version[] = APPSVERSION; |
| |
| #define IPOD_HW_REVISION (*((volatile unsigned long*)(0x00002084))) |
| |
| /* We copy the hardware revision to the last four bytes of SDRAM and then |
| re-read it after we have re-mapped SDRAM to 0x0 in Rockbox */ |
| #define TMP_IPOD_HW_REVISION (*((volatile unsigned long*)(0x11fffffc))) |
| |
| #define BUTTON_LEFT 1 |
| #define BUTTON_MENU 2 |
| #define BUTTON_RIGHT 3 |
| #define BUTTON_PLAY 4 |
| #define BUTTON_HOLD 5 |
| |
| #if CONFIG_KEYPAD == IPOD_4G_PAD && !defined(IPOD_MINI) |
| /* check if number of seconds has past */ |
| int timer_check(int clock_start, unsigned int usecs) |
| { |
| if ((USEC_TIMER - clock_start) >= usecs) { |
| return 1; |
| } else { |
| return 0; |
| } |
| } |
| |
| static void ser_opto_keypad_cfg(int val) |
| { |
| int start_time; |
| |
| outl(inl(0x6000d004) & ~0x80, 0x6000d004); |
| |
| outl(inl(0x7000c104) | 0xc000000, 0x7000c104); |
| outl(val, 0x7000c120); |
| outl(inl(0x7000c100) | 0x80000000, 0x7000c100); |
| |
| outl(inl(0x6000d024) & ~0x10, 0x6000d024); |
| outl(inl(0x6000d014) | 0x10, 0x6000d014); |
| |
| start_time = USEC_TIMER; |
| do { |
| if ((inl(0x7000c104) & 0x80000000) == 0) { |
| break; |
| } |
| } while (timer_check(start_time, 1500) != 0); |
| |
| outl(inl(0x7000c100) & ~0x80000000, 0x7000c100); |
| |
| outl(inl(0x6000d004) | 0x80, 0x6000d004); |
| outl(inl(0x6000d024) | 0x10, 0x6000d024); |
| outl(inl(0x6000d014) & ~0x10, 0x6000d014); |
| |
| outl(inl(0x7000c104) | 0xc000000, 0x7000c104); |
| outl(inl(0x7000c100) | 0x60000000, 0x7000c100); |
| } |
| |
| int opto_keypad_read(void) |
| { |
| int loop_cnt, had_io = 0; |
| |
| for (loop_cnt = 5; loop_cnt != 0;) |
| { |
| int key_pressed = 0; |
| int start_time; |
| unsigned int key_pad_val; |
| |
| ser_opto_keypad_cfg(0x8000023a); |
| |
| start_time = USEC_TIMER; |
| do { |
| if (inl(0x7000c104) & 0x4000000) { |
| had_io = 1; |
| break; |
| } |
| |
| if (had_io != 0) { |
| break; |
| } |
| } while (timer_check(start_time, 1500) != 0); |
| |
| key_pad_val = inl(0x7000c140); |
| if ((key_pad_val & ~0x7fff0000) != 0x8000023a) { |
| loop_cnt--; |
| } else { |
| key_pad_val = (key_pad_val << 11) >> 27; |
| key_pressed = 1; |
| } |
| |
| outl(inl(0x7000c100) | 0x60000000, 0x7000c100); |
| outl(inl(0x7000c104) | 0xc000000, 0x7000c104); |
| |
| if (key_pressed != 0) { |
| return key_pad_val ^ 0x1f; |
| } |
| } |
| |
| return 0; |
| } |
| #endif |
| |
| static int key_pressed(void) |
| { |
| unsigned char state; |
| |
| #if CONFIG_KEYPAD == IPOD_4G_PAD |
| #ifdef IPOD_MINI /* mini 1G only */ |
| state = GPIOA_INPUT_VAL & 0x3f; |
| if ((state & 0x10) == 0) return BUTTON_LEFT; |
| if ((state & 0x2) == 0) return BUTTON_MENU; |
| if ((state & 0x4) == 0) return BUTTON_PLAY; |
| if ((state & 0x8) == 0) return BUTTON_RIGHT; |
| #else |
| state = opto_keypad_read(); |
| if ((state & 0x4) == 0) return BUTTON_LEFT; |
| if ((state & 0x10) == 0) return BUTTON_MENU; |
| if ((state & 0x8) == 0) return BUTTON_PLAY; |
| if ((state & 0x2) == 0) return BUTTON_RIGHT; |
| #endif |
| #elif CONFIG_KEYPAD == IPOD_3G_PAD |
| state = inb(0xcf000030); |
| if (((state & 0x20) == 0)) return BUTTON_HOLD; /* hold on */ |
| if ((state & 0x08) == 0) return BUTTON_LEFT; |
| if ((state & 0x10) == 0) return BUTTON_MENU; |
| if ((state & 0x04) == 0) return BUTTON_PLAY; |
| if ((state & 0x01) == 0) return BUTTON_RIGHT; |
| #endif |
| return 0; |
| } |
| |
| /* This function is the same on all ipods */ |
| bool button_hold(void) |
| { |
| return (GPIOA_INPUT_VAL & 0x20)?false:true; |
| } |
| |
| void fatal_error(void) |
| { |
| extern int line; |
| bool holdstatus=false; |
| |
| /* System font is 6 pixels wide */ |
| #if LCD_WIDTH >= (30*6) |
| printf("Press MENU+SELECT to reboot"); |
| printf("then SELECT+PLAY for disk mode"); |
| #else |
| printf("Press MENU+SELECT to"); |
| printf("reboot then SELECT+PLAY"); |
| printf("for disk mode"); |
| #endif |
| |
| while (1) { |
| if (button_hold() != holdstatus) { |
| if (button_hold()) { |
| holdstatus=true; |
| lcd_puts(0, line, "Hold switch on!"); |
| } else { |
| holdstatus=false; |
| lcd_puts(0, line, " "); |
| } |
| lcd_update(); |
| } |
| udelay(100000); /* 100ms */ |
| } |
| |
| } |
| |
| |
| void* main(void) |
| { |
| char buf[256]; |
| int i; |
| int rc; |
| bool haveretailos; |
| bool button_was_held; |
| struct partinfo* pinfo; |
| unsigned short* identify_info; |
| |
| /* Check the button hold status as soon as possible - to |
| give the user maximum chance to turn it off in order to |
| reset the settings in rockbox. */ |
| button_was_held = button_hold(); |
| |
| /* Turn on the backlight */ |
| |
| #if CONFIG_BACKLIGHT==BL_IPOD4G |
| /* brightness full */ |
| outl(0x80000000 | (0xff << 16), 0x7000a010); |
| |
| /* set port B03 on */ |
| outl(((0x100 | 1) << 3), 0x6000d824); |
| |
| #elif CONFIG_BACKLIGHT==BL_IPODMINI |
| /* set port B03 on */ |
| outl(((0x100 | 1) << 3), 0x6000d824); |
| |
| #elif CONFIG_BACKLIGHT==BL_IPODNANO |
| |
| /* set port B03 on */ |
| outl(((0x100 | 1) << 3), 0x6000d824); |
| |
| /* set port L07 on */ |
| outl(((0x100 | 1) << 7), 0x6000d12c); |
| #elif CONFIG_BACKLIGHT==BL_IPOD3G |
| outl(inl(IPOD_LCD_BASE) | 0x2, IPOD_LCD_BASE); |
| #endif |
| |
| TMP_IPOD_HW_REVISION = IPOD_HW_REVISION; |
| ipod_hw_rev = IPOD_HW_REVISION; |
| |
| system_init(); |
| kernel_init(); |
| lcd_init(); |
| font_init(); |
| |
| #ifdef HAVE_LCD_COLOR |
| lcd_set_foreground(LCD_WHITE); |
| lcd_set_background(LCD_BLACK); |
| lcd_clear_display(); |
| #endif |
| |
| #if 0 |
| /* ADC and button drivers are not yet implemented */ |
| adc_init(); |
| button_init(); |
| #endif |
| |
| |
| lcd_setfont(FONT_SYSFIXED); |
| |
| printf("Rockbox boot loader"); |
| printf("Version: 20%s", version); |
| printf("IPOD version: 0x%08x", IPOD_HW_REVISION); |
| |
| i=ata_init(); |
| if (i==0) { |
| identify_info=ata_get_identify(); |
| /* Show model */ |
| for (i=0; i < 20; i++) { |
| ((unsigned short*)buf)[i]=htobe16(identify_info[i+27]); |
| } |
| buf[40]=0; |
| for (i=39; i && buf[i]==' '; i--) { |
| buf[i]=0; |
| } |
| printf(buf); |
| } else { |
| printf("ATA: %d", i); |
| } |
| |
| disk_init(); |
| rc = disk_mount_all(); |
| if (rc<=0) |
| { |
| printf("No partition found"); |
| fatal_error(); |
| } |
| |
| pinfo = disk_partinfo(1); |
| printf("Partition 1: 0x%02x %ld MB", |
| pinfo->type, pinfo->size / 2048); |
| |
| |
| /* Check for a keypress */ |
| i=key_pressed(); |
| |
| if (button_was_held || (i==BUTTON_MENU)) { |
| /* If either the hold switch was on, or the Menu button was held, then |
| try the Apple firmware */ |
| |
| printf("Loading original firmware..."); |
| |
| /* First try an apple_os.ipod file on the FAT32 partition |
| (either in .rockbox or the root) |
| */ |
| |
| rc=load_firmware(loadbuffer, "apple_os.ipod", MAX_LOADSIZE); |
| |
| if(rc==EFILE_NOT_FOUND) { |
| /* If apple_os.ipod doesn't exist, then check if there is an Apple |
| firmware image in RAM */ |
| haveretailos = (memcmp((void*)(DRAM_START+0x20),"portalplayer",12)==0); |
| if (haveretailos) { |
| /* We have a copy of the retailos in RAM, lets just run it. */ |
| return (void*)DRAM_START; |
| } |
| } else if (rc < EFILE_NOT_FOUND) { |
| printf("Error!"); |
| printf("Can't load apple_os.ipod:"); |
| printf(strerror(rc)); |
| } else if (rc > 0) { |
| printf("apple_os.ipod loaded."); |
| return (void*)DRAM_START; |
| } |
| |
| /* Everything failed - just loop forever */ |
| printf("No RetailOS detected"); |
| |
| } else if (i==BUTTON_PLAY) { |
| printf("Loading Linux..."); |
| rc=load_raw_firmware(loadbuffer, "/linux.bin", MAX_LOADSIZE); |
| if (rc < EOK) { |
| printf("Error!"); |
| printf("Can't load linux.bin:"); |
| printf(strerror(rc)); |
| } else { |
| return (void*)DRAM_START; |
| } |
| } else { |
| printf("Loading Rockbox..."); |
| rc=load_firmware(loadbuffer, BOOTFILE, MAX_LOADSIZE); |
| if (rc < EOK) { |
| printf("Error!"); |
| printf("Can't load rockbox.ipod:"); |
| printf(strerror(rc)); |
| } else { |
| printf("Rockbox loaded."); |
| return (void*)DRAM_START; |
| } |
| } |
| |
| /* If we get to here, then we haven't been able to load any firmware */ |
| fatal_error(); |
| |
| /* We never get here, but keep gcc happy */ |
| return (void*)0; |
| } |
| |
| /* These functions are present in the firmware library, but we reimplement |
| them here because the originals do a lot more than we want */ |
| void usb_acknowledge(void) |
| { |
| } |
| |
| void usb_wait_for_disconnect(void) |
| { |
| } |