| /*************************************************************************** |
| * __________ __ ___. |
| * 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-target.h" |
| #include "panic.h" |
| #include "power.h" |
| #include "file.h" |
| #include "common.h" |
| #include "hwcompat.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 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; |
| |
| GPIOB_ENABLE &=~ 0x80; |
| |
| outl(inl(0x7000c104) | 0xc000000, 0x7000c104); |
| outl(val, 0x7000c120); |
| outl(inl(0x7000c100) | 0x80000000, 0x7000c100); |
| |
| GPIOB_OUTPUT_VAL &=~ 0x10; |
| GPIOB_OUTPUT_EN |= 0x10; |
| |
| start_time = USEC_TIMER; |
| do { |
| if ((inl(0x7000c104) & 0x80000000) == 0) { |
| break; |
| } |
| } while (timer_check(start_time, 1500) != 0); |
| |
| outl(inl(0x7000c100) & ~0x80000000, 0x7000c100); |
| |
| GPIOB_ENABLE |= 0x80; |
| GPIOB_OUTPUT_VAL |= 0x10; |
| GPIOB_OUTPUT_EN &=~0x10; |
| |
| 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) || (CONFIG_KEYPAD == IPOD_1G2G_PAD) |
| state = GPIOA_INPUT_VAL; |
| 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; |
| } |
| |
| bool button_hold(void) |
| { |
| #if CONFIG_KEYPAD == IPOD_1G2G_PAD |
| return (GPIOA_INPUT_VAL & 0x20); |
| #else |
| return !(GPIOA_INPUT_VAL & 0x20); |
| #endif |
| } |
| |
| void fatal_error(void) |
| { |
| extern int line; |
| bool holdstatus=false; |
| |
| /* System font is 6 pixels wide */ |
| #if defined(IPOD_1G2G) || defined(IPOD_3G) |
| printf("Hold MENU+PLAY to"); |
| printf("reboot then REW+FF"); |
| printf("for disk mode"); |
| #elif LCD_WIDTH >= (30*6) |
| printf("Hold MENU+SELECT to reboot"); |
| printf("then SELECT+PLAY for disk mode"); |
| #else |
| printf("Hold MENU+SELECT to"); |
| printf("reboot then SELECT+PLAY"); |
| printf("for disk mode"); |
| #endif |
| lcd_update(); |
| |
| 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 btn; |
| 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(); |
| |
| #ifndef HAVE_BACKLIGHT_INVERSION |
| /* Turn on the backlight */ |
| __backlight_on(); |
| #endif |
| |
| 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 |
| |
| btn=key_pressed(); |
| |
| /* Enable bootloader messages */ |
| if (btn==BUTTON_RIGHT) |
| verbose = true; |
| |
| lcd_setfont(FONT_SYSFIXED); |
| |
| printf("Rockbox boot loader"); |
| printf("Version: %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); |
| |
| if (button_was_held || (btn==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 == EOK) { |
| printf("apple_os.ipod loaded."); |
| return (void*)DRAM_START; |
| } else 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)); |
| } |
| |
| /* Everything failed - just loop forever */ |
| printf("No RetailOS detected"); |
| |
| } else if (btn==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) |
| { |
| } |