OpenCores
URL https://opencores.org/ocsvn/mlite/mlite/trunk

Subversion Repositories mlite

Compare Revisions

  • This comparison shows the changes necessary to convert path 
    /
    from Rev 132 to Rev 133
    ↔ Reverse comparison
  •

Rev 132 → Rev 133

/trunk/tools/convert.c
1,11 → 1,11
//convert.c by Steve Rhoads 4/26/01
//Now uses the ELF format (get gccmips_elf.zip)
//Now uses the ELF format (get gccmips_elf.zip)
//set $gp and zero .sbss and .bss
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
 
#define BUF_SIZE (1024*1024)
#define BUF_SIZE (1024*1024)
/*Assumes running on PC little endian*/
#define ntohl(A) (((A)>>24)|(((A)&0x00ff0000)>>8)|(((A)&0xff00)<<8)|((A)<<24))
#define ntohs(A) ((((A)&0xff00)>>8)|((A)<<8))
15,7 → 15,8
#define SHT_STRTAB 3
#define SHT_NOBITS 8
 
typedef struct {
typedef struct
{
unsigned char e_ident[EI_NIDENT];
unsigned short e_e_type;
unsigned short e_machine;
30,9 → 31,11
unsigned short e_shentsize;
unsigned short e_shnum;
unsigned short e_shstrndx;
} ElfHeader;
}
ElfHeader;
 
typedef struct {
typedef struct
{
unsigned long p_type;
unsigned long p_offset;
unsigned long p_vaddr;
41,9 → 44,11
unsigned long p_memsz;
unsigned long p_flags;
unsigned long p_align;
} Elf32_Phdr;
}
Elf32_Phdr;
 
