Initial revision
This commit is contained in:
parent
46f3c7cda5
commit
e89f2fbe00
|
@ -0,0 +1,32 @@
|
|||
#include <sysdep.h>
|
||||
#include <bfd.h>
|
||||
#include "libbfd.h"
|
||||
|
||||
|
||||
|
||||
static bfd_arch_info_struct_type arch_info_struct =
|
||||
{
|
||||
32, /* 32 bits in a word */
|
||||
32, /* 32 bits in an address */
|
||||
8, /* 8 bits in a byte */
|
||||
bfd_arch_a29k,
|
||||
0, /* only 1 machine */
|
||||
"a29k",
|
||||
"a29k",
|
||||
true, /* the one and only */
|
||||
bfd_default_compatible,
|
||||
bfd_default_scan ,
|
||||
0,
|
||||
0,
|
||||
};
|
||||
|
||||
|
||||
|
||||
|
||||
void DEFUN_VOID(bfd_a29k_arch)
|
||||
{
|
||||
bfd_arch_linkin(&arch_info_struct);
|
||||
}
|
||||
|
||||
|
||||
|
|
@ -0,0 +1,393 @@
|
|||
/* BFD library support routines for the Hitachi H8/300 architecture.
|
||||
Copyright (C) 1990-1991 Free Software Foundation, Inc.
|
||||
Hacked by Steve Chamberlain of Cygnus Support.
|
||||
|
||||
This file is part of BFD, the Binary File Descriptor library.
|
||||
|
||||
This program 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 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program 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 this program; if not, write to the Free Software
|
||||
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
||||
|
||||
#include <sysdep.h>
|
||||
#include "bfd.h"
|
||||
#include "libbfd.h"
|
||||
|
||||
#define DEFINE_TABLE
|
||||
#include "h8300-opcode.h"
|
||||
|
||||
#define MAXSAME 14
|
||||
|
||||
static struct h8_opcode * h8_opcodes_sorted[256][MAXSAME];
|
||||
|
||||
/* Run through the opcodes and sort them into order to make them easy
|
||||
to disassemble
|
||||
*/
|
||||
static void
|
||||
DEFUN_VOID(bfd_h8_disassemble_init)
|
||||
{
|
||||
unsigned int i;
|
||||
struct h8_opcode *p;
|
||||
|
||||
for (p = h8_opcodes; p->name; p++) {
|
||||
int where = 0;
|
||||
int n1 = 0;
|
||||
int n2 = 0;
|
||||
int n3 = 0;
|
||||
int n4= 0;
|
||||
if ((int)p->data.nib[0] < 16) {
|
||||
n1 =(int) p->data.nib[0] ;
|
||||
} else n1 = 0;
|
||||
if ((int)p->data.nib[1] < 16) {
|
||||
n2 = (int) p->data.nib[1];
|
||||
}else n2 = 0;
|
||||
|
||||
for (i = 0; i < MAXSAME; i++) {
|
||||
int j = n1 * 16 + n2;
|
||||
if (h8_opcodes_sorted[j][i] == (struct h8_opcode *)NULL) {
|
||||
h8_opcodes_sorted[j][i] = p;
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
if (i==MAXSAME)abort();
|
||||
|
||||
/* Just make sure there are an even number of nibbles in it, and
|
||||
that the count is the same s the length */
|
||||
for (i = 0; p->data.nib[i] != E; i++) ;
|
||||
if (i & 1) abort();
|
||||
if (i/2 != p->length) abort();
|
||||
}
|
||||
for (i = 0; i < 256; i++)
|
||||
{
|
||||
if (h8_opcodes_sorted[i][0])
|
||||
p = h8_opcodes_sorted[i][0];
|
||||
else h8_opcodes_sorted[i][0] = p;
|
||||
}
|
||||
}
|
||||
|
||||
unsigned int
|
||||
DEFUN(bfd_h8_disassemble,(addr, data, stream),
|
||||
bfd_vma addr AND
|
||||
CONST bfd_byte *data AND
|
||||
FILE *stream)
|
||||
{
|
||||
/* Find the first entry in the table for this opcode */
|
||||
int rs = 0;
|
||||
int rd = 0;
|
||||
int rdisp = 0;
|
||||
int abs = 0;
|
||||
struct h8_opcode **p = h8_opcodes_sorted[(unsigned)(data[0])];
|
||||
struct h8_opcode *q;
|
||||
|
||||
/* Find the exact opcode/arg combo */
|
||||
while (*p) {
|
||||
op_enum_type *nib;
|
||||
unsigned int len = 0;
|
||||
q = *p++;
|
||||
nib =q->data.nib;
|
||||
while (*nib != E) {
|
||||
op_enum_type looking_for = *nib;
|
||||
int thisnib = data[len>>1] ;
|
||||
thisnib = (len & 1) ? (thisnib & 0xf) : ((thisnib >> 4) & 0xf);
|
||||
if ((int)looking_for & (int)B31) {
|
||||
if (((int)thisnib & 0x8) ==0) goto fail;
|
||||
looking_for = (op_enum_type)((int)looking_for & ~(int)B31);
|
||||
}
|
||||
if ((int)looking_for & (int)B30) {
|
||||
if (((int)thisnib & 0x8) !=0) goto fail;
|
||||
looking_for = (op_enum_type)((int)looking_for & ~(int)B30);
|
||||
}
|
||||
switch (looking_for) {
|
||||
case 0: case 1: case 2: case 3: case 4: case 5: case 6: case 7:
|
||||
case 8: case 9: case 10: case 11: case 12: case 13: case 14: case 15:
|
||||
if ((int)looking_for != thisnib) goto fail;
|
||||
break;
|
||||
case ABS16SRC:
|
||||
case ABS16DST:
|
||||
case DISPSRC:
|
||||
case DISPDST:
|
||||
case IMM16:
|
||||
abs = (data[len>>1]) * 256 + data[(len+2)>>1];
|
||||
len+=3;
|
||||
nib+=3;
|
||||
break;
|
||||
case DISPREG:
|
||||
rdisp = thisnib;
|
||||
break;
|
||||
case KBIT:
|
||||
abs = thisnib == 0x80 ? 2:1;
|
||||
break;
|
||||
case IMM8:
|
||||
case ABS8SRC:
|
||||
case ABS8DST:
|
||||
case DISP8:
|
||||
abs= data[len>>1];
|
||||
len++;
|
||||
nib++;
|
||||
break;
|
||||
case IMM3:
|
||||
abs = thisnib ;
|
||||
break;
|
||||
case RS8:
|
||||
case RS16:
|
||||
case RSINC:
|
||||
case RSIND:
|
||||
rs = thisnib;
|
||||
break;
|
||||
case RD16:
|
||||
case RDDEC:
|
||||
case RD8:
|
||||
case RDIND:
|
||||
rd = thisnib;
|
||||
break;
|
||||
default:
|
||||
fprintf(stream, "Dont understand \n");
|
||||
goto found;
|
||||
}
|
||||
len++;
|
||||
nib++;
|
||||
}
|
||||
goto found;
|
||||
fail:
|
||||
;
|
||||
|
||||
}
|
||||
fprintf(stream, "%02x %02x .word\tH'%x,H'%x\n",
|
||||
data[0], data[1],
|
||||
data[0], data[1]);
|
||||
return 2;
|
||||
found:;
|
||||
{ int i;
|
||||
|
||||
for (i = 0; i < q->length; i++) {
|
||||
fprintf(stream, "%02x ", data[i]);
|
||||
}
|
||||
for (; i < 6; i++) {
|
||||
fprintf(stream, " ");
|
||||
}
|
||||
}
|
||||
fprintf(stream, "%s\t",q->name);
|
||||
/* Now print out the args */
|
||||
{
|
||||
op_enum_type *args = q->args.nib;
|
||||
int hadone = 0;
|
||||
while (*args != E) {
|
||||
if (hadone)
|
||||
fprintf(stream, ",");
|
||||
switch ((int)(*args) & ~((int)B30|(int)B31)) {
|
||||
case IMM16:
|
||||
case IMM8:
|
||||
case IMM3:
|
||||
fprintf(stream, "#H'%x", (unsigned)abs); break;
|
||||
case RD8:
|
||||
fprintf(stream, "r%d%c", rd/2, rd & 1 ? 'l' : 'h'); break;
|
||||
case RS8:
|
||||
fprintf(stream, "r%d%c", rs/2, rs & 1 ? 'l' : 'h'); break;
|
||||
case RD16:
|
||||
fprintf(stream, "r%d", rd& 0x7); break;
|
||||
case RS16:
|
||||
fprintf(stream, "r%d", rs & 0x7); break;
|
||||
case RSINC:
|
||||
fprintf(stream, "@r%d+", rs & 0x7); break;
|
||||
case RDDEC:
|
||||
fprintf(stream, "@-r%d", rd & 0x7); break;
|
||||
case RDIND:
|
||||
fprintf(stream, "@r%d", rd & 0x7); break;
|
||||
case RSIND:
|
||||
fprintf(stream, "@r%d",rs & 0x7); break;
|
||||
case ABS8SRC:
|
||||
case ABS16SRC:
|
||||
case ABS16DST:
|
||||
case ABS8DST:
|
||||
fprintf(stream, "@H'%x", (unsigned)abs); break;
|
||||
case DISP8:
|
||||
fprintf(stream, "%d", (char)abs);break;
|
||||
case DISPSRC:
|
||||
case DISPDST:
|
||||
fprintf(stream, "@(%d,r%d)", abs, rdisp & 0x7); break;
|
||||
case CCR:
|
||||
fprintf(stream, "ccr"); break;
|
||||
case KBIT:
|
||||
fprintf(stream, "#%d",abs); break;
|
||||
default:
|
||||
abort();
|
||||
}
|
||||
hadone = 1;
|
||||
args++;
|
||||
}
|
||||
}
|
||||
return q->length;
|
||||
}
|
||||
|
||||
|
||||
|
||||
unsigned int DEFUN( print_insn_h8300,(addr, data, file),
|
||||
bfd_vma addr AND
|
||||
CONST bfd_byte *data AND
|
||||
PTR file)
|
||||
{
|
||||
static boolean init;
|
||||
if (!init) {
|
||||
bfd_h8_disassemble_init();
|
||||
init= 1;
|
||||
|
||||
}
|
||||
return bfd_h8_disassemble(addr, data, file);
|
||||
}
|
||||
|
||||
/*
|
||||
Relocations for the H8
|
||||
|
||||
*/
|
||||
static bfd_reloc_status_enum_type
|
||||
DEFUN(howto16_callback,(abfd, reloc_entry, symbol_in, data, ignore_input_section),
|
||||
bfd *abfd AND
|
||||
arelent *reloc_entry AND
|
||||
asymbol *symbol_in AND
|
||||
unsigned char *data AND
|
||||
asection *ignore_input_section)
|
||||
{
|
||||
long relocation = 0;
|
||||
bfd_vma addr = reloc_entry->address;
|
||||
long x = bfd_get_16(abfd, (bfd_byte *)data + addr);
|
||||
|
||||
HOWTO_PREPARE(relocation, symbol_in);
|
||||
|
||||
x = (x + relocation + reloc_entry->addend);
|
||||
|
||||
bfd_put_16(abfd, x, (bfd_byte *)data + addr);
|
||||
return bfd_reloc_ok;
|
||||
}
|
||||
|
||||
|
||||
static bfd_reloc_status_enum_type
|
||||
DEFUN(howto8_callback,(abfd, reloc_entry, symbol_in, data, ignore_input_section),
|
||||
bfd *abfd AND
|
||||
arelent *reloc_entry AND
|
||||
asymbol *symbol_in AND
|
||||
unsigned char *data AND
|
||||
asection *ignore_input_section)
|
||||
{
|
||||
long relocation = 0;
|
||||
bfd_vma addr = reloc_entry->address;
|
||||
long x = bfd_get_8(abfd, (bfd_byte *)data + addr);
|
||||
|
||||
HOWTO_PREPARE(relocation, symbol_in);
|
||||
|
||||
x = (x + relocation + reloc_entry->addend);
|
||||
|
||||
bfd_put_8(abfd, x, (bfd_byte *)data + addr);
|
||||
return bfd_reloc_ok;
|
||||
}
|
||||
|
||||
|
||||
static bfd_reloc_status_enum_type
|
||||
DEFUN(howto8_FFnn_callback,(abfd, reloc_entry, symbol_in, data, ignore_input_section),
|
||||
bfd *abfd AND
|
||||
arelent *reloc_entry AND
|
||||
asymbol *symbol_in AND
|
||||
unsigned char *data AND
|
||||
asection *ignore_input_section)
|
||||
{
|
||||
long relocation = 0;
|
||||
bfd_vma addr = reloc_entry->address;
|
||||
|
||||
long x = bfd_get_8(abfd, (bfd_byte *)data + addr);
|
||||
abort();
|
||||
HOWTO_PREPARE(relocation, symbol_in);
|
||||
|
||||
x = (x + relocation + reloc_entry->addend);
|
||||
|
||||
bfd_put_8(abfd, x, (bfd_byte *)data + addr);
|
||||
return bfd_reloc_ok;
|
||||
}
|
||||
|
||||
static bfd_reloc_status_enum_type
|
||||
DEFUN(howto8_pcrel_callback,(abfd, reloc_entry, symbol_in, data, ignore_input_section),
|
||||
bfd *abfd AND
|
||||
arelent *reloc_entry AND
|
||||
asymbol *symbol_in AND
|
||||
unsigned char *data AND
|
||||
asection *ignore_input_section)
|
||||
{
|
||||
long relocation = 0;
|
||||
bfd_vma addr = reloc_entry->address;
|
||||
long x = bfd_get_8(abfd, (bfd_byte *)data + addr);
|
||||
abort();
|
||||
HOWTO_PREPARE(relocation, symbol_in);
|
||||
|
||||
x = (x + relocation + reloc_entry->addend);
|
||||
|
||||
bfd_put_8(abfd, x, (bfd_byte *)data + addr);
|
||||
return bfd_reloc_ok;
|
||||
}
|
||||
|
||||
|
||||
static reloc_howto_type howto_16
|
||||
= NEWHOWTO(howto16_callback,"abs16",1,0);
|
||||
static reloc_howto_type howto_8
|
||||
= NEWHOWTO(howto8_callback,"abs8",0,0);
|
||||
|
||||
static reloc_howto_type howto_8_FFnn
|
||||
= NEWHOWTO(howto8_FFnn_callback,"ff00+abs8",0,0);
|
||||
|
||||
static reloc_howto_type howto_8_pcrel
|
||||
= NEWHOWTO(howto8_pcrel_callback,"pcrel8",0,1);
|
||||
|
||||
|
||||
|
||||
static CONST struct reloc_howto_struct *DEFUN(local_bfd_reloc_type_lookup,( code),
|
||||
bfd_reloc_code_enum_type code)
|
||||
{
|
||||
switch (code) {
|
||||
case BFD_RELOC_16:
|
||||
return &howto_16;
|
||||
case BFD_RELOC_8_FFnn:
|
||||
return &howto_8_FFnn;
|
||||
case BFD_RELOC_8:
|
||||
return &howto_8;
|
||||
case BFD_RELOC_8_PCREL:
|
||||
return &howto_8_pcrel;
|
||||
}
|
||||
return (reloc_howto_type *)NULL;
|
||||
}
|
||||
|
||||
int bfd_default_scan_num_mach();
|
||||
|
||||
static bfd_arch_info_struct_type arch_info_struct =
|
||||
{
|
||||
16, /* 16 bits in a word */
|
||||
16, /* 16 bits in an address */
|
||||
8, /* 8 bits in a byte */
|
||||
bfd_arch_h8300,
|
||||
0, /* only 1 machine */
|
||||
"H8/300", /* arch_name */
|
||||
"H8/300", /* printable name */
|
||||
true, /* the default machine */
|
||||
bfd_default_compatible,
|
||||
bfd_default_scan,
|
||||
print_insn_h8300,
|
||||
local_bfd_reloc_type_lookup,
|
||||
0,
|
||||
};
|
||||
|
||||
|
||||
|
||||
|
||||
void DEFUN_VOID(bfd_h8300_arch)
|
||||
{
|
||||
bfd_arch_linkin(&arch_info_struct);
|
||||
}
|
||||
|
||||
|
||||
|
|
@ -0,0 +1,32 @@
|
|||
#include <sysdep.h>
|
||||
#include <bfd.h>
|
||||
#include "libbfd.h"
|
||||
|
||||
|
||||
|
||||
static bfd_arch_info_struct_type arch_info_struct =
|
||||
{
|
||||
32, /* 32 bits in a word */
|
||||
32, /* 32 bits in an address */
|
||||
8, /* 8 bits in a byte */
|
||||
bfd_arch_i386,
|
||||
0, /* only 1 machine */
|
||||
"i386",
|
||||
"i386",
|
||||
true, /* the one and only */
|
||||
bfd_default_compatible,
|
||||
bfd_default_scan ,
|
||||
0,
|
||||
0,
|
||||
};
|
||||
|
||||
|
||||
|
||||
|
||||
void DEFUN_VOID(bfd_i386_arch)
|
||||
{
|
||||
bfd_arch_linkin(&arch_info_struct);
|
||||
}
|
||||
|
||||
|
||||
|
|
@ -0,0 +1,158 @@
|
|||
/* BFD library support routines for the i960 architecture.
|
||||
Copyright (C) 1990-1991 Free Software Foundation, Inc.
|
||||
Hacked by Steve Chamberlain of Cygnus Support.
|
||||
|
||||
This file is part of BFD, the Binary File Descriptor library.
|
||||
|
||||
This program 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 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program 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 this program; if not, write to the Free Software
|
||||
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
||||
|
||||
|
||||
#include <sysdep.h>
|
||||
#include "bfd.h"
|
||||
#include "libbfd.h"
|
||||
|
||||
|
||||
/* This routine is provided a string, and tries to work out if it
|
||||
could possibly refer to the i960 machine pointed at in the
|
||||
info_struct pointer */
|
||||
|
||||
static boolean
|
||||
DEFUN(scan_960_mach, (ap, string),
|
||||
CONST bfd_arch_info_struct_type *ap AND
|
||||
CONST char *string)
|
||||
{
|
||||
unsigned long machine;
|
||||
|
||||
/* Look for the string i960, or somesuch at the front of the string */
|
||||
|
||||
if (strncmp("i960",string) == 0) {
|
||||
string+=4;
|
||||
}
|
||||
else {
|
||||
/* no match, can be us */
|
||||
return false;
|
||||
}
|
||||
if (string[0] == 0) {
|
||||
/* i960 on it's own means core to us*/
|
||||
if (ap->mach == bfd_mach_i960_core) return true;
|
||||
return false;
|
||||
}
|
||||
|
||||
if (string[0] != ':') {
|
||||
return false;
|
||||
}
|
||||
string++;
|
||||
if (string[0] == '\0')
|
||||
return false;
|
||||
if (string[0] == 'c' && string[1] == 'o' && string[2] == 'r' &&
|
||||
string[3] == 'e' && string[4] == '\0')
|
||||
machine = bfd_mach_i960_core;
|
||||
else if (string[1] == '\0' || string[2] != '\0') /* rest are 2-char */
|
||||
return false;
|
||||
else if (string[0] == 'k' && string[1] == 'b')
|
||||
machine = bfd_mach_i960_kb_sb;
|
||||
else if (string[0] == 's' && string[1] == 'b')
|
||||
machine = bfd_mach_i960_kb_sb;
|
||||
else if (string[0] == 'm' && string[1] == 'c')
|
||||
machine = bfd_mach_i960_mc;
|
||||
else if (string[0] == 'x' && string[1] == 'a')
|
||||
machine = bfd_mach_i960_xa;
|
||||
else if (string[0] == 'c' && string[1] == 'a')
|
||||
machine = bfd_mach_i960_ca;
|
||||
else if (string[0] == 'k' && string[1] == 'a')
|
||||
machine = bfd_mach_i960_ka_sa;
|
||||
else if (string[0] == 's' && string[1] == 'a')
|
||||
machine = bfd_mach_i960_ka_sa;
|
||||
else
|
||||
return false;
|
||||
if (machine == ap->mach) return true;
|
||||
return false;
|
||||
}
|
||||
|
||||
|
||||
|
||||
/* This routine is provided two arch_infos and works out the i960
|
||||
machine which would be compatible with both and returns a pointer
|
||||
to its info structure */
|
||||
|
||||
CONST bfd_arch_info_struct_type *
|
||||
DEFUN(compatible,(a,b),
|
||||
CONST bfd_arch_info_struct_type *a AND
|
||||
CONST bfd_arch_info_struct_type *b)
|
||||
{
|
||||
|
||||
/* The i960 has two distinct subspecies which may not interbreed:
|
||||
CORE CA
|
||||
CORE KA KB MC XA
|
||||
Any architecture on the same line is compatible, the one on
|
||||
the right is the least restrictive.
|
||||
|
||||
We represent this information in an array, each machine to a side */
|
||||
|
||||
#define ERROR 0
|
||||
#define CORE bfd_mach_i960_core /*1*/
|
||||
#define KA bfd_mach_i960_ka_sa /*2*/
|
||||
#define KB bfd_mach_i960_kb_sb /*3*/
|
||||
#define MC bfd_mach_i960_mc /*4*/
|
||||
#define XA bfd_mach_i960_xa /*5*/
|
||||
#define CA bfd_mach_i960_ca /*6*/
|
||||
|
||||
|
||||
static CONST char matrix[7][7] =
|
||||
{
|
||||
ERROR,CORE, KA, KB, MC, XA, CA,
|
||||
CORE, CORE, KA, KB, MC, XA, CA,
|
||||
KA, KA, KA, KB, MC, XA, ERROR,
|
||||
KB, KB, KB, KB, MC, XA, ERROR,
|
||||
MC, MC, MC, MC, MC, XA, ERROR,
|
||||
XA, XA, XA, XA, XA, XA, ERROR,
|
||||
CA, CA, ERROR, ERROR, ERROR, ERROR, CA
|
||||
};
|
||||
|
||||
|
||||
if (a->arch != b->arch || matrix[a->mach][b->mach] == ERROR)
|
||||
{
|
||||
return (bfd_arch_info_struct_type *)NULL;
|
||||
}
|
||||
else
|
||||
{
|
||||
return (a->mach == matrix[a->mach][b->mach]) ? a : b;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
int bfd_default_scan_num_mach();
|
||||
#define N(a,b,d) \
|
||||
{ 32, 32, 8,bfd_arch_i960,a,"i960",b,d,compatible,scan_960_mach,0,}
|
||||
|
||||
static bfd_arch_info_struct_type arch_info_struct[] =
|
||||
{
|
||||
N(bfd_mach_i960_core,"i960:core",true),
|
||||
N(bfd_mach_i960_ka_sa,"i960:ka_sa",false),
|
||||
N(bfd_mach_i960_kb_sb,"i960:kb_sb",false),
|
||||
N(bfd_mach_i960_mc,"i960:mc",false),
|
||||
N(bfd_mach_i960_xa,"i960:xa",false),
|
||||
N(bfd_mach_i960_ca,"i960:ca",false)
|
||||
};
|
||||
|
||||
|
||||
void DEFUN_VOID(bfd_i960_arch)
|
||||
{
|
||||
unsigned int i;
|
||||
for (i = 0; i < 6; i++) {
|
||||
bfd_arch_linkin(arch_info_struct + i);
|
||||
}
|
||||
}
|
|
@ -0,0 +1,51 @@
|
|||
/* bfd back-end for m88k support
|
||||
Copyright (C) 1990-1991 Free Software Foundation, Inc.
|
||||
Written by Steve Chamberlain of Cygnus Support.
|
||||
|
||||
This file is part of BFD, the Binary File Descriptor library.
|
||||
|
||||
This program 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 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program 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 this program; if not, write to the Free Software
|
||||
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
||||
|
||||
#include <sysdep.h>
|
||||
#include <bfd.h>
|
||||
#include "libbfd.h"
|
||||
|
||||
|
||||
|
||||
static bfd_arch_info_struct_type arch_info_struct =
|
||||
{
|
||||
32, /* 32 bits in a word */
|
||||
32, /* 32 bits in an address */
|
||||
8, /* 8 bits in a byte */
|
||||
bfd_arch_m88k,
|
||||
88100, /* only 1 machine */
|
||||
"m88k",
|
||||
"m88k:88100",
|
||||
true, /* the one and only */
|
||||
bfd_default_compatible,
|
||||
bfd_default_scan ,
|
||||
0,
|
||||
0,
|
||||
};
|
||||
|
||||
|
||||
|
||||
void DEFUN_VOID(bfd_m88k_arch)
|
||||
{
|
||||
bfd_arch_linkin(&arch_info_struct);
|
||||
}
|
||||
|
||||
|
||||
|
|
@ -0,0 +1,52 @@
|
|||
/* bfd back-end for vax support
|
||||
Copyright (C) 1990-1991 Free Software Foundation, Inc.
|
||||
Written by Steve Chamberlain of Cygnus Support.
|
||||
|
||||
This file is part of BFD, the Binary File Descriptor library.
|
||||
|
||||
This program 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 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program 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 this program; if not, write to the Free Software
|
||||
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
||||
|
||||
#include <sysdep.h>
|
||||
#include <bfd.h>
|
||||
#include "libbfd.h"
|
||||
|
||||
|
||||
|
||||
static bfd_arch_info_struct_type arch_info_struct =
|
||||
{
|
||||
32, /* 32 bits in a word */
|
||||
32, /* 32 bits in an address */
|
||||
8, /* 8 bits in a byte */
|
||||
bfd_arch_vax,
|
||||
0, /* only 1 machine */
|
||||
"vax",
|
||||
"vax",
|
||||
true, /* the one and only */
|
||||
bfd_default_compatible,
|
||||
bfd_default_scan ,
|
||||
0,
|
||||
0,
|
||||
};
|
||||
|
||||
|
||||
|
||||
|
||||
void DEFUN_VOID(bfd_vax_arch)
|
||||
{
|
||||
bfd_arch_linkin(&arch_info_struct);
|
||||
}
|
||||
|
||||
|
||||
|
|
@ -0,0 +1,85 @@
|
|||
/* bfd howto manager.
|
||||
Copyright (C) 1990-1991 Free Software Foundation, Inc.
|
||||
Written by Steve Chamberlain of Cygnus Support.
|
||||
|
||||
This file is part of BFD, the Binary File Descriptor library.
|
||||
|
||||
This program 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 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program 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 this program; if not, write to the Free Software
|
||||
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
||||
|
||||
/* The howto manager
|
||||
|
||||
|
||||
When an application wants to create a relocation, but doesn't know
|
||||
what the target machine might call it, it can find out by using this
|
||||
bit of code.
|
||||
|
||||
*/
|
||||
|
||||
#include <sysdep.h>
|
||||
#include <bfd.h>
|
||||
#include "libbfd.h"
|
||||
/*proto* bfd_reloc_code_enum_type
|
||||
|
||||
*+++
|
||||
|
||||
$typedef enum
|
||||
${
|
||||
|
||||
16 bits wide, simple reloc
|
||||
|
||||
$ BFD_RELOC_16,
|
||||
|
||||
8 bits wide, but used to form an address like 0xffnn
|
||||
|
||||
$ BFD_RELOC_8_FFnn,
|
||||
|
||||
8 bits wide, simple
|
||||
|
||||
$ BFD_RELOC_8,
|
||||
|
||||
8 bits wide, pc relative
|
||||
|
||||
$ BFD_RELOC_8_PCREL
|
||||
$ } bfd_reloc_code_enum_real_type;
|
||||
|
||||
*---
|
||||
|
||||
*/
|
||||
|
||||
|
||||
|
||||
/*proto* bfd_reloc_type_lookup
|
||||
This routine returns a pointer to a howto struct which when invoked,
|
||||
will perform the supplied relocation on data from the architecture
|
||||
noted.
|
||||
|
||||
[Note] This function will go away.
|
||||
|
||||
*; PROTO(struct reloc_howto_struct *,
|
||||
bfd_reloc_type_lookup,
|
||||
(enum bfd_architecture arch, bfd_reloc_code_enum_type code));
|
||||
*/
|
||||
|
||||
|
||||
struct reloc_howto_struct *
|
||||
DEFUN(bfd_reloc_type_lookup,(arch, code),
|
||||
enum bfd_architecture arch AND
|
||||
bfd_reloc_code_enum_type code)
|
||||
{
|
||||
return arch_functions(arch,0)->reloc_type_lookup(code);
|
||||
}
|
||||
|
||||
|
||||
|
|
@ -0,0 +1,62 @@
|
|||
/* bfd initialization stuff
|
||||
Copyright (C) 1990-1991 Free Software Foundation, Inc.
|
||||
Written by Steve Chamberlain of Cygnus Support.
|
||||
|
||||
This file is part of BFD, the Binary File Descriptor library.
|
||||
|
||||
This program 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 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program 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 this program; if not, write to the Free Software
|
||||
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
||||
#include <sysdep.h>
|
||||
#include "bfd.h"
|
||||
#include "libbfd.h"
|
||||
|
||||
static boolean initialized = false;
|
||||
|
||||
/*proto* bfd_init
|
||||
|
||||
This routine must be called before any other bfd function to initialize
|
||||
magical internal data structures.
|
||||
|
||||
*; void EXFUN(bfd_init,(void));
|
||||
*/
|
||||
|
||||
void DEFUN_VOID(bfd_init)
|
||||
{
|
||||
if (initialized == false) {
|
||||
initialized = true;
|
||||
|
||||
bfd_arch_init();
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*proto-internal* bfd_check_init
|
||||
|
||||
This routine is called before any other bfd function using initialized
|
||||
data is used to ensure that the structures have been initialized.
|
||||
Soon this function will go away, and the bfd library will assume that
|
||||
bfd_init has been called.
|
||||
|
||||
*; void EXFUN(bfd_check_init,(void));
|
||||
*/
|
||||
|
||||
void DEFUN_VOID(bfd_check_init)
|
||||
{
|
||||
if (initialized == false) {
|
||||
fprintf(stderr,"The bfd library now requires you to call bfd_init()\n");
|
||||
fprintf(stderr,"before any other calls to bfd routines. Please\n");
|
||||
fprintf(stderr,"change your source\n");
|
||||
bfd_init();
|
||||
}
|
||||
}
|
Loading…
Reference in New Issue