]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - contrib/llvm/lib/MC/MCSectionELF.cpp
Merge llvm, clang, compiler-rt, libc++, libunwind, lld, lldb and openmp
[FreeBSD/FreeBSD.git] / contrib / llvm / lib / MC / MCSectionELF.cpp
1 //===- lib/MC/MCSectionELF.cpp - ELF Code Section Representation ----------===//
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 #include "llvm/MC/MCSectionELF.h"
11 #include "llvm/ADT/Triple.h"
12 #include "llvm/BinaryFormat/ELF.h"
13 #include "llvm/MC/MCAsmInfo.h"
14 #include "llvm/MC/MCExpr.h"
15 #include "llvm/Support/ErrorHandling.h"
16 #include "llvm/Support/raw_ostream.h"
17 #include <cassert>
18
19 using namespace llvm;
20
21 MCSectionELF::~MCSectionELF() = default; // anchor.
22
23 // Decides whether a '.section' directive
24 // should be printed before the section name.
25 bool MCSectionELF::ShouldOmitSectionDirective(StringRef Name,
26                                               const MCAsmInfo &MAI) const {
27   if (isUnique())
28     return false;
29
30   return MAI.shouldOmitSectionDirective(Name);
31 }
32
33 static void printName(raw_ostream &OS, StringRef Name) {
34   if (Name.find_first_not_of("0123456789_."
35                              "abcdefghijklmnopqrstuvwxyz"
36                              "ABCDEFGHIJKLMNOPQRSTUVWXYZ") == Name.npos) {
37     OS << Name;
38     return;
39   }
40   OS << '"';
41   for (const char *B = Name.begin(), *E = Name.end(); B < E; ++B) {
42     if (*B == '"') // Unquoted "
43       OS << "\\\"";
44     else if (*B != '\\') // Neither " or backslash
45       OS << *B;
46     else if (B + 1 == E) // Trailing backslash
47       OS << "\\\\";
48     else {
49       OS << B[0] << B[1]; // Quoted character
50       ++B;
51     }
52   }
53   OS << '"';
54 }
55
56 void MCSectionELF::PrintSwitchToSection(const MCAsmInfo &MAI, const Triple &T,
57                                         raw_ostream &OS,
58                                         const MCExpr *Subsection) const {
59   if (ShouldOmitSectionDirective(SectionName, MAI)) {
60     OS << '\t' << getSectionName();
61     if (Subsection) {
62       OS << '\t';
63       Subsection->print(OS, &MAI);
64     }
65     OS << '\n';
66     return;
67   }
68
69   OS << "\t.section\t";
70   printName(OS, getSectionName());
71
72   // Handle the weird solaris syntax if desired.
73   if (MAI.usesSunStyleELFSectionSwitchSyntax() &&
74       !(Flags & ELF::SHF_MERGE)) {
75     if (Flags & ELF::SHF_ALLOC)
76       OS << ",#alloc";
77     if (Flags & ELF::SHF_EXECINSTR)
78       OS << ",#execinstr";
79     if (Flags & ELF::SHF_WRITE)
80       OS << ",#write";
81     if (Flags & ELF::SHF_EXCLUDE)
82       OS << ",#exclude";
83     if (Flags & ELF::SHF_TLS)
84       OS << ",#tls";
85     OS << '\n';
86     return;
87   }
88
89   OS << ",\"";
90   if (Flags & ELF::SHF_ALLOC)
91     OS << 'a';
92   if (Flags & ELF::SHF_EXCLUDE)
93     OS << 'e';
94   if (Flags & ELF::SHF_EXECINSTR)
95     OS << 'x';
96   if (Flags & ELF::SHF_GROUP)
97     OS << 'G';
98   if (Flags & ELF::SHF_WRITE)
99     OS << 'w';
100   if (Flags & ELF::SHF_MERGE)
101     OS << 'M';
102   if (Flags & ELF::SHF_STRINGS)
103     OS << 'S';
104   if (Flags & ELF::SHF_TLS)
105     OS << 'T';
106   if (Flags & ELF::SHF_LINK_ORDER)
107     OS << 'o';
108
109   // If there are target-specific flags, print them.
110   Triple::ArchType Arch = T.getArch();
111   if (Arch == Triple::xcore) {
112     if (Flags & ELF::XCORE_SHF_CP_SECTION)
113       OS << 'c';
114     if (Flags & ELF::XCORE_SHF_DP_SECTION)
115       OS << 'd';
116   } else if (T.isARM() || T.isThumb()) {
117     if (Flags & ELF::SHF_ARM_PURECODE)
118       OS << 'y';
119   } else if (Arch == Triple::hexagon) {
120     if (Flags & ELF::SHF_HEX_GPREL)
121       OS << 's';
122   }
123
124   OS << '"';
125
126   OS << ',';
127
128   // If comment string is '@', e.g. as on ARM - use '%' instead
129   if (MAI.getCommentString()[0] == '@')
130     OS << '%';
131   else
132     OS << '@';
133
134   if (Type == ELF::SHT_INIT_ARRAY)
135     OS << "init_array";
136   else if (Type == ELF::SHT_FINI_ARRAY)
137     OS << "fini_array";
138   else if (Type == ELF::SHT_PREINIT_ARRAY)
139     OS << "preinit_array";
140   else if (Type == ELF::SHT_NOBITS)
141     OS << "nobits";
142   else if (Type == ELF::SHT_NOTE)
143     OS << "note";
144   else if (Type == ELF::SHT_PROGBITS)
145     OS << "progbits";
146   else if (Type == ELF::SHT_X86_64_UNWIND)
147     OS << "unwind";
148   else if (Type == ELF::SHT_MIPS_DWARF)
149     // Print hex value of the flag while we do not have
150     // any standard symbolic representation of the flag.
151     OS << "0x7000001e";
152   else if (Type == ELF::SHT_LLVM_ODRTAB)
153     OS << "llvm_odrtab";
154   else if (Type == ELF::SHT_LLVM_LINKER_OPTIONS)
155     OS << "llvm_linker_options";
156   else if (Type == ELF::SHT_LLVM_CALL_GRAPH_PROFILE)
157     OS << "llvm_call_graph_profile";
158   else
159     report_fatal_error("unsupported type 0x" + Twine::utohexstr(Type) +
160                        " for section " + getSectionName());
161
162   if (EntrySize) {
163     assert(Flags & ELF::SHF_MERGE);
164     OS << "," << EntrySize;
165   }
166
167   if (Flags & ELF::SHF_GROUP) {
168     OS << ",";
169     printName(OS, Group->getName());
170     OS << ",comdat";
171   }
172
173   if (Flags & ELF::SHF_LINK_ORDER) {
174     assert(AssociatedSymbol);
175     OS << ",";
176     printName(OS, AssociatedSymbol->getName());
177   }
178
179   if (isUnique())
180     OS << ",unique," << UniqueID;
181
182   OS << '\n';
183
184   if (Subsection) {
185     OS << "\t.subsection\t";
186     Subsection->print(OS, &MAI);
187     OS << '\n';
188   }
189 }
190
191 bool MCSectionELF::UseCodeAlign() const {
192   return getFlags() & ELF::SHF_EXECINSTR;
193 }
194
195 bool MCSectionELF::isVirtualSection() const {
196   return getType() == ELF::SHT_NOBITS;
197 }