typedef struct {
typedef struct
{
unsigned long sh_name;
unsigned long sh_type;
unsigned long sh_flags;
54,40 → 59,27
unsigned long sh_info;
unsigned long sh_addralign;
unsigned long sh_entsize;
} Elf32_Shdr;
 
#if 0
unsigned long load(unsigned char *ptr,unsigned long address)
{
unsigned long value;
value=*(unsigned long*)(ptr+address);
value=ntohl(value);
return value;
}
Elf32_Shdr;
 
unsigned short load_short(unsigned char *ptr,unsigned long address)
{
return (ptr[address]<<8)+ptr[address+1];
}
#endif
 
void set_low(char *ptr,unsigned long address,unsigned long value)
void set_low(char *ptr, unsigned long address, unsigned long value)
{
unsigned long opcode;
opcode=*(unsigned long*)(ptr+address);
opcode=ntohl(opcode);
opcode=(opcode&0xffff0000)|(value&0xffff);
opcode=ntohl(opcode);
*(unsigned long*)(ptr+address)=opcode;
opcode = *(unsigned long *)(ptr + address);
opcode = ntohl(opcode);
opcode = (opcode & 0xffff0000) | (value & 0xffff);
opcode = ntohl(opcode);
*(unsigned long *)(ptr + address) = opcode;
}
 
int main(int argc,char *argv[])
int main(int argc, char *argv[])
{
FILE *infile,*outfile,*txtfile;
unsigned char *buf,*code;
long size,stack_pointer;
unsigned long length,d,i,gp_ptr=0;
unsigned long bss_start=0,bss_end=0;
FILE *infile, *outfile, *txtfile;
unsigned char *buf, *code;
long size, stack_pointer;
unsigned long length, d, i, gp_ptr = 0;
unsigned long bss_start = 0, bss_end = 0;
 
ElfHeader *elfHeader;
Elf32_Phdr *elfProgram;
94,110 → 86,120
Elf32_Shdr *elfSection;
 
printf("test.exe -> code.txt & test2.exe\n");
infile=fopen("test.exe","rb");
if(infile==NULL) {
infile = fopen("test.exe", "rb");
if(infile == NULL)
{
printf("Can't open test.exe");
return 0;
}
buf=(unsigned char*)malloc(BUF_SIZE);
size=fread(buf,1,BUF_SIZE,infile);
buf = (unsigned char *)malloc(BUF_SIZE);
size = (int)fread(buf, 1, BUF_SIZE, infile);
fclose(infile);
code=(unsigned char*)malloc(BUF_SIZE);
memset(code,0,BUF_SIZE);
code = (unsigned char *)malloc(BUF_SIZE);
memset(code, 0, BUF_SIZE);
 
elfHeader=(ElfHeader*)buf;
if(strncmp(elfHeader->e_ident+1,"ELF",3)) {
elfHeader = (ElfHeader *)buf;
if(strncmp(elfHeader->e_ident + 1, "ELF", 3))
{
printf("Error: Not an ELF file!\n");
printf("Use the gccmips_elf.zip from opencores/projects/plasma!\n");
return -1;
}
 
elfHeader->e_entry=ntohl(elfHeader->e_entry);
elfHeader->e_phoff=ntohl(elfHeader->e_phoff);
elfHeader->e_shoff=ntohl(elfHeader->e_shoff);
elfHeader->e_phentsize=ntohs(elfHeader->e_phentsize);
elfHeader->e_phnum=ntohs(elfHeader->e_phnum);
elfHeader->e_shentsize=ntohs(elfHeader->e_shentsize);
elfHeader->e_shnum=ntohs(elfHeader->e_shnum);
length=0;
elfHeader->e_entry = ntohl(elfHeader->e_entry);
elfHeader->e_phoff = ntohl(elfHeader->e_phoff);
elfHeader->e_shoff = ntohl(elfHeader->e_shoff);
elfHeader->e_flags = ntohl(elfHeader->e_flags);
elfHeader->e_phentsize = ntohs(elfHeader->e_phentsize);
elfHeader->e_phnum = ntohs(elfHeader->e_phnum);
elfHeader->e_shentsize = ntohs(elfHeader->e_shentsize);
elfHeader->e_shnum = ntohs(elfHeader->e_shnum);
length = 0;
 
for(i=0;i<elfHeader->e_phnum;++i) {
elfProgram=(Elf32_Phdr*)(buf+elfHeader->e_phoff+elfHeader->e_phentsize*i);
elfProgram->p_offset=ntohl(elfProgram->p_offset);
elfProgram->p_vaddr=ntohl(elfProgram->p_vaddr);
elfProgram->p_filesz=ntohl(elfProgram->p_filesz);
elfProgram->p_memsz=ntohl(elfProgram->p_memsz);
// printf("[0x%x,0x%x,0x%x]\n",elfProgram->p_vaddr,elfProgram->p_offset,elfProgram->p_filesz);
memcpy(code+elfProgram->p_vaddr,buf+elfProgram->p_offset,elfProgram->p_filesz);
length=elfProgram->p_vaddr+elfProgram->p_memsz;
for(i = 0; i < elfHeader->e_phnum; ++i)
{
elfProgram = (Elf32_Phdr *)(buf + elfHeader->e_phoff +
elfHeader->e_phentsize * i);
elfProgram->p_type = ntohl(elfProgram->p_type);
elfProgram->p_offset = ntohl(elfProgram->p_offset);
elfProgram->p_vaddr = ntohl(elfProgram->p_vaddr);
elfProgram->p_filesz = ntohl(elfProgram->p_filesz);
elfProgram->p_memsz = ntohl(elfProgram->p_memsz);
elfProgram->p_flags = ntohl(elfProgram->p_flags);
if(elfProgram->p_vaddr < BUF_SIZE)
{
//printf("[0x%x,0x%x,0x%x]\n", elfProgram->p_vaddr,
// elfProgram->p_offset, elfProgram->p_filesz);
memcpy(code + elfProgram->p_vaddr, buf + elfProgram->p_offset,
elfProgram->p_filesz);
length = elfProgram->p_vaddr + elfProgram->p_memsz;
}
}
 
for(i=0;i<elfHeader->e_shnum;++i) {
elfSection=(Elf32_Shdr*)(buf+elfHeader->e_shoff+elfHeader->e_shentsize*i);
elfSection->sh_name=ntohl(elfSection->sh_name);
elfSection->sh_type=ntohl(elfSection->sh_type);
elfSection->sh_addr=ntohl(elfSection->sh_addr);
elfSection->sh_offset=ntohl(elfSection->sh_offset);
elfSection->sh_size=ntohl(elfSection->sh_size);
#if 0
printf("{0x%x,0x%x:0x%x,0x%x,0x%x}\n",
elfSection->sh_name,elfSection->sh_type,elfSection->sh_addr,
elfSection->sh_offset,elfSection->sh_size);
#endif
#if 0
if(elfSection->sh_type==SHT_PROGBITS||elfSection->sh_type==SHT_STRTAB) {
// memcpy(code+elfSection->sh_addr,buf+elfSection->sh_offset,elfSection->sh_size);
length=elfSection->sh_addr+elfSection->sh_size;
bss_start=length;
for(i = 0; i < elfHeader->e_shnum; ++i)
{
elfSection = (Elf32_Shdr *)(buf + elfHeader->e_shoff +
elfHeader->e_shentsize * i);
elfSection->sh_name = ntohl(elfSection->sh_name);
elfSection->sh_type = ntohl(elfSection->sh_type);
elfSection->sh_addr = ntohl(elfSection->sh_addr);
elfSection->sh_offset = ntohl(elfSection->sh_offset);
elfSection->sh_size = ntohl(elfSection->sh_size);
 
if(elfSection->sh_type == SHT_PROGBITS)
{
if(elfSection->sh_addr > gp_ptr)
gp_ptr = elfSection->sh_addr;
}
#endif
if(elfSection->sh_type==SHT_PROGBITS) {
gp_ptr=elfSection->sh_addr;
}
if(elfSection->sh_type==SHT_NOBITS) {
if(bss_start==0) {
bss_start=elfSection->sh_addr;
 
if(elfSection->sh_type == SHT_NOBITS)
{
if(bss_start == 0)
{
bss_start = elfSection->sh_addr;
}
bss_end=elfSection->sh_addr+elfSection->sh_size;
bss_end = elfSection->sh_addr + elfSection->sh_size;
}
}
 
if(bss_start==length) {
bss_start=length;
bss_end=length+4;
if(bss_start == length)
{
bss_start = length;
bss_end = length + 4;
}
 
/*Initialize the $gp register for sdata and sbss*/
gp_ptr+=0x7ff0;
printf("gp_ptr=0x%x ",gp_ptr);
/*modify the first opcodes in boot.asm*/
/*modify the lui opcode*/
set_low(code,0,gp_ptr>>16);
/*modify the ori opcode*/
set_low(code,4,gp_ptr&0xffff);
/*Initialize the $gp register for sdata and sbss */
gp_ptr += 0x7ff0;
printf("gp_ptr=0x%x ", gp_ptr);
/*modify the first opcodes in boot.asm */
/*modify the lui opcode */
set_low(code, 0, gp_ptr >> 16);
/*modify the ori opcode */
set_low(code, 4, gp_ptr & 0xffff);
 
/*Clear .sbss and .bss*/
printf(".sbss=0x%x .bss_end=0x%x\n",bss_start,bss_end);
set_low(code,8,bss_start>>16);
set_low(code,12,bss_start&0xffff);
set_low(code,16,bss_end>>16);
set_low(code,20,bss_end&0xffff);
/*Clear .sbss and .bss */
printf(".sbss=0x%x .bss_end=0x%x ", bss_start, bss_end);
set_low(code, 8, bss_start >> 16);
set_low(code, 12, bss_start & 0xffff);
set_low(code, 16, bss_end >> 16);
set_low(code, 20, bss_end & 0xffff);
 
/*Set stack pointer*/
stack_pointer=bss_end+512;
printf("Stack pointer=0x%x\n",stack_pointer);
set_low(code,24,stack_pointer>>16);
set_low(code,28,stack_pointer&0xffff);
/*Set stack pointer */
stack_pointer = bss_end + 512;
printf("Stack_pointer=0x%x\n", stack_pointer);
set_low(code, 24, stack_pointer >> 16);
set_low(code, 28, stack_pointer & 0xffff);
 
/*write out code.txt*/
outfile=fopen("test2.exe","wb");
fwrite(code,length,1,outfile);
/*write out code.txt */
outfile = fopen("test2.exe", "wb");
fwrite(code, length, 1, outfile);
fclose(outfile);
 
txtfile=fopen("code.txt","w");
for(i=0;i<=length;i+=4) {
d=ntohl(*(unsigned long*)(code+i));
fprintf(txtfile,"%8.8x\n",d);
txtfile = fopen("code.txt", "w");
for(i = 0; i <= length; i += 4)
{
d = ntohl(*(unsigned long *)(code + i));
fprintf(txtfile, "%8.8x\n", d);
}
fclose(txtfile);
free(buf);

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.