1 // main.cc -- gold main function.
3 // Copyright (C) 2006-2019 Free Software Foundation, Inc.
4 // Written by Ian Lance Taylor <iant@google.com>.
6 // This file is part of gold.
8 // This program is free software; you can redistribute it and/or modify
9 // it under the terms of the GNU General Public License as published by
10 // the Free Software Foundation; either version 3 of the License, or
11 // (at your option) any later version.
13 // This program is distributed in the hope that it will be useful,
14 // but WITHOUT ANY WARRANTY; without even the implied warranty of
15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 // GNU General Public License for more details.
18 // You should have received a copy of the GNU General Public License
19 // along with this program; if not, write to the Free Software
20 // Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
21 // MA 02110-1301, USA.
32 #include "libiberty.h"
36 #include "target-select.h"
37 #include "parameters.h"
40 #include "dirsearch.h"
41 #include "workqueue.h"
49 #include "incremental.h"
50 #include "gdb-index.h"
55 // This function emits the commandline to a hard-coded file in temp.
56 // This is useful for debugging since ld is typically invoked by gcc,
57 // so its commandline is not always easy to extract. You should be
58 // able to run 'gcc -B... foo.o -o foo' to invoke this linker the
59 // first time, and then /tmp/ld-run-foo.sh to invoke it on subsequent
60 // runes. "/tmp/ld-run-foo.sh debug" will run the linker inside gdb
61 // (or whatever value the environment variable GDB is set to), for
62 // even easier debugging. Since this is a debugging-only tool, and
63 // creates files, it is only turned on when the user explicitly asks
64 // for it, by compiling with -DDEBUG. Do not do this for release
65 // versions of the linker!
69 #include <sys/stat.h> // for chmod()
72 collect_argv(int argc
, char** argv
)
74 // This is used by write_debug_script(), which wants the unedited argv.
76 for (int i
= 0; i
< argc
; ++i
)
79 // Now append argv[i], but with all single-quotes escaped
80 const char* argpos
= argv
[i
];
83 const int len
= strcspn(argpos
, "'");
84 args
.append(argpos
, len
);
85 if (argpos
[len
] == '\0')
87 args
.append("'\"'\"'");
96 write_debug_script(std::string filename_str
,
97 const char* argv_0
, const char* args
)
99 size_t slash
= filename_str
.rfind('/');
100 if (slash
!= std::string::npos
)
101 filename_str
= filename_str
.c_str() + slash
+ 1;
102 filename_str
= std::string("/tmp/ld-run-") + filename_str
+ ".sh";
103 const char* filename
= filename_str
.c_str();
104 FILE* fp
= fopen(filename
, "w");
107 fprintf(fp
, "[ \"$1\" = debug ]"
108 " && PREFIX=\"${GDB-gdb} --annotate=3 --fullname %s --args\""
111 fprintf(fp
, "$PREFIX%s $*\n", args
);
113 chmod(filename
, 0755);
117 fprintf(stderr
, "Welcome to gold! Commandline written to %s.\n", filename
);
121 #else // !defined(DEBUG)
123 static inline std::string
124 collect_argv(int, char**)
130 write_debug_script(std::string
, const char*, const char*)
134 #endif // !defined(DEBUG)
138 main(int argc
, char** argv
)
140 #if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
141 setlocale(LC_MESSAGES
, "");
143 #if defined (HAVE_SETLOCALE)
144 setlocale(LC_CTYPE
, "");
146 bindtextdomain(PACKAGE
, LOCALEDIR
);
149 program_name
= argv
[0];
151 // In libiberty; expands @filename to the args in "filename".
152 expandargv(&argc
, &argv
);
154 // This is used by write_debug_script(), which wants the unedited argv.
155 std::string args
= collect_argv(argc
, argv
);
157 Errors
errors(program_name
);
159 // Initialize the global parameters, to let random code get to the
161 set_parameters_errors(&errors
);
163 // Handle the command line options.
164 Command_line command_line
;
165 command_line
.process(argc
- 1, const_cast<const char**>(argv
+ 1));
168 if (command_line
.options().stats())
171 set_parameters_timer(&timer
);
174 // Store some options in the globally accessible parameters.
175 set_parameters_options(&command_line
.options());
177 // Do this as early as possible (since it prints a welcome message).
178 write_debug_script(command_line
.options().output_file_name(),
179 program_name
, args
.c_str());
181 // If the user asked for a map file, open it.
182 Mapfile
* mapfile
= NULL
;
183 if (command_line
.options().user_set_Map())
185 mapfile
= new Mapfile();
186 if (!mapfile
->open(command_line
.options().Map()))
193 // The GNU linker ignores version scripts when generating
194 // relocatable output. If we are not compatible, then we break the
195 // Linux kernel build, which uses a linker script with -r which must
196 // not force symbols to be local. It would actually be useful to
197 // permit symbols to be forced local with -r, though, as it would
198 // permit some linker optimizations. Perhaps we need yet another
199 // option to control this. FIXME.
200 if (parameters
->options().relocatable())
201 command_line
.script_options().version_script_info()->clear();
204 Workqueue
workqueue(command_line
.options());
206 // The list of input objects.
207 Input_objects input_objects
;
209 // The Garbage Collection (GC, --gc-sections) Object.
210 Garbage_collection gc
;
212 // The Identical Code Folding (ICF, --icf) Object.
215 // The symbol table. We're going to guess here how many symbols
216 // we're going to see based on the number of input files. Even when
217 // this is off, it means at worst we don't quite optimize hashtable
218 // resizing as well as we could have (perhaps using more memory).
219 Symbol_table
symtab(command_line
.number_of_input_files() * 1024,
220 command_line
.version_script());
222 if (parameters
->options().gc_sections())
225 if (parameters
->options().icf_enabled())
226 symtab
.set_icf(&icf
);
228 // The layout object.
229 Layout
layout(command_line
.number_of_input_files(),
230 &command_line
.script_options());
232 if (layout
.incremental_inputs() != NULL
)
233 layout
.incremental_inputs()->report_command_line(argc
, argv
);
235 if (parameters
->options().section_ordering_file())
236 layout
.read_layout_from_file();
238 // Load plugin libraries.
239 if (command_line
.options().has_plugins())
240 command_line
.options().plugins()->load_plugins(&layout
);
242 // Get the search path from the -L options.
243 Dirsearch search_path
;
244 search_path
.initialize(&workqueue
, &command_line
.options().library_path());
246 // Queue up the first set of tasks.
247 queue_initial_tasks(command_line
.options(), search_path
,
248 command_line
, &workqueue
, &input_objects
,
249 &symtab
, &layout
, mapfile
);
251 // Run the main task processing loop.
252 workqueue
.process(0);
254 if (command_line
.options().print_output_format())
255 print_output_format();
257 if (command_line
.options().stats())
260 Timer::TimeStats elapsed
= timer
.get_pass_time(0);
262 _("%s: initial tasks run time: " \
263 "(user: %ld.%06ld sys: %ld.%06ld wall: %ld.%06ld)\n"),
265 elapsed
.user
/ 1000, (elapsed
.user
% 1000) * 1000,
266 elapsed
.sys
/ 1000, (elapsed
.sys
% 1000) * 1000,
267 elapsed
.wall
/ 1000, (elapsed
.wall
% 1000) * 1000);
268 elapsed
= timer
.get_pass_time(1);
270 _("%s: middle tasks run time: " \
271 "(user: %ld.%06ld sys: %ld.%06ld wall: %ld.%06ld)\n"),
273 elapsed
.user
/ 1000, (elapsed
.user
% 1000) * 1000,
274 elapsed
.sys
/ 1000, (elapsed
.sys
% 1000) * 1000,
275 elapsed
.wall
/ 1000, (elapsed
.wall
% 1000) * 1000);
276 elapsed
= timer
.get_pass_time(2);
278 _("%s: final tasks run time: " \
279 "(user: %ld.%06ld sys: %ld.%06ld wall: %ld.%06ld)\n"),
281 elapsed
.user
/ 1000, (elapsed
.user
% 1000) * 1000,
282 elapsed
.sys
/ 1000, (elapsed
.sys
% 1000) * 1000,
283 elapsed
.wall
/ 1000, (elapsed
.wall
% 1000) * 1000);
284 elapsed
= timer
.get_elapsed_time();
286 _("%s: total run time: " \
287 "(user: %ld.%06ld sys: %ld.%06ld wall: %ld.%06ld)\n"),
289 elapsed
.user
/ 1000, (elapsed
.user
% 1000) * 1000,
290 elapsed
.sys
/ 1000, (elapsed
.sys
% 1000) * 1000,
291 elapsed
.wall
/ 1000, (elapsed
.wall
% 1000) * 1000);
294 struct mallinfo m
= mallinfo();
295 fprintf(stderr
, _("%s: total space allocated by malloc: %lld bytes\n"),
296 program_name
, static_cast<long long>(m
.arena
));
298 File_read::print_stats();
299 Archive::print_stats();
300 Lib_group::print_stats();
301 fprintf(stderr
, _("%s: output file size: %lld bytes\n"),
302 program_name
, static_cast<long long>(layout
.output_file_size()));
303 symtab
.print_stats();
304 layout
.print_stats();
305 Gdb_index::print_stats();
306 Free_list::print_stats();
309 // Issue defined symbol report.
310 if (command_line
.options().user_set_print_symbol_counts())
311 input_objects
.print_symbol_counts(&symtab
);
313 // Output cross reference table.
314 if (command_line
.options().cref())
315 input_objects
.print_cref(&symtab
,
316 mapfile
== NULL
? stdout
: mapfile
->file());
321 if (parameters
->options().fatal_warnings()
322 && errors
.warning_count() > 0
323 && errors
.error_count() == 0)
324 gold_error("treating warnings as errors");
326 // If the user used --noinhibit-exec, we force the exit status to be
327 // successful. This is compatible with GNU ld.
328 gold_exit((errors
.error_count() == 0
329 || parameters
->options().noinhibit_exec())