packages/hal/arm/mxc91221/evb/v2_0/src/redboot_cmds.c

   1 //==========================================================================
   2 //
   3 //      redboot_cmds.c
   4 //
   5 //      Board [platform] specific RedBoot commands
   6 //
   7 //==========================================================================
   8 //####ECOSGPLCOPYRIGHTBEGIN####
   9 // -------------------------------------------
  10 // This file is part of eCos, the Embedded Configurable Operating System.
  11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
  12 //
  13 // eCos is free software; you can redistribute it and/or modify it under
  14 // the terms of the GNU General Public License as published by the Free
  15 // Software Foundation; either version 2 or (at your option) any later version.
  16 //
  17 // eCos is distributed in the hope that it will be useful, but WITHOUT ANY
  18 // WARRANTY; without even the implied warranty of MERCHANTABILITY or
  19 // FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  20 // for more details.
  21 //
  22 // You should have received a copy of the GNU General Public License along
  23 // with eCos; if not, write to the Free Software Foundation, Inc.,
  24 // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
  25 //
  26 // As a special exception, if other files instantiate templates or use macros
  27 // or inline functions from this file, or you compile this file and link it
  28 // with other works to produce a work based on this file, this file does not
  29 // by itself cause the resulting work to be covered by the GNU General Public
  30 // License. However the source code for this file must still be made available
  31 // in accordance with section (3) of the GNU General Public License.
  32 //
  33 // This exception does not invalidate any other reasons why a work based on
  34 // this file might be covered by the GNU General Public License.
  35 //
  36 // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
  37 // at http://sources.redhat.com/ecos/ecos-license/
  38 // -------------------------------------------
  39 //####ECOSGPLCOPYRIGHTEND####
  40 //==========================================================================
  41 #include <redboot.h>
  42 #include <cyg/hal/hal_intr.h>
  43 #include <cyg/hal/hal_cache.h>
  44 #include <cyg/hal/plf_mmap.h>
  45 #include <cyg/hal/fsl_board.h>          // Platform specific hardware definitions
  46
  47 #ifdef CYGSEM_REDBOOT_FLASH_CONFIG
  48 #include <flash_config.h>
  49
  50 #if (REDBOOT_IMAGE_SIZE != CYGBLD_REDBOOT_MIN_IMAGE_SIZE)
  51 #error REDBOOT_IMAGE_SIZE != CYGBLD_REDBOOT_MIN_IMAGE_SIZE
  52 #endif
  53
  54 RedBoot_config_option("Board specifics",
  55                       brd_specs,
  56                       ALWAYS_ENABLED,
  57                       true,
  58                       CONFIG_INT,
  59                       0
  60                      );
  61 #endif  //CYGSEM_REDBOOT_FLASH_CONFIG
  62
  63 static void runImg(int argc, char *argv[]);
  64
  65 RedBoot_cmd("run",
  66             "Run an image at a location with MMU off",
  67             "[<virtual addr>]",
  68             runImg
  69            );
  70
  71 void launchRunImg(unsigned long addr)
  72 {
  73     asm volatile ("mov r12, r0;");
  74     HAL_MMU_OFF();
  75     asm volatile (
  76                  "mov r0, #0;"
  77                  "mov r1, r12;"
  78                  "mov r11, #0;"
  79                  "mov r12, #0;"
  80                  "mrs r10, cpsr;"
  81                  "bic r10, r10, #0xF0000000;"
  82                  "msr cpsr_f, r10;"
  83                  "mov pc, r1"
  84                  );
  85 }
  86
  87 extern unsigned long entry_address;
  88
  89 static void runImg(int argc,char *argv[])
  90 {
  91     unsigned int virt_addr, phys_addr;
  92
  93     // Default physical entry point for Symbian
  94     if (entry_address == 0xFFFFFFFF)
  95         virt_addr = 0x800000;
  96     else
  97         virt_addr = entry_address;
  98
  99     if (!scan_opts(argc,argv,1,0,0,(void*)&virt_addr,
 100                    OPTION_ARG_TYPE_NUM, "virtual address"))
 101         return;
 102
 103     if (entry_address != 0xFFFFFFFF)
 104         diag_printf("load entry_address=0x%lx\n", entry_address);
 105     HAL_VIRT_TO_PHYS_ADDRESS(virt_addr, phys_addr);
 106
 107     diag_printf("virt_addr=0x%x\n",virt_addr);
 108     diag_printf("phys_addr=0x%x\n",phys_addr);
 109
 110     launchRunImg(phys_addr);
 111 }
 112
 113 #if CYGPKG_REDBOOT_NETWORKING
 114 #define LAN_BASE        BOARD_CS_LAN_BASE
 115
 116 #define PP_EE_ADDR_W0   0x001C
 117 #define PP_EE_ADDR_W1   0x001D
 118 #define PP_EE_ADDR_W2   0x001E
 119
 120 extern cyg_uint16 read_eeprom(cyg_addrword_t base, cyg_uint16 offset);
 121 extern void write_eeprom(cyg_addrword_t base, cyg_uint16 offset, cyg_uint16 data);
 122
 123 // Exported CLI function(s)
 124 static void setMac(int argc, char *argv[]);
 125 RedBoot_cmd("setmac",
 126             "Set Ethernet MAC address in EEPROM",
 127             "[0x##:0x##:0x##:0x##:0x##:0x##]",
 128             setMac
 129            );
 130
 131 const static unsigned short RESET_CONFIG_BLOCK[] = {
 132     0xA002,
 133     0x5E00,
 134 };
 135
 136 #define DRIVER_CONFIG_BASE        0x1C   //Cirrus driver config base
 137
 138 static unsigned short g_drv_cfg_blk[] = {
 139     0xFFFF, //1C - MAC 4,5
 140     0xFFFF, //1D - MAC 2,3
 141     0xFFFF, //1E - MAC 0,1
 142     0x0000, //1F - ISA config
 143     0x0000, //20 - PP mem base
 144     0x0000, //21 - Boot PROM base
 145     0x0000, //22 - Boot PROM mask
 146     0x8040, //23 - Tx ctrl: Full duplex, media not required
 147     0x0021, //24 - Adapter config: 10Base-T, 10Base-T circuitry
 148     0x0001, //25 - EEPROM rev: 1.0
 149     0x0000, //26 - resvd
 150     0x0A2D, //27 - Mfg date
 151     0xFFFF, //28 - copy of 1C
 152     0xFFFF, //29 - copy of 1D
 153     0xFFFF, //2A - copy of 1E
 154     0x0000, //2B - resvd
 155     0x0000, //2C - resvd
 156     0x0000, //2D - resvd
 157     0x0000, //2E - resvd
 158     0x0000, //2F - Checksum
 159 };
 160
 161 static void setMac(int argc,char *argv[])
 162 {
 163     int i, ret, wsize = sizeof(g_drv_cfg_blk) / 2;  // word size
 164     unsigned char data[6];
 165     unsigned long temp;
 166     unsigned short ee_word[3];
 167
 168     if (argc == 1) {
 169         ee_word[0] = read_eeprom(LAN_BASE, PP_EE_ADDR_W0 + 0);
 170         ee_word[1] = read_eeprom(LAN_BASE, PP_EE_ADDR_W0 + 1);
 171         ee_word[2] = read_eeprom(LAN_BASE, PP_EE_ADDR_W0 + 2);
 172         if (ee_word[0] == 0 && ee_word[1] == 0 && ee_word[2] == 0) {
 173             diag_printf("Can't read MAC address\n\n");
 174             return;
 175         }
 176
 177         diag_printf("MAC address: ");
 178         diag_printf("0x%02x:0x%02x:0x%02x:0x%02x:0x%02x:0x%02x\n\n",
 179                     (ee_word[0] & 0x00FF), (ee_word[0] >> 8),
 180                     (ee_word[1] & 0x00FF), (ee_word[1] >> 8),
 181                     (ee_word[2] & 0x00FF), (ee_word[2] >> 8));
 182         return;
 183     }
 184
 185     if (argc != 2) {
 186         ret = -1; goto error;
 187     }
 188
 189     for (i = 0;  i < 6;  i++) {
 190         if (!parse_num(*(&argv[1]), &temp, &argv[1], ":")) {
 191             ret = -2; goto error;
 192         }
 193         if (temp > 0xFF) {
 194             ret = -3; goto error;
 195         }
 196         data[i] = temp & 0xFF;
 197     }
 198
 199     g_drv_cfg_blk[0] = g_drv_cfg_blk[12] = *(unsigned short*)(&data[0]);
 200     g_drv_cfg_blk[1] = g_drv_cfg_blk[13] = *(unsigned short*)(&data[2]);
 201     g_drv_cfg_blk[2] = g_drv_cfg_blk[14] = *(unsigned short*)(&data[4]);
 202
 203     // Calculate checksum
 204     temp = 0;
 205     for (i = 0; i < wsize-1; i++) {
 206         temp += g_drv_cfg_blk[i];
 207     }
 208     temp = (~temp + 1) & 0xFFFF;
 209     g_drv_cfg_blk[wsize-1] = temp;
 210
 211     // Program the EEPROM
 212     // Reset config block first
 213     for (i = 0; i < sizeof(RESET_CONFIG_BLOCK)/2; i++) {
 214         write_eeprom(LAN_BASE, i, RESET_CONFIG_BLOCK[i]);
 215     }
 216     // Driver config block 2nd
 217     for (i = 0; i < wsize; i++) {
 218         write_eeprom(LAN_BASE, DRIVER_CONFIG_BASE+i,
 219                      g_drv_cfg_blk[i]);
 220     }
 221     return;
 222     error:
 223     diag_printf("Wrong value for setMac. Error=%d\n\n", ret);
 224 }
 225
 226 //#define EEPROM_DEBUG
 227 #ifdef EEPROM_DEBUG
 228 RedBoot_cmd("eefun",
 229             "read/write a word into EEPROM",
 230             "[0-based IO Base offset:value]",
 231             eefun
 232            );
 233
 234 static void eefun(int argc,char *argv[])
 235 {
 236     int i, ret;
 237     unsigned short data[2];
 238     unsigned int temp;
 239
 240     if (argc != 2) {
 241         ret=-1; goto error;
 242     }
 243
 244     for (i = 0;  i < 2;  i++) {
 245         if (!parse_num(*(&argv[1]), &temp, &argv[1], ":")) {
 246             ret=-2; goto error;
 247         }
 248         if (temp > 0xFFFF) {
 249             ret=-3; goto error;
 250         }
 251         data[i] = (unsigned short)temp;
 252     }
 253
 254     if (data[0] >= 0x30 && data[0] != 0xFFFF) {
 255         ret=-4; goto error;
 256     }
 257
 258     if (data[0] == 0xFFFF) {
 259         for (i = 0; i < 0x30; i++) {
 260             if (i % 8 == 0) diag_printf("0x%02x: ", i);
 261             diag_printf("%04x ", read_eeprom(LAN_BASE, i));
 262             if (i % 8 == 7) diag_printf("\n");
 263         }
 264         return;
 265     }
 266
 267     diag_printf("writeEE() Offset: 0x%x, value=0x%x\n", data[0], data[1]);
 268     write_eeprom(LAN_BASE, data[0], data[1]);
 269     diag_printf("Reading back: 0x%x\n\n", read_eeprom(LAN_BASE, data[0]));
 270     return;
 271     error:
 272     diag_printf("Wrong value %d for writeEE\n\n", ret);
 273 }
 274 #endif //EEPROM_DEBUG
 275
 276 #endif //CYGPKG_REDBOOT_NETWORKING
 277
 278 #if defined(CYGSEM_REDBOOT_FLASH_CONFIG) && defined(CYG_HAL_STARTUP_ROMRAM)
 279
 280 RedBoot_cmd("romupdate",
 281             "Update Redboot with currently running image",
 282             "",
 283             romupdate
 284            );
 285
 286 extern int flash_program(void *_addr, void *_data, int len, void **err_addr);
 287 extern int flash_erase(void *addr, int len, void **err_addr);
 288 extern char *flash_errmsg(int err);
 289 extern unsigned char *ram_end; //ram end is where the redboot starts FIXME: use PC value
 290
 291 #ifdef CYGPKG_IO_FLASH
 292 void romupdate(int argc, char *argv[])
 293 {
 294     void *err_addr, *base_addr;
 295     int stat;
 296
 297     if (IS_FIS_FROM_NAND()) {
 298         base_addr = (void*)MXC_NAND_BASE_DUMMY;
 299         diag_printf("Updating ROM in NAND flash\n");
 300     } else if (IS_FIS_FROM_NOR()) {
 301         base_addr = (void*)BOARD_FLASH_START;
 302         diag_printf("Updating ROM in NOR flash\n");
 303     } else {
 304         diag_printf("romupdate not supported\n");
 305         diag_printf("Use \"factive [NOR|NAND]\" to select either NOR or NAND flash\n");
 306         return;
 307     }
 308     // Erase area to be programmed
 309     if ((stat = flash_erase((void *)base_addr,
 310                             CYGBLD_REDBOOT_MIN_IMAGE_SIZE,
 311                             (void **)&err_addr)) != 0) {
 312         diag_printf("Can't erase region at %p: %s\n",
 313                     err_addr, flash_errmsg(stat));
 314         return;
 315     }
 316     // Now program it
 317     if ((stat = flash_program((void *)base_addr, (void *)ram_end,
 318                               CYGBLD_REDBOOT_MIN_IMAGE_SIZE,
 319                               (void **)&err_addr)) != 0) {
 320         diag_printf("Can't program region at %p: %s\n",
 321                     err_addr, flash_errmsg(stat));
 322     }
 323 }
 324 RedBoot_cmd("factive",
 325             "Enable one flash media for Redboot",
 326             "[NOR | NAND]",
 327             factive
 328            );
 329
 330 void factive(int argc, char *argv[])
 331 {
 332     unsigned long phys_addr;
 333
 334     if (argc != 2) {
 335         diag_printf("Invalid factive cmd\n");
 336         return;
 337     }
 338
 339     if (strcasecmp(argv[1], "NOR") == 0) {
 340 #ifndef MXCFLASH_SELECT_NOR
 341         diag_printf("Not supported\n");
 342         return;
 343 #else
 344         MXC_ASSERT_NOR_BOOT();
 345 #endif
 346     } else if (strcasecmp(argv[1], "NAND") == 0) {
 347 #ifndef MXCFLASH_SELECT_NAND
 348         diag_printf("Not supported\n");
 349         return;
 350 #else
 351         MXC_ASSERT_NAND_BOOT();
 352 #endif
 353     } else {
 354         diag_printf("Invalid command: %s\n", argv[1]);
 355         return;
 356     }
 357     HAL_VIRT_TO_PHYS_ADDRESS(ram_end, phys_addr);
 358
 359     launchRunImg(phys_addr);
 360 }
 361 #endif //CYGPKG_IO_FLASH
 362 #endif /* CYG_HAL_STARTUP_ROMRAM */