| /* BFD library support routines for the Hitachi H8/300 architecture. |
| Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1996, 2000, 2001, 2002 |
| 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ |
| |
| #include "bfd.h" |
| #include "sysdep.h" |
| #include "libbfd.h" |
| |
| static bfd_boolean h8300_scan |
| PARAMS ((const struct bfd_arch_info *, const char *)); |
| static const bfd_arch_info_type * compatible |
| PARAMS ((const bfd_arch_info_type *, const bfd_arch_info_type *)); |
| |
| static bfd_boolean |
| h8300_scan (info, string) |
| const struct bfd_arch_info *info; |
| const char *string; |
| { |
| if (*string != 'h' && *string != 'H') |
| return FALSE; |
| |
| string++; |
| if (*string != '8') |
| return FALSE; |
| |
| string++; |
| if (*string == '/') |
| string++; |
| |
| if (*string != '3') |
| return FALSE; |
| string++; |
| if (*string != '0') |
| return FALSE; |
| string++; |
| if (*string != '0') |
| return FALSE; |
| string++; |
| if (*string == '-') |
| string++; |
| |
| /* 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') |
| { |
| return (info->mach == bfd_mach_h8300h); |
| } |
| else if (*string == 's' || *string == 'S') |
| { |
| 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. */ |
| |
| static const bfd_arch_info_type * |
| compatible (in, out) |
| const bfd_arch_info_type *in; |
| const bfd_arch_info_type *out; |
| { |
| /* It's really not a good idea to mix and match modes. */ |
| if (in->arch != out->arch || in->mach != out->mach) |
| return 0; |
| else |
| return in; |
| } |
| |
| 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", /* arch_name */ |
| "h8300s", /* printable name */ |
| 1, |
| FALSE, /* the default machine */ |
| compatible, |
| h8300_scan, |
| 0 |
| }; |
| |
| 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, |
| "h8300h", /* arch_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", /* arch_name */ |
| "h8300", /* printable name */ |
| 1, |
| TRUE, /* the default machine */ |
| compatible, |
| h8300_scan, |
| &h8300h_info_struct |
| }; |