1 //===-- DarwinTargetAsmInfo.cpp - Darwin asm properties ---------*- C++ -*-===//
3 // The LLVM Compiler Infrastructure
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
8 //===----------------------------------------------------------------------===//
10 // This file defines target asm properties related what form asm statements
11 // should take in general on Darwin-based targets
13 //===----------------------------------------------------------------------===//
15 #include "llvm/Constants.h"
16 #include "llvm/DerivedTypes.h"
17 #include "llvm/Function.h"
18 #include "llvm/GlobalVariable.h"
19 #include "llvm/ADT/StringExtras.h"
20 #include "llvm/Support/ErrorHandling.h"
21 #include "llvm/Support/Mangler.h"
22 #include "llvm/Target/DarwinTargetAsmInfo.h"
23 #include "llvm/Target/TargetMachine.h"
24 #include "llvm/Target/TargetData.h"
28 DarwinTargetAsmInfo::DarwinTargetAsmInfo(const TargetMachine &TM)
31 CStringSection_ = getUnnamedSection("\t.cstring",
32 SectionFlags::Mergeable |SectionFlags::Strings);
33 FourByteConstantSection = getUnnamedSection("\t.literal4\n",
34 SectionFlags::Mergeable);
35 EightByteConstantSection = getUnnamedSection("\t.literal8\n",
36 SectionFlags::Mergeable);
38 // Note: 16-byte constant section is subtarget specific and should be provided
40 SixteenByteConstantSection = 0;
42 ReadOnlySection = getUnnamedSection("\t.const\n", SectionFlags::None);
45 getNamedSection("\t__TEXT,__textcoal_nt,coalesced,pure_instructions",
47 ConstTextCoalSection = getNamedSection("\t__TEXT,__const_coal,coalesced",
49 ConstDataCoalSection = getNamedSection("\t__DATA,__const_coal,coalesced",
51 ConstDataSection = getUnnamedSection(".const_data", SectionFlags::None);
52 DataCoalSection = getNamedSection("\t__DATA,__datacoal_nt,coalesced",
53 SectionFlags::Writeable);
56 // Common settings for all Darwin targets.
59 PrivateGlobalPrefix = "L";
60 LinkerPrivateGlobalPrefix = "l"; // Marker for some ObjC metadata
62 NeedsIndirectEncoding = true;
63 AllowQuotesInName = true;
64 HasSingleParameterDotFile = false;
66 // In non-PIC modes, emit a special label before jump tables so that the
67 // linker can perform more accurate dead code stripping. We do not check the
68 // relocation model here since it can be overridden later.
69 JumpTableSpecialLabelPrefix = "l";
72 WeakDefDirective = "\t.weak_definition ";
73 WeakRefDirective = "\t.weak_reference ";
74 HiddenDirective = "\t.private_extern ";
77 CStringSection = "\t.cstring";
78 JumpTableDataSection = "\t.const\n";
81 if (TM.getRelocationModel() == Reloc::Static) {
82 StaticCtorsSection = ".constructor";
83 StaticDtorsSection = ".destructor";
85 StaticCtorsSection = ".mod_init_func";
86 StaticDtorsSection = ".mod_term_func";
89 // _foo.eh symbols are currently always exported so that the linker knows
90 // about them. This may not strictly be necessary on 10.6 and later, but it
91 // doesn't hurt anything.
92 Is_EHSymbolPrivate = false;
94 DwarfAbbrevSection = ".section __DWARF,__debug_abbrev,regular,debug";
95 DwarfInfoSection = ".section __DWARF,__debug_info,regular,debug";
96 DwarfLineSection = ".section __DWARF,__debug_line,regular,debug";
97 DwarfFrameSection = ".section __DWARF,__debug_frame,regular,debug";
98 DwarfPubNamesSection = ".section __DWARF,__debug_pubnames,regular,debug";
99 DwarfPubTypesSection = ".section __DWARF,__debug_pubtypes,regular,debug";
100 DwarfStrSection = ".section __DWARF,__debug_str,regular,debug";
101 DwarfLocSection = ".section __DWARF,__debug_loc,regular,debug";
102 DwarfARangesSection = ".section __DWARF,__debug_aranges,regular,debug";
103 DwarfRangesSection = ".section __DWARF,__debug_ranges,regular,debug";
104 DwarfMacroInfoSection = ".section __DWARF,__debug_macinfo,regular,debug";
107 /// emitUsedDirectiveFor - On Darwin, internally linked data beginning with
108 /// the PrivateGlobalPrefix or the LinkerPrivateGlobalPrefix does not have the
109 /// directive emitted (this occurs in ObjC metadata).
110 bool DarwinTargetAsmInfo::emitUsedDirectiveFor(const GlobalValue* GV,
111 Mangler *Mang) const {
112 if (!GV) return false;
114 // Check whether the mangled name has the "Private" or "LinkerPrivate" prefix.
115 if (GV->hasLocalLinkage() && !isa<Function>(GV)) {
116 // FIXME: ObjC metadata is currently emitted as internal symbols that have
117 // \1L and \0l prefixes on them. Fix them to be Private/LinkerPrivate and
118 // this horrible hack can go away.
119 const std::string &Name = Mang->getMangledName(GV);
120 if (Name[0] == 'L' || Name[0] == 'l')
128 DarwinTargetAsmInfo::SelectSectionForGlobal(const GlobalValue *GV) const {
129 SectionKind::Kind Kind = SectionKindForGlobal(GV);
130 bool isWeak = GV->isWeakForLinker();
131 bool isNonStatic = TM.getRelocationModel() != Reloc::Static;
134 case SectionKind::Text:
136 return TextCoalSection;
139 case SectionKind::Data:
140 case SectionKind::ThreadData:
141 case SectionKind::BSS:
142 case SectionKind::ThreadBSS:
143 if (cast<GlobalVariable>(GV)->isConstant())
144 return (isWeak ? ConstDataCoalSection : ConstDataSection);
146 return (isWeak ? DataCoalSection : DataSection);
147 case SectionKind::ROData:
148 return (isWeak ? ConstDataCoalSection :
149 (isNonStatic ? ConstDataSection : getReadOnlySection()));
150 case SectionKind::RODataMergeStr:
152 ConstTextCoalSection :
153 MergeableStringSection(cast<GlobalVariable>(GV)));
154 case SectionKind::RODataMergeConst: {
155 if (isWeak) return ConstDataCoalSection;
156 const Type *Ty = cast<GlobalVariable>(GV)->getInitializer()->getType();
157 const TargetData *TD = TM.getTargetData();
158 return getSectionForMergableConstant(TD->getTypeAllocSize(Ty), 0);
161 llvm_unreachable("Unsuported section kind for global");
164 // FIXME: Do we have any extra special weird cases?
169 DarwinTargetAsmInfo::MergeableStringSection(const GlobalVariable *GV) const {
170 const TargetData *TD = TM.getTargetData();
171 Constant *C = cast<GlobalVariable>(GV)->getInitializer();
172 const Type *Ty = cast<ArrayType>(C->getType())->getElementType();
174 unsigned Size = TD->getTypeAllocSize(Ty);
176 unsigned Align = TD->getPreferredAlignment(GV);
178 return getCStringSection_();
181 return getReadOnlySection();
185 DarwinTargetAsmInfo::getSectionForMergableConstant(uint64_t Size,
186 unsigned ReloInfo) const {
187 // If this constant requires a relocation, we have to put it in the data
188 // segment, not in the text segment.
190 return ConstDataSection;
195 return FourByteConstantSection;
197 return EightByteConstantSection;
199 if (SixteenByteConstantSection)
200 return SixteenByteConstantSection;
204 return ReadOnlySection; // .const
208 DarwinTargetAsmInfo::UniqueSectionForGlobal(const GlobalValue* GV,
209 SectionKind::Kind kind) const {
210 llvm_unreachable("Darwin does not use unique sections");