Daniel Dunbar | e399564 | 2009-03-10 23:50:49 +0000 | [diff] [blame] | 1 | //===--- HostInfo.cpp - Host specific information -----------------------*-===// |
| 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 "clang/Driver/HostInfo.h" |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 11 | |
| 12 | #include "clang/Driver/Arg.h" |
| 13 | #include "clang/Driver/ArgList.h" |
Daniel Dunbar | fc6a899 | 2009-03-20 18:21:51 +0000 | [diff] [blame] | 14 | #include "clang/Driver/Driver.h" |
| 15 | #include "clang/Driver/DriverDiagnostic.h" |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 16 | #include "clang/Driver/Option.h" |
| 17 | #include "clang/Driver/Options.h" |
| 18 | |
| 19 | #include "llvm/ADT/StringMap.h" |
| 20 | #include "llvm/Support/Compiler.h" |
| 21 | |
Daniel Dunbar | 83b08eb | 2009-03-17 21:38:00 +0000 | [diff] [blame] | 22 | #include "ToolChains.h" |
| 23 | |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 24 | #include <cassert> |
Daniel Dunbar | e399564 | 2009-03-10 23:50:49 +0000 | [diff] [blame] | 25 | |
| 26 | using namespace clang::driver; |
| 27 | |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 28 | HostInfo::HostInfo(const Driver &D, const llvm::Triple &_Triple) |
| 29 | : TheDriver(D), Triple(_Triple) |
Daniel Dunbar | e399564 | 2009-03-10 23:50:49 +0000 | [diff] [blame] | 30 | { |
| 31 | |
| 32 | } |
| 33 | |
| 34 | HostInfo::~HostInfo() { |
| 35 | } |
| 36 | |
Chris Lattner | aae82f1 | 2009-03-17 22:24:01 +0000 | [diff] [blame] | 37 | namespace { |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 38 | |
Daniel Dunbar | e399564 | 2009-03-10 23:50:49 +0000 | [diff] [blame] | 39 | // Darwin Host Info |
| 40 | |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 41 | /// DarwinHostInfo - Darwin host information implementation. |
| 42 | class DarwinHostInfo : public HostInfo { |
| 43 | /// Darwin version of host. |
| 44 | unsigned DarwinVersion[3]; |
| 45 | |
| 46 | /// GCC version to use on this host. |
| 47 | unsigned GCCVersion[3]; |
| 48 | |
| 49 | /// Cache of tool chains we have created. |
Daniel Dunbar | 7e4534d | 2009-03-18 01:09:40 +0000 | [diff] [blame] | 50 | mutable llvm::StringMap<ToolChain *> ToolChains; |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 51 | |
| 52 | public: |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 53 | DarwinHostInfo(const Driver &D, const llvm::Triple &Triple); |
Daniel Dunbar | 7e4534d | 2009-03-18 01:09:40 +0000 | [diff] [blame] | 54 | ~DarwinHostInfo(); |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 55 | |
| 56 | virtual bool useDriverDriver() const; |
| 57 | |
Daniel Dunbar | e33bea4 | 2009-03-20 23:39:23 +0000 | [diff] [blame] | 58 | virtual types::ID lookupTypeForExtension(const char *Ext) const { |
| 59 | types::ID Ty = types::lookupTypeForExtension(Ext); |
| 60 | |
| 61 | // Darwin always preprocesses assembly files (unless -x is used |
| 62 | // explicitly). |
| 63 | if (Ty == types::TY_PP_Asm) |
| 64 | return types::TY_Asm; |
| 65 | |
| 66 | return Ty; |
| 67 | } |
| 68 | |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 69 | virtual ToolChain *getToolChain(const ArgList &Args, |
| 70 | const char *ArchName) const; |
| 71 | }; |
| 72 | |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 73 | DarwinHostInfo::DarwinHostInfo(const Driver &D, const llvm::Triple& Triple) |
| 74 | : HostInfo(D, Triple) { |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 75 | |
| 76 | assert((getArchName() == "i386" || getArchName() == "x86_64" || |
Eli Friedman | 8ea9754 | 2009-05-28 20:57:06 +0000 | [diff] [blame] | 77 | getArchName() == "powerpc" || getArchName() == "powerpc64" || |
| 78 | getArchName() == "arm") && |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 79 | "Unknown Darwin arch."); |
Daniel Dunbar | e399564 | 2009-03-10 23:50:49 +0000 | [diff] [blame] | 80 | |
Daniel Dunbar | fc6a899 | 2009-03-20 18:21:51 +0000 | [diff] [blame] | 81 | assert(memcmp(&getOSName()[0], "darwin", 6) == 0 && |
| 82 | "Unknown Darwin platform."); |
Daniel Dunbar | d73fe9b | 2009-03-26 15:58:36 +0000 | [diff] [blame] | 83 | bool HadExtra; |
Daniel Dunbar | 10708c4 | 2009-05-23 18:55:58 +0000 | [diff] [blame] | 84 | if (!Driver::GetReleaseVersion(&getOSName()[6], |
| 85 | DarwinVersion[0], DarwinVersion[1], |
Daniel Dunbar | d73fe9b | 2009-03-26 15:58:36 +0000 | [diff] [blame] | 86 | DarwinVersion[2], HadExtra)) { |
Daniel Dunbar | fc6a899 | 2009-03-20 18:21:51 +0000 | [diff] [blame] | 87 | D.Diag(clang::diag::err_drv_invalid_darwin_version) |
Daniel Dunbar | 10708c4 | 2009-05-23 18:55:58 +0000 | [diff] [blame] | 88 | << getOSName(); |
Daniel Dunbar | fc6a899 | 2009-03-20 18:21:51 +0000 | [diff] [blame] | 89 | } |
Daniel Dunbar | e399564 | 2009-03-10 23:50:49 +0000 | [diff] [blame] | 90 | |
| 91 | // We can only call 4.2.1 for now. |
| 92 | GCCVersion[0] = 4; |
| 93 | GCCVersion[1] = 2; |
| 94 | GCCVersion[2] = 1; |
| 95 | } |
| 96 | |
Daniel Dunbar | 7e4534d | 2009-03-18 01:09:40 +0000 | [diff] [blame] | 97 | DarwinHostInfo::~DarwinHostInfo() { |
| 98 | for (llvm::StringMap<ToolChain*>::iterator |
| 99 | it = ToolChains.begin(), ie = ToolChains.end(); it != ie; ++it) |
| 100 | delete it->second; |
| 101 | } |
| 102 | |
Daniel Dunbar | e399564 | 2009-03-10 23:50:49 +0000 | [diff] [blame] | 103 | bool DarwinHostInfo::useDriverDriver() const { |
| 104 | return true; |
| 105 | } |
| 106 | |
| 107 | ToolChain *DarwinHostInfo::getToolChain(const ArgList &Args, |
| 108 | const char *ArchName) const { |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 109 | std::string Arch; |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 110 | if (!ArchName) { |
Daniel Dunbar | f2edbf3 | 2009-06-16 21:39:33 +0000 | [diff] [blame] | 111 | // If we aren't looking for a specific arch, infer the default architecture |
| 112 | // based on -arch and -m32/-m64 command line options. |
| 113 | if (Arg *A = Args.getLastArg(options::OPT_arch)) { |
| 114 | // The gcc driver behavior with multiple -arch flags wasn't consistent for |
| 115 | // things which rely on a default architecture. We just use the last -arch |
| 116 | // to find the default tool chain. |
| 117 | Arch = A->getValue(Args); |
| 118 | |
| 119 | // Normalize arch name; we shouldn't be doing this here. |
| 120 | // |
| 121 | // FIXME: This should be unnecessary once everything moves over to using |
| 122 | // the ID based Triple interface. |
| 123 | if (Arch == "ppc") |
| 124 | Arch = "powerpc"; |
Daniel Dunbar | 407899b | 2009-06-16 21:46:01 +0000 | [diff] [blame] | 125 | else if (Arch == "ppc64") |
Daniel Dunbar | f2edbf3 | 2009-06-16 21:39:33 +0000 | [diff] [blame] | 126 | Arch = "powerpc64"; |
| 127 | } else { |
| 128 | // Otherwise default to the arch of the host. |
| 129 | Arch = getArchName(); |
| 130 | } |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 131 | ArchName = Arch.c_str(); |
Daniel Dunbar | f2edbf3 | 2009-06-16 21:39:33 +0000 | [diff] [blame] | 132 | |
| 133 | // Honor -m32 and -m64 when finding the default tool chain. |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 134 | if (Arg *A = Args.getLastArg(options::OPT_m32, options::OPT_m64)) { |
Daniel Dunbar | f2edbf3 | 2009-06-16 21:39:33 +0000 | [diff] [blame] | 135 | if (Arch == "i386" || Arch == "x86_64") { |
| 136 | ArchName = (A->getOption().getId() == options::OPT_m32) ? "i386" : |
| 137 | "x86_64"; |
| 138 | } else if (Arch == "powerpc" || Arch == "powerpc64") { |
Daniel Dunbar | bf54a06 | 2009-04-01 20:33:11 +0000 | [diff] [blame] | 139 | ArchName = (A->getOption().getId() == options::OPT_m32) ? "powerpc" : |
| 140 | "powerpc64"; |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 141 | } |
| 142 | } |
Daniel Dunbar | bf54a06 | 2009-04-01 20:33:11 +0000 | [diff] [blame] | 143 | } else { |
| 144 | // Normalize arch name; we shouldn't be doing this here. |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 145 | // |
| 146 | // FIXME: This should be unnecessary once everything moves over to using the |
| 147 | // ID based Triple interface. |
Daniel Dunbar | bf54a06 | 2009-04-01 20:33:11 +0000 | [diff] [blame] | 148 | if (strcmp(ArchName, "ppc") == 0) |
| 149 | ArchName = "powerpc"; |
| 150 | else if (strcmp(ArchName, "ppc64") == 0) |
| 151 | ArchName = "powerpc64"; |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 152 | } |
| 153 | |
| 154 | ToolChain *&TC = ToolChains[ArchName]; |
| 155 | if (!TC) { |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 156 | llvm::Triple TCTriple(getTriple()); |
| 157 | TCTriple.setArchName(ArchName); |
| 158 | |
Daniel Dunbar | 83b08eb | 2009-03-17 21:38:00 +0000 | [diff] [blame] | 159 | if (strcmp(ArchName, "i386") == 0 || strcmp(ArchName, "x86_64") == 0) |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 160 | TC = new toolchains::Darwin_X86(*this, TCTriple, |
Daniel Dunbar | c50b00d | 2009-03-23 16:15:50 +0000 | [diff] [blame] | 161 | DarwinVersion, |
| 162 | GCCVersion); |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 163 | else |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 164 | TC = new toolchains::Darwin_GCC(*this, TCTriple); |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 165 | } |
| 166 | |
| 167 | return TC; |
Daniel Dunbar | e399564 | 2009-03-10 23:50:49 +0000 | [diff] [blame] | 168 | } |
| 169 | |
| 170 | // Unknown Host Info |
| 171 | |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 172 | /// UnknownHostInfo - Generic host information to use for unknown |
| 173 | /// hosts. |
| 174 | class UnknownHostInfo : public HostInfo { |
| 175 | /// Cache of tool chains we have created. |
| 176 | mutable llvm::StringMap<ToolChain*> ToolChains; |
| 177 | |
| 178 | public: |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 179 | UnknownHostInfo(const Driver &D, const llvm::Triple& Triple); |
Daniel Dunbar | 7e4534d | 2009-03-18 01:09:40 +0000 | [diff] [blame] | 180 | ~UnknownHostInfo(); |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 181 | |
| 182 | virtual bool useDriverDriver() const; |
| 183 | |
Daniel Dunbar | e33bea4 | 2009-03-20 23:39:23 +0000 | [diff] [blame] | 184 | virtual types::ID lookupTypeForExtension(const char *Ext) const { |
| 185 | return types::lookupTypeForExtension(Ext); |
| 186 | } |
| 187 | |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 188 | virtual ToolChain *getToolChain(const ArgList &Args, |
| 189 | const char *ArchName) const; |
| 190 | }; |
| 191 | |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 192 | UnknownHostInfo::UnknownHostInfo(const Driver &D, const llvm::Triple& Triple) |
| 193 | : HostInfo(D, Triple) { |
Daniel Dunbar | e399564 | 2009-03-10 23:50:49 +0000 | [diff] [blame] | 194 | } |
| 195 | |
Daniel Dunbar | 7e4534d | 2009-03-18 01:09:40 +0000 | [diff] [blame] | 196 | UnknownHostInfo::~UnknownHostInfo() { |
| 197 | for (llvm::StringMap<ToolChain*>::iterator |
| 198 | it = ToolChains.begin(), ie = ToolChains.end(); it != ie; ++it) |
| 199 | delete it->second; |
| 200 | } |
| 201 | |
Daniel Dunbar | e399564 | 2009-03-10 23:50:49 +0000 | [diff] [blame] | 202 | bool UnknownHostInfo::useDriverDriver() const { |
| 203 | return false; |
| 204 | } |
| 205 | |
| 206 | ToolChain *UnknownHostInfo::getToolChain(const ArgList &Args, |
| 207 | const char *ArchName) const { |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 208 | assert(!ArchName && |
| 209 | "Unexpected arch name on platform without driver driver support."); |
| 210 | |
| 211 | // Automatically handle some instances of -m32/-m64 we know about. |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 212 | std::string Arch = getArchName(); |
| 213 | ArchName = Arch.c_str(); |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 214 | if (Arg *A = Args.getLastArg(options::OPT_m32, options::OPT_m64)) { |
Eli Friedman | 4e2567d | 2009-06-03 18:59:56 +0000 | [diff] [blame] | 215 | if (Triple.getArch() == llvm::Triple::x86 || |
| 216 | Triple.getArch() == llvm::Triple::x86_64) { |
| 217 | ArchName = |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 218 | (A->getOption().getId() == options::OPT_m32) ? "i386" : "x86_64"; |
Eli Friedman | 4e2567d | 2009-06-03 18:59:56 +0000 | [diff] [blame] | 219 | } else if (Triple.getArch() == llvm::Triple::ppc || |
| 220 | Triple.getArch() == llvm::Triple::ppc64) { |
| 221 | ArchName = |
Daniel Dunbar | bf54a06 | 2009-04-01 20:33:11 +0000 | [diff] [blame] | 222 | (A->getOption().getId() == options::OPT_m32) ? "powerpc" : "powerpc64"; |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 223 | } |
| 224 | } |
| 225 | |
| 226 | ToolChain *&TC = ToolChains[ArchName]; |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 227 | if (!TC) { |
| 228 | llvm::Triple TCTriple(getTriple()); |
| 229 | TCTriple.setArchName(ArchName); |
| 230 | |
| 231 | TC = new toolchains::Generic_GCC(*this, TCTriple); |
| 232 | } |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 233 | |
Daniel Dunbar | b25c7c1 | 2009-03-18 01:39:08 +0000 | [diff] [blame] | 234 | return TC; |
Daniel Dunbar | e399564 | 2009-03-10 23:50:49 +0000 | [diff] [blame] | 235 | } |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 236 | |
Daniel Dunbar | f7b8eec | 2009-06-29 20:52:51 +0000 | [diff] [blame] | 237 | // OpenBSD Host Info |
| 238 | |
| 239 | /// OpenBSDHostInfo - OpenBSD host information implementation. |
| 240 | class OpenBSDHostInfo : public HostInfo { |
| 241 | /// Cache of tool chains we have created. |
| 242 | mutable llvm::StringMap<ToolChain*> ToolChains; |
| 243 | |
| 244 | public: |
| 245 | OpenBSDHostInfo(const Driver &D, const llvm::Triple& Triple) |
| 246 | : HostInfo(D, Triple) {} |
| 247 | ~OpenBSDHostInfo(); |
| 248 | |
| 249 | virtual bool useDriverDriver() const; |
| 250 | |
| 251 | virtual types::ID lookupTypeForExtension(const char *Ext) const { |
| 252 | return types::lookupTypeForExtension(Ext); |
| 253 | } |
| 254 | |
| 255 | virtual ToolChain *getToolChain(const ArgList &Args, |
| 256 | const char *ArchName) const; |
| 257 | }; |
| 258 | |
| 259 | OpenBSDHostInfo::~OpenBSDHostInfo() { |
| 260 | for (llvm::StringMap<ToolChain*>::iterator |
| 261 | it = ToolChains.begin(), ie = ToolChains.end(); it != ie; ++it) |
| 262 | delete it->second; |
| 263 | } |
| 264 | |
| 265 | bool OpenBSDHostInfo::useDriverDriver() const { |
| 266 | return false; |
| 267 | } |
| 268 | |
| 269 | ToolChain *OpenBSDHostInfo::getToolChain(const ArgList &Args, |
| 270 | const char *ArchName) const { |
| 271 | assert(!ArchName && |
| 272 | "Unexpected arch name on platform without driver driver support."); |
| 273 | |
| 274 | std::string Arch = getArchName(); |
| 275 | ArchName = Arch.c_str(); |
| 276 | |
| 277 | ToolChain *&TC = ToolChains[ArchName]; |
| 278 | if (!TC) { |
| 279 | llvm::Triple TCTriple(getTriple()); |
| 280 | TCTriple.setArchName(ArchName); |
| 281 | |
| 282 | TC = new toolchains::OpenBSD(*this, TCTriple); |
| 283 | } |
| 284 | |
| 285 | return TC; |
| 286 | } |
| 287 | |
Daniel Dunbar | 75358d2 | 2009-03-30 21:06:03 +0000 | [diff] [blame] | 288 | // FreeBSD Host Info |
| 289 | |
Daniel Dunbar | b85f59d | 2009-03-30 22:11:38 +0000 | [diff] [blame] | 290 | /// FreeBSDHostInfo - FreeBSD host information implementation. |
Daniel Dunbar | 75358d2 | 2009-03-30 21:06:03 +0000 | [diff] [blame] | 291 | class FreeBSDHostInfo : public HostInfo { |
| 292 | /// Cache of tool chains we have created. |
| 293 | mutable llvm::StringMap<ToolChain*> ToolChains; |
| 294 | |
| 295 | public: |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 296 | FreeBSDHostInfo(const Driver &D, const llvm::Triple& Triple) |
| 297 | : HostInfo(D, Triple) {} |
Daniel Dunbar | 75358d2 | 2009-03-30 21:06:03 +0000 | [diff] [blame] | 298 | ~FreeBSDHostInfo(); |
| 299 | |
| 300 | virtual bool useDriverDriver() const; |
| 301 | |
| 302 | virtual types::ID lookupTypeForExtension(const char *Ext) const { |
| 303 | return types::lookupTypeForExtension(Ext); |
| 304 | } |
| 305 | |
| 306 | virtual ToolChain *getToolChain(const ArgList &Args, |
| 307 | const char *ArchName) const; |
| 308 | }; |
| 309 | |
Daniel Dunbar | 75358d2 | 2009-03-30 21:06:03 +0000 | [diff] [blame] | 310 | FreeBSDHostInfo::~FreeBSDHostInfo() { |
| 311 | for (llvm::StringMap<ToolChain*>::iterator |
| 312 | it = ToolChains.begin(), ie = ToolChains.end(); it != ie; ++it) |
| 313 | delete it->second; |
| 314 | } |
| 315 | |
| 316 | bool FreeBSDHostInfo::useDriverDriver() const { |
| 317 | return false; |
| 318 | } |
| 319 | |
| 320 | ToolChain *FreeBSDHostInfo::getToolChain(const ArgList &Args, |
| 321 | const char *ArchName) const { |
| 322 | bool Lib32 = false; |
| 323 | |
| 324 | assert(!ArchName && |
| 325 | "Unexpected arch name on platform without driver driver support."); |
| 326 | |
| 327 | // On x86_64 we need to be able to compile 32-bits binaries as well. |
| 328 | // Compiling 64-bit binaries on i386 is not supported. We don't have a |
| 329 | // lib64. |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 330 | std::string Arch = getArchName(); |
| 331 | ArchName = Arch.c_str(); |
Daniel Dunbar | 75358d2 | 2009-03-30 21:06:03 +0000 | [diff] [blame] | 332 | if (Args.hasArg(options::OPT_m32) && getArchName() == "x86_64") { |
| 333 | ArchName = "i386"; |
| 334 | Lib32 = true; |
| 335 | } |
| 336 | |
| 337 | ToolChain *&TC = ToolChains[ArchName]; |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 338 | if (!TC) { |
| 339 | llvm::Triple TCTriple(getTriple()); |
| 340 | TCTriple.setArchName(ArchName); |
| 341 | |
| 342 | TC = new toolchains::FreeBSD(*this, TCTriple, Lib32); |
| 343 | } |
Daniel Dunbar | 75358d2 | 2009-03-30 21:06:03 +0000 | [diff] [blame] | 344 | |
| 345 | return TC; |
| 346 | } |
| 347 | |
Daniel Dunbar | 11e1b40 | 2009-05-02 18:28:39 +0000 | [diff] [blame] | 348 | // DragonFly Host Info |
| 349 | |
| 350 | /// DragonFlyHostInfo - DragonFly host information implementation. |
| 351 | class DragonFlyHostInfo : public HostInfo { |
| 352 | /// Cache of tool chains we have created. |
| 353 | mutable llvm::StringMap<ToolChain*> ToolChains; |
| 354 | |
| 355 | public: |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 356 | DragonFlyHostInfo(const Driver &D, const llvm::Triple& Triple) |
| 357 | : HostInfo(D, Triple) {} |
Daniel Dunbar | 11e1b40 | 2009-05-02 18:28:39 +0000 | [diff] [blame] | 358 | ~DragonFlyHostInfo(); |
| 359 | |
| 360 | virtual bool useDriverDriver() const; |
| 361 | |
| 362 | virtual types::ID lookupTypeForExtension(const char *Ext) const { |
| 363 | return types::lookupTypeForExtension(Ext); |
| 364 | } |
| 365 | |
| 366 | virtual ToolChain *getToolChain(const ArgList &Args, |
| 367 | const char *ArchName) const; |
| 368 | }; |
| 369 | |
Daniel Dunbar | 11e1b40 | 2009-05-02 18:28:39 +0000 | [diff] [blame] | 370 | DragonFlyHostInfo::~DragonFlyHostInfo() { |
| 371 | for (llvm::StringMap<ToolChain*>::iterator |
| 372 | it = ToolChains.begin(), ie = ToolChains.end(); it != ie; ++it) |
| 373 | delete it->second; |
| 374 | } |
| 375 | |
| 376 | bool DragonFlyHostInfo::useDriverDriver() const { |
| 377 | return false; |
| 378 | } |
| 379 | |
| 380 | ToolChain *DragonFlyHostInfo::getToolChain(const ArgList &Args, |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 381 | const char *ArchName) const { |
Daniel Dunbar | 11e1b40 | 2009-05-02 18:28:39 +0000 | [diff] [blame] | 382 | assert(!ArchName && |
| 383 | "Unexpected arch name on platform without driver driver support."); |
| 384 | |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 385 | ToolChain *&TC = ToolChains[getArchName()]; |
Daniel Dunbar | 11e1b40 | 2009-05-02 18:28:39 +0000 | [diff] [blame] | 386 | |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 387 | if (!TC) { |
| 388 | llvm::Triple TCTriple(getTriple()); |
| 389 | TCTriple.setArchName(getArchName()); |
Daniel Dunbar | 11e1b40 | 2009-05-02 18:28:39 +0000 | [diff] [blame] | 390 | |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 391 | TC = new toolchains::DragonFly(*this, TCTriple); |
| 392 | } |
Daniel Dunbar | 11e1b40 | 2009-05-02 18:28:39 +0000 | [diff] [blame] | 393 | |
Daniel Dunbar | 11e1b40 | 2009-05-02 18:28:39 +0000 | [diff] [blame] | 394 | return TC; |
| 395 | } |
| 396 | |
Eli Friedman | 6b3454a | 2009-05-26 07:52:18 +0000 | [diff] [blame] | 397 | // Linux Host Info |
| 398 | |
| 399 | /// LinuxHostInfo - Linux host information implementation. |
| 400 | class LinuxHostInfo : public HostInfo { |
| 401 | /// Cache of tool chains we have created. |
| 402 | mutable llvm::StringMap<ToolChain*> ToolChains; |
| 403 | |
| 404 | public: |
| 405 | LinuxHostInfo(const Driver &D, const llvm::Triple& Triple) |
| 406 | : HostInfo(D, Triple) {} |
| 407 | ~LinuxHostInfo(); |
| 408 | |
| 409 | virtual bool useDriverDriver() const; |
| 410 | |
| 411 | virtual types::ID lookupTypeForExtension(const char *Ext) const { |
| 412 | return types::lookupTypeForExtension(Ext); |
| 413 | } |
| 414 | |
| 415 | virtual ToolChain *getToolChain(const ArgList &Args, |
| 416 | const char *ArchName) const; |
| 417 | }; |
| 418 | |
| 419 | LinuxHostInfo::~LinuxHostInfo() { |
| 420 | for (llvm::StringMap<ToolChain*>::iterator |
| 421 | it = ToolChains.begin(), ie = ToolChains.end(); it != ie; ++it) |
| 422 | delete it->second; |
| 423 | } |
| 424 | |
| 425 | bool LinuxHostInfo::useDriverDriver() const { |
| 426 | return false; |
| 427 | } |
| 428 | |
| 429 | ToolChain *LinuxHostInfo::getToolChain(const ArgList &Args, |
| 430 | const char *ArchName) const { |
| 431 | |
| 432 | assert(!ArchName && |
| 433 | "Unexpected arch name on platform without driver driver support."); |
| 434 | |
Eli Friedman | 4e2567d | 2009-06-03 18:59:56 +0000 | [diff] [blame] | 435 | // Automatically handle some instances of -m32/-m64 we know about. |
| 436 | std::string Arch = getArchName(); |
| 437 | ArchName = Arch.c_str(); |
| 438 | if (Arg *A = Args.getLastArg(options::OPT_m32, options::OPT_m64)) { |
| 439 | if (Triple.getArch() == llvm::Triple::x86 || |
| 440 | Triple.getArch() == llvm::Triple::x86_64) { |
| 441 | ArchName = |
| 442 | (A->getOption().getId() == options::OPT_m32) ? "i386" : "x86_64"; |
| 443 | } else if (Triple.getArch() == llvm::Triple::ppc || |
| 444 | Triple.getArch() == llvm::Triple::ppc64) { |
| 445 | ArchName = |
| 446 | (A->getOption().getId() == options::OPT_m32) ? "powerpc" : "powerpc64"; |
| 447 | } |
| 448 | } |
| 449 | |
Eli Friedman | 6b3454a | 2009-05-26 07:52:18 +0000 | [diff] [blame] | 450 | ToolChain *&TC = ToolChains[ArchName]; |
| 451 | |
| 452 | if (!TC) { |
| 453 | llvm::Triple TCTriple(getTriple()); |
Eli Friedman | 4e2567d | 2009-06-03 18:59:56 +0000 | [diff] [blame] | 454 | TCTriple.setArchName(ArchName); |
Eli Friedman | 6b3454a | 2009-05-26 07:52:18 +0000 | [diff] [blame] | 455 | |
| 456 | TC = new toolchains::Linux(*this, TCTriple); |
| 457 | } |
| 458 | |
| 459 | return TC; |
| 460 | } |
| 461 | |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 462 | } |
| 463 | |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 464 | const HostInfo * |
| 465 | clang::driver::createDarwinHostInfo(const Driver &D, |
| 466 | const llvm::Triple& Triple){ |
| 467 | return new DarwinHostInfo(D, Triple); |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 468 | } |
| 469 | |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 470 | const HostInfo * |
Daniel Dunbar | f7b8eec | 2009-06-29 20:52:51 +0000 | [diff] [blame] | 471 | clang::driver::createOpenBSDHostInfo(const Driver &D, |
| 472 | const llvm::Triple& Triple) { |
| 473 | return new OpenBSDHostInfo(D, Triple); |
| 474 | } |
| 475 | |
| 476 | const HostInfo * |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 477 | clang::driver::createFreeBSDHostInfo(const Driver &D, |
| 478 | const llvm::Triple& Triple) { |
| 479 | return new FreeBSDHostInfo(D, Triple); |
Daniel Dunbar | 75358d2 | 2009-03-30 21:06:03 +0000 | [diff] [blame] | 480 | } |
| 481 | |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 482 | const HostInfo * |
| 483 | clang::driver::createDragonFlyHostInfo(const Driver &D, |
| 484 | const llvm::Triple& Triple) { |
| 485 | return new DragonFlyHostInfo(D, Triple); |
Daniel Dunbar | 11e1b40 | 2009-05-02 18:28:39 +0000 | [diff] [blame] | 486 | } |
| 487 | |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 488 | const HostInfo * |
Eli Friedman | 6b3454a | 2009-05-26 07:52:18 +0000 | [diff] [blame] | 489 | clang::driver::createLinuxHostInfo(const Driver &D, |
| 490 | const llvm::Triple& Triple) { |
| 491 | return new LinuxHostInfo(D, Triple); |
| 492 | } |
| 493 | |
| 494 | const HostInfo * |
Daniel Dunbar | cb8ab23 | 2009-05-22 02:53:45 +0000 | [diff] [blame] | 495 | clang::driver::createUnknownHostInfo(const Driver &D, |
| 496 | const llvm::Triple& Triple) { |
| 497 | return new UnknownHostInfo(D, Triple); |
Daniel Dunbar | 1fd6c4b | 2009-03-17 19:00:50 +0000 | [diff] [blame] | 498 | } |