/* Plugin support for BFD. Copyright 2009 Free Software Foundation, Inc. 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 3 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., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */ #include "config.h" #include <assert.h> #include <dlfcn.h> #include <stdarg.h> #include "plugin-api.h" #include "sysdep.h" #include "plugin.h" #include "libbfd.h" #include "libiberty.h" #include <dirent.h> #define bfd_plugin_close_and_cleanup _bfd_generic_close_and_cleanup #define bfd_plugin_bfd_free_cached_info _bfd_generic_bfd_free_cached_info #define bfd_plugin_new_section_hook _bfd_generic_new_section_hook #define bfd_plugin_get_section_contents _bfd_generic_get_section_contents #define bfd_plugin_get_section_contents_in_window _bfd_generic_get_section_contents_in_window #define bfd_plugin_bfd_copy_private_header_data _bfd_generic_bfd_copy_private_header_data #define bfd_plugin_bfd_merge_private_bfd_data _bfd_generic_bfd_merge_private_bfd_data #define bfd_plugin_bfd_copy_private_header_data _bfd_generic_bfd_copy_private_header_data #define bfd_plugin_bfd_set_private_flags _bfd_generic_bfd_set_private_flags #define bfd_plugin_core_file_matches_executable_p generic_core_file_matches_executable_p #define bfd_plugin_bfd_is_local_label_name _bfd_nosymbols_bfd_is_local_label_name #define bfd_plugin_bfd_is_target_special_symbol ((bfd_boolean (*) (bfd *, asymbol *)) bfd_false) #define bfd_plugin_get_lineno _bfd_nosymbols_get_lineno #define bfd_plugin_find_nearest_line _bfd_nosymbols_find_nearest_line #define bfd_plugin_find_inliner_info _bfd_nosymbols_find_inliner_info #define bfd_plugin_bfd_make_debug_symbol _bfd_nosymbols_bfd_make_debug_symbol #define bfd_plugin_read_minisymbols _bfd_generic_read_minisymbols #define bfd_plugin_minisymbol_to_symbol _bfd_generic_minisymbol_to_symbol #define bfd_plugin_set_arch_mach bfd_default_set_arch_mach #define bfd_plugin_set_section_contents _bfd_generic_set_section_contents #define bfd_plugin_bfd_get_relocated_section_contents bfd_generic_get_relocated_section_contents #define bfd_plugin_bfd_relax_section bfd_generic_relax_section #define bfd_plugin_bfd_link_hash_table_create _bfd_generic_link_hash_table_create #define bfd_plugin_bfd_link_hash_table_free _bfd_generic_link_hash_table_free #define bfd_plugin_bfd_link_add_symbols _bfd_generic_link_add_symbols #define bfd_plugin_bfd_link_just_syms _bfd_generic_link_just_syms #define bfd_plugin_bfd_final_link _bfd_generic_final_link #define bfd_plugin_bfd_link_split_section _bfd_generic_link_split_section #define bfd_plugin_bfd_gc_sections bfd_generic_gc_sections #define bfd_plugin_bfd_merge_sections bfd_generic_merge_sections #define bfd_plugin_bfd_is_group_section bfd_generic_is_group_section #define bfd_plugin_bfd_discard_group bfd_generic_discard_group #define bfd_plugin_section_already_linked _bfd_generic_section_already_linked #define bfd_plugin_bfd_define_common_symbol bfd_generic_define_common_symbol static enum ld_plugin_status message (int level ATTRIBUTE_UNUSED, const char * format, ...) { va_list args; va_start (args, format); printf ("bfd plugin: "); vprintf (format, args); va_end (args); return LDPS_OK; } /* Register a claim-file handler. */ static ld_plugin_claim_file_handler claim_file; static enum ld_plugin_status register_claim_file (ld_plugin_claim_file_handler handler) { claim_file = handler; return LDPS_OK; } static enum ld_plugin_status add_symbols (void * handle, int nsyms, const struct ld_plugin_symbol * syms) { bfd *abfd = handle; struct plugin_data_struct *plugin_data = bfd_alloc (abfd, sizeof (plugin_data_struct));; plugin_data->nsyms = nsyms; plugin_data->syms = syms; if (nsyms != 0) abfd->flags |= HAS_SYMS; abfd->tdata.plugin_data = plugin_data; return LDPS_OK; } static const char *plugin_program_name; void bfd_plugin_set_program_name (const char *program_name) { plugin_program_name = program_name; } static int try_load_plugin (const char *pname) { static void *plugin_handle; int tv_size = 4; struct ld_plugin_tv tv[tv_size]; int i; ld_plugin_onload onload; enum ld_plugin_status status; plugin_handle = dlopen (pname, RTLD_NOW); if (!plugin_handle) { (*_bfd_error_handler)("%s\n", dlerror ()); return 0; } onload = dlsym (plugin_handle, "onload"); if (!onload) goto err; i = 0; tv[i].tv_tag = LDPT_MESSAGE; tv[i].tv_u.tv_message = message; ++i; tv[i].tv_tag = LDPT_REGISTER_CLAIM_FILE_HOOK; tv[i].tv_u.tv_register_claim_file = register_claim_file; ++i; tv[i].tv_tag = LDPT_ADD_SYMBOLS; tv[i].tv_u.tv_add_symbols = add_symbols; ++i; tv[i].tv_tag = LDPT_NULL; tv[i].tv_u.tv_val = 0; status = (*onload)(tv); if (status != LDPS_OK) goto err; if (!claim_file) goto err; return 1; err: plugin_handle = NULL; return 0; } static const char *plugin_name; void bfd_plugin_set_plugin (const char *p) { plugin_name = p; } static int load_plugin (void) { char *plugin_dir; char *p; DIR *d; struct dirent *ent; int found = 0; if (plugin_name) return try_load_plugin (plugin_name); if (plugin_program_name == NULL) return 0; plugin_dir = concat (BINDIR, "/../lib/bfd-plugins", NULL); p = make_relative_prefix (plugin_program_name, BINDIR, plugin_dir); free (plugin_dir); plugin_dir = NULL; d = opendir (p); if (!d) goto out; while ((ent = readdir (d))) { char *full_name; struct stat s; full_name = concat (p, "/", ent->d_name, NULL); if (stat(full_name, &s) == 0 && S_ISREG (s.st_mode)) found = try_load_plugin (full_name); free (full_name); if (found) break; } out: free (p); if (d) closedir (d); return found; } static const bfd_target * bfd_plugin_object_p (bfd *abfd) { int claimed = 0; int t = load_plugin (); struct ld_plugin_input_file file; if (!t) return NULL; file.name = abfd->filename; if (abfd->iostream) { file.fd = fileno (abfd->iostream); file.offset = 0; file.filesize = 0; /*FIXME*/ } else { bfd *archive = abfd->my_archive; BFD_ASSERT (archive); file.fd = fileno (archive->iostream); file.offset = abfd->origin; file.filesize = arelt_size (abfd); } file.handle = abfd; claim_file (&file, &claimed); if (!claimed) return NULL; return abfd->xvec; } /* Copy any private info we understand from the input bfd to the output bfd. */ static bfd_boolean bfd_plugin_bfd_copy_private_bfd_data (bfd *ibfd ATTRIBUTE_UNUSED, bfd *obfd ATTRIBUTE_UNUSED) { BFD_ASSERT (0); return TRUE; } /* Copy any private info we understand from the input section to the output section. */ static bfd_boolean bfd_plugin_bfd_copy_private_section_data (bfd *ibfd ATTRIBUTE_UNUSED, asection *isection ATTRIBUTE_UNUSED, bfd *obfd ATTRIBUTE_UNUSED, asection *osection ATTRIBUTE_UNUSED) { BFD_ASSERT (0); return TRUE; } /* Copy any private info we understand from the input symbol to the output symbol. */ static bfd_boolean bfd_plugin_bfd_copy_private_symbol_data (bfd *ibfd ATTRIBUTE_UNUSED, asymbol *isymbol ATTRIBUTE_UNUSED, bfd *obfd ATTRIBUTE_UNUSED, asymbol *osymbol ATTRIBUTE_UNUSED) { BFD_ASSERT (0); return TRUE; } static bfd_boolean bfd_plugin_bfd_print_private_bfd_data (bfd *abfd ATTRIBUTE_UNUSED, PTR ptr ATTRIBUTE_UNUSED) { BFD_ASSERT (0); return TRUE; } static char * bfd_plugin_core_file_failing_command (bfd *abfd ATTRIBUTE_UNUSED) { BFD_ASSERT (0); return NULL; } static int bfd_plugin_core_file_failing_signal (bfd *abfd ATTRIBUTE_UNUSED) { BFD_ASSERT (0); return 0; } static long bfd_plugin_get_symtab_upper_bound (bfd *abfd) { struct plugin_data_struct *plugin_data = abfd->tdata.plugin_data; long nsyms = plugin_data->nsyms; BFD_ASSERT (nsyms >= 0); return ((nsyms + 1) * sizeof (asymbol *)); } static flagword convert_flags (const struct ld_plugin_symbol *sym) { switch (sym->def) { case LDPK_DEF: case LDPK_COMMON: case LDPK_UNDEF: return BSF_GLOBAL; case LDPK_WEAKUNDEF: case LDPK_WEAKDEF: return BSF_GLOBAL | BSF_WEAK; default: BFD_ASSERT (0); return 0; } } static long bfd_plugin_canonicalize_symtab (bfd *abfd, asymbol **alocation) { struct plugin_data_struct *plugin_data = abfd->tdata.plugin_data; long nsyms = plugin_data->nsyms; const struct ld_plugin_symbol *syms = plugin_data->syms; static asection fake_section; static asection fake_common_section; int i; fake_section.name = ".text"; fake_common_section.flags = SEC_IS_COMMON; for (i = 0; i < nsyms; i++) { asymbol *s = bfd_alloc (abfd, sizeof (asymbol)); BFD_ASSERT (s); alocation[i] = s; s->the_bfd = abfd; s->name = syms[i].name; s->value = 0; s->flags = convert_flags (&syms[i]); switch (syms[i].def) { case LDPK_COMMON: s->section = &fake_common_section; break; case LDPK_UNDEF: case LDPK_WEAKUNDEF: s->section = bfd_und_section_ptr; break; case LDPK_DEF: case LDPK_WEAKDEF: s->section = &fake_section; break; default: BFD_ASSERT (0); } s->udata.p = (void *) &syms[i]; } return nsyms; } static void bfd_plugin_print_symbol (bfd *abfd ATTRIBUTE_UNUSED, PTR afile ATTRIBUTE_UNUSED, asymbol *symbol ATTRIBUTE_UNUSED, bfd_print_symbol_type how ATTRIBUTE_UNUSED) { BFD_ASSERT (0); } static void bfd_plugin_get_symbol_info (bfd *abfd ATTRIBUTE_UNUSED, asymbol *symbol, symbol_info *ret) { bfd_symbol_info (symbol, ret); } /* Make an empty symbol. */ static asymbol * bfd_plugin_make_empty_symbol (bfd *abfd) { asymbol *new = bfd_zalloc (abfd, sizeof (asymbol)); if (new == NULL) return new; new->the_bfd = abfd; return new; } static int bfd_plugin_sizeof_headers (bfd *a ATTRIBUTE_UNUSED, struct bfd_link_info *info ATTRIBUTE_UNUSED) { BFD_ASSERT (0); return 0; } static bfd_boolean bfd_plugin_mkobject (bfd *abfd ATTRIBUTE_UNUSED) { BFD_ASSERT (0); return 0; } const bfd_target plugin_vec = { "plugin", /* Name. */ bfd_target_unknown_flavour, BFD_ENDIAN_LITTLE, /* Target byte order. */ BFD_ENDIAN_LITTLE, /* 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. */ 0, /* symbol_leading_char. */ '/', /* ar_pad_char. */ 15, /* ar_max_namelen. */ bfd_getl64, bfd_getl_signed_64, bfd_putl64, bfd_getl32, bfd_getl_signed_32, bfd_putl32, bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* data */ bfd_getl64, bfd_getl_signed_64, bfd_putl64, bfd_getl32, bfd_getl_signed_32, bfd_putl32, bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* hdrs */ { /* bfd_check_format. */ _bfd_dummy_target, bfd_plugin_object_p, bfd_generic_archive_p, _bfd_dummy_target }, { /* bfd_set_format. */ bfd_false, bfd_plugin_mkobject, _bfd_generic_mkarchive, bfd_false, }, { /* bfd_write_contents. */ bfd_false, bfd_false, _bfd_write_archive_contents, bfd_false, }, BFD_JUMP_TABLE_GENERIC (bfd_plugin), BFD_JUMP_TABLE_COPY (bfd_plugin), BFD_JUMP_TABLE_CORE (bfd_plugin), BFD_JUMP_TABLE_ARCHIVE (_bfd_archive_coff), BFD_JUMP_TABLE_SYMBOLS (bfd_plugin), BFD_JUMP_TABLE_RELOCS (_bfd_norelocs), BFD_JUMP_TABLE_WRITE (bfd_plugin), BFD_JUMP_TABLE_LINK (bfd_plugin), BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic), NULL, NULL /* backend_data. */ };