/* 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 */