blob: d29a0997ef1fb4ef37381abaecbba1395c8f5ce3 [file] [log] [blame]
Nick Lewyckye47c2452010-09-23 23:48:20 +00001//===--- Driver.cpp - Clang GCC Compatible Driver -------------------------===//
Daniel Dunbar544ecd12009-03-02 19:59:07 +00002//
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
Daniel Dunbar544ecd12009-03-02 19:59:07 +000010#include "clang/Driver/Driver.h"
Daniel Dunbar544ecd12009-03-02 19:59:07 +000011
Daniel Dunbar1688f1a2009-03-12 07:58:46 +000012#include "clang/Driver/Action.h"
Daniel Dunbarb2cd66b2009-03-04 20:49:20 +000013#include "clang/Driver/Arg.h"
14#include "clang/Driver/ArgList.h"
15#include "clang/Driver/Compilation.h"
Daniel Dunbarc0b3e952009-03-12 08:55:43 +000016#include "clang/Driver/DriverDiagnostic.h"
Daniel Dunbar4dff6a42009-03-10 23:41:59 +000017#include "clang/Driver/HostInfo.h"
Daniel Dunbare75d8342009-03-16 06:56:51 +000018#include "clang/Driver/Job.h"
Daniel Dunbaraa767372009-11-19 00:15:11 +000019#include "clang/Driver/OptTable.h"
Daniel Dunbard02cb1d2009-03-05 06:38:47 +000020#include "clang/Driver/Option.h"
Daniel Dunbarb2cd66b2009-03-04 20:49:20 +000021#include "clang/Driver/Options.h"
Daniel Dunbare75d8342009-03-16 06:56:51 +000022#include "clang/Driver/Tool.h"
23#include "clang/Driver/ToolChain.h"
Daniel Dunbar1688f1a2009-03-12 07:58:46 +000024#include "clang/Driver/Types.h"
Daniel Dunbard02cb1d2009-03-05 06:38:47 +000025
Douglas Gregor7b71e632009-04-27 22:23:34 +000026#include "clang/Basic/Version.h"
27
Daniel Dunbar628fcf42010-08-12 00:05:12 +000028#include "llvm/Config/config.h"
Daniel Dunbare5dc4822009-03-13 20:33:35 +000029#include "llvm/ADT/StringSet.h"
Ted Kremenekbb1110a2010-01-19 01:29:05 +000030#include "llvm/ADT/OwningPtr.h"
Daniel Dunbar2608c542009-03-18 01:38:48 +000031#include "llvm/Support/PrettyStackTrace.h"
Daniel Dunbard02cb1d2009-03-05 06:38:47 +000032#include "llvm/Support/raw_ostream.h"
Michael J. Spencerf28df4c2010-12-17 21:22:22 +000033#include "llvm/Support/FileSystem.h"
Michael J. Spencer8aaf4992010-11-29 18:12:39 +000034#include "llvm/Support/Path.h"
35#include "llvm/Support/Program.h"
Daniel Dunbaraaf1ea62009-03-13 12:19:02 +000036
Daniel Dunbare75d8342009-03-16 06:56:51 +000037#include "InputInfo.h"
38
Daniel Dunbaraaf1ea62009-03-13 12:19:02 +000039#include <map>
40
NAKAMURA Takumi89acd1e2010-10-11 02:28:42 +000041#ifdef __CYGWIN__
42#include <cygwin/version.h>
43#if defined(CYGWIN_VERSION_DLL_MAJOR) && CYGWIN_VERSION_DLL_MAJOR<1007
44#define IS_CYGWIN15 1
45#endif
46#endif
47
Daniel Dunbarb2cd66b2009-03-04 20:49:20 +000048using namespace clang::driver;
Chris Lattnerada1c912009-03-26 05:56:24 +000049using namespace clang;
Daniel Dunbarb2cd66b2009-03-04 20:49:20 +000050
Daniel Dunbare38764c2010-07-19 00:44:04 +000051Driver::Driver(llvm::StringRef _ClangExecutable,
Jeffrey Yasskin567ae472009-12-08 01:46:24 +000052 llvm::StringRef _DefaultHostTriple,
53 llvm::StringRef _DefaultImageName,
Daniel Dunbare43887b2010-04-01 18:21:41 +000054 bool IsProduction, bool CXXIsProduction,
55 Diagnostic &_Diags)
Daniel Dunbar26228a02009-11-18 20:19:36 +000056 : Opts(createDriverOptTable()), Diags(_Diags),
Daniel Dunbare38764c2010-07-19 00:44:04 +000057 ClangExecutable(_ClangExecutable), DefaultHostTriple(_DefaultHostTriple),
Daniel Dunbare75d8342009-03-16 06:56:51 +000058 DefaultImageName(_DefaultImageName),
Daniel Dunbar3babf5d2010-02-25 03:31:53 +000059 DriverTitle("clang \"gcc-compatible\" driver"),
Daniel Dunbar4dff6a42009-03-10 23:41:59 +000060 Host(0),
Rafael Espindolab2d0d402010-09-06 02:36:23 +000061 CCPrintOptionsFilename(0), CCCIsCXX(false),
62 CCCEcho(false), CCCPrintBindings(false), CCPrintOptions(false), CCCGenericGCCName("gcc"),
Daniel Dunbar6a8efa82010-03-20 08:01:59 +000063 CheckInputsExist(true), CCCUseClang(true), CCCUseClangCXX(true),
64 CCCUseClangCPP(true), CCCUsePCH(true), SuppressMissingInputWarning(false) {
Daniel Dunbar5564ba72009-09-22 22:31:13 +000065 if (IsProduction) {
66 // In a "production" build, only use clang on architectures we expect to
67 // work, and don't use clang C++.
68 //
69 // During development its more convenient to always have the driver use
70 // clang, but we don't want users to be confused when things don't work, or
71 // to file bugs for things we don't support.
72 CCCClangArchs.insert(llvm::Triple::x86);
73 CCCClangArchs.insert(llvm::Triple::x86_64);
74 CCCClangArchs.insert(llvm::Triple::arm);
75
Daniel Dunbare43887b2010-04-01 18:21:41 +000076 if (!CXXIsProduction)
77 CCCUseClangCXX = false;
Daniel Dunbar5564ba72009-09-22 22:31:13 +000078 }
Daniel Dunbar3f3e2cd2010-01-20 02:35:16 +000079
Daniel Dunbare38764c2010-07-19 00:44:04 +000080 llvm::sys::Path Executable(ClangExecutable);
81 Name = Executable.getBasename();
82 Dir = Executable.getDirname();
83
Daniel Dunbar3f3e2cd2010-01-20 02:35:16 +000084 // Compute the path to the resource directory.
Chandler Carruth06067c52010-10-19 08:47:51 +000085 llvm::StringRef ClangResourceDir(CLANG_RESOURCE_DIR);
Daniel Dunbar3f3e2cd2010-01-20 02:35:16 +000086 llvm::sys::Path P(Dir);
Chandler Carruth06067c52010-10-19 08:47:51 +000087 if (ClangResourceDir != "") {
88 P.appendComponent(ClangResourceDir);
89 } else {
90 P.appendComponent(".."); // Walk up from a 'bin' subdirectory.
91 P.appendComponent("lib");
92 P.appendComponent("clang");
93 P.appendComponent(CLANG_VERSION_STRING);
94 }
Daniel Dunbar3f3e2cd2010-01-20 02:35:16 +000095 ResourceDir = P.str();
Daniel Dunbar544ecd12009-03-02 19:59:07 +000096}
97
98Driver::~Driver() {
Daniel Dunbarb2cd66b2009-03-04 20:49:20 +000099 delete Opts;
Daniel Dunbar01601722009-03-18 01:09:40 +0000100 delete Host;
Daniel Dunbar544ecd12009-03-02 19:59:07 +0000101}
102
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000103InputArgList *Driver::ParseArgStrings(const char **ArgBegin,
Daniel Dunbardac54a82009-03-25 04:13:45 +0000104 const char **ArgEnd) {
Daniel Dunbar2608c542009-03-18 01:38:48 +0000105 llvm::PrettyStackTraceString CrashInfo("Command line argument parsing");
Daniel Dunbar52ed5fe2009-11-19 06:35:06 +0000106 unsigned MissingArgIndex, MissingArgCount;
107 InputArgList *Args = getOpts().ParseArgs(ArgBegin, ArgEnd,
108 MissingArgIndex, MissingArgCount);
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000109
Daniel Dunbar52ed5fe2009-11-19 06:35:06 +0000110 // Check for missing argument error.
111 if (MissingArgCount)
112 Diag(clang::diag::err_drv_missing_argument)
113 << Args->getArgString(MissingArgIndex) << MissingArgCount;
Daniel Dunbar65229332009-03-13 11:38:42 +0000114
Daniel Dunbar52ed5fe2009-11-19 06:35:06 +0000115 // Check for unsupported options.
116 for (ArgList::const_iterator it = Args->begin(), ie = Args->end();
117 it != ie; ++it) {
118 Arg *A = *it;
Daniel Dunbard8500f32009-03-22 23:26:43 +0000119 if (A->getOption().isUnsupported()) {
120 Diag(clang::diag::err_drv_unsupported_opt) << A->getAsString(*Args);
121 continue;
122 }
Daniel Dunbard02cb1d2009-03-05 06:38:47 +0000123 }
124
125 return Args;
126}
127
Daniel Dunbar775d4062010-06-11 22:00:26 +0000128DerivedArgList *Driver::TranslateInputArgs(const InputArgList &Args) const {
129 DerivedArgList *DAL = new DerivedArgList(Args);
130
Daniel Dunbar2cc3f172010-09-17 00:45:02 +0000131 bool HasNostdlib = Args.hasArg(options::OPT_nostdlib);
Daniel Dunbar775d4062010-06-11 22:00:26 +0000132 for (ArgList::const_iterator it = Args.begin(),
Daniel Dunbarfb3d7472010-06-14 21:23:12 +0000133 ie = Args.end(); it != ie; ++it) {
134 const Arg *A = *it;
135
136 // Unfortunately, we have to parse some forwarding options (-Xassembler,
137 // -Xlinker, -Xpreprocessor) because we either integrate their functionality
138 // (assembler and preprocessor), or bypass a previous driver ('collect2').
Daniel Dunbar5a9d1832010-06-14 21:37:09 +0000139
140 // Rewrite linker options, to replace --no-demangle with a custom internal
141 // option.
142 if ((A->getOption().matches(options::OPT_Wl_COMMA) ||
143 A->getOption().matches(options::OPT_Xlinker)) &&
144 A->containsValue("--no-demangle")) {
Daniel Dunbarfb3d7472010-06-14 21:23:12 +0000145 // Add the rewritten no-demangle argument.
146 DAL->AddFlagArg(A, Opts->getOption(options::OPT_Z_Xlinker__no_demangle));
147
148 // Add the remaining values as Xlinker arguments.
149 for (unsigned i = 0, e = A->getNumValues(); i != e; ++i)
150 if (llvm::StringRef(A->getValue(Args, i)) != "--no-demangle")
151 DAL->AddSeparateArg(A, Opts->getOption(options::OPT_Xlinker),
152 A->getValue(Args, i));
153
154 continue;
155 }
156
Daniel Dunbar5a9d1832010-06-14 21:37:09 +0000157 // Rewrite preprocessor options, to replace -Wp,-MD,FOO which is used by
158 // some build systems. We don't try to be complete here because we don't
159 // care to encourage this usage model.
160 if (A->getOption().matches(options::OPT_Wp_COMMA) &&
161 A->getNumValues() == 2 &&
Daniel Dunbar3648ba72010-06-15 20:30:18 +0000162 (A->getValue(Args, 0) == llvm::StringRef("-MD") ||
163 A->getValue(Args, 0) == llvm::StringRef("-MMD"))) {
164 // Rewrite to -MD/-MMD along with -MF.
165 if (A->getValue(Args, 0) == llvm::StringRef("-MD"))
166 DAL->AddFlagArg(A, Opts->getOption(options::OPT_MD));
167 else
168 DAL->AddFlagArg(A, Opts->getOption(options::OPT_MMD));
Daniel Dunbar5a9d1832010-06-14 21:37:09 +0000169 DAL->AddSeparateArg(A, Opts->getOption(options::OPT_MF),
170 A->getValue(Args, 1));
171 continue;
172 }
173
Shantonu Senafeb03b2010-09-17 18:39:08 +0000174 // Rewrite reserved library names.
175 if (A->getOption().matches(options::OPT_l)) {
Daniel Dunbar2cc3f172010-09-17 00:45:02 +0000176 llvm::StringRef Value = A->getValue(Args);
177
Shantonu Senafeb03b2010-09-17 18:39:08 +0000178 // Rewrite unless -nostdlib is present.
179 if (!HasNostdlib && Value == "stdc++") {
Daniel Dunbar2cc3f172010-09-17 00:45:02 +0000180 DAL->AddFlagArg(A, Opts->getOption(
181 options::OPT_Z_reserved_lib_stdcxx));
182 continue;
183 }
Shantonu Senafeb03b2010-09-17 18:39:08 +0000184
185 // Rewrite unconditionally.
186 if (Value == "cc_kext") {
187 DAL->AddFlagArg(A, Opts->getOption(
188 options::OPT_Z_reserved_lib_cckext));
189 continue;
190 }
Daniel Dunbar2cc3f172010-09-17 00:45:02 +0000191 }
192
Daniel Dunbar775d4062010-06-11 22:00:26 +0000193 DAL->append(*it);
Daniel Dunbarfb3d7472010-06-14 21:23:12 +0000194 }
Daniel Dunbar775d4062010-06-11 22:00:26 +0000195
Daniel Dunbar628fcf42010-08-12 00:05:12 +0000196 // Add a default value of -mlinker-version=, if one was given and the user
197 // didn't specify one.
198#if defined(HOST_LINK_VERSION)
199 if (!Args.hasArg(options::OPT_mlinker_version_EQ)) {
200 DAL->AddJoinedArg(0, Opts->getOption(options::OPT_mlinker_version_EQ),
201 HOST_LINK_VERSION);
Daniel Dunbarb613ffc2010-08-17 22:32:45 +0000202 DAL->getLastArg(options::OPT_mlinker_version_EQ)->claim();
Daniel Dunbar628fcf42010-08-12 00:05:12 +0000203 }
204#endif
205
Daniel Dunbar775d4062010-06-11 22:00:26 +0000206 return DAL;
207}
208
Daniel Dunbar544ecd12009-03-02 19:59:07 +0000209Compilation *Driver::BuildCompilation(int argc, const char **argv) {
Daniel Dunbar2608c542009-03-18 01:38:48 +0000210 llvm::PrettyStackTraceString CrashInfo("Compilation construction");
211
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000212 // FIXME: Handle environment options which effect driver behavior, somewhere
213 // (client?). GCC_EXEC_PREFIX, COMPILER_PATH, LIBRARY_PATH, LPATH,
214 // CC_PRINT_OPTIONS.
Daniel Dunbar5e0f6af2009-03-13 00:51:18 +0000215
216 // FIXME: What are we going to do with -V and -b?
217
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000218 // FIXME: This stuff needs to go into the Compilation, not the driver.
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000219 bool CCCPrintOptions = false, CCCPrintActions = false;
Daniel Dunbard02cb1d2009-03-05 06:38:47 +0000220
Daniel Dunbaree66cf22009-03-10 20:52:46 +0000221 const char **Start = argv + 1, **End = argv + argc;
222
Daniel Dunbaracd69572009-12-04 21:55:23 +0000223 InputArgList *Args = ParseArgStrings(Start, End);
224
Rafael Espindola59ae7992009-12-07 18:28:29 +0000225 // -no-canonical-prefixes is used very early in main.
226 Args->ClaimAllArgs(options::OPT_no_canonical_prefixes);
227
Daniel Dunbar926f81f2010-08-02 02:38:03 +0000228 // Ignore -pipe.
229 Args->ClaimAllArgs(options::OPT_pipe);
230
Daniel Dunbaracd69572009-12-04 21:55:23 +0000231 // Extract -ccc args.
Daniel Dunbaree66cf22009-03-10 20:52:46 +0000232 //
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000233 // FIXME: We need to figure out where this behavior should live. Most of it
234 // should be outside in the client; the parts that aren't should have proper
235 // options, either by introducing new ones or by overloading gcc ones like -V
236 // or -b.
Daniel Dunbaracd69572009-12-04 21:55:23 +0000237 CCCPrintOptions = Args->hasArg(options::OPT_ccc_print_options);
238 CCCPrintActions = Args->hasArg(options::OPT_ccc_print_phases);
239 CCCPrintBindings = Args->hasArg(options::OPT_ccc_print_bindings);
Daniel Dunbar1b52d8c2009-12-05 00:13:59 +0000240 CCCIsCXX = Args->hasArg(options::OPT_ccc_cxx) || CCCIsCXX;
NAKAMURA Takumi89acd1e2010-10-11 02:28:42 +0000241 if (CCCIsCXX) {
242#ifdef IS_CYGWIN15
243 CCCGenericGCCName = "g++-4";
244#else
Rafael Espindolab2d0d402010-09-06 02:36:23 +0000245 CCCGenericGCCName = "g++";
NAKAMURA Takumi89acd1e2010-10-11 02:28:42 +0000246#endif
247 }
Daniel Dunbaracd69572009-12-04 21:55:23 +0000248 CCCEcho = Args->hasArg(options::OPT_ccc_echo);
249 if (const Arg *A = Args->getLastArg(options::OPT_ccc_gcc_name))
250 CCCGenericGCCName = A->getValue(*Args);
251 CCCUseClangCXX = Args->hasFlag(options::OPT_ccc_clang_cxx,
Daniel Dunbar1b52d8c2009-12-05 00:13:59 +0000252 options::OPT_ccc_no_clang_cxx,
253 CCCUseClangCXX);
Daniel Dunbaracd69572009-12-04 21:55:23 +0000254 CCCUsePCH = Args->hasFlag(options::OPT_ccc_pch_is_pch,
255 options::OPT_ccc_pch_is_pth);
256 CCCUseClang = !Args->hasArg(options::OPT_ccc_no_clang);
257 CCCUseClangCPP = !Args->hasArg(options::OPT_ccc_no_clang_cpp);
258 if (const Arg *A = Args->getLastArg(options::OPT_ccc_clang_archs)) {
259 llvm::StringRef Cur = A->getValue(*Args);
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000260
Daniel Dunbaracd69572009-12-04 21:55:23 +0000261 CCCClangArchs.clear();
262 while (!Cur.empty()) {
263 std::pair<llvm::StringRef, llvm::StringRef> Split = Cur.split(',');
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000264
Daniel Dunbaracd69572009-12-04 21:55:23 +0000265 if (!Split.first.empty()) {
266 llvm::Triple::ArchType Arch =
267 llvm::Triple(Split.first, "", "").getArch();
Daniel Dunbar7803c952009-04-01 23:34:41 +0000268
Daniel Dunbar84f22f92010-02-11 03:16:07 +0000269 if (Arch == llvm::Triple::UnknownArch)
270 Diag(clang::diag::err_drv_invalid_arch_name) << Split.first;
Daniel Dunbaree66cf22009-03-10 20:52:46 +0000271
Daniel Dunbaracd69572009-12-04 21:55:23 +0000272 CCCClangArchs.insert(Arch);
Daniel Dunbar953b8d12009-09-08 23:36:55 +0000273 }
Daniel Dunbaree66cf22009-03-10 20:52:46 +0000274
Daniel Dunbaracd69572009-12-04 21:55:23 +0000275 Cur = Split.second;
Daniel Dunbaree66cf22009-03-10 20:52:46 +0000276 }
277 }
Daniel Dunbara73a9842010-08-02 05:44:04 +0000278 // FIXME: We shouldn't overwrite the default host triple here, but we have
279 // nowhere else to put this currently.
Daniel Dunbaracd69572009-12-04 21:55:23 +0000280 if (const Arg *A = Args->getLastArg(options::OPT_ccc_host_triple))
Daniel Dunbara73a9842010-08-02 05:44:04 +0000281 DefaultHostTriple = A->getValue(*Args);
Daniel Dunbaracd69572009-12-04 21:55:23 +0000282 if (const Arg *A = Args->getLastArg(options::OPT_ccc_install_dir))
Daniel Dunbar5d3b70a2010-08-23 20:58:50 +0000283 Dir = InstalledDir = A->getValue(*Args);
Chandler Carruth84559242010-03-22 01:52:07 +0000284 if (const Arg *A = Args->getLastArg(options::OPT_B))
285 PrefixDir = A->getValue(*Args);
Daniel Dunbaree66cf22009-03-10 20:52:46 +0000286
Daniel Dunbara73a9842010-08-02 05:44:04 +0000287 Host = GetHostInfo(DefaultHostTriple.c_str());
Daniel Dunbar5e0f6af2009-03-13 00:51:18 +0000288
Daniel Dunbar775d4062010-06-11 22:00:26 +0000289 // Perform the default argument translations.
290 DerivedArgList *TranslatedArgs = TranslateInputArgs(*Args);
291
Daniel Dunbar3ce436d2009-03-16 06:42:30 +0000292 // The compilation takes ownership of Args.
Daniel Dunbar775d4062010-06-11 22:00:26 +0000293 Compilation *C = new Compilation(*this, *Host->CreateToolChain(*Args), Args,
294 TranslatedArgs);
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000295
296 // FIXME: This behavior shouldn't be here.
297 if (CCCPrintOptions) {
Daniel Dunbaraf8decb2010-06-11 22:43:38 +0000298 PrintOptions(C->getInputArgs());
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000299 return C;
300 }
301
302 if (!HandleImmediateArgs(*C))
303 return C;
304
Daniel Dunbara36c2b32010-08-02 05:43:51 +0000305 // Construct the list of abstract actions to perform for this compilation.
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000306 if (Host->useDriverDriver())
Daniel Dunbara36c2b32010-08-02 05:43:51 +0000307 BuildUniversalActions(C->getDefaultToolChain(), C->getArgs(),
308 C->getActions());
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000309 else
Daniel Dunbara36c2b32010-08-02 05:43:51 +0000310 BuildActions(C->getDefaultToolChain(), C->getArgs(), C->getActions());
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000311
312 if (CCCPrintActions) {
Daniel Dunbareb843be2009-03-18 03:13:20 +0000313 PrintActions(*C);
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000314 return C;
315 }
316
317 BuildJobs(*C);
Daniel Dunbaradc91e62009-03-15 01:38:15 +0000318
319 return C;
Daniel Dunbaree66cf22009-03-10 20:52:46 +0000320}
321
Daniel Dunbar38bfda62009-07-01 20:03:04 +0000322int Driver::ExecuteCompilation(const Compilation &C) const {
323 // Just print if -### was present.
324 if (C.getArgs().hasArg(options::OPT__HASH_HASH_HASH)) {
325 C.PrintJob(llvm::errs(), C.getJobs(), "\n", true);
326 return 0;
327 }
328
329 // If there were errors building the compilation, quit now.
Argyrios Kyrtzidis31448a42010-11-18 21:47:07 +0000330 if (getDiags().hasErrorOccurred())
Daniel Dunbar38bfda62009-07-01 20:03:04 +0000331 return 1;
332
333 const Command *FailingCommand = 0;
334 int Res = C.ExecuteJob(C.getJobs(), FailingCommand);
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000335
Daniel Dunbar38bfda62009-07-01 20:03:04 +0000336 // Remove temp files.
337 C.CleanupFileList(C.getTempFiles());
338
Daniel Dunbar07494792010-05-22 00:37:20 +0000339 // If the command succeeded, we are done.
340 if (Res == 0)
341 return Res;
342
343 // Otherwise, remove result files as well.
344 if (!C.getArgs().hasArg(options::OPT_save_temps))
Daniel Dunbar38bfda62009-07-01 20:03:04 +0000345 C.CleanupFileList(C.getResultFiles(), true);
346
347 // Print extra information about abnormal failures, if possible.
Daniel Dunbar07494792010-05-22 00:37:20 +0000348 //
349 // This is ad-hoc, but we don't want to be excessively noisy. If the result
350 // status was 1, assume the command failed normally. In particular, if it was
351 // the compiler then assume it gave a reasonable error code. Failures in other
352 // tools are less common, and they generally have worse diagnostics, so always
353 // print the diagnostic there.
354 const Tool &FailingTool = FailingCommand->getCreator();
Daniel Dunbar38bfda62009-07-01 20:03:04 +0000355
Daniel Dunbar07494792010-05-22 00:37:20 +0000356 if (!FailingCommand->getCreator().hasGoodDiagnostics() || Res != 1) {
357 // FIXME: See FIXME above regarding result code interpretation.
358 if (Res < 0)
359 Diag(clang::diag::err_drv_command_signalled)
360 << FailingTool.getShortName() << -Res;
361 else
362 Diag(clang::diag::err_drv_command_failed)
363 << FailingTool.getShortName() << Res;
Daniel Dunbar38bfda62009-07-01 20:03:04 +0000364 }
365
366 return Res;
367}
368
Daniel Dunbar446f6842009-03-12 18:24:49 +0000369void Driver::PrintOptions(const ArgList &Args) const {
Daniel Dunbard02cb1d2009-03-05 06:38:47 +0000370 unsigned i = 0;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000371 for (ArgList::const_iterator it = Args.begin(), ie = Args.end();
Daniel Dunbard02cb1d2009-03-05 06:38:47 +0000372 it != ie; ++it, ++i) {
373 Arg *A = *it;
374 llvm::errs() << "Option " << i << " - "
375 << "Name: \"" << A->getOption().getName() << "\", "
376 << "Values: {";
377 for (unsigned j = 0; j < A->getNumValues(); ++j) {
378 if (j)
379 llvm::errs() << ", ";
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000380 llvm::errs() << '"' << A->getValue(Args, j) << '"';
Daniel Dunbard02cb1d2009-03-05 06:38:47 +0000381 }
382 llvm::errs() << "}\n";
Daniel Dunbard02cb1d2009-03-05 06:38:47 +0000383 }
Daniel Dunbar544ecd12009-03-02 19:59:07 +0000384}
Daniel Dunbar4dff6a42009-03-10 23:41:59 +0000385
Daniel Dunbara7b5e212009-04-15 16:34:29 +0000386void Driver::PrintHelp(bool ShowHidden) const {
Daniel Dunbar3babf5d2010-02-25 03:31:53 +0000387 getOpts().PrintHelp(llvm::outs(), Name.c_str(), DriverTitle.c_str(),
388 ShowHidden);
Daniel Dunbar7c925282009-03-31 21:38:17 +0000389}
390
Daniel Dunbar08e41d62009-07-21 20:06:58 +0000391void Driver::PrintVersion(const Compilation &C, llvm::raw_ostream &OS) const {
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000392 // FIXME: The following handlers should use a callback mechanism, we don't
393 // know what the client would like to do.
Ted Kremenek4c0df3d2010-01-23 02:11:34 +0000394 OS << getClangFullVersion() << '\n';
Daniel Dunbarb10248802009-03-26 16:09:13 +0000395 const ToolChain &TC = C.getDefaultToolChain();
Daniel Dunbar08e41d62009-07-21 20:06:58 +0000396 OS << "Target: " << TC.getTripleString() << '\n';
Daniel Dunbar10978e42009-06-16 23:32:58 +0000397
398 // Print the threading model.
399 //
400 // FIXME: Implement correctly.
Daniel Dunbar08e41d62009-07-21 20:06:58 +0000401 OS << "Thread model: " << "posix" << '\n';
Daniel Dunbar5e0f6af2009-03-13 00:51:18 +0000402}
403
Chris Lattner86ed5b02010-05-05 05:53:24 +0000404/// PrintDiagnosticCategories - Implement the --print-diagnostic-categories
405/// option.
406static void PrintDiagnosticCategories(llvm::raw_ostream &OS) {
407 for (unsigned i = 1; // Skip the empty category.
Argyrios Kyrtzidisd0040642010-11-18 20:06:41 +0000408 const char *CategoryName = DiagnosticIDs::getCategoryNameFromID(i); ++i)
Chris Lattner86ed5b02010-05-05 05:53:24 +0000409 OS << i << ',' << CategoryName << '\n';
410}
411
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000412bool Driver::HandleImmediateArgs(const Compilation &C) {
Daniel Dunbar18974bd2010-06-11 22:00:19 +0000413 // The order these options are handled in gcc is all over the place, but we
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000414 // don't expect inconsistencies w.r.t. that to matter in practice.
Daniel Dunbar7c925282009-03-31 21:38:17 +0000415
Daniel Dunbar1b09e042010-09-17 02:47:28 +0000416 if (C.getArgs().hasArg(options::OPT_dumpmachine)) {
417 llvm::outs() << C.getDefaultToolChain().getTripleString() << '\n';
418 return false;
419 }
420
Eric Christopher4698e932010-12-17 19:13:21 +0000421 // This is a horrible hack. Some projects depend on gcc-like versions
422 // coming out of gcc -dumpversion to determine if the gcc compatible
423 // compiler has a correct version. Ideally we'd fix all of those projects.
Daniel Dunbara9bbcfa2009-04-04 05:17:38 +0000424 if (C.getArgs().hasArg(options::OPT_dumpversion)) {
Eric Christopher4698e932010-12-17 19:13:21 +0000425 llvm::outs() << GCC_COMPAT_VERSION_STRING "\n";
Daniel Dunbara9bbcfa2009-04-04 05:17:38 +0000426 return false;
427 }
Daniel Dunbarfb3d7472010-06-14 21:23:12 +0000428
Chris Lattner86ed5b02010-05-05 05:53:24 +0000429 if (C.getArgs().hasArg(options::OPT__print_diagnostic_categories)) {
430 PrintDiagnosticCategories(llvm::outs());
431 return false;
432 }
Daniel Dunbara9bbcfa2009-04-04 05:17:38 +0000433
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000434 if (C.getArgs().hasArg(options::OPT__help) ||
Daniel Dunbara7b5e212009-04-15 16:34:29 +0000435 C.getArgs().hasArg(options::OPT__help_hidden)) {
436 PrintHelp(C.getArgs().hasArg(options::OPT__help_hidden));
Daniel Dunbar7c925282009-03-31 21:38:17 +0000437 return false;
438 }
439
Daniel Dunbarb0006ae2009-04-02 15:05:41 +0000440 if (C.getArgs().hasArg(options::OPT__version)) {
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000441 // Follow gcc behavior and use stdout for --version and stderr for -v.
Daniel Dunbar08e41d62009-07-21 20:06:58 +0000442 PrintVersion(C, llvm::outs());
Daniel Dunbarb0006ae2009-04-02 15:05:41 +0000443 return false;
444 }
445
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000446 if (C.getArgs().hasArg(options::OPT_v) ||
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000447 C.getArgs().hasArg(options::OPT__HASH_HASH_HASH)) {
Daniel Dunbar08e41d62009-07-21 20:06:58 +0000448 PrintVersion(C, llvm::errs());
Daniel Dunbar5e0f6af2009-03-13 00:51:18 +0000449 SuppressMissingInputWarning = true;
450 }
451
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000452 const ToolChain &TC = C.getDefaultToolChain();
Daniel Dunbard972e222009-03-20 04:37:21 +0000453 if (C.getArgs().hasArg(options::OPT_print_search_dirs)) {
454 llvm::outs() << "programs: =";
455 for (ToolChain::path_list::const_iterator it = TC.getProgramPaths().begin(),
456 ie = TC.getProgramPaths().end(); it != ie; ++it) {
457 if (it != TC.getProgramPaths().begin())
458 llvm::outs() << ':';
459 llvm::outs() << *it;
460 }
461 llvm::outs() << "\n";
462 llvm::outs() << "libraries: =";
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000463 for (ToolChain::path_list::const_iterator it = TC.getFilePaths().begin(),
Daniel Dunbard972e222009-03-20 04:37:21 +0000464 ie = TC.getFilePaths().end(); it != ie; ++it) {
465 if (it != TC.getFilePaths().begin())
466 llvm::outs() << ':';
467 llvm::outs() << *it;
468 }
469 llvm::outs() << "\n";
Daniel Dunbar7c925282009-03-31 21:38:17 +0000470 return false;
Daniel Dunbard972e222009-03-20 04:37:21 +0000471 }
472
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000473 // FIXME: The following handlers should use a callback mechanism, we don't
474 // know what the client would like to do.
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000475 if (Arg *A = C.getArgs().getLastArg(options::OPT_print_file_name_EQ)) {
Daniel Dunbar1ce81532009-09-09 22:33:00 +0000476 llvm::outs() << GetFilePath(A->getValue(C.getArgs()), TC) << "\n";
Daniel Dunbar5e0f6af2009-03-13 00:51:18 +0000477 return false;
478 }
479
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000480 if (Arg *A = C.getArgs().getLastArg(options::OPT_print_prog_name_EQ)) {
Daniel Dunbar1ce81532009-09-09 22:33:00 +0000481 llvm::outs() << GetProgramPath(A->getValue(C.getArgs()), TC) << "\n";
Daniel Dunbar5e0f6af2009-03-13 00:51:18 +0000482 return false;
483 }
484
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000485 if (C.getArgs().hasArg(options::OPT_print_libgcc_file_name)) {
Daniel Dunbar1ce81532009-09-09 22:33:00 +0000486 llvm::outs() << GetFilePath("libgcc.a", TC) << "\n";
Daniel Dunbar5e0f6af2009-03-13 00:51:18 +0000487 return false;
488 }
489
Daniel Dunbar1b3ec3a2009-06-16 23:25:22 +0000490 if (C.getArgs().hasArg(options::OPT_print_multi_lib)) {
491 // FIXME: We need tool chain support for this.
492 llvm::outs() << ".;\n";
493
494 switch (C.getDefaultToolChain().getTriple().getArch()) {
495 default:
496 break;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000497
Daniel Dunbar1b3ec3a2009-06-16 23:25:22 +0000498 case llvm::Triple::x86_64:
499 llvm::outs() << "x86_64;@m64" << "\n";
500 break;
501
502 case llvm::Triple::ppc64:
503 llvm::outs() << "ppc64;@m64" << "\n";
504 break;
505 }
506 return false;
507 }
508
509 // FIXME: What is the difference between print-multi-directory and
510 // print-multi-os-directory?
511 if (C.getArgs().hasArg(options::OPT_print_multi_directory) ||
512 C.getArgs().hasArg(options::OPT_print_multi_os_directory)) {
513 switch (C.getDefaultToolChain().getTriple().getArch()) {
514 default:
515 case llvm::Triple::x86:
516 case llvm::Triple::ppc:
517 llvm::outs() << "." << "\n";
518 break;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000519
Daniel Dunbar1b3ec3a2009-06-16 23:25:22 +0000520 case llvm::Triple::x86_64:
521 llvm::outs() << "x86_64" << "\n";
522 break;
523
524 case llvm::Triple::ppc64:
525 llvm::outs() << "ppc64" << "\n";
526 break;
527 }
528 return false;
529 }
530
Daniel Dunbar5e0f6af2009-03-13 00:51:18 +0000531 return true;
532}
533
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000534static unsigned PrintActions1(const Compilation &C, Action *A,
Daniel Dunbaraaf1ea62009-03-13 12:19:02 +0000535 std::map<Action*, unsigned> &Ids) {
536 if (Ids.count(A))
537 return Ids[A];
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000538
Daniel Dunbaraaf1ea62009-03-13 12:19:02 +0000539 std::string str;
540 llvm::raw_string_ostream os(str);
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000541
Daniel Dunbaraaf1ea62009-03-13 12:19:02 +0000542 os << Action::getClassName(A->getKind()) << ", ";
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000543 if (InputAction *IA = dyn_cast<InputAction>(A)) {
Daniel Dunbareb843be2009-03-18 03:13:20 +0000544 os << "\"" << IA->getInputArg().getValue(C.getArgs()) << "\"";
Daniel Dunbaraaf1ea62009-03-13 12:19:02 +0000545 } else if (BindArchAction *BIA = dyn_cast<BindArchAction>(A)) {
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000546 os << '"' << (BIA->getArchName() ? BIA->getArchName() :
Daniel Dunbareb843be2009-03-18 03:13:20 +0000547 C.getDefaultToolChain().getArchName()) << '"'
548 << ", {" << PrintActions1(C, *BIA->begin(), Ids) << "}";
Daniel Dunbaraaf1ea62009-03-13 12:19:02 +0000549 } else {
550 os << "{";
551 for (Action::iterator it = A->begin(), ie = A->end(); it != ie;) {
Daniel Dunbareb843be2009-03-18 03:13:20 +0000552 os << PrintActions1(C, *it, Ids);
Daniel Dunbaraaf1ea62009-03-13 12:19:02 +0000553 ++it;
554 if (it != ie)
555 os << ", ";
556 }
557 os << "}";
558 }
559
560 unsigned Id = Ids.size();
561 Ids[A] = Id;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000562 llvm::errs() << Id << ": " << os.str() << ", "
Daniel Dunbaraaf1ea62009-03-13 12:19:02 +0000563 << types::getTypeName(A->getType()) << "\n";
564
565 return Id;
566}
567
Daniel Dunbareb843be2009-03-18 03:13:20 +0000568void Driver::PrintActions(const Compilation &C) const {
Daniel Dunbaraaf1ea62009-03-13 12:19:02 +0000569 std::map<Action*, unsigned> Ids;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000570 for (ActionList::const_iterator it = C.getActions().begin(),
Daniel Dunbareb843be2009-03-18 03:13:20 +0000571 ie = C.getActions().end(); it != ie; ++it)
572 PrintActions1(C, *it, Ids);
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000573}
574
Daniel Dunbar00d3d8e2010-06-29 16:38:33 +0000575/// \brief Check whether the given input tree contains any compilation (or
576/// assembly) actions.
577static bool ContainsCompileAction(const Action *A) {
578 if (isa<CompileJobAction>(A) || isa<AssembleJobAction>(A))
579 return true;
580
581 for (Action::const_iterator it = A->begin(), ie = A->end(); it != ie; ++it)
582 if (ContainsCompileAction(*it))
583 return true;
584
585 return false;
586}
587
Daniel Dunbara36c2b32010-08-02 05:43:51 +0000588void Driver::BuildUniversalActions(const ToolChain &TC,
589 const ArgList &Args,
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000590 ActionList &Actions) const {
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000591 llvm::PrettyStackTraceString CrashInfo("Building universal build actions");
592 // Collect the list of architectures. Duplicates are allowed, but should only
593 // be handled once (in the order seen).
Daniel Dunbare5dc4822009-03-13 20:33:35 +0000594 llvm::StringSet<> ArchNames;
595 llvm::SmallVector<const char *, 4> Archs;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000596 for (ArgList::const_iterator it = Args.begin(), ie = Args.end();
Daniel Dunbarf479c122009-03-12 18:40:18 +0000597 it != ie; ++it) {
598 Arg *A = *it;
599
Daniel Dunbar0bfb21e2009-11-19 03:26:40 +0000600 if (A->getOption().matches(options::OPT_arch)) {
Daniel Dunbar9c3f7c42009-09-08 23:37:30 +0000601 // Validate the option here; we don't save the type here because its
602 // particular spelling may participate in other driver choices.
603 llvm::Triple::ArchType Arch =
604 llvm::Triple::getArchTypeForDarwinArchName(A->getValue(Args));
605 if (Arch == llvm::Triple::UnknownArch) {
606 Diag(clang::diag::err_drv_invalid_arch_name)
607 << A->getAsString(Args);
608 continue;
609 }
610
Daniel Dunbar2da02722009-03-19 07:55:12 +0000611 A->claim();
Daniel Dunbar7b574042009-09-08 23:37:02 +0000612 if (ArchNames.insert(A->getValue(Args)))
613 Archs.push_back(A->getValue(Args));
Daniel Dunbarf479c122009-03-12 18:40:18 +0000614 }
615 }
616
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000617 // When there is no explicit arch for this platform, make sure we still bind
618 // the architecture (to the default) so that -Xarch_ is handled correctly.
Daniel Dunbareb843be2009-03-18 03:13:20 +0000619 if (!Archs.size())
620 Archs.push_back(0);
Daniel Dunbarf479c122009-03-12 18:40:18 +0000621
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000622 // FIXME: We killed off some others but these aren't yet detected in a
623 // functional manner. If we added information to jobs about which "auxiliary"
624 // files they wrote then we could detect the conflict these cause downstream.
Daniel Dunbarf479c122009-03-12 18:40:18 +0000625 if (Archs.size() > 1) {
626 // No recovery needed, the point of this is just to prevent
627 // overwriting the same files.
Daniel Dunbarf479c122009-03-12 18:40:18 +0000628 if (const Arg *A = Args.getLastArg(options::OPT_save_temps))
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000629 Diag(clang::diag::err_drv_invalid_opt_with_multiple_archs)
Daniel Dunbar0e759942009-03-20 06:14:23 +0000630 << A->getAsString(Args);
Daniel Dunbarf479c122009-03-12 18:40:18 +0000631 }
632
633 ActionList SingleActions;
Daniel Dunbara36c2b32010-08-02 05:43:51 +0000634 BuildActions(TC, Args, SingleActions);
Daniel Dunbarf479c122009-03-12 18:40:18 +0000635
Daniel Dunbar6beaf512010-06-04 18:28:41 +0000636 // Add in arch bindings for every top level action, as well as lipo and
637 // dsymutil steps if needed.
Daniel Dunbarf479c122009-03-12 18:40:18 +0000638 for (unsigned i = 0, e = SingleActions.size(); i != e; ++i) {
639 Action *Act = SingleActions[i];
640
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000641 // Make sure we can lipo this kind of output. If not (and it is an actual
642 // output) then we disallow, since we can't create an output file with the
643 // right name without overwriting it. We could remove this oddity by just
644 // changing the output names to include the arch, which would also fix
Daniel Dunbarf479c122009-03-12 18:40:18 +0000645 // -save-temps. Compatibility wins for now.
646
Daniel Dunbare2ca3bd2009-03-13 17:46:02 +0000647 if (Archs.size() > 1 && !types::canLipoType(Act->getType()))
Daniel Dunbarf479c122009-03-12 18:40:18 +0000648 Diag(clang::diag::err_drv_invalid_output_with_multiple_archs)
649 << types::getTypeName(Act->getType());
650
651 ActionList Inputs;
Daniel Dunbar66187b32010-03-11 18:04:58 +0000652 for (unsigned i = 0, e = Archs.size(); i != e; ++i) {
Daniel Dunbare5dc4822009-03-13 20:33:35 +0000653 Inputs.push_back(new BindArchAction(Act, Archs[i]));
Daniel Dunbar66187b32010-03-11 18:04:58 +0000654 if (i != 0)
655 Inputs.back()->setOwnsInputs(false);
656 }
Daniel Dunbarf479c122009-03-12 18:40:18 +0000657
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000658 // Lipo if necessary, we do it this way because we need to set the arch flag
659 // so that -Xarch_ gets overwritten.
Daniel Dunbarf479c122009-03-12 18:40:18 +0000660 if (Inputs.size() == 1 || Act->getType() == types::TY_Nothing)
661 Actions.append(Inputs.begin(), Inputs.end());
662 else
663 Actions.push_back(new LipoJobAction(Inputs, Act->getType()));
Daniel Dunbar6beaf512010-06-04 18:28:41 +0000664
Daniel Dunbar00d3d8e2010-06-29 16:38:33 +0000665 // Add a 'dsymutil' step if necessary, when debug info is enabled and we
666 // have a compile input. We need to run 'dsymutil' ourselves in such cases
667 // because the debug info will refer to a temporary object file which is
668 // will be removed at the end of the compilation process.
Daniel Dunbar6beaf512010-06-04 18:28:41 +0000669 if (Act->getType() == types::TY_Image) {
670 Arg *A = Args.getLastArg(options::OPT_g_Group);
671 if (A && !A->getOption().matches(options::OPT_g0) &&
Daniel Dunbar00d3d8e2010-06-29 16:38:33 +0000672 !A->getOption().matches(options::OPT_gstabs) &&
673 ContainsCompileAction(Actions.back())) {
Daniel Dunbar6beaf512010-06-04 18:28:41 +0000674 ActionList Inputs;
675 Inputs.push_back(Actions.back());
676 Actions.pop_back();
677
678 Actions.push_back(new DsymutilJobAction(Inputs, types::TY_dSYM));
679 }
680 }
Daniel Dunbarf479c122009-03-12 18:40:18 +0000681 }
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000682}
683
Daniel Dunbara36c2b32010-08-02 05:43:51 +0000684void Driver::BuildActions(const ToolChain &TC, const ArgList &Args,
685 ActionList &Actions) const {
Daniel Dunbar2608c542009-03-18 01:38:48 +0000686 llvm::PrettyStackTraceString CrashInfo("Building compilation actions");
Daniel Dunbarbfeec742009-03-12 23:55:14 +0000687 // Start by constructing the list of inputs and their types.
688
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000689 // Track the current user specified (-x) input. We also explicitly track the
690 // argument used to set the type; we only want to claim the type when we
691 // actually use it, so we warn about unused -x arguments.
Daniel Dunbarc5a5ac52009-03-13 17:57:10 +0000692 types::ID InputType = types::TY_Nothing;
693 Arg *InputTypeArg = 0;
694
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000695 llvm::SmallVector<std::pair<types::ID, const Arg*>, 16> Inputs;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000696 for (ArgList::const_iterator it = Args.begin(), ie = Args.end();
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000697 it != ie; ++it) {
698 Arg *A = *it;
699
700 if (isa<InputOption>(A->getOption())) {
701 const char *Value = A->getValue(Args);
702 types::ID Ty = types::TY_INVALID;
703
704 // Infer the input type if necessary.
Daniel Dunbarc5a5ac52009-03-13 17:57:10 +0000705 if (InputType == types::TY_Nothing) {
706 // If there was an explicit arg for this, claim it.
707 if (InputTypeArg)
708 InputTypeArg->claim();
709
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000710 // stdin must be handled specially.
711 if (memcmp(Value, "-", 2) == 0) {
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000712 // If running with -E, treat as a C input (this changes the builtin
713 // macros, for example). This may be overridden by -ObjC below.
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000714 //
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000715 // Otherwise emit an error but still use a valid type to avoid
716 // spurious errors (e.g., no inputs).
Daniel Dunbarfffd1812009-11-19 04:00:53 +0000717 if (!Args.hasArgNoClaim(options::OPT_E))
Daniel Dunbar5cd1e412009-03-12 09:13:48 +0000718 Diag(clang::diag::err_drv_unknown_stdin_type);
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000719 Ty = types::TY_C;
720 } else {
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000721 // Otherwise lookup by extension, and fallback to ObjectType if not
722 // found. We use a host hook here because Darwin at least has its own
723 // idea of what .s is.
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000724 if (const char *Ext = strrchr(Value, '.'))
Daniel Dunbarcc7df6c2010-08-02 05:43:56 +0000725 Ty = TC.LookupTypeForExtension(Ext + 1);
Daniel Dunbarea9f0322009-03-20 23:39:23 +0000726
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000727 if (Ty == types::TY_INVALID)
728 Ty = types::TY_Object;
Daniel Dunbar0ac94452010-02-17 20:32:58 +0000729
730 // If the driver is invoked as C++ compiler (like clang++ or c++) it
731 // should autodetect some input files as C++ for g++ compatibility.
732 if (CCCIsCXX) {
733 types::ID OldTy = Ty;
734 Ty = types::lookupCXXTypeForCType(Ty);
735
736 if (Ty != OldTy)
737 Diag(clang::diag::warn_drv_treating_input_as_cxx)
738 << getTypeName(OldTy) << getTypeName(Ty);
739 }
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000740 }
741
Daniel Dunbar82b22102009-05-18 21:47:54 +0000742 // -ObjC and -ObjC++ override the default language, but only for "source
743 // files". We just treat everything that isn't a linker input as a
744 // source file.
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000745 //
Daniel Dunbar82b22102009-05-18 21:47:54 +0000746 // FIXME: Clean this up if we move the phase sequence into the type.
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000747 if (Ty != types::TY_Object) {
748 if (Args.hasArg(options::OPT_ObjC))
749 Ty = types::TY_ObjC;
750 else if (Args.hasArg(options::OPT_ObjCXX))
751 Ty = types::TY_ObjCXX;
752 }
753 } else {
754 assert(InputTypeArg && "InputType set w/o InputTypeArg");
755 InputTypeArg->claim();
756 Ty = InputType;
757 }
758
Daniel Dunbarfcf2d422010-01-25 00:44:02 +0000759 // Check that the file exists, if enabled.
Argyrios Kyrtzidis71731d62010-11-03 22:45:23 +0000760 if (CheckInputsExist && memcmp(Value, "-", 2) != 0) {
Michael J. Spencerf28df4c2010-12-17 21:22:22 +0000761 llvm::SmallString<64> Path(Value);
Argyrios Kyrtzidis71731d62010-11-03 22:45:23 +0000762 if (Arg *WorkDir = Args.getLastArg(options::OPT_working_directory))
Michael J. Spencerf28df4c2010-12-17 21:22:22 +0000763 if (llvm::sys::path::is_absolute(Path.str())) {
Argyrios Kyrtzidis71731d62010-11-03 22:45:23 +0000764 Path = WorkDir->getValue(Args);
Michael J. Spencerf28df4c2010-12-17 21:22:22 +0000765 llvm::sys::path::append(Path, Value);
Argyrios Kyrtzidis71731d62010-11-03 22:45:23 +0000766 }
767
Michael J. Spencerf28df4c2010-12-17 21:22:22 +0000768 bool exists = false;
769 if (/*error_code ec =*/llvm::sys::fs::exists(Value, exists) || !exists)
Argyrios Kyrtzidis71731d62010-11-03 22:45:23 +0000770 Diag(clang::diag::err_drv_no_such_file) << Path.str();
771 else
772 Inputs.push_back(std::make_pair(Ty, A));
773 } else
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000774 Inputs.push_back(std::make_pair(Ty, A));
775
776 } else if (A->getOption().isLinkerInput()) {
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000777 // Just treat as object type, we could make a special type for this if
778 // necessary.
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000779 Inputs.push_back(std::make_pair(types::TY_Object, A));
780
Daniel Dunbar0bfb21e2009-11-19 03:26:40 +0000781 } else if (A->getOption().matches(options::OPT_x)) {
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000782 InputTypeArg = A;
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000783 InputType = types::lookupTypeForTypeSpecifier(A->getValue(Args));
784
785 // Follow gcc behavior and treat as linker input for invalid -x
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000786 // options. Its not clear why we shouldn't just revert to unknown; but
Michael J. Spencer1a4fe8c2010-12-17 21:22:33 +0000787 // this isn't very important, we might as well be bug compatible.
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000788 if (!InputType) {
Daniel Dunbar5cd1e412009-03-12 09:13:48 +0000789 Diag(clang::diag::err_drv_unknown_language) << A->getValue(Args);
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000790 InputType = types::TY_Object;
791 }
792 }
793 }
794
Daniel Dunbar34c41872009-03-13 00:17:48 +0000795 if (!SuppressMissingInputWarning && Inputs.empty()) {
Daniel Dunbarbfeec742009-03-12 23:55:14 +0000796 Diag(clang::diag::err_drv_no_input_files);
797 return;
798 }
799
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000800 // Determine which compilation mode we are in. We look for options which
801 // affect the phase, starting with the earliest phases, and record which
802 // option we used to determine the final phase.
Daniel Dunbar65229332009-03-13 11:38:42 +0000803 Arg *FinalPhaseArg = 0;
804 phases::ID FinalPhase;
Daniel Dunbarbfeec742009-03-12 23:55:14 +0000805
806 // -{E,M,MM} only run the preprocessor.
Daniel Dunbar65229332009-03-13 11:38:42 +0000807 if ((FinalPhaseArg = Args.getLastArg(options::OPT_E)) ||
Daniel Dunbar86aed7d2010-12-08 21:33:40 +0000808 (FinalPhaseArg = Args.getLastArg(options::OPT_M, options::OPT_MM))) {
Daniel Dunbar65229332009-03-13 11:38:42 +0000809 FinalPhase = phases::Preprocess;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000810
Daniel Dunbar6cdf83c2009-09-01 16:57:46 +0000811 // -{fsyntax-only,-analyze,emit-ast,S} only run up to the compiler.
Daniel Dunbarae0e55e2009-03-15 00:48:16 +0000812 } else if ((FinalPhaseArg = Args.getLastArg(options::OPT_fsyntax_only)) ||
Daniel Dunbaraeea8ac2010-02-11 03:16:21 +0000813 (FinalPhaseArg = Args.getLastArg(options::OPT_rewrite_objc)) ||
Daniel Dunbar5e051f92009-05-06 02:12:32 +0000814 (FinalPhaseArg = Args.getLastArg(options::OPT__analyze,
815 options::OPT__analyze_auto)) ||
Daniel Dunbar6cdf83c2009-09-01 16:57:46 +0000816 (FinalPhaseArg = Args.getLastArg(options::OPT_emit_ast)) ||
Daniel Dunbar65229332009-03-13 11:38:42 +0000817 (FinalPhaseArg = Args.getLastArg(options::OPT_S))) {
818 FinalPhase = phases::Compile;
Daniel Dunbarbfeec742009-03-12 23:55:14 +0000819
820 // -c only runs up to the assembler.
Daniel Dunbar65229332009-03-13 11:38:42 +0000821 } else if ((FinalPhaseArg = Args.getLastArg(options::OPT_c))) {
822 FinalPhase = phases::Assemble;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000823
Daniel Dunbarbfeec742009-03-12 23:55:14 +0000824 // Otherwise do everything.
825 } else
Daniel Dunbar65229332009-03-13 11:38:42 +0000826 FinalPhase = phases::Link;
Daniel Dunbarbfeec742009-03-12 23:55:14 +0000827
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000828 // Reject -Z* at the top level, these options should never have been exposed
829 // by gcc.
Daniel Dunbardd765242009-03-26 16:12:09 +0000830 if (Arg *A = Args.getLastArg(options::OPT_Z_Joined))
Daniel Dunbar0e759942009-03-20 06:14:23 +0000831 Diag(clang::diag::err_drv_use_of_Z_option) << A->getAsString(Args);
Daniel Dunbarbfeec742009-03-12 23:55:14 +0000832
Daniel Dunbar65229332009-03-13 11:38:42 +0000833 // Construct the actions to perform.
834 ActionList LinkerInputs;
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000835 for (unsigned i = 0, e = Inputs.size(); i != e; ++i) {
Daniel Dunbar65229332009-03-13 11:38:42 +0000836 types::ID InputType = Inputs[i].first;
837 const Arg *InputArg = Inputs[i].second;
838
839 unsigned NumSteps = types::getNumCompilationPhases(InputType);
840 assert(NumSteps && "Invalid number of steps!");
841
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000842 // If the first step comes after the final phase we are doing as part of
843 // this compilation, warn the user about it.
Daniel Dunbar65229332009-03-13 11:38:42 +0000844 phases::ID InitialPhase = types::getCompilationPhase(InputType, 0);
845 if (InitialPhase > FinalPhase) {
Daniel Dunbaradc5c7c2009-03-19 07:57:08 +0000846 // Claim here to avoid the more general unused warning.
847 InputArg->claim();
Daniel Dunbar07806ca2009-09-17 04:13:26 +0000848
849 // Special case '-E' warning on a previously preprocessed file to make
850 // more sense.
851 if (InitialPhase == phases::Compile && FinalPhase == phases::Preprocess &&
852 getPreprocessedType(InputType) == types::TY_INVALID)
853 Diag(clang::diag::warn_drv_preprocessed_input_file_unused)
854 << InputArg->getAsString(Args)
855 << FinalPhaseArg->getOption().getName();
856 else
857 Diag(clang::diag::warn_drv_input_file_unused)
858 << InputArg->getAsString(Args)
859 << getPhaseName(InitialPhase)
860 << FinalPhaseArg->getOption().getName();
Daniel Dunbar65229332009-03-13 11:38:42 +0000861 continue;
862 }
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000863
Daniel Dunbar65229332009-03-13 11:38:42 +0000864 // Build the pipeline for this file.
Ted Kremenekbb1110a2010-01-19 01:29:05 +0000865 llvm::OwningPtr<Action> Current(new InputAction(*InputArg, InputType));
Daniel Dunbar65229332009-03-13 11:38:42 +0000866 for (unsigned i = 0; i != NumSteps; ++i) {
867 phases::ID Phase = types::getCompilationPhase(InputType, i);
868
869 // We are done if this step is past what the user requested.
870 if (Phase > FinalPhase)
871 break;
872
873 // Queue linker inputs.
874 if (Phase == phases::Link) {
875 assert(i + 1 == NumSteps && "linking must be final compilation step.");
Ted Kremenekbb1110a2010-01-19 01:29:05 +0000876 LinkerInputs.push_back(Current.take());
Daniel Dunbar65229332009-03-13 11:38:42 +0000877 break;
878 }
879
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000880 // Some types skip the assembler phase (e.g., llvm-bc), but we can't
881 // encode this in the steps because the intermediate type depends on
882 // arguments. Just special case here.
Daniel Dunbar13864952009-03-24 20:17:30 +0000883 if (Phase == phases::Assemble && Current->getType() != types::TY_PP_Asm)
884 continue;
885
Daniel Dunbar65229332009-03-13 11:38:42 +0000886 // Otherwise construct the appropriate action.
Ted Kremenekbb1110a2010-01-19 01:29:05 +0000887 Current.reset(ConstructPhaseAction(Args, Phase, Current.take()));
Daniel Dunbar65229332009-03-13 11:38:42 +0000888 if (Current->getType() == types::TY_Nothing)
889 break;
890 }
891
892 // If we ended with something, add to the output list.
893 if (Current)
Ted Kremenekbb1110a2010-01-19 01:29:05 +0000894 Actions.push_back(Current.take());
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000895 }
Daniel Dunbar65229332009-03-13 11:38:42 +0000896
897 // Add a link action if necessary.
898 if (!LinkerInputs.empty())
899 Actions.push_back(new LinkJobAction(LinkerInputs, types::TY_Image));
Daniel Dunbarc7a67b72009-12-22 23:19:32 +0000900
901 // If we are linking, claim any options which are obviously only used for
902 // compilation.
903 if (FinalPhase == phases::Link)
904 Args.ClaimAllArgs(options::OPT_CompileOnly_Group);
Daniel Dunbar65229332009-03-13 11:38:42 +0000905}
906
907Action *Driver::ConstructPhaseAction(const ArgList &Args, phases::ID Phase,
908 Action *Input) const {
Daniel Dunbar2608c542009-03-18 01:38:48 +0000909 llvm::PrettyStackTraceString CrashInfo("Constructing phase actions");
Daniel Dunbar65229332009-03-13 11:38:42 +0000910 // Build the appropriate action.
911 switch (Phase) {
912 case phases::Link: assert(0 && "link action invalid here.");
913 case phases::Preprocess: {
Daniel Dunbard67a3222009-03-30 06:36:42 +0000914 types::ID OutputTy;
915 // -{M, MM} alter the output type.
Daniel Dunbar86aed7d2010-12-08 21:33:40 +0000916 if (Args.hasArg(options::OPT_M, options::OPT_MM)) {
Daniel Dunbard67a3222009-03-30 06:36:42 +0000917 OutputTy = types::TY_Dependencies;
918 } else {
919 OutputTy = types::getPreprocessedType(Input->getType());
920 assert(OutputTy != types::TY_INVALID &&
921 "Cannot preprocess this input type!");
922 }
Daniel Dunbar65229332009-03-13 11:38:42 +0000923 return new PreprocessJobAction(Input, OutputTy);
924 }
925 case phases::Precompile:
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000926 return new PrecompileJobAction(Input, types::TY_PCH);
Daniel Dunbar65229332009-03-13 11:38:42 +0000927 case phases::Compile: {
Daniel Dunbare0d26912009-12-23 00:47:42 +0000928 bool HasO4 = false;
929 if (const Arg *A = Args.getLastArg(options::OPT_O_Group))
930 HasO4 = A->getOption().matches(options::OPT_O4);
931
Daniel Dunbar65229332009-03-13 11:38:42 +0000932 if (Args.hasArg(options::OPT_fsyntax_only)) {
933 return new CompileJobAction(Input, types::TY_Nothing);
Daniel Dunbaraeea8ac2010-02-11 03:16:21 +0000934 } else if (Args.hasArg(options::OPT_rewrite_objc)) {
935 return new CompileJobAction(Input, types::TY_RewrittenObjC);
Daniel Dunbar5e051f92009-05-06 02:12:32 +0000936 } else if (Args.hasArg(options::OPT__analyze, options::OPT__analyze_auto)) {
Daniel Dunbar65229332009-03-13 11:38:42 +0000937 return new AnalyzeJobAction(Input, types::TY_Plist);
Daniel Dunbar6cdf83c2009-09-01 16:57:46 +0000938 } else if (Args.hasArg(options::OPT_emit_ast)) {
939 return new CompileJobAction(Input, types::TY_AST);
Daniel Dunbar13864952009-03-24 20:17:30 +0000940 } else if (Args.hasArg(options::OPT_emit_llvm) ||
Daniel Dunbare0d26912009-12-23 00:47:42 +0000941 Args.hasArg(options::OPT_flto) || HasO4) {
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000942 types::ID Output =
Daniel Dunbar24e52992010-06-07 23:28:45 +0000943 Args.hasArg(options::OPT_S) ? types::TY_LTO_IR : types::TY_LTO_BC;
Daniel Dunbar65229332009-03-13 11:38:42 +0000944 return new CompileJobAction(Input, Output);
945 } else {
946 return new CompileJobAction(Input, types::TY_PP_Asm);
947 }
948 }
949 case phases::Assemble:
950 return new AssembleJobAction(Input, types::TY_Object);
951 }
952
953 assert(0 && "invalid phase in ConstructPhaseAction");
954 return 0;
Daniel Dunbar1688f1a2009-03-12 07:58:46 +0000955}
956
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000957void Driver::BuildJobs(Compilation &C) const {
Daniel Dunbar2608c542009-03-18 01:38:48 +0000958 llvm::PrettyStackTraceString CrashInfo("Building compilation jobs");
Daniel Dunbare75d8342009-03-16 06:56:51 +0000959
960 Arg *FinalOutput = C.getArgs().getLastArg(options::OPT_o);
961
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000962 // It is an error to provide a -o option if we are making multiple output
963 // files.
Daniel Dunbare75d8342009-03-16 06:56:51 +0000964 if (FinalOutput) {
965 unsigned NumOutputs = 0;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000966 for (ActionList::const_iterator it = C.getActions().begin(),
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000967 ie = C.getActions().end(); it != ie; ++it)
Daniel Dunbare75d8342009-03-16 06:56:51 +0000968 if ((*it)->getType() != types::TY_Nothing)
969 ++NumOutputs;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000970
Daniel Dunbare75d8342009-03-16 06:56:51 +0000971 if (NumOutputs > 1) {
972 Diag(clang::diag::err_drv_output_argument_with_multiple_files);
973 FinalOutput = 0;
974 }
975 }
976
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000977 for (ActionList::const_iterator it = C.getActions().begin(),
Daniel Dunbarf0eddb82009-03-18 02:55:38 +0000978 ie = C.getActions().end(); it != ie; ++it) {
Daniel Dunbare75d8342009-03-16 06:56:51 +0000979 Action *A = *it;
980
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000981 // If we are linking an image for multiple archs then the linker wants
982 // -arch_multiple and -final_output <final image name>. Unfortunately, this
983 // doesn't fit in cleanly because we have to pass this information down.
Daniel Dunbare75d8342009-03-16 06:56:51 +0000984 //
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000985 // FIXME: This is a hack; find a cleaner way to integrate this into the
986 // process.
Daniel Dunbare75d8342009-03-16 06:56:51 +0000987 const char *LinkingOutput = 0;
Daniel Dunbardd765242009-03-26 16:12:09 +0000988 if (isa<LipoJobAction>(A)) {
Daniel Dunbare75d8342009-03-16 06:56:51 +0000989 if (FinalOutput)
990 LinkingOutput = FinalOutput->getValue(C.getArgs());
991 else
992 LinkingOutput = DefaultImageName.c_str();
993 }
994
995 InputInfo II;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +0000996 BuildJobsForAction(C, A, &C.getDefaultToolChain(),
Daniel Dunbarb5d86bb2009-09-09 18:36:01 +0000997 /*BoundArch*/0,
Daniel Dunbare75d8342009-03-16 06:56:51 +0000998 /*AtTopLevel*/ true,
999 /*LinkingOutput*/ LinkingOutput,
1000 II);
1001 }
Daniel Dunbar3ce436d2009-03-16 06:42:30 +00001002
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001003 // If the user passed -Qunused-arguments or there were errors, don't warn
1004 // about any unused arguments.
Argyrios Kyrtzidis31448a42010-11-18 21:47:07 +00001005 if (Diags.hasErrorOccurred() ||
Daniel Dunbara3cfbe32009-04-07 19:04:18 +00001006 C.getArgs().hasArg(options::OPT_Qunused_arguments))
Daniel Dunbard175d972009-03-18 18:03:46 +00001007 return;
1008
Daniel Dunbar58399ae2009-03-29 22:24:54 +00001009 // Claim -### here.
1010 (void) C.getArgs().hasArg(options::OPT__HASH_HASH_HASH);
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001011
Daniel Dunbar3ce436d2009-03-16 06:42:30 +00001012 for (ArgList::const_iterator it = C.getArgs().begin(), ie = C.getArgs().end();
1013 it != ie; ++it) {
1014 Arg *A = *it;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001015
Daniel Dunbar3ce436d2009-03-16 06:42:30 +00001016 // FIXME: It would be nice to be able to send the argument to the
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001017 // Diagnostic, so that extra values, position, and so on could be printed.
Daniel Dunbar90dd6f42009-04-04 00:52:26 +00001018 if (!A->isClaimed()) {
Daniel Dunbara3cfbe32009-04-07 19:04:18 +00001019 if (A->getOption().hasNoArgumentUnused())
1020 continue;
1021
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001022 // Suppress the warning automatically if this is just a flag, and it is an
1023 // instance of an argument we already claimed.
Daniel Dunbar90dd6f42009-04-04 00:52:26 +00001024 const Option &Opt = A->getOption();
1025 if (isa<FlagOption>(Opt)) {
1026 bool DuplicateClaimed = false;
1027
Daniel Dunbar44b36ee2009-11-25 11:53:23 +00001028 for (arg_iterator it = C.getArgs().filtered_begin(&Opt),
1029 ie = C.getArgs().filtered_end(); it != ie; ++it) {
1030 if ((*it)->isClaimed()) {
Daniel Dunbar90dd6f42009-04-04 00:52:26 +00001031 DuplicateClaimed = true;
1032 break;
1033 }
1034 }
1035
1036 if (DuplicateClaimed)
1037 continue;
1038 }
1039
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001040 Diag(clang::diag::warn_drv_unused_argument)
Daniel Dunbar0e759942009-03-20 06:14:23 +00001041 << A->getAsString(C.getArgs());
Daniel Dunbar90dd6f42009-04-04 00:52:26 +00001042 }
Daniel Dunbar3ce436d2009-03-16 06:42:30 +00001043 }
Daniel Dunbar95e6b192009-03-13 22:12:33 +00001044}
1045
Daniel Dunbarc4343942010-02-03 03:07:56 +00001046static const Tool &SelectToolForJob(Compilation &C, const ToolChain *TC,
1047 const JobAction *JA,
1048 const ActionList *&Inputs) {
1049 const Tool *ToolForJob = 0;
1050
1051 // See if we should look for a compiler with an integrated assembler. We match
1052 // bottom up, so what we are actually looking for is an assembler job with a
1053 // compiler input.
Daniel Dunbarf9ff3502010-05-14 02:03:00 +00001054
1055 // FIXME: This doesn't belong here, but ideally we will support static soon
1056 // anyway.
1057 bool HasStatic = (C.getArgs().hasArg(options::OPT_mkernel) ||
1058 C.getArgs().hasArg(options::OPT_static) ||
1059 C.getArgs().hasArg(options::OPT_fapple_kext));
1060 bool IsIADefault = (TC->IsIntegratedAssemblerDefault() && !HasStatic);
1061 if (C.getArgs().hasFlag(options::OPT_integrated_as,
Daniel Dunbarc4343942010-02-03 03:07:56 +00001062 options::OPT_no_integrated_as,
Daniel Dunbarf9ff3502010-05-14 02:03:00 +00001063 IsIADefault) &&
Daniel Dunbarc4343942010-02-03 03:07:56 +00001064 !C.getArgs().hasArg(options::OPT_save_temps) &&
1065 isa<AssembleJobAction>(JA) &&
1066 Inputs->size() == 1 && isa<CompileJobAction>(*Inputs->begin())) {
1067 const Tool &Compiler = TC->SelectTool(C,cast<JobAction>(**Inputs->begin()));
1068 if (Compiler.hasIntegratedAssembler()) {
1069 Inputs = &(*Inputs)[0]->getInputs();
1070 ToolForJob = &Compiler;
1071 }
1072 }
1073
1074 // Otherwise use the tool for the current job.
1075 if (!ToolForJob)
1076 ToolForJob = &TC->SelectTool(C, *JA);
1077
1078 // See if we should use an integrated preprocessor. We do so when we have
1079 // exactly one input, since this is the only use case we care about
1080 // (irrelevant since we don't support combine yet).
1081 if (Inputs->size() == 1 && isa<PreprocessJobAction>(*Inputs->begin()) &&
1082 !C.getArgs().hasArg(options::OPT_no_integrated_cpp) &&
1083 !C.getArgs().hasArg(options::OPT_traditional_cpp) &&
1084 !C.getArgs().hasArg(options::OPT_save_temps) &&
1085 ToolForJob->hasIntegratedCPP())
1086 Inputs = &(*Inputs)[0]->getInputs();
1087
1088 return *ToolForJob;
1089}
1090
Daniel Dunbare75d8342009-03-16 06:56:51 +00001091void Driver::BuildJobsForAction(Compilation &C,
1092 const Action *A,
1093 const ToolChain *TC,
Daniel Dunbarb5d86bb2009-09-09 18:36:01 +00001094 const char *BoundArch,
Daniel Dunbare75d8342009-03-16 06:56:51 +00001095 bool AtTopLevel,
1096 const char *LinkingOutput,
1097 InputInfo &Result) const {
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001098 llvm::PrettyStackTraceString CrashInfo("Building compilation jobs");
Daniel Dunbarc4acf9d2009-03-18 23:18:19 +00001099
Daniel Dunbare75d8342009-03-16 06:56:51 +00001100 if (const InputAction *IA = dyn_cast<InputAction>(A)) {
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001101 // FIXME: It would be nice to not claim this here; maybe the old scheme of
1102 // just using Args was better?
Daniel Dunbar5cdf3e02009-03-19 07:29:38 +00001103 const Arg &Input = IA->getInputArg();
1104 Input.claim();
Daniel Dunbar35cbfeb2010-06-09 22:31:08 +00001105 if (Input.getOption().matches(options::OPT_INPUT)) {
Daniel Dunbar5cdf3e02009-03-19 07:29:38 +00001106 const char *Name = Input.getValue(C.getArgs());
1107 Result = InputInfo(Name, A->getType(), Name);
1108 } else
1109 Result = InputInfo(&Input, A->getType(), "");
Daniel Dunbare75d8342009-03-16 06:56:51 +00001110 return;
1111 }
1112
1113 if (const BindArchAction *BAA = dyn_cast<BindArchAction>(A)) {
Daniel Dunbar1ef3f2a2009-09-08 23:37:19 +00001114 const ToolChain *TC = &C.getDefaultToolChain();
1115
Daniel Dunbar51c7f972009-05-22 02:53:45 +00001116 std::string Arch;
Daniel Dunbar1ef3f2a2009-09-08 23:37:19 +00001117 if (BAA->getArchName())
1118 TC = Host->CreateToolChain(C.getArgs(), BAA->getArchName());
1119
Daniel Dunbarb5d86bb2009-09-09 18:36:01 +00001120 BuildJobsForAction(C, *BAA->begin(), TC, BAA->getArchName(),
Daniel Dunbarc12a4122010-08-02 02:38:12 +00001121 AtTopLevel, LinkingOutput, Result);
Daniel Dunbare75d8342009-03-16 06:56:51 +00001122 return;
1123 }
1124
Daniel Dunbare75d8342009-03-16 06:56:51 +00001125 const ActionList *Inputs = &A->getInputs();
Daniel Dunbarc4343942010-02-03 03:07:56 +00001126
1127 const JobAction *JA = cast<JobAction>(A);
1128 const Tool &T = SelectToolForJob(C, TC, JA, Inputs);
Daniel Dunbare75d8342009-03-16 06:56:51 +00001129
1130 // Only use pipes when there is exactly one input.
Daniel Dunbar1a093d22009-03-18 06:00:36 +00001131 InputInfoList InputInfos;
Daniel Dunbare75d8342009-03-16 06:56:51 +00001132 for (ActionList::const_iterator it = Inputs->begin(), ie = Inputs->end();
1133 it != ie; ++it) {
Daniel Dunbar6beaf512010-06-04 18:28:41 +00001134 // Treat dsymutil sub-jobs as being at the top-level too, they shouldn't get
1135 // temporary output names.
1136 //
1137 // FIXME: Clean this up.
1138 bool SubJobAtTopLevel = false;
1139 if (AtTopLevel && isa<DsymutilJobAction>(A))
1140 SubJobAtTopLevel = true;
1141
Daniel Dunbare75d8342009-03-16 06:56:51 +00001142 InputInfo II;
Daniel Dunbarc12a4122010-08-02 02:38:12 +00001143 BuildJobsForAction(C, *it, TC, BoundArch,
Daniel Dunbar6beaf512010-06-04 18:28:41 +00001144 SubJobAtTopLevel, LinkingOutput, II);
Daniel Dunbare75d8342009-03-16 06:56:51 +00001145 InputInfos.push_back(II);
1146 }
1147
Daniel Dunbare75d8342009-03-16 06:56:51 +00001148 // Always use the first input as the base input.
1149 const char *BaseInput = InputInfos[0].getBaseInput();
Daniel Dunbar7a178a42009-03-17 17:53:55 +00001150
Daniel Dunbar6beaf512010-06-04 18:28:41 +00001151 // ... except dsymutil actions, which use their actual input as the base
1152 // input.
1153 if (JA->getType() == types::TY_dSYM)
1154 BaseInput = InputInfos[0].getFilename();
1155
Daniel Dunbard00272f2010-08-02 02:38:15 +00001156 // Determine the place to write output to, if any.
Daniel Dunbar7a178a42009-03-17 17:53:55 +00001157 if (JA->getType() == types::TY_Nothing) {
Daniel Dunbarb39cc522009-03-17 22:47:06 +00001158 Result = InputInfo(A->getType(), BaseInput);
Daniel Dunbar7a178a42009-03-17 17:53:55 +00001159 } else {
Daniel Dunbarb39cc522009-03-17 22:47:06 +00001160 Result = InputInfo(GetNamedOutputPath(C, *JA, BaseInput, AtTopLevel),
1161 A->getType(), BaseInput);
Daniel Dunbar7a178a42009-03-17 17:53:55 +00001162 }
1163
Daniel Dunbarb39cc522009-03-17 22:47:06 +00001164 if (CCCPrintBindings) {
Daniel Dunbard67a3222009-03-30 06:36:42 +00001165 llvm::errs() << "# \"" << T.getToolChain().getTripleString() << '"'
1166 << " - \"" << T.getName() << "\", inputs: [";
Daniel Dunbarb39cc522009-03-17 22:47:06 +00001167 for (unsigned i = 0, e = InputInfos.size(); i != e; ++i) {
1168 llvm::errs() << InputInfos[i].getAsString();
1169 if (i + 1 != e)
1170 llvm::errs() << ", ";
1171 }
1172 llvm::errs() << "], output: " << Result.getAsString() << "\n";
1173 } else {
Daniel Dunbar7fbaf532010-08-02 02:38:28 +00001174 T.ConstructJob(C, *JA, Result, InputInfos,
Daniel Dunbarb5d86bb2009-09-09 18:36:01 +00001175 C.getArgsForToolChain(TC, BoundArch), LinkingOutput);
Daniel Dunbarb39cc522009-03-17 22:47:06 +00001176 }
Daniel Dunbare75d8342009-03-16 06:56:51 +00001177}
1178
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001179const char *Driver::GetNamedOutputPath(Compilation &C,
Daniel Dunbar7a178a42009-03-17 17:53:55 +00001180 const JobAction &JA,
1181 const char *BaseInput,
1182 bool AtTopLevel) const {
Daniel Dunbar2608c542009-03-18 01:38:48 +00001183 llvm::PrettyStackTraceString CrashInfo("Computing output path");
Daniel Dunbar7a178a42009-03-17 17:53:55 +00001184 // Output to a user requested destination?
Daniel Dunbar6beaf512010-06-04 18:28:41 +00001185 if (AtTopLevel && !isa<DsymutilJobAction>(JA)) {
Daniel Dunbar7a178a42009-03-17 17:53:55 +00001186 if (Arg *FinalOutput = C.getArgs().getLastArg(options::OPT_o))
1187 return C.addResultFile(FinalOutput->getValue(C.getArgs()));
1188 }
1189
Nick Lewycky6e1ce292010-09-24 00:46:53 +00001190 // Default to writing to stdout?
1191 if (AtTopLevel && isa<PreprocessJobAction>(JA))
1192 return "-";
1193
Daniel Dunbar7a178a42009-03-17 17:53:55 +00001194 // Output to a temporary file?
1195 if (!AtTopLevel && !C.getArgs().hasArg(options::OPT_save_temps)) {
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001196 std::string TmpName =
Daniel Dunbare627c1c2009-03-18 19:34:39 +00001197 GetTemporaryPath(types::getTypeTempSuffix(JA.getType()));
1198 return C.addTempFile(C.getArgs().MakeArgString(TmpName.c_str()));
Daniel Dunbar7a178a42009-03-17 17:53:55 +00001199 }
1200
1201 llvm::sys::Path BasePath(BaseInput);
Daniel Dunbard00978b2009-03-18 02:00:31 +00001202 std::string BaseName(BasePath.getLast());
Daniel Dunbar7a178a42009-03-17 17:53:55 +00001203
1204 // Determine what the derived output name should be.
1205 const char *NamedOutput;
1206 if (JA.getType() == types::TY_Image) {
1207 NamedOutput = DefaultImageName.c_str();
1208 } else {
1209 const char *Suffix = types::getTypeTempSuffix(JA.getType());
1210 assert(Suffix && "All types used for output should have a suffix.");
1211
1212 std::string::size_type End = std::string::npos;
1213 if (!types::appendSuffixForType(JA.getType()))
1214 End = BaseName.rfind('.');
1215 std::string Suffixed(BaseName.substr(0, End));
1216 Suffixed += '.';
1217 Suffixed += Suffix;
1218 NamedOutput = C.getArgs().MakeArgString(Suffixed.c_str());
1219 }
1220
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001221 // As an annoying special case, PCH generation doesn't strip the pathname.
Daniel Dunbar7a178a42009-03-17 17:53:55 +00001222 if (JA.getType() == types::TY_PCH) {
1223 BasePath.eraseComponent();
Daniel Dunbare6c83192009-03-18 09:58:30 +00001224 if (BasePath.isEmpty())
1225 BasePath = NamedOutput;
1226 else
1227 BasePath.appendComponent(NamedOutput);
Daniel Dunbar7a178a42009-03-17 17:53:55 +00001228 return C.addResultFile(C.getArgs().MakeArgString(BasePath.c_str()));
1229 } else {
1230 return C.addResultFile(NamedOutput);
1231 }
1232}
1233
Daniel Dunbar1ce81532009-09-09 22:33:00 +00001234std::string Driver::GetFilePath(const char *Name, const ToolChain &TC) const {
Chandler Carruth84559242010-03-22 01:52:07 +00001235 // Respect a limited subset of the '-Bprefix' functionality in GCC by
1236 // attempting to use this prefix when lokup up program paths.
1237 if (!PrefixDir.empty()) {
1238 llvm::sys::Path P(PrefixDir);
1239 P.appendComponent(Name);
1240 if (P.exists())
1241 return P.str();
1242 }
1243
Daniel Dunbar68b01a02009-03-18 20:26:19 +00001244 const ToolChain::path_list &List = TC.getFilePaths();
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001245 for (ToolChain::path_list::const_iterator
Daniel Dunbar68b01a02009-03-18 20:26:19 +00001246 it = List.begin(), ie = List.end(); it != ie; ++it) {
1247 llvm::sys::Path P(*it);
1248 P.appendComponent(Name);
1249 if (P.exists())
Daniel Dunbar1ce81532009-09-09 22:33:00 +00001250 return P.str();
Daniel Dunbar68b01a02009-03-18 20:26:19 +00001251 }
1252
Daniel Dunbar1ce81532009-09-09 22:33:00 +00001253 return Name;
Daniel Dunbar5e0f6af2009-03-13 00:51:18 +00001254}
1255
Daniel Dunbar1ce81532009-09-09 22:33:00 +00001256std::string Driver::GetProgramPath(const char *Name, const ToolChain &TC,
1257 bool WantFile) const {
Chandler Carruth84559242010-03-22 01:52:07 +00001258 // Respect a limited subset of the '-Bprefix' functionality in GCC by
1259 // attempting to use this prefix when lokup up program paths.
1260 if (!PrefixDir.empty()) {
1261 llvm::sys::Path P(PrefixDir);
1262 P.appendComponent(Name);
1263 if (WantFile ? P.exists() : P.canExecute())
1264 return P.str();
1265 }
1266
Daniel Dunbar68b01a02009-03-18 20:26:19 +00001267 const ToolChain::path_list &List = TC.getProgramPaths();
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001268 for (ToolChain::path_list::const_iterator
Daniel Dunbar68b01a02009-03-18 20:26:19 +00001269 it = List.begin(), ie = List.end(); it != ie; ++it) {
1270 llvm::sys::Path P(*it);
1271 P.appendComponent(Name);
Mike Stumpdb657372009-03-27 00:40:20 +00001272 if (WantFile ? P.exists() : P.canExecute())
Daniel Dunbar1ce81532009-09-09 22:33:00 +00001273 return P.str();
Daniel Dunbar68b01a02009-03-18 20:26:19 +00001274 }
1275
Daniel Dunbar76ce7412009-03-23 16:15:50 +00001276 // If all else failed, search the path.
1277 llvm::sys::Path P(llvm::sys::Program::FindProgramByName(Name));
Daniel Dunbar6f668772009-03-18 21:34:08 +00001278 if (!P.empty())
Daniel Dunbar1ce81532009-09-09 22:33:00 +00001279 return P.str();
Daniel Dunbar6f668772009-03-18 21:34:08 +00001280
Daniel Dunbar1ce81532009-09-09 22:33:00 +00001281 return Name;
Daniel Dunbar5e0f6af2009-03-13 00:51:18 +00001282}
1283
Daniel Dunbare627c1c2009-03-18 19:34:39 +00001284std::string Driver::GetTemporaryPath(const char *Suffix) const {
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001285 // FIXME: This is lame; sys::Path should provide this function (in particular,
1286 // it should know how to find the temporary files dir).
Daniel Dunbare627c1c2009-03-18 19:34:39 +00001287 std::string Error;
Daniel Dunbarc35694d2009-04-20 20:28:21 +00001288 const char *TmpDir = ::getenv("TMPDIR");
1289 if (!TmpDir)
1290 TmpDir = ::getenv("TEMP");
1291 if (!TmpDir)
Daniel Dunbar712e4de2009-04-21 00:25:10 +00001292 TmpDir = ::getenv("TMP");
1293 if (!TmpDir)
Daniel Dunbarc35694d2009-04-20 20:28:21 +00001294 TmpDir = "/tmp";
1295 llvm::sys::Path P(TmpDir);
Daniel Dunbarab8ce7c2009-04-20 17:32:49 +00001296 P.appendComponent("cc");
Daniel Dunbare627c1c2009-03-18 19:34:39 +00001297 if (P.makeUnique(false, &Error)) {
1298 Diag(clang::diag::err_drv_unable_to_make_temp) << Error;
1299 return "";
1300 }
1301
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001302 // FIXME: Grumble, makeUnique sometimes leaves the file around!? PR3837.
Daniel Dunbar18d69de2009-03-18 23:08:52 +00001303 P.eraseFromDisk(false, 0);
1304
Daniel Dunbare627c1c2009-03-18 19:34:39 +00001305 P.appendSuffix(Suffix);
Chris Lattner3441b4f2009-08-23 22:45:33 +00001306 return P.str();
Daniel Dunbare627c1c2009-03-18 19:34:39 +00001307}
1308
Daniel Dunbar51c7f972009-05-22 02:53:45 +00001309const HostInfo *Driver::GetHostInfo(const char *TripleStr) const {
Daniel Dunbar2608c542009-03-18 01:38:48 +00001310 llvm::PrettyStackTraceString CrashInfo("Constructing host");
Daniel Dunbar51c7f972009-05-22 02:53:45 +00001311 llvm::Triple Triple(TripleStr);
Daniel Dunbar4dff6a42009-03-10 23:41:59 +00001312
Chris Lattner09797542010-03-04 21:07:38 +00001313 // TCE is an osless target
1314 if (Triple.getArchName() == "tce")
Daniel Dunbarfb3d7472010-06-14 21:23:12 +00001315 return createTCEHostInfo(*this, Triple);
Chris Lattner09797542010-03-04 21:07:38 +00001316
Daniel Dunbar51c7f972009-05-22 02:53:45 +00001317 switch (Triple.getOS()) {
Edward O'Callaghan856e4ff2009-08-22 01:06:46 +00001318 case llvm::Triple::AuroraUX:
1319 return createAuroraUXHostInfo(*this, Triple);
Daniel Dunbar51c7f972009-05-22 02:53:45 +00001320 case llvm::Triple::Darwin:
1321 return createDarwinHostInfo(*this, Triple);
1322 case llvm::Triple::DragonFly:
1323 return createDragonFlyHostInfo(*this, Triple);
Daniel Dunbar10de9e62009-06-29 20:52:51 +00001324 case llvm::Triple::OpenBSD:
1325 return createOpenBSDHostInfo(*this, Triple);
Daniel Dunbar51c7f972009-05-22 02:53:45 +00001326 case llvm::Triple::FreeBSD:
1327 return createFreeBSDHostInfo(*this, Triple);
Chris Lattner3e2ee142010-07-07 16:01:42 +00001328 case llvm::Triple::Minix:
1329 return createMinixHostInfo(*this, Triple);
Eli Friedman5cd659f2009-05-26 07:52:18 +00001330 case llvm::Triple::Linux:
1331 return createLinuxHostInfo(*this, Triple);
Michael J. Spencerb186bc32010-08-21 21:55:07 +00001332 case llvm::Triple::Win32:
1333 return createWindowsHostInfo(*this, Triple);
1334 case llvm::Triple::MinGW32:
1335 case llvm::Triple::MinGW64:
1336 return createMinGWHostInfo(*this, Triple);
Daniel Dunbar51c7f972009-05-22 02:53:45 +00001337 default:
1338 return createUnknownHostInfo(*this, Triple);
1339 }
Daniel Dunbar4dff6a42009-03-10 23:41:59 +00001340}
Daniel Dunbar8fa879d2009-03-24 18:57:02 +00001341
1342bool Driver::ShouldUseClangCompiler(const Compilation &C, const JobAction &JA,
Daniel Dunbar953b8d12009-09-08 23:36:55 +00001343 const llvm::Triple &Triple) const {
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001344 // Check if user requested no clang, or clang doesn't understand this type (we
1345 // only handle single inputs for now).
Daniel Dunbar6cdf83c2009-09-01 16:57:46 +00001346 if (!CCCUseClang || JA.size() != 1 ||
Daniel Dunbar8fa879d2009-03-24 18:57:02 +00001347 !types::isAcceptedByClang((*JA.begin())->getType()))
1348 return false;
1349
Daniel Dunbar88f356e2009-03-24 19:02:31 +00001350 // Otherwise make sure this is an action clang understands.
Daniel Dunbar8fa879d2009-03-24 18:57:02 +00001351 if (isa<PreprocessJobAction>(JA)) {
Daniel Dunbar6b5244d2009-03-24 19:14:56 +00001352 if (!CCCUseClangCPP) {
1353 Diag(clang::diag::warn_drv_not_using_clang_cpp);
Daniel Dunbar8fa879d2009-03-24 18:57:02 +00001354 return false;
Daniel Dunbar6b5244d2009-03-24 19:14:56 +00001355 }
Daniel Dunbar8fa879d2009-03-24 18:57:02 +00001356 } else if (!isa<PrecompileJobAction>(JA) && !isa<CompileJobAction>(JA))
1357 return false;
1358
Daniel Dunbar88f356e2009-03-24 19:02:31 +00001359 // Use clang for C++?
Daniel Dunbar6b5244d2009-03-24 19:14:56 +00001360 if (!CCCUseClangCXX && types::isCXX((*JA.begin())->getType())) {
1361 Diag(clang::diag::warn_drv_not_using_clang_cxx);
Daniel Dunbar8fa879d2009-03-24 18:57:02 +00001362 return false;
Daniel Dunbar6b5244d2009-03-24 19:14:56 +00001363 }
Daniel Dunbar8fa879d2009-03-24 18:57:02 +00001364
Daniel Dunbaraeea8ac2010-02-11 03:16:21 +00001365 // Always use clang for precompiling, AST generation, and rewriting,
1366 // regardless of archs.
Daniel Dunbar24e52992010-06-07 23:28:45 +00001367 if (isa<PrecompileJobAction>(JA) ||
1368 types::isOnlyAcceptedByClang(JA.getType()))
Daniel Dunbarf2df7c22009-04-16 23:10:13 +00001369 return true;
1370
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001371 // Finally, don't use clang if this isn't one of the user specified archs to
1372 // build.
Daniel Dunbar953b8d12009-09-08 23:36:55 +00001373 if (!CCCClangArchs.empty() && !CCCClangArchs.count(Triple.getArch())) {
1374 Diag(clang::diag::warn_drv_not_using_clang_arch) << Triple.getArchName();
Daniel Dunbar8fa879d2009-03-24 18:57:02 +00001375 return false;
Daniel Dunbar6b5244d2009-03-24 19:14:56 +00001376 }
Daniel Dunbar8fa879d2009-03-24 18:57:02 +00001377
1378 return true;
1379}
Daniel Dunbarc7fd57a2009-03-26 15:58:36 +00001380
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001381/// GetReleaseVersion - Parse (([0-9]+)(.([0-9]+)(.([0-9]+)?))?)? and return the
1382/// grouped values as integers. Numbers which are not provided are set to 0.
Daniel Dunbarc7fd57a2009-03-26 15:58:36 +00001383///
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001384/// \return True if the entire string was parsed (9.2), or all groups were
1385/// parsed (10.3.5extrastuff).
1386bool Driver::GetReleaseVersion(const char *Str, unsigned &Major,
Daniel Dunbarc7fd57a2009-03-26 15:58:36 +00001387 unsigned &Minor, unsigned &Micro,
1388 bool &HadExtra) {
1389 HadExtra = false;
1390
1391 Major = Minor = Micro = 0;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001392 if (*Str == '\0')
Daniel Dunbarc7fd57a2009-03-26 15:58:36 +00001393 return true;
1394
1395 char *End;
1396 Major = (unsigned) strtol(Str, &End, 10);
1397 if (*Str != '\0' && *End == '\0')
1398 return true;
1399 if (*End != '.')
1400 return false;
Daniel Dunbarf26a7ab2009-09-08 23:36:43 +00001401
Daniel Dunbarc7fd57a2009-03-26 15:58:36 +00001402 Str = End+1;
1403 Minor = (unsigned) strtol(Str, &End, 10);
1404 if (*Str != '\0' && *End == '\0')
1405 return true;
1406 if (*End != '.')
1407 return false;
1408
1409 Str = End+1;
1410 Micro = (unsigned) strtol(Str, &End, 10);
1411 if (*Str != '\0' && *End == '\0')
1412 return true;
1413 if (Str == End)
1414 return false;
1415 HadExtra = true;
1416 return true;
1417}