blob: df28b98b6896bebbe226fe52e84108c55b652982 [file] [log] [blame]
Daniel Dunbar23e97b02009-04-01 21:53:23 +00001//===--- Triple.cpp - Target triple helper class --------------------------===//
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/ADT/Triple.h"
Daniel Dunbara14d2252009-07-26 03:31:47 +000011
12#include "llvm/ADT/Twine.h"
Daniel Dunbar23e97b02009-04-01 21:53:23 +000013#include <cassert>
Mikhail Glushenkov70748752009-04-02 01:11:37 +000014#include <cstring>
Daniel Dunbar23e97b02009-04-01 21:53:23 +000015using namespace llvm;
16
17//
18
19const char *Triple::getArchTypeName(ArchType Kind) {
20 switch (Kind) {
21 case InvalidArch: return "<invalid>";
22 case UnknownArch: return "unknown";
Daniel Dunbar6337f152009-07-26 04:23:03 +000023
24 case alpha: return "alpha";
25 case arm: return "arm";
Jakob Stoklund Olesend9509412009-08-02 17:32:10 +000026 case bfin: return "bfin";
Daniel Dunbar6337f152009-07-26 04:23:03 +000027 case cellspu: return "cellspu";
28 case mips: return "mips";
29 case mipsel: return "mipsel";
30 case msp430: return "msp430";
Daniel Dunbarfdb0b7b2009-08-18 04:43:27 +000031 case pic16: return "pic16";
Daniel Dunbar8c2f1d72009-07-26 04:52:45 +000032 case ppc64: return "powerpc64";
33 case ppc: return "powerpc";
Daniel Dunbar6337f152009-07-26 04:23:03 +000034 case sparc: return "sparc";
35 case systemz: return "s390x";
36 case thumb: return "thumb";
37 case x86: return "i386";
38 case x86_64: return "x86_64";
Daniel Dunbar8c2f1d72009-07-26 04:52:45 +000039 case xcore: return "xcore";
Daniel Dunbar23e97b02009-04-01 21:53:23 +000040 }
41
42 return "<invalid>";
43}
44
45const char *Triple::getVendorTypeName(VendorType Kind) {
46 switch (Kind) {
47 case UnknownVendor: return "unknown";
48
49 case Apple: return "apple";
Chris Lattner56ce0f42009-08-14 18:48:13 +000050 case PC: return "pc";
Daniel Dunbar23e97b02009-04-01 21:53:23 +000051 }
52
53 return "<invalid>";
54}
55
56const char *Triple::getOSTypeName(OSType Kind) {
57 switch (Kind) {
58 case UnknownOS: return "unknown";
59
Duncan Sands852cd112009-06-19 14:40:01 +000060 case AuroraUX: return "auroraux";
Daniel Dunbar6337f152009-07-26 04:23:03 +000061 case Cygwin: return "cygwin";
Daniel Dunbar23e97b02009-04-01 21:53:23 +000062 case Darwin: return "darwin";
Daniel Dunbar7eaf0572009-05-22 02:24:11 +000063 case DragonFly: return "dragonfly";
Daniel Dunbar23e97b02009-04-01 21:53:23 +000064 case FreeBSD: return "freebsd";
65 case Linux: return "linux";
Daniel Dunbar6337f152009-07-26 04:23:03 +000066 case MinGW32: return "mingw32";
Chris Lattner8e620832009-08-12 06:32:10 +000067 case MinGW64: return "mingw64";
Chris Lattnerb8ac8412009-07-13 20:22:23 +000068 case NetBSD: return "netbsd";
Duncan Sandscd1267d2009-06-29 13:36:13 +000069 case OpenBSD: return "openbsd";
Daniel Dunbarfdb0b7b2009-08-18 04:43:27 +000070 case Solaris: return "solaris";
Daniel Dunbar6337f152009-07-26 04:23:03 +000071 case Win32: return "win32";
Daniel Dunbar23e97b02009-04-01 21:53:23 +000072 }
73
74 return "<invalid>";
75}
76
Daniel Dunbar3c2d4bf2009-08-03 04:03:51 +000077Triple::ArchType Triple::getArchTypeForLLVMName(const StringRef &Name) {
78 if (Name == "alpha")
79 return alpha;
80 if (Name == "arm")
81 return arm;
82 if (Name == "bfin")
83 return bfin;
84 if (Name == "cellspu")
85 return cellspu;
86 if (Name == "mips")
87 return mips;
88 if (Name == "mipsel")
89 return mipsel;
90 if (Name == "msp430")
91 return msp430;
Daniel Dunbarfdb0b7b2009-08-18 04:43:27 +000092 if (Name == "pic16")
93 return pic16;
Daniel Dunbar3c2d4bf2009-08-03 04:03:51 +000094 if (Name == "ppc64")
95 return ppc64;
96 if (Name == "ppc")
97 return ppc;
98 if (Name == "sparc")
99 return sparc;
100 if (Name == "systemz")
101 return systemz;
102 if (Name == "thumb")
103 return thumb;
104 if (Name == "x86")
105 return x86;
Chris Lattnerb796c4f2009-08-12 06:45:02 +0000106 if (Name == "x86-64")
Daniel Dunbar3c2d4bf2009-08-03 04:03:51 +0000107 return x86_64;
108 if (Name == "xcore")
109 return xcore;
110
111 return UnknownArch;
112}
113
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000114//
115
116void Triple::Parse() const {
117 assert(!isInitialized() && "Invalid parse call.");
118
Daniel Dunbara14d2252009-07-26 03:31:47 +0000119 StringRef ArchName = getArchName();
Daniel Dunbar651aa682009-08-18 19:26:55 +0000120 StringRef VendorName = getVendorName();
121 StringRef OSName = getOSName();
122
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000123 if (ArchName.size() == 4 && ArchName[0] == 'i' &&
Daniel Dunbar6337f152009-07-26 04:23:03 +0000124 ArchName[2] == '8' && ArchName[3] == '6' &&
125 ArchName[1] - '3' < 6) // i[3-9]86
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000126 Arch = x86;
127 else if (ArchName == "amd64" || ArchName == "x86_64")
128 Arch = x86_64;
Daniel Dunbarb26bc422009-08-18 07:06:26 +0000129 else if (ArchName == "bfin")
130 Arch = bfin;
Daniel Dunbarfdb0b7b2009-08-18 04:43:27 +0000131 else if (ArchName == "pic16")
132 Arch = pic16;
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000133 else if (ArchName == "powerpc")
134 Arch = ppc;
135 else if (ArchName == "powerpc64")
136 Arch = ppc64;
Daniel Dunbar6337f152009-07-26 04:23:03 +0000137 else if (ArchName == "arm" ||
Daniel Dunbar24473892009-08-18 04:51:26 +0000138 ArchName.startswith("armv") ||
139 ArchName == "xscale")
Daniel Dunbar6337f152009-07-26 04:23:03 +0000140 Arch = arm;
141 else if (ArchName == "thumb" ||
142 ArchName.startswith("thumbv"))
143 Arch = thumb;
144 else if (ArchName.startswith("alpha"))
145 Arch = alpha;
146 else if (ArchName == "spu" || ArchName == "cellspu")
147 Arch = cellspu;
148 else if (ArchName == "msp430")
149 Arch = msp430;
150 else if (ArchName == "mips" || ArchName == "mipsallegrex")
151 Arch = mips;
152 else if (ArchName == "mipsel" || ArchName == "mipsallegrexel" ||
153 ArchName == "psp")
154 Arch = mipsel;
155 else if (ArchName == "sparc")
156 Arch = sparc;
157 else if (ArchName == "s390x")
158 Arch = systemz;
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000159 else
160 Arch = UnknownArch;
161
Daniel Dunbar651aa682009-08-18 19:26:55 +0000162
163 // Handle some exceptional cases where the OS / environment components are
164 // stuck into the vendor field.
165 if (StringRef(getTriple()).count('-') == 1) {
166 StringRef VendorName = getVendorName();
167
168 if (VendorName.startswith("mingw32")) { // 'i386-mingw32', etc.
169 Vendor = PC;
170 OS = MinGW32;
171 return;
172 }
173
174 // arm-elf is another example, but we don't currently parse anything about
175 // the environment.
176 }
177
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000178 if (VendorName == "apple")
179 Vendor = Apple;
180 else if (VendorName == "pc")
181 Vendor = PC;
182 else
183 Vendor = UnknownVendor;
184
Daniel Dunbara14d2252009-07-26 03:31:47 +0000185 if (OSName.startswith("auroraux"))
Duncan Sands852cd112009-06-19 14:40:01 +0000186 OS = AuroraUX;
Daniel Dunbar6337f152009-07-26 04:23:03 +0000187 else if (OSName.startswith("cygwin"))
188 OS = Cygwin;
Daniel Dunbara14d2252009-07-26 03:31:47 +0000189 else if (OSName.startswith("darwin"))
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000190 OS = Darwin;
Daniel Dunbara14d2252009-07-26 03:31:47 +0000191 else if (OSName.startswith("dragonfly"))
Daniel Dunbar7eaf0572009-05-22 02:24:11 +0000192 OS = DragonFly;
Daniel Dunbara14d2252009-07-26 03:31:47 +0000193 else if (OSName.startswith("freebsd"))
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000194 OS = FreeBSD;
Daniel Dunbara14d2252009-07-26 03:31:47 +0000195 else if (OSName.startswith("linux"))
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000196 OS = Linux;
Daniel Dunbar6337f152009-07-26 04:23:03 +0000197 else if (OSName.startswith("mingw32"))
198 OS = MinGW32;
Chris Lattner8e620832009-08-12 06:32:10 +0000199 else if (OSName.startswith("mingw64"))
200 OS = MinGW64;
Daniel Dunbara14d2252009-07-26 03:31:47 +0000201 else if (OSName.startswith("netbsd"))
Chris Lattnerb8ac8412009-07-13 20:22:23 +0000202 OS = NetBSD;
Daniel Dunbara14d2252009-07-26 03:31:47 +0000203 else if (OSName.startswith("openbsd"))
Duncan Sandscd1267d2009-06-29 13:36:13 +0000204 OS = OpenBSD;
Daniel Dunbarfdb0b7b2009-08-18 04:43:27 +0000205 else if (OSName.startswith("solaris"))
206 OS = Solaris;
Daniel Dunbar6337f152009-07-26 04:23:03 +0000207 else if (OSName.startswith("win32"))
208 OS = Win32;
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000209 else
210 OS = UnknownOS;
211
212 assert(isInitialized() && "Failed to initialize!");
213}
214
Daniel Dunbara14d2252009-07-26 03:31:47 +0000215StringRef Triple::getArchName() const {
216 return StringRef(Data).split('-').first; // Isolate first component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000217}
218
Daniel Dunbara14d2252009-07-26 03:31:47 +0000219StringRef Triple::getVendorName() const {
220 StringRef Tmp = StringRef(Data).split('-').second; // Strip first component
221 return Tmp.split('-').first; // Isolate second component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000222}
223
Daniel Dunbara14d2252009-07-26 03:31:47 +0000224StringRef Triple::getOSName() const {
225 StringRef Tmp = StringRef(Data).split('-').second; // Strip first component
226 Tmp = Tmp.split('-').second; // Strip second component
227 return Tmp.split('-').first; // Isolate third component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000228}
229
Daniel Dunbara14d2252009-07-26 03:31:47 +0000230StringRef Triple::getEnvironmentName() const {
231 StringRef Tmp = StringRef(Data).split('-').second; // Strip first component
232 Tmp = Tmp.split('-').second; // Strip second component
233 return Tmp.split('-').second; // Strip third component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000234}
235
Daniel Dunbara14d2252009-07-26 03:31:47 +0000236StringRef Triple::getOSAndEnvironmentName() const {
237 StringRef Tmp = StringRef(Data).split('-').second; // Strip first component
238 return Tmp.split('-').second; // Strip second component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000239}
240
Chris Lattnerdfc17f72009-08-12 06:19:40 +0000241static unsigned EatNumber(StringRef &Str) {
242 assert(!Str.empty() && Str[0] >= '0' && Str[0] <= '9' && "Not a number");
243 unsigned Result = Str[0]-'0';
244
245 // Eat the digit.
246 Str = Str.substr(1);
247
248 // Handle "darwin11".
249 if (Result == 1 && !Str.empty() && Str[0] >= '0' && Str[0] <= '9') {
250 Result = Result*10 + (Str[0] - '0');
251 // Eat the digit.
252 Str = Str.substr(1);
253 }
254
255 return Result;
256}
257
258/// getDarwinNumber - Parse the 'darwin number' out of the specific target
259/// triple. For example, if we have darwin8.5 return 8,5,0. If any entry is
260/// not defined, return 0's. This requires that the triple have an OSType of
261/// darwin before it is called.
262void Triple::getDarwinNumber(unsigned &Maj, unsigned &Min,
263 unsigned &Revision) const {
264 assert(getOS() == Darwin && "Not a darwin target triple!");
265 StringRef OSName = getOSName();
266 assert(OSName.startswith("darwin") && "Unknown darwin target triple!");
267
268 // Strip off "darwin".
269 OSName = OSName.substr(6);
270
271 Maj = Min = Revision = 0;
272
273 if (OSName.empty() || OSName[0] < '0' || OSName[0] > '9')
274 return;
275
276 // The major version is the first digit.
277 Maj = EatNumber(OSName);
278 if (OSName.empty()) return;
279
280 // Handle minor version: 10.4.9 -> darwin8.9.
281 if (OSName[0] != '.')
282 return;
283
284 // Eat the '.'.
285 OSName = OSName.substr(1);
286
287 if (OSName.empty() || OSName[0] < '0' || OSName[0] > '9')
288 return;
289
290 Min = EatNumber(OSName);
291 if (OSName.empty()) return;
292
293 // Handle revision darwin8.9.1
294 if (OSName[0] != '.')
295 return;
296
297 // Eat the '.'.
298 OSName = OSName.substr(1);
299
300 if (OSName.empty() || OSName[0] < '0' || OSName[0] > '9')
301 return;
302
303 Revision = EatNumber(OSName);
304}
305
Daniel Dunbara14d2252009-07-26 03:31:47 +0000306void Triple::setTriple(const Twine &Str) {
307 Data = Str.str();
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000308 Arch = InvalidArch;
309}
310
311void Triple::setArch(ArchType Kind) {
312 setArchName(getArchTypeName(Kind));
313}
314
315void Triple::setVendor(VendorType Kind) {
316 setVendorName(getVendorTypeName(Kind));
317}
318
319void Triple::setOS(OSType Kind) {
320 setOSName(getOSTypeName(Kind));
321}
322
Daniel Dunbara14d2252009-07-26 03:31:47 +0000323void Triple::setArchName(const StringRef &Str) {
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000324 setTriple(Str + "-" + getVendorName() + "-" + getOSAndEnvironmentName());
325}
326
Daniel Dunbara14d2252009-07-26 03:31:47 +0000327void Triple::setVendorName(const StringRef &Str) {
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000328 setTriple(getArchName() + "-" + Str + "-" + getOSAndEnvironmentName());
329}
330
Daniel Dunbara14d2252009-07-26 03:31:47 +0000331void Triple::setOSName(const StringRef &Str) {
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000332 if (hasEnvironment())
333 setTriple(getArchName() + "-" + getVendorName() + "-" + Str +
334 "-" + getEnvironmentName());
335 else
336 setTriple(getArchName() + "-" + getVendorName() + "-" + Str);
337}
338
Daniel Dunbara14d2252009-07-26 03:31:47 +0000339void Triple::setEnvironmentName(const StringRef &Str) {
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000340 setTriple(getArchName() + "-" + getVendorName() + "-" + getOSName() +
341 "-" + Str);
342}
343
Daniel Dunbara14d2252009-07-26 03:31:47 +0000344void Triple::setOSAndEnvironmentName(const StringRef &Str) {
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000345 setTriple(getArchName() + "-" + getVendorName() + "-" + Str);
346}