]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - bfd/plugin.c
PR31692, objdump fails .debug_info size check
[thirdparty/binutils-gdb.git] / bfd / plugin.c
CommitLineData
ce3c775b 1/* Plugin support for BFD.
fd67aa11 2 Copyright (C) 2009-2024 Free Software Foundation, Inc.
ce3c775b
NC
3
4 This file is part of BFD, the Binary File Descriptor library.
5
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3 of the License, or
9 (at your option) any later version.
10
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
19 MA 02110-1301, USA. */
20
691bf19c 21#include "sysdep.h"
98950613
AM
22#include "bfd.h"
23
24#if BFD_SUPPORTS_PLUGINS
25
ce3c775b 26#include <assert.h>
17d5dae2 27#ifdef HAVE_DLFCN_H
ce3c775b 28#include <dlfcn.h>
17d5dae2
KT
29#elif defined (HAVE_WINDOWS_H)
30#include <windows.h>
31#else
32#error Unknown how to handle dynamic-load-libraries.
33#endif
ce3c775b
NC
34#include <stdarg.h>
35#include "plugin-api.h"
ce3c775b
NC
36#include "plugin.h"
37#include "libbfd.h"
38#include "libiberty.h"
39#include <dirent.h>
40
17d5dae2
KT
41#if !defined (HAVE_DLFCN_H) && defined (HAVE_WINDOWS_H)
42
43#define RTLD_NOW 0 /* Dummy value. */
44
45static void *
46dlopen (const char *file, int mode ATTRIBUTE_UNUSED)
47{
48 return LoadLibrary (file);
49}
50
51static void *
52dlsym (void *handle, const char *name)
53{
54 return GetProcAddress (handle, name);
55}
56
57static int ATTRIBUTE_UNUSED
58dlclose (void *handle)
59{
60 FreeLibrary (handle);
61 return 0;
62}
63
64static const char *
65dlerror (void)
66{
67 return "Unable to load DLL.";
68}
69
70#endif /* !defined (HAVE_DLFCN_H) && defined (HAVE_WINDOWS_H) */
71
3d98c460 72#define bfd_plugin_close_and_cleanup _bfd_generic_close_and_cleanup
07d6d2b8
AM
73#define bfd_plugin_bfd_free_cached_info _bfd_generic_bfd_free_cached_info
74#define bfd_plugin_new_section_hook _bfd_generic_new_section_hook
75#define bfd_plugin_get_section_contents _bfd_generic_get_section_contents
433b4f8a 76#define bfd_plugin_init_private_section_data _bfd_generic_init_private_section_data
07d6d2b8
AM
77#define bfd_plugin_bfd_copy_private_header_data _bfd_generic_bfd_copy_private_header_data
78#define bfd_plugin_bfd_merge_private_bfd_data _bfd_generic_bfd_merge_private_bfd_data
79#define bfd_plugin_bfd_copy_private_header_data _bfd_generic_bfd_copy_private_header_data
80#define bfd_plugin_bfd_set_private_flags _bfd_generic_bfd_set_private_flags
ce3c775b 81#define bfd_plugin_core_file_matches_executable_p generic_core_file_matches_executable_p
07d6d2b8 82#define bfd_plugin_bfd_is_local_label_name _bfd_nosymbols_bfd_is_local_label_name
d00dd7dc 83#define bfd_plugin_bfd_is_target_special_symbol _bfd_bool_bfd_asymbol_false
07d6d2b8
AM
84#define bfd_plugin_get_lineno _bfd_nosymbols_get_lineno
85#define bfd_plugin_find_nearest_line _bfd_nosymbols_find_nearest_line
6e7a29c7 86#define bfd_plugin_find_nearest_line_with_alt _bfd_nosymbols_find_nearest_line_with_alt
07d6d2b8
AM
87#define bfd_plugin_find_line _bfd_nosymbols_find_line
88#define bfd_plugin_find_inliner_info _bfd_nosymbols_find_inliner_info
60bb06bc 89#define bfd_plugin_get_symbol_version_string _bfd_nosymbols_get_symbol_version_string
07d6d2b8
AM
90#define bfd_plugin_bfd_make_debug_symbol _bfd_nosymbols_bfd_make_debug_symbol
91#define bfd_plugin_read_minisymbols _bfd_generic_read_minisymbols
92#define bfd_plugin_minisymbol_to_symbol _bfd_generic_minisymbol_to_symbol
93#define bfd_plugin_set_arch_mach bfd_default_set_arch_mach
94#define bfd_plugin_set_section_contents _bfd_generic_set_section_contents
ce3c775b 95#define bfd_plugin_bfd_get_relocated_section_contents bfd_generic_get_relocated_section_contents
07d6d2b8
AM
96#define bfd_plugin_bfd_relax_section bfd_generic_relax_section
97#define bfd_plugin_bfd_link_hash_table_create _bfd_generic_link_hash_table_create
98#define bfd_plugin_bfd_link_add_symbols _bfd_generic_link_add_symbols
99#define bfd_plugin_bfd_link_just_syms _bfd_generic_link_just_syms
100#define bfd_plugin_bfd_final_link _bfd_generic_final_link
101#define bfd_plugin_bfd_link_split_section _bfd_generic_link_split_section
102#define bfd_plugin_bfd_gc_sections bfd_generic_gc_sections
103#define bfd_plugin_bfd_lookup_section_flags bfd_generic_lookup_section_flags
104#define bfd_plugin_bfd_merge_sections bfd_generic_merge_sections
105#define bfd_plugin_bfd_is_group_section bfd_generic_is_group_section
cb7f4b29 106#define bfd_plugin_bfd_group_name bfd_generic_group_name
07d6d2b8
AM
107#define bfd_plugin_bfd_discard_group bfd_generic_discard_group
108#define bfd_plugin_section_already_linked _bfd_generic_section_already_linked
109#define bfd_plugin_bfd_define_common_symbol bfd_generic_define_common_symbol
34a87bb0 110#define bfd_plugin_bfd_link_hide_symbol _bfd_generic_link_hide_symbol
07d6d2b8 111#define bfd_plugin_bfd_define_start_stop bfd_generic_define_start_stop
69a630b5 112#define bfd_plugin_bfd_copy_link_hash_symbol_type _bfd_generic_copy_link_hash_symbol_type
07d6d2b8 113#define bfd_plugin_bfd_link_check_relocs _bfd_generic_link_check_relocs
ce3c775b
NC
114
115static enum ld_plugin_status
116message (int level ATTRIBUTE_UNUSED,
117 const char * format, ...)
118{
119 va_list args;
120 va_start (args, format);
121 printf ("bfd plugin: ");
122 vprintf (format, args);
d9b21463 123 putchar ('\n');
ce3c775b
NC
124 va_end (args);
125 return LDPS_OK;
126}
127
0aa99dcd
L
128struct plugin_list_entry
129{
130 /* These must be initialized for each IR object with LTO wrapper. */
0aa99dcd 131 ld_plugin_claim_file_handler claim_file;
b21318bd 132 ld_plugin_claim_file_handler_v2 claim_file_v2;
0aa99dcd
L
133 ld_plugin_all_symbols_read_handler all_symbols_read;
134 ld_plugin_all_symbols_read_handler cleanup_handler;
0a1b45a2 135 bool has_symbol_type;
0aa99dcd
L
136
137 struct plugin_list_entry *next;
138
139 /* These can be reused for all IR objects. */
140 const char *plugin_name;
0aa99dcd
L
141};
142
ecda9016 143static const char *plugin_program_name;
ecda9016
L
144
145void
3d98c460 146bfd_plugin_set_program_name (const char *program_name)
ecda9016
L
147{
148 plugin_program_name = program_name;
0aa99dcd
L
149}
150
151static struct plugin_list_entry *plugin_list = NULL;
152static struct plugin_list_entry *current_plugin = NULL;
153
ce3c775b 154/* Register a claim-file handler. */
ce3c775b
NC
155
156static enum ld_plugin_status
157register_claim_file (ld_plugin_claim_file_handler handler)
158{
0aa99dcd
L
159 current_plugin->claim_file = handler;
160 return LDPS_OK;
161}
162
b21318bd
JM
163
164/* Register a claim-file handler, version 2. */
165
166static enum ld_plugin_status
167register_claim_file_v2 (ld_plugin_claim_file_handler_v2 handler)
168{
169 current_plugin->claim_file_v2 = handler;
170 return LDPS_OK;
171}
172
ce3c775b
NC
173static enum ld_plugin_status
174add_symbols (void * handle,
175 int nsyms,
176 const struct ld_plugin_symbol * syms)
177{
178 bfd *abfd = handle;
179 struct plugin_data_struct *plugin_data =
5bb3703f 180 bfd_alloc (abfd, sizeof (plugin_data_struct));
ce3c775b 181
3d98c460
L
182 if (!plugin_data)
183 return LDPS_ERR;
0aa99dcd 184
3d98c460
L
185 plugin_data->nsyms = nsyms;
186 plugin_data->syms = syms;
ce3c775b
NC
187
188 if (nsyms != 0)
189 abfd->flags |= HAS_SYMS;
190
3d98c460 191 abfd->tdata.plugin_data = plugin_data;
ce3c775b
NC
192 return LDPS_OK;
193}
194
c3a1714c
L
195static enum ld_plugin_status
196add_symbols_v2 (void *handle, int nsyms,
197 const struct ld_plugin_symbol *syms)
198{
0a1b45a2 199 current_plugin->has_symbol_type = true;
c3a1714c
L
200 return add_symbols (handle, nsyms, syms);
201}
202
7d0b9ebc
AM
203int
204bfd_plugin_open_input (bfd *ibfd, struct ld_plugin_input_file *file)
ce3c775b 205{
e44f5bef 206 bfd *iobfd;
91817247 207 int fd;
e44f5bef 208
7d0b9ebc 209 iobfd = ibfd;
27b07675
AM
210 while (iobfd->my_archive
211 && !bfd_is_thin_archive (iobfd->my_archive))
212 iobfd = iobfd->my_archive;
765cf5f6 213 file->name = bfd_get_filename (iobfd);
e44f5bef
MT
214
215 if (!iobfd->iostream && !bfd_open_file (iobfd))
216 return 0;
217
91817247
L
218 /* Reuse the archive plugin file descriptor. */
219 if (iobfd != ibfd)
220 fd = iobfd->archive_plugin_fd;
221 else
222 fd = -1;
223
224 if (fd < 0)
83b0a686 225 {
91817247
L
226 /* The plugin API expects that the file descriptor won't be closed
227 and reused as done by the bfd file cache. So open it again.
228 dup isn't good enough. plugin IO uses lseek/read while BFD uses
229 fseek/fread. It isn't wise to mix the unistd and stdio calls on
230 the same underlying file descriptor. */
231 fd = open (file->name, O_RDONLY | O_BINARY);
232 if (fd < 0)
233 {
83b0a686 234#ifndef EMFILE
91817247 235 return 0;
83b0a686 236#else
91817247
L
237 if (errno != EMFILE)
238 return 0;
83b0a686
NC
239
240#ifdef HAVE_GETRLIMIT
91817247
L
241 struct rlimit lim;
242
243 /* Complicated links involving lots of files and/or large
244 archives can exhaust the number of file descriptors
245 available to us. If possible, try to allocate more
246 descriptors. */
247 if (getrlimit (RLIMIT_NOFILE, & lim) == 0
248 && lim.rlim_cur < lim.rlim_max)
249 {
250 lim.rlim_cur = lim.rlim_max;
251 if (setrlimit (RLIMIT_NOFILE, &lim) == 0)
252 fd = open (file->name, O_RDONLY | O_BINARY);
253 }
254
255 if (fd < 0)
83b0a686 256#endif
91817247
L
257 {
258 _bfd_error_handler (_("plugin framework: out of file descriptors. Try using fewer objects/archives\n"));
259 return 0;
260 }
83b0a686 261#endif
91817247
L
262 }
263 }
e44f5bef 264
7d0b9ebc 265 if (iobfd == ibfd)
e44f5bef
MT
266 {
267 struct stat stat_buf;
103da91b 268
91817247 269 if (fstat (fd, &stat_buf))
103da91b 270 {
91817247 271 close (fd);
103da91b
NC
272 return 0;
273 }
274
7d0b9ebc
AM
275 file->offset = 0;
276 file->filesize = stat_buf.st_size;
277 }
278 else
279 {
91817247
L
280 /* Cache the archive plugin file descriptor. */
281 iobfd->archive_plugin_fd = fd;
282 iobfd->archive_plugin_fd_open_count++;
283
7d0b9ebc
AM
284 file->offset = ibfd->origin;
285 file->filesize = arelt_size (ibfd);
e44f5bef 286 }
91817247
L
287
288 file->fd = fd;
7d0b9ebc
AM
289 return 1;
290}
291
7a30ac44
L
292/* Close the plugin file descriptor FD. If ABFD isn't NULL, it is an
293 archive member. */
91817247
L
294
295void
296bfd_plugin_close_file_descriptor (bfd *abfd, int fd)
297{
7a30ac44 298 if (abfd == NULL)
91817247
L
299 close (fd);
300 else
301 {
7a30ac44
L
302 while (abfd->my_archive
303 && !bfd_is_thin_archive (abfd->my_archive))
304 abfd = abfd->my_archive;
305
5a98fb75
L
306 /* Close the file descriptor if there is no archive plugin file
307 descriptor. */
308 if (abfd->archive_plugin_fd == -1)
309 {
310 close (fd);
311 return;
312 }
313
7a30ac44 314 abfd->archive_plugin_fd_open_count--;
91817247
L
315 /* Dup the archive plugin file descriptor for later use, which
316 will be closed by _bfd_archive_close_and_cleanup. */
7a30ac44 317 if (abfd->archive_plugin_fd_open_count == 0)
91817247 318 {
7a30ac44 319 abfd->archive_plugin_fd = dup (fd);
91817247
L
320 close (fd);
321 }
322 }
323}
324
7d0b9ebc
AM
325static int
326try_claim (bfd *abfd)
327{
328 int claimed = 0;
329 struct ld_plugin_input_file file;
e44f5bef 330
27b07675 331 file.handle = abfd;
22fe7df8
L
332 if (bfd_plugin_open_input (abfd, &file)
333 && current_plugin->claim_file)
0aa99dcd
L
334 {
335 current_plugin->claim_file (&file, &claimed);
7a30ac44
L
336 bfd_plugin_close_file_descriptor ((abfd->my_archive != NULL
337 ? abfd : NULL),
338 file.fd);
0aa99dcd 339 }
22fe7df8 340
7d0b9ebc 341 return claimed;
e44f5bef
MT
342}
343
0a1b45a2
AM
344static bool
345try_load_plugin (const char *pname,
346 struct plugin_list_entry *plugin_list_iter,
347 bfd *abfd,
348 bool build_list_p)
e44f5bef 349{
dcf06b89 350 void *plugin_handle;
b21318bd 351 struct ld_plugin_tv tv[6];
ce3c775b
NC
352 int i;
353 ld_plugin_onload onload;
354 enum ld_plugin_status status;
0a1b45a2 355 bool result = false;
5ae0078c 356
22fe7df8
L
357 /* NB: Each object is independent. Reuse the previous plugin from
358 the last run will lead to wrong result. */
359 if (current_plugin)
dcf06b89
L
360 memset (current_plugin, 0,
361 offsetof (struct plugin_list_entry, next));
0aa99dcd 362
99845b3b
L
363 if (plugin_list_iter)
364 pname = plugin_list_iter->plugin_name;
365
ce3c775b
NC
366 plugin_handle = dlopen (pname, RTLD_NOW);
367 if (!plugin_handle)
368 {
13aa5ceb
NC
369 /* If we are building a list of viable plugins, then
370 we do not bother the user with the details of any
371 plugins that cannot be loaded. */
372 if (! build_list_p)
373 _bfd_error_handler ("Failed to load plugin '%s', reason: %s\n",
374 pname, dlerror ());
0a1b45a2 375 return false;
ce3c775b
NC
376 }
377
22fe7df8 378 if (plugin_list_iter == NULL)
b0ceb98a 379 {
22fe7df8
L
380 size_t length_plugin_name = strlen (pname) + 1;
381 char *plugin_name = bfd_malloc (length_plugin_name);
13aa5ceb 382
22fe7df8 383 if (plugin_name == NULL)
dcf06b89 384 goto short_circuit;
22fe7df8
L
385 plugin_list_iter = bfd_malloc (sizeof *plugin_list_iter);
386 if (plugin_list_iter == NULL)
4b24dd1a 387 {
22fe7df8 388 free (plugin_name);
dcf06b89 389 goto short_circuit;
4b24dd1a 390 }
22fe7df8
L
391 /* Make a copy of PNAME since PNAME from load_plugin () will be
392 freed. */
393 memcpy (plugin_name, pname, length_plugin_name);
394 memset (plugin_list_iter, 0, sizeof (*plugin_list_iter));
395 plugin_list_iter->plugin_name = plugin_name;
396 plugin_list_iter->next = plugin_list;
397 plugin_list = plugin_list_iter;
b0ceb98a
Z
398 }
399
dcf06b89 400 current_plugin = plugin_list_iter;
99845b3b 401 if (build_list_p)
dcf06b89 402 goto short_circuit;
0aa99dcd 403
ce3c775b
NC
404 onload = dlsym (plugin_handle, "onload");
405 if (!onload)
dcf06b89 406 goto short_circuit;
ce3c775b
NC
407
408 i = 0;
409 tv[i].tv_tag = LDPT_MESSAGE;
410 tv[i].tv_u.tv_message = message;
411
412 ++i;
413 tv[i].tv_tag = LDPT_REGISTER_CLAIM_FILE_HOOK;
414 tv[i].tv_u.tv_register_claim_file = register_claim_file;
415
b21318bd
JM
416 ++i;
417 tv[i].tv_tag = LDPT_REGISTER_CLAIM_FILE_HOOK_V2;
418 tv[i].tv_u.tv_register_claim_file_v2 = register_claim_file_v2;
419
ce3c775b
NC
420 ++i;
421 tv[i].tv_tag = LDPT_ADD_SYMBOLS;
422 tv[i].tv_u.tv_add_symbols = add_symbols;
423
c3a1714c
L
424 ++i;
425 tv[i].tv_tag = LDPT_ADD_SYMBOLS_V2;
426 tv[i].tv_u.tv_add_symbols = add_symbols_v2;
427
ce3c775b
NC
428 ++i;
429 tv[i].tv_tag = LDPT_NULL;
430 tv[i].tv_u.tv_val = 0;
431
0aa99dcd 432 /* LTO plugin will call handler hooks to set up plugin handlers. */
ce3c775b
NC
433 status = (*onload)(tv);
434
435 if (status != LDPS_OK)
dcf06b89 436 goto short_circuit;
b0ceb98a 437
5ae0078c
L
438 abfd->plugin_format = bfd_plugin_no;
439
0aa99dcd 440 if (!current_plugin->claim_file)
dcf06b89 441 goto short_circuit;
ce3c775b 442
e44f5bef 443 if (!try_claim (abfd))
dcf06b89 444 goto short_circuit;
e44f5bef 445
5ae0078c 446 abfd->plugin_format = bfd_plugin_yes;
0a1b45a2 447 result = true;
dcf06b89 448
dc1e8a47 449 short_circuit:
dcf06b89
L
450 dlclose (plugin_handle);
451 return result;
ce3c775b
NC
452}
453
5ae0078c 454/* There may be plugin libraries in lib/bfd-plugins. */
99845b3b 455static int has_plugin_list = -1;
5ae0078c 456
b21318bd 457static bfd_cleanup (*ld_plugin_object_p) (bfd *, bool);
5ae0078c 458
ce3c775b
NC
459static const char *plugin_name;
460
461void
462bfd_plugin_set_plugin (const char *p)
463{
464 plugin_name = p;
5ae0078c
L
465}
466
467/* Return TRUE if a plugin library is used. */
468
0a1b45a2 469bool
5ae0078c
L
470bfd_plugin_specified_p (void)
471{
99845b3b 472 return plugin_list != NULL;
5ae0078c
L
473}
474
7dc3990e
L
475/* Return TRUE if ABFD can be claimed by linker LTO plugin. */
476
0a1b45a2 477bool
7dc3990e
L
478bfd_link_plugin_object_p (bfd *abfd)
479{
480 if (ld_plugin_object_p)
b21318bd 481 return ld_plugin_object_p (abfd, false) != NULL;
0a1b45a2 482 return false;
7dc3990e
L
483}
484
5ae0078c
L
485extern const bfd_target plugin_vec;
486
487/* Return TRUE if TARGET is a pointer to plugin_vec. */
488
0a1b45a2 489bool
5ae0078c
L
490bfd_plugin_target_p (const bfd_target *target)
491{
492 return target == &plugin_vec;
493}
494
495/* Register OBJECT_P to be used by bfd_plugin_object_p. */
496
497void
b21318bd 498register_ld_plugin_object_p (bfd_cleanup (*object_p) (bfd *, bool))
5ae0078c
L
499{
500 ld_plugin_object_p = object_p;
ce3c775b
NC
501}
502
99845b3b
L
503static void
504build_plugin_list (bfd *abfd)
ce3c775b 505{
41f37a6f
AM
506 /* The intent was to search ${libdir}/bfd-plugins for plugins, but
507 unfortunately the original implementation wasn't precisely that
508 when configuring binutils using --libdir. Search in the proper
509 path first, then the old one for backwards compatibility. */
510 static const char *path[]
511 = { LIBDIR "/bfd-plugins", BINDIR "/../lib/bfd-plugins" };
512 struct stat last_st;
41f37a6f 513 unsigned int i;
ce3c775b 514
99845b3b
L
515 if (has_plugin_list >= 0)
516 return;
ce3c775b 517
41f37a6f
AM
518 /* Try not to search the same dir twice, by looking at st_dev and
519 st_ino for the dir. If we are on a file system that always sets
520 st_ino to zero or the actual st_ino is zero we might waste some
521 time, but that doesn't matter too much. */
522 last_st.st_dev = 0;
523 last_st.st_ino = 0;
524 for (i = 0; i < sizeof (path) / sizeof (path[0]); i++)
ce3c775b 525 {
41f37a6f
AM
526 char *plugin_dir = make_relative_prefix (plugin_program_name,
527 BINDIR,
528 path[i]);
529 if (plugin_dir)
530 {
531 struct stat st;
532 DIR *d;
533
534 if (stat (plugin_dir, &st) == 0
535 && S_ISDIR (st.st_mode)
536 && !(last_st.st_dev == st.st_dev
537 && last_st.st_ino == st.st_ino
538 && st.st_ino != 0)
539 && (d = opendir (plugin_dir)) != NULL)
540 {
541 struct dirent *ent;
542
543 last_st.st_dev = st.st_dev;
544 last_st.st_ino = st.st_ino;
545 while ((ent = readdir (d)) != NULL)
546 {
547 char *full_name;
548
549 full_name = concat (plugin_dir, "/", ent->d_name, NULL);
550 if (stat (full_name, &st) == 0 && S_ISREG (st.st_mode))
0a1b45a2 551 (void) try_load_plugin (full_name, NULL, abfd, true);
41f37a6f 552 free (full_name);
41f37a6f
AM
553 }
554 closedir (d);
555 }
556 free (plugin_dir);
557 }
ce3c775b
NC
558 }
559
99845b3b
L
560 has_plugin_list = plugin_list != NULL;
561}
562
0a1b45a2 563static bool
99845b3b
L
564load_plugin (bfd *abfd)
565{
566 struct plugin_list_entry *plugin_list_iter;
567
568 if (plugin_name)
0a1b45a2 569 return try_load_plugin (plugin_name, plugin_list, abfd, false);
99845b3b
L
570
571 if (plugin_program_name == NULL)
0a1b45a2 572 return false;
99845b3b
L
573
574 build_plugin_list (abfd);
575
576 for (plugin_list_iter = plugin_list;
577 plugin_list_iter;
578 plugin_list_iter = plugin_list_iter->next)
0a1b45a2
AM
579 if (try_load_plugin (NULL, plugin_list_iter, abfd, false))
580 return true;
99845b3b 581
0a1b45a2 582 return false;
ce3c775b
NC
583}
584
585
cb001c0d 586static bfd_cleanup
ce3c775b
NC
587bfd_plugin_object_p (bfd *abfd)
588{
5ae0078c 589 if (ld_plugin_object_p)
b21318bd 590 return ld_plugin_object_p (abfd, false);
5ae0078c 591
49f30d83 592 if (abfd->plugin_format == bfd_plugin_unknown && !load_plugin (abfd))
ce3c775b
NC
593 return NULL;
594
cb001c0d 595 return abfd->plugin_format == bfd_plugin_yes ? _bfd_no_cleanup : NULL;
ce3c775b
NC
596}
597
598/* Copy any private info we understand from the input bfd
599 to the output bfd. */
600
0a1b45a2 601static bool
ce3c775b
NC
602bfd_plugin_bfd_copy_private_bfd_data (bfd *ibfd ATTRIBUTE_UNUSED,
603 bfd *obfd ATTRIBUTE_UNUSED)
604{
605 BFD_ASSERT (0);
0a1b45a2 606 return true;
ce3c775b
NC
607}
608
609/* Copy any private info we understand from the input section
610 to the output section. */
611
0a1b45a2 612static bool
ce3c775b
NC
613bfd_plugin_bfd_copy_private_section_data (bfd *ibfd ATTRIBUTE_UNUSED,
614 asection *isection ATTRIBUTE_UNUSED,
615 bfd *obfd ATTRIBUTE_UNUSED,
616 asection *osection ATTRIBUTE_UNUSED)
617{
618 BFD_ASSERT (0);
0a1b45a2 619 return true;
ce3c775b
NC
620}
621
622/* Copy any private info we understand from the input symbol
623 to the output symbol. */
624
0a1b45a2 625static bool
ce3c775b
NC
626bfd_plugin_bfd_copy_private_symbol_data (bfd *ibfd ATTRIBUTE_UNUSED,
627 asymbol *isymbol ATTRIBUTE_UNUSED,
628 bfd *obfd ATTRIBUTE_UNUSED,
629 asymbol *osymbol ATTRIBUTE_UNUSED)
630{
631 BFD_ASSERT (0);
0a1b45a2 632 return true;
ce3c775b
NC
633}
634
0a1b45a2 635static bool
f3b9cfd1 636bfd_plugin_bfd_print_private_bfd_data (bfd *abfd ATTRIBUTE_UNUSED, void *ptr ATTRIBUTE_UNUSED)
ce3c775b
NC
637{
638 BFD_ASSERT (0);
0a1b45a2 639 return true;
ce3c775b
NC
640}
641
642static char *
643bfd_plugin_core_file_failing_command (bfd *abfd ATTRIBUTE_UNUSED)
644{
645 BFD_ASSERT (0);
646 return NULL;
647}
648
649static int
650bfd_plugin_core_file_failing_signal (bfd *abfd ATTRIBUTE_UNUSED)
261b8d08
PA
651{
652 BFD_ASSERT (0);
653 return 0;
654}
655
656static int
657bfd_plugin_core_file_pid (bfd *abfd ATTRIBUTE_UNUSED)
ce3c775b
NC
658{
659 BFD_ASSERT (0);
660 return 0;
661}
662
663static long
664bfd_plugin_get_symtab_upper_bound (bfd *abfd)
665{
666 struct plugin_data_struct *plugin_data = abfd->tdata.plugin_data;
667 long nsyms = plugin_data->nsyms;
668
669 BFD_ASSERT (nsyms >= 0);
670
671 return ((nsyms + 1) * sizeof (asymbol *));
672}
673
674static flagword
675convert_flags (const struct ld_plugin_symbol *sym)
676{
677 switch (sym->def)
68ffbac6 678 {
ce3c775b
NC
679 case LDPK_DEF:
680 case LDPK_COMMON:
681 case LDPK_UNDEF:
682 return BSF_GLOBAL;
683
684 case LDPK_WEAKUNDEF:
685 case LDPK_WEAKDEF:
686 return BSF_GLOBAL | BSF_WEAK;
687
688 default:
689 BFD_ASSERT (0);
690 return 0;
691 }
692}
693
694static long
695bfd_plugin_canonicalize_symtab (bfd *abfd,
696 asymbol **alocation)
697{
698 struct plugin_data_struct *plugin_data = abfd->tdata.plugin_data;
699 long nsyms = plugin_data->nsyms;
700 const struct ld_plugin_symbol *syms = plugin_data->syms;
c3a1714c
L
701 static asection fake_text_section
702 = BFD_FAKE_SECTION (fake_text_section, NULL, "plug", 0,
a288c270 703 SEC_ALLOC | SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS);
c3a1714c
L
704 static asection fake_data_section
705 = BFD_FAKE_SECTION (fake_data_section, NULL, "plug", 0,
706 SEC_ALLOC | SEC_LOAD | SEC_DATA | SEC_HAS_CONTENTS);
707 static asection fake_bss_section
708 = BFD_FAKE_SECTION (fake_bss_section, NULL, "plug", 0,
709 SEC_ALLOC);
a288c270
AM
710 static asection fake_common_section
711 = BFD_FAKE_SECTION (fake_common_section, NULL, "plug", 0, SEC_IS_COMMON);
3d98c460 712 int i;
ce3c775b 713
ce3c775b
NC
714 for (i = 0; i < nsyms; i++)
715 {
68ffbac6 716 asymbol *s = bfd_alloc (abfd, sizeof (asymbol));
ce3c775b
NC
717
718 BFD_ASSERT (s);
719 alocation[i] = s;
720
721 s->the_bfd = abfd;
722 s->name = syms[i].name;
723 s->value = 0;
724 s->flags = convert_flags (&syms[i]);
725 switch (syms[i].def)
726 {
727 case LDPK_COMMON:
728 s->section = &fake_common_section;
729 break;
730 case LDPK_UNDEF:
731 case LDPK_WEAKUNDEF:
732 s->section = bfd_und_section_ptr;
733 break;
734 case LDPK_DEF:
735 case LDPK_WEAKDEF:
c3a1714c
L
736 if (current_plugin->has_symbol_type)
737 switch (syms[i].symbol_type)
738 {
b5ffa918
NC
739 default:
740 /* FIXME: Should we issue an error here ? */
c3a1714c
L
741 case LDST_UNKNOWN:
742 /* What is the best fake section for LDST_UNKNOWN? */
743 case LDST_FUNCTION:
744 s->section = &fake_text_section;
745 break;
746 case LDST_VARIABLE:
747 if (syms[i].section_kind == LDSSK_BSS)
748 s->section = &fake_bss_section;
749 else
750 s->section = &fake_data_section;
751 break;
752 }
753 else
3d98c460 754 s->section = &fake_text_section;
ce3c775b
NC
755 break;
756 default:
757 BFD_ASSERT (0);
758 }
759
760 s->udata.p = (void *) &syms[i];
761 }
762
763 return nsyms;
764}
765
766static void
767bfd_plugin_print_symbol (bfd *abfd ATTRIBUTE_UNUSED,
f3b9cfd1 768 void *afile ATTRIBUTE_UNUSED,
ce3c775b
NC
769 asymbol *symbol ATTRIBUTE_UNUSED,
770 bfd_print_symbol_type how ATTRIBUTE_UNUSED)
771{
772 BFD_ASSERT (0);
773}
774
775static void
776bfd_plugin_get_symbol_info (bfd *abfd ATTRIBUTE_UNUSED,
777 asymbol *symbol,
778 symbol_info *ret)
779{
780 bfd_symbol_info (symbol, ret);
781}
782
783/* Make an empty symbol. */
784
785static asymbol *
786bfd_plugin_make_empty_symbol (bfd *abfd)
787{
d3ce72d0
NC
788 asymbol *new_symbol = bfd_zalloc (abfd, sizeof (asymbol));
789 if (new_symbol == NULL)
790 return new_symbol;
791 new_symbol->the_bfd = abfd;
792 return new_symbol;
ce3c775b
NC
793}
794
795static int
796bfd_plugin_sizeof_headers (bfd *a ATTRIBUTE_UNUSED,
797 struct bfd_link_info *info ATTRIBUTE_UNUSED)
798{
799 BFD_ASSERT (0);
800 return 0;
801}
802
ce3c775b
NC
803const bfd_target plugin_vec =
804{
805 "plugin", /* Name. */
806 bfd_target_unknown_flavour,
807 BFD_ENDIAN_LITTLE, /* Target byte order. */
808 BFD_ENDIAN_LITTLE, /* Target headers byte order. */
809 (HAS_RELOC | EXEC_P | /* Object flags. */
810 HAS_LINENO | HAS_DEBUG |
811 HAS_SYMS | HAS_LOCALS | DYNAMIC | WP_TEXT | D_PAGED),
812 (SEC_CODE | SEC_DATA | SEC_ROM | SEC_HAS_CONTENTS
813 | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* Section flags. */
814 0, /* symbol_leading_char. */
815 '/', /* ar_pad_char. */
816 15, /* ar_max_namelen. */
64bfc258 817 255, /* match priority. */
d1bcae83 818 TARGET_KEEP_UNUSED_SECTION_SYMBOLS, /* keep unused section symbols. */
ce3c775b
NC
819
820 bfd_getl64, bfd_getl_signed_64, bfd_putl64,
821 bfd_getl32, bfd_getl_signed_32, bfd_putl32,
822 bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* data */
823 bfd_getl64, bfd_getl_signed_64, bfd_putl64,
824 bfd_getl32, bfd_getl_signed_32, bfd_putl32,
825 bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* hdrs */
826
827 { /* bfd_check_format. */
828 _bfd_dummy_target,
829 bfd_plugin_object_p,
830 bfd_generic_archive_p,
831 _bfd_dummy_target
832 },
833 { /* bfd_set_format. */
d00dd7dc
AM
834 _bfd_bool_bfd_false_error,
835 _bfd_bool_bfd_false_error,
ce3c775b 836 _bfd_generic_mkarchive,
d00dd7dc 837 _bfd_bool_bfd_false_error,
ce3c775b
NC
838 },
839 { /* bfd_write_contents. */
d00dd7dc
AM
840 _bfd_bool_bfd_false_error,
841 _bfd_bool_bfd_false_error,
ce3c775b 842 _bfd_write_archive_contents,
d00dd7dc 843 _bfd_bool_bfd_false_error,
ce3c775b
NC
844 },
845
846 BFD_JUMP_TABLE_GENERIC (bfd_plugin),
847 BFD_JUMP_TABLE_COPY (bfd_plugin),
848 BFD_JUMP_TABLE_CORE (bfd_plugin),
e6cc316a
L
849#ifdef USE_64_BIT_ARCHIVE
850 BFD_JUMP_TABLE_ARCHIVE (_bfd_archive_64_bit),
851#else
ce3c775b 852 BFD_JUMP_TABLE_ARCHIVE (_bfd_archive_coff),
e6cc316a 853#endif
ce3c775b
NC
854 BFD_JUMP_TABLE_SYMBOLS (bfd_plugin),
855 BFD_JUMP_TABLE_RELOCS (_bfd_norelocs),
856 BFD_JUMP_TABLE_WRITE (bfd_plugin),
857 BFD_JUMP_TABLE_LINK (bfd_plugin),
858 BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
859
860 NULL,
861
07d6d2b8 862 NULL /* backend_data. */
ce3c775b 863};
1e927850 864#endif /* BFD_SUPPORTS_PLUGINS */