main.c

   1 /*
   2         BootMii - a Free Software replacement for the Nintendo/BroadOn bootloader.
   3         Requires mini.
   4
   5 Copyright (C) 2008, 2009        Haxx Enterprises <bushing@gmail.com>
   6 Copyright (C) 2009              Andre Heider "dhewg" <dhewg@wiibrew.org>
   7 Copyright (C) 2008, 2009        Hector Martin "marcan" <marcan@marcansoft.com>
   8 Copyright (C) 2008, 2009        Sven Peter <svenpeter@gmail.com>
   9 Copyright (C) 2009              John Kelley <wiidev@kelley.ca>
  10
  11 # This code is licensed to you under the terms of the GNU GPL, version 2;
  12 # see file COPYING or http://www.gnu.org/licenses/old-licenses/gpl-2.0.txt
  13 */
  14
  15 #include "bootmii_ppc.h"
  16 #include "string.h"
  17 #include "ipc.h"
  18 #include "mini_ipc.h"
  19 #include "nandfs.h"
  20 #include "fat.h"
  21 #include "malloc.h"
  22 #include "diskio.h"
  23 #include "printf.h"
  24 #include "video_low.h"
  25 #include "input.h"
  26 #include "console.h"
  27 #include "irq.h"
  28 #include "usb/core/core.h"
  29 #include "usb/drivers/class/hid.h"
  30 #include "sha1.h"
  31 #include "hollywood.h"
  32
  33 #define MINIMUM_MINI_VERSION 0x00010001
  34
  35 otp_t otp;
  36 seeprom_t seeprom;
  37
  38 static void dsp_reset(void)
  39 {
  40         write16(0x0c00500a, read16(0x0c00500a) & ~0x01f8);
  41         write16(0x0c00500a, read16(0x0c00500a) | 0x0010);
  42         write16(0x0c005036, 0);
  43 }
  44
  45 static char ascii(char s) {
  46   if(s < 0x20) return '.';
  47   if(s > 0x7E) return '.';
  48   return s;
  49 }
  50
  51 void hexdump(void *d, int len) {
  52   u8 *data;
  53   int i, off;
  54   data = (u8*)d;
  55   for (off=0; off<len; off += 16) {
  56     printf("%08x  ",off);
  57     for(i=0; i<16; i++)
  58       if((i+off)>=len) printf("   ");
  59       else printf("%02x ",data[off+i]);
  60
  61     printf(" ");
  62     for(i=0; i<16; i++)
  63       if((i+off)>=len) printf(" ");
  64       else printf("%c",ascii(data[off+i]));
  65     printf("\n");
  66   }
  67 }
  68
  69 void testOTP(void)
  70 {
  71         printf("reading OTP...\n");
  72         getotp(&otp);
  73         printf("read OTP!\n");
  74         printf("OTP:\n");
  75         hexdump(&otp, sizeof(otp));
  76
  77         printf("reading SEEPROM...\n");
  78         getseeprom(&seeprom);
  79         printf("read SEEPROM!\n");
  80         printf("SEEPROM:\n");
  81         hexdump(&seeprom, sizeof(seeprom));
  82 }
  83
  84 int main(void)
  85 {
  86         int vmode = -1;
  87         exception_init();
  88         dsp_reset();
  89
  90         irq_initialize();
  91         irq_bw_enable(BW_PI_IRQ_RESET);
  92         irq_bw_enable(BW_PI_IRQ_HW); //hollywood pic
  93         /* external ohci */
  94         irq_hw_enable(IRQ_OHCI0);
  95         /* internal ohci */
  96         //irq_hw_enable(IRQ_OHCI1);
  97
  98         ipc_initialize();
  99         ipc_slowping();
 100
 101         gecko_init();
 102     input_init();
 103         init_fb(vmode);
 104
 105         VIDEO_Init(vmode);
 106         VIDEO_SetFrameBuffer(get_xfb());
 107         VISetupEncoder();
 108
 109         u32 version = ipc_getvers();
 110         u16 mini_version_major = version >> 16 & 0xFFFF;
 111         u16 mini_version_minor = version & 0xFFFF;
 112         printf("Mini version: %d.%0d\n", mini_version_major, mini_version_minor);
 113
 114         if (version < MINIMUM_MINI_VERSION) {
 115                 printf("Sorry, this version of MINI (armboot.bin)\n"
 116                         "is too old, please update to at least %d.%0d.\n",
 117                         (MINIMUM_MINI_VERSION >> 16), (MINIMUM_MINI_VERSION & 0xFFFF));
 118                 for (;;)
 119                         ; // better ideas welcome!
 120         }
 121
 122         /* external ohci */
 123         usb_init(OHCI0_REG_BASE);
 124
 125         /* internal ohci */
 126         //usb_init(OHCI1_REG_BASE);
 127
 128         /* load HID keyboard driver */
 129         usb_hidkb_init();
 130
 131 wait_kb:
 132         /* wait for usb keyboard plugged in */
 133         if(!usb_hidkb_inuse()) {
 134                 print_str("plug in an usb keyboard", 23);
 135         }
 136         while(!usb_hidkb_inuse());
 137
 138         print_str("hello keyboard :)", 17);
 139
 140 #define FONT_WIDTH  13
 141 #define FONT_HEIGHT 15
 142 #define STDOUT_BORDER_LEFT 20
 143 #define STDOUT_BORDER_RIGHT 650
 144 #define STDOUT_BORDER_TOP 20
 145 #define STDOUT_BORDER_BOTTOM 550
 146 #define TABSIZE 4
 147         /* you are welcome to make this nice :) */
 148         char str[7];
 149         u16 i, j, ret=0, y=STDOUT_BORDER_TOP, x=STDOUT_BORDER_LEFT;
 150         u16 old_x, old_y;
 151         struct kbrep *k, *old=NULL;
 152
 153         while(usb_hidkb_inuse()) {
 154                 memset(str, '\0', 7);
 155                 k = usb_hidkb_getChars();
 156                 j=0;
 157                 old_x = x; /* save actual x and y position for printing after the loop */
 158                 old_y = y;
 159                 for(i=0; k->keys[i]>0; i++) {
 160
 161                         /* dropping char's if necessary */
 162                         if(old) {
 163                                 for(j=0; j < 6; j++) {
 164                                         if(old->keys[j] == k->keys[i]) {
 165                                                 ret = 1;
 166                                                 break;
 167                                         }
 168                                 }
 169                         }
 170                         if(ret) {
 171                                 ret = 0;
 172                                 continue;
 173                         }
 174                         j = 0;
 175
 176                         unsigned char key = usb_hidkb_get_char_from_keycode(k->keys[i],
 177                                         (k->mod & MOD_lshift) || (k->mod & MOD_rshift));
 178                         /* no key or key not relevant? next, please. */
 179                         if (key == 0)
 180                                 continue;
 181
 182                         /* RETURN pressed? */
 183                         if (key == '\n') {
 184                                 x = STDOUT_BORDER_LEFT;
 185                                 y += FONT_HEIGHT;
 186                                 printf("\n");
 187                         /* TAB pressed? */
 188                         } else if (key == '\t') {
 189                                 x += (TABSIZE*FONT_WIDTH);
 190                                 printf("\t");
 191
 192                         /* BACKSPACE pressed? */
 193                         } else if (key == '\r') {
 194                                 /* TODO */
 195
 196                         /* now we have only printable characters left */
 197                         } else {
 198                                 x += FONT_WIDTH;
 199                                 str[j] = key;
 200                                 j++;
 201                         }
 202
 203                         /* line full? break! */
 204                         if(x > (STDOUT_BORDER_RIGHT-FONT_WIDTH)) {
 205                                 x = STDOUT_BORDER_LEFT;
 206                                 y += FONT_HEIGHT;
 207                         }
 208                         /* screen full? start again at top */
 209                         if(y > (STDOUT_BORDER_BOTTOM-FONT_HEIGHT)) {
 210                                 y = STDOUT_BORDER_TOP;
 211                         }
 212                 }
 213                 if(old) {
 214                         free(old);
 215                 }
 216                 old = k;
 217                 if(j > 0) { /* when there was any printable stuff, show it */
 218                         print_str_noscroll(old_x, old_y, str);
 219                         printf("%s", str);
 220                 }
 221         }
 222
 223         goto wait_kb;
 224
 225 #if 0
 226         printf("===============================\n");
 227
 228         SHA1TestCases();
 229
 230         printf("bye, world!\n");
 231 #endif
 232
 233         return 0;
 234 }
 235