//==========================================================================
|
//==========================================================================
|
//
|
//
|
// redboot_linux_boot.c
|
// redboot_linux_boot.c
|
//
|
//
|
// RedBoot command to boot Linux on ARM platforms
|
// RedBoot command to boot Linux on ARM platforms
|
//
|
//
|
//==========================================================================
|
//==========================================================================
|
// ####ECOSGPLCOPYRIGHTBEGIN####
|
// ####ECOSGPLCOPYRIGHTBEGIN####
|
// -------------------------------------------
|
// -------------------------------------------
|
// This file is part of eCos, the Embedded Configurable Operating System.
|
// This file is part of eCos, the Embedded Configurable Operating System.
|
// Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
|
// Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
|
//
|
//
|
// eCos is free software; you can redistribute it and/or modify it under
|
// eCos is free software; you can redistribute it and/or modify it under
|
// the terms of the GNU General Public License as published by the Free
|
// the terms of the GNU General Public License as published by the Free
|
// Software Foundation; either version 2 or (at your option) any later
|
// Software Foundation; either version 2 or (at your option) any later
|
// version.
|
// version.
|
//
|
//
|
// eCos is distributed in the hope that it will be useful, but WITHOUT
|
// eCos is distributed in the hope that it will be useful, but WITHOUT
|
// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
// for more details.
|
// for more details.
|
//
|
//
|
// You should have received a copy of the GNU General Public License
|
// You should have received a copy of the GNU General Public License
|
// along with eCos; if not, write to the Free Software Foundation, Inc.,
|
// along with eCos; if not, write to the Free Software Foundation, Inc.,
|
// 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
// 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
//
|
//
|
// As a special exception, if other files instantiate templates or use
|
// As a special exception, if other files instantiate templates or use
|
// macros or inline functions from this file, or you compile this file
|
// macros or inline functions from this file, or you compile this file
|
// and link it with other works to produce a work based on this file,
|
// and link it with other works to produce a work based on this file,
|
// this file does not by itself cause the resulting work to be covered by
|
// this file does not by itself cause the resulting work to be covered by
|
// the GNU General Public License. However the source code for this file
|
// the GNU General Public License. However the source code for this file
|
// must still be made available in accordance with section (3) of the GNU
|
// must still be made available in accordance with section (3) of the GNU
|
// General Public License v2.
|
// General Public License v2.
|
//
|
//
|
// This exception does not invalidate any other reasons why a work based
|
// This exception does not invalidate any other reasons why a work based
|
// on this file might be covered by the GNU General Public License.
|
// on this file might be covered by the GNU General Public License.
|
// -------------------------------------------
|
// -------------------------------------------
|
// ####ECOSGPLCOPYRIGHTEND####
|
// ####ECOSGPLCOPYRIGHTEND####
|
//####OTHERCOPYRIGHTBEGIN####
|
//####OTHERCOPYRIGHTBEGIN####
|
//
|
//
|
// The structure definitions below are taken from include/asm-arm/setup.h in
|
// The structure definitions below are taken from include/asm-arm/setup.h in
|
// the Linux kernel, Copyright (C) 1997-1999 Russell King. Their presence
|
// the Linux kernel, Copyright (C) 1997-1999 Russell King. Their presence
|
// here is for the express purpose of communication with the Linux kernel
|
// here is for the express purpose of communication with the Linux kernel
|
// being booted and is considered 'fair use' by the original author and
|
// being booted and is considered 'fair use' by the original author and
|
// are included with his permission.
|
// are included with his permission.
|
//
|
//
|
//####OTHERCOPYRIGHTEND####
|
//####OTHERCOPYRIGHTEND####
|
//==========================================================================
|
//==========================================================================
|
//#####DESCRIPTIONBEGIN####
|
//#####DESCRIPTIONBEGIN####
|
//
|
//
|
// Author(s): Piotr Skrzypek
|
// Author(s): Piotr Skrzypek
|
|
// Contributor: R.Diez
|
// Date: 2012-06-08
|
// Date: 2012-06-08
|
// Purpose:
|
// Purpose:
|
// Description: Based on ARM code
|
// Description: Based on ARM code
|
//
|
//
|
// This code is part of RedBoot (tm).
|
// This code is part of RedBoot (tm).
|
//
|
//
|
//####DESCRIPTIONEND####
|
//####DESCRIPTIONEND####
|
//
|
//
|
//==========================================================================
|
//==========================================================================
|
|
|
#include <pkgconf/hal.h>
|
#include <pkgconf/hal.h>
|
#include <redboot.h>
|
#include <redboot.h>
|
#include <cyg/hal/hal_intr.h>
|
#include <cyg/hal/hal_intr.h>
|
#include <cyg/hal/hal_cache.h>
|
#include <cyg/hal/hal_cache.h>
|
#include <cyg/hal/hal_io.h>
|
#include <cyg/hal/hal_io.h>
|
|
|
#ifdef CYGPKG_IO_ETH_DRIVERS
|
#ifdef CYGPKG_IO_ETH_DRIVERS
|
#include <cyg/io/eth/eth_drv.h>
|
#include <cyg/io/eth/eth_drv.h>
|
#endif
|
#endif
|
|
|
// Exported CLI function(s)
|
// Exported CLI function(s)
|
static void do_exec(int argc, char *argv[]);
|
static void do_exec(int argc, char *argv[]);
|
RedBoot_cmd("exec",
|
RedBoot_cmd("exec",
|
"Execute an image",
|
"Execute an image",
|
"[-w timeout] [-b <load addr> [-l <length>]]\n"
|
"[-w timeout] [-b <load addr> [-l <length>]]\n"
|
" [-t <target> ] [<entry_point>]",
|
" [-t <target> ] [<entry_point>]",
|
do_exec
|
do_exec
|
);
|
);
|
|
|
static void do_exec(int argc, char *argv[]) {
|
static void do_exec(int argc, char *argv[]) {
|
|
|
cyg_uint32 wait_time;
|
cyg_uint32 wait_time;
|
cyg_bool wait_time_set;
|
cyg_bool wait_time_set;
|
cyg_uint32 base_addr;
|
cyg_uint32 base_addr;
|
cyg_bool base_addr_set;
|
cyg_bool base_addr_set;
|
cyg_uint32 length;
|
cyg_uint32 length;
|
cyg_bool length_set;
|
cyg_bool length_set;
|
cyg_uint32 target;
|
cyg_uint32 target;
|
cyg_bool target_set;
|
cyg_bool target_set;
|
cyg_uint32 entry;
|
cyg_uint32 entry;
|
|
|
extern char __tramp_start__[], __tramp_end__[];
|
extern char __tramp_start__[], __tramp_end__[];
|
cyg_uint32 oldints;
|
cyg_uint32 oldints;
|
|
|
// Parse parameters
|
// Parse parameters
|
struct option_info opts[4];
|
struct option_info opts[4];
|
init_opts(&opts[0], 'w', true, OPTION_ARG_TYPE_NUM, (void **)&wait_time, (bool *)&wait_time_set, "wait timeout");
|
init_opts(&opts[0], 'w', true, OPTION_ARG_TYPE_NUM, (void **)&wait_time, (bool *)&wait_time_set, "wait timeout");
|
init_opts(&opts[1], 'b', true, OPTION_ARG_TYPE_NUM, (void **)&base_addr, (bool *)&base_addr_set, "base address");
|
init_opts(&opts[1], 'b', true, OPTION_ARG_TYPE_NUM, (void **)&base_addr, (bool *)&base_addr_set, "base address");
|
init_opts(&opts[2], 'l', true, OPTION_ARG_TYPE_NUM, (void **)&length, (bool *)&length_set, "length");
|
init_opts(&opts[2], 'l', true, OPTION_ARG_TYPE_NUM, (void **)&length, (bool *)&length_set, "length");
|
init_opts(&opts[3], 't', true, OPTION_ARG_TYPE_NUM, (void **)&target, (bool *)&target_set, "target address");
|
init_opts(&opts[3], 't', true, OPTION_ARG_TYPE_NUM, (void **)&target, (bool *)&target_set, "target address");
|
int num_opts = 4;
|
int num_opts = 4;
|
|
|
if(!scan_opts(argc, argv, 1, opts, num_opts, (void *)&entry, OPTION_ARG_TYPE_NUM, "starting address")) {
|
if(!scan_opts(argc, argv, 1, opts, num_opts, (void *)&entry, OPTION_ARG_TYPE_NUM, "starting address")) {
|
return;
|
return;
|
}
|
}
|
|
|
// Timeout is optional
|
// Timeout is optional
|
wait_time = wait_time_set ? wait_time : 0;
|
wait_time = wait_time_set ? wait_time : 0;
|
|
|
// Base address is mandatory
|
// Base address is mandatory
|
if(!base_addr_set) {
|
if(!base_addr_set) {
|
diag_printf("Use -b option to provide base address\n");
|
diag_printf("Use -b option to provide base address\n");
|
return;
|
return;
|
}
|
}
|
|
|
// Length is mandatory
|
// Length is mandatory
|
if(!length_set) {
|
if(!length_set) {
|
diag_printf("Use -l option to provide size of the binary\n");
|
diag_printf("Use -l option to provide size of the binary\n");
|
return;
|
return;
|
}
|
}
|
length = (length + 3) & ~0x03;
|
length = (length + 3) & ~0x03;
|
|
|
// Target address is mandatory
|
// Target address is mandatory
|
if(!target_set) {
|
if(!target_set) {
|
diag_printf("Use -t option to provide target address\n");
|
diag_printf("Use -t option to provide target address\n");
|
return;
|
return;
|
}
|
}
|
|
|
// Optionally wait
|
// Optionally wait
|
if(wait_time_set) {
|
if(wait_time_set) {
|
int script_timeout_ms = wait_time * 1000;
|
int script_timeout_ms = wait_time * 1000;
|
#ifdef CYGFUN_REDBOOT_BOOT_SCRIPT
|
#ifdef CYGFUN_REDBOOT_BOOT_SCRIPT
|
unsigned char *hold_script = script;
|
unsigned char *hold_script = script;
|
script = (unsigned char *) 0;
|
script = (unsigned char *) 0;
|
#endif
|
#endif
|
diag_printf("About to start execution of image at %p, entry point %p - abort with ^C within %d seconds\n",
|
diag_printf("About to start execution of image at %p, entry point %p - abort with ^C within %d seconds\n",
|
(void *)target, (void *)entry, wait_time);
|
(void *)target, (void *)entry, wait_time);
|
while(script_timeout_ms >= CYGNUM_REDBOOT_CLI_IDLE_TIMEOUT) {
|
while(script_timeout_ms >= CYGNUM_REDBOOT_CLI_IDLE_TIMEOUT) {
|
char line[8];
|
char line[8];
|
int res = _rb_gets(line, sizeof(line), CYGNUM_REDBOOT_CLI_IDLE_TIMEOUT);
|
int res = _rb_gets(line, sizeof(line), CYGNUM_REDBOOT_CLI_IDLE_TIMEOUT);
|
if(res == _GETS_CTRLC) {
|
if(res == _GETS_CTRLC) {
|
#ifdef CYGFUN_REDBOOT_BOOT_SCRIPT
|
#ifdef CYGFUN_REDBOOT_BOOT_SCRIPT
|
script = hold_script;
|
script = hold_script;
|
#endif
|
#endif
|
return;
|
return;
|
}
|
}
|
script_timeout_ms -= CYGNUM_REDBOOT_CLI_IDLE_TIMEOUT;
|
script_timeout_ms -= CYGNUM_REDBOOT_CLI_IDLE_TIMEOUT;
|
}
|
}
|
}
|
}
|
|
|
#ifdef CYGPKG_IO_ETH_DRIVERS
|
#ifdef CYGPKG_IO_ETH_DRIVERS
|
eth_drv_stop();
|
eth_drv_stop();
|
#endif
|
#endif
|
|
|
HAL_DISABLE_INTERRUPTS(oldints);
|
HAL_DISABLE_INTERRUPTS(oldints);
|
HAL_DCACHE_SYNC();
|
HAL_DCACHE_SYNC();
|
HAL_ICACHE_DISABLE();
|
HAL_ICACHE_DISABLE();
|
HAL_DCACHE_DISABLE();
|
HAL_DCACHE_DISABLE();
|
HAL_DCACHE_SYNC();
|
HAL_DCACHE_SYNC();
|
HAL_ICACHE_INVALIDATE_ALL();
|
HAL_ICACHE_INVALIDATE_ALL();
|
HAL_DCACHE_INVALIDATE_ALL();
|
HAL_DCACHE_INVALIDATE_ALL();
|
|
|
// Copy the trampoline code below
|
// Copy the trampoline code below
|
memcpy((char*)CYGPKG_REDBOOT_OPENRISC_TRAMPOLINE_ADDRESS, __tramp_start__, __tramp_end__ - __tramp_start__);
|
memcpy((char*)CYGPKG_REDBOOT_OPENRISC_TRAMPOLINE_ADDRESS, __tramp_start__, __tramp_end__ - __tramp_start__);
|
|
|
// Jump to the trampoline. Pass arguments according to ABI
|
// Jump to the trampoline. Pass arguments according to ABI
|
void (*trampoline)(cyg_uint32 bin_start, cyg_uint32 bin_end, cyg_uint32 dest_base, cyg_uint32 entry);
|
void (*trampoline)(cyg_uint32 bin_start, cyg_uint32 bin_end, cyg_uint32 dest_base, cyg_uint32 entry);
|
trampoline = CYGPKG_REDBOOT_OPENRISC_TRAMPOLINE_ADDRESS;
|
trampoline = CYGPKG_REDBOOT_OPENRISC_TRAMPOLINE_ADDRESS;
|
trampoline(base_addr, base_addr + length, target, entry);
|
trampoline(base_addr, base_addr + length, target, entry);
|
|
|
// This code is executed from the trampoline address. Trampoline never returns.
|
// This code is executed from the trampoline address. Trampoline never returns.
|
asm volatile (
|
asm volatile (
|
|
|
|
// All code below must be position independent,
|
|
// as it will run on another memory address.
|
|
// Accorting to ABI:
|
|
// R3 is base_addr
|
|
// R4 is base_addr + length
|
|
// R5 is target
|
|
// R6 is the entry point to jump to at the end
|
|
|
"__tramp_start__:\n"
|
"__tramp_start__:\n"
|
"1: l.sfeq r3, r4\n"
|
"1: l.sfeq r3, r4\n"
|
" l.bf 2f\n"
|
" l.bf 2f\n"
|
" l.lwz r13,0x00(r3)\n"
|
" l.lwz r13,0x00(r3)\n"
|
" l.sw 0x00(r5), r13\n"
|
" l.sw 0x00(r5), r13\n"
|
" l.addi r3, r3, 4\n"
|
" l.addi r3, r3, 4\n"
|
|
#ifdef CYGHWR_BRANCH_SLOT_IMPLEMENTED
|
" l.j 1b\n"
|
" l.j 1b\n"
|
" l.addi r5, r5, 4\n"
|
" l.addi r5, r5, 4\n"
|
|
#else
|
|
" l.addi r5, r5, 4\n"
|
|
" l.j 1b\n"
|
|
#endif
|
"2: l.jr r6\n"
|
"2: l.jr r6\n"
|
|
#ifdef CYGHWR_BRANCH_SLOT_IMPLEMENTED
|
" l.nop\n"
|
" l.nop\n"
|
|
#endif
|
"__tramp_end__:\n"
|
"__tramp_end__:\n"
|
: /* no output registers */
|
: /* no output registers */
|
: /* no input registers */
|
: /* no input registers */
|
: /* no clobbered registers */
|
: /* no clobbered registers */
|
);
|
);
|
|
|
|
|
}
|
}
|
|
|
// EOF redboot_linux_exec.c
|
// EOF redboot_linux_exec.c
|
|
|
