blob: dd767e260cbc4d7048061bc7a86a7814c8d5c1db [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";
Eli Friedman74db89e2009-08-19 20:46:03 +000036 case tce: return "tce";
Daniel Dunbar6337f152009-07-26 04:23:03 +000037 case thumb: return "thumb";
38 case x86: return "i386";
39 case x86_64: return "x86_64";
Daniel Dunbar8c2f1d72009-07-26 04:52:45 +000040 case xcore: return "xcore";
Daniel Dunbar23e97b02009-04-01 21:53:23 +000041 }
42
43 return "<invalid>";
44}
45
46const char *Triple::getVendorTypeName(VendorType Kind) {
47 switch (Kind) {
48 case UnknownVendor: return "unknown";
49
50 case Apple: return "apple";
Chris Lattner56ce0f42009-08-14 18:48:13 +000051 case PC: return "pc";
Daniel Dunbar23e97b02009-04-01 21:53:23 +000052 }
53
54 return "<invalid>";
55}
56
57const char *Triple::getOSTypeName(OSType Kind) {
58 switch (Kind) {
59 case UnknownOS: return "unknown";
60
Duncan Sands852cd112009-06-19 14:40:01 +000061 case AuroraUX: return "auroraux";
Daniel Dunbar6337f152009-07-26 04:23:03 +000062 case Cygwin: return "cygwin";
Daniel Dunbar23e97b02009-04-01 21:53:23 +000063 case Darwin: return "darwin";
Daniel Dunbar7eaf0572009-05-22 02:24:11 +000064 case DragonFly: return "dragonfly";
Daniel Dunbar23e97b02009-04-01 21:53:23 +000065 case FreeBSD: return "freebsd";
66 case Linux: return "linux";
Daniel Dunbar6337f152009-07-26 04:23:03 +000067 case MinGW32: return "mingw32";
Chris Lattner8e620832009-08-12 06:32:10 +000068 case MinGW64: return "mingw64";
Chris Lattnerb8ac8412009-07-13 20:22:23 +000069 case NetBSD: return "netbsd";
Duncan Sandscd1267d2009-06-29 13:36:13 +000070 case OpenBSD: return "openbsd";
Daniel Dunbarfdb0b7b2009-08-18 04:43:27 +000071 case Solaris: return "solaris";
Daniel Dunbar6337f152009-07-26 04:23:03 +000072 case Win32: return "win32";
Daniel Dunbar23e97b02009-04-01 21:53:23 +000073 }
74
75 return "<invalid>";
76}
77
Daniel Dunbar3c2d4bf2009-08-03 04:03:51 +000078Triple::ArchType Triple::getArchTypeForLLVMName(const StringRef &Name) {
79 if (Name == "alpha")
80 return alpha;
81 if (Name == "arm")
82 return arm;
83 if (Name == "bfin")
84 return bfin;
85 if (Name == "cellspu")
86 return cellspu;
87 if (Name == "mips")
88 return mips;
89 if (Name == "mipsel")
90 return mipsel;
91 if (Name == "msp430")
92 return msp430;
Daniel Dunbarfdb0b7b2009-08-18 04:43:27 +000093 if (Name == "pic16")
94 return pic16;
Daniel Dunbar3c2d4bf2009-08-03 04:03:51 +000095 if (Name == "ppc64")
96 return ppc64;
97 if (Name == "ppc")
98 return ppc;
99 if (Name == "sparc")
100 return sparc;
101 if (Name == "systemz")
102 return systemz;
Eli Friedman74db89e2009-08-19 20:46:03 +0000103 if (Name == "tce")
104 return tce;
Daniel Dunbar3c2d4bf2009-08-03 04:03:51 +0000105 if (Name == "thumb")
106 return thumb;
107 if (Name == "x86")
108 return x86;
Chris Lattnerb796c4f2009-08-12 06:45:02 +0000109 if (Name == "x86-64")
Daniel Dunbar3c2d4bf2009-08-03 04:03:51 +0000110 return x86_64;
111 if (Name == "xcore")
112 return xcore;
113
114 return UnknownArch;
115}
116
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000117//
118
119void Triple::Parse() const {
120 assert(!isInitialized() && "Invalid parse call.");
121
Daniel Dunbara14d2252009-07-26 03:31:47 +0000122 StringRef ArchName = getArchName();
Daniel Dunbar651aa682009-08-18 19:26:55 +0000123 StringRef VendorName = getVendorName();
124 StringRef OSName = getOSName();
125
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000126 if (ArchName.size() == 4 && ArchName[0] == 'i' &&
Daniel Dunbar6337f152009-07-26 04:23:03 +0000127 ArchName[2] == '8' && ArchName[3] == '6' &&
128 ArchName[1] - '3' < 6) // i[3-9]86
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000129 Arch = x86;
130 else if (ArchName == "amd64" || ArchName == "x86_64")
131 Arch = x86_64;
Daniel Dunbarb26bc422009-08-18 07:06:26 +0000132 else if (ArchName == "bfin")
133 Arch = bfin;
Daniel Dunbarfdb0b7b2009-08-18 04:43:27 +0000134 else if (ArchName == "pic16")
135 Arch = pic16;
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000136 else if (ArchName == "powerpc")
137 Arch = ppc;
138 else if (ArchName == "powerpc64")
139 Arch = ppc64;
Daniel Dunbar6337f152009-07-26 04:23:03 +0000140 else if (ArchName == "arm" ||
Daniel Dunbar24473892009-08-18 04:51:26 +0000141 ArchName.startswith("armv") ||
142 ArchName == "xscale")
Daniel Dunbar6337f152009-07-26 04:23:03 +0000143 Arch = arm;
144 else if (ArchName == "thumb" ||
145 ArchName.startswith("thumbv"))
146 Arch = thumb;
147 else if (ArchName.startswith("alpha"))
148 Arch = alpha;
149 else if (ArchName == "spu" || ArchName == "cellspu")
150 Arch = cellspu;
151 else if (ArchName == "msp430")
152 Arch = msp430;
153 else if (ArchName == "mips" || ArchName == "mipsallegrex")
154 Arch = mips;
155 else if (ArchName == "mipsel" || ArchName == "mipsallegrexel" ||
156 ArchName == "psp")
157 Arch = mipsel;
158 else if (ArchName == "sparc")
159 Arch = sparc;
160 else if (ArchName == "s390x")
161 Arch = systemz;
Eli Friedman74db89e2009-08-19 20:46:03 +0000162 else if (ArchName == "tce")
163 Arch = tce;
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000164 else
165 Arch = UnknownArch;
166
Daniel Dunbar651aa682009-08-18 19:26:55 +0000167
168 // Handle some exceptional cases where the OS / environment components are
169 // stuck into the vendor field.
170 if (StringRef(getTriple()).count('-') == 1) {
171 StringRef VendorName = getVendorName();
172
173 if (VendorName.startswith("mingw32")) { // 'i386-mingw32', etc.
174 Vendor = PC;
175 OS = MinGW32;
176 return;
177 }
178
179 // arm-elf is another example, but we don't currently parse anything about
180 // the environment.
181 }
182
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000183 if (VendorName == "apple")
184 Vendor = Apple;
185 else if (VendorName == "pc")
186 Vendor = PC;
187 else
188 Vendor = UnknownVendor;
189
Daniel Dunbara14d2252009-07-26 03:31:47 +0000190 if (OSName.startswith("auroraux"))
Duncan Sands852cd112009-06-19 14:40:01 +0000191 OS = AuroraUX;
Daniel Dunbar6337f152009-07-26 04:23:03 +0000192 else if (OSName.startswith("cygwin"))
193 OS = Cygwin;
Daniel Dunbara14d2252009-07-26 03:31:47 +0000194 else if (OSName.startswith("darwin"))
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000195 OS = Darwin;
Daniel Dunbara14d2252009-07-26 03:31:47 +0000196 else if (OSName.startswith("dragonfly"))
Daniel Dunbar7eaf0572009-05-22 02:24:11 +0000197 OS = DragonFly;
Daniel Dunbara14d2252009-07-26 03:31:47 +0000198 else if (OSName.startswith("freebsd"))
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000199 OS = FreeBSD;
Daniel Dunbara14d2252009-07-26 03:31:47 +0000200 else if (OSName.startswith("linux"))
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000201 OS = Linux;
Daniel Dunbar6337f152009-07-26 04:23:03 +0000202 else if (OSName.startswith("mingw32"))
203 OS = MinGW32;
Chris Lattner8e620832009-08-12 06:32:10 +0000204 else if (OSName.startswith("mingw64"))
205 OS = MinGW64;
Daniel Dunbara14d2252009-07-26 03:31:47 +0000206 else if (OSName.startswith("netbsd"))
Chris Lattnerb8ac8412009-07-13 20:22:23 +0000207 OS = NetBSD;
Daniel Dunbara14d2252009-07-26 03:31:47 +0000208 else if (OSName.startswith("openbsd"))
Duncan Sandscd1267d2009-06-29 13:36:13 +0000209 OS = OpenBSD;
Daniel Dunbarfdb0b7b2009-08-18 04:43:27 +0000210 else if (OSName.startswith("solaris"))
211 OS = Solaris;
Daniel Dunbar6337f152009-07-26 04:23:03 +0000212 else if (OSName.startswith("win32"))
213 OS = Win32;
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000214 else
215 OS = UnknownOS;
216
217 assert(isInitialized() && "Failed to initialize!");
218}
219
Daniel Dunbara14d2252009-07-26 03:31:47 +0000220StringRef Triple::getArchName() const {
221 return StringRef(Data).split('-').first; // Isolate first component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000222}
223
Daniel Dunbara14d2252009-07-26 03:31:47 +0000224StringRef Triple::getVendorName() const {
225 StringRef Tmp = StringRef(Data).split('-').second; // Strip first component
226 return Tmp.split('-').first; // Isolate second component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000227}
228
Daniel Dunbara14d2252009-07-26 03:31:47 +0000229StringRef Triple::getOSName() const {
230 StringRef Tmp = StringRef(Data).split('-').second; // Strip first component
231 Tmp = Tmp.split('-').second; // Strip second component
232 return Tmp.split('-').first; // Isolate third component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000233}
234
Daniel Dunbara14d2252009-07-26 03:31:47 +0000235StringRef Triple::getEnvironmentName() const {
236 StringRef Tmp = StringRef(Data).split('-').second; // Strip first component
237 Tmp = Tmp.split('-').second; // Strip second component
238 return Tmp.split('-').second; // Strip third component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000239}
240
Daniel Dunbara14d2252009-07-26 03:31:47 +0000241StringRef Triple::getOSAndEnvironmentName() const {
242 StringRef Tmp = StringRef(Data).split('-').second; // Strip first component
243 return Tmp.split('-').second; // Strip second component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000244}
245
Chris Lattnerdfc17f72009-08-12 06:19:40 +0000246static unsigned EatNumber(StringRef &Str) {
247 assert(!Str.empty() && Str[0] >= '0' && Str[0] <= '9' && "Not a number");
248 unsigned Result = Str[0]-'0';
249
250 // Eat the digit.
251 Str = Str.substr(1);
252
253 // Handle "darwin11".
254 if (Result == 1 && !Str.empty() && Str[0] >= '0' && Str[0] <= '9') {
255 Result = Result*10 + (Str[0] - '0');
256 // Eat the digit.
257 Str = Str.substr(1);
258 }
259
260 return Result;
261}
262
263/// getDarwinNumber - Parse the 'darwin number' out of the specific target
264/// triple. For example, if we have darwin8.5 return 8,5,0. If any entry is
265/// not defined, return 0's. This requires that the triple have an OSType of
266/// darwin before it is called.
267void Triple::getDarwinNumber(unsigned &Maj, unsigned &Min,
268 unsigned &Revision) const {
269 assert(getOS() == Darwin && "Not a darwin target triple!");
270 StringRef OSName = getOSName();
271 assert(OSName.startswith("darwin") && "Unknown darwin target triple!");
272
273 // Strip off "darwin".
274 OSName = OSName.substr(6);
275
276 Maj = Min = Revision = 0;
277
278 if (OSName.empty() || OSName[0] < '0' || OSName[0] > '9')
279 return;
280
281 // The major version is the first digit.
282 Maj = EatNumber(OSName);
283 if (OSName.empty()) return;
284
285 // Handle minor version: 10.4.9 -> darwin8.9.
286 if (OSName[0] != '.')
287 return;
288
289 // Eat the '.'.
290 OSName = OSName.substr(1);
291
292 if (OSName.empty() || OSName[0] < '0' || OSName[0] > '9')
293 return;
294
295 Min = EatNumber(OSName);
296 if (OSName.empty()) return;
297
298 // Handle revision darwin8.9.1
299 if (OSName[0] != '.')
300 return;
301
302 // Eat the '.'.
303 OSName = OSName.substr(1);
304
305 if (OSName.empty() || OSName[0] < '0' || OSName[0] > '9')
306 return;
307
308 Revision = EatNumber(OSName);
309}
310
Daniel Dunbara14d2252009-07-26 03:31:47 +0000311void Triple::setTriple(const Twine &Str) {
312 Data = Str.str();
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000313 Arch = InvalidArch;
314}
315
316void Triple::setArch(ArchType Kind) {
317 setArchName(getArchTypeName(Kind));
318}
319
320void Triple::setVendor(VendorType Kind) {
321 setVendorName(getVendorTypeName(Kind));
322}
323
324void Triple::setOS(OSType Kind) {
325 setOSName(getOSTypeName(Kind));
326}
327
Daniel Dunbara14d2252009-07-26 03:31:47 +0000328void Triple::setArchName(const StringRef &Str) {
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000329 setTriple(Str + "-" + getVendorName() + "-" + getOSAndEnvironmentName());
330}
331
Daniel Dunbara14d2252009-07-26 03:31:47 +0000332void Triple::setVendorName(const StringRef &Str) {
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000333 setTriple(getArchName() + "-" + Str + "-" + getOSAndEnvironmentName());
334}
335
Daniel Dunbara14d2252009-07-26 03:31:47 +0000336void Triple::setOSName(const StringRef &Str) {
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000337 if (hasEnvironment())
338 setTriple(getArchName() + "-" + getVendorName() + "-" + Str +
339 "-" + getEnvironmentName());
340 else
341 setTriple(getArchName() + "-" + getVendorName() + "-" + Str);
342}
343
Daniel Dunbara14d2252009-07-26 03:31:47 +0000344void Triple::setEnvironmentName(const StringRef &Str) {
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000345 setTriple(getArchName() + "-" + getVendorName() + "-" + getOSName() +
346 "-" + Str);
347}
348
Daniel Dunbara14d2252009-07-26 03:31:47 +0000349void Triple::setOSAndEnvironmentName(const StringRef &Str) {
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000350 setTriple(getArchName() + "-" + getVendorName() + "-" + Str);
351}