mirror of
https://gitlab.com/qemu-project/openbios.git
synced 2024-02-13 08:34:06 +08:00
5f5b8d6f8c
Signed-off-by: igor.v.kovalenko@gmail.com git-svn-id: svn://coreboot.org/openbios/trunk/openbios-devel@508 f158a5a8-5612-0410-a976-696ce0be7e32
140 lines
3.5 KiB
C
140 lines
3.5 KiB
C
/* a.out boot loader
|
|
* As we have seek, this implementation can be straightforward.
|
|
* 2003-07 by SONE Takeshi
|
|
*/
|
|
|
|
#include "openbios/config.h"
|
|
#include "openbios/kernel.h"
|
|
#define CONFIG_SPARC64_PAGE_SIZE_8KB
|
|
#include "a.out.h"
|
|
#include "sys_info.h"
|
|
#include "loadfs.h"
|
|
#include "boot.h"
|
|
#define printf printk
|
|
#define debug printk
|
|
|
|
#define addr_fixup(addr) ((addr) & 0x00ffffff)
|
|
|
|
static char *image_name, *image_version;
|
|
|
|
static int check_mem_ranges(struct sys_info *info,
|
|
unsigned long start,
|
|
unsigned long size)
|
|
{
|
|
int j;
|
|
unsigned long end;
|
|
unsigned long prog_start, prog_end;
|
|
struct memrange *mem;
|
|
|
|
prog_start = virt_to_phys(&_start);
|
|
prog_end = virt_to_phys(&_end);
|
|
|
|
end = start + size;
|
|
|
|
if (start < prog_start && end > prog_start)
|
|
goto conflict;
|
|
if (start < prog_end && end > prog_end)
|
|
goto conflict;
|
|
mem = info->memrange;
|
|
for (j = 0; j < info->n_memranges; j++) {
|
|
if (mem[j].base <= start && mem[j].base + mem[j].size >= end)
|
|
break;
|
|
}
|
|
if (j >= info->n_memranges)
|
|
goto badseg;
|
|
return 1;
|
|
|
|
conflict:
|
|
printf("%s occupies [%#lx-%#lx]\n", program_name, prog_start, prog_end);
|
|
|
|
badseg:
|
|
printf("A.out file [%#lx-%#lx] doesn't fit into memory\n", start, end - 1);
|
|
return 0;
|
|
}
|
|
|
|
int aout_load(struct sys_info *info, const char *filename)
|
|
{
|
|
int retval = -1;
|
|
int image_retval;
|
|
struct exec ehdr;
|
|
unsigned long start, size;
|
|
unsigned int offset;
|
|
|
|
image_name = image_version = NULL;
|
|
|
|
if (!file_open(filename))
|
|
goto out;
|
|
|
|
for (offset = 0; offset < 16 * 512; offset += 512) {
|
|
file_seek(offset);
|
|
if (lfile_read(&ehdr, sizeof ehdr) != sizeof ehdr) {
|
|
debug("Can't read a.out header\n");
|
|
retval = LOADER_NOT_SUPPORT;
|
|
goto out;
|
|
}
|
|
if (!N_BADMAG(ehdr))
|
|
break;
|
|
}
|
|
|
|
if (N_BADMAG(ehdr)) {
|
|
debug("Not a bootable a.out image\n");
|
|
retval = LOADER_NOT_SUPPORT;
|
|
goto out;
|
|
}
|
|
|
|
if (ehdr.a_text == 0x30800007)
|
|
ehdr.a_text=64*1024;
|
|
|
|
if (N_MAGIC(ehdr) == NMAGIC) {
|
|
size = addr_fixup(N_DATADDR(ehdr)) + addr_fixup(ehdr.a_data);
|
|
} else {
|
|
size = addr_fixup(ehdr.a_text) + addr_fixup(ehdr.a_data);
|
|
}
|
|
|
|
if (size < 7680)
|
|
size = 7680;
|
|
|
|
|
|
start = 0x4000; // N_TXTADDR(ehdr);
|
|
|
|
if (!check_mem_ranges(info, start, size))
|
|
goto out;
|
|
|
|
printf("Loading a.out %s...\n", image_name ? image_name : "image");
|
|
|
|
file_seek(offset + N_TXTOFF(ehdr));
|
|
|
|
if (N_MAGIC(ehdr) == NMAGIC) {
|
|
if ((unsigned long)lfile_read((void *)start, ehdr.a_text) != ehdr.a_text) {
|
|
printf("Can't read program text segment (size 0x%x)\n", ehdr.a_text);
|
|
goto out;
|
|
}
|
|
if ((unsigned long)lfile_read((void *)(start + N_DATADDR(ehdr)), ehdr.a_data) != ehdr.a_data) {
|
|
printf("Can't read program data segment (size 0x%x)\n", ehdr.a_data);
|
|
goto out;
|
|
}
|
|
} else {
|
|
if ((unsigned long)lfile_read((void *)start, size) != size) {
|
|
printf("Can't read program (size 0x%lx)\n", size);
|
|
goto out;
|
|
}
|
|
}
|
|
|
|
debug("Loaded %lu bytes\n", size);
|
|
|
|
debug("entry point is %#lx\n", start);
|
|
printf("Jumping to entry point...\n");
|
|
|
|
{
|
|
extern int sparc64_of_client_interface( int *params );
|
|
image_retval = start_client_image(addr_fixup(start), (uint64_t)&sparc64_of_client_interface);
|
|
}
|
|
|
|
printf("Image returned with return value %#x\n", image_retval);
|
|
retval = 0;
|
|
|
|
out:
|
|
file_close();
|
|
return retval;
|
|
}
|