bootloader/mpio_hd200.c

   1 /***************************************************************************
   2  *             __________               __   ___.
   3  *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
   4  *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
   5  *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
   6  *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
   7  *                     \/            \/     \/    \/            \/
   8  * $Id$
   9  *
  10  * Copyright (C) 2010 Marcin Bukat
  11  *
  12  * This program is free software; you can redistribute it and/or
  13  * modify it under the terms of the GNU General Public License
  14  * as published by the Free Software Foundation; either version 2
  15  * of the License, or (at your option) any later version.
  16  *
  17  * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
  18  * KIND, either express or implied.
  19  *
  20  ****************************************************************************/
  21 #include "config.h"
  22
  23 #include <stdlib.h>
  24 #include <stdio.h>
  25 #include "inttypes.h"
  26 #include "string.h"
  27 #include "cpu.h"
  28 #include "system.h"
  29 #include "lcd.h"
  30 #include "kernel.h"
  31 #include "thread.h"
  32 #include "storage.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
  45 #include "common.h"
  46 #include "version.h"
  47
  48 #include <stdarg.h>
  49
  50 /* Maximum allowed firmware image size. 10MB is more than enough */
  51 #define MAX_LOADSIZE (10*1024*1024)
  52
  53 #define DRAM_START 0x31000000
  54
  55 #define BOOTMENU_TIMEOUT (10*HZ)
  56 #define BOOTMENU_OPTIONS 3
  57
  58 #define EVENT_NONE 0x00
  59 #define EVENT_ON   0x01
  60 #define EVENT_AC   0x02
  61 #define EVENT_USB  0x04
  62
  63 /* From common.c */
  64 extern int line;
  65 static const char *bootmenu_options[] = {
  66     "Boot rockbox",
  67     "Boot MPIO firmware",
  68     "Shutdown"
  69 };
  70
  71 enum option_t {
  72     rockbox,
  73     mpio_firmware,
  74     shutdown
  75 };
  76
  77 int usb_screen(void)
  78 {
  79    return 0;
  80 }
  81
  82 static inline bool _charger_inserted(void)
  83 {
  84     return (GPIO1_READ & (1<<14)) ? false : true;
  85 }
  86
  87 static inline bool _battery_full(void)
  88 {
  89     return (GPIO_READ & (1<<30)) ? true : false;
  90 }
  91
  92 /* Reset the cookie for the crt0 crash check */
  93 static inline void __reset_cookie(void)
  94 {
  95     asm(" move.l #0,%d0");
  96     asm(" move.l %d0,0x10017ffc");
  97 }
  98
  99 static void start_rockbox(void)
 100 {
 101     adc_close();
 102     asm(" move.w #0x2700,%sr");
 103     __reset_cookie();
 104     asm(" move.l %0,%%d0" :: "i"(DRAM_START));
 105     asm(" movec.l %d0,%vbr");
 106     asm(" move.l %0,%%sp" :: "m"(*(int *)DRAM_START));
 107     asm(" move.l %0,%%a0" :: "m"(*(int *)(DRAM_START+4)));
 108     asm(" jmp (%a0)");
 109 }
 110
 111 static void start_mpio_firmware(void)
 112 {
 113     asm(" move.w #0x2700,%sr");
 114     __reset_cookie();
 115     asm(" movec.l %d0,%vbr");
 116     asm(" move.l 0,%sp");
 117     asm(" jmp 8");
 118 }
 119
 120 static void __shutdown(void)
 121 {
 122     if (_charger_inserted())
 123     /* if AC power do nothing */
 124         return;
 125
 126     /* We need to gracefully spin down the disk to prevent clicks. */
 127     if (ide_powered())
 128     {
 129         /* Make sure ATA has been initialized. */
 130         storage_init();
 131
 132         /* And put the disk into sleep immediately. */
 133         storage_sleepnow();
 134     }
 135
 136     /* Backlight OFF */
 137     _backlight_off();
 138     __reset_cookie();
 139
 140         power_off();
 141 }
 142
 143 /* Print the battery voltage (and a warning message). */
 144 static void check_battery(void)
 145 {
 146
 147     int battery_voltage, batt_int, batt_frac;
 148
 149     battery_voltage = battery_adc_voltage();
 150     batt_int = battery_voltage / 1000;
 151     batt_frac = (battery_voltage % 1000) / 10;
 152
 153     printf("Battery: %d.%02dV", batt_int, batt_frac);
 154
 155     if (battery_voltage <= 3500)
 156     {
 157         printf("WARNING! BATTERY LOW!!");
 158         sleep(HZ*2);
 159     }
 160
 161 }
 162
 163
 164 static void lcd_putstring_centered(const char *string)
 165 {
 166     int w,h;
 167     font_getstringsize(string, &w, &h, FONT_SYSFIXED);
 168     lcd_putsxy((LCD_WIDTH-w)/2, (LCD_HEIGHT-h)/2, string);
 169 }
 170
 171 static void rb_boot(void)
 172 {
 173     int rc;
 174
 175     /* boost to speedup rb image loading */
 176     cpu_boost(true);
 177
 178     rc = storage_init();
 179     if(rc)
 180     {
 181         printf("ATA error: %d", rc);
 182         sleep(HZ*5);
 183         return;
 184     }
 185
 186     disk_init();
 187
 188     rc = disk_mount_all();
 189     if (rc<=0)
 190     {
 191         printf("No partition found");
 192         sleep(HZ*5);
 193         return;
 194     }
 195
 196     printf("Loading firmware");
 197
 198     rc = load_firmware((unsigned char *)DRAM_START,
 199                        BOOTFILE, MAX_LOADSIZE);
 200
 201     if (rc < EOK)
 202     {
 203         printf("Error!");
 204         printf("Can't load " BOOTFILE ": ");
 205         printf("Result: %s", strerror(rc));
 206         sleep(HZ*5);
 207         return;
 208     }
 209
 210     cpu_boost(false);
 211     start_rockbox();
 212 }
 213
 214 static void bootmenu(void)
 215 {
 216     enum option_t i;
 217     enum option_t option = rockbox;
 218     int button;
 219     const char select[] = "->";
 220     long start_tick = current_tick;
 221
 222     /* backbone of menu */
 223     /* run the loader */
 224     printf("Rockbox boot loader");
 225     printf("Ver: " RBVERSION);
 226
 227     check_battery();
 228
 229     printf("");
 230     printf("=========================");
 231
 232     line += BOOTMENU_OPTIONS+2; /* skip lines */
 233
 234     printf("=========================");
 235     printf("");
 236     printf(" [FF] [REW] to move ");
 237     printf(" [PLAY] to confirm ");
 238
 239     /* content of menu and keys handling */
 240     while (TIME_BEFORE(current_tick,start_tick + BOOTMENU_TIMEOUT))
 241     {
 242         /* Draw the menu. */
 243         line = 6; /* move below header */
 244
 245         for (i=0;i<BOOTMENU_OPTIONS;i++)
 246         {
 247             if (i != option)
 248                 printf("   %s",bootmenu_options[i]);
 249             else
 250                 printf("%s %s",select,bootmenu_options[i]);
 251         }
 252
 253         line = 15;
 254
 255         printf("Time left: %ds",(BOOTMENU_TIMEOUT -
 256                                  (current_tick - start_tick))/HZ);
 257
 258         lcd_update();
 259
 260         button = BUTTON_NONE;
 261         button = button_get_w_tmo(HZ);
 262
 263         switch (button)
 264         {
 265             case BUTTON_REW:
 266 #ifdef MPIO_HD200
 267             case BUTTON_RC_REW:
 268 #endif
 269                 if (option > rockbox)
 270                     option--;
 271                 else
 272                     option = shutdown;
 273                 break;
 274
 275             case BUTTON_FF:
 276 #ifdef MPIO_HD200
 277             case BUTTON_RC_FF:
 278 #endif
 279                 if (option < shutdown)
 280                     option++;
 281                 else
 282                     option = rockbox;
 283                 break;
 284
 285             case BUTTON_PLAY:
 286 #ifdef MPIO_HD200
 287             case BUTTON_RC_PLAY:
 288             case (BUTTON_PLAY|BUTTON_REC):
 289 #endif
 290                 reset_screen();
 291
 292                 switch (option)
 293                 {
 294                     case rockbox:
 295                             rb_boot();
 296                         break;
 297
 298                     case mpio_firmware:
 299                         start_mpio_firmware();
 300                         break;
 301
 302                     default:
 303                         return;
 304                         break;
 305                 }
 306         }
 307 }
 308 /* timeout */
 309 }
 310
 311 void main(void)
 312 {
 313     /* messages */
 314     const char usb_connect_msg[] = "Bootloader USB mode";
 315     const char charging_msg[] = "Charging...";
 316     const char complete_msg[] = "Charging complete";
 317
 318     /* helper variable for messages */
 319     bool blink_toggle = false;
 320
 321     int button;
 322     unsigned int event = EVENT_NONE;
 323     unsigned int last_event = EVENT_NONE;
 324
 325     /* this is default mode after power_init() */
 326     bool high_current_charging = true;
 327
 328     /* setup GPIOs related to power functions */
 329     power_init();
 330
 331     system_init();
 332     kernel_init();
 333
 334     /* run at 45MHz */
 335     set_cpu_frequency(CPUFREQ_NORMAL);
 336
 337     /* IRQs are needed by button driver */
 338     enable_irq();
 339
 340     lcd_init();
 341
 342     /* only lowlevel functions no queue init */
 343     _backlight_init();
 344     _backlight_hw_on();
 345
 346     /* setup font system*/
 347     font_init();
 348     lcd_setfont(FONT_SYSFIXED);
 349
 350      /* buttons reading init*/
 351     adc_init();
 352     button_init();
 353
 354     usb_init();
 355     cpu_idle_mode(true);
 356
 357     /* Handle wakeup event. Possibilities are:
 358      * ON button (PLAY)
 359      * USB insert
 360      * AC charger plug
 361      */
 362
 363     while(1)
 364     {
 365         /* read buttons */
 366         event = EVENT_NONE;
 367         button = button_get_w_tmo(HZ);
 368
 369         if ( (button & BUTTON_PLAY)
 370 #ifdef MPIO_HD200
 371              || (button & BUTTON_RC_PLAY)
 372 #endif
 373            )
 374             event |= EVENT_ON;
 375
 376         if ( usb_detect() == USB_INSERTED )
 377             event |= EVENT_USB;
 378
 379         if ( _charger_inserted() )
 380             event |= EVENT_AC;
 381
 382         reset_screen();
 383         switch (event)
 384         {
 385             case EVENT_ON:
 386             case (EVENT_ON | EVENT_AC):
 387             /* hold is handled in button driver */
 388                     cpu_idle_mode(false);
 389                     ide_power_enable(true);
 390
 391                     if (button == (BUTTON_PLAY|BUTTON_REC))
 392                         bootmenu();
 393                     else
 394                         rb_boot();
 395
 396                 break;
 397
 398             case EVENT_AC:
 399                 /* AC plug in */
 400                 if (!(last_event & EVENT_AC))
 401                 {
 402                     /* reset charging circuit */
 403                     and_l(~(1<<23), &GPIO_ENABLE);
 404                 }
 405
 406                 /* USB unplug */
 407                 if (last_event & EVENT_USB)
 408                 {
 409                     usb_enable(false);
 410                     sleep(HZ);
 411                     ide_power_enable(false);
 412                     sleep(HZ);
 413                 }
 414
 415                 if(!_battery_full())
 416                 {
 417                     if (blink_toggle)
 418                         lcd_putstring_centered(charging_msg);
 419
 420                     blink_toggle = !blink_toggle;
 421                 }
 422                 else /* end of charge condition */
 423                 {
 424                     /* put LTC1733 into shutdown mode */
 425                     or_l((1<<23), &GPIO_ENABLE);
 426
 427                     if (high_current_charging)
 428                     {
 429                         /* switch to low current mode */
 430                         and_l(~(1<<15), &GPIO_OUT);
 431
 432                         /* reset charging circuit */
 433                         and_l(~(1<<23), &GPIO_ENABLE);
 434
 435                         high_current_charging = false;
 436                     }
 437                     else
 438                     {
 439                         lcd_putstring_centered(complete_msg);
 440                     }
 441                 }
 442                 check_battery();
 443                 break;
 444
 445             case EVENT_USB:
 446             case (EVENT_USB | EVENT_AC):
 447                 /* AC plug in while in USB mode */
 448                 if (!(last_event & EVENT_AC))
 449                 {
 450                     /* reset charger circuit */
 451                     and_l(~(1<<23), &GPIO_ENABLE);
 452                 }
 453
 454                 /* USB plug in */
 455                 if (!(last_event & EVENT_USB))
 456                 {
 457                     /* init USB */
 458                     ide_power_enable(true);
 459                     sleep(HZ/20);
 460                     usb_enable(true);
 461                 }
 462
 463                 /* display blinking USB indicator */
 464                 line = 0;
 465
 466                 if (blink_toggle)
 467                     lcd_putstring_centered(usb_connect_msg);
 468
 469                 check_battery();
 470                 blink_toggle = !blink_toggle;
 471                 storage_spin();
 472                 break;
 473
 474             default:
 475                 /* USB unplug */
 476                 if (last_event & EVENT_USB)
 477                 {
 478                     /* disable USB */
 479                     usb_enable(false);
 480                     sleep(HZ);
 481                     ide_power_enable(false);
 482                     sleep(HZ);
 483                 }
 484
 485                 /* spurious wakeup ?*/
 486                 __shutdown();
 487                 break;
 488         }
 489         lcd_update();
 490         last_event = event;
 491     }
 492
 493 }
 494
 495 /* These functions are present in the firmware library, but we reimplement
 496    them here because the originals do a lot more than we want */
 497 void screen_dump(void)
 498 {
 499 }