blob: c59ec19ecbba1ed1c02ac818f26f7e6416d14a7c [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"
Jeffrey Yasskin0b228732009-10-06 21:45:26 +000011#include "llvm/ADT/SmallString.h"
Chandler Carruth06accda2012-02-12 09:27:38 +000012#include "llvm/ADT/StringSwitch.h"
Duncan Sands5754a452010-09-16 08:25:48 +000013#include "llvm/ADT/STLExtras.h"
David Blaikie4d6ccb52012-01-20 21:51:11 +000014#include "llvm/Support/ErrorHandling.h"
Mikhail Glushenkov70748752009-04-02 01:11:37 +000015#include <cstring>
Daniel Dunbar23e97b02009-04-01 21:53:23 +000016using namespace llvm;
17
Daniel Dunbar23e97b02009-04-01 21:53:23 +000018const char *Triple::getArchTypeName(ArchType Kind) {
19 switch (Kind) {
Daniel Dunbar23e97b02009-04-01 21:53:23 +000020 case UnknownArch: return "unknown";
Jim Grosbache509aa92010-12-17 02:10:59 +000021
Daniel Dunbar6337f152009-07-26 04:23:03 +000022 case arm: return "arm";
23 case cellspu: return "cellspu";
Tony Linthicumb4b54152011-12-12 21:14:40 +000024 case hexagon: return "hexagon";
Daniel Dunbar6337f152009-07-26 04:23:03 +000025 case mips: return "mips";
26 case mipsel: return "mipsel";
Akira Hatanaka70303682011-09-20 18:09:37 +000027 case mips64: return "mips64";
28 case mips64el:return "mips64el";
Daniel Dunbar6337f152009-07-26 04:23:03 +000029 case msp430: return "msp430";
Daniel Dunbar8c2f1d72009-07-26 04:52:45 +000030 case ppc64: return "powerpc64";
31 case ppc: return "powerpc";
Anton Korobeynikov74156592012-03-09 10:09:36 +000032 case r600: return "r600";
Daniel Dunbar6337f152009-07-26 04:23:03 +000033 case sparc: return "sparc";
Chris Lattner87c06d62010-02-04 06:34:01 +000034 case sparcv9: return "sparcv9";
Eli Friedman74db89e2009-08-19 20:46:03 +000035 case tce: return "tce";
Daniel Dunbar6337f152009-07-26 04:23:03 +000036 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";
Wesley Pecka70f28c2010-02-23 19:15:24 +000040 case mblaze: return "mblaze";
Justin Holewinski49683f32012-05-04 20:18:50 +000041 case nvptx: return "nvptx";
42 case nvptx64: return "nvptx64";
Ivan Krasin38fb2db2011-08-23 16:59:00 +000043 case le32: return "le32";
Tobias Grosser05d71382011-08-29 15:44:55 +000044 case amdil: return "amdil";
Micah Villmowe53d6052012-10-01 17:01:31 +000045 case spir: return "spir";
Daniel Dunbar23e97b02009-04-01 21:53:23 +000046 }
47
David Blaikie4d6ccb52012-01-20 21:51:11 +000048 llvm_unreachable("Invalid ArchType!");
Daniel Dunbar23e97b02009-04-01 21:53:23 +000049}
50
Daniel Dunbar688b55b2009-08-24 09:53:06 +000051const char *Triple::getArchTypePrefix(ArchType Kind) {
52 switch (Kind) {
53 default:
54 return 0;
55
Daniel Dunbar688b55b2009-08-24 09:53:06 +000056 case arm:
57 case thumb: return "arm";
58
Daniel Dunbar688b55b2009-08-24 09:53:06 +000059 case cellspu: return "spu";
60
61 case ppc64:
62 case ppc: return "ppc";
63
Wesley Pecka70f28c2010-02-23 19:15:24 +000064 case mblaze: return "mblaze";
65
Benjamin Kramerd5dbc8c2012-06-28 19:09:53 +000066 case mips:
67 case mipsel:
68 case mips64:
69 case mips64el:return "mips";
70
71 case hexagon: return "hexagon";
Tony Linthicumb4b54152011-12-12 21:14:40 +000072
Anton Korobeynikov74156592012-03-09 10:09:36 +000073 case r600: return "r600";
74
Chris Lattner87c06d62010-02-04 06:34:01 +000075 case sparcv9:
Daniel Dunbar688b55b2009-08-24 09:53:06 +000076 case sparc: return "sparc";
77
78 case x86:
79 case x86_64: return "x86";
Nick Lewyckyf7a3c502010-09-07 18:14:24 +000080
Daniel Dunbar688b55b2009-08-24 09:53:06 +000081 case xcore: return "xcore";
Nick Lewyckyf7a3c502010-09-07 18:14:24 +000082
Justin Holewinski49683f32012-05-04 20:18:50 +000083 case nvptx: return "nvptx";
84 case nvptx64: return "nvptx";
Ivan Krasin38fb2db2011-08-23 16:59:00 +000085 case le32: return "le32";
Tobias Grosser05d71382011-08-29 15:44:55 +000086 case amdil: return "amdil";
Micah Villmowe53d6052012-10-01 17:01:31 +000087 case spir: return "spir";
Daniel Dunbar688b55b2009-08-24 09:53:06 +000088 }
89}
90
Daniel Dunbar23e97b02009-04-01 21:53:23 +000091const char *Triple::getVendorTypeName(VendorType Kind) {
92 switch (Kind) {
93 case UnknownVendor: return "unknown";
94
95 case Apple: return "apple";
Chris Lattner56ce0f42009-08-14 18:48:13 +000096 case PC: return "pc";
John Thompson6046cff2011-03-15 21:51:56 +000097 case SCEI: return "scei";
Hal Finkela47406c2012-04-02 18:31:33 +000098 case BGP: return "bgp";
99 case BGQ: return "bgq";
Hal Finkeld939cd62012-08-28 02:10:30 +0000100 case Freescale: return "fsl";
Duncan Sands2e522d02012-10-12 11:08:57 +0000101 case IBM: return "ibm";
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000102 }
103
David Blaikie4d6ccb52012-01-20 21:51:11 +0000104 llvm_unreachable("Invalid VendorType!");
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000105}
106
107const char *Triple::getOSTypeName(OSType Kind) {
108 switch (Kind) {
109 case UnknownOS: return "unknown";
110
Duncan Sands852cd112009-06-19 14:40:01 +0000111 case AuroraUX: return "auroraux";
Daniel Dunbar6337f152009-07-26 04:23:03 +0000112 case Cygwin: return "cygwin";
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000113 case Darwin: return "darwin";
Daniel Dunbar7eaf0572009-05-22 02:24:11 +0000114 case DragonFly: return "dragonfly";
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000115 case FreeBSD: return "freebsd";
Daniel Dunbar0dde4c02011-04-19 20:19:27 +0000116 case IOS: return "ios";
Duncan Sands652b48b2011-07-26 15:30:04 +0000117 case KFreeBSD: return "kfreebsd";
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000118 case Linux: return "linux";
Edward O'Callaghancc9fa812009-11-19 11:59:00 +0000119 case Lv2: return "lv2";
Daniel Dunbar1af39472011-04-19 23:34:12 +0000120 case MacOSX: return "macosx";
Daniel Dunbar6337f152009-07-26 04:23:03 +0000121 case MinGW32: return "mingw32";
Chris Lattnerb8ac8412009-07-13 20:22:23 +0000122 case NetBSD: return "netbsd";
Duncan Sandscd1267d2009-06-29 13:36:13 +0000123 case OpenBSD: return "openbsd";
Daniel Dunbarfdb0b7b2009-08-18 04:43:27 +0000124 case Solaris: return "solaris";
Daniel Dunbar6337f152009-07-26 04:23:03 +0000125 case Win32: return "win32";
Chris Lattnera43fc342009-10-16 02:06:30 +0000126 case Haiku: return "haiku";
Chris Lattner29269d02010-07-07 15:52:27 +0000127 case Minix: return "minix";
Douglas Gregor6ced1d12011-07-01 22:41:06 +0000128 case RTEMS: return "rtems";
Ivan Krasinfb234622011-08-18 22:54:21 +0000129 case NativeClient: return "nacl";
Hal Finkela47406c2012-04-02 18:31:33 +0000130 case CNK: return "cnk";
Eric Christopherb0f67592012-08-06 20:52:18 +0000131 case Bitrig: return "bitrig";
Duncan Sands2e522d02012-10-12 11:08:57 +0000132 case AIX: return "aix";
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000133 }
134
David Blaikie4d6ccb52012-01-20 21:51:11 +0000135 llvm_unreachable("Invalid OSType");
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000136}
137
Duncan Sands5754a452010-09-16 08:25:48 +0000138const char *Triple::getEnvironmentTypeName(EnvironmentType Kind) {
139 switch (Kind) {
140 case UnknownEnvironment: return "unknown";
Renato Golin859f8182011-01-21 18:25:47 +0000141 case GNU: return "gnu";
Rafael Espindola8887a0f2012-01-18 23:35:29 +0000142 case GNUEABIHF: return "gnueabihf";
Renato Golin859f8182011-01-21 18:25:47 +0000143 case GNUEABI: return "gnueabi";
144 case EABI: return "eabi";
Evan Cheng2bffee22011-02-01 01:14:13 +0000145 case MachO: return "macho";
Logan Chien43bf7092012-09-02 09:29:46 +0000146 case Android: return "android";
Andrew Kaylor7bbd6e32012-10-02 18:38:34 +0000147 case ELF: return "elf";
Duncan Sands5754a452010-09-16 08:25:48 +0000148 }
149
David Blaikie4d6ccb52012-01-20 21:51:11 +0000150 llvm_unreachable("Invalid EnvironmentType!");
Duncan Sands5754a452010-09-16 08:25:48 +0000151}
152
Daniel Dunbar2928c832009-11-06 10:58:06 +0000153Triple::ArchType Triple::getArchTypeForLLVMName(StringRef Name) {
Chandler Carruth06accda2012-02-12 09:27:38 +0000154 return StringSwitch<Triple::ArchType>(Name)
155 .Case("arm", arm)
156 .Case("cellspu", cellspu)
157 .Case("mips", mips)
158 .Case("mipsel", mipsel)
159 .Case("mips64", mips64)
160 .Case("mips64el", mips64el)
161 .Case("msp430", msp430)
162 .Case("ppc64", ppc64)
163 .Case("ppc32", ppc)
164 .Case("ppc", ppc)
165 .Case("mblaze", mblaze)
Anton Korobeynikov74156592012-03-09 10:09:36 +0000166 .Case("r600", r600)
Chandler Carruth06accda2012-02-12 09:27:38 +0000167 .Case("hexagon", hexagon)
168 .Case("sparc", sparc)
169 .Case("sparcv9", sparcv9)
170 .Case("tce", tce)
171 .Case("thumb", thumb)
172 .Case("x86", x86)
173 .Case("x86-64", x86_64)
174 .Case("xcore", xcore)
Justin Holewinski49683f32012-05-04 20:18:50 +0000175 .Case("nvptx", nvptx)
176 .Case("nvptx64", nvptx64)
Chandler Carruth06accda2012-02-12 09:27:38 +0000177 .Case("le32", le32)
178 .Case("amdil", amdil)
Micah Villmowe53d6052012-10-01 17:01:31 +0000179 .Case("spir", spir)
Chandler Carruth06accda2012-02-12 09:27:38 +0000180 .Default(UnknownArch);
Daniel Dunbar3c2d4bf2009-08-03 04:03:51 +0000181}
182
Duncan Sandsbbdca3f2010-03-24 09:05:14 +0000183// Returns architecture name that is understood by the target assembler.
Viktor Kutuzov51cdac02009-11-17 18:48:27 +0000184const char *Triple::getArchNameForAssembler() {
Daniel Dunbare1fe09f2011-04-19 21:12:05 +0000185 if (!isOSDarwin() && getVendor() != Triple::Apple)
Viktor Kutuzov51cdac02009-11-17 18:48:27 +0000186 return NULL;
187
Chandler Carruth06accda2012-02-12 09:27:38 +0000188 return StringSwitch<const char*>(getArchName())
189 .Case("i386", "i386")
190 .Case("x86_64", "x86_64")
191 .Case("powerpc", "ppc")
192 .Case("powerpc64", "ppc64")
193 .Cases("mblaze", "microblaze", "mblaze")
194 .Case("arm", "arm")
195 .Cases("armv4t", "thumbv4t", "armv4t")
196 .Cases("armv5", "armv5e", "thumbv5", "thumbv5e", "armv5")
197 .Cases("armv6", "thumbv6", "armv6")
198 .Cases("armv7", "thumbv7", "armv7")
Anton Korobeynikov74156592012-03-09 10:09:36 +0000199 .Case("r600", "r600")
Justin Holewinski49683f32012-05-04 20:18:50 +0000200 .Case("nvptx", "nvptx")
201 .Case("nvptx64", "nvptx64")
Chandler Carruth06accda2012-02-12 09:27:38 +0000202 .Case("le32", "le32")
203 .Case("amdil", "amdil")
Micah Villmowe53d6052012-10-01 17:01:31 +0000204 .Case("spir", "spir")
Chandler Carruth06accda2012-02-12 09:27:38 +0000205 .Default(NULL);
Viktor Kutuzov51cdac02009-11-17 18:48:27 +0000206}
207
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000208static Triple::ArchType parseArch(StringRef ArchName) {
209 return StringSwitch<Triple::ArchType>(ArchName)
210 .Cases("i386", "i486", "i586", "i686", Triple::x86)
211 // FIXME: Do we need to support these?
212 .Cases("i786", "i886", "i986", Triple::x86)
213 .Cases("amd64", "x86_64", Triple::x86_64)
214 .Case("powerpc", Triple::ppc)
215 .Cases("powerpc64", "ppu", Triple::ppc64)
216 .Case("mblaze", Triple::mblaze)
217 .Cases("arm", "xscale", Triple::arm)
Chandler Carruth0a857712012-02-18 04:34:17 +0000218 // FIXME: It would be good to replace these with explicit names for all the
219 // various suffixes supported.
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000220 .StartsWith("armv", Triple::arm)
221 .Case("thumb", Triple::thumb)
222 .StartsWith("thumbv", Triple::thumb)
223 .Cases("spu", "cellspu", Triple::cellspu)
224 .Case("msp430", Triple::msp430)
225 .Cases("mips", "mipseb", "mipsallegrex", Triple::mips)
Chandler Carruthfdf0dc92012-02-22 11:32:54 +0000226 .Cases("mipsel", "mipsallegrexel", Triple::mipsel)
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000227 .Cases("mips64", "mips64eb", Triple::mips64)
228 .Case("mips64el", Triple::mips64el)
Anton Korobeynikov74156592012-03-09 10:09:36 +0000229 .Case("r600", Triple::r600)
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000230 .Case("hexagon", Triple::hexagon)
231 .Case("sparc", Triple::sparc)
232 .Case("sparcv9", Triple::sparcv9)
233 .Case("tce", Triple::tce)
234 .Case("xcore", Triple::xcore)
Justin Holewinski49683f32012-05-04 20:18:50 +0000235 .Case("nvptx", Triple::nvptx)
236 .Case("nvptx64", Triple::nvptx64)
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000237 .Case("le32", Triple::le32)
238 .Case("amdil", Triple::amdil)
Micah Villmowe53d6052012-10-01 17:01:31 +0000239 .Case("spir", Triple::spir)
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000240 .Default(Triple::UnknownArch);
Duncan Sands335db222010-08-12 11:31:39 +0000241}
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000242
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000243static Triple::VendorType parseVendor(StringRef VendorName) {
244 return StringSwitch<Triple::VendorType>(VendorName)
245 .Case("apple", Triple::Apple)
246 .Case("pc", Triple::PC)
247 .Case("scei", Triple::SCEI)
Hal Finkela47406c2012-04-02 18:31:33 +0000248 .Case("bgp", Triple::BGP)
249 .Case("bgq", Triple::BGQ)
Hal Finkeld939cd62012-08-28 02:10:30 +0000250 .Case("fsl", Triple::Freescale)
Duncan Sands2e522d02012-10-12 11:08:57 +0000251 .Case("ibm", Triple::IBM)
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000252 .Default(Triple::UnknownVendor);
Duncan Sands335db222010-08-12 11:31:39 +0000253}
254
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000255static Triple::OSType parseOS(StringRef OSName) {
256 return StringSwitch<Triple::OSType>(OSName)
257 .StartsWith("auroraux", Triple::AuroraUX)
258 .StartsWith("cygwin", Triple::Cygwin)
259 .StartsWith("darwin", Triple::Darwin)
260 .StartsWith("dragonfly", Triple::DragonFly)
261 .StartsWith("freebsd", Triple::FreeBSD)
262 .StartsWith("ios", Triple::IOS)
263 .StartsWith("kfreebsd", Triple::KFreeBSD)
264 .StartsWith("linux", Triple::Linux)
265 .StartsWith("lv2", Triple::Lv2)
266 .StartsWith("macosx", Triple::MacOSX)
267 .StartsWith("mingw32", Triple::MinGW32)
268 .StartsWith("netbsd", Triple::NetBSD)
269 .StartsWith("openbsd", Triple::OpenBSD)
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000270 .StartsWith("solaris", Triple::Solaris)
271 .StartsWith("win32", Triple::Win32)
272 .StartsWith("haiku", Triple::Haiku)
273 .StartsWith("minix", Triple::Minix)
274 .StartsWith("rtems", Triple::RTEMS)
275 .StartsWith("nacl", Triple::NativeClient)
Hal Finkela47406c2012-04-02 18:31:33 +0000276 .StartsWith("cnk", Triple::CNK)
Eric Christopherb0f67592012-08-06 20:52:18 +0000277 .StartsWith("bitrig", Triple::Bitrig)
Duncan Sands2e522d02012-10-12 11:08:57 +0000278 .StartsWith("aix", Triple::AIX)
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000279 .Default(Triple::UnknownOS);
Duncan Sands335db222010-08-12 11:31:39 +0000280}
281
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000282static Triple::EnvironmentType parseEnvironment(StringRef EnvironmentName) {
283 return StringSwitch<Triple::EnvironmentType>(EnvironmentName)
284 .StartsWith("eabi", Triple::EABI)
285 .StartsWith("gnueabihf", Triple::GNUEABIHF)
286 .StartsWith("gnueabi", Triple::GNUEABI)
287 .StartsWith("gnu", Triple::GNU)
288 .StartsWith("macho", Triple::MachO)
Logan Chien43bf7092012-09-02 09:29:46 +0000289 .StartsWith("android", Triple::Android)
Andrew Kaylor7bbd6e32012-10-02 18:38:34 +0000290 .StartsWith("elf", Triple::ELF)
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000291 .Default(Triple::UnknownEnvironment);
Duncan Sands5754a452010-09-16 08:25:48 +0000292}
293
Chandler Carruthcceb8f42012-02-20 00:02:47 +0000294/// \brief Construct a triple from the string representation provided.
295///
Chandler Carruth0523f412012-02-21 08:31:18 +0000296/// This stores the string representation and parses the various pieces into
297/// enum members.
Chandler Carruth124e51c2012-02-21 03:39:36 +0000298Triple::Triple(const Twine &Str)
299 : Data(Str.str()),
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000300 Arch(parseArch(getArchName())),
301 Vendor(parseVendor(getVendorName())),
302 OS(parseOS(getOSName())),
303 Environment(parseEnvironment(getEnvironmentName())) {
Chandler Carruth124e51c2012-02-21 03:39:36 +0000304}
Chandler Carruthcceb8f42012-02-20 00:02:47 +0000305
306/// \brief Construct a triple from string representations of the architecture,
307/// vendor, and OS.
308///
Chandler Carruth0523f412012-02-21 08:31:18 +0000309/// This joins each argument into a canonical string representation and parses
310/// them into enum members. It leaves the environment unknown and omits it from
311/// the string representation.
Chandler Carruthcceb8f42012-02-20 00:02:47 +0000312Triple::Triple(const Twine &ArchStr, const Twine &VendorStr, const Twine &OSStr)
313 : Data((ArchStr + Twine('-') + VendorStr + Twine('-') + OSStr).str()),
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000314 Arch(parseArch(ArchStr.str())),
315 Vendor(parseVendor(VendorStr.str())),
316 OS(parseOS(OSStr.str())),
Chandler Carruth124e51c2012-02-21 03:39:36 +0000317 Environment() {
Chandler Carruthcceb8f42012-02-20 00:02:47 +0000318}
319
320/// \brief Construct a triple from string representations of the architecture,
321/// vendor, OS, and environment.
322///
Chandler Carruth0523f412012-02-21 08:31:18 +0000323/// This joins each argument into a canonical string representation and parses
324/// them into enum members.
Chandler Carruthcceb8f42012-02-20 00:02:47 +0000325Triple::Triple(const Twine &ArchStr, const Twine &VendorStr, const Twine &OSStr,
326 const Twine &EnvironmentStr)
327 : Data((ArchStr + Twine('-') + VendorStr + Twine('-') + OSStr + Twine('-') +
328 EnvironmentStr).str()),
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000329 Arch(parseArch(ArchStr.str())),
330 Vendor(parseVendor(VendorStr.str())),
331 OS(parseOS(OSStr.str())),
332 Environment(parseEnvironment(EnvironmentStr.str())) {
Chandler Carruthcceb8f42012-02-20 00:02:47 +0000333}
334
Duncan Sands335db222010-08-12 11:31:39 +0000335std::string Triple::normalize(StringRef Str) {
336 // Parse into components.
337 SmallVector<StringRef, 4> Components;
Chandler Carruthdac3d362012-02-21 09:12:48 +0000338 Str.split(Components, "-");
Duncan Sands335db222010-08-12 11:31:39 +0000339
340 // If the first component corresponds to a known architecture, preferentially
341 // use it for the architecture. If the second component corresponds to a
342 // known vendor, preferentially use it for the vendor, etc. This avoids silly
343 // component movement when a component parses as (eg) both a valid arch and a
344 // valid os.
345 ArchType Arch = UnknownArch;
346 if (Components.size() > 0)
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000347 Arch = parseArch(Components[0]);
Duncan Sands335db222010-08-12 11:31:39 +0000348 VendorType Vendor = UnknownVendor;
349 if (Components.size() > 1)
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000350 Vendor = parseVendor(Components[1]);
Duncan Sands335db222010-08-12 11:31:39 +0000351 OSType OS = UnknownOS;
352 if (Components.size() > 2)
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000353 OS = parseOS(Components[2]);
Duncan Sands5754a452010-09-16 08:25:48 +0000354 EnvironmentType Environment = UnknownEnvironment;
355 if (Components.size() > 3)
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000356 Environment = parseEnvironment(Components[3]);
Duncan Sands335db222010-08-12 11:31:39 +0000357
358 // Note which components are already in their final position. These will not
359 // be moved.
Duncan Sands5754a452010-09-16 08:25:48 +0000360 bool Found[4];
Duncan Sands335db222010-08-12 11:31:39 +0000361 Found[0] = Arch != UnknownArch;
362 Found[1] = Vendor != UnknownVendor;
363 Found[2] = OS != UnknownOS;
Duncan Sands5754a452010-09-16 08:25:48 +0000364 Found[3] = Environment != UnknownEnvironment;
Duncan Sands335db222010-08-12 11:31:39 +0000365
366 // If they are not there already, permute the components into their canonical
367 // positions by seeing if they parse as a valid architecture, and if so moving
368 // the component to the architecture position etc.
Duncan Sands5754a452010-09-16 08:25:48 +0000369 for (unsigned Pos = 0; Pos != array_lengthof(Found); ++Pos) {
Duncan Sands335db222010-08-12 11:31:39 +0000370 if (Found[Pos])
371 continue; // Already in the canonical position.
372
373 for (unsigned Idx = 0; Idx != Components.size(); ++Idx) {
374 // Do not reparse any components that already matched.
Duncan Sands5754a452010-09-16 08:25:48 +0000375 if (Idx < array_lengthof(Found) && Found[Idx])
Duncan Sands335db222010-08-12 11:31:39 +0000376 continue;
377
378 // Does this component parse as valid for the target position?
379 bool Valid = false;
380 StringRef Comp = Components[Idx];
381 switch (Pos) {
Craig Topper85814382012-02-07 05:05:23 +0000382 default: llvm_unreachable("unexpected component type!");
Duncan Sands335db222010-08-12 11:31:39 +0000383 case 0:
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000384 Arch = parseArch(Comp);
Duncan Sands335db222010-08-12 11:31:39 +0000385 Valid = Arch != UnknownArch;
386 break;
387 case 1:
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000388 Vendor = parseVendor(Comp);
Duncan Sands335db222010-08-12 11:31:39 +0000389 Valid = Vendor != UnknownVendor;
390 break;
391 case 2:
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000392 OS = parseOS(Comp);
Duncan Sandsae200c62011-02-02 10:08:38 +0000393 Valid = OS != UnknownOS;
Duncan Sands335db222010-08-12 11:31:39 +0000394 break;
Duncan Sands5754a452010-09-16 08:25:48 +0000395 case 3:
Chandler Carruth4fbf6582012-02-21 08:53:32 +0000396 Environment = parseEnvironment(Comp);
Duncan Sands5754a452010-09-16 08:25:48 +0000397 Valid = Environment != UnknownEnvironment;
398 break;
Duncan Sands335db222010-08-12 11:31:39 +0000399 }
400 if (!Valid)
401 continue; // Nope, try the next component.
402
403 // Move the component to the target position, pushing any non-fixed
404 // components that are in the way to the right. This tends to give
405 // good results in the common cases of a forgotten vendor component
406 // or a wrongly positioned environment.
407 if (Pos < Idx) {
408 // Insert left, pushing the existing components to the right. For
409 // example, a-b-i386 -> i386-a-b when moving i386 to the front.
410 StringRef CurrentComponent(""); // The empty component.
411 // Replace the component we are moving with an empty component.
412 std::swap(CurrentComponent, Components[Idx]);
413 // Insert the component being moved at Pos, displacing any existing
414 // components to the right.
415 for (unsigned i = Pos; !CurrentComponent.empty(); ++i) {
416 // Skip over any fixed components.
Chandler Carruthc5f18d32012-02-21 09:29:14 +0000417 while (i < array_lengthof(Found) && Found[i])
418 ++i;
Duncan Sands335db222010-08-12 11:31:39 +0000419 // Place the component at the new position, getting the component
420 // that was at this position - it will be moved right.
421 std::swap(CurrentComponent, Components[i]);
422 }
423 } else if (Pos > Idx) {
424 // Push right by inserting empty components until the component at Idx
425 // reaches the target position Pos. For example, pc-a -> -pc-a when
426 // moving pc to the second position.
427 do {
428 // Insert one empty component at Idx.
429 StringRef CurrentComponent(""); // The empty component.
Duncan Sandsae200c62011-02-02 10:08:38 +0000430 for (unsigned i = Idx; i < Components.size();) {
Duncan Sands335db222010-08-12 11:31:39 +0000431 // Place the component at the new position, getting the component
432 // that was at this position - it will be moved right.
433 std::swap(CurrentComponent, Components[i]);
434 // If it was placed on top of an empty component then we are done.
435 if (CurrentComponent.empty())
436 break;
Duncan Sandsae200c62011-02-02 10:08:38 +0000437 // Advance to the next component, skipping any fixed components.
Anders Carlsson15ec6952011-02-05 18:19:35 +0000438 while (++i < array_lengthof(Found) && Found[i])
439 ;
Duncan Sands335db222010-08-12 11:31:39 +0000440 }
441 // The last component was pushed off the end - append it.
442 if (!CurrentComponent.empty())
443 Components.push_back(CurrentComponent);
444
445 // Advance Idx to the component's new position.
Chandler Carruthc5f18d32012-02-21 09:29:14 +0000446 while (++Idx < array_lengthof(Found) && Found[Idx])
447 ;
Duncan Sands335db222010-08-12 11:31:39 +0000448 } while (Idx < Pos); // Add more until the final position is reached.
449 }
450 assert(Pos < Components.size() && Components[Pos] == Comp &&
451 "Component moved wrong!");
452 Found[Pos] = true;
453 break;
454 }
455 }
456
457 // Special case logic goes here. At this point Arch, Vendor and OS have the
458 // correct values for the computed components.
459
460 // Stick the corrected components back together to form the normalized string.
461 std::string Normalized;
462 for (unsigned i = 0, e = Components.size(); i != e; ++i) {
463 if (i) Normalized += '-';
464 Normalized += Components[i];
465 }
466 return Normalized;
467}
468
Daniel Dunbara14d2252009-07-26 03:31:47 +0000469StringRef Triple::getArchName() const {
470 return StringRef(Data).split('-').first; // Isolate first component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000471}
472
Daniel Dunbara14d2252009-07-26 03:31:47 +0000473StringRef Triple::getVendorName() const {
474 StringRef Tmp = StringRef(Data).split('-').second; // Strip first component
475 return Tmp.split('-').first; // Isolate second component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000476}
477
Daniel Dunbara14d2252009-07-26 03:31:47 +0000478StringRef Triple::getOSName() const {
479 StringRef Tmp = StringRef(Data).split('-').second; // Strip first component
480 Tmp = Tmp.split('-').second; // Strip second component
481 return Tmp.split('-').first; // Isolate third component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000482}
483
Daniel Dunbara14d2252009-07-26 03:31:47 +0000484StringRef Triple::getEnvironmentName() const {
485 StringRef Tmp = StringRef(Data).split('-').second; // Strip first component
486 Tmp = Tmp.split('-').second; // Strip second component
487 return Tmp.split('-').second; // Strip third component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000488}
489
Daniel Dunbara14d2252009-07-26 03:31:47 +0000490StringRef Triple::getOSAndEnvironmentName() const {
491 StringRef Tmp = StringRef(Data).split('-').second; // Strip first component
492 return Tmp.split('-').second; // Strip second component
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000493}
494
Chris Lattnerdfc17f72009-08-12 06:19:40 +0000495static unsigned EatNumber(StringRef &Str) {
496 assert(!Str.empty() && Str[0] >= '0' && Str[0] <= '9' && "Not a number");
Daniel Dunbar087d6a52011-04-19 20:24:34 +0000497 unsigned Result = 0;
Jim Grosbache509aa92010-12-17 02:10:59 +0000498
Daniel Dunbar087d6a52011-04-19 20:24:34 +0000499 do {
500 // Consume the leading digit.
Chris Lattnerdfc17f72009-08-12 06:19:40 +0000501 Result = Result*10 + (Str[0] - '0');
Daniel Dunbar087d6a52011-04-19 20:24:34 +0000502
Chris Lattnerdfc17f72009-08-12 06:19:40 +0000503 // Eat the digit.
504 Str = Str.substr(1);
Daniel Dunbar087d6a52011-04-19 20:24:34 +0000505 } while (!Str.empty() && Str[0] >= '0' && Str[0] <= '9');
Jim Grosbache509aa92010-12-17 02:10:59 +0000506
Chris Lattnerdfc17f72009-08-12 06:19:40 +0000507 return Result;
508}
509
Daniel Dunbar087d6a52011-04-19 20:24:34 +0000510void Triple::getOSVersion(unsigned &Major, unsigned &Minor,
511 unsigned &Micro) const {
Chris Lattnerdfc17f72009-08-12 06:19:40 +0000512 StringRef OSName = getOSName();
Jim Grosbache509aa92010-12-17 02:10:59 +0000513
Daniel Dunbar087d6a52011-04-19 20:24:34 +0000514 // Assume that the OS portion of the triple starts with the canonical name.
515 StringRef OSTypeName = getOSTypeName(getOS());
516 if (OSName.startswith(OSTypeName))
517 OSName = OSName.substr(OSTypeName.size());
Jim Grosbache509aa92010-12-17 02:10:59 +0000518
Daniel Dunbar087d6a52011-04-19 20:24:34 +0000519 // Any unset version defaults to 0.
520 Major = Minor = Micro = 0;
Chris Lattnerdfc17f72009-08-12 06:19:40 +0000521
Daniel Dunbar087d6a52011-04-19 20:24:34 +0000522 // Parse up to three components.
523 unsigned *Components[3] = { &Major, &Minor, &Micro };
524 for (unsigned i = 0; i != 3; ++i) {
525 if (OSName.empty() || OSName[0] < '0' || OSName[0] > '9')
526 break;
Chris Lattnerdfc17f72009-08-12 06:19:40 +0000527
Daniel Dunbar087d6a52011-04-19 20:24:34 +0000528 // Consume the leading number.
529 *Components[i] = EatNumber(OSName);
Jim Grosbache509aa92010-12-17 02:10:59 +0000530
Daniel Dunbar087d6a52011-04-19 20:24:34 +0000531 // Consume the separator, if present.
532 if (OSName.startswith("."))
533 OSName = OSName.substr(1);
534 }
Chris Lattnerdfc17f72009-08-12 06:19:40 +0000535}
536
Bob Wilsonbda59fd2012-01-31 22:32:29 +0000537bool Triple::getMacOSXVersion(unsigned &Major, unsigned &Minor,
538 unsigned &Micro) const {
539 getOSVersion(Major, Minor, Micro);
540
541 switch (getOS()) {
Craig Topper85814382012-02-07 05:05:23 +0000542 default: llvm_unreachable("unexpected OS for Darwin triple");
Bob Wilsonbda59fd2012-01-31 22:32:29 +0000543 case Darwin:
544 // Default to darwin8, i.e., MacOSX 10.4.
545 if (Major == 0)
546 Major = 8;
547 // Darwin version numbers are skewed from OS X versions.
548 if (Major < 4)
549 return false;
550 Micro = 0;
551 Minor = Major - 4;
552 Major = 10;
553 break;
554 case MacOSX:
555 // Default to 10.4.
556 if (Major == 0) {
557 Major = 10;
558 Minor = 4;
559 }
560 if (Major != 10)
561 return false;
562 break;
563 case IOS:
564 // Ignore the version from the triple. This is only handled because the
565 // the clang driver combines OS X and IOS support into a common Darwin
566 // toolchain that wants to know the OS X version number even when targeting
567 // IOS.
568 Major = 10;
569 Minor = 4;
570 Micro = 0;
571 break;
572 }
573 return true;
574}
575
Chad Rosierecee47e2012-05-09 17:23:48 +0000576void Triple::getiOSVersion(unsigned &Major, unsigned &Minor,
577 unsigned &Micro) const {
578 switch (getOS()) {
579 default: llvm_unreachable("unexpected OS for Darwin triple");
580 case Darwin:
581 case MacOSX:
582 // Ignore the version from the triple. This is only handled because the
583 // the clang driver combines OS X and IOS support into a common Darwin
584 // toolchain that wants to know the iOS version number even when targeting
585 // OS X.
Chad Rosier537c2f52012-05-09 18:23:00 +0000586 Major = 3;
Chad Rosierecee47e2012-05-09 17:23:48 +0000587 Minor = 0;
588 Micro = 0;
Chad Rosier26bbdee2012-05-09 17:38:47 +0000589 break;
Chad Rosierecee47e2012-05-09 17:23:48 +0000590 case IOS:
591 getOSVersion(Major, Minor, Micro);
Chad Rosier537c2f52012-05-09 18:23:00 +0000592 // Default to 3.0.
593 if (Major == 0)
594 Major = 3;
Chad Rosierecee47e2012-05-09 17:23:48 +0000595 break;
596 }
597}
598
Daniel Dunbara14d2252009-07-26 03:31:47 +0000599void Triple::setTriple(const Twine &Str) {
Chandler Carruth124e51c2012-02-21 03:39:36 +0000600 *this = Triple(Str);
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000601}
602
603void Triple::setArch(ArchType Kind) {
604 setArchName(getArchTypeName(Kind));
605}
606
607void Triple::setVendor(VendorType Kind) {
608 setVendorName(getVendorTypeName(Kind));
609}
610
611void Triple::setOS(OSType Kind) {
612 setOSName(getOSTypeName(Kind));
613}
614
Duncan Sands5754a452010-09-16 08:25:48 +0000615void Triple::setEnvironment(EnvironmentType Kind) {
616 setEnvironmentName(getEnvironmentTypeName(Kind));
617}
618
Daniel Dunbar2928c832009-11-06 10:58:06 +0000619void Triple::setArchName(StringRef Str) {
Jeffrey Yasskin0b228732009-10-06 21:45:26 +0000620 // Work around a miscompilation bug for Twines in gcc 4.0.3.
621 SmallString<64> Triple;
622 Triple += Str;
623 Triple += "-";
624 Triple += getVendorName();
625 Triple += "-";
626 Triple += getOSAndEnvironmentName();
627 setTriple(Triple.str());
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000628}
629
Daniel Dunbar2928c832009-11-06 10:58:06 +0000630void Triple::setVendorName(StringRef Str) {
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000631 setTriple(getArchName() + "-" + Str + "-" + getOSAndEnvironmentName());
632}
633
Daniel Dunbar2928c832009-11-06 10:58:06 +0000634void Triple::setOSName(StringRef Str) {
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000635 if (hasEnvironment())
636 setTriple(getArchName() + "-" + getVendorName() + "-" + Str +
637 "-" + getEnvironmentName());
638 else
639 setTriple(getArchName() + "-" + getVendorName() + "-" + Str);
640}
641
Daniel Dunbar2928c832009-11-06 10:58:06 +0000642void Triple::setEnvironmentName(StringRef Str) {
643 setTriple(getArchName() + "-" + getVendorName() + "-" + getOSName() +
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000644 "-" + Str);
645}
646
Daniel Dunbar2928c832009-11-06 10:58:06 +0000647void Triple::setOSAndEnvironmentName(StringRef Str) {
Daniel Dunbar23e97b02009-04-01 21:53:23 +0000648 setTriple(getArchName() + "-" + getVendorName() + "-" + Str);
649}
Chandler Carruth6f72ac42012-01-31 04:52:32 +0000650
651static unsigned getArchPointerBitWidth(llvm::Triple::ArchType Arch) {
652 switch (Arch) {
Micah Villmowe53d6052012-10-01 17:01:31 +0000653 case llvm::Triple::spir:
Chandler Carruth6f72ac42012-01-31 04:52:32 +0000654 case llvm::Triple::UnknownArch:
Chandler Carruth6f72ac42012-01-31 04:52:32 +0000655 return 0;
656
657 case llvm::Triple::msp430:
658 return 16;
659
660 case llvm::Triple::amdil:
661 case llvm::Triple::arm:
662 case llvm::Triple::cellspu:
663 case llvm::Triple::hexagon:
664 case llvm::Triple::le32:
665 case llvm::Triple::mblaze:
666 case llvm::Triple::mips:
667 case llvm::Triple::mipsel:
Justin Holewinski49683f32012-05-04 20:18:50 +0000668 case llvm::Triple::nvptx:
Chandler Carruth6f72ac42012-01-31 04:52:32 +0000669 case llvm::Triple::ppc:
Anton Korobeynikov74156592012-03-09 10:09:36 +0000670 case llvm::Triple::r600:
Chandler Carruth6f72ac42012-01-31 04:52:32 +0000671 case llvm::Triple::sparc:
672 case llvm::Triple::tce:
673 case llvm::Triple::thumb:
674 case llvm::Triple::x86:
675 case llvm::Triple::xcore:
676 return 32;
677
678 case llvm::Triple::mips64:
679 case llvm::Triple::mips64el:
Justin Holewinski49683f32012-05-04 20:18:50 +0000680 case llvm::Triple::nvptx64:
Chandler Carruth6f72ac42012-01-31 04:52:32 +0000681 case llvm::Triple::ppc64:
Chandler Carruth6f72ac42012-01-31 04:52:32 +0000682 case llvm::Triple::sparcv9:
683 case llvm::Triple::x86_64:
684 return 64;
685 }
686 llvm_unreachable("Invalid architecture value");
687}
688
689bool Triple::isArch64Bit() const {
690 return getArchPointerBitWidth(getArch()) == 64;
691}
692
693bool Triple::isArch32Bit() const {
694 return getArchPointerBitWidth(getArch()) == 32;
695}
696
697bool Triple::isArch16Bit() const {
698 return getArchPointerBitWidth(getArch()) == 16;
699}
Chandler Carruth7d5a2892012-02-06 20:46:33 +0000700
701Triple Triple::get32BitArchVariant() const {
702 Triple T(*this);
703 switch (getArch()) {
704 case Triple::UnknownArch:
Chandler Carruth7d5a2892012-02-06 20:46:33 +0000705 case Triple::msp430:
706 T.setArch(UnknownArch);
707 break;
708
709 case Triple::amdil:
Micah Villmowe53d6052012-10-01 17:01:31 +0000710 case Triple::spir:
Chandler Carruth7d5a2892012-02-06 20:46:33 +0000711 case Triple::arm:
712 case Triple::cellspu:
713 case Triple::hexagon:
714 case Triple::le32:
715 case Triple::mblaze:
716 case Triple::mips:
717 case Triple::mipsel:
Justin Holewinski49683f32012-05-04 20:18:50 +0000718 case Triple::nvptx:
Chandler Carruth7d5a2892012-02-06 20:46:33 +0000719 case Triple::ppc:
Anton Korobeynikov74156592012-03-09 10:09:36 +0000720 case Triple::r600:
Chandler Carruth7d5a2892012-02-06 20:46:33 +0000721 case Triple::sparc:
722 case Triple::tce:
723 case Triple::thumb:
724 case Triple::x86:
725 case Triple::xcore:
726 // Already 32-bit.
727 break;
728
729 case Triple::mips64: T.setArch(Triple::mips); break;
730 case Triple::mips64el: T.setArch(Triple::mipsel); break;
Justin Holewinski49683f32012-05-04 20:18:50 +0000731 case Triple::nvptx64: T.setArch(Triple::nvptx); break;
Chandler Carruth7d5a2892012-02-06 20:46:33 +0000732 case Triple::ppc64: T.setArch(Triple::ppc); break;
Chandler Carruth7d5a2892012-02-06 20:46:33 +0000733 case Triple::sparcv9: T.setArch(Triple::sparc); break;
734 case Triple::x86_64: T.setArch(Triple::x86); break;
735 }
736 return T;
737}
738
739Triple Triple::get64BitArchVariant() const {
740 Triple T(*this);
741 switch (getArch()) {
Chandler Carruth7d5a2892012-02-06 20:46:33 +0000742 case Triple::UnknownArch:
743 case Triple::amdil:
744 case Triple::arm:
745 case Triple::cellspu:
746 case Triple::hexagon:
747 case Triple::le32:
748 case Triple::mblaze:
749 case Triple::msp430:
Anton Korobeynikov74156592012-03-09 10:09:36 +0000750 case Triple::r600:
Chandler Carruth7d5a2892012-02-06 20:46:33 +0000751 case Triple::tce:
752 case Triple::thumb:
753 case Triple::xcore:
754 T.setArch(UnknownArch);
755 break;
756
Micah Villmowe53d6052012-10-01 17:01:31 +0000757 case Triple::spir:
Chandler Carruth7d5a2892012-02-06 20:46:33 +0000758 case Triple::mips64:
759 case Triple::mips64el:
Justin Holewinski49683f32012-05-04 20:18:50 +0000760 case Triple::nvptx64:
Chandler Carruth7d5a2892012-02-06 20:46:33 +0000761 case Triple::ppc64:
Chandler Carruth7d5a2892012-02-06 20:46:33 +0000762 case Triple::sparcv9:
763 case Triple::x86_64:
764 // Already 64-bit.
765 break;
766
767 case Triple::mips: T.setArch(Triple::mips64); break;
768 case Triple::mipsel: T.setArch(Triple::mips64el); break;
Justin Holewinski49683f32012-05-04 20:18:50 +0000769 case Triple::nvptx: T.setArch(Triple::nvptx64); break;
Chandler Carruth7d5a2892012-02-06 20:46:33 +0000770 case Triple::ppc: T.setArch(Triple::ppc64); break;
Chandler Carruth7d5a2892012-02-06 20:46:33 +0000771 case Triple::sparc: T.setArch(Triple::sparcv9); break;
772 case Triple::x86: T.setArch(Triple::x86_64); break;
773 }
774 return T;
775}