From: Ken Raeburn Date: Sat, 28 Aug 1993 00:16:15 +0000 (+0000) Subject: %$#@ cvs bugs X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=94772e9b80523682b319f6dfa52303660b94b2ca;p=binutils-gdb.git %$#@ cvs bugs --- diff --git a/bfd/hppa.c b/bfd/hppa.c deleted file mode 100644 index eff6b669080..00000000000 --- a/bfd/hppa.c +++ /dev/null @@ -1,962 +0,0 @@ -/* bfd back-end for HP PA-RISC SOM objects. - Copyright (C) 1990, 1991, 1992, 1993 Free Software Foundation, Inc. - - Contributed by the Center for Software Science at the - University of Utah (pa-gdb-bugs@cs.utah.edu). - -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 "bfd.h" -#include "sysdep.h" - -/* @@FIXME This is not a reasonable set of conditions to permit - cross-compilation, obviously. It also isn't enough to support hppa-elf - targets either. Can we eliminate the HPUX or BSD dependencies, or - at least get the conditionals more localized? */ -#if defined (HOST_HPPAHPUX) || defined (HOST_HPPABSD) - -#include "libbfd.h" -#include "libhppa.h" - -#include -#include -#include -#include -#include -#include -#include /* After a.out.h */ -#include -#include - -/* Magic not defined in standard HP-UX header files until 8.0 */ - -#ifndef CPU_PA_RISC1_0 -#define CPU_PA_RISC1_0 0x20B -#endif /* CPU_PA_RISC1_0 */ - -#ifndef CPU_PA_RISC1_1 -#define CPU_PA_RISC1_1 0x210 -#endif /* CPU_PA_RISC1_1 */ - -#ifndef _PA_RISC1_0_ID -#define _PA_RISC1_0_ID CPU_PA_RISC1_0 -#endif /* _PA_RISC1_0_ID */ - -#ifndef _PA_RISC1_1_ID -#define _PA_RISC1_1_ID CPU_PA_RISC1_1 -#endif /* _PA_RISC1_1_ID */ - -#ifndef _PA_RISC_MAXID -#define _PA_RISC_MAXID 0x2FF -#endif /* _PA_RISC_MAXID */ - -#ifndef _PA_RISC_ID -#define _PA_RISC_ID(__m_num) \ - (((__m_num) == _PA_RISC1_0_ID) || \ - ((__m_num) >= _PA_RISC1_1_ID && (__m_num) <= _PA_RISC_MAXID)) -#endif /* _PA_RISC_ID */ - -struct container - { - struct header f; - struct som_exec_auxhdr e; - }; - -static bfd_target * -hppa_object_setup (abfd, file_hdrp, aux_hdrp) - bfd *abfd; - struct header *file_hdrp; - struct som_exec_auxhdr *aux_hdrp; -{ - struct container *rawptr; - struct header *f; - struct hppa_data_struct *rawptr1; - asection *text, *data, *bss; - - rawptr = (struct container *) bfd_zalloc (abfd, sizeof (struct container)); - if (rawptr == NULL) - { - bfd_error = no_memory; - return 0; - } - - rawptr1 = (struct hppa_data_struct *) bfd_zalloc (abfd, sizeof (struct hppa_data_struct)); - if (rawptr1 == NULL) - { - bfd_error = no_memory; - return 0; - } - - abfd->tdata.hppa_data = rawptr1; - obj_file_hdr (abfd) = &rawptr->f; - obj_aux_hdr (abfd) = &rawptr->e; - *obj_file_hdr (abfd) = *file_hdrp; - *obj_aux_hdr (abfd) = *aux_hdrp; - - /* Set the file flags */ - abfd->flags = NO_FLAGS; - if (file_hdrp->entry_offset) - abfd->flags |= HAS_RELOC; - if (file_hdrp->symbol_total) - abfd->flags |= HAS_LINENO | HAS_DEBUG | HAS_SYMS | HAS_LOCALS; - - bfd_get_start_address (abfd) = aux_hdrp->exec_entry; - - obj_pa_symbols (abfd) = (hppa_symbol_type *) NULL; - bfd_get_symcount (abfd) = file_hdrp->symbol_total; - - bfd_default_set_arch_mach (abfd, bfd_arch_hppa, 0); - - /* create the sections. This is raunchy, but bfd_close wants to reclaim - them */ - - text = bfd_make_section (abfd, ".text"); - data = bfd_make_section (abfd, ".data"); - bss = bfd_make_section (abfd, ".bss"); - - text->_raw_size = aux_hdrp->exec_tsize; - data->_raw_size = aux_hdrp->exec_dsize; - bss->_raw_size = aux_hdrp->exec_bsize; - - text->flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS); - data->flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS); - bss->flags = SEC_ALLOC; - - /* The virtual memory addresses of the sections */ - text->vma = aux_hdrp->exec_tmem; - data->vma = aux_hdrp->exec_dmem; - bss->vma = aux_hdrp->exec_bfill; - - /* The file offsets of the sections */ - text->filepos = aux_hdrp->exec_tfile; - data->filepos = aux_hdrp->exec_dfile; - - /* The file offsets of the relocation info */ - text->rel_filepos = 0; - data->rel_filepos = 0; - - /* The file offsets of the string table and symbol table. */ - obj_sym_filepos (abfd) = file_hdrp->symbol_location; - bfd_get_symcount (abfd) = file_hdrp->symbol_total; - obj_str_filepos (abfd) = file_hdrp->symbol_strings_location; - obj_stringtab_size (abfd) = file_hdrp->symbol_strings_size; - - return abfd->xvec; -} - -/* Create a new BFD section for NAME. If NAME already exists, then create a - new unique name, with NAME as the prefix. This exists because SOM .o files - created by the native compiler can have a $CODE$ section for each - subroutine. - */ - -static asection * -make_unique_section (abfd, name, num) - bfd *abfd; - CONST char *name; - int num; -{ - asection *sect; - char *newname; - char altname[100]; - - sect = bfd_make_section (abfd, name); - while (!sect) - { - sprintf (altname, "%s-%d", name, num++); - sect = bfd_make_section (abfd, altname); - } - - newname = bfd_alloc (abfd, strlen (sect->name) + 1); - strcpy (newname, sect->name); - - sect->name = newname; - return sect; -} - -/* Convert all of the space and subspace info into BFD sections. Each space - contains a number of subspaces, which in turn describe the mapping between - regions of the exec file, and the address space that the program runs in. - BFD sections which correspond to spaces will overlap the sections for the - associated subspaces. */ - -static int -setup_sections (abfd, file_hdr) - bfd *abfd; - struct header *file_hdr; -{ - char *space_strings; - int space_index; - - /* First, read in space names */ - - space_strings = alloca (file_hdr->space_strings_size); - if (!space_strings) - return 0; - - if (bfd_seek (abfd, file_hdr->space_strings_location, SEEK_SET) < 0) - return 0; - if (bfd_read (space_strings, 1, file_hdr->space_strings_size, abfd) - != file_hdr->space_strings_size) - return 0; - - /* Loop over all of the space dictionaries, building up sections */ - - for (space_index = 0; space_index < file_hdr->space_total; space_index++) - { - struct space_dictionary_record space; - struct subspace_dictionary_record subspace; - int subspace_index, tmp; - asection *space_asect; - - /* Read the space dictionary element */ - if (bfd_seek (abfd, file_hdr->space_location - + space_index * sizeof space, SEEK_SET) < 0) - return 0; - if (bfd_read (&space, 1, sizeof space, abfd) != sizeof space) - return 0; - - /* Setup the space name string */ - space.name.n_name = space.name.n_strx + space_strings; - - /* Make a section out of it */ - space_asect = make_unique_section (abfd, space.name.n_name, space_index); - if (!space_asect) - return 0; - - /* Now, read in the first subspace for this space */ - if (bfd_seek (abfd, file_hdr->subspace_location - + space.subspace_index * sizeof subspace, - SEEK_SET) < 0) - return 0; - if (bfd_read (&subspace, 1, sizeof subspace, abfd) != sizeof subspace) - return 0; - /* Seek back to the start of the subspaces for loop below */ - if (bfd_seek (abfd, file_hdr->subspace_location - + space.subspace_index * sizeof subspace, - SEEK_SET) < 0) - return 0; - - /* Setup the section flags as appropriate (this is somewhat bogus, as - there isn't a clear mapping between what's in the space record, and - what BFD can describe here). */ - if (space.is_loadable) - space_asect->flags |= SEC_ALLOC; - if (space.is_defined) - space_asect->flags |= SEC_LOAD; - - /* Setup the start address and file loc from the first subspace record */ - space_asect->vma = subspace.subspace_start; - space_asect->filepos = subspace.file_loc_init_value; - space_asect->alignment_power = subspace.alignment; - - /* Loop over the rest of the subspaces, building up more sections */ - for (subspace_index = 0; subspace_index < space.subspace_quantity; - subspace_index++) - { - asection *subspace_asect; - - /* Read in the next subspace */ - if (bfd_read (&subspace, 1, sizeof subspace, abfd) - != sizeof subspace) - return 0; - - /* Setup the subspace name string */ - subspace.name.n_name = subspace.name.n_strx + space_strings; - - /* Make a section out of this subspace */ - subspace_asect = make_unique_section (abfd, subspace.name.n_name, - space.subspace_index + subspace_index); - - if (!subspace_asect) - return 0; - - if (subspace.is_loadable) - subspace_asect->flags |= SEC_ALLOC | SEC_LOAD; - if (subspace.code_only) - subspace_asect->flags |= SEC_CODE; - - subspace_asect->vma = subspace.subspace_start; - subspace_asect->_cooked_size = subspace.subspace_length; - subspace_asect->_raw_size = subspace.initialization_length; - subspace_asect->alignment_power = subspace.alignment; - subspace_asect->filepos = subspace.file_loc_init_value; - - } - /* Setup the sizes for the space section based upon the info in the - last subspace of the space. */ - space_asect->_cooked_size = (subspace.subspace_start - space_asect->vma) - + subspace.subspace_length; - space_asect->_raw_size = (subspace.file_loc_init_value - - space_asect->filepos) - + subspace.initialization_length; - } -} - -static bfd_target * -hppa_object_p (abfd) - bfd *abfd; -{ - struct header file_hdr; - struct som_exec_auxhdr aux_hdr; - - if (bfd_read ((PTR) & file_hdr, 1, FILE_HDR_SIZE, abfd) != FILE_HDR_SIZE) - return 0; - - if (!_PA_RISC_ID (file_hdr.system_id)) - { - bfd_error = wrong_format; - return 0; - } - - switch (file_hdr.a_magic) - { - case RELOC_MAGIC: /* I'm not really sure about all of these types... */ - case EXEC_MAGIC: - case SHARE_MAGIC: - case DEMAND_MAGIC: -#ifdef DL_MAGIC - case DL_MAGIC: -#endif -#ifdef SHL_MAGIC - case SHL_MAGIC: -#endif - break; - default: - bfd_error = wrong_format; - return 0; - } - - if (file_hdr.version_id != VERSION_ID - && file_hdr.version_id != NEW_VERSION_ID) - { - bfd_error = wrong_format; - return 0; - } - - if (bfd_read ((PTR) & aux_hdr, 1, AUX_HDR_SIZE, abfd) != AUX_HDR_SIZE) - bfd_error = wrong_format; - - if (!setup_sections (abfd, &file_hdr)) - return 0; - - return hppa_object_setup (abfd, &file_hdr, &aux_hdr); -} - -static boolean -hppa_mkobject (abfd) - bfd *abfd; -{ - fprintf (stderr, "hppa_mkobject unimplemented\n"); - fflush (stderr); - abort (); - return (false); -} - -boolean -hppa_write_object_contents(abfd) - bfd *abfd; -{ - fprintf (stderr, "hppa_write_object_contents unimplemented\n"); - fflush (stderr); - abort (); - return (false); -} - -static unsigned int -hppa_get_symtab_upper_bound (abfd) - bfd *abfd; -{ - fprintf (stderr, "hppa_get_symtab_upper_bound unimplemented\n"); - fflush (stderr); - abort (); - return (0); -} - -static unsigned int -hppa_get_reloc_upper_bound (abfd, asect) - bfd *abfd; - sec_ptr asect; -{ - fprintf (stderr, "hppa_get_reloc_upper_bound unimplemented\n"); - fflush (stderr); - abort (); - return (0); -} - -static unsigned int -hppa_canonicalize_reloc (abfd, section, relptr, symbols) - bfd *abfd; - sec_ptr section; - arelent **relptr; - asymbol **symbols; -{ - fprintf (stderr, "hppa_canonicalize_reloc unimplemented\n"); - fflush (stderr); - abort (); -} - -extern bfd_target hppa_vec; - -static unsigned int -hppa_get_symtab (abfd, location) - bfd *abfd; - asymbol **location; -{ - fprintf (stderr, "hppa_get_symtab unimplemented\n"); - fflush (stderr); - abort (); - return (0); -} - -static asymbol * -hppa_make_empty_symbol (abfd) - bfd *abfd; -{ - hppa_symbol_type *new = - (hppa_symbol_type *) bfd_zalloc (abfd, sizeof (hppa_symbol_type)); - new->symbol.the_bfd = abfd; - - return &new->symbol; -} - -static void -hppa_print_symbol (ignore_abfd, afile, symbol, how) - bfd *ignore_abfd; - PTR afile; - asymbol *symbol; - bfd_print_symbol_type how; -{ - fprintf (stderr, "hppa_print_symbol unimplemented\n"); - fflush (stderr); - abort (); -} - -static boolean -hppa_new_section_hook (abfd, newsect) - bfd *abfd; - asection *newsect; -{ - newsect->alignment_power = 3; - - /* We allow more than three sections internally */ - return true; -} - -static boolean -hppa_set_section_contents (abfd, section, location, offset, count) - bfd *abfd; - sec_ptr section; - PTR location; - file_ptr offset; - bfd_size_type count; -{ - fprintf (stderr, "hppa_set_section_contents unimplimented\n"); - fflush (stderr); - abort (); - return false; -} - -static boolean -hppa_set_arch_mach (abfd, arch, machine) - bfd *abfd; - enum bfd_architecture arch; - unsigned long machine; -{ - fprintf (stderr, "hppa_set_arch_mach unimplemented\n"); - fflush (stderr); - /* Allow any architecture to be supported by the hppa backend */ - return bfd_default_set_arch_mach (abfd, arch, machine); -} - -static boolean -hppa_find_nearest_line (abfd, section, symbols, offset, filename_ptr, - functionname_ptr, line_ptr) - bfd *abfd; - asection *section; - asymbol **symbols; - bfd_vma offset; - CONST char **filename_ptr; - CONST char **functionname_ptr; - unsigned int *line_ptr; -{ - fprintf (stderr, "hppa_find_nearest_line unimplemented\n"); - fflush (stderr); - abort (); - return (false); -} - -static int -hppa_sizeof_headers (abfd, reloc) - bfd *abfd; - boolean reloc; -{ - fprintf (stderr, "hppa_sizeof_headers unimplemented\n"); - fflush (stderr); - abort (); - return (0); -} - -/* Miscellaneous Support Functions -- Control Structures and Functions - for the PA. */ - -unsigned int -assemble_3 (x) - unsigned int x; -{ - return (((x & 1) << 2) | ((x & 6) >> 1)) & 7; -} - -void -dis_assemble_3 (x, r) - unsigned int x; - unsigned int *r; -{ - *r = (((x & 4) >> 2) | ((x & 3) << 1)) & 7; -} - -unsigned int -assemble_12 (x, y) - unsigned int x, y; -{ - return (((y & 1) << 11) | ((x & 1) << 10) | ((x & 0x7fe) >> 1)) & 0xfff; -} - -void -dis_assemble_12 (as12, x, y) - unsigned int as12; - unsigned int *x, *y; -{ - *y = (as12 & 0x800) >> 11; - *x = ((as12 & 0x3ff) << 1) | ((as12 & 0x400) >> 10); -} - -unsigned long -assemble_17 (x, y, z) - unsigned int x, y, z; -{ - unsigned long temp; - - temp = ((z & 1) << 16) | - ((x & 0x1f) << 11) | - ((y & 1) << 10) | - ((y & 0x7fe) >> 1); - return temp & 0x1ffff; -} - -void -dis_assemble_17 (as17, x, y, z) - unsigned int as17; - unsigned int *x, *y, *z; -{ - - *z = (as17 & 0x10000) >> 16; - *x = (as17 & 0x0f800) >> 11; - *y = (((as17 & 0x00400) >> 10) | ((as17 & 0x3ff) << 1)) & 0x7ff; -} - -unsigned long -assemble_21 (x) - unsigned int x; -{ - unsigned long temp; - - temp = ((x & 1) << 20) | - ((x & 0xffe) << 8) | - ((x & 0xc000) >> 7) | - ((x & 0x1f0000) >> 14) | - ((x & 0x003000) >> 12); - return temp & 0x1fffff; -} - -void -dis_assemble_21 (as21, x) - unsigned int as21, *x; -{ - unsigned long temp; - - - temp = (as21 & 0x100000) >> 20; - temp |= (as21 & 0x0ffe00) >> 8; - temp |= (as21 & 0x000180) << 7; - temp |= (as21 & 0x00007c) << 14; - temp |= (as21 & 0x000003) << 12; - *x = temp; -} - -#if 0 -unsigned long -sign_ext (x, len) - unsigned int x, len; -{ - unsigned int sign; - unsigned int result; - unsigned int len_ones; - int i; - - i = 0; - len_ones = 0; - while (i < len) - { - len_ones = (len_ones << 1) | 1; - i++; - } - - sign = (x >> (len - 1)) & 1; - - if (sign) - result = (~0 ^ len_ones) | (len_ones & x); - else - result = len_ones & x; - - return result; -} - -#endif -static unsigned long -sign_ext (x, len) - unsigned int x, len; -{ - return (x << (32 - len)) >> (32 - len); -} - -static unsigned int -ones (n) - int n; -{ - unsigned int len_ones; - int i; - - i = 0; - len_ones = 0; - while (i < n) - { - len_ones = (len_ones << 1) | 1; - i++; - } - - return len_ones; -} - -void -sign_unext (x, len, result) - unsigned int x, len; - unsigned int *result; -{ - unsigned int len_ones; - - len_ones = ones (len); - - *result = x & len_ones; -} - -unsigned long -low_sign_ext (x, len) - unsigned int x, len; -{ - unsigned int temp1, temp2; - unsigned int len_ones; - - len_ones = ones (len); - - temp1 = (x & 1) << (len - 1); - temp2 = ((x & 0xfffffffe) & len_ones) >> 1; - return sign_ext ((temp1 | temp2), len); -} - -void -low_sign_unext (x, len, result) - unsigned int x, len; - unsigned int *result; -{ - unsigned int temp; - unsigned int sign; - unsigned int rest; - unsigned int one_bit_at_len; - unsigned int len_ones; - - len_ones = ones (len); - one_bit_at_len = 1 << (len - 1); - - sign_unext (x, len, &temp); - sign = temp & one_bit_at_len; - sign >>= (len - 1); - - rest = temp & (len_ones ^ one_bit_at_len); - rest <<= 1; - - *result = rest | sign; -} - -/* These work when 'y' is a power of two only. */ - -static long -round_down (x, y) - long x, y; -{ - return x & ~(y - 1); -} - -static long -round (x, y) - long x, y; -{ - return (x + y / 2) & ~(y - 1); -} - -static long -round_up (x, y) - long x, y; -{ - return x - (x | ~(y - 1)); -} - -/* L(Symbol, Addend): */ -/* round_down (Symbol + Addend, 2048) */ - -static long -L (Symbol, Addend) -{ - return (round_down (Symbol + Addend, 2048)) >> 11; -} - -/* R(Symbol, Addend): */ -/* Symbol + Addend - round_down (Symbol + Addend, 2048) */ - -static long -R (Symbol, Addend) -{ - return Symbol + Addend - round_down (Symbol + Addend, 2048); -} - -/* LS(Symbol, Addend): */ -/* round (Symbol + Addend, 2048) */ - -static long -LS (Symbol, Addend) -{ - return round (Symbol + Addend, 2048); -} - -/* RS(Symbol, Addend): */ -/* Symbol + Addend - round (Symbol + Addend, 2048) */ - -static long -RS (Symbol, Addend) -{ - return Symbol + Addend - round (Symbol + Addend, 2048); -} - -/* LD(Symbol, Addend): */ -/* round_up (Symbol + Addend, 2048) */ - -static long -LD (Symbol, Addend) -{ - return (round_up (Symbol + Addend, 2048)) >> 11; -} - -/* RD(Symbol, Addend): */ -/* Symbol + Addend - round_up (Symbol + Addend, 2048) */ - -static long -RD (Symbol, Addend) -{ - return Symbol + Addend - round_up (Symbol + Addend, 2048); -} - -/* LR(Symbol, Addend): */ -/* round_down (Symbol, 2048) + round (Addend, 8192) */ - -static long -LR (Symbol, Addend) -{ - return (round_down (Symbol, 2048) + round (Addend, 8192)) >> 11; -} - -/* RR(Symbol, Addend): */ -/* Symbol - round_down (Symbol, 2048) + */ -/* Addend - round (Addend, 8192) */ - -static long -RR (Symbol, Addend) -{ - return Symbol - - round_down (Symbol, 2048) - + Addend - round (Addend, 8192); -} - -unsigned long -hppa_field_adjust (value, constant_value, r_field) - unsigned long value; - unsigned long constant_value; - unsigned short r_field; -{ - unsigned long init_value = value; - value += constant_value; - switch (r_field) - { - case e_fsel: /* F : no change */ - break; - - case e_lssel: /* LS : if (bit 21) then add 0x800 - arithmetic shift right 11 bits */ - if (value & 0x00000400) - value += 0x800; - value = (value & 0xfffff800) >> 11; - BFD_ASSERT (value == LS (init_value, constant_value)); - break; - - case e_rssel: /* RS : Sign extend from bit 21 */ - if (value & 0x00000400) - value |= 0xfffff800; - else - value &= 0x7ff; - BFD_ASSERT (value == RS (init_value, constant_value)); - break; - - case e_lsel: /* L : Arithmetic shift right 11 bits */ - value = (value & 0xfffff800) >> 11; - BFD_ASSERT (value == L (init_value, constant_value)); - break; - - case e_rsel: /* R : Set bits 0-20 to zero */ - value = value & 0x7ff; - BFD_ASSERT (value == R (init_value, constant_value)); - break; - - case e_ldsel: /* LD : Add 0x800, arithmetic shift - right 11 bits */ - value += 0x800; - value = (value & 0xfffff800) >> 11; - BFD_ASSERT (value == LD (init_value, constant_value)); - break; - - case e_rdsel: /* RD : Set bits 0-20 to one */ - value |= 0xfffff800; - BFD_ASSERT (value == RD (init_value, constant_value)); - break; - - case e_lrsel: /* LR : L with "rounded" constant */ - value = value + ((constant_value + 0x1000) & 0xffffe000); - value = (value & 0xfffff800) >> 11; - BFD_ASSERT (value == LR (init_value, constant_value)); - break; - - case e_rrsel: /* RR : R with "rounded" constant */ - value = value + ((constant_value + 0x1000) & 0xffffe000); - value = (value & 0x7ff) + constant_value - ((constant_value + 0x1000) & 0xffffe000); - BFD_ASSERT (value == RR (init_value, constant_value)); - break; - - default: - fprintf (stderr, "Unrecognized field_selector 0x%02x\n", r_field); - break; - } - return value; - -} - -/* Return information about SOM symbol SYMBOL in RET. */ - -static void -hppa_get_symbol_info (ignore_abfd, symbol, ret) - bfd *ignore_abfd; /* Ignored. */ - asymbol *symbol; - symbol_info *ret; -{ - bfd_symbol_info (symbol, ret); -} - -/* End of miscellaneous support functions. */ - -#define hppa_bfd_debug_info_start bfd_void -#define hppa_bfd_debug_info_end bfd_void -#define hppa_bfd_debug_info_accumulate (PROTO(void,(*),(bfd*, struct sec *))) bfd_void - -#define hppa_openr_next_archived_file bfd_generic_openr_next_archived_file -#define hppa_generic_stat_arch_elt bfd_generic_stat_arch_elt -#define hppa_slurp_armap bfd_false -#define hppa_slurp_extended_name_table _bfd_slurp_extended_name_table -#define hppa_truncate_arname (void (*)())bfd_nullvoidptr -#define hppa_write_armap 0 - -#define hppa_get_lineno (struct lineno_cache_entry *(*)())bfd_nullvoidptr -#define hppa_close_and_cleanup bfd_generic_close_and_cleanup -#define hppa_get_section_contents bfd_generic_get_section_contents - -#define hppa_bfd_get_relocated_section_contents \ - bfd_generic_get_relocated_section_contents -#define hppa_bfd_relax_section bfd_generic_relax_section -#define hppa_bfd_seclet_link bfd_generic_seclet_link -#define hppa_bfd_reloc_type_lookup \ - ((CONST struct reloc_howto_struct *(*) PARAMS ((bfd *, bfd_reloc_code_real_type))) bfd_nullvoidptr) -#define hppa_bfd_make_debug_symbol \ - ((asymbol *(*) PARAMS ((bfd *, void *, unsigned long))) bfd_nullvoidptr) - -/* Core file support is in the hpux-core backend. */ -#define hppa_core_file_failing_command _bfd_dummy_core_file_failing_command -#define hppa_core_file_failing_signal _bfd_dummy_core_file_failing_signal -#define hppa_core_file_matches_executable_p _bfd_dummy_core_file_matches_executable_p - -bfd_target hppa_vec = -{ - "hppa", /* name */ - bfd_target_hppa_flavour, - true, /* target byte order */ - true, /* target headers byte order */ - (HAS_RELOC | EXEC_P | /* object flags */ - HAS_LINENO | HAS_DEBUG | - HAS_SYMS | HAS_LOCALS | DYNAMIC | WP_TEXT | D_PAGED), - (SEC_CODE | SEC_DATA | SEC_ROM | SEC_HAS_CONTENTS - | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */ - -/* leading_symbol_char: is the first char of a user symbol - predictable, and if so what is it */ - 0, - ' ', /* ar_pad_char */ - 16, /* ar_max_namelen */ - 3, /* minimum alignment */ - _do_getb64, _do_getb_signed_64, _do_putb64, - _do_getb32, _do_getb_signed_32, _do_putb32, - _do_getb16, _do_getb_signed_16, _do_putb16, /* data */ - _do_getb64, _do_getb_signed_64, _do_putb64, - _do_getb32, _do_getb_signed_32, _do_putb32, - _do_getb16, _do_getb_signed_16, _do_putb16, /* hdrs */ - {_bfd_dummy_target, - hppa_object_p, /* bfd_check_format */ - bfd_generic_archive_p, - _bfd_dummy_target - }, - { - bfd_false, - hppa_mkobject, - _bfd_generic_mkarchive, - bfd_false - }, - { - bfd_false, - hppa_write_object_contents, - _bfd_write_archive_contents, - bfd_false, - }, -#undef hppa - JUMP_TABLE (hppa), - (PTR) 0 -}; - -#endif /* HOST_HPPAHPUX || HOST_HPPABSD */