bootloader/iriver_h300.c

   1 /***************************************************************************
   2  *             __________               __   ___.
   3  *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
   4  *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
   5  *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
   6  *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
   7  *                     \/            \/     \/    \/            \/
   8  * $Id$
   9  *
  10  * Copyright (C) 2007 by Linus Nielsen Feltzing
  11  *
  12  * All files in this archive are subject to the GNU General Public License.
  13  * See the file COPYING in the source tree root for full license agreement.
  14  *
  15  * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
  16  * KIND, either express or implied.
  17  *
  18  ****************************************************************************/
  19 #include "config.h"
  20
  21 #include <stdlib.h>
  22 #include <stdio.h>
  23 #include "inttypes.h"
  24 #include "string.h"
  25 #include "cpu.h"
  26 #include "system.h"
  27 #include "lcd.h"
  28 #include "lcd-remote.h"
  29 #include "scroll_engine.h"
  30 #include "kernel.h"
  31 #include "thread.h"
  32 #include "ata.h"
  33 #include "usb.h"
  34 #include "disk.h"
  35 #include "font.h"
  36 #include "adc.h"
  37 #include "backlight.h"
  38 #include "backlight-target.h"
  39 #include "button.h"
  40 #include "panic.h"
  41 #include "power.h"
  42 #include "powermgmt.h"
  43 #include "file.h"
  44 #include "uda1380.h"
  45 #include "pcf50606.h"
  46 #include "common.h"
  47 #include "rbunicode.h"
  48 #include "isp1362.h"
  49
  50 #include <stdarg.h>
  51
  52 /* Maximum allowed firmware image size. 10MB is more than enough */
  53 #define MAX_LOADSIZE (10*1024*1024)
  54
  55 #define DRAM_START 0x31000000
  56
  57 char version[] = APPSVERSION;
  58
  59 /* Reset the cookie for the crt0 crash check */
  60 inline void __reset_cookie(void)
  61 {
  62     asm(" move.l #0,%d0");
  63     asm(" move.l %d0,0x10017ffc");
  64 }
  65
  66 void start_iriver_fw(void)
  67 {
  68     asm(" move.w #0x2700,%sr");
  69     __reset_cookie();
  70     asm(" movec.l %d0,%vbr");
  71     asm(" move.l 0,%sp");
  72     asm(" lea.l 8,%a0");
  73     asm(" jmp (%a0)");
  74 }
  75
  76 void start_firmware(void)
  77 {
  78     asm(" move.w #0x2700,%sr");
  79     __reset_cookie();
  80     asm(" move.l %0,%%d0" :: "i"(DRAM_START));
  81     asm(" movec.l %d0,%vbr");
  82     asm(" move.l %0,%%sp" :: "m"(*(int *)DRAM_START));
  83     asm(" move.l %0,%%a0" :: "m"(*(int *)(DRAM_START+4)));
  84     asm(" jmp (%a0)");
  85 }
  86
  87 void shutdown(void)
  88 {
  89     printf("Shutting down...");
  90
  91     /* We need to gracefully spin down the disk to prevent clicks. */
  92     if (ide_powered())
  93     {
  94         /* Make sure ATA has been initialized. */
  95         ata_init();
  96
  97         /* And put the disk into sleep immediately. */
  98         ata_sleepnow();
  99     }
 100
 101     sleep(HZ*2);
 102
 103     __backlight_off();
 104     __remote_backlight_off();
 105
 106     __reset_cookie();
 107     power_off();
 108 }
 109
 110 /* Print the battery voltage (and a warning message). */
 111 void check_battery(void)
 112 {
 113     int battery_voltage, batt_int, batt_frac;
 114
 115     battery_voltage = battery_adc_voltage();
 116     batt_int = battery_voltage / 1000;
 117     batt_frac = (battery_voltage % 1000) / 10;
 118
 119     printf("Batt: %d.%02dV", batt_int, batt_frac);
 120
 121     if (battery_voltage <= 310)
 122     {
 123         printf("WARNING! BATTERY LOW!!");
 124         sleep(HZ*2);
 125     }
 126 }
 127
 128 /* From the pcf50606 driver */
 129 extern unsigned char pcf50606_intregs[3];
 130
 131 /* From common.c */
 132 extern int line;
 133 extern int remote_line;
 134
 135 void main(void)
 136 {
 137     int i;
 138     int rc;
 139     bool rc_on_button = false;
 140     bool on_button = false;
 141     bool rec_button = false;
 142     bool hold_status = false;
 143     int data;
 144     bool rtc_alarm;
 145     int button;
 146
 147     /* We want to read the buttons as early as possible, before the user
 148        releases the ON button */
 149
 150     /* Set GPIO33, GPIO37, GPIO38  and GPIO52 as general purpose inputs
 151        (The ON and Hold buttons on the main unit and the remote) */
 152     or_l(0x00100062, &GPIO1_FUNCTION);
 153     and_l(~0x00100062, &GPIO1_ENABLE);
 154
 155     data = GPIO1_READ;
 156     if ((data & 0x20) == 0)
 157         on_button = true;
 158
 159     if ((data & 0x40) == 0)
 160         rc_on_button = true;
 161
 162     /* Set the default state of the hard drive power to OFF */
 163     ide_power_enable(false);
 164
 165     power_init();
 166
 167     /* Check the interrupt registers if it was an RTC alarm */
 168     rtc_alarm = (pcf50606_intregs[0] & 0x80)?true:false;
 169
 170     /* Turn off if we believe the start was accidental */
 171     if(!(rtc_alarm || on_button || rc_on_button ||
 172          (usb_detect() == USB_INSERTED) || charger_inserted())) {
 173         __reset_cookie();
 174         power_off();
 175     }
 176
 177     audiohw_reset();
 178
 179     /* Start with the main backlight OFF. */
 180     __backlight_init();
 181     __backlight_off();
 182
 183     __remote_backlight_on();
 184
 185     system_init();
 186     kernel_init();
 187
 188     /* Set up waitstates for the peripherals */
 189     set_cpu_frequency(0); /* PLL off */
 190     coldfire_set_pllcr_audio_bits(DEFAULT_PLLCR_AUDIO_BITS);
 191     set_irq_level(0);
 192
 193     isp1362_init();
 194
 195     adc_init();
 196     button_init();
 197
 198     backlight_init();
 199
 200     lcd_init();
 201     lcd_remote_init();
 202     font_init();
 203
 204     lcd_setfont(FONT_SYSFIXED);
 205
 206     printf("Rockbox boot loader");
 207     printf("Version %s", version);
 208
 209     sleep(HZ/50); /* Allow the button driver to check the buttons */
 210     rec_button = ((button_status() & BUTTON_REC) == BUTTON_REC)
 211         || ((button_status() & BUTTON_RC_REC) == BUTTON_RC_REC);
 212
 213     check_battery();
 214
 215     if(rtc_alarm)
 216         printf("RTC alarm detected");
 217
 218     /* Don't start if the Hold button is active on the device you
 219        are starting with */
 220     if ((on_button && button_hold()) ||
 221          (rc_on_button && remote_button_hold()))
 222     {
 223         hold_status = true;
 224     }
 225     if (hold_status && !rtc_alarm && (usb_detect() != USB_INSERTED) &&
 226         !charger_inserted())
 227     {
 228         if (detect_original_firmware())
 229         {
 230             printf("Hold switch on");
 231             shutdown();
 232         }
 233     }
 234
 235     /* Holding REC while starting runs the original firmware */
 236     if (detect_original_firmware() && rec_button)
 237     {
 238         printf("Starting original firmware...");
 239         start_iriver_fw();
 240     }
 241
 242     if(charger_inserted())
 243     {
 244         const char charging_msg[] = "Charging...";
 245         const char complete_msg[] = "Charging complete";
 246         const char *msg;
 247         int w, h;
 248         bool blink_toggle = false;
 249         bool request_start = false;
 250
 251         cpu_idle_mode(true);
 252
 253         while(charger_inserted() && !request_start)
 254         {
 255             button = button_get_w_tmo(HZ);
 256
 257             switch(button)
 258             {
 259             case BUTTON_ON:
 260                 request_start = true;
 261                 break;
 262
 263             case BUTTON_NONE: /* Timeout */
 264
 265                 if(charging_state())
 266                 {
 267                     /* To be replaced with a nice animation */
 268                     blink_toggle = !blink_toggle;
 269                     msg = charging_msg;
 270                 }
 271                 else
 272                 {
 273                     blink_toggle = true;
 274                     msg = complete_msg;
 275                 }
 276
 277                 font_getstringsize(msg, &w, &h, FONT_SYSFIXED);
 278                 reset_screen();
 279                 if(blink_toggle)
 280                     lcd_putsxy((LCD_WIDTH-w)/2, (LCD_HEIGHT-h)/2, msg);
 281
 282                 check_battery();
 283                 break;
 284             }
 285
 286             if(usb_detect() == USB_INSERTED)
 287                 request_start = true;
 288         }
 289         if(!request_start)
 290         {
 291             __reset_cookie();
 292             power_off();
 293         }
 294
 295         cpu_idle_mode(false);
 296     }
 297
 298     usb_init();
 299
 300     /* A hack to enter USB mode without using the USB thread */
 301     if(usb_detect() == USB_INSERTED)
 302     {
 303         const char msg[] = "Bootloader USB mode";
 304         int w, h;
 305         font_getstringsize(msg, &w, &h, FONT_SYSFIXED);
 306         reset_screen();
 307         lcd_putsxy((LCD_WIDTH-w)/2, (LCD_HEIGHT-h)/2, msg);
 308         lcd_update();
 309
 310         lcd_remote_puts(0, 3, msg);
 311         lcd_remote_update();
 312
 313         ide_power_enable(true);
 314         ata_enable(false);
 315         sleep(HZ/20);
 316         usb_enable(true);
 317         cpu_idle_mode(true);
 318         while (usb_detect() == USB_INSERTED)
 319         {
 320             /* Print the battery status. */
 321             line = 0;
 322             remote_line = 0;
 323             check_battery();
 324
 325             ata_spin(); /* Prevent the drive from spinning down */
 326             sleep(HZ);
 327         }
 328
 329         cpu_idle_mode(false);
 330         usb_enable(false);
 331
 332         reset_screen();
 333         lcd_update();
 334     }
 335
 336     rc = ata_init();
 337     if(rc)
 338     {
 339         reset_screen();
 340         printf("ATA error: %d", rc);
 341         printf("Insert USB cable and press");
 342         printf("a button");
 343         while(!(button_get(true) & BUTTON_REL));
 344     }
 345
 346
 347     disk_init();
 348
 349     rc = disk_mount_all();
 350     if (rc<=0)
 351     {
 352         reset_screen();
 353         printf("No partition found");
 354         while(button_get(true) != SYS_USB_CONNECTED) {};
 355     }
 356
 357     printf("Loading firmware");
 358     i = load_firmware((unsigned char *)DRAM_START, BOOTFILE, MAX_LOADSIZE);
 359     if(i < 0)
 360         printf("Error: %s", strerror(i));
 361
 362     if (i == EOK)
 363         start_firmware();
 364
 365     if (!detect_original_firmware())
 366     {
 367         printf("No firmware found on disk");
 368         sleep(HZ*2);
 369         shutdown();
 370     }
 371     else {
 372         sleep(HZ*2);
 373         start_iriver_fw();
 374     }
 375 }
 376
 377 /* These functions are present in the firmware library, but we reimplement
 378    them here because the originals do a lot more than we want */
 379 void screen_dump(void)
 380 {
 381 }
 382
 383 int usb_screen(void)
 384 {
 385    return 0;
 386 }
 387
 388 unsigned short *bidi_l2v(const unsigned char *str, int orientation)
 389 {
 390     static unsigned short utf16_buf[SCROLL_LINE_SIZE];
 391     unsigned short *target;
 392     (void)orientation;
 393
 394     target = utf16_buf;
 395
 396     while (*str)
 397         str = utf8decode(str, target++);
 398     *target = 0;
 399     return utf16_buf;
 400 }