X-Git-Url: http://drtracing.org/?a=blobdiff_plain;f=bfd%2Fcpu-h8300.c;h=d726dc32bb9547e51dec7aa3e281b61960f6bfb0;hb=e38bc3b5244a70367b51990962e12f6847eee6fd;hp=649847810bbf20cd03ef187b8aa99014a17a54bd;hpb=b08a074860def2051e67890014d3a18b2666922b;p=deliverable%2Fbinutils-gdb.git diff --git a/bfd/cpu-h8300.c b/bfd/cpu-h8300.c index 649847810b..d726dc32bb 100644 --- a/bfd/cpu-h8300.c +++ b/bfd/cpu-h8300.c @@ -1,256 +1,261 @@ -/* BFD library support routines for the Hitachi H8/300 architecture. - Copyright (C) 1990-1991 Free Software Foundation, Inc. +/* BFD library support routines for the Renesas H8/300 architecture. + Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1996, 2000, 2001, 2002, 2003 + Free Software Foundation, Inc. Hacked by Steve Chamberlain of Cygnus Support. -This file is part of BFD, the Binary File Descriptor library. + 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 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. + 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. */ + 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ #include "bfd.h" #include "sysdep.h" #include "libbfd.h" -/* -Relocations for the H8 - -*/ -static bfd_reloc_status_type -DEFUN (howto16_callback, (abfd, reloc_entry, symbol_in, data, - ignore_input_section, ignore_bfd), - bfd * abfd AND - arelent * reloc_entry AND - struct symbol_cache_entry *symbol_in AND - PTR data AND - asection * ignore_input_section AND - bfd * ignore_bfd) -{ - 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_type -DEFUN (howto8_callback, (abfd, reloc_entry, symbol_in, data, - ignore_input_section, ignore_bfd), - bfd * abfd AND - arelent * reloc_entry AND - struct symbol_cache_entry *symbol_in AND - PTR data AND - asection * ignore_input_section AND - bfd * ignore_bfd) -{ - 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_type -DEFUN (howto8_FFnn_callback, (abfd, reloc_entry, symbol_in, data, - ignore_input_section, ignore_bfd), - bfd * abfd AND - arelent * reloc_entry AND - struct symbol_cache_entry *symbol_in AND - PTR data AND - asection * ignore_input_section AND - bfd * ignore_bfd) -{ - 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_type -DEFUN (howto8_pcrel_callback, (abfd, reloc_entry, symbol_in, data, - ignore_input_section, ignore_bfd), - bfd * abfd AND - arelent * reloc_entry AND - struct symbol_cache_entry *symbol_in AND - PTR data AND - asection * ignore_input_section AND - bfd * ignore_bfd) -{ - 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, false, false); -static reloc_howto_type howto_8 -= NEWHOWTO (howto8_callback, "abs8", 0, false, false); - -static reloc_howto_type howto_8_FFnn -= NEWHOWTO (howto8_FFnn_callback, "ff00+abs8", 0, false, false); - -static reloc_howto_type howto_8_pcrel -= NEWHOWTO (howto8_pcrel_callback, "pcrel8", 0, false, true); - - -static CONST struct reloc_howto_struct * -DEFUN (local_bfd_reloc_type_lookup, (arch, code), - CONST struct bfd_arch_info *arch AND - bfd_reloc_code_real_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; - default: - return (reloc_howto_type *) NULL; - } - } - -int bfd_default_scan_num_mach (); - -static boolean -DEFUN (h8300_scan, (info, string), - CONST struct bfd_arch_info *info AND - CONST char *string) +static bfd_boolean +h8300_scan (const struct bfd_arch_info *info, const char *string) { - if (*string != 'h' && *string == 'H') - return false; + if (*string != 'h' && *string != 'H') + return FALSE; string++; if (*string != '8') - return false; + return FALSE; string++; if (*string == '/') string++; if (*string != '3') - return false; + return FALSE; string++; if (*string != '0') - return false; + return FALSE; string++; if (*string != '0') - return false; + return FALSE; string++; if (*string == '-') string++; - if (*string == 'h' && *string == 'H') + + /* In ELF linker scripts, we typically express the architecture/machine + as architecture:machine. + + So if we've matched so far and encounter a colon, try to match the + string following the colon. */ + if (*string == ':') + { + string++; + return h8300_scan (info, string); + } + + if (*string == 'h' || *string == 'H') { + string++; + if (*string == 'n' || *string == 'N') + return (info->mach == bfd_mach_h8300hn); + return (info->mach == bfd_mach_h8300h); } - else + else if (*string == 's' || *string == 'S') { - return info->mach == bfd_mach_h8300; + string++; + if (*string == 'n' || *string == 'N') + return (info->mach == bfd_mach_h8300sn); + + if (*string == 'x' || *string == 'X') + { + string++; + if (*string == 'n' || *string == 'N') + return (info->mach == bfd_mach_h8300sxn); + + return (info->mach == bfd_mach_h8300sx); + } + + return (info->mach == bfd_mach_h8300s); } + else + return info->mach == bfd_mach_h8300; } +/* This routine is provided two arch_infos and works out the machine + which would be compatible with both and returns a pointer to its + info structure. */ -/* 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_type * -DEFUN (compatible, (in, out), - CONST bfd_arch_info_type * in AND - CONST bfd_arch_info_type * out) +static const bfd_arch_info_type * +compatible (const bfd_arch_info_type *in, const bfd_arch_info_type *out) { - /* If the output is non-H and the input is -H, that's bad */ - if (in->mach == bfd_mach_h8300h && - out->mach == bfd_mach_h8300) + if (in->arch != out->arch) return 0; - - /* If either is an -H, the answer is -H */ - if (in->mach == bfd_mach_h8300h) + if (in->mach == bfd_mach_h8300sx && out->mach == bfd_mach_h8300s) + return in; + if (in->mach == bfd_mach_h8300s && out->mach == bfd_mach_h8300sx) + return out; + if (in->mach == bfd_mach_h8300sxn && out->mach == bfd_mach_h8300sn) + return in; + if (in->mach == bfd_mach_h8300sn && out->mach == bfd_mach_h8300sxn) + return out; + /* It's really not a good idea to mix and match modes. */ + if (in->mach != out->mach) + return 0; + else return in; - return out; } -static bfd_arch_info_type h8300_info_struct = +static const bfd_arch_info_type h8300sxn_info_struct = { - 16, /* 16 bits in a word */ + 32, /* 32 bits in a word */ 16, /* 16 bits in an address */ 8, /* 8 bits in a byte */ bfd_arch_h8300, - bfd_mach_h8300, - "H8/300", /* arch_name */ - "H8/300", /* printable name */ + bfd_mach_h8300sxn, + "h8300sxn", /* arch_name */ + "h8300sxn", /* printable name */ 1, - true, /* the default machine */ + FALSE, /* the default machine */ compatible, h8300_scan, - 0, -/* local_bfd_reloc_type_lookup, */ - 0, + 0 }; - -static bfd_arch_info_type h8300h_info_struct = +static const bfd_arch_info_type h8300sx_info_struct = { 32, /* 32 bits in a word */ 32, /* 32 bits in an address */ 8, /* 8 bits in a byte */ bfd_arch_h8300, + bfd_mach_h8300sx, + "h8300sx", /* arch_name */ + "h8300sx", /* printable name */ + 1, + FALSE, /* the default machine */ + compatible, + h8300_scan, + &h8300sxn_info_struct +}; + +static const bfd_arch_info_type h8300sn_info_struct = +{ + 32, /* 32 bits in a word. */ + 16, /* 16 bits in an address. */ + 8, /* 8 bits in a byte. */ + bfd_arch_h8300, + bfd_mach_h8300sn, + "h8300sn", /* Architecture name. */ + "h8300sn", /* Printable name. */ + 1, + FALSE, /* The default machine. */ + compatible, + h8300_scan, + &h8300sx_info_struct +}; + +static const bfd_arch_info_type h8300hn_info_struct = +{ + 32, /* 32 bits in a word. */ + 16, /* 16 bits in an address. */ + 8, /* 8 bits in a byte. */ + bfd_arch_h8300, + bfd_mach_h8300hn, + "h8300hn", /* Architecture name. */ + "h8300hn", /* Printable name. */ + 1, + FALSE, /* The default machine. */ + compatible, + h8300_scan, + &h8300sn_info_struct +}; + +static const bfd_arch_info_type h8300s_info_struct = +{ + 32, /* 32 bits in a word. */ + 32, /* 32 bits in an address. */ + 8, /* 8 bits in a byte. */ + bfd_arch_h8300, + bfd_mach_h8300s, + "h8300s", /* Architecture name. */ + "h8300s", /* Printable name. */ + 1, + FALSE, /* The default machine. */ + compatible, + h8300_scan, + & h8300hn_info_struct +}; + +static const bfd_arch_info_type h8300h_info_struct = +{ + 32, /* 32 bits in a word. */ + 32, /* 32 bits in an address. */ + 8, /* 8 bits in a byte. */ + bfd_arch_h8300, bfd_mach_h8300h, - "H8/300H", /* arch_name */ - "H8/300H", /* printable name */ + "h8300h", /* Architecture name. */ + "h8300h", /* Printable name. */ + 1, + FALSE, /* The default machine. */ + compatible, + h8300_scan, + &h8300s_info_struct +}; + +const bfd_arch_info_type bfd_h8300_arch = +{ + 16, /* 16 bits in a word. */ + 16, /* 16 bits in an address. */ + 8, /* 8 bits in a byte. */ + bfd_arch_h8300, + bfd_mach_h8300, + "h8300", /* Architecture name. */ + "h8300", /* Printable name. */ 1, - false, /* the default machine */ + TRUE, /* The default machine. */ compatible, h8300_scan, - 0, -/* local_bfd_reloc_type_lookup, */ - 0, + &h8300h_info_struct }; -void -DEFUN_VOID (bfd_h8300_arch) +/* Pad the given address to 32 bits, converting 16-bit and 24-bit + addresses into the values they would have had on a h8s target. */ + +bfd_vma +bfd_h8300_pad_address (bfd *abfd, bfd_vma address) { - bfd_arch_linkin (&h8300_info_struct); - bfd_arch_linkin (&h8300h_info_struct); + /* Cope with bfd_vma's larger than 32 bits. */ + address &= 0xffffffffu; + + switch (bfd_get_mach (abfd)) + { + case bfd_mach_h8300: + case bfd_mach_h8300hn: + case bfd_mach_h8300sn: + case bfd_mach_h8300sxn: + /* Sign extend a 16-bit address. */ + if (address >= 0x8000) + return address | 0xffff0000u; + return address; + + case bfd_mach_h8300h: + /* Sign extend a 24-bit address. */ + if (address >= 0x800000) + return address | 0xff000000u; + return address; + + case bfd_mach_h8300s: + case bfd_mach_h8300sx: + return address; + + default: + abort (); + } }