packages/hal/arm/mxc91131/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_CLEAN_INVALIDATE_L2();
  75     HAL_DISABLE_L2();
  76     HAL_MMU_OFF();
  77     asm volatile (
  78                  "mov r0, #0;"
  79                  "mov r1, r12;"
  80                  "mov r11, #0;"
  81                  "mov r12, #0;"
  82                  "mrs r10, cpsr;"
  83                  "bic r10, r10, #0xF0000000;"
  84                  "msr cpsr_f, r10;"
  85                  "mov pc, r1"
  86                  );
  87 }
  88
  89 extern unsigned long entry_address;
  90
  91 static void runImg(int argc,char *argv[])
  92 {
  93     unsigned int virt_addr, phys_addr;
  94
  95     // Default physical entry point for Symbian
  96     if (entry_address == 0xFFFFFFFF)
  97         virt_addr = 0x800000;
  98     else
  99     virt_addr = entry_address;
 100
 101     if (!scan_opts(argc,argv,1,0,0,(void*)&virt_addr,
 102                    OPTION_ARG_TYPE_NUM, "virtual address"))
 103         return;
 104
 105     if (entry_address != 0xFFFFFFFF)
 106         diag_printf("load entry_address=0x%lx\n", entry_address);
 107     HAL_VIRT_TO_PHYS_ADDRESS(virt_addr, phys_addr);
 108
 109     diag_printf("virt_addr=0x%x\n",virt_addr);
 110     diag_printf("phys_addr=0x%x\n",phys_addr);
 111
 112     launchRunImg(phys_addr);
 113 }
 114
 115 #if CYGPKG_REDBOOT_NETWORKING
 116 #define LAN_BASE        BOARD_CS_LAN_BASE
 117
 118 #define PP_EE_ADDR_W0   0x001C
 119 #define PP_EE_ADDR_W1   0x001D
 120 #define PP_EE_ADDR_W2   0x001E
 121
 122 extern cyg_uint16 read_eeprom(cyg_addrword_t base, cyg_uint16 offset);
 123 extern void write_eeprom(cyg_addrword_t base, cyg_uint16 offset, cyg_uint16 data);
 124
 125 // Exported CLI function(s)
 126 static void setMac(int argc, char *argv[]);
 127 RedBoot_cmd("setmac",
 128             "Set Ethernet MAC address in EEPROM",
 129             "[0x##:0x##:0x##:0x##:0x##:0x##]",
 130             setMac
 131            );
 132
 133 const static unsigned short RESET_CONFIG_BLOCK[] = {
 134     0xA002,
 135     0x5E00,
 136 };
 137
 138 #define DRIVER_CONFIG_BASE        0x1C   //Cirrus driver config base
 139
 140 static unsigned short g_drv_cfg_blk[] = {
 141     0xFFFF, //1C - MAC 4,5
 142     0xFFFF, //1D - MAC 2,3
 143     0xFFFF, //1E - MAC 0,1
 144     0x0000, //1F - ISA config
 145     0x0000, //20 - PP mem base
 146     0x0000, //21 - Boot PROM base
 147     0x0000, //22 - Boot PROM mask
 148     0x8040, //23 - Tx ctrl: Full duplex, media not required
 149     0x0021, //24 - Adapter config: 10Base-T, 10Base-T circuitry
 150     0x0001, //25 - EEPROM rev: 1.0
 151     0x0000, //26 - resvd
 152     0x0A2D, //27 - Mfg date
 153     0xFFFF, //28 - copy of 1C
 154     0xFFFF, //29 - copy of 1D
 155     0xFFFF, //2A - copy of 1E
 156     0x0000, //2B - resvd
 157     0x0000, //2C - resvd
 158     0x0000, //2D - resvd
 159     0x0000, //2E - resvd
 160     0x0000, //2F - Checksum
 161 };
 162
 163 static void setMac(int argc,char *argv[])
 164 {
 165     int i, ret, wsize = sizeof(g_drv_cfg_blk) / 2;  // word size
 166     unsigned char data[6];
 167     unsigned long temp;
 168     unsigned short ee_word[3];
 169
 170     if (argc == 1) {
 171         ee_word[0] = read_eeprom(LAN_BASE, PP_EE_ADDR_W0 + 0);
 172         ee_word[1] = read_eeprom(LAN_BASE, PP_EE_ADDR_W0 + 1);
 173         ee_word[2] = read_eeprom(LAN_BASE, PP_EE_ADDR_W0 + 2);
 174         if (ee_word[0] == 0 && ee_word[1] == 0 && ee_word[2] == 0) {
 175             diag_printf("Can't read MAC address\n\n");
 176             return;
 177         }
 178
 179         diag_printf("MAC address: ");
 180         diag_printf("0x%02x:0x%02x:0x%02x:0x%02x:0x%02x:0x%02x\n\n",
 181                     (ee_word[0] & 0x00FF), (ee_word[0] >> 8),
 182                     (ee_word[1] & 0x00FF), (ee_word[1] >> 8),
 183                     (ee_word[2] & 0x00FF), (ee_word[2] >> 8));
 184         return;
 185     }
 186
 187     if (argc != 2) {
 188         ret = -1; goto error;
 189     }
 190
 191     for (i = 0;  i < 6;  i++) {
 192         if (!parse_num(*(&argv[1]), &temp, &argv[1], ":")) {
 193             ret = -2; goto error;
 194         }
 195         if (temp > 0xFF) {
 196             ret = -3; goto error;
 197         }
 198         data[i] = temp & 0xFF;
 199     }
 200
 201     g_drv_cfg_blk[0] = g_drv_cfg_blk[12] = *(unsigned short*)(&data[0]);
 202     g_drv_cfg_blk[1] = g_drv_cfg_blk[13] = *(unsigned short*)(&data[2]);
 203     g_drv_cfg_blk[2] = g_drv_cfg_blk[14] = *(unsigned short*)(&data[4]);
 204
 205     // Calculate checksum
 206     temp = 0;
 207     for (i = 0; i < wsize-1; i++) {
 208         temp += g_drv_cfg_blk[i];
 209     }
 210     temp = (~temp + 1) & 0xFFFF;
 211     g_drv_cfg_blk[wsize-1] = temp;
 212
 213     // Program the EEPROM
 214     // Reset config block first
 215     for (i = 0; i < sizeof(RESET_CONFIG_BLOCK)/2; i++) {
 216         write_eeprom(LAN_BASE, i, RESET_CONFIG_BLOCK[i]);
 217     }
 218     // Driver config block 2nd
 219     for (i = 0; i < wsize; i++) {
 220         write_eeprom(LAN_BASE, DRIVER_CONFIG_BASE+i,
 221                      g_drv_cfg_blk[i]);
 222     }
 223     return;
 224     error:
 225     diag_printf("Wrong value for setMac. Error=%d\n\n", ret);
 226 }
 227
 228 //#define EEPROM_DEBUG
 229 #ifdef EEPROM_DEBUG
 230 RedBoot_cmd("eefun",
 231             "read/write a word into EEPROM",
 232             "[0-based IO Base offset:value]",
 233             eefun
 234            );
 235
 236 static void eefun(int argc,char *argv[])
 237 {
 238     int i, ret;
 239     unsigned short data[2];
 240     unsigned int temp;
 241
 242     if (argc != 2) {
 243         ret=-1; goto error;
 244     }
 245
 246     for (i = 0;  i < 2;  i++) {
 247         if (!parse_num(*(&argv[1]), &temp, &argv[1], ":")) {
 248             ret=-2; goto error;
 249         }
 250         if (temp > 0xFFFF) {
 251             ret=-3; goto error;
 252         }
 253         data[i] = (unsigned short)temp;
 254     }
 255
 256     if (data[0] >= 0x30 && data[0] != 0xFFFF) {
 257         ret=-4; goto error;
 258     }
 259
 260     if (data[0] == 0xFFFF) {
 261         for (i = 0; i < 0x30; i++) {
 262             if (i % 8 == 0) diag_printf("0x%02x: ", i);
 263             diag_printf("%04x ", read_eeprom(LAN_BASE, i));
 264             if (i % 8 == 7) diag_printf("\n");
 265         }
 266         return;
 267     }
 268
 269     diag_printf("writeEE() Offset: 0x%x, value=0x%x\n", data[0], data[1]);
 270     write_eeprom(LAN_BASE, data[0], data[1]);
 271     diag_printf("Reading back: 0x%x\n\n", read_eeprom(LAN_BASE, data[0]));
 272     return;
 273     error:
 274     diag_printf("Wrong value %d for writeEE\n\n", ret);
 275 }
 276 #endif //EEPROM_DEBUG
 277
 278 #endif //CYGPKG_REDBOOT_NETWORKING
 279
 280 #if defined(CYGSEM_REDBOOT_FLASH_CONFIG) && defined(CYG_HAL_STARTUP_ROMRAM)
 281
 282 RedBoot_cmd("romupdate",
 283             "Update Redboot with currently running image",
 284             "",
 285             romupdate
 286            );
 287
 288 extern int flash_program(void *_addr, void *_data, int len, void **err_addr);
 289 extern int flash_erase(void *addr, int len, void **err_addr);
 290 extern char *flash_errmsg(int err);
 291 extern unsigned char *ram_end; //ram end is where the redboot starts FIXME: use PC value
 292
 293 #ifdef CYGPKG_IO_FLASH
 294 void romupdate(int argc, char *argv[])
 295 {
 296     void *err_addr, *base_addr;
 297     int stat;
 298
 299     if (IS_FIS_FROM_NAND()) {
 300         base_addr = (void*)MXC_NAND_BASE_DUMMY;
 301         diag_printf("Updating ROM in NAND flash\n");
 302     } else if (IS_FIS_FROM_NOR()) {
 303         base_addr = (void*)BOARD_FLASH_START;
 304         diag_printf("Updating ROM in NOR flash\n");
 305     } else {
 306         diag_printf("romupdate not supported\n");
 307         diag_printf("Use \"factive [NOR|NAND]\" to select either NOR or NAND flash\n");
 308         return;
 309     }
 310     // Erase area to be programmed
 311     if ((stat = flash_erase((void *)base_addr,
 312                             CYGBLD_REDBOOT_MIN_IMAGE_SIZE,
 313                             (void **)&err_addr)) != 0) {
 314         diag_printf("Can't erase region at %p: %s\n",
 315                     err_addr, flash_errmsg(stat));
 316         return;
 317     }
 318     // Now program it
 319     if ((stat = flash_program((void *)base_addr, (void *)ram_end,
 320                               CYGBLD_REDBOOT_MIN_IMAGE_SIZE,
 321                               (void **)&err_addr)) != 0) {
 322         diag_printf("Can't program region at %p: %s\n",
 323                     err_addr, flash_errmsg(stat));
 324     }
 325 }
 326 RedBoot_cmd("factive",
 327             "Enable one flash media for Redboot",
 328             "[NOR | NAND]",
 329             factive
 330            );
 331
 332 void factive(int argc, char *argv[])
 333 {
 334     unsigned long phys_addr;
 335
 336     if (argc != 2) {
 337         diag_printf("Invalid factive cmd\n");
 338         return;
 339     }
 340
 341     if (strcasecmp(argv[1], "NOR") == 0) {
 342 #ifndef MXCFLASH_SELECT_NOR
 343         diag_printf("Not supported\n");
 344         return;
 345 #else
 346         MXC_ASSERT_NOR_BOOT();
 347 #endif
 348     } else if (strcasecmp(argv[1], "NAND") == 0) {
 349 #ifndef MXCFLASH_SELECT_NAND
 350         diag_printf("Not supported\n");
 351         return;
 352 #else
 353         MXC_ASSERT_NAND_BOOT();
 354 #endif
 355     } else {
 356         diag_printf("Invalid command: %s\n", argv[1]);
 357         return;
 358     }
 359     HAL_VIRT_TO_PHYS_ADDRESS(ram_end, phys_addr);
 360
 361     launchRunImg(phys_addr);
 362 }
 363 #endif //CYGPKG_IO_FLASH
 364 #endif /* CYG_HAL_STARTUP_ROMRAM */