bootloader/ipod.c

   1 /***************************************************************************
   2  *             __________               __   ___.
   3  *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
   4  *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
   5  *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
   6  *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
   7  *                     \/            \/     \/    \/            \/
   8  * $Id$
   9  *
  10  * Copyright (C) 2005 by Dave Chapman
  11  *
  12  * Based on Rockbox iriver bootloader by Linus Nielsen Feltzing
  13  * and the ipodlinux bootloader by Daniel Palffy and Bernard Leach
  14  *
  15  * This program is free software; you can redistribute it and/or
  16  * modify it under the terms of the GNU General Public License
  17  * as published by the Free Software Foundation; either version 2
  18  * of the License, or (at your option) any later version.
  19  *
  20  * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
  21  * KIND, either express or implied.
  22  *
  23  ****************************************************************************/
  24 #include "config.h"
  25
  26 #include <stdlib.h>
  27 #include <stdio.h>
  28 #include <string.h>
  29 #include <stdarg.h>
  30 #include "cpu.h"
  31 #include "system.h"
  32 #include "lcd.h"
  33 #include "kernel.h"
  34 #include "thread.h"
  35 #include "ata.h"
  36 #include "fat.h"
  37 #include "disk.h"
  38 #include "font.h"
  39 #include "adc.h"
  40 #include "backlight.h"
  41 #include "panic.h"
  42 #include "power.h"
  43 #include "file.h"
  44 #include "common.h"
  45 #include "hwcompat.h"
  46
  47 #define XSC(X) #X
  48 #define SC(X) XSC(X)
  49
  50 /* Maximum allowed firmware image size. The largest known current
  51    (December 2006) firmware is about 7.5MB (Apple's firmware for the ipod video)
  52    so we set this to 8MB. */
  53 #define MAX_LOADSIZE (8*1024*1024)
  54
  55 /* A buffer to load the Linux kernel or Rockbox into */
  56 unsigned char *loadbuffer = (unsigned char *)DRAM_START;
  57
  58 /* Bootloader version */
  59 char version[] = APPSVERSION;
  60
  61 #define BUTTON_LEFT  1
  62 #define BUTTON_MENU  2
  63 #define BUTTON_RIGHT 3
  64 #define BUTTON_PLAY  4
  65 #define BUTTON_HOLD  5
  66
  67 #if CONFIG_KEYPAD == IPOD_4G_PAD && !defined(IPOD_MINI)
  68 /* check if number of seconds has past */
  69 int timer_check(int clock_start, unsigned int usecs)
  70 {
  71     if ((USEC_TIMER - clock_start) >= usecs) {
  72         return 1;
  73     } else {
  74         return 0;
  75     }
  76 }
  77
  78 static void ser_opto_keypad_cfg(int val)
  79 {
  80     int start_time;
  81
  82     GPIOB_ENABLE &=~ 0x80;
  83
  84     outl(inl(0x7000c104) | 0xc000000, 0x7000c104);
  85     outl(val, 0x7000c120);
  86     outl(inl(0x7000c100) | 0x80000000, 0x7000c100);
  87
  88     GPIOB_OUTPUT_VAL &=~ 0x10;
  89     GPIOB_OUTPUT_EN  |=  0x10;
  90
  91     start_time = USEC_TIMER;
  92     do {
  93         if ((inl(0x7000c104) & 0x80000000) == 0) {
  94             break;
  95         }
  96     } while (timer_check(start_time, 1500) != 0);
  97
  98     outl(inl(0x7000c100) & ~0x80000000, 0x7000c100);
  99
 100     GPIOB_ENABLE     |= 0x80;
 101     GPIOB_OUTPUT_VAL |= 0x10;
 102     GPIOB_OUTPUT_EN  &=~0x10;
 103
 104     outl(inl(0x7000c104) | 0xc000000, 0x7000c104);
 105     outl(inl(0x7000c100) | 0x60000000, 0x7000c100);
 106 }
 107
 108 int opto_keypad_read(void)
 109 {
 110     int loop_cnt, had_io = 0;
 111
 112     for (loop_cnt = 5; loop_cnt != 0;)
 113     {
 114         int key_pressed = 0;
 115         int start_time;
 116         unsigned int key_pad_val;
 117
 118         ser_opto_keypad_cfg(0x8000023a);
 119
 120         start_time = USEC_TIMER;
 121         do {
 122             if (inl(0x7000c104) & 0x4000000) {
 123                 had_io = 1;
 124                 break;
 125             }
 126
 127             if (had_io != 0) {
 128                 break;
 129             }
 130         } while (timer_check(start_time, 1500) != 0);
 131
 132         key_pad_val = inl(0x7000c140);
 133         if ((key_pad_val & ~0x7fff0000) != 0x8000023a) {
 134             loop_cnt--;
 135         } else {
 136             key_pad_val = (key_pad_val << 11) >> 27;
 137             key_pressed = 1;
 138         }
 139
 140         outl(inl(0x7000c100) | 0x60000000, 0x7000c100);
 141         outl(inl(0x7000c104) | 0xc000000, 0x7000c104);
 142
 143         if (key_pressed != 0) {
 144             return key_pad_val ^ 0x1f;
 145         }
 146     }
 147
 148     return 0;
 149 }
 150 #endif
 151
 152 static int key_pressed(void)
 153 {
 154     unsigned char state;
 155
 156 #if CONFIG_KEYPAD == IPOD_4G_PAD
 157 #ifdef IPOD_MINI /* mini 1G only */
 158     state = GPIOA_INPUT_VAL & 0x3f;
 159     if ((state & 0x10) == 0) return BUTTON_LEFT;
 160     if ((state & 0x2) == 0) return BUTTON_MENU;
 161     if ((state & 0x4) == 0) return BUTTON_PLAY;
 162     if ((state & 0x8) == 0) return BUTTON_RIGHT;
 163 #else
 164     state = opto_keypad_read();
 165     if ((state & 0x4) == 0) return BUTTON_LEFT;
 166     if ((state & 0x10) == 0) return BUTTON_MENU;
 167     if ((state & 0x8) == 0) return BUTTON_PLAY;
 168     if ((state & 0x2) == 0) return BUTTON_RIGHT;
 169 #endif
 170 #elif (CONFIG_KEYPAD == IPOD_3G_PAD) || (CONFIG_KEYPAD == IPOD_1G2G_PAD)
 171     state = GPIOA_INPUT_VAL;
 172     if ((state & 0x08) == 0) return BUTTON_LEFT;
 173     if ((state & 0x10) == 0) return BUTTON_MENU;
 174     if ((state & 0x04) == 0) return BUTTON_PLAY;
 175     if ((state & 0x01) == 0) return BUTTON_RIGHT;
 176 #endif
 177     return 0;
 178 }
 179
 180 bool button_hold(void)
 181 {
 182 #if CONFIG_KEYPAD == IPOD_1G2G_PAD
 183     return (GPIOA_INPUT_VAL & 0x20);
 184 #else
 185     return !(GPIOA_INPUT_VAL & 0x20);
 186 #endif
 187 }
 188
 189 void fatal_error(void)
 190 {
 191     extern int line;
 192     bool holdstatus=false;
 193
 194     /* System font is 6 pixels wide */
 195 #if defined(IPOD_1G2G) || defined(IPOD_3G)
 196     printf("Hold MENU+PLAY to");
 197     printf("reboot then REW+FF");
 198     printf("for disk mode");
 199 #elif LCD_WIDTH >= (30*6)
 200     printf("Hold MENU+SELECT to reboot");
 201     printf("then SELECT+PLAY for disk mode");
 202 #else
 203     printf("Hold MENU+SELECT to");
 204     printf("reboot then SELECT+PLAY");
 205     printf("for disk mode");
 206 #endif
 207     lcd_update();
 208
 209     while (1) {
 210         if (button_hold() != holdstatus) {
 211             if (button_hold()) {
 212                 holdstatus=true;
 213                 lcd_puts(0, line, "Hold switch on!");
 214             } else {
 215                 holdstatus=false;
 216                 lcd_puts(0, line, "               ");
 217             }
 218             lcd_update();
 219         }
 220         udelay(100000); /* 100ms */
 221     }
 222
 223 }
 224
 225
 226 void* main(void)
 227 {
 228     char buf[256];
 229     int i;
 230     int btn;
 231     int rc;
 232     bool haveretailos;
 233     bool button_was_held;
 234     struct partinfo* pinfo;
 235     unsigned short* identify_info;
 236
 237     /* Check the button hold status as soon as possible - to
 238        give the user maximum chance to turn it off in order to
 239        reset the settings in rockbox. */
 240     button_was_held = button_hold();
 241
 242     system_init();
 243     kernel_init();
 244
 245 #ifndef HAVE_BACKLIGHT_INVERSION
 246     backlight_init(); /* Turns on the backlight */
 247 #endif
 248
 249     lcd_init();
 250     font_init();
 251
 252 #ifdef HAVE_LCD_COLOR
 253     lcd_set_foreground(LCD_WHITE);
 254     lcd_set_background(LCD_BLACK);
 255     lcd_clear_display();
 256 #endif
 257
 258 #if 0
 259     /* ADC and button drivers are not yet implemented */
 260     adc_init();
 261     button_init();
 262 #endif
 263
 264     btn=key_pressed();
 265
 266     /* Enable bootloader messages */
 267     if (btn==BUTTON_RIGHT)
 268         verbose = true;
 269
 270     lcd_setfont(FONT_SYSFIXED);
 271
 272     printf("Rockbox boot loader");
 273     printf("Version: %s", version);
 274     printf("IPOD version: 0x%08x", IPOD_HW_REVISION);
 275
 276     i=ata_init();
 277     if (i==0) {
 278       identify_info=ata_get_identify();
 279       /* Show model */
 280       for (i=0; i < 20; i++) {
 281         ((unsigned short*)buf)[i]=htobe16(identify_info[i+27]);
 282       }
 283       buf[40]=0;
 284       for (i=39; i && buf[i]==' '; i--) {
 285         buf[i]=0;
 286       }
 287       printf(buf);
 288     } else {
 289       printf("ATA: %d", i);
 290     }
 291
 292     disk_init();
 293     rc = disk_mount_all();
 294     if (rc<=0)
 295     {
 296         printf("No partition found");
 297         fatal_error();
 298     }
 299
 300     pinfo = disk_partinfo(1);
 301     printf("Partition 1: 0x%02x %ld sectors",
 302            pinfo->type, pinfo->size);
 303
 304     if (button_was_held || (btn==BUTTON_MENU)) {
 305         /* If either the hold switch was on, or the Menu button was held, then
 306            try the Apple firmware */
 307
 308         printf("Loading original firmware...");
 309
 310         /* First try an apple_os.ipod file on the FAT32 partition
 311            (either in .rockbox or the root)
 312          */
 313
 314         rc=load_firmware(loadbuffer, "apple_os.ipod", MAX_LOADSIZE);
 315
 316         if (rc == EOK) {
 317             printf("apple_os.ipod loaded.");
 318             return (void*)DRAM_START;
 319         } else if (rc == EFILE_NOT_FOUND) {
 320             /* If apple_os.ipod doesn't exist, then check if there is an Apple
 321                firmware image in RAM  */
 322             haveretailos = (memcmp((void*)(DRAM_START+0x20),"portalplayer",12)==0);
 323             if (haveretailos) {
 324                 /* We have a copy of the retailos in RAM, lets just run it. */
 325                 return (void*)DRAM_START;
 326             }
 327         } else if (rc < EFILE_NOT_FOUND) {
 328             printf("Error!");
 329             printf("Can't load apple_os.ipod:");
 330             printf(strerror(rc));
 331         }
 332
 333         /* Everything failed - just loop forever */
 334         printf("No RetailOS detected");
 335
 336     } else if (btn==BUTTON_PLAY) {
 337         printf("Loading Linux...");
 338         rc=load_raw_firmware(loadbuffer, "/linux.bin", MAX_LOADSIZE);
 339         if (rc < EOK) {
 340             printf("Error!");
 341             printf("Can't load linux.bin:");
 342             printf(strerror(rc));
 343         } else {
 344             return (void*)DRAM_START;
 345         }
 346     } else {
 347         printf("Loading Rockbox...");
 348         rc=load_firmware(loadbuffer, BOOTFILE, MAX_LOADSIZE);
 349         if (rc < EOK) {
 350             printf("Error!");
 351             printf("Can't load " BOOTFILE ": ");
 352             printf(strerror(rc));
 353         } else {
 354             printf("Rockbox loaded.");
 355             return (void*)DRAM_START;
 356         }
 357     }
 358
 359     /* If we get to here, then we haven't been able to load any firmware */
 360     fatal_error();
 361
 362     /* We never get here, but keep gcc happy */
 363     return (void*)0;
 364 }
 365
 366 /* These functions are present in the firmware library, but we reimplement
 367    them here because the originals do a lot more than we want */
 368 void usb_acknowledge(void)
 369 {
 370 }
 371
 372 void usb_wait_for_disconnect(void)
 373 {
 374 }