binutils-gdb/bfd/cpu-h8300.c

147 lines
3.6 KiB
C
Raw Normal View History

1999-05-03 09:29:11 +02:00
/* BFD library support routines for the Hitachi H8/300 architecture.
Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1996, 2000, 2001, 2002
2001-03-08 22:04:02 +01:00
Free Software Foundation, Inc.
1999-05-03 09:29:11 +02:00
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 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 *));
1999-05-03 09:29:11 +02:00
static 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);
}
1999-05-03 09:29:11 +02:00
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;
}
}
2000-06-27 03:31:59 +02:00
/* 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. */
1999-05-03 09:29:11 +02:00
static const bfd_arch_info_type *
compatible (in, out)
2000-06-27 03:31:59 +02:00
const bfd_arch_info_type *in;
const bfd_arch_info_type *out;
1999-05-03 09:29:11 +02:00
{
/* It's really not a good idea to mix and match modes. */
if (in->arch != out->arch || in->mach != out->mach)
1999-05-03 09:29:11 +02:00
return 0;
else
return in;
}
static const bfd_arch_info_type h8300s_info_struct =
1999-05-03 09:29:11 +02:00
{
32, /* 32 bits in a word */
32, /* 32 bits in an address */
1999-05-03 09:29:11 +02:00
8, /* 8 bits in a byte */
bfd_arch_h8300,
bfd_mach_h8300s,
"h8300s", /* arch_name */
"h8300s", /* printable name */
1999-05-03 09:29:11 +02:00
1,
false, /* the default machine */
1999-05-03 09:29:11 +02:00
compatible,
h8300_scan,
0
1999-05-03 09:29:11 +02:00
};
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
1999-05-03 09:29:11 +02:00
};
const bfd_arch_info_type bfd_h8300_arch =
{
16, /* 16 bits in a word */
16, /* 16 bits in an address */
1999-05-03 09:29:11 +02:00
8, /* 8 bits in a byte */
bfd_arch_h8300,
bfd_mach_h8300,
"h8300", /* arch_name */
"h8300", /* printable name */
1999-05-03 09:29:11 +02:00
1,
true, /* the default machine */
1999-05-03 09:29:11 +02:00
compatible,
h8300_scan,
&h8300h_info_struct
1999-05-03 09:29:11 +02:00
};