xref: /llvm-project/llvm/lib/Target/TargetLoweringObjectFile.cpp (revision c4c3c66ff35b9e5f8f2b868b433f82e29d94759b)
1 //===-- llvm/Target/TargetLoweringObjectFile.cpp - Object File Info -------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This file implements classes used to handle lowerings specific to common
11 // object file formats.
12 //
13 //===----------------------------------------------------------------------===//
14 
15 #include "llvm/Target/TargetLoweringObjectFile.h"
16 #include "llvm/Constants.h"
17 #include "llvm/DerivedTypes.h"
18 #include "llvm/Function.h"
19 #include "llvm/GlobalVariable.h"
20 #include "llvm/MC/MCContext.h"
21 #include "llvm/MC/MCSectionMachO.h"
22 #include "llvm/Target/TargetAsmInfo.h"
23 #include "llvm/Target/TargetData.h"
24 #include "llvm/Target/TargetMachine.h"
25 #include "llvm/Target/TargetOptions.h"
26 #include "llvm/Support/Mangler.h"
27 #include "llvm/ADT/StringExtras.h"
28 using namespace llvm;
29 
30 //===----------------------------------------------------------------------===//
31 //                              Generic Code
32 //===----------------------------------------------------------------------===//
33 
34 TargetLoweringObjectFile::TargetLoweringObjectFile() : Ctx(0) {
35   TextSection = 0;
36   DataSection = 0;
37   BSSSection = 0;
38   ReadOnlySection = 0;
39   StaticCtorSection = 0;
40   StaticDtorSection = 0;
41   LSDASection = 0;
42   EHFrameSection = 0;
43 
44   DwarfAbbrevSection = 0;
45   DwarfInfoSection = 0;
46   DwarfLineSection = 0;
47   DwarfFrameSection = 0;
48   DwarfPubNamesSection = 0;
49   DwarfPubTypesSection = 0;
50   DwarfDebugInlineSection = 0;
51   DwarfStrSection = 0;
52   DwarfLocSection = 0;
53   DwarfARangesSection = 0;
54   DwarfRangesSection = 0;
55   DwarfMacroInfoSection = 0;
56 }
57 
58 TargetLoweringObjectFile::~TargetLoweringObjectFile() {
59 }
60 
61 static bool isSuitableForBSS(const GlobalVariable *GV) {
62   Constant *C = GV->getInitializer();
63 
64   // Must have zero initializer.
65   if (!C->isNullValue())
66     return false;
67 
68   // Leave constant zeros in readonly constant sections, so they can be shared.
69   if (GV->isConstant())
70     return false;
71 
72   // If the global has an explicit section specified, don't put it in BSS.
73   if (!GV->getSection().empty())
74     return false;
75 
76   // If -nozero-initialized-in-bss is specified, don't ever use BSS.
77   if (NoZerosInBSS)
78     return false;
79 
80   // Otherwise, put it in BSS!
81   return true;
82 }
83 
84 /// IsNullTerminatedString - Return true if the specified constant (which is
85 /// known to have a type that is an array of 1/2/4 byte elements) ends with a
86 /// nul value and contains no other nuls in it.
87 static bool IsNullTerminatedString(const Constant *C) {
88   const ArrayType *ATy = cast<ArrayType>(C->getType());
89 
90   // First check: is we have constant array of i8 terminated with zero
91   if (const ConstantArray *CVA = dyn_cast<ConstantArray>(C)) {
92     if (ATy->getNumElements() == 0) return false;
93 
94     ConstantInt *Null =
95       dyn_cast<ConstantInt>(CVA->getOperand(ATy->getNumElements()-1));
96     if (Null == 0 || Null->getZExtValue() != 0)
97       return false; // Not null terminated.
98 
99     // Verify that the null doesn't occur anywhere else in the string.
100     for (unsigned i = 0, e = ATy->getNumElements()-1; i != e; ++i)
101       // Reject constantexpr elements etc.
102       if (!isa<ConstantInt>(CVA->getOperand(i)) ||
103           CVA->getOperand(i) == Null)
104         return false;
105     return true;
106   }
107 
108   // Another possibility: [1 x i8] zeroinitializer
109   if (isa<ConstantAggregateZero>(C))
110     return ATy->getNumElements() == 1;
111 
112   return false;
113 }
114 
115 /// getKindForGlobal - This is a top-level target-independent classifier for
116 /// a global variable.  Given an global variable and information from TM, it
117 /// classifies the global in a variety of ways that make various target
118 /// implementations simpler.  The target implementation is free to ignore this
119 /// extra info of course.
120 SectionKind TargetLoweringObjectFile::getKindForGlobal(const GlobalValue *GV,
121                                                        const TargetMachine &TM){
122   assert(!GV->isDeclaration() && !GV->hasAvailableExternallyLinkage() &&
123          "Can only be used for global definitions");
124 
125   Reloc::Model ReloModel = TM.getRelocationModel();
126 
127   // Early exit - functions should be always in text sections.
128   const GlobalVariable *GVar = dyn_cast<GlobalVariable>(GV);
129   if (GVar == 0)
130     return SectionKind::getText();
131 
132 
133   // Handle thread-local data first.
134   if (GVar->isThreadLocal()) {
135     if (isSuitableForBSS(GVar))
136       return SectionKind::getThreadBSS();
137     return SectionKind::getThreadData();
138   }
139 
140   // Variable can be easily put to BSS section.
141   if (isSuitableForBSS(GVar))
142     return SectionKind::getBSS();
143 
144   Constant *C = GVar->getInitializer();
145 
146   // If the global is marked constant, we can put it into a mergable section,
147   // a mergable string section, or general .data if it contains relocations.
148   if (GVar->isConstant()) {
149     // If the initializer for the global contains something that requires a
150     // relocation, then we may have to drop this into a wriable data section
151     // even though it is marked const.
152     switch (C->getRelocationInfo()) {
153     default: llvm_unreachable("unknown relocation info kind");
154     case Constant::NoRelocation:
155       // If initializer is a null-terminated string, put it in a "cstring"
156       // section of the right width.
157       if (const ArrayType *ATy = dyn_cast<ArrayType>(C->getType())) {
158         if (const IntegerType *ITy =
159               dyn_cast<IntegerType>(ATy->getElementType())) {
160           if ((ITy->getBitWidth() == 8 || ITy->getBitWidth() == 16 ||
161                ITy->getBitWidth() == 32) &&
162               IsNullTerminatedString(C)) {
163             if (ITy->getBitWidth() == 8)
164               return SectionKind::getMergeable1ByteCString();
165             if (ITy->getBitWidth() == 16)
166               return SectionKind::getMergeable2ByteCString();
167 
168             assert(ITy->getBitWidth() == 32 && "Unknown width");
169             return SectionKind::getMergeable4ByteCString();
170           }
171         }
172       }
173 
174       // Otherwise, just drop it into a mergable constant section.  If we have
175       // a section for this size, use it, otherwise use the arbitrary sized
176       // mergable section.
177       switch (TM.getTargetData()->getTypeAllocSize(C->getType())) {
178       case 4:  return SectionKind::getMergeableConst4();
179       case 8:  return SectionKind::getMergeableConst8();
180       case 16: return SectionKind::getMergeableConst16();
181       default: return SectionKind::getMergeableConst();
182       }
183 
184     case Constant::LocalRelocation:
185       // In static relocation model, the linker will resolve all addresses, so
186       // the relocation entries will actually be constants by the time the app
187       // starts up.  However, we can't put this into a mergable section, because
188       // the linker doesn't take relocations into consideration when it tries to
189       // merge entries in the section.
190       if (ReloModel == Reloc::Static)
191         return SectionKind::getReadOnly();
192 
193       // Otherwise, the dynamic linker needs to fix it up, put it in the
194       // writable data.rel.local section.
195       return SectionKind::getReadOnlyWithRelLocal();
196 
197     case Constant::GlobalRelocations:
198       // In static relocation model, the linker will resolve all addresses, so
199       // the relocation entries will actually be constants by the time the app
200       // starts up.  However, we can't put this into a mergable section, because
201       // the linker doesn't take relocations into consideration when it tries to
202       // merge entries in the section.
203       if (ReloModel == Reloc::Static)
204         return SectionKind::getReadOnly();
205 
206       // Otherwise, the dynamic linker needs to fix it up, put it in the
207       // writable data.rel section.
208       return SectionKind::getReadOnlyWithRel();
209     }
210   }
211 
212   // Okay, this isn't a constant.  If the initializer for the global is going
213   // to require a runtime relocation by the dynamic linker, put it into a more
214   // specific section to improve startup time of the app.  This coalesces these
215   // globals together onto fewer pages, improving the locality of the dynamic
216   // linker.
217   if (ReloModel == Reloc::Static)
218     return SectionKind::getDataNoRel();
219 
220   switch (C->getRelocationInfo()) {
221   default: llvm_unreachable("unknown relocation info kind");
222   case Constant::NoRelocation:
223     return SectionKind::getDataNoRel();
224   case Constant::LocalRelocation:
225     return SectionKind::getDataRelLocal();
226   case Constant::GlobalRelocations:
227     return SectionKind::getDataRel();
228   }
229 }
230 
231 /// SectionForGlobal - This method computes the appropriate section to emit
232 /// the specified global variable or function definition.  This should not
233 /// be passed external (or available externally) globals.
234 const MCSection *TargetLoweringObjectFile::
235 SectionForGlobal(const GlobalValue *GV, SectionKind Kind, Mangler *Mang,
236                  const TargetMachine &TM) const {
237   // Select section name.
238   if (GV->hasSection())
239     return getExplicitSectionGlobal(GV, Kind, Mang, TM);
240 
241 
242   // Use default section depending on the 'type' of global
243   return SelectSectionForGlobal(GV, Kind, Mang, TM);
244 }
245 
246 
247 // Lame default implementation. Calculate the section name for global.
248 const MCSection *
249 TargetLoweringObjectFile::SelectSectionForGlobal(const GlobalValue *GV,
250                                                  SectionKind Kind,
251                                                  Mangler *Mang,
252                                                  const TargetMachine &TM) const{
253   assert(!Kind.isThreadLocal() && "Doesn't support TLS");
254 
255   if (Kind.isText())
256     return getTextSection();
257 
258   if (Kind.isBSS() && BSSSection != 0)
259     return BSSSection;
260 
261   if (Kind.isReadOnly() && ReadOnlySection != 0)
262     return ReadOnlySection;
263 
264   return getDataSection();
265 }
266 
267 /// getSectionForConstant - Given a mergable constant with the
268 /// specified size and relocation information, return a section that it
269 /// should be placed in.
270 const MCSection *
271 TargetLoweringObjectFile::getSectionForConstant(SectionKind Kind) const {
272   if (Kind.isReadOnly() && ReadOnlySection != 0)
273     return ReadOnlySection;
274 
275   return DataSection;
276 }
277 
278 
279 
280 //===----------------------------------------------------------------------===//
281 //                                  ELF
282 //===----------------------------------------------------------------------===//
283 
284 const MCSection *TargetLoweringObjectFileELF::
285 getELFSection(const char *Name, bool isDirective, SectionKind Kind) const {
286   if (MCSection *S = getContext().GetSection(Name))
287     return S;
288   return MCSectionELF::Create(Name, isDirective, Kind, getContext());
289 }
290 
291 void TargetLoweringObjectFileELF::Initialize(MCContext &Ctx,
292                                              const TargetMachine &TM) {
293   TargetLoweringObjectFile::Initialize(Ctx, TM);
294   if (!HasCrazyBSS)
295     BSSSection = getELFSection("\t.bss", true, SectionKind::getBSS());
296   else
297     // PPC/Linux doesn't support the .bss directive, it needs .section .bss.
298     // FIXME: Does .section .bss work everywhere??
299     // FIXME2: this should just be handle by the section printer.  We should get
300     // away from syntactic view of the sections and MCSection should just be a
301     // semantic view.
302     BSSSection = getELFSection("\t.bss", false, SectionKind::getBSS());
303 
304 
305   TextSection = getELFSection("\t.text", true, SectionKind::getText());
306   DataSection = getELFSection("\t.data", true, SectionKind::getDataRel());
307   ReadOnlySection =
308     getELFSection("\t.rodata", false, SectionKind::getReadOnly());
309   TLSDataSection =
310     getELFSection("\t.tdata", false, SectionKind::getThreadData());
311 
312   TLSBSSSection = getELFSection("\t.tbss", false,
313                                      SectionKind::getThreadBSS());
314 
315   DataRelSection = getELFSection("\t.data.rel", false,
316                                       SectionKind::getDataRel());
317   DataRelLocalSection = getELFSection("\t.data.rel.local", false,
318                                    SectionKind::getDataRelLocal());
319   DataRelROSection = getELFSection("\t.data.rel.ro", false,
320                                 SectionKind::getReadOnlyWithRel());
321   DataRelROLocalSection =
322     getELFSection("\t.data.rel.ro.local", false,
323                        SectionKind::getReadOnlyWithRelLocal());
324 
325   MergeableConst4Section = getELFSection(".rodata.cst4", false,
326                                 SectionKind::getMergeableConst4());
327   MergeableConst8Section = getELFSection(".rodata.cst8", false,
328                                 SectionKind::getMergeableConst8());
329   MergeableConst16Section = getELFSection(".rodata.cst16", false,
330                                SectionKind::getMergeableConst16());
331 
332   StaticCtorSection =
333     getELFSection(".ctors", false, SectionKind::getDataRel());
334   StaticDtorSection =
335     getELFSection(".dtors", false, SectionKind::getDataRel());
336 
337   // Exception Handling Sections.
338 
339   // FIXME: We're emitting LSDA info into a readonly section on ELF, even though
340   // it contains relocatable pointers.  In PIC mode, this is probably a big
341   // runtime hit for C++ apps.  Either the contents of the LSDA need to be
342   // adjusted or this should be a data section.
343   LSDASection =
344     getELFSection(".gcc_except_table", false, SectionKind::getReadOnly());
345   EHFrameSection =
346     getELFSection(".eh_frame", false, SectionKind::getDataRel());
347 
348   // Debug Info Sections.
349   DwarfAbbrevSection =
350     getELFSection(".debug_abbrev", false, SectionKind::getMetadata());
351   DwarfInfoSection =
352     getELFSection(".debug_info", false, SectionKind::getMetadata());
353   DwarfLineSection =
354     getELFSection(".debug_line", false, SectionKind::getMetadata());
355   DwarfFrameSection =
356     getELFSection(".debug_frame", false, SectionKind::getMetadata());
357   DwarfPubNamesSection =
358     getELFSection(".debug_pubnames", false, SectionKind::getMetadata());
359   DwarfPubTypesSection =
360     getELFSection(".debug_pubtypes", false, SectionKind::getMetadata());
361   DwarfStrSection =
362     getELFSection(".debug_str", false, SectionKind::getMetadata());
363   DwarfLocSection =
364     getELFSection(".debug_loc", false, SectionKind::getMetadata());
365   DwarfARangesSection =
366     getELFSection(".debug_aranges", false, SectionKind::getMetadata());
367   DwarfRangesSection =
368     getELFSection(".debug_ranges", false, SectionKind::getMetadata());
369   DwarfMacroInfoSection =
370     getELFSection(".debug_macinfo", false, SectionKind::getMetadata());
371 }
372 
373 
374 static SectionKind
375 getELFKindForNamedSection(const char *Name, SectionKind K) {
376   if (Name[0] != '.') return K;
377 
378   // Some lame default implementation based on some magic section names.
379   if (strncmp(Name, ".gnu.linkonce.b.", 16) == 0 ||
380       strncmp(Name, ".llvm.linkonce.b.", 17) == 0 ||
381       strncmp(Name, ".gnu.linkonce.sb.", 17) == 0 ||
382       strncmp(Name, ".llvm.linkonce.sb.", 18) == 0)
383     return SectionKind::getBSS();
384 
385   if (strcmp(Name, ".tdata") == 0 ||
386       strncmp(Name, ".tdata.", 7) == 0 ||
387       strncmp(Name, ".gnu.linkonce.td.", 17) == 0 ||
388       strncmp(Name, ".llvm.linkonce.td.", 18) == 0)
389     return SectionKind::getThreadData();
390 
391   if (strcmp(Name, ".tbss") == 0 ||
392       strncmp(Name, ".tbss.", 6) == 0 ||
393       strncmp(Name, ".gnu.linkonce.tb.", 17) == 0 ||
394       strncmp(Name, ".llvm.linkonce.tb.", 18) == 0)
395     return SectionKind::getThreadBSS();
396 
397   return K;
398 }
399 
400 const MCSection *TargetLoweringObjectFileELF::
401 getExplicitSectionGlobal(const GlobalValue *GV, SectionKind Kind,
402                          Mangler *Mang, const TargetMachine &TM) const {
403   // Infer section flags from the section name if we can.
404   Kind = getELFKindForNamedSection(GV->getSection().c_str(), Kind);
405 
406   return getELFSection(GV->getSection().c_str(), false, Kind);
407 }
408 
409 static const char *getSectionPrefixForUniqueGlobal(SectionKind Kind) {
410   if (Kind.isText())                 return ".gnu.linkonce.t.";
411   if (Kind.isReadOnly())             return ".gnu.linkonce.r.";
412 
413   if (Kind.isThreadData())           return ".gnu.linkonce.td.";
414   if (Kind.isThreadBSS())            return ".gnu.linkonce.tb.";
415 
416   if (Kind.isBSS())                  return ".gnu.linkonce.b.";
417   if (Kind.isDataNoRel())            return ".gnu.linkonce.d.";
418   if (Kind.isDataRelLocal())         return ".gnu.linkonce.d.rel.local.";
419   if (Kind.isDataRel())              return ".gnu.linkonce.d.rel.";
420   if (Kind.isReadOnlyWithRelLocal()) return ".gnu.linkonce.d.rel.ro.local.";
421 
422   assert(Kind.isReadOnlyWithRel() && "Unknown section kind");
423   return ".gnu.linkonce.d.rel.ro.";
424 }
425 
426 const MCSection *TargetLoweringObjectFileELF::
427 SelectSectionForGlobal(const GlobalValue *GV, SectionKind Kind,
428                        Mangler *Mang, const TargetMachine &TM) const {
429 
430   // If this global is linkonce/weak and the target handles this by emitting it
431   // into a 'uniqued' section name, create and return the section now.
432   if (GV->isWeakForLinker()) {
433     const char *Prefix = getSectionPrefixForUniqueGlobal(Kind);
434     std::string Name = Mang->makeNameProper(GV->getNameStr());
435     return getELFSection((Prefix+Name).c_str(), false, Kind);
436   }
437 
438   if (Kind.isText()) return TextSection;
439 
440   if (Kind.isMergeable1ByteCString() ||
441       Kind.isMergeable2ByteCString() ||
442       Kind.isMergeable4ByteCString()) {
443 
444     // We also need alignment here.
445     // FIXME: this is getting the alignment of the character, not the
446     // alignment of the global!
447     unsigned Align =
448       TM.getTargetData()->getPreferredAlignment(cast<GlobalVariable>(GV));
449 
450     const char *SizeSpec = ".rodata.str1.";
451     if (Kind.isMergeable2ByteCString())
452       SizeSpec = ".rodata.str2.";
453     else if (Kind.isMergeable4ByteCString())
454       SizeSpec = ".rodata.str4.";
455     else
456       assert(Kind.isMergeable1ByteCString() && "unknown string width");
457 
458 
459     std::string Name = SizeSpec + utostr(Align);
460     return getELFSection(Name.c_str(), false, Kind);
461   }
462 
463   if (Kind.isMergeableConst()) {
464     if (Kind.isMergeableConst4())
465       return MergeableConst4Section;
466     if (Kind.isMergeableConst8())
467       return MergeableConst8Section;
468     if (Kind.isMergeableConst16())
469       return MergeableConst16Section;
470     return ReadOnlySection;  // .const
471   }
472 
473   if (Kind.isReadOnly())             return ReadOnlySection;
474 
475   if (Kind.isThreadData())           return TLSDataSection;
476   if (Kind.isThreadBSS())            return TLSBSSSection;
477 
478   if (Kind.isBSS())                  return BSSSection;
479 
480   if (Kind.isDataNoRel())            return DataSection;
481   if (Kind.isDataRelLocal())         return DataRelLocalSection;
482   if (Kind.isDataRel())              return DataRelSection;
483   if (Kind.isReadOnlyWithRelLocal()) return DataRelROLocalSection;
484 
485   assert(Kind.isReadOnlyWithRel() && "Unknown section kind");
486   return DataRelROSection;
487 }
488 
489 /// getSectionForConstant - Given a mergeable constant with the
490 /// specified size and relocation information, return a section that it
491 /// should be placed in.
492 const MCSection *TargetLoweringObjectFileELF::
493 getSectionForConstant(SectionKind Kind) const {
494   if (Kind.isMergeableConst4())
495     return MergeableConst4Section;
496   if (Kind.isMergeableConst8())
497     return MergeableConst8Section;
498   if (Kind.isMergeableConst16())
499     return MergeableConst16Section;
500   if (Kind.isReadOnly())
501     return ReadOnlySection;
502 
503   if (Kind.isReadOnlyWithRelLocal()) return DataRelROLocalSection;
504   assert(Kind.isReadOnlyWithRel() && "Unknown section kind");
505   return DataRelROSection;
506 }
507 
508 //===----------------------------------------------------------------------===//
509 //                                 MachO
510 //===----------------------------------------------------------------------===//
511 
512 
513 const MCSection *TargetLoweringObjectFileMachO::
514 getMachOSection(const StringRef &Segment, const StringRef &Section,
515                 unsigned TypeAndAttributes,
516                 unsigned Reserved2, SectionKind Kind) const {
517   // FIXME: UNIQUE HERE.
518   //if (MCSection *S = getContext().GetSection(Name))
519   //  return S;
520 
521   return MCSectionMachO::Create(Segment, Section, TypeAndAttributes, Reserved2,
522                                 Kind, getContext());
523 }
524 
525 
526 void TargetLoweringObjectFileMachO::Initialize(MCContext &Ctx,
527                                                const TargetMachine &TM) {
528   TargetLoweringObjectFile::Initialize(Ctx, TM);
529 
530   TextSection // .text
531     = getMachOSection("__TEXT", "__text",
532                       MCSectionMachO::S_ATTR_PURE_INSTRUCTIONS,
533                       SectionKind::getText());
534   DataSection // .data
535     = getMachOSection("__DATA", "__data", 0, SectionKind::getDataRel());
536 
537   CStringSection // .cstring
538     = getMachOSection("__TEXT", "__cstring", MCSectionMachO::S_CSTRING_LITERALS,
539                       SectionKind::getMergeable1ByteCString());
540   UStringSection
541     = getMachOSection("__TEXT","__ustring", 0,
542                       SectionKind::getMergeable2ByteCString());
543   FourByteConstantSection // .literal4
544     = getMachOSection("__TEXT", "__literal4", MCSectionMachO::S_4BYTE_LITERALS,
545                       SectionKind::getMergeableConst4());
546   EightByteConstantSection // .literal8
547     = getMachOSection("__TEXT", "__literal8", MCSectionMachO::S_8BYTE_LITERALS,
548                       SectionKind::getMergeableConst8());
549 
550   // ld_classic doesn't support .literal16 in 32-bit mode, and ld64 falls back
551   // to using it in -static mode.
552   SixteenByteConstantSection = 0;
553   if (TM.getRelocationModel() != Reloc::Static &&
554       TM.getTargetData()->getPointerSize() == 32)
555     SixteenByteConstantSection =   // .literal16
556       getMachOSection("__TEXT", "__literal16",MCSectionMachO::S_16BYTE_LITERALS,
557                       SectionKind::getMergeableConst16());
558 
559   ReadOnlySection  // .const
560     = getMachOSection("__TEXT", "__const", 0, SectionKind::getReadOnly());
561 
562   TextCoalSection
563     = getMachOSection("__TEXT", "__textcoal_nt",
564                       MCSectionMachO::S_COALESCED |
565                       MCSectionMachO::S_ATTR_PURE_INSTRUCTIONS,
566                       SectionKind::getText());
567   ConstTextCoalSection
568     = getMachOSection("__TEXT", "__const_coal", MCSectionMachO::S_COALESCED,
569                       SectionKind::getText());
570   ConstDataCoalSection
571     = getMachOSection("__DATA","__const_coal", MCSectionMachO::S_COALESCED,
572                       SectionKind::getText());
573   ConstDataSection  // .const_data
574     = getMachOSection("__DATA", "__const", 0,
575                       SectionKind::getReadOnlyWithRel());
576   DataCoalSection
577     = getMachOSection("__DATA","__datacoal_nt", MCSectionMachO::S_COALESCED,
578                       SectionKind::getDataRel());
579 
580   if (TM.getRelocationModel() == Reloc::Static) {
581     StaticCtorSection
582       = getMachOSection("__TEXT", "__constructor", 0,SectionKind::getDataRel());
583     StaticDtorSection
584       = getMachOSection("__TEXT", "__destructor", 0, SectionKind::getDataRel());
585   } else {
586     StaticCtorSection
587       = getMachOSection("__DATA", "__mod_init_func",
588                         MCSectionMachO::S_MOD_INIT_FUNC_POINTERS,
589                         SectionKind::getDataRel());
590     StaticDtorSection
591       = getMachOSection("__DATA", "__mod_term_func",
592                         MCSectionMachO::S_MOD_TERM_FUNC_POINTERS,
593                         SectionKind::getDataRel());
594   }
595 
596   // Exception Handling.
597   LSDASection = getMachOSection("__DATA", "__gcc_except_tab", 0,
598                                 SectionKind::getDataRel());
599   EHFrameSection =
600     getMachOSection("__TEXT", "__eh_frame",
601                     MCSectionMachO::S_COALESCED |
602                     MCSectionMachO::S_ATTR_NO_TOC |
603                     MCSectionMachO::S_ATTR_STRIP_STATIC_SYMS |
604                     MCSectionMachO::S_ATTR_LIVE_SUPPORT,
605                     SectionKind::getReadOnly());
606 
607   // Debug Information.
608   DwarfAbbrevSection =
609     getMachOSection("__DWARF", "__debug_abbrev", MCSectionMachO::S_ATTR_DEBUG,
610                     SectionKind::getMetadata());
611   DwarfInfoSection =
612     getMachOSection("__DWARF", "__debug_info", MCSectionMachO::S_ATTR_DEBUG,
613                     SectionKind::getMetadata());
614   DwarfLineSection =
615     getMachOSection("__DWARF", "__debug_line", MCSectionMachO::S_ATTR_DEBUG,
616                     SectionKind::getMetadata());
617   DwarfFrameSection =
618     getMachOSection("__DWARF", "__debug_frame", MCSectionMachO::S_ATTR_DEBUG,
619                     SectionKind::getMetadata());
620   DwarfPubNamesSection =
621     getMachOSection("__DWARF", "__debug_pubnames", MCSectionMachO::S_ATTR_DEBUG,
622                     SectionKind::getMetadata());
623   DwarfPubTypesSection =
624     getMachOSection("__DWARF", "__debug_pubtypes", MCSectionMachO::S_ATTR_DEBUG,
625                     SectionKind::getMetadata());
626   DwarfStrSection =
627     getMachOSection("__DWARF", "__debug_str", MCSectionMachO::S_ATTR_DEBUG,
628                     SectionKind::getMetadata());
629   DwarfLocSection =
630     getMachOSection("__DWARF", "__debug_loc", MCSectionMachO::S_ATTR_DEBUG,
631                     SectionKind::getMetadata());
632   DwarfARangesSection =
633     getMachOSection("__DWARF", "__debug_aranges", MCSectionMachO::S_ATTR_DEBUG,
634                     SectionKind::getMetadata());
635   DwarfRangesSection =
636     getMachOSection("__DWARF", "__debug_ranges", MCSectionMachO::S_ATTR_DEBUG,
637                     SectionKind::getMetadata());
638   DwarfMacroInfoSection =
639     getMachOSection("__DWARF", "__debug_macinfo", MCSectionMachO::S_ATTR_DEBUG,
640                     SectionKind::getMetadata());
641   DwarfDebugInlineSection =
642     getMachOSection("__DWARF", "__debug_inlined", MCSectionMachO::S_ATTR_DEBUG,
643                     SectionKind::getMetadata());
644 }
645 
646 /// getLazySymbolPointerSection - Return the section corresponding to
647 /// the .lazy_symbol_pointer directive.
648 const MCSection *TargetLoweringObjectFileMachO::
649 getLazySymbolPointerSection() const {
650   return getMachOSection("__DATA", "__la_symbol_ptr",
651                          MCSectionMachO::S_LAZY_SYMBOL_POINTERS,
652                          SectionKind::getMetadata());
653 }
654 
655 /// getNonLazySymbolPointerSection - Return the section corresponding to
656 /// the .non_lazy_symbol_pointer directive.
657 const MCSection *TargetLoweringObjectFileMachO::
658 getNonLazySymbolPointerSection() const {
659   return getMachOSection("__DATA", "__nl_symbol_ptr",
660                          MCSectionMachO::S_NON_LAZY_SYMBOL_POINTERS,
661                          SectionKind::getMetadata());
662 }
663 
664 
665 const MCSection *TargetLoweringObjectFileMachO::
666 getExplicitSectionGlobal(const GlobalValue *GV, SectionKind Kind,
667                          Mangler *Mang, const TargetMachine &TM) const {
668   // Parse the section specifier and create it if valid.
669   StringRef Segment, Section;
670   unsigned TAA, StubSize;
671   std::string ErrorCode =
672     MCSectionMachO::ParseSectionSpecifier(GV->getSection(), Segment, Section,
673                                           TAA, StubSize);
674   if (ErrorCode.empty())
675     return getMachOSection(Segment, Section, TAA, StubSize, Kind);
676 
677 
678   // If invalid, report the error with llvm_report_error.
679   llvm_report_error("Global variable '" + GV->getNameStr() +
680                     "' has an invalid section specifier '" + GV->getSection() +
681                     "': " + ErrorCode + ".");
682   // Fall back to dropping it into the data section.
683   return DataSection;
684 }
685 
686 const MCSection *TargetLoweringObjectFileMachO::
687 SelectSectionForGlobal(const GlobalValue *GV, SectionKind Kind,
688                        Mangler *Mang, const TargetMachine &TM) const {
689   assert(!Kind.isThreadLocal() && "Darwin doesn't support TLS");
690 
691   if (Kind.isText())
692     return GV->isWeakForLinker() ? TextCoalSection : TextSection;
693 
694   // If this is weak/linkonce, put this in a coalescable section, either in text
695   // or data depending on if it is writable.
696   if (GV->isWeakForLinker()) {
697     if (Kind.isReadOnly())
698       return ConstTextCoalSection;
699     return DataCoalSection;
700   }
701 
702   // FIXME: Alignment check should be handled by section classifier.
703   if (Kind.isMergeable1ByteCString() ||
704       Kind.isMergeable2ByteCString()) {
705     if (TM.getTargetData()->getPreferredAlignment(
706                                               cast<GlobalVariable>(GV)) < 32) {
707       if (Kind.isMergeable1ByteCString())
708         return CStringSection;
709       assert(Kind.isMergeable2ByteCString());
710       return UStringSection;
711     }
712   }
713 
714   if (Kind.isMergeableConst()) {
715     if (Kind.isMergeableConst4())
716       return FourByteConstantSection;
717     if (Kind.isMergeableConst8())
718       return EightByteConstantSection;
719     if (Kind.isMergeableConst16() && SixteenByteConstantSection)
720       return SixteenByteConstantSection;
721   }
722 
723   // Otherwise, if it is readonly, but not something we can specially optimize,
724   // just drop it in .const.
725   if (Kind.isReadOnly())
726     return ReadOnlySection;
727 
728   // If this is marked const, put it into a const section.  But if the dynamic
729   // linker needs to write to it, put it in the data segment.
730   if (Kind.isReadOnlyWithRel())
731     return ConstDataSection;
732 
733   // Otherwise, just drop the variable in the normal data section.
734   return DataSection;
735 }
736 
737 const MCSection *
738 TargetLoweringObjectFileMachO::getSectionForConstant(SectionKind Kind) const {
739   // If this constant requires a relocation, we have to put it in the data
740   // segment, not in the text segment.
741   if (Kind.isDataRel())
742     return ConstDataSection;
743 
744   if (Kind.isMergeableConst4())
745     return FourByteConstantSection;
746   if (Kind.isMergeableConst8())
747     return EightByteConstantSection;
748   if (Kind.isMergeableConst16() && SixteenByteConstantSection)
749     return SixteenByteConstantSection;
750   return ReadOnlySection;  // .const
751 }
752 
753 /// shouldEmitUsedDirectiveFor - This hook allows targets to selectively decide
754 /// not to emit the UsedDirective for some symbols in llvm.used.
755 // FIXME: REMOVE this (rdar://7071300)
756 bool TargetLoweringObjectFileMachO::
757 shouldEmitUsedDirectiveFor(const GlobalValue *GV, Mangler *Mang) const {
758   /// On Darwin, internally linked data beginning with "L" or "l" does not have
759   /// the directive emitted (this occurs in ObjC metadata).
760   if (!GV) return false;
761 
762   // Check whether the mangled name has the "Private" or "LinkerPrivate" prefix.
763   if (GV->hasLocalLinkage() && !isa<Function>(GV)) {
764     // FIXME: ObjC metadata is currently emitted as internal symbols that have
765     // \1L and \0l prefixes on them.  Fix them to be Private/LinkerPrivate and
766     // this horrible hack can go away.
767     const std::string &Name = Mang->getMangledName(GV);
768     if (Name[0] == 'L' || Name[0] == 'l')
769       return false;
770   }
771 
772   return true;
773 }
774 
775 
776 //===----------------------------------------------------------------------===//
777 //                                  COFF
778 //===----------------------------------------------------------------------===//
779 
780 
781 const MCSection *TargetLoweringObjectFileCOFF::
782 getCOFFSection(const char *Name, bool isDirective, SectionKind Kind) const {
783   if (MCSection *S = getContext().GetSection(Name))
784     return S;
785   return MCSectionCOFF::Create(Name, isDirective, Kind, getContext());
786 }
787 
788 void TargetLoweringObjectFileCOFF::Initialize(MCContext &Ctx,
789                                               const TargetMachine &TM) {
790   TargetLoweringObjectFile::Initialize(Ctx, TM);
791   TextSection = getCOFFSection("\t.text", true, SectionKind::getText());
792   DataSection = getCOFFSection("\t.data", true, SectionKind::getDataRel());
793   StaticCtorSection =
794     getCOFFSection(".ctors", false, SectionKind::getDataRel());
795   StaticDtorSection =
796     getCOFFSection(".dtors", false, SectionKind::getDataRel());
797 
798 
799   // Debug info.
800   // FIXME: Don't use 'directive' mode here.
801   DwarfAbbrevSection =
802     getCOFFSection("\t.section\t.debug_abbrev,\"dr\"",
803                    true, SectionKind::getMetadata());
804   DwarfInfoSection =
805     getCOFFSection("\t.section\t.debug_info,\"dr\"",
806                    true, SectionKind::getMetadata());
807   DwarfLineSection =
808     getCOFFSection("\t.section\t.debug_line,\"dr\"",
809                    true, SectionKind::getMetadata());
810   DwarfFrameSection =
811     getCOFFSection("\t.section\t.debug_frame,\"dr\"",
812                    true, SectionKind::getMetadata());
813   DwarfPubNamesSection =
814     getCOFFSection("\t.section\t.debug_pubnames,\"dr\"",
815                    true, SectionKind::getMetadata());
816   DwarfPubTypesSection =
817     getCOFFSection("\t.section\t.debug_pubtypes,\"dr\"",
818                    true, SectionKind::getMetadata());
819   DwarfStrSection =
820     getCOFFSection("\t.section\t.debug_str,\"dr\"",
821                    true, SectionKind::getMetadata());
822   DwarfLocSection =
823     getCOFFSection("\t.section\t.debug_loc,\"dr\"",
824                    true, SectionKind::getMetadata());
825   DwarfARangesSection =
826     getCOFFSection("\t.section\t.debug_aranges,\"dr\"",
827                    true, SectionKind::getMetadata());
828   DwarfRangesSection =
829     getCOFFSection("\t.section\t.debug_ranges,\"dr\"",
830                    true, SectionKind::getMetadata());
831   DwarfMacroInfoSection =
832     getCOFFSection("\t.section\t.debug_macinfo,\"dr\"",
833                    true, SectionKind::getMetadata());
834 }
835 
836 const MCSection *TargetLoweringObjectFileCOFF::
837 getExplicitSectionGlobal(const GlobalValue *GV, SectionKind Kind,
838                          Mangler *Mang, const TargetMachine &TM) const {
839   return getCOFFSection(GV->getSection().c_str(), false, Kind);
840 }
841 
842 static const char *getCOFFSectionPrefixForUniqueGlobal(SectionKind Kind) {
843   if (Kind.isText())
844     return ".text$linkonce";
845   if (Kind.isWriteable())
846     return ".data$linkonce";
847   return ".rdata$linkonce";
848 }
849 
850 
851 const MCSection *TargetLoweringObjectFileCOFF::
852 SelectSectionForGlobal(const GlobalValue *GV, SectionKind Kind,
853                        Mangler *Mang, const TargetMachine &TM) const {
854   assert(!Kind.isThreadLocal() && "Doesn't support TLS");
855 
856   // If this global is linkonce/weak and the target handles this by emitting it
857   // into a 'uniqued' section name, create and return the section now.
858   if (GV->isWeakForLinker()) {
859     const char *Prefix = getCOFFSectionPrefixForUniqueGlobal(Kind);
860     std::string Name = Mang->makeNameProper(GV->getNameStr());
861     return getCOFFSection((Prefix+Name).c_str(), false, Kind);
862   }
863 
864   if (Kind.isText())
865     return getTextSection();
866 
867   return getDataSection();
868 }
869 
870