diff options
Diffstat (limited to 'exec/hostarch.c')
| -rw-r--r-- | exec/hostarch.c | 187 |
1 files changed, 187 insertions, 0 deletions
diff --git a/exec/hostarch.c b/exec/hostarch.c new file mode 100644 index 00000000..e62e666f --- /dev/null +++ b/exec/hostarch.c @@ -0,0 +1,187 @@ +/* Determine the BFD and ELF architecture and machine flavor + from a Mach host port. Used by the exec and core servers. + Copyright (C) 1992, 1993, 1995, 1996, 1999 Free Software Foundation, Inc. + Written by Roland McGrath. + +This file is part of the GNU Hurd. + +The GNU Hurd 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, or (at your option) +any later version. + +The GNU Hurd 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 the GNU Hurd; see the file COPYING. If not, write to +the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ + +#include "priv.h" +#include <mach.h> +#include <hurd/hurd_types.h> +#include <errno.h> +#include <elf.h> + +error_t +elf_machine_matches_host (Elf32_Half e_machine) +{ + static void *host_type; /* Cached entry into the switch below. */ + struct host_basic_info hostinfo; + + if (host_type) + goto *host_type; + else + { + error_t err; + mach_msg_type_number_t hostinfocnt = HOST_BASIC_INFO_COUNT; + + err = host_info (mach_host_self (), HOST_BASIC_INFO, + (natural_t *) &hostinfo, &hostinfocnt); + if (err) + return err; + assert (hostinfocnt == HOST_BASIC_INFO_COUNT); + } + +#define CACHE(test) ({ __label__ here; host_type = &&here; \ + here: return (test) ? 0 : ENOEXEC; }) + switch (hostinfo.cpu_type) + { + case CPU_TYPE_MC68020: + case CPU_TYPE_MC68030: + case CPU_TYPE_MC68040: + CACHE (e_machine == EM_68K); + + case CPU_TYPE_I860: + CACHE (e_machine == EM_860); + + case CPU_TYPE_MIPS: + CACHE (e_machine == EM_MIPS); + + case CPU_TYPE_MC88000: + CACHE (e_machine == EM_88K); + + case CPU_TYPE_SPARC: + CACHE (e_machine == EM_SPARC); + + case CPU_TYPE_I386: + CACHE (e_machine == EM_386); + case CPU_TYPE_I486: + case CPU_TYPE_PENTIUM: + case CPU_TYPE_PENTIUMPRO: + CACHE (e_machine == EM_386 || e_machine == EM_486); + + case CPU_TYPE_POWERPC: + CACHE (e_machine == EM_PPC); + + case CPU_TYPE_ALPHA: + CACHE (e_machine == EM_ALPHA); + + case CPU_TYPE_HPPA: + CACHE (e_machine == EM_PARISC); + + default: + return EGRATUITOUS; /* XXX */ + } + + return 0; +} + +#ifdef BFD +#include <bfd.h> + +error_t +bfd_mach_host_arch_mach (host_t host, + enum bfd_architecture *arch, + long int *machine) +{ + error_t err; + struct host_basic_info hostinfo; + mach_msg_type_number_t hostinfocnt = HOST_BASIC_INFO_COUNT; + + err = host_info (host, HOST_BASIC_INFO, (natural_t *) &hostinfo, &hostinfocnt); + if (err) + return err; + + *machine = hostinfo.cpu_subtype; + *e_machine = EM_NONE; + switch (hostinfo.cpu_type) + { + case CPU_TYPE_MC68020: + *arch = bfd_arch_m68k; + *machine = 68020; + *e_machine = EM_68K; + break; + case CPU_TYPE_MC68030: + *arch = bfd_arch_m68k; + *machine = 68030; + *e_machine = EM_68K; + break; + case CPU_TYPE_MC68040: + *arch = bfd_arch_m68k; + *machine = 68040; + *e_machine = EM_68K; + break; + + case CPU_TYPE_NS32032: + *arch = bfd_arch_ns32k; + *machine = 32032; + break; + case CPU_TYPE_NS32332: + *arch = bfd_arch_ns32k; + *machine = 32332; + break; + case CPU_TYPE_NS32532: + *arch = bfd_arch_ns32k; + *machine = 32532; + break; + + case CPU_TYPE_ROMP: + *arch = bfd_arch_romp; + break; + + case CPU_TYPE_I860: + *arch = bfd_arch_i860; + *e_machine = EM_860; + break; + + case CPU_TYPE_MIPS: + *arch = bfd_arch_mips; + *e_machine = EM_MIPS; + break; + + case CPU_TYPE_VAX: + *arch = bfd_arch_vax; + break; + + case CPU_TYPE_MC88000: + *arch = bfd_arch_m88k; + *e_machine = EM_88K; + break; + + case CPU_TYPE_SPARC: + *arch = bfd_arch_sparc; + *e_machine = EM_SPARC; + break; + + case CPU_TYPE_I386: + *arch = bfd_arch_i386; + *e_machine = EM_386; + break; + +#ifdef CPU_TYPE_ALPHA + case CPU_TYPE_ALPHA: + *arch = bfd_arch_alpha; + break; +#endif + + default: + return ENOEXEC; + } + + return 0; +} + +#endif /* BFD */ |