1 /* libdeps plugin for the GNU linker.
2 Copyright (C) 2020-2021 Free Software Foundation, Inc.
4 This file is part of the GNU Binutils.
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.
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.
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. */
23 #if BFD_SUPPORTS_PLUGINS
24 #include "plugin-api.h"
26 #include <ctype.h> /* For isspace. */
28 extern enum ld_plugin_status
onload (struct ld_plugin_tv
*tv
);
30 /* Helper for calling plugin api message function. */
31 #define TV_MESSAGE if (tv_message) (*tv_message)
33 /* Function pointers to cache hooks passed at onload time. */
34 static ld_plugin_register_claim_file tv_register_claim_file
= 0;
35 static ld_plugin_register_all_symbols_read tv_register_all_symbols_read
= 0;
36 static ld_plugin_register_cleanup tv_register_cleanup
= 0;
37 static ld_plugin_message tv_message
= 0;
38 static ld_plugin_add_input_library tv_add_input_library
= 0;
39 static ld_plugin_set_extra_library_path tv_set_extra_library_path
= 0;
41 /* Handle/record information received in a transfer vector entry. */
42 static enum ld_plugin_status
43 parse_tv_tag (struct ld_plugin_tv
*tv
)
45 #define SETVAR(x) x = tv->tv_u.x
48 case LDPT_REGISTER_CLAIM_FILE_HOOK
:
49 SETVAR(tv_register_claim_file
);
51 case LDPT_REGISTER_ALL_SYMBOLS_READ_HOOK
:
52 SETVAR(tv_register_all_symbols_read
);
54 case LDPT_REGISTER_CLEANUP_HOOK
:
55 SETVAR(tv_register_cleanup
);
60 case LDPT_ADD_INPUT_LIBRARY
:
61 SETVAR(tv_add_input_library
);
63 case LDPT_SET_EXTRA_LIBRARY_PATH
:
64 SETVAR(tv_set_extra_library_path
);
73 /* Defs for archive parsing. */
86 typedef struct linerec
92 #define LIBDEPS "__.LIBDEP/ "
94 static linerec
*line_head
, **line_tail
= &line_head
;
96 static enum ld_plugin_status
103 enum ld_plugin_status rc
= LDPS_NO_SYMS
;
105 lseek (fd
, ARMAGSIZE
, SEEK_SET
);
108 len
= read (fd
, (void *) &ah
, sizeof (ah
));
109 if (len
!= sizeof (ah
))
111 mlen
= strtoul (ah
.ar_size
, NULL
, 10);
112 if (!mlen
|| strncmp (ah
.ar_name
, LIBDEPS
, sizeof (LIBDEPS
)-1))
114 lseek (fd
, mlen
, SEEK_CUR
);
117 lr
= malloc (sizeof (linerec
) + mlen
);
121 len
= read (fd
, lr
->line
, mlen
);
122 lr
->line
[mlen
-1] = '\0';
124 line_tail
= &lr
->next
;
131 /* Turn a string into an argvec. */
136 char *s
, *first
, *end
;
140 end
= in
+ strlen (in
);
142 while (isspace (*s
)) s
++;
146 while ((s
= strchr (s
, ' ')))
151 res
= (char **)malloc ((i
+1) * sizeof (char *));
159 for (s
= first
; *s
; s
++)
163 memmove (s
, s
+1, end
-s
-1);
171 while (isspace (*s
)) s
++;
175 if (*s
== '\'' && !dq
)
179 memmove (sq
, sq
+1, s
-sq
-1);
180 memmove (s
-2, s
+1, end
-s
-1);
190 if (*s
== '"' && !sq
)
194 memmove (dq
, dq
+1, s
-dq
-1);
195 memmove (s
-2, s
+1, end
-s
-1);
210 static char *prevfile
;
212 /* Standard plugin API registerable hook. */
213 static enum ld_plugin_status
214 onclaim_file (const struct ld_plugin_input_file
*file
, int *claimed
)
216 enum ld_plugin_status rv
;
220 /* If we've already seen this file, ignore it. */
221 if (prevfile
&& !strcmp (file
->name
, prevfile
))
224 /* If it's not an archive member, ignore it. */
231 prevfile
= strdup (file
->name
);
235 /* This hook only gets called on actual object files.
236 * We have to examine the archive ourselves, to find
237 * our LIBDEPS member. */
238 rv
= get_libdeps (file
->fd
);
244 linerec
*lr
= (linerec
*)line_tail
;
245 /* Inform the user/testsuite. */
246 TV_MESSAGE (LDPL_INFO
, "got deps for library %s: %s",
247 file
->name
, lr
->line
);
254 /* Standard plugin API registerable hook. */
255 static enum ld_plugin_status
256 onall_symbols_read (void)
260 enum ld_plugin_status rv
= LDPS_OK
;
262 while ((lr
= line_head
))
264 line_head
= lr
->next
;
265 vec
= str2vec (lr
->line
);
269 for (i
= 0; vec
[i
]; i
++)
271 if (vec
[i
][0] != '-')
273 TV_MESSAGE (LDPL_WARNING
, "ignoring libdep argument %s",
278 if (vec
[i
][1] == 'l')
279 rv
= tv_add_input_library (vec
[i
]+2);
280 else if (vec
[i
][1] == 'L')
281 rv
= tv_set_extra_library_path (vec
[i
]+2);
284 TV_MESSAGE (LDPL_WARNING
, "ignoring libdep argument %s",
299 /* Standard plugin API registerable hook. */
300 static enum ld_plugin_status
311 while ((lr
= line_head
))
313 line_head
= lr
->next
;
321 /* Standard plugin API entry point. */
322 enum ld_plugin_status
323 onload (struct ld_plugin_tv
*tv
)
325 enum ld_plugin_status rv
;
327 /* This plugin requires a valid tv array. */
331 /* First entry should always be LDPT_MESSAGE, letting us get
332 hold of it easily so we can send output straight away. */
333 if (tv
[0].tv_tag
== LDPT_MESSAGE
)
334 tv_message
= tv
[0].tv_u
.tv_message
;
337 if ((rv
= parse_tv_tag (tv
)) != LDPS_OK
)
339 while ((tv
++)->tv_tag
!= LDPT_NULL
);
341 /* Register hooks. */
342 if (tv_register_claim_file
343 && tv_register_all_symbols_read
344 && tv_register_cleanup
)
346 (*tv_register_claim_file
) (onclaim_file
);
347 (*tv_register_all_symbols_read
) (onall_symbols_read
);
348 (*tv_register_cleanup
) (oncleanup
);
353 #endif /* BFD_SUPPORTS_PLUGINS */