exec command in pc redboot
Andrew Lunn
andrew@lunn.ch
Sun Apr 17 12:12:00 GMT 2005
On Thu, Apr 07, 2005 at 03:22:17PM +0100, David Vrabel wrote:
> Andrew Lunn wrote:
> > Attached is a patch from Ian Campbell which adds the exec command to
> > Redboot on pc platforms. I've reworked the patch a bit.
>
> I've just resync'd our local CVS repo with upstream and I noticed
> something I think is wrong with this patch.
>
> > --- /dev/null
> > +++ hal/i386/pc/current/src/redboot_linux_exec.c
>
> I think this file is in the wrong place as it means it's not usable by
> anything other than the pc target. We have a number of different i386
> targets that use this.
>
> Ian had this file in hal/i386/arch/current/src which would match other
> architectures (e.g., arm and powerpc). Similarly the CDL change would go
> in hal/i386/arch/current/cdl/hal_i386.cdl
Yes, you are right. I have moved this code over to the arch directory.
Andrew
-------------- next part --------------
Index: hal/i386/arch/current/ChangeLog
===================================================================
RCS file: /cvs/ecos/ecos/packages/hal/i386/arch/current/ChangeLog,v
retrieving revision 1.42
diff -u -r1.42 ChangeLog
--- hal/i386/arch/current/ChangeLog 21 Mar 2005 15:05:39 -0000 1.42
+++ hal/i386/arch/current/ChangeLog 17 Apr 2005 12:10:02 -0000
@@ -1,3 +1,9 @@
+2005-04-17 Andrew Lunn <andrew.lunn@ascom.ch>
+
+ * cdl/hal_i386.cdl:
+ * src/redboot_linux_exec.c: Moved the RedBoot command "exec" from
+ the pc package to this generic package.
+
2005-03-21 Bart Veer <bartv@ecoscentric.com>
* src/vectors.S, src/hal_misc.c, cdl/hal_i386.cdl: add profiling
Index: hal/i386/arch/current/cdl/hal_i386.cdl
===================================================================
RCS file: /cvs/ecos/ecos/packages/hal/i386/arch/current/cdl/hal_i386.cdl,v
retrieving revision 1.12
diff -u -r1.12 hal_i386.cdl
--- hal/i386/arch/current/cdl/hal_i386.cdl 21 Mar 2005 15:05:38 -0000 1.12
+++ hal/i386/arch/current/cdl/hal_i386.cdl 17 Apr 2005 12:10:02 -0000
@@ -164,5 +164,22 @@
cdl_interface CYGINT_HAL_I386_MEM_REAL_REGION_TOP {
display "Implementations of hal_i386_mem_real_region_top()"
}
-
+
+ cdl_component CYGPKG_REDBOOT_I386_LINUX_EXEC {
+ display "Provide the exec command in RedBoot"
+ flavor none
+ active_if CYGBLD_BUILD_REDBOOT_WITH_EXEC
+ description "
+ This option contains requirements for booting linux
+ from RedBoot. The component is enabled/disabled from
+ RedBoots CDL."
+ compile -library=libextras.a redboot_linux_exec.c
+
+ cdl_option CYGHWR_REDBOOT_I386_TRAMPOLINE_ADDRESS {
+ display "Provide the trampoline address into Linux"
+ flavor data
+ default_value 0x7C000
+ requires CYGINT_HAL_I386_PCMB_SCREEN_SUPPORT
+ }
+ }
}
Index: hal/i386/arch/current/src/redboot_linux_exec.c
===================================================================
RCS file: hal/i386/arch/current/src/redboot_linux_exec.c
diff -N hal/i386/arch/current/src/redboot_linux_exec.c
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ hal/i386/arch/current/src/redboot_linux_exec.c 17 Apr 2005 12:10:03 -0000
@@ -0,0 +1,419 @@
+//=============================================================================
+//
+// redboot_linux_exec.c
+//
+// Boot linux from RedBoot
+//
+//=============================================================================
+//####ECOSGPLCOPYRIGHTBEGIN####
+// -------------------------------------------
+// This file is part of eCos, the Embedded Configurable Operating System.
+// Copyright (C) 2005 eCosCentric
+//
+// 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
+// Software Foundation; either version 2 or (at your option) any later version.
+//
+// eCos is distributed in the hope that it will be useful, but WITHOUT ANY
+// WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with eCos; if not, write to the Free Software Foundation, Inc.,
+// 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
+//
+// As a special exception, if other files instantiate templates or use 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, 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 must still be made available
+// in accordance with section (3) of the GNU General Public License.
+//
+// This exception does not invalidate any other reasons why a work based on
+// this file might be covered by the GNU General Public License.
+//
+// -------------------------------------------
+//####ECOSGPLCOPYRIGHTEND####
+//=============================================================================
+//#####DESCRIPTIONBEGIN####
+//
+// Author(s): Ian Campbell
+// Contributors:
+// Date: 29 Oct 2004
+// Purpose: Boot Linux from Redboot
+// Description:
+//
+//####DESCRIPTIONEND####
+//
+//=============================================================================
+
+#include <pkgconf/hal.h>
+#include <redboot.h>
+
+#ifdef CYGPKG_IO_PCI
+#include <cyg/io/pci.h>
+#endif
+
+#ifdef CYGPKG_IO_ETH_DRIVERS
+#include <cyg/io/eth/eth_drv.h>
+#endif
+
+#include <cyg/hal/hal_intr.h>
+#include <cyg/hal/hal_cache.h>
+#include CYGHWR_MEMORY_LAYOUT_H
+
+#include <cyg/hal/hal_io.h>
+#include <cyg/hal/pcmb_serial.h>
+
+/*
+ * Code to launch a Linux image directly in protected mode.
+ *
+ * Jumps directly to the protected mode part of the kernel
+ */
+
+typedef void (*trampoline_func)
+ (unsigned long base, unsigned long length, unsigned long entry);
+
+// Defines for the linux loader
+#define SETUP_SIZE_OFF 497
+#define SECTSIZE 512
+#define SETUP_VERSION 0x0201
+#define SETUP_HIGH 0x01
+#define BIG_SYSSEG 0x10000
+#define DEF_BOOTLSEG 0x9020
+
+// From etherboot, this is the header to the image startup code
+// see Documentation/i386/boot.txt
+/* Boot sector: bootsect.S */
+/* VERSION: ALL */
+struct bootsect_header {
+ cyg_uint8 pad0[0x1f1];
+ cyg_uint8 setup_sects;
+ cyg_uint16 root_flags; // If set, the root is mounted readonly
+ cyg_uint16 syssize; // DO NOT USE - for bootsect.S use only
+ cyg_uint16 swap_dev; // DO NOT USE - obsolete
+ cyg_uint16 ram_size; // DO NOT USE - for bootsect.S use only
+ cyg_uint16 vid_mode; // Video mode control
+ cyg_uint16 root_dev; // Default root device number
+ cyg_uint16 boot_flag; // 0xAA55 magic number
+} __attribute__((packed));
+
+/* setup.S */
+/* VERSION: 2.00+ */
+struct setup_header {
+ cyg_uint8 jump[2];
+ cyg_uint8 magic[4]; // "HdrS"
+ cyg_uint16 version; // >= 0x0201 for initrd
+ cyg_uint8 realmode_swtch[4];
+ cyg_uint16 start_sys_seg;
+ cyg_uint16 kernel_version;
+ /* note: above part of header is compatible with loadlin-1.5
+ * (header v1.5), must not change it */
+ cyg_uint8 type_of_loader;
+ cyg_uint8 loadflags;
+ cyg_uint16 setup_move_size;
+ unsigned long code32_start;
+ unsigned long ramdisk_image;
+ unsigned long ramdisk_size;
+ unsigned long bootsect_kludge;
+ /* VERSION: 2.01+ */
+ cyg_uint16 heap_end_ptr;
+ cyg_uint16 pad1;
+ /* VERSION: 2.02+ */
+ unsigned long cmd_line_ptr;
+ /* VERSION: 2.03+ */
+ unsigned long initrd_addr_max;
+} __attribute__((packed));
+
+#define PARAM 0x90000
+#define PARAM_ORIG_X *(cyg_uint8*) (PARAM+0x000)
+#define PARAM_ORIG_Y *(cyg_uint8*) (PARAM+0x001)
+#define PARAM_EXT_MEM_K *(cyg_uint16*)(PARAM+0x002)
+#define PARAM_ORIG_VIDEO_PAGE *(cyg_uint16*)(PARAM+0x004)
+#define PARAM_ORIG_VIDEO_MODE *(cyg_uint8*) (PARAM+0x006)
+#define PARAM_ORIG_VIDEO_COLS *(cyg_uint8*) (PARAM+0x007)
+#define PARAM_ORIG_VIDEO_EGA_BX *(cyg_uint16*)(PARAM+0x00a)
+#define PARAM_ORIG_VIDEO_LINES *(cyg_uint8*) (PARAM+0x00E)
+#define PARAM_ORIG_VIDEO_ISVGA *(cyg_uint8*) (PARAM+0x00F)
+#define PARAM_ORIG_VIDEO_POINTS *(cyg_uint16*)(PARAM+0x010)
+
+#define PARAM_ALT_MEM_K *(cyg_uint32*)(PARAM+0x1e0)
+#define PARAM_E820NR *(cyg_uint8*) (PARAM+0x1e8)
+#define PARAM_VID_MODE *(cyg_uint16*)(PARAM+0x1fa)
+#define PARAM_E820MAP (struct e820entry*)(PARAM+0x2d0);
+#define PARAM_CMDLINE (char *)(PARAM+0x3400)
+
+void
+do_exec(int argc, char **argv)
+{
+ unsigned long entry;
+ unsigned long oldints;
+ bool wait_time_set;
+ int wait_time, res;
+ bool base_addr_set, length_set, cmd_line_set;
+ bool ramdisk_addr_set, ramdisk_size_set;
+ unsigned long base_addr, length;
+ unsigned long ramdisk_addr, ramdisk_size;
+ struct option_info opts[6];
+ char *cmd_line;
+ char line[8];
+ cyg_uint32 mem_size;
+ cyg_uint32 int15_e801;
+ extern char __tramp_start__[], __tramp_end__[];
+ trampoline_func trampoline =
+ (trampoline_func)CYGHWR_REDBOOT_I386_TRAMPOLINE_ADDRESS;
+ struct bootsect_header *bs_header;
+ struct setup_header *s_header;
+ int setup_sects;
+ int xpos = 0, ypos = 0;
+
+ base_addr = load_address;
+ length = load_address_end - load_address;
+ // Round length up to the next quad word
+ length = (length + 3) & ~0x3;
+
+ ramdisk_size = 4096*1024;
+ init_opts(&opts[0], 'w', true, OPTION_ARG_TYPE_NUM,
+ &wait_time, &wait_time_set, "wait timeout");
+ init_opts(&opts[1], 'b', true, OPTION_ARG_TYPE_NUM,
+ &base_addr, &base_addr_set, "base address");
+ init_opts(&opts[2], 'l', true, OPTION_ARG_TYPE_NUM,
+ &length, &length_set, "length");
+ init_opts(&opts[3], 'c', true, OPTION_ARG_TYPE_STR,
+ &cmd_line, &cmd_line_set, "kernel command line");
+ init_opts(&opts[4], 'r', true, OPTION_ARG_TYPE_NUM,
+ &ramdisk_addr, &ramdisk_addr_set, "ramdisk_addr");
+ init_opts(&opts[5], 's', true, OPTION_ARG_TYPE_NUM,
+ &ramdisk_size, &ramdisk_size_set, "ramdisk_size");
+ if (!scan_opts(argc, argv, 1, opts, 6, 0, 0, "starting address"))
+ {
+ return;
+ }
+
+ if (wait_time_set) {
+ int script_timeout_ms = wait_time * 1000;
+#ifdef CYGFUN_REDBOOT_BOOT_SCRIPT
+ unsigned char *hold_script = script;
+ script = (unsigned char *)0;
+#endif
+ diag_printf("About to boot linux kernel at %p - "
+ "abort with ^C within %d seconds\n",
+ (void *)base_addr, wait_time);
+ while (script_timeout_ms >= CYGNUM_REDBOOT_CLI_IDLE_TIMEOUT) {
+ res = _rb_gets(line, sizeof(line),
+ CYGNUM_REDBOOT_CLI_IDLE_TIMEOUT);
+ if (res == _GETS_CTRLC) {
+#ifdef CYGFUN_REDBOOT_BOOT_SCRIPT
+ script = hold_script; // Re-enable script
+#endif
+ return;
+ }
+ script_timeout_ms -= CYGNUM_REDBOOT_CLI_IDLE_TIMEOUT;
+ }
+ }
+
+ if (base_addr_set && !length_set) {
+ diag_printf("Length required for non-standard base address\n");
+ return;
+ }
+
+ bs_header = (struct bootsect_header *)base_addr;
+ s_header = (struct setup_header *)(base_addr + SECTSIZE);
+
+ if (bs_header->boot_flag != 0xAA55) {
+ diag_printf("Bootsector magic not found (0x%04x @ %4p)\n",
+ bs_header->boot_flag, &bs_header->boot_flag);
+ return;
+ }
+ if (memcmp(s_header->magic,"HdrS",4) != 0) {
+ diag_printf("Linux header (HdrS) not found\n");
+ return;
+ }
+ if (s_header->version < SETUP_VERSION) {
+ diag_printf("Linux header version = 0x%04x. "
+ "Needs to be at least 0x%04x\n",
+ s_header->version, SETUP_VERSION);
+ return;
+ }
+
+ setup_sects = bs_header->setup_sects ? bs_header->setup_sects : 4;
+
+ entry = s_header->code32_start;
+ // + 1 for boot sector
+ base_addr += (setup_sects + 1 ) * SECTSIZE;
+ length -= (setup_sects + 1 ) * SECTSIZE;
+
+ mem_size = (cyg_uint32)HAL_MEM_REAL_REGION_TOP((cyg_uint8 *)0x1000000);
+ mem_size >>= 10; // convert from bytes to kilobytes.
+ // Result of int15 ax=0xe801
+ int15_e801 = mem_size - 1024 ; // 1M+ only
+
+ // Stop all network devices
+#ifdef CYGPKG_IO_ETH_DRIVERS
+ eth_drv_stop();
+#endif
+
+#ifdef CYGPKG_IO_PCI
+ cyg_pci_init();
+#endif
+
+#if CYGINT_HAL_I386_PCMB_SCREEN_SUPPORT > 0
+ cyg_hal_plf_screen_position(&xpos, &ypos);
+#endif
+
+ HAL_DISABLE_INTERRUPTS(oldints);
+ HAL_DCACHE_SYNC();
+ HAL_ICACHE_DISABLE();
+ HAL_DCACHE_DISABLE();
+ HAL_DCACHE_SYNC();
+ HAL_ICACHE_INVALIDATE_ALL();
+ HAL_DCACHE_INVALIDATE_ALL();
+
+ // Clear the data area
+ memset ( (void*)PARAM, 0, 512 );
+
+ if ( cmd_line_set )
+ strcpy( PARAM_CMDLINE, cmd_line );
+ else
+ strcpy( PARAM_CMDLINE, "auto");
+
+ memcpy((void*)(PARAM+SECTSIZE), s_header, sizeof(struct setup_header));
+ s_header = (struct setup_header*)(0x90000+SECTSIZE);
+
+ s_header->version = SETUP_VERSION;
+
+ // Command Line
+ s_header->cmd_line_ptr = 0x93400;
+
+ // Loader type
+ s_header->type_of_loader = 0xFF;
+
+ // Fill in the interesting bits of data area...
+ // ... Memory sizes
+ PARAM_EXT_MEM_K = int15_e801;
+ PARAM_ALT_MEM_K = int15_e801;
+
+ // ... No e820 map!
+ PARAM_E820NR = 0; // Length of map
+
+ // ... Video stuff
+ PARAM_ORIG_X = xpos;
+ PARAM_ORIG_Y = ypos;
+ PARAM_ORIG_VIDEO_MODE = 2;
+ PARAM_ORIG_VIDEO_COLS = 80;
+ PARAM_ORIG_VIDEO_LINES = 25;
+ PARAM_ORIG_VIDEO_ISVGA = 0;
+
+ // Copy trampoline to trampoline address
+ memcpy((char *)CYGHWR_REDBOOT_I386_TRAMPOLINE_ADDRESS,
+ __tramp_start__,
+ __tramp_end__ - __tramp_start__);
+
+ trampoline(base_addr, length, entry);
+
+#define _QUOTE_STRING(__x__) #__x__
+#define QUOTE_STRING(__x__) _QUOTE_STRING(__x__)
+
+ asm volatile (
+ "__tramp_start__:\n"
+ " push %%ebp;\n"
+ " mov %%esp,%%ebp;\n"
+
+ /* STACK IS:
+ * OLD BP 0x4(%ebp)
+ * ENTRY 0x8(%ebp)
+ * LENGTH 0xC(%ebp)
+ * BASE ADDRESS 0x10(%ebp) */
+
+ " movl 0x10(%%ebp), %%ebx;\n" /* Save entry point
+ in EBX, because
+ we overwrite the
+ stack */
+
+ " cli;\n" /* no interrupts allowed ! */
+
+ " movb $0x80, %%al;\n" /* disable NMI for bootup */
+ " outb %%al, $0x70;\n" /* sequence */
+
+ /* Copy GDT to RAM at 0x90400 */
+ " movl $(linux_gdt_end - linux_gdt), %%ecx;\n" /* Length */
+ " shrl $2, %%ecx;\n" /* Bytes -> Longs */
+ " leal linux_gdt, %%eax;\n" /* Source */
+ " movl %%eax, %%esi;\n"
+ " movl $(0x90400), %%edi;\n" /* Dest */
+ "1:\n"
+ " lodsl;\n"
+ " stosl;\n"
+ " loop 1b;\n"
+
+ /* If necessary, copy linux image to correct location */
+ " movl 0x8(%%ebp), %%esi;\n" /* Source */
+ " movl %%ebx, %%edi;\n" /* Destination
+ * (saved in
+ * EBX
+ * above) */
+ " cmpl %%edi, %%esi;\n"
+ " je 2f;\n"
+ " movl 0xC(%%ebp), %%ecx;\n" /* Length */
+ " shrl $2, %%ecx;\n" /* Bytes to Longs */
+ "1:\n"
+ " lodsl;\n"
+ " stosl;\n"
+ " loop 1b;\n"
+ "2:\n"
+
+ /* Create a GDT descriptor at 0 and load it */
+ " movl $0x90000, %%esi;\n"
+ " movw $(linux_gdt_end - linux_gdt), %%ax;\n"
+ " dec %%ax;\n"
+ " movw %%ax,0;\n"
+ " movl $0x90400,%%eax;\n"
+ " movl %%eax,2;\n"
+ " lgdt 0;\n"
+
+ /* Reload segment registers */
+ " mov $(0x18), %%eax;\n"
+ " movl %%eax, %%ds;\n"
+ " movl %%eax, %%es;\n"
+ " movl %%eax, %%fs;\n"
+ " movl %%eax, %%gs;\n"
+
+ /* Reload CS */
+ " ljmp $(0x10), $(1f - __tramp_start__ + "
+ QUOTE_STRING(CYGHWR_REDBOOT_I386_TRAMPOLINE_ADDRESS) ");\n"
+ "1:\n"
+
+ /* Start kernel */
+ " jmp *%%ebx;\n"
+
+ ".ALIGN 4, 0xCC;\n"
+
+ "__tramp_end__:\n"
+
+ /* Descriptor tables */
+ "linux_gdt:\n"
+ " .word 0, 0, 0, 0;\n" /* dummy */
+ " .word 0, 0, 0, 0;\n" /* unused */
+ " .word 0xFFFF;\n" /* 4Gb - (0x100000*0x1000
+ * = * 4Gb) */
+ " .word 0;\n" /* base address = 0 */
+ " .word 0x9A00;\n" /* code read/exec */
+ " .word 0x00CF;\n" /* granularity = 4096, 386 */
+ /* (+5th nibble of limit) */
+ " .word 0xFFFF;\n" /* 4Gb - (0x100000*0x1000 = 4Gb) */
+ " .word 0;\n" /* base address = 0 */
+ " .word 0x9200;\n" /* data read/write */
+ " .word 0x00CF;\n" /* granularity = 4096, 386 */
+ /* (+5th nibble of limit) */
+ "linux_gdt_end:\n"
+ : : : "eax", "ebx", "ecx");
+}
+
+RedBoot_cmd("exec",
+ "Execute a Linux image",
+ "[-w timeout] [-b <base address> [-l <image length>]]\n"
+ " [-r <ramdisk addr> [-s <ramdisk length>]]\n"
+ " [-c \"kernel command line\"]",
+ do_exec
+ );
Index: hal/i386/pc/current/ChangeLog
===================================================================
RCS file: /cvs/ecos/ecos/packages/hal/i386/pc/current/ChangeLog,v
retrieving revision 1.25
diff -u -r1.25 ChangeLog
--- hal/i386/pc/current/ChangeLog 22 Jan 2005 15:46:01 -0000 1.25
+++ hal/i386/pc/current/ChangeLog 17 Apr 2005 12:10:03 -0000
@@ -1,3 +1,9 @@
+2005-04-17 Andrew Lunn <andrew.lunn@ascom.ch>
+
+ * cdl/hal_i386_pc.cdl:
+ * src/redboot_linux_exec.c: Moved the RedBoot command "exec" from
+ this package to the generic architecture package.
+
2005-01-22 Ian Campbell <icampbell@arcom.com>
* cdl/hal_i386_pc.cdl,
Index: hal/i386/pc/current/cdl/hal_i386_pc.cdl
===================================================================
RCS file: /cvs/ecos/ecos/packages/hal/i386/pc/current/cdl/hal_i386_pc.cdl,v
retrieving revision 1.13
diff -u -r1.13 hal_i386_pc.cdl
--- hal/i386/pc/current/cdl/hal_i386_pc.cdl 22 Jan 2005 15:24:57 -0000 1.13
+++ hal/i386/pc/current/cdl/hal_i386_pc.cdl 17 Apr 2005 12:10:04 -0000
@@ -365,25 +365,6 @@
This option lists the target's requirements for a valid Redboot
configuration."
-
- cdl_component CYGPKG_REDBOOT_I386_LINUX_EXEC {
- display "Provide the exec command in RedBoot"
- flavor none
- active_if CYGBLD_BUILD_REDBOOT_WITH_EXEC
- description "
- This option contains requirements for booting linux
- from RedBoot. The component is enabled/disabled from
- RedBoots CDL."
- compile -library=libextras.a redboot_linux_exec.c
-
- cdl_option CYGHWR_REDBOOT_I386_TRAMPOLINE_ADDRESS {
- display "Provide the trampoline address into Linux"
- flavor data
- default_value 0x7C000
- requires CYGINT_HAL_I386_PCMB_SCREEN_SUPPORT
- }
- }
-
cdl_component CYGBLD_BUILD_REDBOOT_BIN {
display "Build RedBoot binary image"
no_define
Index: hal/i386/pc/current/src/redboot_linux_exec.c
===================================================================
RCS file: hal/i386/pc/current/src/redboot_linux_exec.c
diff -N hal/i386/pc/current/src/redboot_linux_exec.c
--- hal/i386/pc/current/src/redboot_linux_exec.c 22 Jan 2005 15:24:57 -0000 1.1
+++ /dev/null 1 Jan 1970 00:00:00 -0000
@@ -1,419 +0,0 @@
-//=============================================================================
-//
-// redboot_linux_exec.c
-//
-// Boot linux from RedBoot
-//
-//=============================================================================
-//####ECOSGPLCOPYRIGHTBEGIN####
-// -------------------------------------------
-// This file is part of eCos, the Embedded Configurable Operating System.
-// Copyright (C) 2005 eCosCentric
-//
-// 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
-// Software Foundation; either version 2 or (at your option) any later version.
-//
-// eCos is distributed in the hope that it will be useful, but WITHOUT ANY
-// WARRANTY; without even the implied warranty of MERCHANTABILITY or
-// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
-// for more details.
-//
-// You should have received a copy of the GNU General Public License along
-// with eCos; if not, write to the Free Software Foundation, Inc.,
-// 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
-//
-// As a special exception, if other files instantiate templates or use 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, 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 must still be made available
-// in accordance with section (3) of the GNU General Public License.
-//
-// This exception does not invalidate any other reasons why a work based on
-// this file might be covered by the GNU General Public License.
-//
-// -------------------------------------------
-//####ECOSGPLCOPYRIGHTEND####
-//=============================================================================
-//#####DESCRIPTIONBEGIN####
-//
-// Author(s): Ian Campbell
-// Contributors:
-// Date: 29 Oct 2004
-// Purpose: Boot Linux from Redboot
-// Description:
-//
-//####DESCRIPTIONEND####
-//
-//=============================================================================
-
-#include <pkgconf/hal.h>
-#include <redboot.h>
-
-#ifdef CYGPKG_IO_PCI
-#include <cyg/io/pci.h>
-#endif
-
-#ifdef CYGPKG_IO_ETH_DRIVERS
-#include <cyg/io/eth/eth_drv.h>
-#endif
-
-#include <cyg/hal/hal_intr.h>
-#include <cyg/hal/hal_cache.h>
-#include CYGHWR_MEMORY_LAYOUT_H
-
-#include <cyg/hal/hal_io.h>
-#include <cyg/hal/pcmb_serial.h>
-
-/*
- * Code to launch a Linux image directly in protected mode.
- *
- * Jumps directly to the protected mode part of the kernel
- */
-
-typedef void (*trampoline_func)
- (unsigned long base, unsigned long length, unsigned long entry);
-
-// Defines for the linux loader
-#define SETUP_SIZE_OFF 497
-#define SECTSIZE 512
-#define SETUP_VERSION 0x0201
-#define SETUP_HIGH 0x01
-#define BIG_SYSSEG 0x10000
-#define DEF_BOOTLSEG 0x9020
-
-// From etherboot, this is the header to the image startup code
-// see Documentation/i386/boot.txt
-/* Boot sector: bootsect.S */
-/* VERSION: ALL */
-struct bootsect_header {
- cyg_uint8 pad0[0x1f1];
- cyg_uint8 setup_sects;
- cyg_uint16 root_flags; // If set, the root is mounted readonly
- cyg_uint16 syssize; // DO NOT USE - for bootsect.S use only
- cyg_uint16 swap_dev; // DO NOT USE - obsolete
- cyg_uint16 ram_size; // DO NOT USE - for bootsect.S use only
- cyg_uint16 vid_mode; // Video mode control
- cyg_uint16 root_dev; // Default root device number
- cyg_uint16 boot_flag; // 0xAA55 magic number
-} __attribute__((packed));
-
-/* setup.S */
-/* VERSION: 2.00+ */
-struct setup_header {
- cyg_uint8 jump[2];
- cyg_uint8 magic[4]; // "HdrS"
- cyg_uint16 version; // >= 0x0201 for initrd
- cyg_uint8 realmode_swtch[4];
- cyg_uint16 start_sys_seg;
- cyg_uint16 kernel_version;
- /* note: above part of header is compatible with loadlin-1.5
- * (header v1.5), must not change it */
- cyg_uint8 type_of_loader;
- cyg_uint8 loadflags;
- cyg_uint16 setup_move_size;
- unsigned long code32_start;
- unsigned long ramdisk_image;
- unsigned long ramdisk_size;
- unsigned long bootsect_kludge;
- /* VERSION: 2.01+ */
- cyg_uint16 heap_end_ptr;
- cyg_uint16 pad1;
- /* VERSION: 2.02+ */
- unsigned long cmd_line_ptr;
- /* VERSION: 2.03+ */
- unsigned long initrd_addr_max;
-} __attribute__((packed));
-
-#define PARAM 0x90000
-#define PARAM_ORIG_X *(cyg_uint8*) (PARAM+0x000)
-#define PARAM_ORIG_Y *(cyg_uint8*) (PARAM+0x001)
-#define PARAM_EXT_MEM_K *(cyg_uint16*)(PARAM+0x002)
-#define PARAM_ORIG_VIDEO_PAGE *(cyg_uint16*)(PARAM+0x004)
-#define PARAM_ORIG_VIDEO_MODE *(cyg_uint8*) (PARAM+0x006)
-#define PARAM_ORIG_VIDEO_COLS *(cyg_uint8*) (PARAM+0x007)
-#define PARAM_ORIG_VIDEO_EGA_BX *(cyg_uint16*)(PARAM+0x00a)
-#define PARAM_ORIG_VIDEO_LINES *(cyg_uint8*) (PARAM+0x00E)
-#define PARAM_ORIG_VIDEO_ISVGA *(cyg_uint8*) (PARAM+0x00F)
-#define PARAM_ORIG_VIDEO_POINTS *(cyg_uint16*)(PARAM+0x010)
-
-#define PARAM_ALT_MEM_K *(cyg_uint32*)(PARAM+0x1e0)
-#define PARAM_E820NR *(cyg_uint8*) (PARAM+0x1e8)
-#define PARAM_VID_MODE *(cyg_uint16*)(PARAM+0x1fa)
-#define PARAM_E820MAP (struct e820entry*)(PARAM+0x2d0);
-#define PARAM_CMDLINE (char *)(PARAM+0x3400)
-
-void
-do_exec(int argc, char **argv)
-{
- unsigned long entry;
- unsigned long oldints;
- bool wait_time_set;
- int wait_time, res;
- bool base_addr_set, length_set, cmd_line_set;
- bool ramdisk_addr_set, ramdisk_size_set;
- unsigned long base_addr, length;
- unsigned long ramdisk_addr, ramdisk_size;
- struct option_info opts[6];
- char *cmd_line;
- char line[8];
- cyg_uint32 mem_size;
- cyg_uint32 int15_e801;
- extern char __tramp_start__[], __tramp_end__[];
- trampoline_func trampoline =
- (trampoline_func)CYGHWR_REDBOOT_I386_TRAMPOLINE_ADDRESS;
- struct bootsect_header *bs_header;
- struct setup_header *s_header;
- int setup_sects;
- int xpos = 0, ypos = 0;
-
- base_addr = load_address;
- length = load_address_end - load_address;
- // Round length up to the next quad word
- length = (length + 3) & ~0x3;
-
- ramdisk_size = 4096*1024;
- init_opts(&opts[0], 'w', true, OPTION_ARG_TYPE_NUM,
- &wait_time, &wait_time_set, "wait timeout");
- init_opts(&opts[1], 'b', true, OPTION_ARG_TYPE_NUM,
- &base_addr, &base_addr_set, "base address");
- init_opts(&opts[2], 'l', true, OPTION_ARG_TYPE_NUM,
- &length, &length_set, "length");
- init_opts(&opts[3], 'c', true, OPTION_ARG_TYPE_STR,
- &cmd_line, &cmd_line_set, "kernel command line");
- init_opts(&opts[4], 'r', true, OPTION_ARG_TYPE_NUM,
- &ramdisk_addr, &ramdisk_addr_set, "ramdisk_addr");
- init_opts(&opts[5], 's', true, OPTION_ARG_TYPE_NUM,
- &ramdisk_size, &ramdisk_size_set, "ramdisk_size");
- if (!scan_opts(argc, argv, 1, opts, 6, 0, 0, "starting address"))
- {
- return;
- }
-
- if (wait_time_set) {
- int script_timeout_ms = wait_time * 1000;
-#ifdef CYGFUN_REDBOOT_BOOT_SCRIPT
- unsigned char *hold_script = script;
- script = (unsigned char *)0;
-#endif
- diag_printf("About to boot linux kernel at %p - "
- "abort with ^C within %d seconds\n",
- (void *)base_addr, wait_time);
- while (script_timeout_ms >= CYGNUM_REDBOOT_CLI_IDLE_TIMEOUT) {
- res = _rb_gets(line, sizeof(line),
- CYGNUM_REDBOOT_CLI_IDLE_TIMEOUT);
- if (res == _GETS_CTRLC) {
-#ifdef CYGFUN_REDBOOT_BOOT_SCRIPT
- script = hold_script; // Re-enable script
-#endif
- return;
- }
- script_timeout_ms -= CYGNUM_REDBOOT_CLI_IDLE_TIMEOUT;
- }
- }
-
- if (base_addr_set && !length_set) {
- diag_printf("Length required for non-standard base address\n");
- return;
- }
-
- bs_header = (struct bootsect_header *)base_addr;
- s_header = (struct setup_header *)(base_addr + SECTSIZE);
-
- if (bs_header->boot_flag != 0xAA55) {
- diag_printf("Bootsector magic not found (0x%04x @ 0x%04x)\n",
- bs_header->boot_flag, &bs_header->boot_flag);
- return;
- }
- if (memcmp(s_header->magic,"HdrS",4) != 0) {
- diag_printf("Linux header (HdrS) not found\n");
- return;
- }
- if (s_header->version < SETUP_VERSION) {
- diag_printf("Linux header version = 0x%04x. "
- "Needs to be at least 0x%04x\n",
- s_header->version, SETUP_VERSION);
- return;
- }
-
- setup_sects = bs_header->setup_sects ? bs_header->setup_sects : 4;
-
- entry = s_header->code32_start;
- // + 1 for boot sector
- base_addr += (setup_sects + 1 ) * SECTSIZE;
- length -= (setup_sects + 1 ) * SECTSIZE;
-
- mem_size = (cyg_uint32)HAL_MEM_REAL_REGION_TOP((cyg_uint8 *)0x1000000);
- mem_size >>= 10; // convert from bytes to kilobytes.
- // Result of int15 ax=0xe801
- int15_e801 = mem_size - 1024 ; // 1M+ only
-
- // Stop all network devices
-#ifdef CYGPKG_IO_ETH_DRIVERS
- eth_drv_stop();
-#endif
-
-#ifdef CYGPKG_IO_PCI
- cyg_pci_init();
-#endif
-
-#if CYGINT_HAL_I386_PCMB_SCREEN_SUPPORT > 0
- cyg_hal_plf_screen_position(&xpos, &ypos);
-#endif
-
- HAL_DISABLE_INTERRUPTS(oldints);
- HAL_DCACHE_SYNC();
- HAL_ICACHE_DISABLE();
- HAL_DCACHE_DISABLE();
- HAL_DCACHE_SYNC();
- HAL_ICACHE_INVALIDATE_ALL();
- HAL_DCACHE_INVALIDATE_ALL();
-
- // Clear the data area
- memset ( (void*)PARAM, 0, 512 );
-
- if ( cmd_line_set )
- strcpy( PARAM_CMDLINE, cmd_line );
- else
- strcpy( PARAM_CMDLINE, "auto");
-
- memcpy((void*)(PARAM+SECTSIZE), s_header, sizeof(struct setup_header));
- s_header = (struct setup_header*)(0x90000+SECTSIZE);
-
- s_header->version = SETUP_VERSION;
-
- // Command Line
- s_header->cmd_line_ptr = 0x93400;
-
- // Loader type
- s_header->type_of_loader = 0xFF;
-
- // Fill in the interesting bits of data area...
- // ... Memory sizes
- PARAM_EXT_MEM_K = int15_e801;
- PARAM_ALT_MEM_K = int15_e801;
-
- // ... No e820 map!
- PARAM_E820NR = 0; // Length of map
-
- // ... Video stuff
- PARAM_ORIG_X = xpos;
- PARAM_ORIG_Y = ypos;
- PARAM_ORIG_VIDEO_MODE = 2;
- PARAM_ORIG_VIDEO_COLS = 80;
- PARAM_ORIG_VIDEO_LINES = 25;
- PARAM_ORIG_VIDEO_ISVGA = 0;
-
- // Copy trampoline to trampoline address
- memcpy((char *)CYGHWR_REDBOOT_I386_TRAMPOLINE_ADDRESS,
- __tramp_start__,
- __tramp_end__ - __tramp_start__);
-
- trampoline(base_addr, length, entry);
-
-#define _QUOTE_STRING(__x__) #__x__
-#define QUOTE_STRING(__x__) _QUOTE_STRING(__x__)
-
- asm volatile (
- "__tramp_start__:\n"
- " push %%ebp;\n"
- " mov %%esp,%%ebp;\n"
-
- /* STACK IS:
- * OLD BP 0x4(%ebp)
- * ENTRY 0x8(%ebp)
- * LENGTH 0xC(%ebp)
- * BASE ADDRESS 0x10(%ebp) */
-
- " movl 0x10(%%ebp), %%ebx;\n" /* Save entry point
- in EBX, because
- we overwrite the
- stack */
-
- " cli;\n" /* no interrupts allowed ! */
-
- " movb $0x80, %%al;\n" /* disable NMI for bootup */
- " outb %%al, $0x70;\n" /* sequence */
-
- /* Copy GDT to RAM at 0x90400 */
- " movl $(linux_gdt_end - linux_gdt), %%ecx;\n" /* Length */
- " shrl $2, %%ecx;\n" /* Bytes -> Longs */
- " leal linux_gdt, %%eax;\n" /* Source */
- " movl %%eax, %%esi;\n"
- " movl $(0x90400), %%edi;\n" /* Dest */
- "1:\n"
- " lodsl;\n"
- " stosl;\n"
- " loop 1b;\n"
-
- /* If necessary, copy linux image to correct location */
- " movl 0x8(%%ebp), %%esi;\n" /* Source */
- " movl %%ebx, %%edi;\n" /* Destination
- * (saved in
- * EBX
- * above) */
- " cmpl %%edi, %%esi;\n"
- " je 2f;\n"
- " movl 0xC(%%ebp), %%ecx;\n" /* Length */
- " shrl $2, %%ecx;\n" /* Bytes to Longs */
- "1:\n"
- " lodsl;\n"
- " stosl;\n"
- " loop 1b;\n"
- "2:\n"
-
- /* Create a GDT descriptor at 0 and load it */
- " movl $0x90000, %%esi;\n"
- " movw $(linux_gdt_end - linux_gdt), %%ax;\n"
- " dec %%ax;\n"
- " movw %%ax,0;\n"
- " movl $0x90400,%%eax;\n"
- " movl %%eax,2;\n"
- " lgdt 0;\n"
-
- /* Reload segment registers */
- " mov $(0x18), %%eax;\n"
- " movl %%eax, %%ds;\n"
- " movl %%eax, %%es;\n"
- " movl %%eax, %%fs;\n"
- " movl %%eax, %%gs;\n"
-
- /* Reload CS */
- " ljmp $(0x10), $(1f - __tramp_start__ + "
- QUOTE_STRING(CYGHWR_REDBOOT_I386_TRAMPOLINE_ADDRESS) ");\n"
- "1:\n"
-
- /* Start kernel */
- " jmp *%%ebx;\n"
-
- ".ALIGN 4, 0xCC;\n"
-
- "__tramp_end__:\n"
-
- /* Descriptor tables */
- "linux_gdt:\n"
- " .word 0, 0, 0, 0;\n" /* dummy */
- " .word 0, 0, 0, 0;\n" /* unused */
- " .word 0xFFFF;\n" /* 4Gb - (0x100000*0x1000
- * = * 4Gb) */
- " .word 0;\n" /* base address = 0 */
- " .word 0x9A00;\n" /* code read/exec */
- " .word 0x00CF;\n" /* granularity = 4096, 386 */
- /* (+5th nibble of limit) */
- " .word 0xFFFF;\n" /* 4Gb - (0x100000*0x1000 = 4Gb) */
- " .word 0;\n" /* base address = 0 */
- " .word 0x9200;\n" /* data read/write */
- " .word 0x00CF;\n" /* granularity = 4096, 386 */
- /* (+5th nibble of limit) */
- "linux_gdt_end:\n"
- : : : "eax", "ebx", "ecx");
-}
-
-RedBoot_cmd("exec",
- "Execute a Linux image",
- "[-w timeout] [-b <base address> [-l <image length>]]\n"
- " [-r <ramdisk addr> [-s <ramdisk length>]]\n"
- " [-c \"kernel command line\"]",
- do_exec
- );
More information about the Ecos-patches
mailing list