* output.h (Output_reloc::Output_reloc <output section>): Add
[deliverable/binutils-gdb.git] / gold / layout.cc
CommitLineData
a2fb1b05
ILT
1// layout.cc -- lay out output file sections for gold
2
2e702c99
RM
3// Copyright 2006, 2007, 2008, 2009, 2010, 2011, 2012
4// Free Software Foundation, Inc.
6cb15b7f
ILT
5// Written by Ian Lance Taylor <iant@google.com>.
6
7// This file is part of gold.
8
9// This program is free software; you can redistribute it and/or modify
10// it under the terms of the GNU General Public License as published by
11// the Free Software Foundation; either version 3 of the License, or
12// (at your option) any later version.
13
14// This program is distributed in the hope that it will be useful,
15// but WITHOUT ANY WARRANTY; without even the implied warranty of
16// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17// GNU General Public License for more details.
18
19// You should have received a copy of the GNU General Public License
20// along with this program; if not, write to the Free Software
21// Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
22// MA 02110-1301, USA.
23
a2fb1b05
ILT
24#include "gold.h"
25
8ed814a9 26#include <cerrno>
a2fb1b05 27#include <cstring>
54dc6425 28#include <algorithm>
a2fb1b05 29#include <iostream>
6e9ba2ca 30#include <fstream>
a2fb1b05 31#include <utility>
8ed814a9 32#include <fcntl.h>
6e9ba2ca 33#include <fnmatch.h>
8ed814a9
ILT
34#include <unistd.h>
35#include "libiberty.h"
36#include "md5.h"
37#include "sha1.h"
a2fb1b05 38
7e1edb90 39#include "parameters.h"
14144f39 40#include "options.h"
7d9e3d98 41#include "mapfile.h"
a445fddf
ILT
42#include "script.h"
43#include "script-sections.h"
a2fb1b05 44#include "output.h"
f6ce93d6 45#include "symtab.h"
a3ad94ed 46#include "dynobj.h"
3151305a 47#include "ehframe.h"
c1027032 48#include "gdb-index.h"
96803768 49#include "compressed_output.h"
62b01cb5 50#include "reduced_debug_output.h"
487b39df 51#include "object.h"
6a74a719 52#include "reloc.h"
2a00e4fb 53#include "descriptors.h"
2756a258 54#include "plugin.h"
3ce2c28e
ILT
55#include "incremental.h"
56#include "layout.h"
a2fb1b05
ILT
57
58namespace gold
59{
60
cdc29364
CC
61// Class Free_list.
62
63// The total number of free lists used.
64unsigned int Free_list::num_lists = 0;
65// The total number of free list nodes used.
66unsigned int Free_list::num_nodes = 0;
67// The total number of calls to Free_list::remove.
68unsigned int Free_list::num_removes = 0;
69// The total number of nodes visited during calls to Free_list::remove.
70unsigned int Free_list::num_remove_visits = 0;
71// The total number of calls to Free_list::allocate.
72unsigned int Free_list::num_allocates = 0;
73// The total number of nodes visited during calls to Free_list::allocate.
74unsigned int Free_list::num_allocate_visits = 0;
75
76// Initialize the free list. Creates a single free list node that
77// describes the entire region of length LEN. If EXTEND is true,
78// allocate() is allowed to extend the region beyond its initial
79// length.
80
81void
82Free_list::init(off_t len, bool extend)
83{
84 this->list_.push_front(Free_list_node(0, len));
85 this->last_remove_ = this->list_.begin();
86 this->extend_ = extend;
87 this->length_ = len;
88 ++Free_list::num_lists;
89 ++Free_list::num_nodes;
90}
91
92// Remove a chunk from the free list. Because we start with a single
93// node that covers the entire section, and remove chunks from it one
94// at a time, we do not need to coalesce chunks or handle cases that
95// span more than one free node. We expect to remove chunks from the
96// free list in order, and we expect to have only a few chunks of free
97// space left (corresponding to files that have changed since the last
98// incremental link), so a simple linear list should provide sufficient
99// performance.
100
101void
102Free_list::remove(off_t start, off_t end)
103{
104 if (start == end)
105 return;
106 gold_assert(start < end);
107
108 ++Free_list::num_removes;
109
110 Iterator p = this->last_remove_;
111 if (p->start_ > start)
112 p = this->list_.begin();
113
114 for (; p != this->list_.end(); ++p)
115 {
116 ++Free_list::num_remove_visits;
117 // Find a node that wholly contains the indicated region.
118 if (p->start_ <= start && p->end_ >= end)
119 {
120 // Case 1: the indicated region spans the whole node.
121 // Add some fuzz to avoid creating tiny free chunks.
122 if (p->start_ + 3 >= start && p->end_ <= end + 3)
123 p = this->list_.erase(p);
124 // Case 2: remove a chunk from the start of the node.
125 else if (p->start_ + 3 >= start)
126 p->start_ = end;
127 // Case 3: remove a chunk from the end of the node.
128 else if (p->end_ <= end + 3)
129 p->end_ = start;
130 // Case 4: remove a chunk from the middle, and split
131 // the node into two.
132 else
133 {
134 Free_list_node newnode(p->start_, start);
135 p->start_ = end;
136 this->list_.insert(p, newnode);
137 ++Free_list::num_nodes;
138 }
139 this->last_remove_ = p;
140 return;
141 }
142 }
143
144 // Did not find a node containing the given chunk. This could happen
145 // because a small chunk was already removed due to the fuzz.
146 gold_debug(DEBUG_INCREMENTAL,
147 "Free_list::remove(%d,%d) not found",
148 static_cast<int>(start), static_cast<int>(end));
149}
150
151// Allocate a chunk of size LEN from the free list. Returns -1ULL
152// if a sufficiently large chunk of free space is not found.
153// We use a simple first-fit algorithm.
154
155off_t
156Free_list::allocate(off_t len, uint64_t align, off_t minoff)
157{
158 gold_debug(DEBUG_INCREMENTAL,
2e702c99
RM
159 "Free_list::allocate(%08lx, %d, %08lx)",
160 static_cast<long>(len), static_cast<int>(align),
161 static_cast<long>(minoff));
cdc29364
CC
162 if (len == 0)
163 return align_address(minoff, align);
164
165 ++Free_list::num_allocates;
166
8ea8cd50
CC
167 // We usually want to drop free chunks smaller than 4 bytes.
168 // If we need to guarantee a minimum hole size, though, we need
169 // to keep track of all free chunks.
170 const int fuzz = this->min_hole_ > 0 ? 0 : 3;
171
cdc29364
CC
172 for (Iterator p = this->list_.begin(); p != this->list_.end(); ++p)
173 {
174 ++Free_list::num_allocate_visits;
175 off_t start = p->start_ > minoff ? p->start_ : minoff;
176 start = align_address(start, align);
177 off_t end = start + len;
9fbd3822
CC
178 if (end > p->end_ && p->end_ == this->length_ && this->extend_)
179 {
180 this->length_ = end;
181 p->end_ = end;
182 }
8ea8cd50 183 if (end == p->end_ || (end <= p->end_ - this->min_hole_))
cdc29364 184 {
8ea8cd50 185 if (p->start_ + fuzz >= start && p->end_ <= end + fuzz)
cdc29364 186 this->list_.erase(p);
8ea8cd50 187 else if (p->start_ + fuzz >= start)
cdc29364 188 p->start_ = end;
8ea8cd50 189 else if (p->end_ <= end + fuzz)
cdc29364
CC
190 p->end_ = start;
191 else
192 {
193 Free_list_node newnode(p->start_, start);
194 p->start_ = end;
195 this->list_.insert(p, newnode);
196 ++Free_list::num_nodes;
197 }
198 return start;
199 }
200 }
9fbd3822
CC
201 if (this->extend_)
202 {
203 off_t start = align_address(this->length_, align);
204 this->length_ = start + len;
205 return start;
206 }
cdc29364
CC
207 return -1;
208}
209
210// Dump the free list (for debugging).
211void
212Free_list::dump()
213{
214 gold_info("Free list:\n start end length\n");
215 for (Iterator p = this->list_.begin(); p != this->list_.end(); ++p)
216 gold_info(" %08lx %08lx %08lx", static_cast<long>(p->start_),
217 static_cast<long>(p->end_),
218 static_cast<long>(p->end_ - p->start_));
219}
220
221// Print the statistics for the free lists.
222void
223Free_list::print_stats()
224{
225 fprintf(stderr, _("%s: total free lists: %u\n"),
2e702c99 226 program_name, Free_list::num_lists);
cdc29364 227 fprintf(stderr, _("%s: total free list nodes: %u\n"),
2e702c99 228 program_name, Free_list::num_nodes);
cdc29364 229 fprintf(stderr, _("%s: calls to Free_list::remove: %u\n"),
2e702c99 230 program_name, Free_list::num_removes);
cdc29364 231 fprintf(stderr, _("%s: nodes visited: %u\n"),
2e702c99 232 program_name, Free_list::num_remove_visits);
cdc29364 233 fprintf(stderr, _("%s: calls to Free_list::allocate: %u\n"),
2e702c99 234 program_name, Free_list::num_allocates);
cdc29364 235 fprintf(stderr, _("%s: nodes visited: %u\n"),
2e702c99 236 program_name, Free_list::num_allocate_visits);
cdc29364
CC
237}
238
20e6d0d6
DK
239// Layout::Relaxation_debug_check methods.
240
241// Check that sections and special data are in reset states.
242// We do not save states for Output_sections and special Output_data.
243// So we check that they have not assigned any addresses or offsets.
244// clean_up_after_relaxation simply resets their addresses and offsets.
245void
246Layout::Relaxation_debug_check::check_output_data_for_reset_values(
247 const Layout::Section_list& sections,
248 const Layout::Data_list& special_outputs)
249{
250 for(Layout::Section_list::const_iterator p = sections.begin();
251 p != sections.end();
252 ++p)
253 gold_assert((*p)->address_and_file_offset_have_reset_values());
254
255 for(Layout::Data_list::const_iterator p = special_outputs.begin();
256 p != special_outputs.end();
257 ++p)
258 gold_assert((*p)->address_and_file_offset_have_reset_values());
259}
2e702c99 260
20e6d0d6
DK
261// Save information of SECTIONS for checking later.
262
263void
264Layout::Relaxation_debug_check::read_sections(
265 const Layout::Section_list& sections)
266{
267 for(Layout::Section_list::const_iterator p = sections.begin();
268 p != sections.end();
269 ++p)
270 {
271 Output_section* os = *p;
272 Section_info info;
273 info.output_section = os;
274 info.address = os->is_address_valid() ? os->address() : 0;
275 info.data_size = os->is_data_size_valid() ? os->data_size() : -1;
276 info.offset = os->is_offset_valid()? os->offset() : -1 ;
277 this->section_infos_.push_back(info);
278 }
279}
280
281// Verify SECTIONS using previously recorded information.
282
283void
284Layout::Relaxation_debug_check::verify_sections(
285 const Layout::Section_list& sections)
286{
287 size_t i = 0;
288 for(Layout::Section_list::const_iterator p = sections.begin();
289 p != sections.end();
290 ++p, ++i)
291 {
292 Output_section* os = *p;
293 uint64_t address = os->is_address_valid() ? os->address() : 0;
294 off_t data_size = os->is_data_size_valid() ? os->data_size() : -1;
295 off_t offset = os->is_offset_valid()? os->offset() : -1 ;
296
297 if (i >= this->section_infos_.size())
298 {
299 gold_fatal("Section_info of %s missing.\n", os->name());
300 }
301 const Section_info& info = this->section_infos_[i];
302 if (os != info.output_section)
303 gold_fatal("Section order changed. Expecting %s but see %s\n",
304 info.output_section->name(), os->name());
305 if (address != info.address
306 || data_size != info.data_size
307 || offset != info.offset)
308 gold_fatal("Section %s changed.\n", os->name());
309 }
310}
311
92e059d8 312// Layout_task_runner methods.
a2fb1b05
ILT
313
314// Lay out the sections. This is called after all the input objects
315// have been read.
316
317void
17a1d0a9 318Layout_task_runner::run(Workqueue* workqueue, const Task* task)
a2fb1b05 319{
94a3fc8b
CC
320 Layout* layout = this->layout_;
321 off_t file_size = layout->finalize(this->input_objects_,
322 this->symtab_,
2e702c99 323 this->target_,
94a3fc8b 324 task);
61ba1cf9
ILT
325
326 // Now we know the final size of the output file and we know where
327 // each piece of information goes.
7d9e3d98
ILT
328
329 if (this->mapfile_ != NULL)
330 {
331 this->mapfile_->print_discarded_sections(this->input_objects_);
94a3fc8b 332 layout->print_to_mapfile(this->mapfile_);
7d9e3d98
ILT
333 }
334
cdc29364 335 Output_file* of;
94a3fc8b 336 if (layout->incremental_base() == NULL)
cdc29364
CC
337 {
338 of = new Output_file(parameters->options().output_file_name());
339 if (this->options_.oformat_enum() != General_options::OBJECT_FORMAT_ELF)
340 of->set_is_temporary();
341 of->open(file_size);
342 }
343 else
344 {
94a3fc8b
CC
345 of = layout->incremental_base()->output_file();
346
347 // Apply the incremental relocations for symbols whose values
348 // have changed. We do this before we resize the file and start
349 // writing anything else to it, so that we can read the old
350 // incremental information from the file before (possibly)
351 // overwriting it.
352 if (parameters->incremental_update())
2e702c99
RM
353 layout->incremental_base()->apply_incremental_relocs(this->symtab_,
354 this->layout_,
94a3fc8b
CC
355 of);
356
cdc29364
CC
357 of->resize(file_size);
358 }
61ba1cf9
ILT
359
360 // Queue up the final set of tasks.
361 gold::queue_final_tasks(this->options_, this->input_objects_,
94a3fc8b 362 this->symtab_, layout, workqueue, of);
a2fb1b05
ILT
363}
364
365// Layout methods.
366
2ea97941 367Layout::Layout(int number_of_input_files, Script_options* script_options)
e55bde5e 368 : number_of_input_files_(number_of_input_files),
2ea97941 369 script_options_(script_options),
d491d34e
ILT
370 namepool_(),
371 sympool_(),
372 dynpool_(),
373 signatures_(),
374 section_name_map_(),
375 segment_list_(),
376 section_list_(),
377 unattached_section_list_(),
d491d34e
ILT
378 special_output_list_(),
379 section_headers_(NULL),
380 tls_segment_(NULL),
9f1d377b 381 relro_segment_(NULL),
10b4f102 382 interp_segment_(NULL),
1a2dff53 383 increase_relro_(0),
d491d34e
ILT
384 symtab_section_(NULL),
385 symtab_xindex_(NULL),
386 dynsym_section_(NULL),
387 dynsym_xindex_(NULL),
388 dynamic_section_(NULL),
f0ba79e2 389 dynamic_symbol_(NULL),
d491d34e
ILT
390 dynamic_data_(NULL),
391 eh_frame_section_(NULL),
392 eh_frame_data_(NULL),
393 added_eh_frame_data_(false),
394 eh_frame_hdr_section_(NULL),
c1027032 395 gdb_index_data_(NULL),
d491d34e 396 build_id_note_(NULL),
62b01cb5
ILT
397 debug_abbrev_(NULL),
398 debug_info_(NULL),
d491d34e
ILT
399 group_signatures_(),
400 output_file_size_(-1),
d7bb5745 401 have_added_input_section_(false),
e55bde5e 402 sections_are_attached_(false),
35cdfc9a
ILT
403 input_requires_executable_stack_(false),
404 input_with_gnu_stack_note_(false),
535890bb 405 input_without_gnu_stack_note_(false),
17a1d0a9 406 has_static_tls_(false),
e55bde5e 407 any_postprocessing_sections_(false),
3ce2c28e 408 resized_signatures_(false),
1518dc8f 409 have_stabstr_section_(false),
e9552f7e 410 section_ordering_specified_(false),
16164a6b 411 unique_segment_for_sections_specified_(false),
20e6d0d6
DK
412 incremental_inputs_(NULL),
413 record_output_section_data_from_script_(false),
414 script_output_section_data_list_(),
415 segment_states_(NULL),
cdc29364 416 relaxation_debug_check_(NULL),
f0558624 417 section_order_map_(),
16164a6b 418 section_segment_map_(),
e9552f7e
ST
419 input_section_position_(),
420 input_section_glob_(),
cdc29364
CC
421 incremental_base_(NULL),
422 free_list_()
54dc6425
ILT
423{
424 // Make space for more than enough segments for a typical file.
425 // This is just for efficiency--it's OK if we wind up needing more.
a3ad94ed
ILT
426 this->segment_list_.reserve(12);
427
27bc2bce
ILT
428 // We expect two unattached Output_data objects: the file header and
429 // the segment headers.
430 this->special_output_list_.reserve(2);
3ce2c28e
ILT
431
432 // Initialize structure needed for an incremental build.
8c21d9d3 433 if (parameters->incremental())
3ce2c28e 434 this->incremental_inputs_ = new Incremental_inputs;
f7c8a183
ILT
435
436 // The section name pool is worth optimizing in all cases, because
437 // it is small, but there are often overlaps due to .rel sections.
438 this->namepool_.set_optimize();
54dc6425
ILT
439}
440
cdc29364
CC
441// For incremental links, record the base file to be modified.
442
443void
444Layout::set_incremental_base(Incremental_binary* base)
445{
446 this->incremental_base_ = base;
447 this->free_list_.init(base->output_file()->filesize(), true);
448}
449
a2fb1b05
ILT
450// Hash a key we use to look up an output section mapping.
451
452size_t
453Layout::Hash_key::operator()(const Layout::Key& k) const
454{
f0641a0b 455 return k.first + k.second.first + k.second.second;
a2fb1b05
ILT
456}
457
fb1b895d
CC
458// These are the debug sections that are actually used by gdb.
459// Currently, we've checked versions of gdb up to and including 7.4.
460// We only check the part of the name that follows ".debug_" or
461// ".zdebug_".
02d2ba74
ILT
462
463static const char* gdb_sections[] =
fb1b895d
CC
464{
465 "abbrev",
466 "addr", // Fission extension
467 // "aranges", // not used by gdb as of 7.4
468 "frame",
469 "info",
470 "types",
471 "line",
472 "loc",
473 "macinfo",
474 "macro",
475 // "pubnames", // not used by gdb as of 7.4
476 // "pubtypes", // not used by gdb as of 7.4
477 "ranges",
478 "str",
02d2ba74
ILT
479};
480
fb1b895d
CC
481// This is the minimum set of sections needed for line numbers.
482
62b01cb5 483static const char* lines_only_debug_sections[] =
fb1b895d
CC
484{
485 "abbrev",
486 // "addr", // Fission extension
487 // "aranges", // not used by gdb as of 7.4
488 // "frame",
489 "info",
490 // "types",
491 "line",
492 // "loc",
493 // "macinfo",
494 // "macro",
495 // "pubnames", // not used by gdb as of 7.4
496 // "pubtypes", // not used by gdb as of 7.4
497 // "ranges",
498 "str",
499};
500
501// These sections are the DWARF fast-lookup tables, and are not needed
502// when building a .gdb_index section.
503
504static const char* gdb_fast_lookup_sections[] =
505{
506 "aranges",
507 "pubnames",
508 "pubtypes",
62b01cb5
ILT
509};
510
fb1b895d
CC
511// Returns whether the given debug section is in the list of
512// debug-sections-used-by-some-version-of-gdb. SUFFIX is the
513// portion of the name following ".debug_" or ".zdebug_".
514
02d2ba74 515static inline bool
fb1b895d 516is_gdb_debug_section(const char* suffix)
02d2ba74
ILT
517{
518 // We can do this faster: binary search or a hashtable. But why bother?
519 for (size_t i = 0; i < sizeof(gdb_sections)/sizeof(*gdb_sections); ++i)
fb1b895d 520 if (strcmp(suffix, gdb_sections[i]) == 0)
02d2ba74
ILT
521 return true;
522 return false;
523}
524
fb1b895d
CC
525// Returns whether the given section is needed for lines-only debugging.
526
62b01cb5 527static inline bool
fb1b895d 528is_lines_only_debug_section(const char* suffix)
62b01cb5
ILT
529{
530 // We can do this faster: binary search or a hashtable. But why bother?
531 for (size_t i = 0;
532 i < sizeof(lines_only_debug_sections)/sizeof(*lines_only_debug_sections);
533 ++i)
fb1b895d
CC
534 if (strcmp(suffix, lines_only_debug_sections[i]) == 0)
535 return true;
536 return false;
537}
538
539// Returns whether the given section is a fast-lookup section that
540// will not be needed when building a .gdb_index section.
541
542static inline bool
543is_gdb_fast_lookup_section(const char* suffix)
544{
545 // We can do this faster: binary search or a hashtable. But why bother?
546 for (size_t i = 0;
547 i < sizeof(gdb_fast_lookup_sections)/sizeof(*gdb_fast_lookup_sections);
548 ++i)
549 if (strcmp(suffix, gdb_fast_lookup_sections[i]) == 0)
62b01cb5
ILT
550 return true;
551 return false;
552}
553
6fc6ea19
CC
554// Sometimes we compress sections. This is typically done for
555// sections that are not part of normal program execution (such as
556// .debug_* sections), and where the readers of these sections know
557// how to deal with compressed sections. This routine doesn't say for
558// certain whether we'll compress -- it depends on commandline options
559// as well -- just whether this section is a candidate for compression.
560// (The Output_compressed_section class decides whether to compress
561// a given section, and picks the name of the compressed section.)
562
563static bool
564is_compressible_debug_section(const char* secname)
565{
566 return (is_prefix_of(".debug", secname));
567}
568
569// We may see compressed debug sections in input files. Return TRUE
570// if this is the name of a compressed debug section.
571
572bool
573is_compressed_debug_section(const char* secname)
574{
575 return (is_prefix_of(".zdebug", secname));
576}
577
a2fb1b05
ILT
578// Whether to include this section in the link.
579
580template<int size, bool big_endian>
581bool
6fa2a40b 582Layout::include_section(Sized_relobj_file<size, big_endian>*, const char* name,
a2fb1b05
ILT
583 const elfcpp::Shdr<size, big_endian>& shdr)
584{
fd06b4aa
CC
585 if (shdr.get_sh_flags() & elfcpp::SHF_EXCLUDE)
586 return false;
587
a2fb1b05
ILT
588 switch (shdr.get_sh_type())
589 {
590 case elfcpp::SHT_NULL:
591 case elfcpp::SHT_SYMTAB:
592 case elfcpp::SHT_DYNSYM:
a2fb1b05
ILT
593 case elfcpp::SHT_HASH:
594 case elfcpp::SHT_DYNAMIC:
595 case elfcpp::SHT_SYMTAB_SHNDX:
596 return false;
597
5cb66f97
ILT
598 case elfcpp::SHT_STRTAB:
599 // Discard the sections which have special meanings in the ELF
600 // ABI. Keep others (e.g., .stabstr). We could also do this by
601 // checking the sh_link fields of the appropriate sections.
602 return (strcmp(name, ".dynstr") != 0
603 && strcmp(name, ".strtab") != 0
604 && strcmp(name, ".shstrtab") != 0);
605
a2fb1b05
ILT
606 case elfcpp::SHT_RELA:
607 case elfcpp::SHT_REL:
608 case elfcpp::SHT_GROUP:
7019cd25
ILT
609 // If we are emitting relocations these should be handled
610 // elsewhere.
1e2bee4f 611 gold_assert(!parameters->options().relocatable());
6a74a719 612 return false;
a2fb1b05 613
9e2dcb77 614 case elfcpp::SHT_PROGBITS:
8851ecca 615 if (parameters->options().strip_debug()
9e2dcb77
ILT
616 && (shdr.get_sh_flags() & elfcpp::SHF_ALLOC) == 0)
617 {
e94cf127 618 if (is_debug_info_section(name))
9e2dcb77
ILT
619 return false;
620 }
62b01cb5
ILT
621 if (parameters->options().strip_debug_non_line()
622 && (shdr.get_sh_flags() & elfcpp::SHF_ALLOC) == 0)
623 {
624 // Debugging sections can only be recognized by name.
fb1b895d
CC
625 if (is_prefix_of(".debug_", name)
626 && !is_lines_only_debug_section(name + 7))
627 return false;
628 if (is_prefix_of(".zdebug_", name)
629 && !is_lines_only_debug_section(name + 8))
62b01cb5
ILT
630 return false;
631 }
8851ecca 632 if (parameters->options().strip_debug_gdb()
02d2ba74
ILT
633 && (shdr.get_sh_flags() & elfcpp::SHF_ALLOC) == 0)
634 {
635 // Debugging sections can only be recognized by name.
fb1b895d
CC
636 if (is_prefix_of(".debug_", name)
637 && !is_gdb_debug_section(name + 7))
638 return false;
639 if (is_prefix_of(".zdebug_", name)
640 && !is_gdb_debug_section(name + 8))
641 return false;
642 }
643 if (parameters->options().gdb_index()
644 && (shdr.get_sh_flags() & elfcpp::SHF_ALLOC) == 0)
645 {
646 // When building .gdb_index, we can strip .debug_pubnames,
647 // .debug_pubtypes, and .debug_aranges sections.
648 if (is_prefix_of(".debug_", name)
649 && is_gdb_fast_lookup_section(name + 7))
650 return false;
651 if (is_prefix_of(".zdebug_", name)
652 && is_gdb_fast_lookup_section(name + 8))
02d2ba74
ILT
653 return false;
654 }
fd06b4aa 655 if (parameters->options().strip_lto_sections()
2e702c99
RM
656 && !parameters->options().relocatable()
657 && (shdr.get_sh_flags() & elfcpp::SHF_ALLOC) == 0)
658 {
659 // Ignore LTO sections containing intermediate code.
660 if (is_prefix_of(".gnu.lto_", name))
661 return false;
662 }
6b7dd3f3
ILT
663 // The GNU linker strips .gnu_debuglink sections, so we do too.
664 // This is a feature used to keep debugging information in
665 // separate files.
666 if (strcmp(name, ".gnu_debuglink") == 0)
667 return false;
9e2dcb77
ILT
668 return true;
669
a2fb1b05 670 default:
a2fb1b05
ILT
671 return true;
672 }
673}
674
ead1e424 675// Return an output section named NAME, or NULL if there is none.
a2fb1b05 676
a2fb1b05 677Output_section*
ead1e424 678Layout::find_output_section(const char* name) const
a2fb1b05 679{
a445fddf
ILT
680 for (Section_list::const_iterator p = this->section_list_.begin();
681 p != this->section_list_.end();
ead1e424 682 ++p)
a445fddf
ILT
683 if (strcmp((*p)->name(), name) == 0)
684 return *p;
ead1e424
ILT
685 return NULL;
686}
a2fb1b05 687
ead1e424
ILT
688// Return an output segment of type TYPE, with segment flags SET set
689// and segment flags CLEAR clear. Return NULL if there is none.
a2fb1b05 690
ead1e424
ILT
691Output_segment*
692Layout::find_output_segment(elfcpp::PT type, elfcpp::Elf_Word set,
693 elfcpp::Elf_Word clear) const
694{
695 for (Segment_list::const_iterator p = this->segment_list_.begin();
696 p != this->segment_list_.end();
697 ++p)
698 if (static_cast<elfcpp::PT>((*p)->type()) == type
699 && ((*p)->flags() & set) == set
700 && ((*p)->flags() & clear) == 0)
701 return *p;
702 return NULL;
703}
a2fb1b05 704
487b39df
ILT
705// When we put a .ctors or .dtors section with more than one word into
706// a .init_array or .fini_array section, we need to reverse the words
707// in the .ctors/.dtors section. This is because .init_array executes
708// constructors front to back, where .ctors executes them back to
709// front, and vice-versa for .fini_array/.dtors. Although we do want
710// to remap .ctors/.dtors into .init_array/.fini_array because it can
711// be more efficient, we don't want to change the order in which
712// constructors/destructors are run. This set just keeps track of
713// these sections which need to be reversed. It is only changed by
714// Layout::layout. It should be a private member of Layout, but that
715// would require layout.h to #include object.h to get the definition
716// of Section_id.
717static Unordered_set<Section_id, Section_id_hash> ctors_sections_in_init_array;
718
719// Return whether OBJECT/SHNDX is a .ctors/.dtors section mapped to a
720// .init_array/.fini_array section.
721
722bool
723Layout::is_ctors_in_init_array(Relobj* relobj, unsigned int shndx) const
724{
725 return (ctors_sections_in_init_array.find(Section_id(relobj, shndx))
726 != ctors_sections_in_init_array.end());
727}
728
ead1e424 729// Return the output section to use for section NAME with type TYPE
a445fddf 730// and section flags FLAGS. NAME must be canonicalized in the string
10b4f102
ILT
731// pool, and NAME_KEY is the key. ORDER is where this should appear
732// in the output sections. IS_RELRO is true for a relro section.
a2fb1b05 733
ead1e424 734Output_section*
f0641a0b 735Layout::get_output_section(const char* name, Stringpool::Key name_key,
f5c870d2 736 elfcpp::Elf_Word type, elfcpp::Elf_Xword flags,
22f0da72 737 Output_section_order order, bool is_relro)
ead1e424 738{
5393d741
ILT
739 elfcpp::Elf_Word lookup_type = type;
740
741 // For lookup purposes, treat INIT_ARRAY, FINI_ARRAY, and
742 // PREINIT_ARRAY like PROGBITS. This ensures that we combine
743 // .init_array, .fini_array, and .preinit_array sections by name
744 // whatever their type in the input file. We do this because the
745 // types are not always right in the input files.
746 if (lookup_type == elfcpp::SHT_INIT_ARRAY
747 || lookup_type == elfcpp::SHT_FINI_ARRAY
748 || lookup_type == elfcpp::SHT_PREINIT_ARRAY)
749 lookup_type = elfcpp::SHT_PROGBITS;
750
154e0e9a
ILT
751 elfcpp::Elf_Xword lookup_flags = flags;
752
753 // Ignoring SHF_WRITE and SHF_EXECINSTR here means that we combine
754 // read-write with read-only sections. Some other ELF linkers do
755 // not do this. FIXME: Perhaps there should be an option
756 // controlling this.
757 lookup_flags &= ~(elfcpp::SHF_WRITE | elfcpp::SHF_EXECINSTR);
758
5393d741 759 const Key key(name_key, std::make_pair(lookup_type, lookup_flags));
a2fb1b05
ILT
760 const std::pair<Key, Output_section*> v(key, NULL);
761 std::pair<Section_name_map::iterator, bool> ins(
762 this->section_name_map_.insert(v));
763
a2fb1b05 764 if (!ins.second)
ead1e424 765 return ins.first->second;
a2fb1b05
ILT
766 else
767 {
768 // This is the first time we've seen this name/type/flags
4e2b1697
ILT
769 // combination. For compatibility with the GNU linker, we
770 // combine sections with contents and zero flags with sections
771 // with non-zero flags. This is a workaround for cases where
772 // assembler code forgets to set section flags. FIXME: Perhaps
773 // there should be an option to control this.
15cf077e 774 Output_section* os = NULL;
4e2b1697 775
5393d741 776 if (lookup_type == elfcpp::SHT_PROGBITS)
15cf077e 777 {
2e702c99
RM
778 if (flags == 0)
779 {
780 Output_section* same_name = this->find_output_section(name);
781 if (same_name != NULL
782 && (same_name->type() == elfcpp::SHT_PROGBITS
5393d741
ILT
783 || same_name->type() == elfcpp::SHT_INIT_ARRAY
784 || same_name->type() == elfcpp::SHT_FINI_ARRAY
785 || same_name->type() == elfcpp::SHT_PREINIT_ARRAY)
2e702c99
RM
786 && (same_name->flags() & elfcpp::SHF_TLS) == 0)
787 os = same_name;
788 }
789 else if ((flags & elfcpp::SHF_TLS) == 0)
790 {
791 elfcpp::Elf_Xword zero_flags = 0;
792 const Key zero_key(name_key, std::make_pair(lookup_type,
5393d741 793 zero_flags));
2e702c99
RM
794 Section_name_map::iterator p =
795 this->section_name_map_.find(zero_key);
796 if (p != this->section_name_map_.end())
154e0e9a 797 os = p->second;
2e702c99 798 }
15cf077e 799 }
4e2b1697 800
15cf077e 801 if (os == NULL)
22f0da72
ILT
802 os = this->make_output_section(name, type, flags, order, is_relro);
803
a2fb1b05 804 ins.first->second = os;
ead1e424 805 return os;
a2fb1b05 806 }
ead1e424
ILT
807}
808
b9b2ae8b
NC
809// Returns TRUE iff NAME (an input section from RELOBJ) will
810// be mapped to an output section that should be KEPT.
811
812bool
813Layout::keep_input_section(const Relobj* relobj, const char* name)
814{
815 if (! this->script_options_->saw_sections_clause())
816 return false;
817
818 Script_sections* ss = this->script_options_->script_sections();
819 const char* file_name = relobj == NULL ? NULL : relobj->name().c_str();
820 Output_section** output_section_slot;
821 Script_sections::Section_type script_section_type;
822 bool keep;
823
824 name = ss->output_section_name(file_name, name, &output_section_slot,
825 &script_section_type, &keep);
826 return name != NULL && keep;
827}
828
16164a6b
ST
829// Clear the input section flags that should not be copied to the
830// output section.
831
832elfcpp::Elf_Xword
833Layout::get_output_section_flags(elfcpp::Elf_Xword input_section_flags)
834{
835 // Some flags in the input section should not be automatically
836 // copied to the output section.
837 input_section_flags &= ~ (elfcpp::SHF_INFO_LINK
838 | elfcpp::SHF_GROUP
839 | elfcpp::SHF_MERGE
840 | elfcpp::SHF_STRINGS);
841
842 // We only clear the SHF_LINK_ORDER flag in for
843 // a non-relocatable link.
844 if (!parameters->options().relocatable())
845 input_section_flags &= ~elfcpp::SHF_LINK_ORDER;
846
847 return input_section_flags;
848}
849
a445fddf
ILT
850// Pick the output section to use for section NAME, in input file
851// RELOBJ, with type TYPE and flags FLAGS. RELOBJ may be NULL for a
154e0e9a
ILT
852// linker created section. IS_INPUT_SECTION is true if we are
853// choosing an output section for an input section found in a input
10b4f102
ILT
854// file. ORDER is where this section should appear in the output
855// sections. IS_RELRO is true for a relro section. This will return
856// NULL if the input section should be discarded.
a445fddf
ILT
857
858Output_section*
859Layout::choose_output_section(const Relobj* relobj, const char* name,
860 elfcpp::Elf_Word type, elfcpp::Elf_Xword flags,
22f0da72
ILT
861 bool is_input_section, Output_section_order order,
862 bool is_relro)
a445fddf 863{
154e0e9a
ILT
864 // We should not see any input sections after we have attached
865 // sections to segments.
866 gold_assert(!is_input_section || !this->sections_are_attached_);
867
16164a6b 868 flags = this->get_output_section_flags(flags);
c9484ea5 869
a445fddf
ILT
870 if (this->script_options_->saw_sections_clause())
871 {
872 // We are using a SECTIONS clause, so the output section is
873 // chosen based only on the name.
874
875 Script_sections* ss = this->script_options_->script_sections();
876 const char* file_name = relobj == NULL ? NULL : relobj->name().c_str();
877 Output_section** output_section_slot;
1e5d2fb1 878 Script_sections::Section_type script_section_type;
7f8cd844 879 const char* orig_name = name;
b9b2ae8b 880 bool keep;
1e5d2fb1 881 name = ss->output_section_name(file_name, name, &output_section_slot,
b9b2ae8b
NC
882 &script_section_type, &keep);
883
a445fddf
ILT
884 if (name == NULL)
885 {
7f8cd844
NC
886 gold_debug(DEBUG_SCRIPT, _("Unable to create output section '%s' "
887 "because it is not allowed by the "
888 "SECTIONS clause of the linker script"),
889 orig_name);
a445fddf
ILT
890 // The SECTIONS clause says to discard this input section.
891 return NULL;
892 }
893
1e5d2fb1
DK
894 // We can only handle script section types ST_NONE and ST_NOLOAD.
895 switch (script_section_type)
896 {
897 case Script_sections::ST_NONE:
898 break;
899 case Script_sections::ST_NOLOAD:
900 flags &= elfcpp::SHF_ALLOC;
901 break;
902 default:
903 gold_unreachable();
904 }
905
a445fddf
ILT
906 // If this is an orphan section--one not mentioned in the linker
907 // script--then OUTPUT_SECTION_SLOT will be NULL, and we do the
908 // default processing below.
909
910 if (output_section_slot != NULL)
911 {
912 if (*output_section_slot != NULL)
9c547ec3
ILT
913 {
914 (*output_section_slot)->update_flags_for_input_section(flags);
915 return *output_section_slot;
916 }
a445fddf
ILT
917
918 // We don't put sections found in the linker script into
919 // SECTION_NAME_MAP_. That keeps us from getting confused
920 // if an orphan section is mapped to a section with the same
921 // name as one in the linker script.
922
923 name = this->namepool_.add(name, false, NULL);
924
22f0da72
ILT
925 Output_section* os = this->make_output_section(name, type, flags,
926 order, is_relro);
927
a445fddf 928 os->set_found_in_sections_clause();
1e5d2fb1
DK
929
930 // Special handling for NOLOAD sections.
931 if (script_section_type == Script_sections::ST_NOLOAD)
932 {
933 os->set_is_noload();
934
935 // The constructor of Output_section sets addresses of non-ALLOC
936 // sections to 0 by default. We don't want that for NOLOAD
937 // sections even if they have no SHF_ALLOC flag.
938 if ((os->flags() & elfcpp::SHF_ALLOC) == 0
939 && os->is_address_valid())
940 {
941 gold_assert(os->address() == 0
942 && !os->is_offset_valid()
943 && !os->is_data_size_valid());
944 os->reset_address_and_file_offset();
945 }
946 }
947
a445fddf
ILT
948 *output_section_slot = os;
949 return os;
950 }
951 }
952
953 // FIXME: Handle SHF_OS_NONCONFORMING somewhere.
954
6fc6ea19
CC
955 size_t len = strlen(name);
956 char* uncompressed_name = NULL;
957
958 // Compressed debug sections should be mapped to the corresponding
959 // uncompressed section.
960 if (is_compressed_debug_section(name))
961 {
962 uncompressed_name = new char[len];
963 uncompressed_name[0] = '.';
964 gold_assert(name[0] == '.' && name[1] == 'z');
965 strncpy(&uncompressed_name[1], &name[2], len - 2);
966 uncompressed_name[len - 1] = '\0';
967 len -= 1;
968 name = uncompressed_name;
969 }
970
a445fddf
ILT
971 // Turn NAME from the name of the input section into the name of the
972 // output section.
401a9a73
CC
973 if (is_input_section
974 && !this->script_options_->saw_sections_clause()
975 && !parameters->options().relocatable())
921b5322
AM
976 {
977 const char *orig_name = name;
978 name = parameters->target().output_section_name(relobj, name, &len);
979 if (name == NULL)
980 name = Layout::output_section_name(relobj, orig_name, &len);
981 }
a445fddf
ILT
982
983 Stringpool::Key name_key;
984 name = this->namepool_.add_with_length(name, len, true, &name_key);
985
6fc6ea19
CC
986 if (uncompressed_name != NULL)
987 delete[] uncompressed_name;
988
a445fddf
ILT
989 // Find or make the output section. The output section is selected
990 // based on the section name, type, and flags.
22f0da72 991 return this->get_output_section(name, name_key, type, flags, order, is_relro);
a445fddf
ILT
992}
993
cdc29364
CC
994// For incremental links, record the initial fixed layout of a section
995// from the base file, and return a pointer to the Output_section.
996
997template<int size, bool big_endian>
998Output_section*
999Layout::init_fixed_output_section(const char* name,
1000 elfcpp::Shdr<size, big_endian>& shdr)
1001{
1002 unsigned int sh_type = shdr.get_sh_type();
1003
aa06ae28
CC
1004 // We preserve the layout of PROGBITS, NOBITS, INIT_ARRAY, FINI_ARRAY,
1005 // PRE_INIT_ARRAY, and NOTE sections.
cdc29364 1006 // All others will be created from scratch and reallocated.
aa06ae28 1007 if (!can_incremental_update(sh_type))
cdc29364
CC
1008 return NULL;
1009
c1027032
CC
1010 // If we're generating a .gdb_index section, we need to regenerate
1011 // it from scratch.
1012 if (parameters->options().gdb_index()
1013 && sh_type == elfcpp::SHT_PROGBITS
1014 && strcmp(name, ".gdb_index") == 0)
1015 return NULL;
1016
cdc29364
CC
1017 typename elfcpp::Elf_types<size>::Elf_Addr sh_addr = shdr.get_sh_addr();
1018 typename elfcpp::Elf_types<size>::Elf_Off sh_offset = shdr.get_sh_offset();
1019 typename elfcpp::Elf_types<size>::Elf_WXword sh_size = shdr.get_sh_size();
1020 typename elfcpp::Elf_types<size>::Elf_WXword sh_flags = shdr.get_sh_flags();
1021 typename elfcpp::Elf_types<size>::Elf_WXword sh_addralign =
1022 shdr.get_sh_addralign();
1023
1024 // Make the output section.
1025 Stringpool::Key name_key;
1026 name = this->namepool_.add(name, true, &name_key);
1027 Output_section* os = this->get_output_section(name, name_key, sh_type,
2e702c99 1028 sh_flags, ORDER_INVALID, false);
cdc29364
CC
1029 os->set_fixed_layout(sh_addr, sh_offset, sh_size, sh_addralign);
1030 if (sh_type != elfcpp::SHT_NOBITS)
1031 this->free_list_.remove(sh_offset, sh_offset + sh_size);
1032 return os;
1033}
1034
ead1e424 1035// Return the output section to use for input section SHNDX, with name
730cdc88
ILT
1036// NAME, with header HEADER, from object OBJECT. RELOC_SHNDX is the
1037// index of a relocation section which applies to this section, or 0
1038// if none, or -1U if more than one. RELOC_TYPE is the type of the
1039// relocation section if there is one. Set *OFF to the offset of this
1040// input section without the output section. Return NULL if the
1041// section should be discarded. Set *OFF to -1 if the section
1042// contents should not be written directly to the output file, but
1043// will instead receive special handling.
ead1e424
ILT
1044
1045template<int size, bool big_endian>
1046Output_section*
6fa2a40b 1047Layout::layout(Sized_relobj_file<size, big_endian>* object, unsigned int shndx,
730cdc88
ILT
1048 const char* name, const elfcpp::Shdr<size, big_endian>& shdr,
1049 unsigned int reloc_shndx, unsigned int, off_t* off)
ead1e424 1050{
ef9beddf
ILT
1051 *off = 0;
1052
ead1e424
ILT
1053 if (!this->include_section(object, name, shdr))
1054 return NULL;
1055
2a0ff005 1056 elfcpp::Elf_Word sh_type = shdr.get_sh_type();
2a0ff005 1057
6a74a719
ILT
1058 // In a relocatable link a grouped section must not be combined with
1059 // any other sections.
5393d741 1060 Output_section* os;
8851ecca 1061 if (parameters->options().relocatable()
6a74a719
ILT
1062 && (shdr.get_sh_flags() & elfcpp::SHF_GROUP) != 0)
1063 {
1064 name = this->namepool_.add(name, true, NULL);
22f0da72
ILT
1065 os = this->make_output_section(name, sh_type, shdr.get_sh_flags(),
1066 ORDER_INVALID, false);
6a74a719
ILT
1067 }
1068 else
1069 {
16164a6b
ST
1070 // Plugins can choose to place one or more subsets of sections in
1071 // unique segments and this is done by mapping these section subsets
1072 // to unique output sections. Check if this section needs to be
1073 // remapped to a unique output section.
1074 Section_segment_map::iterator it
1075 = this->section_segment_map_.find(Const_section_id(object, shndx));
1076 if (it == this->section_segment_map_.end())
1077 {
1078 os = this->choose_output_section(object, name, sh_type,
1079 shdr.get_sh_flags(), true,
1080 ORDER_INVALID, false);
1081 }
1082 else
1083 {
1084 // We know the name of the output section, directly call
1085 // get_output_section here by-passing choose_output_section.
1086 elfcpp::Elf_Xword flags
1087 = this->get_output_section_flags(shdr.get_sh_flags());
1088
1089 const char* os_name = it->second->name;
1090 Stringpool::Key name_key;
1091 os_name = this->namepool_.add(os_name, true, &name_key);
1092 os = this->get_output_section(os_name, name_key, sh_type, flags,
1093 ORDER_INVALID, false);
1094 if (!os->is_unique_segment())
1095 {
1096 os->set_is_unique_segment();
1097 os->set_extra_segment_flags(it->second->flags);
1098 os->set_segment_alignment(it->second->align);
1099 }
1100 }
6a74a719
ILT
1101 if (os == NULL)
1102 return NULL;
1103 }
a2fb1b05 1104
2fd32231 1105 // By default the GNU linker sorts input sections whose names match
487b39df
ILT
1106 // .ctors.*, .dtors.*, .init_array.*, or .fini_array.*. The
1107 // sections are sorted by name. This is used to implement
1108 // constructor priority ordering. We are compatible. When we put
1109 // .ctor sections in .init_array and .dtor sections in .fini_array,
1110 // we must also sort plain .ctor and .dtor sections.
2fd32231 1111 if (!this->script_options_->saw_sections_clause()
5393d741 1112 && !parameters->options().relocatable()
2fd32231
ILT
1113 && (is_prefix_of(".ctors.", name)
1114 || is_prefix_of(".dtors.", name)
1115 || is_prefix_of(".init_array.", name)
5393d741
ILT
1116 || is_prefix_of(".fini_array.", name)
1117 || (parameters->options().ctors_in_init_array()
1118 && (strcmp(name, ".ctors") == 0
1119 || strcmp(name, ".dtors") == 0))))
2fd32231
ILT
1120 os->set_must_sort_attached_input_sections();
1121
487b39df
ILT
1122 // If this is a .ctors or .ctors.* section being mapped to a
1123 // .init_array section, or a .dtors or .dtors.* section being mapped
1124 // to a .fini_array section, we will need to reverse the words if
1125 // there is more than one. Record this section for later. See
1126 // ctors_sections_in_init_array above.
1127 if (!this->script_options_->saw_sections_clause()
1128 && !parameters->options().relocatable()
1129 && shdr.get_sh_size() > size / 8
1130 && (((strcmp(name, ".ctors") == 0
1131 || is_prefix_of(".ctors.", name))
1132 && strcmp(os->name(), ".init_array") == 0)
1133 || ((strcmp(name, ".dtors") == 0
1134 || is_prefix_of(".dtors.", name))
1135 && strcmp(os->name(), ".fini_array") == 0)))
1136 ctors_sections_in_init_array.insert(Section_id(object, shndx));
1137
a2fb1b05
ILT
1138 // FIXME: Handle SHF_LINK_ORDER somewhere.
1139
5b7b7d6e
ILT
1140 elfcpp::Elf_Xword orig_flags = os->flags();
1141
6e9ba2ca 1142 *off = os->add_input_section(this, object, shndx, name, shdr, reloc_shndx,
a445fddf 1143 this->script_options_->saw_sections_clause());
5b7b7d6e
ILT
1144
1145 // If the flags changed, we may have to change the order.
1146 if ((orig_flags & elfcpp::SHF_ALLOC) != 0)
1147 {
1148 orig_flags &= (elfcpp::SHF_WRITE | elfcpp::SHF_EXECINSTR);
1149 elfcpp::Elf_Xword new_flags =
1150 os->flags() & (elfcpp::SHF_WRITE | elfcpp::SHF_EXECINSTR);
1151 if (orig_flags != new_flags)
1152 os->set_order(this->default_section_order(os, false));
1153 }
1154
d7bb5745 1155 this->have_added_input_section_ = true;
a2fb1b05
ILT
1156
1157 return os;
1158}
1159
16164a6b
ST
1160// Maps section SECN to SEGMENT s.
1161void
1162Layout::insert_section_segment_map(Const_section_id secn,
1163 Unique_segment_info *s)
1164{
1165 gold_assert(this->unique_segment_for_sections_specified_);
1166 this->section_segment_map_[secn] = s;
1167}
1168
6a74a719
ILT
1169// Handle a relocation section when doing a relocatable link.
1170
1171template<int size, bool big_endian>
1172Output_section*
6fa2a40b 1173Layout::layout_reloc(Sized_relobj_file<size, big_endian>* object,
6a74a719
ILT
1174 unsigned int,
1175 const elfcpp::Shdr<size, big_endian>& shdr,
1176 Output_section* data_section,
1177 Relocatable_relocs* rr)
1178{
8851ecca
ILT
1179 gold_assert(parameters->options().relocatable()
1180 || parameters->options().emit_relocs());
6a74a719
ILT
1181
1182 int sh_type = shdr.get_sh_type();
1183
1184 std::string name;
1185 if (sh_type == elfcpp::SHT_REL)
1186 name = ".rel";
1187 else if (sh_type == elfcpp::SHT_RELA)
1188 name = ".rela";
1189 else
1190 gold_unreachable();
1191 name += data_section->name();
1192
bd288ea2
ILT
1193 // In a relocatable link relocs for a grouped section must not be
1194 // combined with other reloc sections.
1195 Output_section* os;
1196 if (!parameters->options().relocatable()
1197 || (data_section->flags() & elfcpp::SHF_GROUP) == 0)
1198 os = this->choose_output_section(object, name.c_str(), sh_type,
22f0da72
ILT
1199 shdr.get_sh_flags(), false,
1200 ORDER_INVALID, false);
bd288ea2
ILT
1201 else
1202 {
1203 const char* n = this->namepool_.add(name.c_str(), true, NULL);
1204 os = this->make_output_section(n, sh_type, shdr.get_sh_flags(),
22f0da72 1205 ORDER_INVALID, false);
bd288ea2 1206 }
6a74a719
ILT
1207
1208 os->set_should_link_to_symtab();
1209 os->set_info_section(data_section);
1210
1211 Output_section_data* posd;
1212 if (sh_type == elfcpp::SHT_REL)
1213 {
1214 os->set_entsize(elfcpp::Elf_sizes<size>::rel_size);
1215 posd = new Output_relocatable_relocs<elfcpp::SHT_REL,
1216 size,
1217 big_endian>(rr);
1218 }
1219 else if (sh_type == elfcpp::SHT_RELA)
1220 {
1221 os->set_entsize(elfcpp::Elf_sizes<size>::rela_size);
1222 posd = new Output_relocatable_relocs<elfcpp::SHT_RELA,
1223 size,
1224 big_endian>(rr);
1225 }
1226 else
1227 gold_unreachable();
1228
1229 os->add_output_section_data(posd);
1230 rr->set_output_data(posd);
1231
1232 return os;
1233}
1234
1235// Handle a group section when doing a relocatable link.
1236
1237template<int size, bool big_endian>
1238void
1239Layout::layout_group(Symbol_table* symtab,
6fa2a40b 1240 Sized_relobj_file<size, big_endian>* object,
6a74a719
ILT
1241 unsigned int,
1242 const char* group_section_name,
1243 const char* signature,
1244 const elfcpp::Shdr<size, big_endian>& shdr,
8825ac63
ILT
1245 elfcpp::Elf_Word flags,
1246 std::vector<unsigned int>* shndxes)
6a74a719 1247{
8851ecca 1248 gold_assert(parameters->options().relocatable());
6a74a719
ILT
1249 gold_assert(shdr.get_sh_type() == elfcpp::SHT_GROUP);
1250 group_section_name = this->namepool_.add(group_section_name, true, NULL);
1251 Output_section* os = this->make_output_section(group_section_name,
1252 elfcpp::SHT_GROUP,
f5c870d2 1253 shdr.get_sh_flags(),
22f0da72 1254 ORDER_INVALID, false);
6a74a719
ILT
1255
1256 // We need to find a symbol with the signature in the symbol table.
755ab8af 1257 // If we don't find one now, we need to look again later.
6a74a719 1258 Symbol* sym = symtab->lookup(signature, NULL);
755ab8af
ILT
1259 if (sym != NULL)
1260 os->set_info_symndx(sym);
1261 else
1262 {
e55bde5e
ILT
1263 // Reserve some space to minimize reallocations.
1264 if (this->group_signatures_.empty())
1265 this->group_signatures_.reserve(this->number_of_input_files_ * 16);
1266
755ab8af
ILT
1267 // We will wind up using a symbol whose name is the signature.
1268 // So just put the signature in the symbol name pool to save it.
1269 signature = symtab->canonicalize_name(signature);
1270 this->group_signatures_.push_back(Group_signature(os, signature));
1271 }
6a74a719
ILT
1272
1273 os->set_should_link_to_symtab();
6a74a719
ILT
1274 os->set_entsize(4);
1275
1276 section_size_type entry_count =
1277 convert_to_section_size_type(shdr.get_sh_size() / 4);
1278 Output_section_data* posd =
8825ac63
ILT
1279 new Output_data_group<size, big_endian>(object, entry_count, flags,
1280 shndxes);
6a74a719
ILT
1281 os->add_output_section_data(posd);
1282}
1283
730cdc88
ILT
1284// Special GNU handling of sections name .eh_frame. They will
1285// normally hold exception frame data as defined by the C++ ABI
1286// (http://codesourcery.com/cxx-abi/).
3151305a
ILT
1287
1288template<int size, bool big_endian>
730cdc88 1289Output_section*
6fa2a40b 1290Layout::layout_eh_frame(Sized_relobj_file<size, big_endian>* object,
730cdc88
ILT
1291 const unsigned char* symbols,
1292 off_t symbols_size,
1293 const unsigned char* symbol_names,
1294 off_t symbol_names_size,
3151305a 1295 unsigned int shndx,
3151305a 1296 const elfcpp::Shdr<size, big_endian>& shdr,
730cdc88
ILT
1297 unsigned int reloc_shndx, unsigned int reloc_type,
1298 off_t* off)
3151305a 1299{
4d5e4e62
ILT
1300 gold_assert(shdr.get_sh_type() == elfcpp::SHT_PROGBITS
1301 || shdr.get_sh_type() == elfcpp::SHT_X86_64_UNWIND);
1650c4ff 1302 gold_assert((shdr.get_sh_flags() & elfcpp::SHF_ALLOC) != 0);
730cdc88 1303
07a60597 1304 Output_section* os = this->make_eh_frame_section(object);
a445fddf
ILT
1305 if (os == NULL)
1306 return NULL;
730cdc88 1307
3151305a
ILT
1308 gold_assert(this->eh_frame_section_ == os);
1309
911a5072
ILT
1310 elfcpp::Elf_Xword orig_flags = os->flags();
1311
cdc29364
CC
1312 if (!parameters->incremental()
1313 && this->eh_frame_data_->add_ehframe_input_section(object,
1314 symbols,
1315 symbols_size,
1316 symbol_names,
1317 symbol_names_size,
1318 shndx,
1319 reloc_shndx,
1320 reloc_type))
2c38906f 1321 {
154e0e9a
ILT
1322 os->update_flags_for_input_section(shdr.get_sh_flags());
1323
3bb951e5 1324 // A writable .eh_frame section is a RELRO section.
911a5072
ILT
1325 if ((orig_flags & (elfcpp::SHF_WRITE | elfcpp::SHF_EXECINSTR))
1326 != (os->flags() & (elfcpp::SHF_WRITE | elfcpp::SHF_EXECINSTR)))
1327 {
1328 os->set_is_relro();
1329 os->set_order(ORDER_RELRO);
1330 }
3bb951e5 1331
2c38906f
ILT
1332 // We found a .eh_frame section we are going to optimize, so now
1333 // we can add the set of optimized sections to the output
1334 // section. We need to postpone adding this until we've found a
1335 // section we can optimize so that the .eh_frame section in
1336 // crtbegin.o winds up at the start of the output section.
1337 if (!this->added_eh_frame_data_)
1338 {
1339 os->add_output_section_data(this->eh_frame_data_);
1340 this->added_eh_frame_data_ = true;
1341 }
1342 *off = -1;
1343 }
730cdc88
ILT
1344 else
1345 {
1346 // We couldn't handle this .eh_frame section for some reason.
1347 // Add it as a normal section.
a445fddf 1348 bool saw_sections_clause = this->script_options_->saw_sections_clause();
07a60597
ILT
1349 *off = os->add_input_section(this, object, shndx, ".eh_frame", shdr,
1350 reloc_shndx, saw_sections_clause);
d7bb5745 1351 this->have_added_input_section_ = true;
911a5072
ILT
1352
1353 if ((orig_flags & (elfcpp::SHF_WRITE | elfcpp::SHF_EXECINSTR))
1354 != (os->flags() & (elfcpp::SHF_WRITE | elfcpp::SHF_EXECINSTR)))
1355 os->set_order(this->default_section_order(os, false));
730cdc88
ILT
1356 }
1357
1358 return os;
3151305a
ILT
1359}
1360
07a60597
ILT
1361// Create and return the magic .eh_frame section. Create
1362// .eh_frame_hdr also if appropriate. OBJECT is the object with the
1363// input .eh_frame section; it may be NULL.
1364
1365Output_section*
1366Layout::make_eh_frame_section(const Relobj* object)
1367{
1368 // FIXME: On x86_64, this could use SHT_X86_64_UNWIND rather than
1369 // SHT_PROGBITS.
1370 Output_section* os = this->choose_output_section(object, ".eh_frame",
1371 elfcpp::SHT_PROGBITS,
1372 elfcpp::SHF_ALLOC, false,
1373 ORDER_EHFRAME, false);
1374 if (os == NULL)
1375 return NULL;
1376
1377 if (this->eh_frame_section_ == NULL)
1378 {
1379 this->eh_frame_section_ = os;
1380 this->eh_frame_data_ = new Eh_frame();
1381
1382 // For incremental linking, we do not optimize .eh_frame sections
1383 // or create a .eh_frame_hdr section.
1384 if (parameters->options().eh_frame_hdr() && !parameters->incremental())
1385 {
1386 Output_section* hdr_os =
1387 this->choose_output_section(NULL, ".eh_frame_hdr",
1388 elfcpp::SHT_PROGBITS,
1389 elfcpp::SHF_ALLOC, false,
1390 ORDER_EHFRAME, false);
1391
1392 if (hdr_os != NULL)
1393 {
1394 Eh_frame_hdr* hdr_posd = new Eh_frame_hdr(os,
1395 this->eh_frame_data_);
1396 hdr_os->add_output_section_data(hdr_posd);
1397
1398 hdr_os->set_after_input_sections();
1399
1400 if (!this->script_options_->saw_phdrs_clause())
1401 {
1402 Output_segment* hdr_oseg;
1403 hdr_oseg = this->make_output_segment(elfcpp::PT_GNU_EH_FRAME,
1404 elfcpp::PF_R);
1405 hdr_oseg->add_output_section_to_nonload(hdr_os,
1406 elfcpp::PF_R);
1407 }
1408
1409 this->eh_frame_data_->set_eh_frame_hdr(hdr_posd);
1410 }
1411 }
1412 }
1413
1414 return os;
1415}
1416
1417// Add an exception frame for a PLT. This is called from target code.
1418
1419void
1420Layout::add_eh_frame_for_plt(Output_data* plt, const unsigned char* cie_data,
1421 size_t cie_length, const unsigned char* fde_data,
1422 size_t fde_length)
1423{
1424 if (parameters->incremental())
1425 {
1426 // FIXME: Maybe this could work some day....
1427 return;
1428 }
1429 Output_section* os = this->make_eh_frame_section(NULL);
1430 if (os == NULL)
1431 return;
1432 this->eh_frame_data_->add_ehframe_for_plt(plt, cie_data, cie_length,
1433 fde_data, fde_length);
1434 if (!this->added_eh_frame_data_)
1435 {
1436 os->add_output_section_data(this->eh_frame_data_);
1437 this->added_eh_frame_data_ = true;
1438 }
1439}
1440
c1027032
CC
1441// Scan a .debug_info or .debug_types section, and add summary
1442// information to the .gdb_index section.
1443
1444template<int size, bool big_endian>
1445void
1446Layout::add_to_gdb_index(bool is_type_unit,
1447 Sized_relobj<size, big_endian>* object,
1448 const unsigned char* symbols,
1449 off_t symbols_size,
1450 unsigned int shndx,
1451 unsigned int reloc_shndx,
1452 unsigned int reloc_type)
1453{
1454 if (this->gdb_index_data_ == NULL)
1455 {
1456 Output_section* os = this->choose_output_section(NULL, ".gdb_index",
1457 elfcpp::SHT_PROGBITS, 0,
1458 false, ORDER_INVALID,
1459 false);
1460 if (os == NULL)
2e702c99 1461 return;
c1027032
CC
1462
1463 this->gdb_index_data_ = new Gdb_index(os);
1464 os->add_output_section_data(this->gdb_index_data_);
1465 os->set_after_input_sections();
1466 }
1467
1468 this->gdb_index_data_->scan_debug_info(is_type_unit, object, symbols,
1469 symbols_size, shndx, reloc_shndx,
1470 reloc_type);
1471}
1472
9f1d377b
ILT
1473// Add POSD to an output section using NAME, TYPE, and FLAGS. Return
1474// the output section.
ead1e424 1475
9f1d377b 1476Output_section*
ead1e424
ILT
1477Layout::add_output_section_data(const char* name, elfcpp::Elf_Word type,
1478 elfcpp::Elf_Xword flags,
f5c870d2 1479 Output_section_data* posd,
22f0da72 1480 Output_section_order order, bool is_relro)
ead1e424 1481{
a445fddf 1482 Output_section* os = this->choose_output_section(NULL, name, type, flags,
22f0da72 1483 false, order, is_relro);
a445fddf
ILT
1484 if (os != NULL)
1485 os->add_output_section_data(posd);
9f1d377b 1486 return os;
ead1e424
ILT
1487}
1488
a2fb1b05
ILT
1489// Map section flags to segment flags.
1490
1491elfcpp::Elf_Word
1492Layout::section_flags_to_segment(elfcpp::Elf_Xword flags)
1493{
1494 elfcpp::Elf_Word ret = elfcpp::PF_R;
1495 if ((flags & elfcpp::SHF_WRITE) != 0)
1496 ret |= elfcpp::PF_W;
1497 if ((flags & elfcpp::SHF_EXECINSTR) != 0)
1498 ret |= elfcpp::PF_X;
1499 return ret;
1500}
1501
1502// Make a new Output_section, and attach it to segments as
22f0da72
ILT
1503// appropriate. ORDER is the order in which this section should
1504// appear in the output segment. IS_RELRO is true if this is a relro
1505// (read-only after relocations) section.
a2fb1b05
ILT
1506
1507Output_section*
1508Layout::make_output_section(const char* name, elfcpp::Elf_Word type,
22f0da72
ILT
1509 elfcpp::Elf_Xword flags,
1510 Output_section_order order, bool is_relro)
a2fb1b05 1511{
96803768
ILT
1512 Output_section* os;
1513 if ((flags & elfcpp::SHF_ALLOC) == 0
e55bde5e 1514 && strcmp(parameters->options().compress_debug_sections(), "none") != 0
96803768 1515 && is_compressible_debug_section(name))
e55bde5e
ILT
1516 os = new Output_compressed_section(&parameters->options(), name, type,
1517 flags);
62b01cb5 1518 else if ((flags & elfcpp::SHF_ALLOC) == 0
2e702c99
RM
1519 && parameters->options().strip_debug_non_line()
1520 && strcmp(".debug_abbrev", name) == 0)
62b01cb5
ILT
1521 {
1522 os = this->debug_abbrev_ = new Output_reduced_debug_abbrev_section(
2e702c99 1523 name, type, flags);
62b01cb5 1524 if (this->debug_info_)
2e702c99 1525 this->debug_info_->set_abbreviations(this->debug_abbrev_);
62b01cb5
ILT
1526 }
1527 else if ((flags & elfcpp::SHF_ALLOC) == 0
2e702c99
RM
1528 && parameters->options().strip_debug_non_line()
1529 && strcmp(".debug_info", name) == 0)
62b01cb5
ILT
1530 {
1531 os = this->debug_info_ = new Output_reduced_debug_info_section(
2e702c99 1532 name, type, flags);
62b01cb5 1533 if (this->debug_abbrev_)
2e702c99 1534 this->debug_info_->set_abbreviations(this->debug_abbrev_);
62b01cb5 1535 }
09ec0418 1536 else
c0a62865 1537 {
5393d741
ILT
1538 // Sometimes .init_array*, .preinit_array* and .fini_array* do
1539 // not have correct section types. Force them here.
1540 if (type == elfcpp::SHT_PROGBITS)
1541 {
1542 if (is_prefix_of(".init_array", name))
1543 type = elfcpp::SHT_INIT_ARRAY;
1544 else if (is_prefix_of(".preinit_array", name))
1545 type = elfcpp::SHT_PREINIT_ARRAY;
1546 else if (is_prefix_of(".fini_array", name))
1547 type = elfcpp::SHT_FINI_ARRAY;
1548 }
1549
c0a62865
DK
1550 // FIXME: const_cast is ugly.
1551 Target* target = const_cast<Target*>(&parameters->target());
1552 os = target->make_output_section(name, type, flags);
1553 }
96803768 1554
22f0da72
ILT
1555 // With -z relro, we have to recognize the special sections by name.
1556 // There is no other way.
1557 bool is_relro_local = false;
1558 if (!this->script_options_->saw_sections_clause()
1559 && parameters->options().relro()
22f0da72
ILT
1560 && (flags & elfcpp::SHF_ALLOC) != 0
1561 && (flags & elfcpp::SHF_WRITE) != 0)
1562 {
14dc9ef7 1563 if (type == elfcpp::SHT_PROGBITS)
22f0da72 1564 {
1007b503
CC
1565 if ((flags & elfcpp::SHF_TLS) != 0)
1566 is_relro = true;
1567 else if (strcmp(name, ".data.rel.ro") == 0)
14dc9ef7
ILT
1568 is_relro = true;
1569 else if (strcmp(name, ".data.rel.ro.local") == 0)
1570 {
1571 is_relro = true;
1572 is_relro_local = true;
1573 }
1574 else if (strcmp(name, ".ctors") == 0
1575 || strcmp(name, ".dtors") == 0
1576 || strcmp(name, ".jcr") == 0)
1577 is_relro = true;
22f0da72
ILT
1578 }
1579 else if (type == elfcpp::SHT_INIT_ARRAY
1580 || type == elfcpp::SHT_FINI_ARRAY
1581 || type == elfcpp::SHT_PREINIT_ARRAY)
1582 is_relro = true;
22f0da72
ILT
1583 }
1584
1a2dff53
ILT
1585 if (is_relro)
1586 os->set_is_relro();
22f0da72
ILT
1587
1588 if (order == ORDER_INVALID && (flags & elfcpp::SHF_ALLOC) != 0)
1589 order = this->default_section_order(os, is_relro_local);
1590
1591 os->set_order(order);
f5c870d2 1592
8a5e3e08
ILT
1593 parameters->target().new_output_section(os);
1594
a3ad94ed 1595 this->section_list_.push_back(os);
a2fb1b05 1596
2fd32231
ILT
1597 // The GNU linker by default sorts some sections by priority, so we
1598 // do the same. We need to know that this might happen before we
1599 // attach any input sections.
1600 if (!this->script_options_->saw_sections_clause()
5393d741
ILT
1601 && !parameters->options().relocatable()
1602 && (strcmp(name, ".init_array") == 0
1603 || strcmp(name, ".fini_array") == 0
1604 || (!parameters->options().ctors_in_init_array()
1605 && (strcmp(name, ".ctors") == 0
1606 || strcmp(name, ".dtors") == 0))))
2fd32231
ILT
1607 os->set_may_sort_attached_input_sections();
1608
1518dc8f
ILT
1609 // Check for .stab*str sections, as .stab* sections need to link to
1610 // them.
1611 if (type == elfcpp::SHT_STRTAB
1612 && !this->have_stabstr_section_
1613 && strncmp(name, ".stab", 5) == 0
1614 && strcmp(name + strlen(name) - 3, "str") == 0)
1615 this->have_stabstr_section_ = true;
1616
9fbd3822
CC
1617 // During a full incremental link, we add patch space to most
1618 // PROGBITS and NOBITS sections. Flag those that may be
1619 // arbitrarily padded.
1620 if ((type == elfcpp::SHT_PROGBITS || type == elfcpp::SHT_NOBITS)
1621 && order != ORDER_INTERP
1622 && order != ORDER_INIT
1623 && order != ORDER_PLT
1624 && order != ORDER_FINI
1625 && order != ORDER_RELRO_LAST
1626 && order != ORDER_NON_RELRO_FIRST
aa06ae28 1627 && strcmp(name, ".eh_frame") != 0
9fbd3822
CC
1628 && strcmp(name, ".ctors") != 0
1629 && strcmp(name, ".dtors") != 0
1630 && strcmp(name, ".jcr") != 0)
8ea8cd50
CC
1631 {
1632 os->set_is_patch_space_allowed();
1633
1634 // Certain sections require "holes" to be filled with
1635 // specific fill patterns. These fill patterns may have
1636 // a minimum size, so we must prevent allocations from the
1637 // free list that leave a hole smaller than the minimum.
1638 if (strcmp(name, ".debug_info") == 0)
2e702c99 1639 os->set_free_space_fill(new Output_fill_debug_info(false));
8ea8cd50 1640 else if (strcmp(name, ".debug_types") == 0)
2e702c99 1641 os->set_free_space_fill(new Output_fill_debug_info(true));
8ea8cd50 1642 else if (strcmp(name, ".debug_line") == 0)
2e702c99 1643 os->set_free_space_fill(new Output_fill_debug_line());
8ea8cd50 1644 }
9fbd3822 1645
154e0e9a
ILT
1646 // If we have already attached the sections to segments, then we
1647 // need to attach this one now. This happens for sections created
1648 // directly by the linker.
1649 if (this->sections_are_attached_)
2e702c99 1650 this->attach_section_to_segment(&parameters->target(), os);
154e0e9a 1651
4e2b1697
ILT
1652 return os;
1653}
a445fddf 1654
22f0da72
ILT
1655// Return the default order in which a section should be placed in an
1656// output segment. This function captures a lot of the ideas in
1657// ld/scripttempl/elf.sc in the GNU linker. Note that the order of a
1658// linker created section is normally set when the section is created;
1659// this function is used for input sections.
1660
1661Output_section_order
1662Layout::default_section_order(Output_section* os, bool is_relro_local)
1663{
1664 gold_assert((os->flags() & elfcpp::SHF_ALLOC) != 0);
1665 bool is_write = (os->flags() & elfcpp::SHF_WRITE) != 0;
1666 bool is_execinstr = (os->flags() & elfcpp::SHF_EXECINSTR) != 0;
1667 bool is_bss = false;
1668
1669 switch (os->type())
1670 {
1671 default:
1672 case elfcpp::SHT_PROGBITS:
1673 break;
1674 case elfcpp::SHT_NOBITS:
1675 is_bss = true;
1676 break;
1677 case elfcpp::SHT_RELA:
1678 case elfcpp::SHT_REL:
1679 if (!is_write)
1680 return ORDER_DYNAMIC_RELOCS;
1681 break;
1682 case elfcpp::SHT_HASH:
1683 case elfcpp::SHT_DYNAMIC:
1684 case elfcpp::SHT_SHLIB:
1685 case elfcpp::SHT_DYNSYM:
1686 case elfcpp::SHT_GNU_HASH:
1687 case elfcpp::SHT_GNU_verdef:
1688 case elfcpp::SHT_GNU_verneed:
1689 case elfcpp::SHT_GNU_versym:
1690 if (!is_write)
1691 return ORDER_DYNAMIC_LINKER;
1692 break;
1693 case elfcpp::SHT_NOTE:
1694 return is_write ? ORDER_RW_NOTE : ORDER_RO_NOTE;
1695 }
1696
1697 if ((os->flags() & elfcpp::SHF_TLS) != 0)
1698 return is_bss ? ORDER_TLS_BSS : ORDER_TLS_DATA;
1699
1700 if (!is_bss && !is_write)
1701 {
1702 if (is_execinstr)
1703 {
1704 if (strcmp(os->name(), ".init") == 0)
1705 return ORDER_INIT;
1706 else if (strcmp(os->name(), ".fini") == 0)
1707 return ORDER_FINI;
1708 }
1709 return is_execinstr ? ORDER_TEXT : ORDER_READONLY;
1710 }
1711
1712 if (os->is_relro())
1713 return is_relro_local ? ORDER_RELRO_LOCAL : ORDER_RELRO;
1714
1715 if (os->is_small_section())
1716 return is_bss ? ORDER_SMALL_BSS : ORDER_SMALL_DATA;
1717 if (os->is_large_section())
1718 return is_bss ? ORDER_LARGE_BSS : ORDER_LARGE_DATA;
1719
1720 return is_bss ? ORDER_BSS : ORDER_DATA;
1721}
1722
154e0e9a
ILT
1723// Attach output sections to segments. This is called after we have
1724// seen all the input sections.
1725
1726void
2e702c99 1727Layout::attach_sections_to_segments(const Target* target)
154e0e9a
ILT
1728{
1729 for (Section_list::iterator p = this->section_list_.begin();
1730 p != this->section_list_.end();
1731 ++p)
2e702c99 1732 this->attach_section_to_segment(target, *p);
154e0e9a
ILT
1733
1734 this->sections_are_attached_ = true;
1735}
1736
1737// Attach an output section to a segment.
1738
1739void
2e702c99 1740Layout::attach_section_to_segment(const Target* target, Output_section* os)
154e0e9a
ILT
1741{
1742 if ((os->flags() & elfcpp::SHF_ALLOC) == 0)
1743 this->unattached_section_list_.push_back(os);
1744 else
2e702c99 1745 this->attach_allocated_section_to_segment(target, os);
154e0e9a
ILT
1746}
1747
4e2b1697 1748// Attach an allocated output section to a segment.
1c4f3631 1749
4e2b1697 1750void
2e702c99
RM
1751Layout::attach_allocated_section_to_segment(const Target* target,
1752 Output_section* os)
4e2b1697 1753{
154e0e9a 1754 elfcpp::Elf_Xword flags = os->flags();
4e2b1697 1755 gold_assert((flags & elfcpp::SHF_ALLOC) != 0);
a2fb1b05 1756
4e2b1697
ILT
1757 if (parameters->options().relocatable())
1758 return;
a2fb1b05 1759
4e2b1697
ILT
1760 // If we have a SECTIONS clause, we can't handle the attachment to
1761 // segments until after we've seen all the sections.
1762 if (this->script_options_->saw_sections_clause())
1763 return;
a2fb1b05 1764
4e2b1697 1765 gold_assert(!this->script_options_->saw_phdrs_clause());
756ac4a8 1766
4e2b1697 1767 // This output section goes into a PT_LOAD segment.
a2fb1b05 1768
4e2b1697 1769 elfcpp::Elf_Word seg_flags = Layout::section_flags_to_segment(flags);
a2fb1b05 1770
16164a6b
ST
1771 // If this output section's segment has extra flags that need to be set,
1772 // coming from a linker plugin, do that.
1773 seg_flags |= os->extra_segment_flags();
1774
a192ba05
ILT
1775 // Check for --section-start.
1776 uint64_t addr;
1777 bool is_address_set = parameters->options().section_start(os->name(), &addr);
f5c870d2 1778
4e2b1697 1779 // In general the only thing we really care about for PT_LOAD
0f72bf6f
RÁE
1780 // segments is whether or not they are writable or executable,
1781 // so that is how we search for them.
1782 // Large data sections also go into their own PT_LOAD segment.
1783 // People who need segments sorted on some other basis will
1784 // have to use a linker script.
a2fb1b05 1785
4e2b1697 1786 Segment_list::const_iterator p;
16164a6b 1787 if (!os->is_unique_segment())
4e2b1697 1788 {
16164a6b
ST
1789 for (p = this->segment_list_.begin();
1790 p != this->segment_list_.end();
1791 ++p)
a192ba05 1792 {
16164a6b
ST
1793 if ((*p)->type() != elfcpp::PT_LOAD)
1794 continue;
1795 if ((*p)->is_unique_segment())
1796 continue;
1797 if (!parameters->options().omagic()
1798 && ((*p)->flags() & elfcpp::PF_W) != (seg_flags & elfcpp::PF_W))
1799 continue;
1800 if ((target->isolate_execinstr() || parameters->options().rosegment())
1801 && ((*p)->flags() & elfcpp::PF_X) != (seg_flags & elfcpp::PF_X))
1802 continue;
1803 // If -Tbss was specified, we need to separate the data and BSS
1804 // segments.
1805 if (parameters->options().user_set_Tbss())
1806 {
1807 if ((os->type() == elfcpp::SHT_NOBITS)
1808 == (*p)->has_any_data_sections())
1809 continue;
1810 }
1811 if (os->is_large_data_section() && !(*p)->is_large_data_segment())
1812 continue;
1813
1814 if (is_address_set)
1815 {
1816 if ((*p)->are_addresses_set())
1817 continue;
1818
1819 (*p)->add_initial_output_data(os);
1820 (*p)->update_flags_for_output_section(seg_flags);
1821 (*p)->set_addresses(addr, addr);
1822 break;
1823 }
1824
1825 (*p)->add_output_section_to_load(this, os, seg_flags);
1826 break;
1827 }
1828 }
1829
1830 if (p == this->segment_list_.end()
1831 || os->is_unique_segment())
4e2b1697
ILT
1832 {
1833 Output_segment* oseg = this->make_output_segment(elfcpp::PT_LOAD,
2e702c99 1834 seg_flags);
8a5e3e08
ILT
1835 if (os->is_large_data_section())
1836 oseg->set_is_large_data_segment();
22f0da72 1837 oseg->add_output_section_to_load(this, os, seg_flags);
a192ba05
ILT
1838 if (is_address_set)
1839 oseg->set_addresses(addr, addr);
16164a6b
ST
1840 // Check if segment should be marked unique. For segments marked
1841 // unique by linker plugins, set the new alignment if specified.
1842 if (os->is_unique_segment())
1843 {
1844 oseg->set_is_unique_segment();
1845 if (os->segment_alignment() != 0)
1846 oseg->set_minimum_p_align(os->segment_alignment());
1847 }
a2fb1b05
ILT
1848 }
1849
4e2b1697
ILT
1850 // If we see a loadable SHT_NOTE section, we create a PT_NOTE
1851 // segment.
1852 if (os->type() == elfcpp::SHT_NOTE)
1853 {
1854 // See if we already have an equivalent PT_NOTE segment.
1855 for (p = this->segment_list_.begin();
2e702c99
RM
1856 p != segment_list_.end();
1857 ++p)
1858 {
1859 if ((*p)->type() == elfcpp::PT_NOTE
1860 && (((*p)->flags() & elfcpp::PF_W)
1861 == (seg_flags & elfcpp::PF_W)))
1862 {
1863 (*p)->add_output_section_to_nonload(os, seg_flags);
1864 break;
1865 }
1866 }
4e2b1697
ILT
1867
1868 if (p == this->segment_list_.end())
2e702c99
RM
1869 {
1870 Output_segment* oseg = this->make_output_segment(elfcpp::PT_NOTE,
1871 seg_flags);
1872 oseg->add_output_section_to_nonload(os, seg_flags);
1873 }
4e2b1697
ILT
1874 }
1875
1876 // If we see a loadable SHF_TLS section, we create a PT_TLS
1877 // segment. There can only be one such segment.
1878 if ((flags & elfcpp::SHF_TLS) != 0)
1879 {
1880 if (this->tls_segment_ == NULL)
2d924fd9 1881 this->make_output_segment(elfcpp::PT_TLS, seg_flags);
22f0da72 1882 this->tls_segment_->add_output_section_to_nonload(os, seg_flags);
4e2b1697 1883 }
9f1d377b
ILT
1884
1885 // If -z relro is in effect, and we see a relro section, we create a
1886 // PT_GNU_RELRO segment. There can only be one such segment.
1887 if (os->is_relro() && parameters->options().relro())
1888 {
1889 gold_assert(seg_flags == (elfcpp::PF_R | elfcpp::PF_W));
1890 if (this->relro_segment_ == NULL)
2d924fd9 1891 this->make_output_segment(elfcpp::PT_GNU_RELRO, seg_flags);
22f0da72 1892 this->relro_segment_->add_output_section_to_nonload(os, seg_flags);
9f1d377b 1893 }
10b4f102 1894
e1f74f98
ILT
1895 // If we see a section named .interp, put it into a PT_INTERP
1896 // segment. This seems broken to me, but this is what GNU ld does,
1897 // and glibc expects it.
10b4f102 1898 if (strcmp(os->name(), ".interp") == 0
e1f74f98 1899 && !this->script_options_->saw_phdrs_clause())
10b4f102
ILT
1900 {
1901 if (this->interp_segment_ == NULL)
1902 this->make_output_segment(elfcpp::PT_INTERP, seg_flags);
e1f74f98
ILT
1903 else
1904 gold_warning(_("multiple '.interp' sections in input files "
1905 "may cause confusing PT_INTERP segment"));
10b4f102
ILT
1906 this->interp_segment_->add_output_section_to_nonload(os, seg_flags);
1907 }
a2fb1b05
ILT
1908}
1909
919ed24c
ILT
1910// Make an output section for a script.
1911
1912Output_section*
1e5d2fb1
DK
1913Layout::make_output_section_for_script(
1914 const char* name,
1915 Script_sections::Section_type section_type)
919ed24c
ILT
1916{
1917 name = this->namepool_.add(name, false, NULL);
1e5d2fb1
DK
1918 elfcpp::Elf_Xword sh_flags = elfcpp::SHF_ALLOC;
1919 if (section_type == Script_sections::ST_NOLOAD)
1920 sh_flags = 0;
919ed24c 1921 Output_section* os = this->make_output_section(name, elfcpp::SHT_PROGBITS,
22f0da72
ILT
1922 sh_flags, ORDER_INVALID,
1923 false);
919ed24c 1924 os->set_found_in_sections_clause();
1e5d2fb1
DK
1925 if (section_type == Script_sections::ST_NOLOAD)
1926 os->set_is_noload();
919ed24c
ILT
1927 return os;
1928}
1929
3802b2dd
ILT
1930// Return the number of segments we expect to see.
1931
1932size_t
1933Layout::expected_segment_count() const
1934{
1935 size_t ret = this->segment_list_.size();
1936
1937 // If we didn't see a SECTIONS clause in a linker script, we should
1938 // already have the complete list of segments. Otherwise we ask the
1939 // SECTIONS clause how many segments it expects, and add in the ones
1940 // we already have (PT_GNU_STACK, PT_GNU_EH_FRAME, etc.)
1941
1942 if (!this->script_options_->saw_sections_clause())
1943 return ret;
1944 else
1945 {
1946 const Script_sections* ss = this->script_options_->script_sections();
1947 return ret + ss->expected_segment_count(this);
1948 }
1949}
1950
35cdfc9a
ILT
1951// Handle the .note.GNU-stack section at layout time. SEEN_GNU_STACK
1952// is whether we saw a .note.GNU-stack section in the object file.
1953// GNU_STACK_FLAGS is the section flags. The flags give the
1954// protection required for stack memory. We record this in an
1955// executable as a PT_GNU_STACK segment. If an object file does not
1956// have a .note.GNU-stack segment, we must assume that it is an old
1957// object. On some targets that will force an executable stack.
1958
1959void
83e17bd5
CC
1960Layout::layout_gnu_stack(bool seen_gnu_stack, uint64_t gnu_stack_flags,
1961 const Object* obj)
35cdfc9a
ILT
1962{
1963 if (!seen_gnu_stack)
83e17bd5
CC
1964 {
1965 this->input_without_gnu_stack_note_ = true;
1966 if (parameters->options().warn_execstack()
1967 && parameters->target().is_default_stack_executable())
1968 gold_warning(_("%s: missing .note.GNU-stack section"
1969 " implies executable stack"),
1970 obj->name().c_str());
1971 }
35cdfc9a
ILT
1972 else
1973 {
1974 this->input_with_gnu_stack_note_ = true;
1975 if ((gnu_stack_flags & elfcpp::SHF_EXECINSTR) != 0)
83e17bd5
CC
1976 {
1977 this->input_requires_executable_stack_ = true;
1978 if (parameters->options().warn_execstack()
1979 || parameters->options().is_stack_executable())
1980 gold_warning(_("%s: requires executable stack"),
1981 obj->name().c_str());
1982 }
35cdfc9a
ILT
1983 }
1984}
1985
9c547ec3
ILT
1986// Create automatic note sections.
1987
1988void
1989Layout::create_notes()
1990{
1991 this->create_gold_note();
1992 this->create_executable_stack_info();
1993 this->create_build_id();
1994}
1995
a3ad94ed
ILT
1996// Create the dynamic sections which are needed before we read the
1997// relocs.
1998
1999void
9b07f471 2000Layout::create_initial_dynamic_sections(Symbol_table* symtab)
a3ad94ed 2001{
436ca963 2002 if (parameters->doing_static_link())
a3ad94ed
ILT
2003 return;
2004
3802b2dd
ILT
2005 this->dynamic_section_ = this->choose_output_section(NULL, ".dynamic",
2006 elfcpp::SHT_DYNAMIC,
2007 (elfcpp::SHF_ALLOC
2008 | elfcpp::SHF_WRITE),
22f0da72
ILT
2009 false, ORDER_RELRO,
2010 true);
a3ad94ed 2011
6daf5215
ILT
2012 // A linker script may discard .dynamic, so check for NULL.
2013 if (this->dynamic_section_ != NULL)
2014 {
2015 this->dynamic_symbol_ =
2016 symtab->define_in_output_data("_DYNAMIC", NULL,
2017 Symbol_table::PREDEFINED,
2018 this->dynamic_section_, 0, 0,
2019 elfcpp::STT_OBJECT, elfcpp::STB_LOCAL,
2020 elfcpp::STV_HIDDEN, 0, false, false);
16649710 2021
6daf5215 2022 this->dynamic_data_ = new Output_data_dynamic(&this->dynpool_);
16649710 2023
6daf5215
ILT
2024 this->dynamic_section_->add_output_section_data(this->dynamic_data_);
2025 }
a3ad94ed
ILT
2026}
2027
bfd58944
ILT
2028// For each output section whose name can be represented as C symbol,
2029// define __start and __stop symbols for the section. This is a GNU
2030// extension.
2031
2032void
9b07f471 2033Layout::define_section_symbols(Symbol_table* symtab)
bfd58944
ILT
2034{
2035 for (Section_list::const_iterator p = this->section_list_.begin();
2036 p != this->section_list_.end();
2037 ++p)
2038 {
2039 const char* const name = (*p)->name();
f1ec9ded 2040 if (is_cident(name))
bfd58944
ILT
2041 {
2042 const std::string name_string(name);
f1ec9ded 2043 const std::string start_name(cident_section_start_prefix
2e702c99 2044 + name_string);
f1ec9ded 2045 const std::string stop_name(cident_section_stop_prefix
2e702c99 2046 + name_string);
bfd58944 2047
9b07f471 2048 symtab->define_in_output_data(start_name.c_str(),
bfd58944 2049 NULL, // version
99fff23b 2050 Symbol_table::PREDEFINED,
bfd58944
ILT
2051 *p,
2052 0, // value
2053 0, // symsize
2054 elfcpp::STT_NOTYPE,
2055 elfcpp::STB_GLOBAL,
2056 elfcpp::STV_DEFAULT,
2057 0, // nonvis
2058 false, // offset_is_from_end
a445fddf 2059 true); // only_if_ref
bfd58944 2060
9b07f471 2061 symtab->define_in_output_data(stop_name.c_str(),
bfd58944 2062 NULL, // version
99fff23b 2063 Symbol_table::PREDEFINED,
bfd58944
ILT
2064 *p,
2065 0, // value
2066 0, // symsize
2067 elfcpp::STT_NOTYPE,
2068 elfcpp::STB_GLOBAL,
2069 elfcpp::STV_DEFAULT,
2070 0, // nonvis
2071 true, // offset_is_from_end
a445fddf 2072 true); // only_if_ref
bfd58944
ILT
2073 }
2074 }
2075}
2076
755ab8af
ILT
2077// Define symbols for group signatures.
2078
2079void
2080Layout::define_group_signatures(Symbol_table* symtab)
2081{
2082 for (Group_signatures::iterator p = this->group_signatures_.begin();
2083 p != this->group_signatures_.end();
2084 ++p)
2085 {
2086 Symbol* sym = symtab->lookup(p->signature, NULL);
2087 if (sym != NULL)
2088 p->section->set_info_symndx(sym);
2089 else
2090 {
2091 // Force the name of the group section to the group
2092 // signature, and use the group's section symbol as the
2093 // signature symbol.
2094 if (strcmp(p->section->name(), p->signature) != 0)
2095 {
2096 const char* name = this->namepool_.add(p->signature,
2097 true, NULL);
2098 p->section->set_name(name);
2099 }
2100 p->section->set_needs_symtab_index();
2101 p->section->set_info_section_symndx(p->section);
2102 }
2103 }
2104
2105 this->group_signatures_.clear();
2106}
2107
75f65a3e
ILT
2108// Find the first read-only PT_LOAD segment, creating one if
2109// necessary.
54dc6425 2110
75f65a3e 2111Output_segment*
2e702c99 2112Layout::find_first_load_seg(const Target* target)
54dc6425 2113{
0f72bf6f 2114 Output_segment* best = NULL;
75f65a3e
ILT
2115 for (Segment_list::const_iterator p = this->segment_list_.begin();
2116 p != this->segment_list_.end();
2117 ++p)
2118 {
2119 if ((*p)->type() == elfcpp::PT_LOAD
2120 && ((*p)->flags() & elfcpp::PF_R) != 0
af6156ef 2121 && (parameters->options().omagic()
2e702c99
RM
2122 || ((*p)->flags() & elfcpp::PF_W) == 0)
2123 && (!target->isolate_execinstr()
2124 || ((*p)->flags() & elfcpp::PF_X) == 0))
2125 {
2126 if (best == NULL || this->segment_precedes(*p, best))
2127 best = *p;
2128 }
75f65a3e 2129 }
0f72bf6f
RÁE
2130 if (best != NULL)
2131 return best;
75f65a3e 2132
1c4f3631
ILT
2133 gold_assert(!this->script_options_->saw_phdrs_clause());
2134
3802b2dd
ILT
2135 Output_segment* load_seg = this->make_output_segment(elfcpp::PT_LOAD,
2136 elfcpp::PF_R);
75f65a3e 2137 return load_seg;
54dc6425
ILT
2138}
2139
20e6d0d6
DK
2140// Save states of all current output segments. Store saved states
2141// in SEGMENT_STATES.
2142
2143void
2144Layout::save_segments(Segment_states* segment_states)
2145{
2146 for (Segment_list::const_iterator p = this->segment_list_.begin();
2147 p != this->segment_list_.end();
2148 ++p)
2149 {
2150 Output_segment* segment = *p;
2151 // Shallow copy.
2152 Output_segment* copy = new Output_segment(*segment);
2153 (*segment_states)[segment] = copy;
2154 }
2155}
2156
2157// Restore states of output segments and delete any segment not found in
2158// SEGMENT_STATES.
2159
2160void
2161Layout::restore_segments(const Segment_states* segment_states)
2162{
2163 // Go through the segment list and remove any segment added in the
2164 // relaxation loop.
2165 this->tls_segment_ = NULL;
2166 this->relro_segment_ = NULL;
2167 Segment_list::iterator list_iter = this->segment_list_.begin();
2168 while (list_iter != this->segment_list_.end())
2169 {
2170 Output_segment* segment = *list_iter;
2171 Segment_states::const_iterator states_iter =
2172 segment_states->find(segment);
2173 if (states_iter != segment_states->end())
2174 {
2175 const Output_segment* copy = states_iter->second;
2176 // Shallow copy to restore states.
2177 *segment = *copy;
2178
2179 // Also fix up TLS and RELRO segment pointers as appropriate.
2180 if (segment->type() == elfcpp::PT_TLS)
2181 this->tls_segment_ = segment;
2182 else if (segment->type() == elfcpp::PT_GNU_RELRO)
2183 this->relro_segment_ = segment;
2184
2185 ++list_iter;
2e702c99 2186 }
20e6d0d6
DK
2187 else
2188 {
2e702c99 2189 list_iter = this->segment_list_.erase(list_iter);
20e6d0d6
DK
2190 // This is a segment created during section layout. It should be
2191 // safe to remove it since we should have removed all pointers to it.
2192 delete segment;
2193 }
2194 }
2195}
2196
2197// Clean up after relaxation so that sections can be laid out again.
2198
2199void
2200Layout::clean_up_after_relaxation()
2201{
2202 // Restore the segments to point state just prior to the relaxation loop.
2203 Script_sections* script_section = this->script_options_->script_sections();
2204 script_section->release_segments();
2205 this->restore_segments(this->segment_states_);
2206
2207 // Reset section addresses and file offsets
2208 for (Section_list::iterator p = this->section_list_.begin();
2209 p != this->section_list_.end();
2210 ++p)
2211 {
20e6d0d6 2212 (*p)->restore_states();
8923b24c
DK
2213
2214 // If an input section changes size because of relaxation,
2215 // we need to adjust the section offsets of all input sections.
2216 // after such a section.
2217 if ((*p)->section_offsets_need_adjustment())
2218 (*p)->adjust_section_offsets();
2219
2220 (*p)->reset_address_and_file_offset();
20e6d0d6 2221 }
2e702c99 2222
20e6d0d6
DK
2223 // Reset special output object address and file offsets.
2224 for (Data_list::iterator p = this->special_output_list_.begin();
2225 p != this->special_output_list_.end();
2226 ++p)
2227 (*p)->reset_address_and_file_offset();
2228
2229 // A linker script may have created some output section data objects.
2230 // They are useless now.
2231 for (Output_section_data_list::const_iterator p =
2232 this->script_output_section_data_list_.begin();
2233 p != this->script_output_section_data_list_.end();
2234 ++p)
2235 delete *p;
2e702c99 2236 this->script_output_section_data_list_.clear();
20e6d0d6
DK
2237}
2238
2239// Prepare for relaxation.
2240
2241void
2242Layout::prepare_for_relaxation()
2243{
2244 // Create an relaxation debug check if in debugging mode.
2245 if (is_debugging_enabled(DEBUG_RELAXATION))
2246 this->relaxation_debug_check_ = new Relaxation_debug_check();
2247
2248 // Save segment states.
2249 this->segment_states_ = new Segment_states();
2250 this->save_segments(this->segment_states_);
2251
2252 for(Section_list::const_iterator p = this->section_list_.begin();
2253 p != this->section_list_.end();
2254 ++p)
2255 (*p)->save_states();
2256
2257 if (is_debugging_enabled(DEBUG_RELAXATION))
2258 this->relaxation_debug_check_->check_output_data_for_reset_values(
2e702c99 2259 this->section_list_, this->special_output_list_);
20e6d0d6
DK
2260
2261 // Also enable recording of output section data from scripts.
2262 this->record_output_section_data_from_script_ = true;
2263}
2264
2265// Relaxation loop body: If target has no relaxation, this runs only once
2266// Otherwise, the target relaxation hook is called at the end of
2267// each iteration. If the hook returns true, it means re-layout of
2e702c99 2268// section is required.
20e6d0d6
DK
2269//
2270// The number of segments created by a linking script without a PHDRS
2271// clause may be affected by section sizes and alignments. There is
2272// a remote chance that relaxation causes different number of PT_LOAD
2273// segments are created and sections are attached to different segments.
2274// Therefore, we always throw away all segments created during section
2275// layout. In order to be able to restart the section layout, we keep
2276// a copy of the segment list right before the relaxation loop and use
2277// that to restore the segments.
2e702c99
RM
2278//
2279// PASS is the current relaxation pass number.
20e6d0d6
DK
2280// SYMTAB is a symbol table.
2281// PLOAD_SEG is the address of a pointer for the load segment.
2282// PHDR_SEG is a pointer to the PHDR segment.
2283// SEGMENT_HEADERS points to the output segment header.
2284// FILE_HEADER points to the output file header.
2285// PSHNDX is the address to store the output section index.
2286
2287off_t inline
2288Layout::relaxation_loop_body(
2289 int pass,
2290 Target* target,
2291 Symbol_table* symtab,
2292 Output_segment** pload_seg,
2293 Output_segment* phdr_seg,
2294 Output_segment_headers* segment_headers,
2295 Output_file_header* file_header,
2296 unsigned int* pshndx)
2297{
2298 // If this is not the first iteration, we need to clean up after
2299 // relaxation so that we can lay out the sections again.
2300 if (pass != 0)
2301 this->clean_up_after_relaxation();
2302
2303 // If there is a SECTIONS clause, put all the input sections into
2304 // the required order.
2305 Output_segment* load_seg;
2306 if (this->script_options_->saw_sections_clause())
2307 load_seg = this->set_section_addresses_from_script(symtab);
2308 else if (parameters->options().relocatable())
2309 load_seg = NULL;
2310 else
2e702c99 2311 load_seg = this->find_first_load_seg(target);
20e6d0d6
DK
2312
2313 if (parameters->options().oformat_enum()
2314 != General_options::OBJECT_FORMAT_ELF)
2315 load_seg = NULL;
2316
403a15dd
ILT
2317 // If the user set the address of the text segment, that may not be
2318 // compatible with putting the segment headers and file headers into
2319 // that segment.
d12a5ea8
ILT
2320 if (parameters->options().user_set_Ttext()
2321 && parameters->options().Ttext() % target->common_pagesize() != 0)
2322 {
2323 load_seg = NULL;
2324 phdr_seg = NULL;
2325 }
403a15dd 2326
68b6574b
ILT
2327 gold_assert(phdr_seg == NULL
2328 || load_seg != NULL
2329 || this->script_options_->saw_sections_clause());
20e6d0d6 2330
a192ba05 2331 // If the address of the load segment we found has been set by
1e3811b0
ILT
2332 // --section-start rather than by a script, then adjust the VMA and
2333 // LMA downward if possible to include the file and section headers.
2334 uint64_t header_gap = 0;
a192ba05
ILT
2335 if (load_seg != NULL
2336 && load_seg->are_addresses_set()
1e3811b0
ILT
2337 && !this->script_options_->saw_sections_clause()
2338 && !parameters->options().relocatable())
2339 {
2340 file_header->finalize_data_size();
2341 segment_headers->finalize_data_size();
2342 size_t sizeof_headers = (file_header->data_size()
2343 + segment_headers->data_size());
2344 const uint64_t abi_pagesize = target->abi_pagesize();
2345 uint64_t hdr_paddr = load_seg->paddr() - sizeof_headers;
2346 hdr_paddr &= ~(abi_pagesize - 1);
2347 uint64_t subtract = load_seg->paddr() - hdr_paddr;
2348 if (load_seg->paddr() < subtract || load_seg->vaddr() < subtract)
2349 load_seg = NULL;
2350 else
2351 {
2352 load_seg->set_addresses(load_seg->vaddr() - subtract,
2353 load_seg->paddr() - subtract);
2354 header_gap = subtract - sizeof_headers;
2355 }
2356 }
a192ba05 2357
20e6d0d6
DK
2358 // Lay out the segment headers.
2359 if (!parameters->options().relocatable())
2360 {
2361 gold_assert(segment_headers != NULL);
1e3811b0
ILT
2362 if (header_gap != 0 && load_seg != NULL)
2363 {
2364 Output_data_zero_fill* z = new Output_data_zero_fill(header_gap, 1);
2365 load_seg->add_initial_output_data(z);
2366 }
20e6d0d6 2367 if (load_seg != NULL)
2e702c99 2368 load_seg->add_initial_output_data(segment_headers);
20e6d0d6 2369 if (phdr_seg != NULL)
2e702c99 2370 phdr_seg->add_initial_output_data(segment_headers);
20e6d0d6
DK
2371 }
2372
2373 // Lay out the file header.
2374 if (load_seg != NULL)
2375 load_seg->add_initial_output_data(file_header);
2376
2377 if (this->script_options_->saw_phdrs_clause()
2378 && !parameters->options().relocatable())
2379 {
2380 // Support use of FILEHDRS and PHDRS attachments in a PHDRS
2381 // clause in a linker script.
2382 Script_sections* ss = this->script_options_->script_sections();
2383 ss->put_headers_in_phdrs(file_header, segment_headers);
2384 }
2385
2386 // We set the output section indexes in set_segment_offsets and
2387 // set_section_indexes.
2388 *pshndx = 1;
2389
2390 // Set the file offsets of all the segments, and all the sections
2391 // they contain.
2392 off_t off;
2393 if (!parameters->options().relocatable())
2394 off = this->set_segment_offsets(target, load_seg, pshndx);
2395 else
2396 off = this->set_relocatable_section_offsets(file_header, pshndx);
2397
2398 // Verify that the dummy relaxation does not change anything.
2399 if (is_debugging_enabled(DEBUG_RELAXATION))
2400 {
2401 if (pass == 0)
2402 this->relaxation_debug_check_->read_sections(this->section_list_);
2403 else
2404 this->relaxation_debug_check_->verify_sections(this->section_list_);
2405 }
2406
2407 *pload_seg = load_seg;
2408 return off;
2409}
2410
6e9ba2ca
ST
2411// Search the list of patterns and find the postion of the given section
2412// name in the output section. If the section name matches a glob
2413// pattern and a non-glob name, then the non-glob position takes
2414// precedence. Return 0 if no match is found.
2415
2416unsigned int
2417Layout::find_section_order_index(const std::string& section_name)
2418{
2419 Unordered_map<std::string, unsigned int>::iterator map_it;
2420 map_it = this->input_section_position_.find(section_name);
2421 if (map_it != this->input_section_position_.end())
2422 return map_it->second;
2423
2424 // Absolute match failed. Linear search the glob patterns.
2425 std::vector<std::string>::iterator it;
2426 for (it = this->input_section_glob_.begin();
2427 it != this->input_section_glob_.end();
2428 ++it)
2429 {
2430 if (fnmatch((*it).c_str(), section_name.c_str(), FNM_NOESCAPE) == 0)
2e702c99
RM
2431 {
2432 map_it = this->input_section_position_.find(*it);
2433 gold_assert(map_it != this->input_section_position_.end());
2434 return map_it->second;
2435 }
6e9ba2ca
ST
2436 }
2437 return 0;
2438}
2439
2440// Read the sequence of input sections from the file specified with
e9552f7e 2441// option --section-ordering-file.
6e9ba2ca
ST
2442
2443void
2444Layout::read_layout_from_file()
2445{
2446 const char* filename = parameters->options().section_ordering_file();
2447 std::ifstream in;
2448 std::string line;
2449
2450 in.open(filename);
2451 if (!in)
2452 gold_fatal(_("unable to open --section-ordering-file file %s: %s"),
2e702c99 2453 filename, strerror(errno));
6e9ba2ca
ST
2454
2455 std::getline(in, line); // this chops off the trailing \n, if any
2456 unsigned int position = 1;
e9552f7e 2457 this->set_section_ordering_specified();
6e9ba2ca
ST
2458
2459 while (in)
2460 {
2461 if (!line.empty() && line[line.length() - 1] == '\r') // Windows
2e702c99 2462 line.resize(line.length() - 1);
6e9ba2ca
ST
2463 // Ignore comments, beginning with '#'
2464 if (line[0] == '#')
2e702c99
RM
2465 {
2466 std::getline(in, line);
2467 continue;
2468 }
6e9ba2ca
ST
2469 this->input_section_position_[line] = position;
2470 // Store all glob patterns in a vector.
2471 if (is_wildcard_string(line.c_str()))
2e702c99 2472 this->input_section_glob_.push_back(line);
6e9ba2ca
ST
2473 position++;
2474 std::getline(in, line);
2475 }
2476}
2477
54dc6425
ILT
2478// Finalize the layout. When this is called, we have created all the
2479// output sections and all the output segments which are based on
2480// input sections. We have several things to do, and we have to do
2481// them in the right order, so that we get the right results correctly
2482// and efficiently.
2483
2484// 1) Finalize the list of output segments and create the segment
2485// table header.
2486
2487// 2) Finalize the dynamic symbol table and associated sections.
2488
2489// 3) Determine the final file offset of all the output segments.
2490
2491// 4) Determine the final file offset of all the SHF_ALLOC output
2492// sections.
2493
75f65a3e
ILT
2494// 5) Create the symbol table sections and the section name table
2495// section.
2496
2497// 6) Finalize the symbol table: set symbol values to their final
54dc6425
ILT
2498// value and make a final determination of which symbols are going
2499// into the output symbol table.
2500
54dc6425
ILT
2501// 7) Create the section table header.
2502
2503// 8) Determine the final file offset of all the output sections which
2504// are not SHF_ALLOC, including the section table header.
2505
2506// 9) Finalize the ELF file header.
2507
75f65a3e
ILT
2508// This function returns the size of the output file.
2509
2510off_t
17a1d0a9 2511Layout::finalize(const Input_objects* input_objects, Symbol_table* symtab,
8851ecca 2512 Target* target, const Task* task)
54dc6425 2513{
f59f41f3 2514 target->finalize_sections(this, input_objects, symtab);
5a6f7e2d 2515
17a1d0a9 2516 this->count_local_symbols(task, input_objects);
7bf1f802 2517
1518dc8f 2518 this->link_stabs_sections();
4f211c8b 2519
3802b2dd 2520 Output_segment* phdr_seg = NULL;
8851ecca 2521 if (!parameters->options().relocatable() && !parameters->doing_static_link())
54dc6425 2522 {
dbe717ef
ILT
2523 // There was a dynamic object in the link. We need to create
2524 // some information for the dynamic linker.
2525
3802b2dd
ILT
2526 // Create the PT_PHDR segment which will hold the program
2527 // headers.
1c4f3631
ILT
2528 if (!this->script_options_->saw_phdrs_clause())
2529 phdr_seg = this->make_output_segment(elfcpp::PT_PHDR, elfcpp::PF_R);
3802b2dd 2530
14b31740
ILT
2531 // Create the dynamic symbol table, including the hash table.
2532 Output_section* dynstr;
2533 std::vector<Symbol*> dynamic_symbols;
2534 unsigned int local_dynamic_count;
a5dc0706 2535 Versions versions(*this->script_options()->version_script_info(),
2e702c99 2536 &this->dynpool_);
9b07f471 2537 this->create_dynamic_symtab(input_objects, symtab, &dynstr,
14b31740
ILT
2538 &local_dynamic_count, &dynamic_symbols,
2539 &versions);
dbe717ef
ILT
2540
2541 // Create the .interp section to hold the name of the
e1f74f98
ILT
2542 // interpreter, and put it in a PT_INTERP segment. Don't do it
2543 // if we saw a .interp section in an input file.
2544 if ((!parameters->options().shared()
2545 || parameters->options().dynamic_linker() != NULL)
2546 && this->interp_segment_ == NULL)
2e702c99 2547 this->create_interp(target);
a3ad94ed
ILT
2548
2549 // Finish the .dynamic section to hold the dynamic data, and put
2550 // it in a PT_DYNAMIC segment.
16649710 2551 this->finish_dynamic_section(input_objects, symtab);
14b31740
ILT
2552
2553 // We should have added everything we need to the dynamic string
2554 // table.
2555 this->dynpool_.set_string_offsets();
2556
2557 // Create the version sections. We can't do this until the
2558 // dynamic string table is complete.
46fe1623 2559 this->create_version_sections(&versions, symtab, local_dynamic_count,
14b31740 2560 dynamic_symbols, dynstr);
f0ba79e2
ILT
2561
2562 // Set the size of the _DYNAMIC symbol. We can't do this until
2563 // after we call create_version_sections.
2564 this->set_dynamic_symbol_size(symtab);
54dc6425 2565 }
2e702c99 2566
20e6d0d6
DK
2567 // Create segment headers.
2568 Output_segment_headers* segment_headers =
2569 (parameters->options().relocatable()
2570 ? NULL
2571 : new Output_segment_headers(this->segment_list_));
75f65a3e
ILT
2572
2573 // Lay out the file header.
a10ae760
ILT
2574 Output_file_header* file_header = new Output_file_header(target, symtab,
2575 segment_headers);
a445fddf 2576
61ba1cf9 2577 this->special_output_list_.push_back(file_header);
6a74a719
ILT
2578 if (segment_headers != NULL)
2579 this->special_output_list_.push_back(segment_headers);
75f65a3e 2580
20e6d0d6
DK
2581 // Find approriate places for orphan output sections if we are using
2582 // a linker script.
2583 if (this->script_options_->saw_sections_clause())
2584 this->place_orphan_sections_in_script();
2e702c99 2585
20e6d0d6
DK
2586 Output_segment* load_seg;
2587 off_t off;
2588 unsigned int shndx;
2589 int pass = 0;
2590
2591 // Take a snapshot of the section layout as needed.
2592 if (target->may_relax())
2593 this->prepare_for_relaxation();
2e702c99 2594
20e6d0d6
DK
2595 // Run the relaxation loop to lay out sections.
2596 do
1c4f3631 2597 {
20e6d0d6
DK
2598 off = this->relaxation_loop_body(pass, target, symtab, &load_seg,
2599 phdr_seg, segment_headers, file_header,
2600 &shndx);
2601 pass++;
1c4f3631 2602 }
c0a62865 2603 while (target->may_relax()
f625ae50 2604 && target->relax(pass, input_objects, symtab, this, task));
75f65a3e 2605
eabc84f4
RM
2606 // If there is a load segment that contains the file and program headers,
2607 // provide a symbol __ehdr_start pointing there.
2608 // A program can use this to examine itself robustly.
2609 if (load_seg != NULL)
2610 symtab->define_in_output_segment("__ehdr_start", NULL,
2611 Symbol_table::PREDEFINED, load_seg, 0, 0,
2612 elfcpp::STT_NOTYPE, elfcpp::STB_GLOBAL,
2613 elfcpp::STV_DEFAULT, 0,
2614 Symbol::SEGMENT_START, true);
2615
a9a60db6
ILT
2616 // Set the file offsets of all the non-data sections we've seen so
2617 // far which don't have to wait for the input sections. We need
2618 // this in order to finalize local symbols in non-allocated
2619 // sections.
2620 off = this->set_section_offsets(off, BEFORE_INPUT_SECTIONS_PASS);
2621
d491d34e
ILT
2622 // Set the section indexes of all unallocated sections seen so far,
2623 // in case any of them are somehow referenced by a symbol.
2624 shndx = this->set_section_indexes(shndx);
2625
75f65a3e 2626 // Create the symbol table sections.
d491d34e 2627 this->create_symtab_sections(input_objects, symtab, shndx, &off);
7bf1f802
ILT
2628 if (!parameters->doing_static_link())
2629 this->assign_local_dynsym_offsets(input_objects);
75f65a3e 2630
e5756efb
ILT
2631 // Process any symbol assignments from a linker script. This must
2632 // be called after the symbol table has been finalized.
2633 this->script_options_->finalize_symbols(symtab, this);
2634
09ec0418
CC
2635 // Create the incremental inputs sections.
2636 if (this->incremental_inputs_)
2637 {
2638 this->incremental_inputs_->finalize();
2639 this->create_incremental_info_sections(symtab);
2640 }
2641
75f65a3e
ILT
2642 // Create the .shstrtab section.
2643 Output_section* shstrtab_section = this->create_shstrtab();
2644
a9a60db6
ILT
2645 // Set the file offsets of the rest of the non-data sections which
2646 // don't have to wait for the input sections.
9a0910c3 2647 off = this->set_section_offsets(off, BEFORE_INPUT_SECTIONS_PASS);
86887060 2648
d491d34e
ILT
2649 // Now that all sections have been created, set the section indexes
2650 // for any sections which haven't been done yet.
86887060 2651 shndx = this->set_section_indexes(shndx);
ead1e424 2652
75f65a3e 2653 // Create the section table header.
d491d34e 2654 this->create_shdrs(shstrtab_section, &off);
75f65a3e 2655
17a1d0a9
ILT
2656 // If there are no sections which require postprocessing, we can
2657 // handle the section names now, and avoid a resize later.
2658 if (!this->any_postprocessing_sections_)
09ec0418
CC
2659 {
2660 off = this->set_section_offsets(off,
2661 POSTPROCESSING_SECTIONS_PASS);
2662 off =
2663 this->set_section_offsets(off,
17a1d0a9 2664 STRTAB_AFTER_POSTPROCESSING_SECTIONS_PASS);
09ec0418 2665 }
17a1d0a9 2666
27bc2bce 2667 file_header->set_section_info(this->section_headers_, shstrtab_section);
75f65a3e 2668
27bc2bce
ILT
2669 // Now we know exactly where everything goes in the output file
2670 // (except for non-allocated sections which require postprocessing).
a3ad94ed 2671 Output_data::layout_complete();
75f65a3e 2672
e44fcf3b
ILT
2673 this->output_file_size_ = off;
2674
75f65a3e
ILT
2675 return off;
2676}
2677
8ed814a9 2678// Create a note header following the format defined in the ELF ABI.
ec3f783e
ILT
2679// NAME is the name, NOTE_TYPE is the type, SECTION_NAME is the name
2680// of the section to create, DESCSZ is the size of the descriptor.
2681// ALLOCATE is true if the section should be allocated in memory.
2682// This returns the new note section. It sets *TRAILING_PADDING to
2683// the number of trailing zero bytes required.
4f211c8b 2684
8ed814a9 2685Output_section*
ef4ab7a8
PP
2686Layout::create_note(const char* name, int note_type,
2687 const char* section_name, size_t descsz,
8ed814a9 2688 bool allocate, size_t* trailing_padding)
4f211c8b 2689{
e2305dc0
ILT
2690 // Authorities all agree that the values in a .note field should
2691 // be aligned on 4-byte boundaries for 32-bit binaries. However,
2692 // they differ on what the alignment is for 64-bit binaries.
2693 // The GABI says unambiguously they take 8-byte alignment:
2694 // http://sco.com/developers/gabi/latest/ch5.pheader.html#note_section
2695 // Other documentation says alignment should always be 4 bytes:
2696 // http://www.netbsd.org/docs/kernel/elf-notes.html#note-format
2697 // GNU ld and GNU readelf both support the latter (at least as of
2698 // version 2.16.91), and glibc always generates the latter for
2699 // .note.ABI-tag (as of version 1.6), so that's the one we go with
2700 // here.
35cdfc9a 2701#ifdef GABI_FORMAT_FOR_DOTNOTE_SECTION // This is not defined by default.
8851ecca 2702 const int size = parameters->target().get_size();
e2305dc0
ILT
2703#else
2704 const int size = 32;
2705#endif
4f211c8b
ILT
2706
2707 // The contents of the .note section.
4f211c8b
ILT
2708 size_t namesz = strlen(name) + 1;
2709 size_t aligned_namesz = align_address(namesz, size / 8);
4f211c8b 2710 size_t aligned_descsz = align_address(descsz, size / 8);
4f211c8b 2711
8ed814a9 2712 size_t notehdrsz = 3 * (size / 8) + aligned_namesz;
4f211c8b 2713
8ed814a9
ILT
2714 unsigned char* buffer = new unsigned char[notehdrsz];
2715 memset(buffer, 0, notehdrsz);
4f211c8b 2716
8851ecca 2717 bool is_big_endian = parameters->target().is_big_endian();
4f211c8b
ILT
2718
2719 if (size == 32)
2720 {
2721 if (!is_big_endian)
2722 {
2723 elfcpp::Swap<32, false>::writeval(buffer, namesz);
2724 elfcpp::Swap<32, false>::writeval(buffer + 4, descsz);
2725 elfcpp::Swap<32, false>::writeval(buffer + 8, note_type);
2726 }
2727 else
2728 {
2729 elfcpp::Swap<32, true>::writeval(buffer, namesz);
2730 elfcpp::Swap<32, true>::writeval(buffer + 4, descsz);
2731 elfcpp::Swap<32, true>::writeval(buffer + 8, note_type);
2732 }
2733 }
2734 else if (size == 64)
2735 {
2736 if (!is_big_endian)
2737 {
2738 elfcpp::Swap<64, false>::writeval(buffer, namesz);
2739 elfcpp::Swap<64, false>::writeval(buffer + 8, descsz);
2740 elfcpp::Swap<64, false>::writeval(buffer + 16, note_type);
2741 }
2742 else
2743 {
2744 elfcpp::Swap<64, true>::writeval(buffer, namesz);
2745 elfcpp::Swap<64, true>::writeval(buffer + 8, descsz);
2746 elfcpp::Swap<64, true>::writeval(buffer + 16, note_type);
2747 }
2748 }
2749 else
2750 gold_unreachable();
2751
2752 memcpy(buffer + 3 * (size / 8), name, namesz);
4f211c8b 2753
8ed814a9 2754 elfcpp::Elf_Xword flags = 0;
22f0da72 2755 Output_section_order order = ORDER_INVALID;
8ed814a9 2756 if (allocate)
22f0da72
ILT
2757 {
2758 flags = elfcpp::SHF_ALLOC;
2759 order = ORDER_RO_NOTE;
2760 }
ec3f783e
ILT
2761 Output_section* os = this->choose_output_section(NULL, section_name,
2762 elfcpp::SHT_NOTE,
22f0da72 2763 flags, false, order, false);
9c547ec3
ILT
2764 if (os == NULL)
2765 return NULL;
2766
8ed814a9 2767 Output_section_data* posd = new Output_data_const_buffer(buffer, notehdrsz,
7d9e3d98
ILT
2768 size / 8,
2769 "** note header");
8ed814a9
ILT
2770 os->add_output_section_data(posd);
2771
2772 *trailing_padding = aligned_descsz - descsz;
2773
2774 return os;
2775}
2776
2777// For an executable or shared library, create a note to record the
2778// version of gold used to create the binary.
2779
2780void
2781Layout::create_gold_note()
2782{
cdc29364
CC
2783 if (parameters->options().relocatable()
2784 || parameters->incremental_update())
8ed814a9
ILT
2785 return;
2786
2787 std::string desc = std::string("gold ") + gold::get_version_string();
2788
2789 size_t trailing_padding;
ca09d69a 2790 Output_section* os = this->create_note("GNU", elfcpp::NT_GNU_GOLD_VERSION,
ef4ab7a8
PP
2791 ".note.gnu.gold-version", desc.size(),
2792 false, &trailing_padding);
9c547ec3
ILT
2793 if (os == NULL)
2794 return;
8ed814a9
ILT
2795
2796 Output_section_data* posd = new Output_data_const(desc, 4);
4f211c8b 2797 os->add_output_section_data(posd);
8ed814a9
ILT
2798
2799 if (trailing_padding > 0)
2800 {
7d9e3d98 2801 posd = new Output_data_zero_fill(trailing_padding, 0);
8ed814a9
ILT
2802 os->add_output_section_data(posd);
2803 }
4f211c8b
ILT
2804}
2805
35cdfc9a
ILT
2806// Record whether the stack should be executable. This can be set
2807// from the command line using the -z execstack or -z noexecstack
2808// options. Otherwise, if any input file has a .note.GNU-stack
2809// section with the SHF_EXECINSTR flag set, the stack should be
2810// executable. Otherwise, if at least one input file a
2811// .note.GNU-stack section, and some input file has no .note.GNU-stack
2812// section, we use the target default for whether the stack should be
2813// executable. Otherwise, we don't generate a stack note. When
2814// generating a object file, we create a .note.GNU-stack section with
2815// the appropriate marking. When generating an executable or shared
2816// library, we create a PT_GNU_STACK segment.
2817
2818void
9c547ec3 2819Layout::create_executable_stack_info()
35cdfc9a
ILT
2820{
2821 bool is_stack_executable;
e55bde5e
ILT
2822 if (parameters->options().is_execstack_set())
2823 is_stack_executable = parameters->options().is_stack_executable();
35cdfc9a
ILT
2824 else if (!this->input_with_gnu_stack_note_)
2825 return;
2826 else
2827 {
2828 if (this->input_requires_executable_stack_)
2829 is_stack_executable = true;
2830 else if (this->input_without_gnu_stack_note_)
9c547ec3
ILT
2831 is_stack_executable =
2832 parameters->target().is_default_stack_executable();
35cdfc9a
ILT
2833 else
2834 is_stack_executable = false;
2835 }
2836
8851ecca 2837 if (parameters->options().relocatable())
35cdfc9a
ILT
2838 {
2839 const char* name = this->namepool_.add(".note.GNU-stack", false, NULL);
2840 elfcpp::Elf_Xword flags = 0;
2841 if (is_stack_executable)
2842 flags |= elfcpp::SHF_EXECINSTR;
22f0da72
ILT
2843 this->make_output_section(name, elfcpp::SHT_PROGBITS, flags,
2844 ORDER_INVALID, false);
35cdfc9a
ILT
2845 }
2846 else
2847 {
1c4f3631
ILT
2848 if (this->script_options_->saw_phdrs_clause())
2849 return;
35cdfc9a
ILT
2850 int flags = elfcpp::PF_R | elfcpp::PF_W;
2851 if (is_stack_executable)
2852 flags |= elfcpp::PF_X;
3802b2dd 2853 this->make_output_segment(elfcpp::PT_GNU_STACK, flags);
35cdfc9a
ILT
2854 }
2855}
2856
8ed814a9
ILT
2857// If --build-id was used, set up the build ID note.
2858
2859void
2860Layout::create_build_id()
2861{
2862 if (!parameters->options().user_set_build_id())
2863 return;
2864
2865 const char* style = parameters->options().build_id();
2866 if (strcmp(style, "none") == 0)
2867 return;
2868
2869 // Set DESCSZ to the size of the note descriptor. When possible,
2870 // set DESC to the note descriptor contents.
2871 size_t descsz;
2872 std::string desc;
2873 if (strcmp(style, "md5") == 0)
2874 descsz = 128 / 8;
2875 else if (strcmp(style, "sha1") == 0)
2876 descsz = 160 / 8;
2877 else if (strcmp(style, "uuid") == 0)
2878 {
2879 const size_t uuidsz = 128 / 8;
2880
2881 char buffer[uuidsz];
2882 memset(buffer, 0, uuidsz);
2883
2a00e4fb 2884 int descriptor = open_descriptor(-1, "/dev/urandom", O_RDONLY);
8ed814a9
ILT
2885 if (descriptor < 0)
2886 gold_error(_("--build-id=uuid failed: could not open /dev/urandom: %s"),
2887 strerror(errno));
2888 else
2889 {
2890 ssize_t got = ::read(descriptor, buffer, uuidsz);
2a00e4fb 2891 release_descriptor(descriptor, true);
8ed814a9
ILT
2892 if (got < 0)
2893 gold_error(_("/dev/urandom: read failed: %s"), strerror(errno));
2894 else if (static_cast<size_t>(got) != uuidsz)
2895 gold_error(_("/dev/urandom: expected %zu bytes, got %zd bytes"),
2896 uuidsz, got);
2897 }
2898
2899 desc.assign(buffer, uuidsz);
2900 descsz = uuidsz;
2901 }
2902 else if (strncmp(style, "0x", 2) == 0)
2903 {
2904 hex_init();
2905 const char* p = style + 2;
2906 while (*p != '\0')
2907 {
2908 if (hex_p(p[0]) && hex_p(p[1]))
2909 {
2910 char c = (hex_value(p[0]) << 4) | hex_value(p[1]);
2911 desc += c;
2912 p += 2;
2913 }
2914 else if (*p == '-' || *p == ':')
2915 ++p;
2916 else
2917 gold_fatal(_("--build-id argument '%s' not a valid hex number"),
2918 style);
2919 }
2920 descsz = desc.size();
2921 }
2922 else
2923 gold_fatal(_("unrecognized --build-id argument '%s'"), style);
2924
2925 // Create the note.
2926 size_t trailing_padding;
2927 Output_section* os = this->create_note("GNU", elfcpp::NT_GNU_BUILD_ID,
ef4ab7a8
PP
2928 ".note.gnu.build-id", descsz, true,
2929 &trailing_padding);
9c547ec3
ILT
2930 if (os == NULL)
2931 return;
8ed814a9
ILT
2932
2933 if (!desc.empty())
2934 {
2935 // We know the value already, so we fill it in now.
2936 gold_assert(desc.size() == descsz);
2937
2938 Output_section_data* posd = new Output_data_const(desc, 4);
2939 os->add_output_section_data(posd);
2940
2941 if (trailing_padding != 0)
2942 {
7d9e3d98 2943 posd = new Output_data_zero_fill(trailing_padding, 0);
8ed814a9
ILT
2944 os->add_output_section_data(posd);
2945 }
2946 }
2947 else
2948 {
2949 // We need to compute a checksum after we have completed the
2950 // link.
2951 gold_assert(trailing_padding == 0);
7d9e3d98 2952 this->build_id_note_ = new Output_data_zero_fill(descsz, 4);
8ed814a9 2953 os->add_output_section_data(this->build_id_note_);
8ed814a9
ILT
2954 }
2955}
2956
1518dc8f
ILT
2957// If we have both .stabXX and .stabXXstr sections, then the sh_link
2958// field of the former should point to the latter. I'm not sure who
2959// started this, but the GNU linker does it, and some tools depend
2960// upon it.
2961
2962void
2963Layout::link_stabs_sections()
2964{
2965 if (!this->have_stabstr_section_)
2966 return;
2967
2968 for (Section_list::iterator p = this->section_list_.begin();
2969 p != this->section_list_.end();
2970 ++p)
2971 {
2972 if ((*p)->type() != elfcpp::SHT_STRTAB)
2973 continue;
2974
2975 const char* name = (*p)->name();
2976 if (strncmp(name, ".stab", 5) != 0)
2977 continue;
2978
2979 size_t len = strlen(name);
2980 if (strcmp(name + len - 3, "str") != 0)
2981 continue;
2982
2983 std::string stab_name(name, len - 3);
2984 Output_section* stab_sec;
2985 stab_sec = this->find_output_section(stab_name.c_str());
2986 if (stab_sec != NULL)
2987 stab_sec->set_link_section(*p);
2988 }
2989}
2990
09ec0418 2991// Create .gnu_incremental_inputs and related sections needed
3ce2c28e
ILT
2992// for the next run of incremental linking to check what has changed.
2993
2994void
09ec0418 2995Layout::create_incremental_info_sections(Symbol_table* symtab)
3ce2c28e 2996{
09ec0418
CC
2997 Incremental_inputs* incr = this->incremental_inputs_;
2998
2999 gold_assert(incr != NULL);
3000
3001 // Create the .gnu_incremental_inputs, _symtab, and _relocs input sections.
3002 incr->create_data_sections(symtab);
3ce2c28e
ILT
3003
3004 // Add the .gnu_incremental_inputs section.
ca09d69a 3005 const char* incremental_inputs_name =
3ce2c28e 3006 this->namepool_.add(".gnu_incremental_inputs", false, NULL);
09ec0418 3007 Output_section* incremental_inputs_os =
3ce2c28e 3008 this->make_output_section(incremental_inputs_name,
f5c870d2 3009 elfcpp::SHT_GNU_INCREMENTAL_INPUTS, 0,
22f0da72 3010 ORDER_INVALID, false);
09ec0418
CC
3011 incremental_inputs_os->add_output_section_data(incr->inputs_section());
3012
3013 // Add the .gnu_incremental_symtab section.
ca09d69a 3014 const char* incremental_symtab_name =
09ec0418
CC
3015 this->namepool_.add(".gnu_incremental_symtab", false, NULL);
3016 Output_section* incremental_symtab_os =
3017 this->make_output_section(incremental_symtab_name,
3018 elfcpp::SHT_GNU_INCREMENTAL_SYMTAB, 0,
3019 ORDER_INVALID, false);
3020 incremental_symtab_os->add_output_section_data(incr->symtab_section());
3021 incremental_symtab_os->set_entsize(4);
3022
3023 // Add the .gnu_incremental_relocs section.
ca09d69a 3024 const char* incremental_relocs_name =
09ec0418
CC
3025 this->namepool_.add(".gnu_incremental_relocs", false, NULL);
3026 Output_section* incremental_relocs_os =
3027 this->make_output_section(incremental_relocs_name,
3028 elfcpp::SHT_GNU_INCREMENTAL_RELOCS, 0,
3029 ORDER_INVALID, false);
3030 incremental_relocs_os->add_output_section_data(incr->relocs_section());
3031 incremental_relocs_os->set_entsize(incr->relocs_entsize());
3032
0e70b911 3033 // Add the .gnu_incremental_got_plt section.
ca09d69a 3034 const char* incremental_got_plt_name =
0e70b911
CC
3035 this->namepool_.add(".gnu_incremental_got_plt", false, NULL);
3036 Output_section* incremental_got_plt_os =
3037 this->make_output_section(incremental_got_plt_name,
3038 elfcpp::SHT_GNU_INCREMENTAL_GOT_PLT, 0,
3039 ORDER_INVALID, false);
3040 incremental_got_plt_os->add_output_section_data(incr->got_plt_section());
3041
3ce2c28e 3042 // Add the .gnu_incremental_strtab section.
ca09d69a 3043 const char* incremental_strtab_name =
3ce2c28e 3044 this->namepool_.add(".gnu_incremental_strtab", false, NULL);
09ec0418 3045 Output_section* incremental_strtab_os = this->make_output_section(incremental_strtab_name,
2e702c99
RM
3046 elfcpp::SHT_STRTAB, 0,
3047 ORDER_INVALID, false);
3ce2c28e 3048 Output_data_strtab* strtab_data =
09ec0418
CC
3049 new Output_data_strtab(incr->get_stringpool());
3050 incremental_strtab_os->add_output_section_data(strtab_data);
3051
3052 incremental_inputs_os->set_after_input_sections();
3053 incremental_symtab_os->set_after_input_sections();
3054 incremental_relocs_os->set_after_input_sections();
0e70b911 3055 incremental_got_plt_os->set_after_input_sections();
09ec0418
CC
3056
3057 incremental_inputs_os->set_link_section(incremental_strtab_os);
3058 incremental_symtab_os->set_link_section(incremental_inputs_os);
3059 incremental_relocs_os->set_link_section(incremental_inputs_os);
0e70b911 3060 incremental_got_plt_os->set_link_section(incremental_inputs_os);
3ce2c28e
ILT
3061}
3062
75f65a3e
ILT
3063// Return whether SEG1 should be before SEG2 in the output file. This
3064// is based entirely on the segment type and flags. When this is
aecf301f 3065// called the segment addresses have normally not yet been set.
75f65a3e
ILT
3066
3067bool
3068Layout::segment_precedes(const Output_segment* seg1,
3069 const Output_segment* seg2)
3070{
3071 elfcpp::Elf_Word type1 = seg1->type();
3072 elfcpp::Elf_Word type2 = seg2->type();
3073
3074 // The single PT_PHDR segment is required to precede any loadable
3075 // segment. We simply make it always first.
3076 if (type1 == elfcpp::PT_PHDR)
3077 {
a3ad94ed 3078 gold_assert(type2 != elfcpp::PT_PHDR);
75f65a3e
ILT
3079 return true;
3080 }
3081 if (type2 == elfcpp::PT_PHDR)
3082 return false;
3083
3084 // The single PT_INTERP segment is required to precede any loadable
3085 // segment. We simply make it always second.
3086 if (type1 == elfcpp::PT_INTERP)
3087 {
a3ad94ed 3088 gold_assert(type2 != elfcpp::PT_INTERP);
75f65a3e
ILT
3089 return true;
3090 }
3091 if (type2 == elfcpp::PT_INTERP)
3092 return false;
3093
3094 // We then put PT_LOAD segments before any other segments.
3095 if (type1 == elfcpp::PT_LOAD && type2 != elfcpp::PT_LOAD)
3096 return true;
3097 if (type2 == elfcpp::PT_LOAD && type1 != elfcpp::PT_LOAD)
3098 return false;
3099
9f1d377b
ILT
3100 // We put the PT_TLS segment last except for the PT_GNU_RELRO
3101 // segment, because that is where the dynamic linker expects to find
3102 // it (this is just for efficiency; other positions would also work
3103 // correctly).
3104 if (type1 == elfcpp::PT_TLS
3105 && type2 != elfcpp::PT_TLS
3106 && type2 != elfcpp::PT_GNU_RELRO)
3107 return false;
3108 if (type2 == elfcpp::PT_TLS
3109 && type1 != elfcpp::PT_TLS
3110 && type1 != elfcpp::PT_GNU_RELRO)
3111 return true;
3112
3113 // We put the PT_GNU_RELRO segment last, because that is where the
3114 // dynamic linker expects to find it (as with PT_TLS, this is just
3115 // for efficiency).
3116 if (type1 == elfcpp::PT_GNU_RELRO && type2 != elfcpp::PT_GNU_RELRO)
92e059d8 3117 return false;
9f1d377b 3118 if (type2 == elfcpp::PT_GNU_RELRO && type1 != elfcpp::PT_GNU_RELRO)
92e059d8
ILT
3119 return true;
3120
75f65a3e
ILT
3121 const elfcpp::Elf_Word flags1 = seg1->flags();
3122 const elfcpp::Elf_Word flags2 = seg2->flags();
3123
3124 // The order of non-PT_LOAD segments is unimportant. We simply sort
3125 // by the numeric segment type and flags values. There should not
3126 // be more than one segment with the same type and flags.
3127 if (type1 != elfcpp::PT_LOAD)
3128 {
3129 if (type1 != type2)
3130 return type1 < type2;
a3ad94ed 3131 gold_assert(flags1 != flags2);
75f65a3e
ILT
3132 return flags1 < flags2;
3133 }
3134
a445fddf
ILT
3135 // If the addresses are set already, sort by load address.
3136 if (seg1->are_addresses_set())
3137 {
3138 if (!seg2->are_addresses_set())
3139 return true;
3140
3141 unsigned int section_count1 = seg1->output_section_count();
3142 unsigned int section_count2 = seg2->output_section_count();
3143 if (section_count1 == 0 && section_count2 > 0)
3144 return true;
3145 if (section_count1 > 0 && section_count2 == 0)
3146 return false;
3147
b8fa8750
NC
3148 uint64_t paddr1 = (seg1->are_addresses_set()
3149 ? seg1->paddr()
3150 : seg1->first_section_load_address());
3151 uint64_t paddr2 = (seg2->are_addresses_set()
3152 ? seg2->paddr()
3153 : seg2->first_section_load_address());
3154
a445fddf
ILT
3155 if (paddr1 != paddr2)
3156 return paddr1 < paddr2;
3157 }
3158 else if (seg2->are_addresses_set())
3159 return false;
3160
8a5e3e08
ILT
3161 // A segment which holds large data comes after a segment which does
3162 // not hold large data.
3163 if (seg1->is_large_data_segment())
3164 {
3165 if (!seg2->is_large_data_segment())
3166 return false;
3167 }
3168 else if (seg2->is_large_data_segment())
3169 return true;
3170
3171 // Otherwise, we sort PT_LOAD segments based on the flags. Readonly
3172 // segments come before writable segments. Then writable segments
3173 // with data come before writable segments without data. Then
3174 // executable segments come before non-executable segments. Then
3175 // the unlikely case of a non-readable segment comes before the
3176 // normal case of a readable segment. If there are multiple
3177 // segments with the same type and flags, we require that the
3178 // address be set, and we sort by virtual address and then physical
3179 // address.
75f65a3e
ILT
3180 if ((flags1 & elfcpp::PF_W) != (flags2 & elfcpp::PF_W))
3181 return (flags1 & elfcpp::PF_W) == 0;
756ac4a8
ILT
3182 if ((flags1 & elfcpp::PF_W) != 0
3183 && seg1->has_any_data_sections() != seg2->has_any_data_sections())
3184 return seg1->has_any_data_sections();
75f65a3e
ILT
3185 if ((flags1 & elfcpp::PF_X) != (flags2 & elfcpp::PF_X))
3186 return (flags1 & elfcpp::PF_X) != 0;
3187 if ((flags1 & elfcpp::PF_R) != (flags2 & elfcpp::PF_R))
3188 return (flags1 & elfcpp::PF_R) == 0;
3189
a445fddf 3190 // We shouldn't get here--we shouldn't create segments which we
aecf301f 3191 // can't distinguish. Unless of course we are using a weird linker
16164a6b
ST
3192 // script or overlapping --section-start options. We could also get
3193 // here if plugins want unique segments for subsets of sections.
ea0d8c47 3194 gold_assert(this->script_options_->saw_phdrs_clause()
16164a6b
ST
3195 || parameters->options().any_section_start()
3196 || this->is_unique_segment_for_sections_specified());
aecf301f 3197 return false;
75f65a3e
ILT
3198}
3199
8a5e3e08
ILT
3200// Increase OFF so that it is congruent to ADDR modulo ABI_PAGESIZE.
3201
3202static off_t
3203align_file_offset(off_t off, uint64_t addr, uint64_t abi_pagesize)
3204{
3205 uint64_t unsigned_off = off;
3206 uint64_t aligned_off = ((unsigned_off & ~(abi_pagesize - 1))
3207 | (addr & (abi_pagesize - 1)));
3208 if (aligned_off < unsigned_off)
3209 aligned_off += abi_pagesize;
3210 return aligned_off;
3211}
3212
ead1e424
ILT
3213// Set the file offsets of all the segments, and all the sections they
3214// contain. They have all been created. LOAD_SEG must be be laid out
3215// first. Return the offset of the data to follow.
75f65a3e
ILT
3216
3217off_t
ead1e424 3218Layout::set_segment_offsets(const Target* target, Output_segment* load_seg,
ca09d69a 3219 unsigned int* pshndx)
75f65a3e 3220{
aecf301f
ILT
3221 // Sort them into the final order. We use a stable sort so that we
3222 // don't randomize the order of indistinguishable segments created
3223 // by linker scripts.
3224 std::stable_sort(this->segment_list_.begin(), this->segment_list_.end(),
3225 Layout::Compare_segments(this));
54dc6425 3226
75f65a3e
ILT
3227 // Find the PT_LOAD segments, and set their addresses and offsets
3228 // and their section's addresses and offsets.
2e702c99 3229 uint64_t start_addr;
e55bde5e 3230 if (parameters->options().user_set_Ttext())
2e702c99 3231 start_addr = parameters->options().Ttext();
374ad285 3232 else if (parameters->options().output_is_position_independent())
2e702c99 3233 start_addr = 0;
0c5e9c22 3234 else
2e702c99
RM
3235 start_addr = target->default_text_segment_address();
3236
3237 uint64_t addr = start_addr;
75f65a3e 3238 off_t off = 0;
a445fddf
ILT
3239
3240 // If LOAD_SEG is NULL, then the file header and segment headers
3241 // will not be loadable. But they still need to be at offset 0 in
3242 // the file. Set their offsets now.
3243 if (load_seg == NULL)
3244 {
3245 for (Data_list::iterator p = this->special_output_list_.begin();
3246 p != this->special_output_list_.end();
3247 ++p)
3248 {
3249 off = align_address(off, (*p)->addralign());
3250 (*p)->set_address_and_file_offset(0, off);
3251 off += (*p)->data_size();
3252 }
3253 }
3254
1a2dff53
ILT
3255 unsigned int increase_relro = this->increase_relro_;
3256 if (this->script_options_->saw_sections_clause())
3257 increase_relro = 0;
3258
34810851
ILT
3259 const bool check_sections = parameters->options().check_sections();
3260 Output_segment* last_load_segment = NULL;
3261
2e702c99
RM
3262 unsigned int shndx_begin = *pshndx;
3263 unsigned int shndx_load_seg = *pshndx;
3264
75f65a3e
ILT
3265 for (Segment_list::iterator p = this->segment_list_.begin();
3266 p != this->segment_list_.end();
3267 ++p)
3268 {
3269 if ((*p)->type() == elfcpp::PT_LOAD)
3270 {
2e702c99
RM
3271 if (target->isolate_execinstr())
3272 {
3273 // When we hit the segment that should contain the
3274 // file headers, reset the file offset so we place
3275 // it and subsequent segments appropriately.
3276 // We'll fix up the preceding segments below.
3277 if (load_seg == *p)
3278 {
3279 if (off == 0)
3280 load_seg = NULL;
3281 else
3282 {
3283 off = 0;
3284 shndx_load_seg = *pshndx;
3285 }
3286 }
3287 }
3288 else
3289 {
3290 // Verify that the file headers fall into the first segment.
3291 if (load_seg != NULL && load_seg != *p)
3292 gold_unreachable();
3293 load_seg = NULL;
3294 }
75f65a3e 3295
756ac4a8
ILT
3296 bool are_addresses_set = (*p)->are_addresses_set();
3297 if (are_addresses_set)
3298 {
3299 // When it comes to setting file offsets, we care about
3300 // the physical address.
3301 addr = (*p)->paddr();
3302 }
9590bf25
CC
3303 else if (parameters->options().user_set_Ttext()
3304 && ((*p)->flags() & elfcpp::PF_W) == 0)
3305 {
3306 are_addresses_set = true;
3307 }
e55bde5e 3308 else if (parameters->options().user_set_Tdata()
756ac4a8 3309 && ((*p)->flags() & elfcpp::PF_W) != 0
e55bde5e 3310 && (!parameters->options().user_set_Tbss()
756ac4a8
ILT
3311 || (*p)->has_any_data_sections()))
3312 {
e55bde5e 3313 addr = parameters->options().Tdata();
756ac4a8
ILT
3314 are_addresses_set = true;
3315 }
e55bde5e 3316 else if (parameters->options().user_set_Tbss()
756ac4a8
ILT
3317 && ((*p)->flags() & elfcpp::PF_W) != 0
3318 && !(*p)->has_any_data_sections())
3319 {
e55bde5e 3320 addr = parameters->options().Tbss();
756ac4a8
ILT
3321 are_addresses_set = true;
3322 }
3323
75f65a3e
ILT
3324 uint64_t orig_addr = addr;
3325 uint64_t orig_off = off;
3326
a445fddf 3327 uint64_t aligned_addr = 0;
75f65a3e 3328 uint64_t abi_pagesize = target->abi_pagesize();
af6156ef 3329 uint64_t common_pagesize = target->common_pagesize();
0496d5e5 3330
af6156ef
ILT
3331 if (!parameters->options().nmagic()
3332 && !parameters->options().omagic())
3333 (*p)->set_minimum_p_align(common_pagesize);
0496d5e5 3334
8a5e3e08 3335 if (!are_addresses_set)
a445fddf 3336 {
a6577478
RÁE
3337 // Skip the address forward one page, maintaining the same
3338 // position within the page. This lets us store both segments
3339 // overlapping on a single page in the file, but the loader will
3340 // put them on different pages in memory. We will revisit this
3341 // decision once we know the size of the segment.
a445fddf
ILT
3342
3343 addr = align_address(addr, (*p)->maximum_alignment());
75f65a3e 3344 aligned_addr = addr;
a445fddf 3345
2e702c99
RM
3346 if (load_seg == *p)
3347 {
3348 // This is the segment that will contain the file
3349 // headers, so its offset will have to be exactly zero.
3350 gold_assert(orig_off == 0);
3351
3352 // If the target wants a fixed minimum distance from the
3353 // text segment to the read-only segment, move up now.
3354 uint64_t min_addr = start_addr + target->rosegment_gap();
3355 if (addr < min_addr)
3356 addr = min_addr;
3357
3358 // But this is not the first segment! To make its
3359 // address congruent with its offset, that address better
3360 // be aligned to the ABI-mandated page size.
3361 addr = align_address(addr, abi_pagesize);
3362 aligned_addr = addr;
3363 }
3364 else
3365 {
3366 if ((addr & (abi_pagesize - 1)) != 0)
3367 addr = addr + abi_pagesize;
a445fddf 3368
2e702c99
RM
3369 off = orig_off + ((addr - orig_addr) & (abi_pagesize - 1));
3370 }
75f65a3e
ILT
3371 }
3372
8a5e3e08
ILT
3373 if (!parameters->options().nmagic()
3374 && !parameters->options().omagic())
3375 off = align_file_offset(off, addr, abi_pagesize);
2e702c99 3376 else
661be1e2
ILT
3377 {
3378 // This is -N or -n with a section script which prevents
3379 // us from using a load segment. We need to ensure that
3380 // the file offset is aligned to the alignment of the
3381 // segment. This is because the linker script
3382 // implicitly assumed a zero offset. If we don't align
3383 // here, then the alignment of the sections in the
3384 // linker script may not match the alignment of the
3385 // sections in the set_section_addresses call below,
3386 // causing an error about dot moving backward.
3387 off = align_address(off, (*p)->maximum_alignment());
3388 }
8a5e3e08 3389
ead1e424 3390 unsigned int shndx_hold = *pshndx;
fc497986 3391 bool has_relro = false;
96a2b4e4 3392 uint64_t new_addr = (*p)->set_section_addresses(this, false, addr,
fd064a5b 3393 &increase_relro,
fc497986 3394 &has_relro,
2e702c99 3395 &off, pshndx);
75f65a3e
ILT
3396
3397 // Now that we know the size of this segment, we may be able
3398 // to save a page in memory, at the cost of wasting some
3399 // file space, by instead aligning to the start of a new
3400 // page. Here we use the real machine page size rather than
fc497986
CC
3401 // the ABI mandated page size. If the segment has been
3402 // aligned so that the relro data ends at a page boundary,
3403 // we do not try to realign it.
75f65a3e 3404
cdc29364
CC
3405 if (!are_addresses_set
3406 && !has_relro
3407 && aligned_addr != addr
fb0e076f 3408 && !parameters->incremental())
75f65a3e 3409 {
75f65a3e
ILT
3410 uint64_t first_off = (common_pagesize
3411 - (aligned_addr
3412 & (common_pagesize - 1)));
3413 uint64_t last_off = new_addr & (common_pagesize - 1);
3414 if (first_off > 0
3415 && last_off > 0
3416 && ((aligned_addr & ~ (common_pagesize - 1))
3417 != (new_addr & ~ (common_pagesize - 1)))
3418 && first_off + last_off <= common_pagesize)
3419 {
ead1e424
ILT
3420 *pshndx = shndx_hold;
3421 addr = align_address(aligned_addr, common_pagesize);
a445fddf 3422 addr = align_address(addr, (*p)->maximum_alignment());
75f65a3e 3423 off = orig_off + ((addr - orig_addr) & (abi_pagesize - 1));
8a5e3e08 3424 off = align_file_offset(off, addr, abi_pagesize);
3bb951e5
ILT
3425
3426 increase_relro = this->increase_relro_;
3427 if (this->script_options_->saw_sections_clause())
3428 increase_relro = 0;
3429 has_relro = false;
3430
96a2b4e4 3431 new_addr = (*p)->set_section_addresses(this, true, addr,
fd064a5b 3432 &increase_relro,
fc497986 3433 &has_relro,
2e702c99 3434 &off, pshndx);
75f65a3e
ILT
3435 }
3436 }
3437
3438 addr = new_addr;
3439
34810851
ILT
3440 // Implement --check-sections. We know that the segments
3441 // are sorted by LMA.
3442 if (check_sections && last_load_segment != NULL)
3443 {
3444 gold_assert(last_load_segment->paddr() <= (*p)->paddr());
3445 if (last_load_segment->paddr() + last_load_segment->memsz()
3446 > (*p)->paddr())
3447 {
3448 unsigned long long lb1 = last_load_segment->paddr();
3449 unsigned long long le1 = lb1 + last_load_segment->memsz();
3450 unsigned long long lb2 = (*p)->paddr();
3451 unsigned long long le2 = lb2 + (*p)->memsz();
3452 gold_error(_("load segment overlap [0x%llx -> 0x%llx] and "
3453 "[0x%llx -> 0x%llx]"),
3454 lb1, le1, lb2, le2);
3455 }
3456 }
3457 last_load_segment = *p;
75f65a3e
ILT
3458 }
3459 }
3460
2e702c99
RM
3461 if (load_seg != NULL && target->isolate_execinstr())
3462 {
3463 // Process the early segments again, setting their file offsets
3464 // so they land after the segments starting at LOAD_SEG.
3465 off = align_file_offset(off, 0, target->abi_pagesize());
3466
3467 for (Segment_list::iterator p = this->segment_list_.begin();
3468 *p != load_seg;
3469 ++p)
3470 {
3471 if ((*p)->type() == elfcpp::PT_LOAD)
3472 {
3473 // We repeat the whole job of assigning addresses and
3474 // offsets, but we really only want to change the offsets and
3475 // must ensure that the addresses all come out the same as
3476 // they did the first time through.
3477 bool has_relro = false;
3478 const uint64_t old_addr = (*p)->vaddr();
3479 const uint64_t old_end = old_addr + (*p)->memsz();
3480 uint64_t new_addr = (*p)->set_section_addresses(this, true,
3481 old_addr,
3482 &increase_relro,
3483 &has_relro,
3484 &off,
3485 &shndx_begin);
3486 gold_assert(new_addr == old_end);
3487 }
3488 }
3489
3490 gold_assert(shndx_begin == shndx_load_seg);
3491 }
3492
75f65a3e
ILT
3493 // Handle the non-PT_LOAD segments, setting their offsets from their
3494 // section's offsets.
3495 for (Segment_list::iterator p = this->segment_list_.begin();
3496 p != this->segment_list_.end();
3497 ++p)
3498 {
3499 if ((*p)->type() != elfcpp::PT_LOAD)
1a2dff53
ILT
3500 (*p)->set_offset((*p)->type() == elfcpp::PT_GNU_RELRO
3501 ? increase_relro
3502 : 0);
75f65a3e
ILT
3503 }
3504
7bf1f802
ILT
3505 // Set the TLS offsets for each section in the PT_TLS segment.
3506 if (this->tls_segment_ != NULL)
3507 this->tls_segment_->set_tls_offsets();
3508
75f65a3e
ILT
3509 return off;
3510}
3511
6a74a719
ILT
3512// Set the offsets of all the allocated sections when doing a
3513// relocatable link. This does the same jobs as set_segment_offsets,
3514// only for a relocatable link.
3515
3516off_t
3517Layout::set_relocatable_section_offsets(Output_data* file_header,
ca09d69a 3518 unsigned int* pshndx)
6a74a719
ILT
3519{
3520 off_t off = 0;
3521
3522 file_header->set_address_and_file_offset(0, 0);
3523 off += file_header->data_size();
3524
3525 for (Section_list::iterator p = this->section_list_.begin();
3526 p != this->section_list_.end();
3527 ++p)
3528 {
3529 // We skip unallocated sections here, except that group sections
3530 // have to come first.
3531 if (((*p)->flags() & elfcpp::SHF_ALLOC) == 0
3532 && (*p)->type() != elfcpp::SHT_GROUP)
3533 continue;
3534
3535 off = align_address(off, (*p)->addralign());
3536
3537 // The linker script might have set the address.
3538 if (!(*p)->is_address_valid())
3539 (*p)->set_address(0);
3540 (*p)->set_file_offset(off);
3541 (*p)->finalize_data_size();
3542 off += (*p)->data_size();
3543
3544 (*p)->set_out_shndx(*pshndx);
3545 ++*pshndx;
3546 }
3547
3548 return off;
3549}
3550
75f65a3e
ILT
3551// Set the file offset of all the sections not associated with a
3552// segment.
3553
3554off_t
9a0910c3 3555Layout::set_section_offsets(off_t off, Layout::Section_offset_pass pass)
75f65a3e 3556{
cdc29364
CC
3557 off_t startoff = off;
3558 off_t maxoff = off;
3559
a3ad94ed
ILT
3560 for (Section_list::iterator p = this->unattached_section_list_.begin();
3561 p != this->unattached_section_list_.end();
75f65a3e
ILT
3562 ++p)
3563 {
27bc2bce
ILT
3564 // The symtab section is handled in create_symtab_sections.
3565 if (*p == this->symtab_section_)
61ba1cf9 3566 continue;
27bc2bce 3567
a9a60db6
ILT
3568 // If we've already set the data size, don't set it again.
3569 if ((*p)->is_offset_valid() && (*p)->is_data_size_valid())
3570 continue;
3571
96803768
ILT
3572 if (pass == BEFORE_INPUT_SECTIONS_PASS
3573 && (*p)->requires_postprocessing())
17a1d0a9
ILT
3574 {
3575 (*p)->create_postprocessing_buffer();
3576 this->any_postprocessing_sections_ = true;
3577 }
96803768 3578
9a0910c3 3579 if (pass == BEFORE_INPUT_SECTIONS_PASS
2e702c99
RM
3580 && (*p)->after_input_sections())
3581 continue;
17a1d0a9 3582 else if (pass == POSTPROCESSING_SECTIONS_PASS
2e702c99
RM
3583 && (!(*p)->after_input_sections()
3584 || (*p)->type() == elfcpp::SHT_STRTAB))
3585 continue;
17a1d0a9 3586 else if (pass == STRTAB_AFTER_POSTPROCESSING_SECTIONS_PASS
2e702c99
RM
3587 && (!(*p)->after_input_sections()
3588 || (*p)->type() != elfcpp::SHT_STRTAB))
3589 continue;
27bc2bce 3590
cdc29364
CC
3591 if (!parameters->incremental_update())
3592 {
3593 off = align_address(off, (*p)->addralign());
3594 (*p)->set_file_offset(off);
3595 (*p)->finalize_data_size();
3596 }
3597 else
3598 {
3599 // Incremental update: allocate file space from free list.
3600 (*p)->pre_finalize_data_size();
3601 off_t current_size = (*p)->current_data_size();
3602 off = this->allocate(current_size, (*p)->addralign(), startoff);
3603 if (off == -1)
3604 {
3605 if (is_debugging_enabled(DEBUG_INCREMENTAL))
2e702c99 3606 this->free_list_.dump();
cdc29364 3607 gold_assert((*p)->output_section() != NULL);
e6455dfb
CC
3608 gold_fallback(_("out of patch space for section %s; "
3609 "relink with --incremental-full"),
3610 (*p)->output_section()->name());
cdc29364
CC
3611 }
3612 (*p)->set_file_offset(off);
3613 (*p)->finalize_data_size();
3614 if ((*p)->data_size() > current_size)
3615 {
3616 gold_assert((*p)->output_section() != NULL);
e6455dfb
CC
3617 gold_fallback(_("%s: section changed size; "
3618 "relink with --incremental-full"),
3619 (*p)->output_section()->name());
cdc29364
CC
3620 }
3621 gold_debug(DEBUG_INCREMENTAL,
3622 "set_section_offsets: %08lx %08lx %s",
3623 static_cast<long>(off),
3624 static_cast<long>((*p)->data_size()),
3625 ((*p)->output_section() != NULL
3626 ? (*p)->output_section()->name() : "(special)"));
3627 }
3628
75f65a3e 3629 off += (*p)->data_size();
cdc29364 3630 if (off > maxoff)
2e702c99 3631 maxoff = off;
96803768
ILT
3632
3633 // At this point the name must be set.
17a1d0a9 3634 if (pass != STRTAB_AFTER_POSTPROCESSING_SECTIONS_PASS)
96803768 3635 this->namepool_.add((*p)->name(), false, NULL);
75f65a3e 3636 }
cdc29364 3637 return maxoff;
75f65a3e
ILT
3638}
3639
86887060
ILT
3640// Set the section indexes of all the sections not associated with a
3641// segment.
3642
3643unsigned int
3644Layout::set_section_indexes(unsigned int shndx)
3645{
3646 for (Section_list::iterator p = this->unattached_section_list_.begin();
3647 p != this->unattached_section_list_.end();
3648 ++p)
3649 {
d491d34e
ILT
3650 if (!(*p)->has_out_shndx())
3651 {
3652 (*p)->set_out_shndx(shndx);
3653 ++shndx;
3654 }
86887060
ILT
3655 }
3656 return shndx;
3657}
3658
a445fddf
ILT
3659// Set the section addresses according to the linker script. This is
3660// only called when we see a SECTIONS clause. This returns the
3661// program segment which should hold the file header and segment
3662// headers, if any. It will return NULL if they should not be in a
3663// segment.
3664
3665Output_segment*
3666Layout::set_section_addresses_from_script(Symbol_table* symtab)
20e6d0d6
DK
3667{
3668 Script_sections* ss = this->script_options_->script_sections();
3669 gold_assert(ss->saw_sections_clause());
3670 return this->script_options_->set_section_addresses(symtab, this);
3671}
3672
3673// Place the orphan sections in the linker script.
3674
3675void
3676Layout::place_orphan_sections_in_script()
a445fddf
ILT
3677{
3678 Script_sections* ss = this->script_options_->script_sections();
3679 gold_assert(ss->saw_sections_clause());
3680
3681 // Place each orphaned output section in the script.
3682 for (Section_list::iterator p = this->section_list_.begin();
3683 p != this->section_list_.end();
3684 ++p)
3685 {
3686 if (!(*p)->found_in_sections_clause())
3687 ss->place_orphan(*p);
3688 }
a445fddf
ILT
3689}
3690
7bf1f802
ILT
3691// Count the local symbols in the regular symbol table and the dynamic
3692// symbol table, and build the respective string pools.
3693
3694void
17a1d0a9
ILT
3695Layout::count_local_symbols(const Task* task,
3696 const Input_objects* input_objects)
7bf1f802 3697{
6d013333
ILT
3698 // First, figure out an upper bound on the number of symbols we'll
3699 // be inserting into each pool. This helps us create the pools with
3700 // the right size, to avoid unnecessary hashtable resizing.
3701 unsigned int symbol_count = 0;
3702 for (Input_objects::Relobj_iterator p = input_objects->relobj_begin();
3703 p != input_objects->relobj_end();
3704 ++p)
3705 symbol_count += (*p)->local_symbol_count();
3706
3707 // Go from "upper bound" to "estimate." We overcount for two
3708 // reasons: we double-count symbols that occur in more than one
3709 // object file, and we count symbols that are dropped from the
3710 // output. Add it all together and assume we overcount by 100%.
3711 symbol_count /= 2;
3712
3713 // We assume all symbols will go into both the sympool and dynpool.
3714 this->sympool_.reserve(symbol_count);
3715 this->dynpool_.reserve(symbol_count);
3716
7bf1f802
ILT
3717 for (Input_objects::Relobj_iterator p = input_objects->relobj_begin();
3718 p != input_objects->relobj_end();
3719 ++p)
3720 {
17a1d0a9 3721 Task_lock_obj<Object> tlo(task, *p);
7bf1f802
ILT
3722 (*p)->count_local_symbols(&this->sympool_, &this->dynpool_);
3723 }
3724}
3725
b8e6aad9
ILT
3726// Create the symbol table sections. Here we also set the final
3727// values of the symbols. At this point all the loadable sections are
d491d34e 3728// fully laid out. SHNUM is the number of sections so far.
75f65a3e
ILT
3729
3730void
9025d29d 3731Layout::create_symtab_sections(const Input_objects* input_objects,
75f65a3e 3732 Symbol_table* symtab,
d491d34e 3733 unsigned int shnum,
16649710 3734 off_t* poff)
75f65a3e 3735{
61ba1cf9
ILT
3736 int symsize;
3737 unsigned int align;
8851ecca 3738 if (parameters->target().get_size() == 32)
61ba1cf9
ILT
3739 {
3740 symsize = elfcpp::Elf_sizes<32>::sym_size;
3741 align = 4;
3742 }
8851ecca 3743 else if (parameters->target().get_size() == 64)
61ba1cf9
ILT
3744 {
3745 symsize = elfcpp::Elf_sizes<64>::sym_size;
3746 align = 8;
3747 }
3748 else
a3ad94ed 3749 gold_unreachable();
61ba1cf9 3750
cdc29364
CC
3751 // Compute file offsets relative to the start of the symtab section.
3752 off_t off = 0;
61ba1cf9
ILT
3753
3754 // Save space for the dummy symbol at the start of the section. We
3755 // never bother to write this out--it will just be left as zero.
3756 off += symsize;
c06b7b0b 3757 unsigned int local_symbol_index = 1;
61ba1cf9 3758
a3ad94ed
ILT
3759 // Add STT_SECTION symbols for each Output section which needs one.
3760 for (Section_list::iterator p = this->section_list_.begin();
3761 p != this->section_list_.end();
3762 ++p)
3763 {
3764 if (!(*p)->needs_symtab_index())
3765 (*p)->set_symtab_index(-1U);
3766 else
3767 {
3768 (*p)->set_symtab_index(local_symbol_index);
3769 ++local_symbol_index;
3770 off += symsize;
3771 }
3772 }
3773
f6ce93d6
ILT
3774 for (Input_objects::Relobj_iterator p = input_objects->relobj_begin();
3775 p != input_objects->relobj_end();
75f65a3e
ILT
3776 ++p)
3777 {
c06b7b0b 3778 unsigned int index = (*p)->finalize_local_symbols(local_symbol_index,
2e702c99 3779 off, symtab);
c06b7b0b
ILT
3780 off += (index - local_symbol_index) * symsize;
3781 local_symbol_index = index;
75f65a3e
ILT
3782 }
3783
c06b7b0b 3784 unsigned int local_symcount = local_symbol_index;
cdc29364 3785 gold_assert(static_cast<off_t>(local_symcount * symsize) == off);
61ba1cf9 3786
16649710
ILT
3787 off_t dynoff;
3788 size_t dyn_global_index;
3789 size_t dyncount;
3790 if (this->dynsym_section_ == NULL)
3791 {
3792 dynoff = 0;
3793 dyn_global_index = 0;
3794 dyncount = 0;
3795 }
3796 else
3797 {
3798 dyn_global_index = this->dynsym_section_->info();
3799 off_t locsize = dyn_global_index * this->dynsym_section_->entsize();
3800 dynoff = this->dynsym_section_->offset() + locsize;
3801 dyncount = (this->dynsym_section_->data_size() - locsize) / symsize;
f5c3f225 3802 gold_assert(static_cast<off_t>(dyncount * symsize)
16649710
ILT
3803 == this->dynsym_section_->data_size() - locsize);
3804 }
3805
cdc29364 3806 off_t global_off = off;
55a93433
ILT
3807 off = symtab->finalize(off, dynoff, dyn_global_index, dyncount,
3808 &this->sympool_, &local_symcount);
75f65a3e 3809
8851ecca 3810 if (!parameters->options().strip_all())
9e2dcb77
ILT
3811 {
3812 this->sympool_.set_string_offsets();
61ba1cf9 3813
cfd73a4e 3814 const char* symtab_name = this->namepool_.add(".symtab", false, NULL);
9e2dcb77
ILT
3815 Output_section* osymtab = this->make_output_section(symtab_name,
3816 elfcpp::SHT_SYMTAB,
22f0da72
ILT
3817 0, ORDER_INVALID,
3818 false);
9e2dcb77 3819 this->symtab_section_ = osymtab;
a3ad94ed 3820
cdc29364 3821 Output_section_data* pos = new Output_data_fixed_space(off, align,
7d9e3d98 3822 "** symtab");
9e2dcb77 3823 osymtab->add_output_section_data(pos);
61ba1cf9 3824
d491d34e
ILT
3825 // We generate a .symtab_shndx section if we have more than
3826 // SHN_LORESERVE sections. Technically it is possible that we
3827 // don't need one, because it is possible that there are no
3828 // symbols in any of sections with indexes larger than
3829 // SHN_LORESERVE. That is probably unusual, though, and it is
3830 // easier to always create one than to compute section indexes
3831 // twice (once here, once when writing out the symbols).
3832 if (shnum >= elfcpp::SHN_LORESERVE)
3833 {
3834 const char* symtab_xindex_name = this->namepool_.add(".symtab_shndx",
3835 false, NULL);
3836 Output_section* osymtab_xindex =
3837 this->make_output_section(symtab_xindex_name,
22f0da72
ILT
3838 elfcpp::SHT_SYMTAB_SHNDX, 0,
3839 ORDER_INVALID, false);
d491d34e 3840
cdc29364 3841 size_t symcount = off / symsize;
d491d34e
ILT
3842 this->symtab_xindex_ = new Output_symtab_xindex(symcount);
3843
3844 osymtab_xindex->add_output_section_data(this->symtab_xindex_);
3845
3846 osymtab_xindex->set_link_section(osymtab);
3847 osymtab_xindex->set_addralign(4);
3848 osymtab_xindex->set_entsize(4);
3849
3850 osymtab_xindex->set_after_input_sections();
3851
3852 // This tells the driver code to wait until the symbol table
3853 // has written out before writing out the postprocessing
3854 // sections, including the .symtab_shndx section.
3855 this->any_postprocessing_sections_ = true;
3856 }
3857
cfd73a4e 3858 const char* strtab_name = this->namepool_.add(".strtab", false, NULL);
9e2dcb77
ILT
3859 Output_section* ostrtab = this->make_output_section(strtab_name,
3860 elfcpp::SHT_STRTAB,
22f0da72
ILT
3861 0, ORDER_INVALID,
3862 false);
a3ad94ed 3863
9e2dcb77
ILT
3864 Output_section_data* pstr = new Output_data_strtab(&this->sympool_);
3865 ostrtab->add_output_section_data(pstr);
61ba1cf9 3866
cdc29364
CC
3867 off_t symtab_off;
3868 if (!parameters->incremental_update())
3869 symtab_off = align_address(*poff, align);
3870 else
3871 {
3872 symtab_off = this->allocate(off, align, *poff);
2e702c99 3873 if (off == -1)
e6455dfb
CC
3874 gold_fallback(_("out of patch space for symbol table; "
3875 "relink with --incremental-full"));
cdc29364
CC
3876 gold_debug(DEBUG_INCREMENTAL,
3877 "create_symtab_sections: %08lx %08lx .symtab",
3878 static_cast<long>(symtab_off),
3879 static_cast<long>(off));
3880 }
3881
3882 symtab->set_file_offset(symtab_off + global_off);
3883 osymtab->set_file_offset(symtab_off);
27bc2bce 3884 osymtab->finalize_data_size();
9e2dcb77
ILT
3885 osymtab->set_link_section(ostrtab);
3886 osymtab->set_info(local_symcount);
3887 osymtab->set_entsize(symsize);
61ba1cf9 3888
cdc29364
CC
3889 if (symtab_off + off > *poff)
3890 *poff = symtab_off + off;
9e2dcb77 3891 }
75f65a3e
ILT
3892}
3893
3894// Create the .shstrtab section, which holds the names of the
3895// sections. At the time this is called, we have created all the
3896// output sections except .shstrtab itself.
3897
3898Output_section*
3899Layout::create_shstrtab()
3900{
3901 // FIXME: We don't need to create a .shstrtab section if we are
3902 // stripping everything.
3903
cfd73a4e 3904 const char* name = this->namepool_.add(".shstrtab", false, NULL);
75f65a3e 3905
f5c870d2 3906 Output_section* os = this->make_output_section(name, elfcpp::SHT_STRTAB, 0,
22f0da72 3907 ORDER_INVALID, false);
75f65a3e 3908
0e0d5469
ILT
3909 if (strcmp(parameters->options().compress_debug_sections(), "none") != 0)
3910 {
3911 // We can't write out this section until we've set all the
3912 // section names, and we don't set the names of compressed
3913 // output sections until relocations are complete. FIXME: With
3914 // the current names we use, this is unnecessary.
3915 os->set_after_input_sections();
3916 }
27bc2bce 3917
a3ad94ed
ILT
3918 Output_section_data* posd = new Output_data_strtab(&this->namepool_);
3919 os->add_output_section_data(posd);
75f65a3e
ILT
3920
3921 return os;
3922}
3923
3924// Create the section headers. SIZE is 32 or 64. OFF is the file
3925// offset.
3926
27bc2bce 3927void
d491d34e 3928Layout::create_shdrs(const Output_section* shstrtab_section, off_t* poff)
75f65a3e
ILT
3929{
3930 Output_section_headers* oshdrs;
9025d29d 3931 oshdrs = new Output_section_headers(this,
16649710 3932 &this->segment_list_,
6a74a719 3933 &this->section_list_,
16649710 3934 &this->unattached_section_list_,
d491d34e
ILT
3935 &this->namepool_,
3936 shstrtab_section);
cdc29364
CC
3937 off_t off;
3938 if (!parameters->incremental_update())
3939 off = align_address(*poff, oshdrs->addralign());
3940 else
3941 {
3942 oshdrs->pre_finalize_data_size();
3943 off = this->allocate(oshdrs->data_size(), oshdrs->addralign(), *poff);
3944 if (off == -1)
e6455dfb
CC
3945 gold_fallback(_("out of patch space for section header table; "
3946 "relink with --incremental-full"));
cdc29364
CC
3947 gold_debug(DEBUG_INCREMENTAL,
3948 "create_shdrs: %08lx %08lx (section header table)",
3949 static_cast<long>(off),
3950 static_cast<long>(off + oshdrs->data_size()));
3951 }
27bc2bce 3952 oshdrs->set_address_and_file_offset(0, off);
61ba1cf9 3953 off += oshdrs->data_size();
cdc29364
CC
3954 if (off > *poff)
3955 *poff = off;
27bc2bce 3956 this->section_headers_ = oshdrs;
54dc6425
ILT
3957}
3958
d491d34e
ILT
3959// Count the allocated sections.
3960
3961size_t
3962Layout::allocated_output_section_count() const
3963{
3964 size_t section_count = 0;
3965 for (Segment_list::const_iterator p = this->segment_list_.begin();
3966 p != this->segment_list_.end();
3967 ++p)
3968 section_count += (*p)->output_section_count();
3969 return section_count;
3970}
3971
dbe717ef
ILT
3972// Create the dynamic symbol table.
3973
3974void
7bf1f802 3975Layout::create_dynamic_symtab(const Input_objects* input_objects,
2e702c99 3976 Symbol_table* symtab,
ca09d69a 3977 Output_section** pdynstr,
14b31740
ILT
3978 unsigned int* plocal_dynamic_count,
3979 std::vector<Symbol*>* pdynamic_symbols,
3980 Versions* pversions)
dbe717ef 3981{
a3ad94ed
ILT
3982 // Count all the symbols in the dynamic symbol table, and set the
3983 // dynamic symbol indexes.
dbe717ef 3984
a3ad94ed
ILT
3985 // Skip symbol 0, which is always all zeroes.
3986 unsigned int index = 1;
dbe717ef 3987
a3ad94ed
ILT
3988 // Add STT_SECTION symbols for each Output section which needs one.
3989 for (Section_list::iterator p = this->section_list_.begin();
3990 p != this->section_list_.end();
3991 ++p)
3992 {
3993 if (!(*p)->needs_dynsym_index())
3994 (*p)->set_dynsym_index(-1U);
3995 else
3996 {
3997 (*p)->set_dynsym_index(index);
3998 ++index;
3999 }
4000 }
4001
7bf1f802
ILT
4002 // Count the local symbols that need to go in the dynamic symbol table,
4003 // and set the dynamic symbol indexes.
4004 for (Input_objects::Relobj_iterator p = input_objects->relobj_begin();
4005 p != input_objects->relobj_end();
4006 ++p)
4007 {
4008 unsigned int new_index = (*p)->set_local_dynsym_indexes(index);
4009 index = new_index;
4010 }
a3ad94ed
ILT
4011
4012 unsigned int local_symcount = index;
14b31740 4013 *plocal_dynamic_count = local_symcount;
a3ad94ed 4014
9b07f471 4015 index = symtab->set_dynsym_indexes(index, pdynamic_symbols,
35cdfc9a 4016 &this->dynpool_, pversions);
a3ad94ed
ILT
4017
4018 int symsize;
4019 unsigned int align;
8851ecca 4020 const int size = parameters->target().get_size();
a3ad94ed
ILT
4021 if (size == 32)
4022 {
4023 symsize = elfcpp::Elf_sizes<32>::sym_size;
4024 align = 4;
4025 }
4026 else if (size == 64)
4027 {
4028 symsize = elfcpp::Elf_sizes<64>::sym_size;
4029 align = 8;
4030 }
4031 else
4032 gold_unreachable();
4033
14b31740
ILT
4034 // Create the dynamic symbol table section.
4035
3802b2dd
ILT
4036 Output_section* dynsym = this->choose_output_section(NULL, ".dynsym",
4037 elfcpp::SHT_DYNSYM,
4038 elfcpp::SHF_ALLOC,
22f0da72
ILT
4039 false,
4040 ORDER_DYNAMIC_LINKER,
4041 false);
a3ad94ed 4042
6daf5215
ILT
4043 // Check for NULL as a linker script may discard .dynsym.
4044 if (dynsym != NULL)
4045 {
4046 Output_section_data* odata = new Output_data_fixed_space(index * symsize,
4047 align,
4048 "** dynsym");
4049 dynsym->add_output_section_data(odata);
a3ad94ed 4050
6daf5215
ILT
4051 dynsym->set_info(local_symcount);
4052 dynsym->set_entsize(symsize);
4053 dynsym->set_addralign(align);
a3ad94ed 4054
6daf5215
ILT
4055 this->dynsym_section_ = dynsym;
4056 }
a3ad94ed 4057
16649710 4058 Output_data_dynamic* const odyn = this->dynamic_data_;
6daf5215
ILT
4059 if (odyn != NULL)
4060 {
4061 odyn->add_section_address(elfcpp::DT_SYMTAB, dynsym);
4062 odyn->add_constant(elfcpp::DT_SYMENT, symsize);
4063 }
a3ad94ed 4064
d491d34e
ILT
4065 // If there are more than SHN_LORESERVE allocated sections, we
4066 // create a .dynsym_shndx section. It is possible that we don't
4067 // need one, because it is possible that there are no dynamic
4068 // symbols in any of the sections with indexes larger than
4069 // SHN_LORESERVE. This is probably unusual, though, and at this
4070 // time we don't know the actual section indexes so it is
4071 // inconvenient to check.
4072 if (this->allocated_output_section_count() >= elfcpp::SHN_LORESERVE)
4073 {
2ea97941 4074 Output_section* dynsym_xindex =
d491d34e
ILT
4075 this->choose_output_section(NULL, ".dynsym_shndx",
4076 elfcpp::SHT_SYMTAB_SHNDX,
4077 elfcpp::SHF_ALLOC,
22f0da72 4078 false, ORDER_DYNAMIC_LINKER, false);
d491d34e 4079
6daf5215
ILT
4080 if (dynsym_xindex != NULL)
4081 {
4082 this->dynsym_xindex_ = new Output_symtab_xindex(index);
d491d34e 4083
6daf5215 4084 dynsym_xindex->add_output_section_data(this->dynsym_xindex_);
d491d34e 4085
6daf5215
ILT
4086 dynsym_xindex->set_link_section(dynsym);
4087 dynsym_xindex->set_addralign(4);
4088 dynsym_xindex->set_entsize(4);
d491d34e 4089
6daf5215 4090 dynsym_xindex->set_after_input_sections();
d491d34e 4091
6daf5215
ILT
4092 // This tells the driver code to wait until the symbol table
4093 // has written out before writing out the postprocessing
4094 // sections, including the .dynsym_shndx section.
4095 this->any_postprocessing_sections_ = true;
4096 }
d491d34e
ILT
4097 }
4098
14b31740
ILT
4099 // Create the dynamic string table section.
4100
3802b2dd
ILT
4101 Output_section* dynstr = this->choose_output_section(NULL, ".dynstr",
4102 elfcpp::SHT_STRTAB,
4103 elfcpp::SHF_ALLOC,
22f0da72
ILT
4104 false,
4105 ORDER_DYNAMIC_LINKER,
4106 false);
a3ad94ed 4107
6daf5215
ILT
4108 if (dynstr != NULL)
4109 {
4110 Output_section_data* strdata = new Output_data_strtab(&this->dynpool_);
4111 dynstr->add_output_section_data(strdata);
a3ad94ed 4112
6daf5215
ILT
4113 if (dynsym != NULL)
4114 dynsym->set_link_section(dynstr);
4115 if (this->dynamic_section_ != NULL)
4116 this->dynamic_section_->set_link_section(dynstr);
16649710 4117
6daf5215
ILT
4118 if (odyn != NULL)
4119 {
4120 odyn->add_section_address(elfcpp::DT_STRTAB, dynstr);
4121 odyn->add_section_size(elfcpp::DT_STRSZ, dynstr);
4122 }
a3ad94ed 4123
6daf5215
ILT
4124 *pdynstr = dynstr;
4125 }
14b31740
ILT
4126
4127 // Create the hash tables.
4128
13670ee6
ILT
4129 if (strcmp(parameters->options().hash_style(), "sysv") == 0
4130 || strcmp(parameters->options().hash_style(), "both") == 0)
4131 {
4132 unsigned char* phash;
4133 unsigned int hashlen;
4134 Dynobj::create_elf_hash_table(*pdynamic_symbols, local_symcount,
4135 &phash, &hashlen);
4136
22f0da72
ILT
4137 Output_section* hashsec =
4138 this->choose_output_section(NULL, ".hash", elfcpp::SHT_HASH,
4139 elfcpp::SHF_ALLOC, false,
4140 ORDER_DYNAMIC_LINKER, false);
13670ee6
ILT
4141
4142 Output_section_data* hashdata = new Output_data_const_buffer(phash,
4143 hashlen,
7d9e3d98
ILT
4144 align,
4145 "** hash");
6daf5215
ILT
4146 if (hashsec != NULL && hashdata != NULL)
4147 hashsec->add_output_section_data(hashdata);
13670ee6 4148
6daf5215
ILT
4149 if (hashsec != NULL)
4150 {
4151 if (dynsym != NULL)
4152 hashsec->set_link_section(dynsym);
4153 hashsec->set_entsize(4);
4154 }
a3ad94ed 4155
6daf5215
ILT
4156 if (odyn != NULL)
4157 odyn->add_section_address(elfcpp::DT_HASH, hashsec);
13670ee6
ILT
4158 }
4159
4160 if (strcmp(parameters->options().hash_style(), "gnu") == 0
4161 || strcmp(parameters->options().hash_style(), "both") == 0)
4162 {
4163 unsigned char* phash;
4164 unsigned int hashlen;
4165 Dynobj::create_gnu_hash_table(*pdynamic_symbols, local_symcount,
4166 &phash, &hashlen);
a3ad94ed 4167
22f0da72
ILT
4168 Output_section* hashsec =
4169 this->choose_output_section(NULL, ".gnu.hash", elfcpp::SHT_GNU_HASH,
4170 elfcpp::SHF_ALLOC, false,
4171 ORDER_DYNAMIC_LINKER, false);
a3ad94ed 4172
13670ee6
ILT
4173 Output_section_data* hashdata = new Output_data_const_buffer(phash,
4174 hashlen,
7d9e3d98
ILT
4175 align,
4176 "** hash");
6daf5215
ILT
4177 if (hashsec != NULL && hashdata != NULL)
4178 hashsec->add_output_section_data(hashdata);
a3ad94ed 4179
6daf5215
ILT
4180 if (hashsec != NULL)
4181 {
4182 if (dynsym != NULL)
4183 hashsec->set_link_section(dynsym);
1b81fb71 4184
6daf5215
ILT
4185 // For a 64-bit target, the entries in .gnu.hash do not have
4186 // a uniform size, so we only set the entry size for a
4187 // 32-bit target.
4188 if (parameters->target().get_size() == 32)
4189 hashsec->set_entsize(4);
a3ad94ed 4190
6daf5215
ILT
4191 if (odyn != NULL)
4192 odyn->add_section_address(elfcpp::DT_GNU_HASH, hashsec);
4193 }
13670ee6 4194 }
dbe717ef
ILT
4195}
4196
7bf1f802
ILT
4197// Assign offsets to each local portion of the dynamic symbol table.
4198
4199void
4200Layout::assign_local_dynsym_offsets(const Input_objects* input_objects)
4201{
4202 Output_section* dynsym = this->dynsym_section_;
6daf5215
ILT
4203 if (dynsym == NULL)
4204 return;
7bf1f802
ILT
4205
4206 off_t off = dynsym->offset();
4207
4208 // Skip the dummy symbol at the start of the section.
4209 off += dynsym->entsize();
4210
4211 for (Input_objects::Relobj_iterator p = input_objects->relobj_begin();
4212 p != input_objects->relobj_end();
4213 ++p)
4214 {
4215 unsigned int count = (*p)->set_local_dynsym_offset(off);
4216 off += count * dynsym->entsize();
4217 }
4218}
4219
14b31740
ILT
4220// Create the version sections.
4221
4222void
9025d29d 4223Layout::create_version_sections(const Versions* versions,
46fe1623 4224 const Symbol_table* symtab,
14b31740
ILT
4225 unsigned int local_symcount,
4226 const std::vector<Symbol*>& dynamic_symbols,
4227 const Output_section* dynstr)
4228{
4229 if (!versions->any_defs() && !versions->any_needs())
4230 return;
4231
8851ecca 4232 switch (parameters->size_and_endianness())
14b31740 4233 {
193a53d9 4234#ifdef HAVE_TARGET_32_LITTLE
8851ecca 4235 case Parameters::TARGET_32_LITTLE:
7d1a9ebb
ILT
4236 this->sized_create_version_sections<32, false>(versions, symtab,
4237 local_symcount,
4238 dynamic_symbols, dynstr);
8851ecca 4239 break;
193a53d9 4240#endif
8851ecca
ILT
4241#ifdef HAVE_TARGET_32_BIG
4242 case Parameters::TARGET_32_BIG:
7d1a9ebb
ILT
4243 this->sized_create_version_sections<32, true>(versions, symtab,
4244 local_symcount,
4245 dynamic_symbols, dynstr);
8851ecca 4246 break;
193a53d9 4247#endif
193a53d9 4248#ifdef HAVE_TARGET_64_LITTLE
8851ecca 4249 case Parameters::TARGET_64_LITTLE:
7d1a9ebb
ILT
4250 this->sized_create_version_sections<64, false>(versions, symtab,
4251 local_symcount,
4252 dynamic_symbols, dynstr);
8851ecca 4253 break;
193a53d9 4254#endif
8851ecca
ILT
4255#ifdef HAVE_TARGET_64_BIG
4256 case Parameters::TARGET_64_BIG:
7d1a9ebb
ILT
4257 this->sized_create_version_sections<64, true>(versions, symtab,
4258 local_symcount,
4259 dynamic_symbols, dynstr);
8851ecca
ILT
4260 break;
4261#endif
4262 default:
4263 gold_unreachable();
14b31740 4264 }
14b31740
ILT
4265}
4266
4267// Create the version sections, sized version.
4268
4269template<int size, bool big_endian>
4270void
4271Layout::sized_create_version_sections(
4272 const Versions* versions,
46fe1623 4273 const Symbol_table* symtab,
14b31740
ILT
4274 unsigned int local_symcount,
4275 const std::vector<Symbol*>& dynamic_symbols,
7d1a9ebb 4276 const Output_section* dynstr)
14b31740 4277{
3802b2dd
ILT
4278 Output_section* vsec = this->choose_output_section(NULL, ".gnu.version",
4279 elfcpp::SHT_GNU_versym,
4280 elfcpp::SHF_ALLOC,
22f0da72
ILT
4281 false,
4282 ORDER_DYNAMIC_LINKER,
4283 false);
14b31740 4284
6daf5215
ILT
4285 // Check for NULL since a linker script may discard this section.
4286 if (vsec != NULL)
4287 {
4288 unsigned char* vbuf;
4289 unsigned int vsize;
4290 versions->symbol_section_contents<size, big_endian>(symtab,
4291 &this->dynpool_,
4292 local_symcount,
4293 dynamic_symbols,
4294 &vbuf, &vsize);
4295
4296 Output_section_data* vdata = new Output_data_const_buffer(vbuf, vsize, 2,
4297 "** versions");
4298
4299 vsec->add_output_section_data(vdata);
4300 vsec->set_entsize(2);
4301 vsec->set_link_section(this->dynsym_section_);
4302 }
14b31740
ILT
4303
4304 Output_data_dynamic* const odyn = this->dynamic_data_;
6daf5215
ILT
4305 if (odyn != NULL && vsec != NULL)
4306 odyn->add_section_address(elfcpp::DT_VERSYM, vsec);
14b31740
ILT
4307
4308 if (versions->any_defs())
4309 {
3802b2dd 4310 Output_section* vdsec;
6daf5215
ILT
4311 vdsec = this->choose_output_section(NULL, ".gnu.version_d",
4312 elfcpp::SHT_GNU_verdef,
4313 elfcpp::SHF_ALLOC,
4314 false, ORDER_DYNAMIC_LINKER, false);
4315
4316 if (vdsec != NULL)
4317 {
4318 unsigned char* vdbuf;
4319 unsigned int vdsize;
4320 unsigned int vdentries;
4321 versions->def_section_contents<size, big_endian>(&this->dynpool_,
4322 &vdbuf, &vdsize,
4323 &vdentries);
4324
4325 Output_section_data* vddata =
4326 new Output_data_const_buffer(vdbuf, vdsize, 4, "** version defs");
4327
4328 vdsec->add_output_section_data(vddata);
4329 vdsec->set_link_section(dynstr);
4330 vdsec->set_info(vdentries);
4331
4332 if (odyn != NULL)
4333 {
4334 odyn->add_section_address(elfcpp::DT_VERDEF, vdsec);
4335 odyn->add_constant(elfcpp::DT_VERDEFNUM, vdentries);
4336 }
4337 }
14b31740
ILT
4338 }
4339
4340 if (versions->any_needs())
4341 {
14b31740 4342 Output_section* vnsec;
3802b2dd
ILT
4343 vnsec = this->choose_output_section(NULL, ".gnu.version_r",
4344 elfcpp::SHT_GNU_verneed,
4345 elfcpp::SHF_ALLOC,
22f0da72 4346 false, ORDER_DYNAMIC_LINKER, false);
14b31740 4347
6daf5215
ILT
4348 if (vnsec != NULL)
4349 {
4350 unsigned char* vnbuf;
4351 unsigned int vnsize;
4352 unsigned int vnentries;
4353 versions->need_section_contents<size, big_endian>(&this->dynpool_,
4354 &vnbuf, &vnsize,
4355 &vnentries);
14b31740 4356
6daf5215
ILT
4357 Output_section_data* vndata =
4358 new Output_data_const_buffer(vnbuf, vnsize, 4, "** version refs");
14b31740 4359
6daf5215
ILT
4360 vnsec->add_output_section_data(vndata);
4361 vnsec->set_link_section(dynstr);
4362 vnsec->set_info(vnentries);
14b31740 4363
6daf5215
ILT
4364 if (odyn != NULL)
4365 {
4366 odyn->add_section_address(elfcpp::DT_VERNEED, vnsec);
4367 odyn->add_constant(elfcpp::DT_VERNEEDNUM, vnentries);
4368 }
4369 }
14b31740
ILT
4370 }
4371}
4372
dbe717ef
ILT
4373// Create the .interp section and PT_INTERP segment.
4374
4375void
4376Layout::create_interp(const Target* target)
4377{
10b4f102
ILT
4378 gold_assert(this->interp_segment_ == NULL);
4379
e55bde5e 4380 const char* interp = parameters->options().dynamic_linker();
dbe717ef
ILT
4381 if (interp == NULL)
4382 {
4383 interp = target->dynamic_linker();
a3ad94ed 4384 gold_assert(interp != NULL);
dbe717ef
ILT
4385 }
4386
4387 size_t len = strlen(interp) + 1;
4388
4389 Output_section_data* odata = new Output_data_const(interp, len, 1);
4390
e1f74f98
ILT
4391 Output_section* osec = this->choose_output_section(NULL, ".interp",
4392 elfcpp::SHT_PROGBITS,
4393 elfcpp::SHF_ALLOC,
4394 false, ORDER_INTERP,
4395 false);
6daf5215
ILT
4396 if (osec != NULL)
4397 osec->add_output_section_data(odata);
dbe717ef
ILT
4398}
4399
ea715a34
ILT
4400// Add dynamic tags for the PLT and the dynamic relocs. This is
4401// called by the target-specific code. This does nothing if not doing
4402// a dynamic link.
4403
4404// USE_REL is true for REL relocs rather than RELA relocs.
4405
4406// If PLT_GOT is not NULL, then DT_PLTGOT points to it.
4407
4408// If PLT_REL is not NULL, it is used for DT_PLTRELSZ, and DT_JMPREL,
e291e7b9
ILT
4409// and we also set DT_PLTREL. We use PLT_REL's output section, since
4410// some targets have multiple reloc sections in PLT_REL.
ea715a34
ILT
4411
4412// If DYN_REL is not NULL, it is used for DT_REL/DT_RELA,
67181c72
ILT
4413// DT_RELSZ/DT_RELASZ, DT_RELENT/DT_RELAENT. Again we use the output
4414// section.
ea715a34
ILT
4415
4416// If ADD_DEBUG is true, we add a DT_DEBUG entry when generating an
4417// executable.
4418
4419void
4420Layout::add_target_dynamic_tags(bool use_rel, const Output_data* plt_got,
4421 const Output_data* plt_rel,
3a44184e 4422 const Output_data_reloc_generic* dyn_rel,
612a8d3d 4423 bool add_debug, bool dynrel_includes_plt)
ea715a34
ILT
4424{
4425 Output_data_dynamic* odyn = this->dynamic_data_;
4426 if (odyn == NULL)
4427 return;
4428
4429 if (plt_got != NULL && plt_got->output_section() != NULL)
4430 odyn->add_section_address(elfcpp::DT_PLTGOT, plt_got);
4431
4432 if (plt_rel != NULL && plt_rel->output_section() != NULL)
4433 {
e291e7b9
ILT
4434 odyn->add_section_size(elfcpp::DT_PLTRELSZ, plt_rel->output_section());
4435 odyn->add_section_address(elfcpp::DT_JMPREL, plt_rel->output_section());
ea715a34
ILT
4436 odyn->add_constant(elfcpp::DT_PLTREL,
4437 use_rel ? elfcpp::DT_REL : elfcpp::DT_RELA);
4438 }
4439
82435b3b
ILT
4440 if ((dyn_rel != NULL && dyn_rel->output_section() != NULL)
4441 || (dynrel_includes_plt
4442 && plt_rel != NULL
4443 && plt_rel->output_section() != NULL))
ea715a34 4444 {
82435b3b
ILT
4445 bool have_dyn_rel = dyn_rel != NULL && dyn_rel->output_section() != NULL;
4446 bool have_plt_rel = plt_rel != NULL && plt_rel->output_section() != NULL;
ea715a34 4447 odyn->add_section_address(use_rel ? elfcpp::DT_REL : elfcpp::DT_RELA,
82435b3b
ILT
4448 (have_dyn_rel
4449 ? dyn_rel->output_section()
4450 : plt_rel->output_section()));
4451 elfcpp::DT size_tag = use_rel ? elfcpp::DT_RELSZ : elfcpp::DT_RELASZ;
4452 if (have_dyn_rel && have_plt_rel && dynrel_includes_plt)
4453 odyn->add_section_size(size_tag,
67181c72
ILT
4454 dyn_rel->output_section(),
4455 plt_rel->output_section());
82435b3b
ILT
4456 else if (have_dyn_rel)
4457 odyn->add_section_size(size_tag, dyn_rel->output_section());
612a8d3d 4458 else
82435b3b 4459 odyn->add_section_size(size_tag, plt_rel->output_section());
ea715a34
ILT
4460 const int size = parameters->target().get_size();
4461 elfcpp::DT rel_tag;
4462 int rel_size;
4463 if (use_rel)
4464 {
4465 rel_tag = elfcpp::DT_RELENT;
4466 if (size == 32)
4467 rel_size = Reloc_types<elfcpp::SHT_REL, 32, false>::reloc_size;
4468 else if (size == 64)
4469 rel_size = Reloc_types<elfcpp::SHT_REL, 64, false>::reloc_size;
4470 else
4471 gold_unreachable();
4472 }
4473 else
4474 {
4475 rel_tag = elfcpp::DT_RELAENT;
4476 if (size == 32)
4477 rel_size = Reloc_types<elfcpp::SHT_RELA, 32, false>::reloc_size;
4478 else if (size == 64)
4479 rel_size = Reloc_types<elfcpp::SHT_RELA, 64, false>::reloc_size;
4480 else
4481 gold_unreachable();
4482 }
4483 odyn->add_constant(rel_tag, rel_size);
3a44184e 4484
82435b3b 4485 if (parameters->options().combreloc() && have_dyn_rel)
3a44184e
ILT
4486 {
4487 size_t c = dyn_rel->relative_reloc_count();
4488 if (c > 0)
4489 odyn->add_constant((use_rel
4490 ? elfcpp::DT_RELCOUNT
4491 : elfcpp::DT_RELACOUNT),
4492 c);
4493 }
ea715a34
ILT
4494 }
4495
4496 if (add_debug && !parameters->options().shared())
4497 {
4498 // The value of the DT_DEBUG tag is filled in by the dynamic
4499 // linker at run time, and used by the debugger.
4500 odyn->add_constant(elfcpp::DT_DEBUG, 0);
4501 }
4502}
4503
a3ad94ed
ILT
4504// Finish the .dynamic section and PT_DYNAMIC segment.
4505
4506void
4507Layout::finish_dynamic_section(const Input_objects* input_objects,
16649710 4508 const Symbol_table* symtab)
a3ad94ed 4509{
6daf5215
ILT
4510 if (!this->script_options_->saw_phdrs_clause()
4511 && this->dynamic_section_ != NULL)
1c4f3631
ILT
4512 {
4513 Output_segment* oseg = this->make_output_segment(elfcpp::PT_DYNAMIC,
4514 (elfcpp::PF_R
4515 | elfcpp::PF_W));
22f0da72
ILT
4516 oseg->add_output_section_to_nonload(this->dynamic_section_,
4517 elfcpp::PF_R | elfcpp::PF_W);
1c4f3631 4518 }
a3ad94ed 4519
16649710 4520 Output_data_dynamic* const odyn = this->dynamic_data_;
6daf5215
ILT
4521 if (odyn == NULL)
4522 return;
16649710 4523
a3ad94ed
ILT
4524 for (Input_objects::Dynobj_iterator p = input_objects->dynobj_begin();
4525 p != input_objects->dynobj_end();
4526 ++p)
4527 {
0f1c85a6 4528 if (!(*p)->is_needed() && (*p)->as_needed())
594c8e5e
ILT
4529 {
4530 // This dynamic object was linked with --as-needed, but it
4531 // is not needed.
4532 continue;
4533 }
4534
a3ad94ed
ILT
4535 odyn->add_string(elfcpp::DT_NEEDED, (*p)->soname());
4536 }
4537
8851ecca 4538 if (parameters->options().shared())
fced7afd 4539 {
e55bde5e 4540 const char* soname = parameters->options().soname();
fced7afd
ILT
4541 if (soname != NULL)
4542 odyn->add_string(elfcpp::DT_SONAME, soname);
4543 }
4544
c6585162 4545 Symbol* sym = symtab->lookup(parameters->options().init());
14b31740 4546 if (sym != NULL && sym->is_defined() && !sym->is_from_dynobj())
a3ad94ed
ILT
4547 odyn->add_symbol(elfcpp::DT_INIT, sym);
4548
c6585162 4549 sym = symtab->lookup(parameters->options().fini());
14b31740 4550 if (sym != NULL && sym->is_defined() && !sym->is_from_dynobj())
a3ad94ed
ILT
4551 odyn->add_symbol(elfcpp::DT_FINI, sym);
4552
f15f61a7
DK
4553 // Look for .init_array, .preinit_array and .fini_array by checking
4554 // section types.
4555 for(Layout::Section_list::const_iterator p = this->section_list_.begin();
4556 p != this->section_list_.end();
4557 ++p)
4558 switch((*p)->type())
4559 {
4560 case elfcpp::SHT_FINI_ARRAY:
4561 odyn->add_section_address(elfcpp::DT_FINI_ARRAY, *p);
2e702c99 4562 odyn->add_section_size(elfcpp::DT_FINI_ARRAYSZ, *p);
f15f61a7
DK
4563 break;
4564 case elfcpp::SHT_INIT_ARRAY:
4565 odyn->add_section_address(elfcpp::DT_INIT_ARRAY, *p);
2e702c99 4566 odyn->add_section_size(elfcpp::DT_INIT_ARRAYSZ, *p);
f15f61a7
DK
4567 break;
4568 case elfcpp::SHT_PREINIT_ARRAY:
4569 odyn->add_section_address(elfcpp::DT_PREINIT_ARRAY, *p);
2e702c99 4570 odyn->add_section_size(elfcpp::DT_PREINIT_ARRAYSZ, *p);
f15f61a7
DK
4571 break;
4572 default:
4573 break;
4574 }
2e702c99 4575
41f542e7 4576 // Add a DT_RPATH entry if needed.
e55bde5e 4577 const General_options::Dir_list& rpath(parameters->options().rpath());
41f542e7
ILT
4578 if (!rpath.empty())
4579 {
4580 std::string rpath_val;
4581 for (General_options::Dir_list::const_iterator p = rpath.begin();
2e702c99
RM
4582 p != rpath.end();
4583 ++p)
4584 {
4585 if (rpath_val.empty())
4586 rpath_val = p->name();
4587 else
4588 {
4589 // Eliminate duplicates.
4590 General_options::Dir_list::const_iterator q;
4591 for (q = rpath.begin(); q != p; ++q)
ad2d6943 4592 if (q->name() == p->name())
2e702c99
RM
4593 break;
4594 if (q == p)
4595 {
4596 rpath_val += ':';
4597 rpath_val += p->name();
4598 }
4599 }
4600 }
41f542e7
ILT
4601
4602 odyn->add_string(elfcpp::DT_RPATH, rpath_val);
7c414435
DM
4603 if (parameters->options().enable_new_dtags())
4604 odyn->add_string(elfcpp::DT_RUNPATH, rpath_val);
41f542e7 4605 }
4f4c5f80
ILT
4606
4607 // Look for text segments that have dynamic relocations.
4608 bool have_textrel = false;
4e8fe71f 4609 if (!this->script_options_->saw_sections_clause())
4f4c5f80 4610 {
4e8fe71f 4611 for (Segment_list::const_iterator p = this->segment_list_.begin();
2e702c99
RM
4612 p != this->segment_list_.end();
4613 ++p)
4614 {
4615 if ((*p)->type() == elfcpp::PT_LOAD
766f91bb 4616 && ((*p)->flags() & elfcpp::PF_W) == 0
2e702c99
RM
4617 && (*p)->has_dynamic_reloc())
4618 {
4619 have_textrel = true;
4620 break;
4621 }
4622 }
4e8fe71f
ILT
4623 }
4624 else
4625 {
4626 // We don't know the section -> segment mapping, so we are
4627 // conservative and just look for readonly sections with
4628 // relocations. If those sections wind up in writable segments,
4629 // then we have created an unnecessary DT_TEXTREL entry.
4630 for (Section_list::const_iterator p = this->section_list_.begin();
2e702c99
RM
4631 p != this->section_list_.end();
4632 ++p)
4633 {
4634 if (((*p)->flags() & elfcpp::SHF_ALLOC) != 0
4635 && ((*p)->flags() & elfcpp::SHF_WRITE) == 0
4636 && (*p)->has_dynamic_reloc())
4637 {
4638 have_textrel = true;
4639 break;
4640 }
4641 }
4f4c5f80
ILT
4642 }
4643
886288f1
ILT
4644 if (parameters->options().filter() != NULL)
4645 odyn->add_string(elfcpp::DT_FILTER, parameters->options().filter());
4646 if (parameters->options().any_auxiliary())
4647 {
4648 for (options::String_set::const_iterator p =
4649 parameters->options().auxiliary_begin();
4650 p != parameters->options().auxiliary_end();
4651 ++p)
4652 odyn->add_string(elfcpp::DT_AUXILIARY, *p);
4653 }
4654
4655 // Add a DT_FLAGS entry if necessary.
4f4c5f80
ILT
4656 unsigned int flags = 0;
4657 if (have_textrel)
6a41d30b
ILT
4658 {
4659 // Add a DT_TEXTREL for compatibility with older loaders.
4660 odyn->add_constant(elfcpp::DT_TEXTREL, 0);
4661 flags |= elfcpp::DF_TEXTREL;
b9674e17 4662
ffeef7df
ILT
4663 if (parameters->options().text())
4664 gold_error(_("read-only segment has dynamic relocations"));
4665 else if (parameters->options().warn_shared_textrel()
4666 && parameters->options().shared())
b9674e17 4667 gold_warning(_("shared library text segment is not shareable"));
6a41d30b 4668 }
8851ecca 4669 if (parameters->options().shared() && this->has_static_tls())
535890bb 4670 flags |= elfcpp::DF_STATIC_TLS;
7be8330a
CD
4671 if (parameters->options().origin())
4672 flags |= elfcpp::DF_ORIGIN;
f15f61a7
DK
4673 if (parameters->options().Bsymbolic())
4674 {
4675 flags |= elfcpp::DF_SYMBOLIC;
4676 // Add DT_SYMBOLIC for compatibility with older loaders.
4677 odyn->add_constant(elfcpp::DT_SYMBOLIC, 0);
4678 }
e1c74d60
ILT
4679 if (parameters->options().now())
4680 flags |= elfcpp::DF_BIND_NOW;
0d212c3a
ILT
4681 if (flags != 0)
4682 odyn->add_constant(elfcpp::DT_FLAGS, flags);
7c414435
DM
4683
4684 flags = 0;
4685 if (parameters->options().initfirst())
4686 flags |= elfcpp::DF_1_INITFIRST;
4687 if (parameters->options().interpose())
4688 flags |= elfcpp::DF_1_INTERPOSE;
4689 if (parameters->options().loadfltr())
4690 flags |= elfcpp::DF_1_LOADFLTR;
4691 if (parameters->options().nodefaultlib())
4692 flags |= elfcpp::DF_1_NODEFLIB;
4693 if (parameters->options().nodelete())
4694 flags |= elfcpp::DF_1_NODELETE;
4695 if (parameters->options().nodlopen())
4696 flags |= elfcpp::DF_1_NOOPEN;
4697 if (parameters->options().nodump())
4698 flags |= elfcpp::DF_1_NODUMP;
4699 if (!parameters->options().shared())
4700 flags &= ~(elfcpp::DF_1_INITFIRST
4701 | elfcpp::DF_1_NODELETE
4702 | elfcpp::DF_1_NOOPEN);
7be8330a
CD
4703 if (parameters->options().origin())
4704 flags |= elfcpp::DF_1_ORIGIN;
e1c74d60
ILT
4705 if (parameters->options().now())
4706 flags |= elfcpp::DF_1_NOW;
e2153196
ILT
4707 if (parameters->options().Bgroup())
4708 flags |= elfcpp::DF_1_GROUP;
0d212c3a 4709 if (flags != 0)
7c414435 4710 odyn->add_constant(elfcpp::DT_FLAGS_1, flags);
a3ad94ed
ILT
4711}
4712
f0ba79e2
ILT
4713// Set the size of the _DYNAMIC symbol table to be the size of the
4714// dynamic data.
4715
4716void
4717Layout::set_dynamic_symbol_size(const Symbol_table* symtab)
4718{
4719 Output_data_dynamic* const odyn = this->dynamic_data_;
6daf5215
ILT
4720 if (odyn == NULL)
4721 return;
f0ba79e2 4722 odyn->finalize_data_size();
6daf5215
ILT
4723 if (this->dynamic_symbol_ == NULL)
4724 return;
f0ba79e2
ILT
4725 off_t data_size = odyn->data_size();
4726 const int size = parameters->target().get_size();
4727 if (size == 32)
4728 symtab->get_sized_symbol<32>(this->dynamic_symbol_)->set_symsize(data_size);
4729 else if (size == 64)
4730 symtab->get_sized_symbol<64>(this->dynamic_symbol_)->set_symsize(data_size);
4731 else
4732 gold_unreachable();
4733}
4734
dff16297
ILT
4735// The mapping of input section name prefixes to output section names.
4736// In some cases one prefix is itself a prefix of another prefix; in
4737// such a case the longer prefix must come first. These prefixes are
4738// based on the GNU linker default ELF linker script.
a2fb1b05 4739
ead1e424 4740#define MAPPING_INIT(f, t) { f, sizeof(f) - 1, t, sizeof(t) - 1 }
1be75daa 4741#define MAPPING_INIT_EXACT(f, t) { f, 0, t, sizeof(t) - 1 }
dff16297 4742const Layout::Section_name_mapping Layout::section_name_mapping[] =
a2fb1b05 4743{
dff16297 4744 MAPPING_INIT(".text.", ".text"),
dff16297 4745 MAPPING_INIT(".rodata.", ".rodata"),
9b689de0 4746 MAPPING_INIT(".data.rel.ro.local.", ".data.rel.ro.local"),
1be75daa 4747 MAPPING_INIT_EXACT(".data.rel.ro.local", ".data.rel.ro.local"),
9b689de0 4748 MAPPING_INIT(".data.rel.ro.", ".data.rel.ro"),
1be75daa 4749 MAPPING_INIT_EXACT(".data.rel.ro", ".data.rel.ro"),
dff16297
ILT
4750 MAPPING_INIT(".data.", ".data"),
4751 MAPPING_INIT(".bss.", ".bss"),
4752 MAPPING_INIT(".tdata.", ".tdata"),
4753 MAPPING_INIT(".tbss.", ".tbss"),
4754 MAPPING_INIT(".init_array.", ".init_array"),
4755 MAPPING_INIT(".fini_array.", ".fini_array"),
4756 MAPPING_INIT(".sdata.", ".sdata"),
4757 MAPPING_INIT(".sbss.", ".sbss"),
4758 // FIXME: In the GNU linker, .sbss2 and .sdata2 are handled
4759 // differently depending on whether it is creating a shared library.
4760 MAPPING_INIT(".sdata2.", ".sdata"),
4761 MAPPING_INIT(".sbss2.", ".sbss"),
4762 MAPPING_INIT(".lrodata.", ".lrodata"),
4763 MAPPING_INIT(".ldata.", ".ldata"),
4764 MAPPING_INIT(".lbss.", ".lbss"),
4765 MAPPING_INIT(".gcc_except_table.", ".gcc_except_table"),
4766 MAPPING_INIT(".gnu.linkonce.d.rel.ro.local.", ".data.rel.ro.local"),
4767 MAPPING_INIT(".gnu.linkonce.d.rel.ro.", ".data.rel.ro"),
4768 MAPPING_INIT(".gnu.linkonce.t.", ".text"),
4769 MAPPING_INIT(".gnu.linkonce.r.", ".rodata"),
4770 MAPPING_INIT(".gnu.linkonce.d.", ".data"),
4771 MAPPING_INIT(".gnu.linkonce.b.", ".bss"),
4772 MAPPING_INIT(".gnu.linkonce.s.", ".sdata"),
4773 MAPPING_INIT(".gnu.linkonce.sb.", ".sbss"),
4774 MAPPING_INIT(".gnu.linkonce.s2.", ".sdata"),
4775 MAPPING_INIT(".gnu.linkonce.sb2.", ".sbss"),
4776 MAPPING_INIT(".gnu.linkonce.wi.", ".debug_info"),
4777 MAPPING_INIT(".gnu.linkonce.td.", ".tdata"),
4778 MAPPING_INIT(".gnu.linkonce.tb.", ".tbss"),
4779 MAPPING_INIT(".gnu.linkonce.lr.", ".lrodata"),
4780 MAPPING_INIT(".gnu.linkonce.l.", ".ldata"),
4781 MAPPING_INIT(".gnu.linkonce.lb.", ".lbss"),
4a54abbb 4782 MAPPING_INIT(".ARM.extab", ".ARM.extab"),
1dcd334d 4783 MAPPING_INIT(".gnu.linkonce.armextab.", ".ARM.extab"),
4a54abbb 4784 MAPPING_INIT(".ARM.exidx", ".ARM.exidx"),
1dcd334d 4785 MAPPING_INIT(".gnu.linkonce.armexidx.", ".ARM.exidx"),
a2fb1b05
ILT
4786};
4787#undef MAPPING_INIT
1be75daa 4788#undef MAPPING_INIT_EXACT
a2fb1b05 4789
dff16297
ILT
4790const int Layout::section_name_mapping_count =
4791 (sizeof(Layout::section_name_mapping)
4792 / sizeof(Layout::section_name_mapping[0]));
a2fb1b05 4793
ead1e424
ILT
4794// Choose the output section name to use given an input section name.
4795// Set *PLEN to the length of the name. *PLEN is initialized to the
4796// length of NAME.
4797
4798const char*
5393d741
ILT
4799Layout::output_section_name(const Relobj* relobj, const char* name,
4800 size_t* plen)
ead1e424 4801{
af4a8a83
ILT
4802 // gcc 4.3 generates the following sorts of section names when it
4803 // needs a section name specific to a function:
4804 // .text.FN
4805 // .rodata.FN
4806 // .sdata2.FN
4807 // .data.FN
4808 // .data.rel.FN
4809 // .data.rel.local.FN
4810 // .data.rel.ro.FN
4811 // .data.rel.ro.local.FN
4812 // .sdata.FN
4813 // .bss.FN
4814 // .sbss.FN
4815 // .tdata.FN
4816 // .tbss.FN
4817
4818 // The GNU linker maps all of those to the part before the .FN,
4819 // except that .data.rel.local.FN is mapped to .data, and
4820 // .data.rel.ro.local.FN is mapped to .data.rel.ro. The sections
4821 // beginning with .data.rel.ro.local are grouped together.
4822
4823 // For an anonymous namespace, the string FN can contain a '.'.
4824
4825 // Also of interest: .rodata.strN.N, .rodata.cstN, both of which the
4826 // GNU linker maps to .rodata.
4827
dff16297
ILT
4828 // The .data.rel.ro sections are used with -z relro. The sections
4829 // are recognized by name. We use the same names that the GNU
4830 // linker does for these sections.
af4a8a83 4831
dff16297
ILT
4832 // It is hard to handle this in a principled way, so we don't even
4833 // try. We use a table of mappings. If the input section name is
4834 // not found in the table, we simply use it as the output section
4835 // name.
af4a8a83 4836
dff16297
ILT
4837 const Section_name_mapping* psnm = section_name_mapping;
4838 for (int i = 0; i < section_name_mapping_count; ++i, ++psnm)
ead1e424 4839 {
1be75daa 4840 if (psnm->fromlen > 0)
dff16297 4841 {
1be75daa
CC
4842 if (strncmp(name, psnm->from, psnm->fromlen) == 0)
4843 {
4844 *plen = psnm->tolen;
4845 return psnm->to;
4846 }
4847 }
4848 else
4849 {
4850 if (strcmp(name, psnm->from) == 0)
4851 {
4852 *plen = psnm->tolen;
4853 return psnm->to;
4854 }
dff16297 4855 }
ead1e424
ILT
4856 }
4857
5393d741
ILT
4858 // As an additional complication, .ctors sections are output in
4859 // either .ctors or .init_array sections, and .dtors sections are
4860 // output in either .dtors or .fini_array sections.
4861 if (is_prefix_of(".ctors.", name) || is_prefix_of(".dtors.", name))
4862 {
4863 if (parameters->options().ctors_in_init_array())
4864 {
4865 *plen = 11;
4866 return name[1] == 'c' ? ".init_array" : ".fini_array";
4867 }
4868 else
4869 {
4870 *plen = 6;
4871 return name[1] == 'c' ? ".ctors" : ".dtors";
4872 }
4873 }
4874 if (parameters->options().ctors_in_init_array()
4875 && (strcmp(name, ".ctors") == 0 || strcmp(name, ".dtors") == 0))
4876 {
4877 // To make .init_array/.fini_array work with gcc we must exclude
4878 // .ctors and .dtors sections from the crtbegin and crtend
4879 // files.
4880 if (relobj == NULL
4881 || (!Layout::match_file_name(relobj, "crtbegin")
4882 && !Layout::match_file_name(relobj, "crtend")))
4883 {
4884 *plen = 11;
4885 return name[1] == 'c' ? ".init_array" : ".fini_array";
4886 }
4887 }
4888
ead1e424
ILT
4889 return name;
4890}
4891
5393d741
ILT
4892// Return true if RELOBJ is an input file whose base name matches
4893// FILE_NAME. The base name must have an extension of ".o", and must
4894// be exactly FILE_NAME.o or FILE_NAME, one character, ".o". This is
4895// to match crtbegin.o as well as crtbeginS.o without getting confused
4896// by other possibilities. Overall matching the file name this way is
4897// a dreadful hack, but the GNU linker does it in order to better
4898// support gcc, and we need to be compatible.
4899
4900bool
4901Layout::match_file_name(const Relobj* relobj, const char* match)
4902{
4903 const std::string& file_name(relobj->name());
4904 const char* base_name = lbasename(file_name.c_str());
4905 size_t match_len = strlen(match);
4906 if (strncmp(base_name, match, match_len) != 0)
4907 return false;
4908 size_t base_len = strlen(base_name);
4909 if (base_len != match_len + 2 && base_len != match_len + 3)
4910 return false;
4911 return memcmp(base_name + base_len - 2, ".o", 2) == 0;
4912}
4913
8a4c0b0d
ILT
4914// Check if a comdat group or .gnu.linkonce section with the given
4915// NAME is selected for the link. If there is already a section,
1ef4d87f
ILT
4916// *KEPT_SECTION is set to point to the existing section and the
4917// function returns false. Otherwise, OBJECT, SHNDX, IS_COMDAT, and
4918// IS_GROUP_NAME are recorded for this NAME in the layout object,
4919// *KEPT_SECTION is set to the internal copy and the function returns
4920// true.
a2fb1b05
ILT
4921
4922bool
e55bde5e 4923Layout::find_or_add_kept_section(const std::string& name,
1ef4d87f
ILT
4924 Relobj* object,
4925 unsigned int shndx,
4926 bool is_comdat,
4927 bool is_group_name,
2e702c99 4928 Kept_section** kept_section)
a2fb1b05 4929{
e55bde5e
ILT
4930 // It's normal to see a couple of entries here, for the x86 thunk
4931 // sections. If we see more than a few, we're linking a C++
4932 // program, and we resize to get more space to minimize rehashing.
4933 if (this->signatures_.size() > 4
4934 && !this->resized_signatures_)
4935 {
4936 reserve_unordered_map(&this->signatures_,
4937 this->number_of_input_files_ * 64);
4938 this->resized_signatures_ = true;
4939 }
4940
1ef4d87f
ILT
4941 Kept_section candidate;
4942 std::pair<Signatures::iterator, bool> ins =
4943 this->signatures_.insert(std::make_pair(name, candidate));
a2fb1b05 4944
1ef4d87f 4945 if (kept_section != NULL)
8a4c0b0d 4946 *kept_section = &ins.first->second;
a2fb1b05
ILT
4947 if (ins.second)
4948 {
4949 // This is the first time we've seen this signature.
1ef4d87f
ILT
4950 ins.first->second.set_object(object);
4951 ins.first->second.set_shndx(shndx);
4952 if (is_comdat)
4953 ins.first->second.set_is_comdat();
4954 if (is_group_name)
4955 ins.first->second.set_is_group_name();
a2fb1b05
ILT
4956 return true;
4957 }
4958
1ef4d87f
ILT
4959 // We have already seen this signature.
4960
4961 if (ins.first->second.is_group_name())
a2fb1b05
ILT
4962 {
4963 // We've already seen a real section group with this signature.
1ef4d87f
ILT
4964 // If the kept group is from a plugin object, and we're in the
4965 // replacement phase, accept the new one as a replacement.
4966 if (ins.first->second.object() == NULL
2e702c99
RM
4967 && parameters->options().plugins()->in_replacement_phase())
4968 {
1ef4d87f
ILT
4969 ins.first->second.set_object(object);
4970 ins.first->second.set_shndx(shndx);
2e702c99
RM
4971 return true;
4972 }
a2fb1b05
ILT
4973 return false;
4974 }
1ef4d87f 4975 else if (is_group_name)
a2fb1b05
ILT
4976 {
4977 // This is a real section group, and we've already seen a
a0fa0c07 4978 // linkonce section with this signature. Record that we've seen
a2fb1b05 4979 // a section group, and don't include this section group.
1ef4d87f 4980 ins.first->second.set_is_group_name();
a2fb1b05
ILT
4981 return false;
4982 }
4983 else
4984 {
4985 // We've already seen a linkonce section and this is a linkonce
4986 // section. These don't block each other--this may be the same
4987 // symbol name with different section types.
4988 return true;
4989 }
4990}
4991
a445fddf
ILT
4992// Store the allocated sections into the section list.
4993
4994void
2ea97941 4995Layout::get_allocated_sections(Section_list* section_list) const
a445fddf
ILT
4996{
4997 for (Section_list::const_iterator p = this->section_list_.begin();
4998 p != this->section_list_.end();
4999 ++p)
5000 if (((*p)->flags() & elfcpp::SHF_ALLOC) != 0)
2ea97941 5001 section_list->push_back(*p);
a445fddf
ILT
5002}
5003
5004// Create an output segment.
5005
5006Output_segment*
5007Layout::make_output_segment(elfcpp::Elf_Word type, elfcpp::Elf_Word flags)
5008{
8851ecca 5009 gold_assert(!parameters->options().relocatable());
a445fddf
ILT
5010 Output_segment* oseg = new Output_segment(type, flags);
5011 this->segment_list_.push_back(oseg);
2d924fd9
ILT
5012
5013 if (type == elfcpp::PT_TLS)
5014 this->tls_segment_ = oseg;
5015 else if (type == elfcpp::PT_GNU_RELRO)
5016 this->relro_segment_ = oseg;
10b4f102
ILT
5017 else if (type == elfcpp::PT_INTERP)
5018 this->interp_segment_ = oseg;
2d924fd9 5019
a445fddf
ILT
5020 return oseg;
5021}
5022
bec5b579
CC
5023// Return the file offset of the normal symbol table.
5024
5025off_t
5026Layout::symtab_section_offset() const
5027{
5028 if (this->symtab_section_ != NULL)
5029 return this->symtab_section_->offset();
5030 return 0;
5031}
5032
886f533a
ILT
5033// Return the section index of the normal symbol table. It may have
5034// been stripped by the -s/--strip-all option.
5035
5036unsigned int
5037Layout::symtab_section_shndx() const
5038{
5039 if (this->symtab_section_ != NULL)
5040 return this->symtab_section_->out_shndx();
5041 return 0;
5042}
5043
730cdc88
ILT
5044// Write out the Output_sections. Most won't have anything to write,
5045// since most of the data will come from input sections which are
5046// handled elsewhere. But some Output_sections do have Output_data.
5047
5048void
5049Layout::write_output_sections(Output_file* of) const
5050{
5051 for (Section_list::const_iterator p = this->section_list_.begin();
5052 p != this->section_list_.end();
5053 ++p)
5054 {
5055 if (!(*p)->after_input_sections())
5056 (*p)->write(of);
5057 }
5058}
5059
61ba1cf9
ILT
5060// Write out data not associated with a section or the symbol table.
5061
5062void
9025d29d 5063Layout::write_data(const Symbol_table* symtab, Output_file* of) const
61ba1cf9 5064{
8851ecca 5065 if (!parameters->options().strip_all())
a3ad94ed 5066 {
2ea97941 5067 const Output_section* symtab_section = this->symtab_section_;
9e2dcb77
ILT
5068 for (Section_list::const_iterator p = this->section_list_.begin();
5069 p != this->section_list_.end();
5070 ++p)
a3ad94ed 5071 {
9e2dcb77
ILT
5072 if ((*p)->needs_symtab_index())
5073 {
2ea97941 5074 gold_assert(symtab_section != NULL);
9e2dcb77
ILT
5075 unsigned int index = (*p)->symtab_index();
5076 gold_assert(index > 0 && index != -1U);
2ea97941
ILT
5077 off_t off = (symtab_section->offset()
5078 + index * symtab_section->entsize());
d491d34e 5079 symtab->write_section_symbol(*p, this->symtab_xindex_, of, off);
9e2dcb77 5080 }
a3ad94ed
ILT
5081 }
5082 }
5083
2ea97941 5084 const Output_section* dynsym_section = this->dynsym_section_;
a3ad94ed
ILT
5085 for (Section_list::const_iterator p = this->section_list_.begin();
5086 p != this->section_list_.end();
5087 ++p)
5088 {
5089 if ((*p)->needs_dynsym_index())
5090 {
2ea97941 5091 gold_assert(dynsym_section != NULL);
a3ad94ed
ILT
5092 unsigned int index = (*p)->dynsym_index();
5093 gold_assert(index > 0 && index != -1U);
2ea97941
ILT
5094 off_t off = (dynsym_section->offset()
5095 + index * dynsym_section->entsize());
d491d34e 5096 symtab->write_section_symbol(*p, this->dynsym_xindex_, of, off);
a3ad94ed
ILT
5097 }
5098 }
5099
a3ad94ed 5100 // Write out the Output_data which are not in an Output_section.
61ba1cf9
ILT
5101 for (Data_list::const_iterator p = this->special_output_list_.begin();
5102 p != this->special_output_list_.end();
5103 ++p)
5104 (*p)->write(of);
5105}
5106
730cdc88
ILT
5107// Write out the Output_sections which can only be written after the
5108// input sections are complete.
5109
5110void
27bc2bce 5111Layout::write_sections_after_input_sections(Output_file* of)
730cdc88 5112{
27bc2bce 5113 // Determine the final section offsets, and thus the final output
9a0910c3
ILT
5114 // file size. Note we finalize the .shstrab last, to allow the
5115 // after_input_section sections to modify their section-names before
5116 // writing.
17a1d0a9 5117 if (this->any_postprocessing_sections_)
27bc2bce 5118 {
17a1d0a9
ILT
5119 off_t off = this->output_file_size_;
5120 off = this->set_section_offsets(off, POSTPROCESSING_SECTIONS_PASS);
8a4c0b0d 5121
17a1d0a9
ILT
5122 // Now that we've finalized the names, we can finalize the shstrab.
5123 off =
5124 this->set_section_offsets(off,
5125 STRTAB_AFTER_POSTPROCESSING_SECTIONS_PASS);
5126
5127 if (off > this->output_file_size_)
5128 {
5129 of->resize(off);
5130 this->output_file_size_ = off;
5131 }
27bc2bce
ILT
5132 }
5133
730cdc88
ILT
5134 for (Section_list::const_iterator p = this->section_list_.begin();
5135 p != this->section_list_.end();
5136 ++p)
5137 {
5138 if ((*p)->after_input_sections())
5139 (*p)->write(of);
5140 }
27bc2bce 5141
27bc2bce 5142 this->section_headers_->write(of);
730cdc88
ILT
5143}
5144
8ed814a9
ILT
5145// If the build ID requires computing a checksum, do so here, and
5146// write it out. We compute a checksum over the entire file because
5147// that is simplest.
5148
5149void
5150Layout::write_build_id(Output_file* of) const
5151{
5152 if (this->build_id_note_ == NULL)
5153 return;
5154
5155 const unsigned char* iv = of->get_input_view(0, this->output_file_size_);
5156
5157 unsigned char* ov = of->get_output_view(this->build_id_note_->offset(),
5158 this->build_id_note_->data_size());
5159
5160 const char* style = parameters->options().build_id();
5161 if (strcmp(style, "sha1") == 0)
5162 {
5163 sha1_ctx ctx;
5164 sha1_init_ctx(&ctx);
5165 sha1_process_bytes(iv, this->output_file_size_, &ctx);
5166 sha1_finish_ctx(&ctx, ov);
5167 }
5168 else if (strcmp(style, "md5") == 0)
5169 {
5170 md5_ctx ctx;
5171 md5_init_ctx(&ctx);
5172 md5_process_bytes(iv, this->output_file_size_, &ctx);
5173 md5_finish_ctx(&ctx, ov);
5174 }
5175 else
5176 gold_unreachable();
5177
5178 of->write_output_view(this->build_id_note_->offset(),
5179 this->build_id_note_->data_size(),
5180 ov);
5181
5182 of->free_input_view(0, this->output_file_size_, iv);
5183}
5184
516cb3d0
ILT
5185// Write out a binary file. This is called after the link is
5186// complete. IN is the temporary output file we used to generate the
5187// ELF code. We simply walk through the segments, read them from
5188// their file offset in IN, and write them to their load address in
5189// the output file. FIXME: with a bit more work, we could support
5190// S-records and/or Intel hex format here.
5191
5192void
5193Layout::write_binary(Output_file* in) const
5194{
e55bde5e 5195 gold_assert(parameters->options().oformat_enum()
bc644c6c 5196 == General_options::OBJECT_FORMAT_BINARY);
516cb3d0
ILT
5197
5198 // Get the size of the binary file.
5199 uint64_t max_load_address = 0;
5200 for (Segment_list::const_iterator p = this->segment_list_.begin();
5201 p != this->segment_list_.end();
5202 ++p)
5203 {
5204 if ((*p)->type() == elfcpp::PT_LOAD && (*p)->filesz() > 0)
5205 {
5206 uint64_t max_paddr = (*p)->paddr() + (*p)->filesz();
5207 if (max_paddr > max_load_address)
5208 max_load_address = max_paddr;
5209 }
5210 }
5211
8851ecca 5212 Output_file out(parameters->options().output_file_name());
516cb3d0
ILT
5213 out.open(max_load_address);
5214
5215 for (Segment_list::const_iterator p = this->segment_list_.begin();
5216 p != this->segment_list_.end();
5217 ++p)
5218 {
5219 if ((*p)->type() == elfcpp::PT_LOAD && (*p)->filesz() > 0)
5220 {
5221 const unsigned char* vin = in->get_input_view((*p)->offset(),
5222 (*p)->filesz());
5223 unsigned char* vout = out.get_output_view((*p)->paddr(),
5224 (*p)->filesz());
5225 memcpy(vout, vin, (*p)->filesz());
5226 out.write_output_view((*p)->paddr(), (*p)->filesz(), vout);
5227 in->free_input_view((*p)->offset(), (*p)->filesz(), vin);
5228 }
5229 }
5230
5231 out.close();
5232}
5233
7d9e3d98
ILT
5234// Print the output sections to the map file.
5235
5236void
5237Layout::print_to_mapfile(Mapfile* mapfile) const
5238{
5239 for (Segment_list::const_iterator p = this->segment_list_.begin();
5240 p != this->segment_list_.end();
5241 ++p)
5242 (*p)->print_sections_to_mapfile(mapfile);
5243}
5244
ad8f37d1
ILT
5245// Print statistical information to stderr. This is used for --stats.
5246
5247void
5248Layout::print_stats() const
5249{
5250 this->namepool_.print_stats("section name pool");
5251 this->sympool_.print_stats("output symbol name pool");
5252 this->dynpool_.print_stats("dynamic name pool");
38c5e8b4
ILT
5253
5254 for (Section_list::const_iterator p = this->section_list_.begin();
5255 p != this->section_list_.end();
5256 ++p)
5257 (*p)->print_merge_stats();
ad8f37d1
ILT
5258}
5259
730cdc88
ILT
5260// Write_sections_task methods.
5261
5262// We can always run this task.
5263
17a1d0a9
ILT
5264Task_token*
5265Write_sections_task::is_runnable()
730cdc88 5266{
17a1d0a9 5267 return NULL;
730cdc88
ILT
5268}
5269
5270// We need to unlock both OUTPUT_SECTIONS_BLOCKER and FINAL_BLOCKER
5271// when finished.
5272
17a1d0a9
ILT
5273void
5274Write_sections_task::locks(Task_locker* tl)
730cdc88 5275{
17a1d0a9
ILT
5276 tl->add(this, this->output_sections_blocker_);
5277 tl->add(this, this->final_blocker_);
730cdc88
ILT
5278}
5279
5280// Run the task--write out the data.
5281
5282void
5283Write_sections_task::run(Workqueue*)
5284{
5285 this->layout_->write_output_sections(this->of_);
5286}
5287
61ba1cf9
ILT
5288// Write_data_task methods.
5289
5290// We can always run this task.
5291
17a1d0a9
ILT
5292Task_token*
5293Write_data_task::is_runnable()
61ba1cf9 5294{
17a1d0a9 5295 return NULL;
61ba1cf9
ILT
5296}
5297
5298// We need to unlock FINAL_BLOCKER when finished.
5299
17a1d0a9
ILT
5300void
5301Write_data_task::locks(Task_locker* tl)
61ba1cf9 5302{
17a1d0a9 5303 tl->add(this, this->final_blocker_);
61ba1cf9
ILT
5304}
5305
5306// Run the task--write out the data.
5307
5308void
5309Write_data_task::run(Workqueue*)
5310{
9025d29d 5311 this->layout_->write_data(this->symtab_, this->of_);
61ba1cf9
ILT
5312}
5313
5314// Write_symbols_task methods.
5315
5316// We can always run this task.
5317
17a1d0a9
ILT
5318Task_token*
5319Write_symbols_task::is_runnable()
61ba1cf9 5320{
17a1d0a9 5321 return NULL;
61ba1cf9
ILT
5322}
5323
5324// We need to unlock FINAL_BLOCKER when finished.
5325
17a1d0a9
ILT
5326void
5327Write_symbols_task::locks(Task_locker* tl)
61ba1cf9 5328{
17a1d0a9 5329 tl->add(this, this->final_blocker_);
61ba1cf9
ILT
5330}
5331
5332// Run the task--write out the symbols.
5333
5334void
5335Write_symbols_task::run(Workqueue*)
5336{
fd9d194f
ILT
5337 this->symtab_->write_globals(this->sympool_, this->dynpool_,
5338 this->layout_->symtab_xindex(),
d491d34e 5339 this->layout_->dynsym_xindex(), this->of_);
61ba1cf9
ILT
5340}
5341
730cdc88
ILT
5342// Write_after_input_sections_task methods.
5343
5344// We can only run this task after the input sections have completed.
5345
17a1d0a9
ILT
5346Task_token*
5347Write_after_input_sections_task::is_runnable()
730cdc88
ILT
5348{
5349 if (this->input_sections_blocker_->is_blocked())
17a1d0a9
ILT
5350 return this->input_sections_blocker_;
5351 return NULL;
730cdc88
ILT
5352}
5353
5354// We need to unlock FINAL_BLOCKER when finished.
5355
17a1d0a9
ILT
5356void
5357Write_after_input_sections_task::locks(Task_locker* tl)
730cdc88 5358{
17a1d0a9 5359 tl->add(this, this->final_blocker_);
730cdc88
ILT
5360}
5361
5362// Run the task.
5363
5364void
5365Write_after_input_sections_task::run(Workqueue*)
5366{
5367 this->layout_->write_sections_after_input_sections(this->of_);
5368}
5369
92e059d8 5370// Close_task_runner methods.
61ba1cf9
ILT
5371
5372// Run the task--close the file.
5373
5374void
17a1d0a9 5375Close_task_runner::run(Workqueue*, const Task*)
61ba1cf9 5376{
8ed814a9
ILT
5377 // If we need to compute a checksum for the BUILD if, we do so here.
5378 this->layout_->write_build_id(this->of_);
5379
516cb3d0 5380 // If we've been asked to create a binary file, we do so here.
7cc619c3 5381 if (this->options_->oformat_enum() != General_options::OBJECT_FORMAT_ELF)
516cb3d0
ILT
5382 this->layout_->write_binary(this->of_);
5383
61ba1cf9
ILT
5384 this->of_->close();
5385}
5386
a2fb1b05
ILT
5387// Instantiate the templates we need. We could use the configure
5388// script to restrict this to only the ones for implemented targets.
5389
193a53d9 5390#ifdef HAVE_TARGET_32_LITTLE
a2fb1b05 5391template
cdc29364
CC
5392Output_section*
5393Layout::init_fixed_output_section<32, false>(
5394 const char* name,
5395 elfcpp::Shdr<32, false>& shdr);
5396#endif
5397
5398#ifdef HAVE_TARGET_32_BIG
5399template
5400Output_section*
5401Layout::init_fixed_output_section<32, true>(
5402 const char* name,
5403 elfcpp::Shdr<32, true>& shdr);
5404#endif
5405
5406#ifdef HAVE_TARGET_64_LITTLE
5407template
5408Output_section*
5409Layout::init_fixed_output_section<64, false>(
5410 const char* name,
5411 elfcpp::Shdr<64, false>& shdr);
5412#endif
5413
5414#ifdef HAVE_TARGET_64_BIG
5415template
5416Output_section*
5417Layout::init_fixed_output_section<64, true>(
5418 const char* name,
5419 elfcpp::Shdr<64, true>& shdr);
5420#endif
5421
5422#ifdef HAVE_TARGET_32_LITTLE
5423template
a2fb1b05 5424Output_section*
6fa2a40b
CC
5425Layout::layout<32, false>(Sized_relobj_file<32, false>* object,
5426 unsigned int shndx,
730cdc88
ILT
5427 const char* name,
5428 const elfcpp::Shdr<32, false>& shdr,
5429 unsigned int, unsigned int, off_t*);
193a53d9 5430#endif
a2fb1b05 5431
193a53d9 5432#ifdef HAVE_TARGET_32_BIG
a2fb1b05
ILT
5433template
5434Output_section*
6fa2a40b
CC
5435Layout::layout<32, true>(Sized_relobj_file<32, true>* object,
5436 unsigned int shndx,
730cdc88
ILT
5437 const char* name,
5438 const elfcpp::Shdr<32, true>& shdr,
5439 unsigned int, unsigned int, off_t*);
193a53d9 5440#endif
a2fb1b05 5441
193a53d9 5442#ifdef HAVE_TARGET_64_LITTLE
a2fb1b05
ILT
5443template
5444Output_section*
6fa2a40b
CC
5445Layout::layout<64, false>(Sized_relobj_file<64, false>* object,
5446 unsigned int shndx,
730cdc88
ILT
5447 const char* name,
5448 const elfcpp::Shdr<64, false>& shdr,
5449 unsigned int, unsigned int, off_t*);
193a53d9 5450#endif
a2fb1b05 5451
193a53d9 5452#ifdef HAVE_TARGET_64_BIG
a2fb1b05
ILT
5453template
5454Output_section*
6fa2a40b
CC
5455Layout::layout<64, true>(Sized_relobj_file<64, true>* object,
5456 unsigned int shndx,
730cdc88
ILT
5457 const char* name,
5458 const elfcpp::Shdr<64, true>& shdr,
5459 unsigned int, unsigned int, off_t*);
193a53d9 5460#endif
a2fb1b05 5461
6a74a719
ILT
5462#ifdef HAVE_TARGET_32_LITTLE
5463template
5464Output_section*
6fa2a40b 5465Layout::layout_reloc<32, false>(Sized_relobj_file<32, false>* object,
6a74a719
ILT
5466 unsigned int reloc_shndx,
5467 const elfcpp::Shdr<32, false>& shdr,
5468 Output_section* data_section,
5469 Relocatable_relocs* rr);
5470#endif
5471
5472#ifdef HAVE_TARGET_32_BIG
5473template
5474Output_section*
6fa2a40b 5475Layout::layout_reloc<32, true>(Sized_relobj_file<32, true>* object,
6a74a719
ILT
5476 unsigned int reloc_shndx,
5477 const elfcpp::Shdr<32, true>& shdr,
5478 Output_section* data_section,
5479 Relocatable_relocs* rr);
5480#endif
5481
5482#ifdef HAVE_TARGET_64_LITTLE
5483template
5484Output_section*
6fa2a40b 5485Layout::layout_reloc<64, false>(Sized_relobj_file<64, false>* object,
6a74a719
ILT
5486 unsigned int reloc_shndx,
5487 const elfcpp::Shdr<64, false>& shdr,
5488 Output_section* data_section,
5489 Relocatable_relocs* rr);
5490#endif
5491
5492#ifdef HAVE_TARGET_64_BIG
5493template
5494Output_section*
6fa2a40b 5495Layout::layout_reloc<64, true>(Sized_relobj_file<64, true>* object,
6a74a719
ILT
5496 unsigned int reloc_shndx,
5497 const elfcpp::Shdr<64, true>& shdr,
5498 Output_section* data_section,
5499 Relocatable_relocs* rr);
5500#endif
5501
5502#ifdef HAVE_TARGET_32_LITTLE
5503template
5504void
5505Layout::layout_group<32, false>(Symbol_table* symtab,
6fa2a40b 5506 Sized_relobj_file<32, false>* object,
6a74a719
ILT
5507 unsigned int,
5508 const char* group_section_name,
5509 const char* signature,
5510 const elfcpp::Shdr<32, false>& shdr,
8825ac63
ILT
5511 elfcpp::Elf_Word flags,
5512 std::vector<unsigned int>* shndxes);
6a74a719
ILT
5513#endif
5514
5515#ifdef HAVE_TARGET_32_BIG
5516template
5517void
5518Layout::layout_group<32, true>(Symbol_table* symtab,
6fa2a40b 5519 Sized_relobj_file<32, true>* object,
6a74a719
ILT
5520 unsigned int,
5521 const char* group_section_name,
5522 const char* signature,
5523 const elfcpp::Shdr<32, true>& shdr,
8825ac63
ILT
5524 elfcpp::Elf_Word flags,
5525 std::vector<unsigned int>* shndxes);
6a74a719
ILT
5526#endif
5527
5528#ifdef HAVE_TARGET_64_LITTLE
5529template
5530void
5531Layout::layout_group<64, false>(Symbol_table* symtab,
6fa2a40b 5532 Sized_relobj_file<64, false>* object,
6a74a719
ILT
5533 unsigned int,
5534 const char* group_section_name,
5535 const char* signature,
5536 const elfcpp::Shdr<64, false>& shdr,
8825ac63
ILT
5537 elfcpp::Elf_Word flags,
5538 std::vector<unsigned int>* shndxes);
6a74a719
ILT
5539#endif
5540
5541#ifdef HAVE_TARGET_64_BIG
5542template
5543void
5544Layout::layout_group<64, true>(Symbol_table* symtab,
6fa2a40b 5545 Sized_relobj_file<64, true>* object,
6a74a719
ILT
5546 unsigned int,
5547 const char* group_section_name,
5548 const char* signature,
5549 const elfcpp::Shdr<64, true>& shdr,
8825ac63
ILT
5550 elfcpp::Elf_Word flags,
5551 std::vector<unsigned int>* shndxes);
6a74a719
ILT
5552#endif
5553
730cdc88
ILT
5554#ifdef HAVE_TARGET_32_LITTLE
5555template
5556Output_section*
6fa2a40b 5557Layout::layout_eh_frame<32, false>(Sized_relobj_file<32, false>* object,
730cdc88
ILT
5558 const unsigned char* symbols,
5559 off_t symbols_size,
5560 const unsigned char* symbol_names,
5561 off_t symbol_names_size,
5562 unsigned int shndx,
5563 const elfcpp::Shdr<32, false>& shdr,
5564 unsigned int reloc_shndx,
5565 unsigned int reloc_type,
5566 off_t* off);
5567#endif
5568
5569#ifdef HAVE_TARGET_32_BIG
5570template
5571Output_section*
6fa2a40b
CC
5572Layout::layout_eh_frame<32, true>(Sized_relobj_file<32, true>* object,
5573 const unsigned char* symbols,
5574 off_t symbols_size,
730cdc88
ILT
5575 const unsigned char* symbol_names,
5576 off_t symbol_names_size,
5577 unsigned int shndx,
5578 const elfcpp::Shdr<32, true>& shdr,
5579 unsigned int reloc_shndx,
5580 unsigned int reloc_type,
5581 off_t* off);
5582#endif
5583
5584#ifdef HAVE_TARGET_64_LITTLE
5585template
5586Output_section*
6fa2a40b 5587Layout::layout_eh_frame<64, false>(Sized_relobj_file<64, false>* object,
730cdc88
ILT
5588 const unsigned char* symbols,
5589 off_t symbols_size,
5590 const unsigned char* symbol_names,
5591 off_t symbol_names_size,
5592 unsigned int shndx,
5593 const elfcpp::Shdr<64, false>& shdr,
5594 unsigned int reloc_shndx,
5595 unsigned int reloc_type,
5596 off_t* off);
5597#endif
5598
5599#ifdef HAVE_TARGET_64_BIG
5600template
5601Output_section*
6fa2a40b
CC
5602Layout::layout_eh_frame<64, true>(Sized_relobj_file<64, true>* object,
5603 const unsigned char* symbols,
5604 off_t symbols_size,
730cdc88
ILT
5605 const unsigned char* symbol_names,
5606 off_t symbol_names_size,
5607 unsigned int shndx,
5608 const elfcpp::Shdr<64, true>& shdr,
5609 unsigned int reloc_shndx,
5610 unsigned int reloc_type,
5611 off_t* off);
5612#endif
a2fb1b05 5613
c1027032
CC
5614#ifdef HAVE_TARGET_32_LITTLE
5615template
5616void
5617Layout::add_to_gdb_index(bool is_type_unit,
5618 Sized_relobj<32, false>* object,
5619 const unsigned char* symbols,
5620 off_t symbols_size,
5621 unsigned int shndx,
5622 unsigned int reloc_shndx,
5623 unsigned int reloc_type);
5624#endif
5625
5626#ifdef HAVE_TARGET_32_BIG
5627template
5628void
5629Layout::add_to_gdb_index(bool is_type_unit,
5630 Sized_relobj<32, true>* object,
5631 const unsigned char* symbols,
5632 off_t symbols_size,
5633 unsigned int shndx,
5634 unsigned int reloc_shndx,
5635 unsigned int reloc_type);
5636#endif
5637
5638#ifdef HAVE_TARGET_64_LITTLE
5639template
5640void
5641Layout::add_to_gdb_index(bool is_type_unit,
5642 Sized_relobj<64, false>* object,
5643 const unsigned char* symbols,
5644 off_t symbols_size,
5645 unsigned int shndx,
5646 unsigned int reloc_shndx,
5647 unsigned int reloc_type);
5648#endif
5649
5650#ifdef HAVE_TARGET_64_BIG
5651template
5652void
5653Layout::add_to_gdb_index(bool is_type_unit,
5654 Sized_relobj<64, true>* object,
5655 const unsigned char* symbols,
5656 off_t symbols_size,
5657 unsigned int shndx,
5658 unsigned int reloc_shndx,
5659 unsigned int reloc_type);
5660#endif
5661
a2fb1b05 5662} // End namespace gold.
This page took 0.686793 seconds and 4 git commands to generate.