2009-03-03 03:59:07 +08:00
|
|
|
//===--- Driver.cpp - Clang GCC Compatible Driver -----------------------*-===//
|
|
|
|
//
|
|
|
|
// The LLVM Compiler Infrastructure
|
|
|
|
//
|
|
|
|
// This file is distributed under the University of Illinois Open Source
|
|
|
|
// License. See LICENSE.TXT for details.
|
|
|
|
//
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
|
|
|
|
#include "clang/Driver/Driver.h"
|
|
|
|
|
2009-03-12 15:58:46 +08:00
|
|
|
#include "clang/Driver/Action.h"
|
2009-03-05 04:49:20 +08:00
|
|
|
#include "clang/Driver/Arg.h"
|
|
|
|
#include "clang/Driver/ArgList.h"
|
|
|
|
#include "clang/Driver/Compilation.h"
|
2009-03-12 16:55:43 +08:00
|
|
|
#include "clang/Driver/DriverDiagnostic.h"
|
2009-03-11 07:41:59 +08:00
|
|
|
#include "clang/Driver/HostInfo.h"
|
2009-03-16 14:56:51 +08:00
|
|
|
#include "clang/Driver/Job.h"
|
2009-11-19 08:15:11 +08:00
|
|
|
#include "clang/Driver/OptTable.h"
|
2009-03-05 14:38:47 +08:00
|
|
|
#include "clang/Driver/Option.h"
|
2009-03-05 04:49:20 +08:00
|
|
|
#include "clang/Driver/Options.h"
|
2009-03-16 14:56:51 +08:00
|
|
|
#include "clang/Driver/Tool.h"
|
|
|
|
#include "clang/Driver/ToolChain.h"
|
2009-03-12 15:58:46 +08:00
|
|
|
#include "clang/Driver/Types.h"
|
2009-03-05 14:38:47 +08:00
|
|
|
|
2009-04-28 06:23:34 +08:00
|
|
|
#include "clang/Basic/Version.h"
|
|
|
|
|
2009-03-14 04:33:35 +08:00
|
|
|
#include "llvm/ADT/StringSet.h"
|
2010-01-19 09:29:05 +08:00
|
|
|
#include "llvm/ADT/OwningPtr.h"
|
2009-03-18 09:38:48 +08:00
|
|
|
#include "llvm/Support/PrettyStackTrace.h"
|
2009-03-05 14:38:47 +08:00
|
|
|
#include "llvm/Support/raw_ostream.h"
|
2009-03-12 15:58:46 +08:00
|
|
|
#include "llvm/System/Path.h"
|
2009-03-19 05:34:08 +08:00
|
|
|
#include "llvm/System/Program.h"
|
2009-03-13 20:19:02 +08:00
|
|
|
|
2009-03-16 14:56:51 +08:00
|
|
|
#include "InputInfo.h"
|
|
|
|
|
2009-03-13 20:19:02 +08:00
|
|
|
#include <map>
|
|
|
|
|
2009-03-05 04:49:20 +08:00
|
|
|
using namespace clang::driver;
|
2009-03-26 13:56:24 +08:00
|
|
|
using namespace clang;
|
2009-03-05 04:49:20 +08:00
|
|
|
|
2009-08-24 02:42:54 +08:00
|
|
|
// Used to set values for "production" clang, for releases.
|
2009-08-24 03:41:53 +08:00
|
|
|
// #define USE_PRODUCTION_CLANG
|
2009-08-24 02:42:54 +08:00
|
|
|
|
2009-12-08 09:46:24 +08:00
|
|
|
Driver::Driver(llvm::StringRef _Name, llvm::StringRef _Dir,
|
|
|
|
llvm::StringRef _DefaultHostTriple,
|
|
|
|
llvm::StringRef _DefaultImageName,
|
2010-04-02 02:21:41 +08:00
|
|
|
bool IsProduction, bool CXXIsProduction,
|
|
|
|
Diagnostic &_Diags)
|
2009-11-19 04:19:36 +08:00
|
|
|
: Opts(createDriverOptTable()), Diags(_Diags),
|
2009-03-11 07:41:59 +08:00
|
|
|
Name(_Name), Dir(_Dir), DefaultHostTriple(_DefaultHostTriple),
|
2009-03-16 14:56:51 +08:00
|
|
|
DefaultImageName(_DefaultImageName),
|
2010-02-25 11:31:53 +08:00
|
|
|
DriverTitle("clang \"gcc-compatible\" driver"),
|
2009-03-11 07:41:59 +08:00
|
|
|
Host(0),
|
2010-03-20 16:01:59 +08:00
|
|
|
CCCGenericGCCName("gcc"), CCPrintOptionsFilename(0), CCCIsCXX(false),
|
|
|
|
CCCEcho(false), CCCPrintBindings(false), CCPrintOptions(false),
|
|
|
|
CheckInputsExist(true), CCCUseClang(true), CCCUseClangCXX(true),
|
|
|
|
CCCUseClangCPP(true), CCCUsePCH(true), SuppressMissingInputWarning(false) {
|
2009-09-23 06:31:13 +08:00
|
|
|
if (IsProduction) {
|
|
|
|
// In a "production" build, only use clang on architectures we expect to
|
|
|
|
// work, and don't use clang C++.
|
|
|
|
//
|
|
|
|
// During development its more convenient to always have the driver use
|
|
|
|
// clang, but we don't want users to be confused when things don't work, or
|
|
|
|
// to file bugs for things we don't support.
|
|
|
|
CCCClangArchs.insert(llvm::Triple::x86);
|
|
|
|
CCCClangArchs.insert(llvm::Triple::x86_64);
|
|
|
|
CCCClangArchs.insert(llvm::Triple::arm);
|
|
|
|
|
2010-04-02 02:21:41 +08:00
|
|
|
if (!CXXIsProduction)
|
|
|
|
CCCUseClangCXX = false;
|
2009-09-23 06:31:13 +08:00
|
|
|
}
|
2010-01-20 10:35:16 +08:00
|
|
|
|
|
|
|
// Compute the path to the resource directory.
|
|
|
|
llvm::sys::Path P(Dir);
|
|
|
|
P.eraseComponent(); // Remove /bin from foo/bin
|
|
|
|
P.appendComponent("lib");
|
|
|
|
P.appendComponent("clang");
|
|
|
|
P.appendComponent(CLANG_VERSION_STRING);
|
|
|
|
ResourceDir = P.str();
|
2009-03-03 03:59:07 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
Driver::~Driver() {
|
2009-03-05 04:49:20 +08:00
|
|
|
delete Opts;
|
2009-03-18 09:09:40 +08:00
|
|
|
delete Host;
|
2009-03-03 03:59:07 +08:00
|
|
|
}
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
InputArgList *Driver::ParseArgStrings(const char **ArgBegin,
|
2009-03-25 12:13:45 +08:00
|
|
|
const char **ArgEnd) {
|
2009-03-18 09:38:48 +08:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Command line argument parsing");
|
2009-11-19 14:35:06 +08:00
|
|
|
unsigned MissingArgIndex, MissingArgCount;
|
|
|
|
InputArgList *Args = getOpts().ParseArgs(ArgBegin, ArgEnd,
|
|
|
|
MissingArgIndex, MissingArgCount);
|
|
|
|
|
|
|
|
// Check for missing argument error.
|
|
|
|
if (MissingArgCount)
|
|
|
|
Diag(clang::diag::err_drv_missing_argument)
|
|
|
|
<< Args->getArgString(MissingArgIndex) << MissingArgCount;
|
|
|
|
|
|
|
|
// Check for unsupported options.
|
|
|
|
for (ArgList::const_iterator it = Args->begin(), ie = Args->end();
|
|
|
|
it != ie; ++it) {
|
|
|
|
Arg *A = *it;
|
2009-03-23 07:26:43 +08:00
|
|
|
if (A->getOption().isUnsupported()) {
|
|
|
|
Diag(clang::diag::err_drv_unsupported_opt) << A->getAsString(*Args);
|
|
|
|
continue;
|
|
|
|
}
|
2009-03-05 14:38:47 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
return Args;
|
|
|
|
}
|
|
|
|
|
2010-06-12 06:00:26 +08:00
|
|
|
DerivedArgList *Driver::TranslateInputArgs(const InputArgList &Args) const {
|
|
|
|
DerivedArgList *DAL = new DerivedArgList(Args);
|
|
|
|
|
|
|
|
for (ArgList::const_iterator it = Args.begin(),
|
2010-06-15 05:23:12 +08:00
|
|
|
ie = Args.end(); it != ie; ++it) {
|
|
|
|
const Arg *A = *it;
|
|
|
|
|
|
|
|
// Unfortunately, we have to parse some forwarding options (-Xassembler,
|
|
|
|
// -Xlinker, -Xpreprocessor) because we either integrate their functionality
|
|
|
|
// (assembler and preprocessor), or bypass a previous driver ('collect2').
|
2010-06-15 05:37:09 +08:00
|
|
|
|
|
|
|
// Rewrite linker options, to replace --no-demangle with a custom internal
|
|
|
|
// option.
|
|
|
|
if ((A->getOption().matches(options::OPT_Wl_COMMA) ||
|
|
|
|
A->getOption().matches(options::OPT_Xlinker)) &&
|
|
|
|
A->containsValue("--no-demangle")) {
|
2010-06-15 05:23:12 +08:00
|
|
|
// Add the rewritten no-demangle argument.
|
|
|
|
DAL->AddFlagArg(A, Opts->getOption(options::OPT_Z_Xlinker__no_demangle));
|
|
|
|
|
|
|
|
// Add the remaining values as Xlinker arguments.
|
|
|
|
for (unsigned i = 0, e = A->getNumValues(); i != e; ++i)
|
|
|
|
if (llvm::StringRef(A->getValue(Args, i)) != "--no-demangle")
|
|
|
|
DAL->AddSeparateArg(A, Opts->getOption(options::OPT_Xlinker),
|
|
|
|
A->getValue(Args, i));
|
|
|
|
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
2010-06-15 05:37:09 +08:00
|
|
|
// Rewrite preprocessor options, to replace -Wp,-MD,FOO which is used by
|
|
|
|
// some build systems. We don't try to be complete here because we don't
|
|
|
|
// care to encourage this usage model.
|
|
|
|
if (A->getOption().matches(options::OPT_Wp_COMMA) &&
|
|
|
|
A->getNumValues() == 2 &&
|
2010-06-16 04:30:18 +08:00
|
|
|
(A->getValue(Args, 0) == llvm::StringRef("-MD") ||
|
|
|
|
A->getValue(Args, 0) == llvm::StringRef("-MMD"))) {
|
|
|
|
// Rewrite to -MD/-MMD along with -MF.
|
|
|
|
if (A->getValue(Args, 0) == llvm::StringRef("-MD"))
|
|
|
|
DAL->AddFlagArg(A, Opts->getOption(options::OPT_MD));
|
|
|
|
else
|
|
|
|
DAL->AddFlagArg(A, Opts->getOption(options::OPT_MMD));
|
2010-06-15 05:37:09 +08:00
|
|
|
DAL->AddSeparateArg(A, Opts->getOption(options::OPT_MF),
|
|
|
|
A->getValue(Args, 1));
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
2010-06-12 06:00:26 +08:00
|
|
|
DAL->append(*it);
|
2010-06-15 05:23:12 +08:00
|
|
|
}
|
2010-06-12 06:00:26 +08:00
|
|
|
|
|
|
|
return DAL;
|
|
|
|
}
|
|
|
|
|
2009-03-03 03:59:07 +08:00
|
|
|
Compilation *Driver::BuildCompilation(int argc, const char **argv) {
|
2009-03-18 09:38:48 +08:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Compilation construction");
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// FIXME: Handle environment options which effect driver behavior, somewhere
|
|
|
|
// (client?). GCC_EXEC_PREFIX, COMPILER_PATH, LIBRARY_PATH, LPATH,
|
|
|
|
// CC_PRINT_OPTIONS.
|
2009-03-13 08:51:18 +08:00
|
|
|
|
|
|
|
// FIXME: What are we going to do with -V and -b?
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// FIXME: This stuff needs to go into the Compilation, not the driver.
|
2009-03-12 15:58:46 +08:00
|
|
|
bool CCCPrintOptions = false, CCCPrintActions = false;
|
2009-03-05 14:38:47 +08:00
|
|
|
|
2009-03-11 04:52:46 +08:00
|
|
|
const char **Start = argv + 1, **End = argv + argc;
|
2009-03-11 07:41:59 +08:00
|
|
|
const char *HostTriple = DefaultHostTriple.c_str();
|
2009-03-11 04:52:46 +08:00
|
|
|
|
2009-12-05 05:55:23 +08:00
|
|
|
InputArgList *Args = ParseArgStrings(Start, End);
|
|
|
|
|
2009-12-08 02:28:29 +08:00
|
|
|
// -no-canonical-prefixes is used very early in main.
|
|
|
|
Args->ClaimAllArgs(options::OPT_no_canonical_prefixes);
|
|
|
|
|
2009-12-05 05:55:23 +08:00
|
|
|
// Extract -ccc args.
|
2009-03-11 04:52:46 +08:00
|
|
|
//
|
2009-09-09 07:36:43 +08:00
|
|
|
// FIXME: We need to figure out where this behavior should live. Most of it
|
|
|
|
// should be outside in the client; the parts that aren't should have proper
|
|
|
|
// options, either by introducing new ones or by overloading gcc ones like -V
|
|
|
|
// or -b.
|
2009-12-05 05:55:23 +08:00
|
|
|
CCCPrintOptions = Args->hasArg(options::OPT_ccc_print_options);
|
|
|
|
CCCPrintActions = Args->hasArg(options::OPT_ccc_print_phases);
|
|
|
|
CCCPrintBindings = Args->hasArg(options::OPT_ccc_print_bindings);
|
2009-12-05 08:13:59 +08:00
|
|
|
CCCIsCXX = Args->hasArg(options::OPT_ccc_cxx) || CCCIsCXX;
|
2009-12-05 05:55:23 +08:00
|
|
|
CCCEcho = Args->hasArg(options::OPT_ccc_echo);
|
|
|
|
if (const Arg *A = Args->getLastArg(options::OPT_ccc_gcc_name))
|
|
|
|
CCCGenericGCCName = A->getValue(*Args);
|
|
|
|
CCCUseClangCXX = Args->hasFlag(options::OPT_ccc_clang_cxx,
|
2009-12-05 08:13:59 +08:00
|
|
|
options::OPT_ccc_no_clang_cxx,
|
|
|
|
CCCUseClangCXX);
|
2009-12-05 05:55:23 +08:00
|
|
|
CCCUsePCH = Args->hasFlag(options::OPT_ccc_pch_is_pch,
|
|
|
|
options::OPT_ccc_pch_is_pth);
|
|
|
|
CCCUseClang = !Args->hasArg(options::OPT_ccc_no_clang);
|
|
|
|
CCCUseClangCPP = !Args->hasArg(options::OPT_ccc_no_clang_cpp);
|
|
|
|
if (const Arg *A = Args->getLastArg(options::OPT_ccc_clang_archs)) {
|
|
|
|
llvm::StringRef Cur = A->getValue(*Args);
|
|
|
|
|
|
|
|
CCCClangArchs.clear();
|
|
|
|
while (!Cur.empty()) {
|
|
|
|
std::pair<llvm::StringRef, llvm::StringRef> Split = Cur.split(',');
|
|
|
|
|
|
|
|
if (!Split.first.empty()) {
|
|
|
|
llvm::Triple::ArchType Arch =
|
|
|
|
llvm::Triple(Split.first, "", "").getArch();
|
|
|
|
|
2010-02-11 11:16:07 +08:00
|
|
|
if (Arch == llvm::Triple::UnknownArch)
|
|
|
|
Diag(clang::diag::err_drv_invalid_arch_name) << Split.first;
|
2009-03-11 04:52:46 +08:00
|
|
|
|
2009-12-05 05:55:23 +08:00
|
|
|
CCCClangArchs.insert(Arch);
|
2009-09-09 07:36:55 +08:00
|
|
|
}
|
2009-12-05 05:55:23 +08:00
|
|
|
|
|
|
|
Cur = Split.second;
|
2009-03-11 04:52:46 +08:00
|
|
|
}
|
|
|
|
}
|
2009-12-05 05:55:23 +08:00
|
|
|
if (const Arg *A = Args->getLastArg(options::OPT_ccc_host_triple))
|
|
|
|
HostTriple = A->getValue(*Args);
|
|
|
|
if (const Arg *A = Args->getLastArg(options::OPT_ccc_install_dir))
|
|
|
|
Dir = A->getValue(*Args);
|
2010-03-22 09:52:07 +08:00
|
|
|
if (const Arg *A = Args->getLastArg(options::OPT_B))
|
|
|
|
PrefixDir = A->getValue(*Args);
|
2009-03-11 04:52:46 +08:00
|
|
|
|
2009-03-18 04:45:45 +08:00
|
|
|
Host = GetHostInfo(HostTriple);
|
2009-03-13 08:51:18 +08:00
|
|
|
|
2010-06-12 06:00:26 +08:00
|
|
|
// Perform the default argument translations.
|
|
|
|
DerivedArgList *TranslatedArgs = TranslateInputArgs(*Args);
|
|
|
|
|
2009-03-18 10:55:38 +08:00
|
|
|
// The compilation takes ownership of Args.
|
2010-06-12 06:00:26 +08:00
|
|
|
Compilation *C = new Compilation(*this, *Host->CreateToolChain(*Args), Args,
|
|
|
|
TranslatedArgs);
|
2009-03-18 10:55:38 +08:00
|
|
|
|
2009-03-11 04:52:46 +08:00
|
|
|
// FIXME: This behavior shouldn't be here.
|
|
|
|
if (CCCPrintOptions) {
|
2010-06-12 06:43:38 +08:00
|
|
|
PrintOptions(C->getInputArgs());
|
2009-03-18 10:55:38 +08:00
|
|
|
return C;
|
2009-03-11 04:52:46 +08:00
|
|
|
}
|
2009-03-12 15:58:46 +08:00
|
|
|
|
2009-03-18 10:55:38 +08:00
|
|
|
if (!HandleImmediateArgs(*C))
|
|
|
|
return C;
|
2009-03-13 08:51:18 +08:00
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// Construct the list of abstract actions to perform for this compilation. We
|
|
|
|
// avoid passing a Compilation here simply to enforce the abstraction that
|
|
|
|
// pipelining is not host or toolchain dependent (other than the driver driver
|
|
|
|
// test).
|
2009-03-12 15:58:46 +08:00
|
|
|
if (Host->useDriverDriver())
|
2009-03-18 10:55:38 +08:00
|
|
|
BuildUniversalActions(C->getArgs(), C->getActions());
|
2009-03-12 15:58:46 +08:00
|
|
|
else
|
2009-03-18 10:55:38 +08:00
|
|
|
BuildActions(C->getArgs(), C->getActions());
|
2009-03-12 15:58:46 +08:00
|
|
|
|
|
|
|
if (CCCPrintActions) {
|
2009-03-18 11:13:20 +08:00
|
|
|
PrintActions(*C);
|
2009-03-18 10:55:38 +08:00
|
|
|
return C;
|
2009-03-12 15:58:46 +08:00
|
|
|
}
|
2009-03-14 01:24:34 +08:00
|
|
|
|
2009-03-18 10:55:38 +08:00
|
|
|
BuildJobs(*C);
|
2009-03-15 09:38:15 +08:00
|
|
|
|
|
|
|
return C;
|
2009-03-11 04:52:46 +08:00
|
|
|
}
|
|
|
|
|
2009-07-02 04:03:04 +08:00
|
|
|
int Driver::ExecuteCompilation(const Compilation &C) const {
|
|
|
|
// Just print if -### was present.
|
|
|
|
if (C.getArgs().hasArg(options::OPT__HASH_HASH_HASH)) {
|
|
|
|
C.PrintJob(llvm::errs(), C.getJobs(), "\n", true);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
// If there were errors building the compilation, quit now.
|
|
|
|
if (getDiags().getNumErrors())
|
|
|
|
return 1;
|
|
|
|
|
|
|
|
const Command *FailingCommand = 0;
|
|
|
|
int Res = C.ExecuteJob(C.getJobs(), FailingCommand);
|
2009-09-09 07:36:43 +08:00
|
|
|
|
2009-07-02 04:03:04 +08:00
|
|
|
// Remove temp files.
|
|
|
|
C.CleanupFileList(C.getTempFiles());
|
|
|
|
|
2010-05-22 08:37:20 +08:00
|
|
|
// If the command succeeded, we are done.
|
|
|
|
if (Res == 0)
|
|
|
|
return Res;
|
|
|
|
|
|
|
|
// Otherwise, remove result files as well.
|
|
|
|
if (!C.getArgs().hasArg(options::OPT_save_temps))
|
2009-07-02 04:03:04 +08:00
|
|
|
C.CleanupFileList(C.getResultFiles(), true);
|
|
|
|
|
|
|
|
// Print extra information about abnormal failures, if possible.
|
2010-05-22 08:37:20 +08:00
|
|
|
//
|
|
|
|
// This is ad-hoc, but we don't want to be excessively noisy. If the result
|
|
|
|
// status was 1, assume the command failed normally. In particular, if it was
|
|
|
|
// the compiler then assume it gave a reasonable error code. Failures in other
|
|
|
|
// tools are less common, and they generally have worse diagnostics, so always
|
|
|
|
// print the diagnostic there.
|
|
|
|
const Tool &FailingTool = FailingCommand->getCreator();
|
|
|
|
|
|
|
|
if (!FailingCommand->getCreator().hasGoodDiagnostics() || Res != 1) {
|
|
|
|
// FIXME: See FIXME above regarding result code interpretation.
|
|
|
|
if (Res < 0)
|
|
|
|
Diag(clang::diag::err_drv_command_signalled)
|
|
|
|
<< FailingTool.getShortName() << -Res;
|
|
|
|
else
|
|
|
|
Diag(clang::diag::err_drv_command_failed)
|
|
|
|
<< FailingTool.getShortName() << Res;
|
2009-07-02 04:03:04 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
return Res;
|
|
|
|
}
|
|
|
|
|
2009-03-13 02:24:49 +08:00
|
|
|
void Driver::PrintOptions(const ArgList &Args) const {
|
2009-03-05 14:38:47 +08:00
|
|
|
unsigned i = 0;
|
2009-09-09 07:36:43 +08:00
|
|
|
for (ArgList::const_iterator it = Args.begin(), ie = Args.end();
|
2009-03-05 14:38:47 +08:00
|
|
|
it != ie; ++it, ++i) {
|
|
|
|
Arg *A = *it;
|
|
|
|
llvm::errs() << "Option " << i << " - "
|
|
|
|
<< "Name: \"" << A->getOption().getName() << "\", "
|
|
|
|
<< "Values: {";
|
|
|
|
for (unsigned j = 0; j < A->getNumValues(); ++j) {
|
|
|
|
if (j)
|
|
|
|
llvm::errs() << ", ";
|
2009-03-12 15:58:46 +08:00
|
|
|
llvm::errs() << '"' << A->getValue(Args, j) << '"';
|
2009-03-05 14:38:47 +08:00
|
|
|
}
|
|
|
|
llvm::errs() << "}\n";
|
|
|
|
}
|
2009-03-03 03:59:07 +08:00
|
|
|
}
|
2009-03-11 07:41:59 +08:00
|
|
|
|
2009-04-16 00:34:29 +08:00
|
|
|
void Driver::PrintHelp(bool ShowHidden) const {
|
2010-02-25 11:31:53 +08:00
|
|
|
getOpts().PrintHelp(llvm::outs(), Name.c_str(), DriverTitle.c_str(),
|
|
|
|
ShowHidden);
|
2009-04-01 05:38:17 +08:00
|
|
|
}
|
|
|
|
|
2009-07-22 04:06:58 +08:00
|
|
|
void Driver::PrintVersion(const Compilation &C, llvm::raw_ostream &OS) const {
|
2009-09-09 07:36:43 +08:00
|
|
|
// FIXME: The following handlers should use a callback mechanism, we don't
|
|
|
|
// know what the client would like to do.
|
2010-01-23 10:11:34 +08:00
|
|
|
OS << getClangFullVersion() << '\n';
|
2009-03-27 00:09:13 +08:00
|
|
|
const ToolChain &TC = C.getDefaultToolChain();
|
2009-07-22 04:06:58 +08:00
|
|
|
OS << "Target: " << TC.getTripleString() << '\n';
|
2009-06-17 07:32:58 +08:00
|
|
|
|
|
|
|
// Print the threading model.
|
|
|
|
//
|
|
|
|
// FIXME: Implement correctly.
|
2009-07-22 04:06:58 +08:00
|
|
|
OS << "Thread model: " << "posix" << '\n';
|
2009-03-13 08:51:18 +08:00
|
|
|
}
|
|
|
|
|
2010-05-05 13:53:24 +08:00
|
|
|
/// PrintDiagnosticCategories - Implement the --print-diagnostic-categories
|
|
|
|
/// option.
|
|
|
|
static void PrintDiagnosticCategories(llvm::raw_ostream &OS) {
|
|
|
|
for (unsigned i = 1; // Skip the empty category.
|
|
|
|
const char *CategoryName = Diagnostic::getCategoryNameFromID(i); ++i)
|
|
|
|
OS << i << ',' << CategoryName << '\n';
|
|
|
|
}
|
|
|
|
|
2009-03-18 10:55:38 +08:00
|
|
|
bool Driver::HandleImmediateArgs(const Compilation &C) {
|
2010-06-12 06:00:19 +08:00
|
|
|
// The order these options are handled in gcc is all over the place, but we
|
2009-09-09 07:36:43 +08:00
|
|
|
// don't expect inconsistencies w.r.t. that to matter in practice.
|
2009-04-01 05:38:17 +08:00
|
|
|
|
2009-04-04 13:17:38 +08:00
|
|
|
if (C.getArgs().hasArg(options::OPT_dumpversion)) {
|
2009-04-28 06:23:34 +08:00
|
|
|
llvm::outs() << CLANG_VERSION_STRING "\n";
|
2009-04-04 13:17:38 +08:00
|
|
|
return false;
|
|
|
|
}
|
2010-06-15 05:23:12 +08:00
|
|
|
|
2010-05-05 13:53:24 +08:00
|
|
|
if (C.getArgs().hasArg(options::OPT__print_diagnostic_categories)) {
|
|
|
|
PrintDiagnosticCategories(llvm::outs());
|
|
|
|
return false;
|
|
|
|
}
|
2009-04-04 13:17:38 +08:00
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
if (C.getArgs().hasArg(options::OPT__help) ||
|
2009-04-16 00:34:29 +08:00
|
|
|
C.getArgs().hasArg(options::OPT__help_hidden)) {
|
|
|
|
PrintHelp(C.getArgs().hasArg(options::OPT__help_hidden));
|
2009-04-01 05:38:17 +08:00
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
2009-04-02 23:05:41 +08:00
|
|
|
if (C.getArgs().hasArg(options::OPT__version)) {
|
2009-09-09 07:36:43 +08:00
|
|
|
// Follow gcc behavior and use stdout for --version and stderr for -v.
|
2009-07-22 04:06:58 +08:00
|
|
|
PrintVersion(C, llvm::outs());
|
2009-04-02 23:05:41 +08:00
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
if (C.getArgs().hasArg(options::OPT_v) ||
|
2009-03-18 10:55:38 +08:00
|
|
|
C.getArgs().hasArg(options::OPT__HASH_HASH_HASH)) {
|
2009-07-22 04:06:58 +08:00
|
|
|
PrintVersion(C, llvm::errs());
|
2009-03-13 08:51:18 +08:00
|
|
|
SuppressMissingInputWarning = true;
|
|
|
|
}
|
|
|
|
|
2009-03-18 10:55:38 +08:00
|
|
|
const ToolChain &TC = C.getDefaultToolChain();
|
2009-03-20 12:37:21 +08:00
|
|
|
if (C.getArgs().hasArg(options::OPT_print_search_dirs)) {
|
|
|
|
llvm::outs() << "programs: =";
|
|
|
|
for (ToolChain::path_list::const_iterator it = TC.getProgramPaths().begin(),
|
|
|
|
ie = TC.getProgramPaths().end(); it != ie; ++it) {
|
|
|
|
if (it != TC.getProgramPaths().begin())
|
|
|
|
llvm::outs() << ':';
|
|
|
|
llvm::outs() << *it;
|
|
|
|
}
|
|
|
|
llvm::outs() << "\n";
|
|
|
|
llvm::outs() << "libraries: =";
|
2009-09-09 07:36:43 +08:00
|
|
|
for (ToolChain::path_list::const_iterator it = TC.getFilePaths().begin(),
|
2009-03-20 12:37:21 +08:00
|
|
|
ie = TC.getFilePaths().end(); it != ie; ++it) {
|
|
|
|
if (it != TC.getFilePaths().begin())
|
|
|
|
llvm::outs() << ':';
|
|
|
|
llvm::outs() << *it;
|
|
|
|
}
|
|
|
|
llvm::outs() << "\n";
|
2009-04-01 05:38:17 +08:00
|
|
|
return false;
|
2009-03-20 12:37:21 +08:00
|
|
|
}
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// FIXME: The following handlers should use a callback mechanism, we don't
|
|
|
|
// know what the client would like to do.
|
2009-03-18 10:55:38 +08:00
|
|
|
if (Arg *A = C.getArgs().getLastArg(options::OPT_print_file_name_EQ)) {
|
2009-09-10 06:33:00 +08:00
|
|
|
llvm::outs() << GetFilePath(A->getValue(C.getArgs()), TC) << "\n";
|
2009-03-13 08:51:18 +08:00
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
2009-03-18 10:55:38 +08:00
|
|
|
if (Arg *A = C.getArgs().getLastArg(options::OPT_print_prog_name_EQ)) {
|
2009-09-10 06:33:00 +08:00
|
|
|
llvm::outs() << GetProgramPath(A->getValue(C.getArgs()), TC) << "\n";
|
2009-03-13 08:51:18 +08:00
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
2009-03-18 10:55:38 +08:00
|
|
|
if (C.getArgs().hasArg(options::OPT_print_libgcc_file_name)) {
|
2009-09-10 06:33:00 +08:00
|
|
|
llvm::outs() << GetFilePath("libgcc.a", TC) << "\n";
|
2009-03-13 08:51:18 +08:00
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
2009-06-17 07:25:22 +08:00
|
|
|
if (C.getArgs().hasArg(options::OPT_print_multi_lib)) {
|
|
|
|
// FIXME: We need tool chain support for this.
|
|
|
|
llvm::outs() << ".;\n";
|
|
|
|
|
|
|
|
switch (C.getDefaultToolChain().getTriple().getArch()) {
|
|
|
|
default:
|
|
|
|
break;
|
2009-09-09 07:36:43 +08:00
|
|
|
|
2009-06-17 07:25:22 +08:00
|
|
|
case llvm::Triple::x86_64:
|
|
|
|
llvm::outs() << "x86_64;@m64" << "\n";
|
|
|
|
break;
|
|
|
|
|
|
|
|
case llvm::Triple::ppc64:
|
|
|
|
llvm::outs() << "ppc64;@m64" << "\n";
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
|
|
|
// FIXME: What is the difference between print-multi-directory and
|
|
|
|
// print-multi-os-directory?
|
|
|
|
if (C.getArgs().hasArg(options::OPT_print_multi_directory) ||
|
|
|
|
C.getArgs().hasArg(options::OPT_print_multi_os_directory)) {
|
|
|
|
switch (C.getDefaultToolChain().getTriple().getArch()) {
|
|
|
|
default:
|
|
|
|
case llvm::Triple::x86:
|
|
|
|
case llvm::Triple::ppc:
|
|
|
|
llvm::outs() << "." << "\n";
|
|
|
|
break;
|
2009-09-09 07:36:43 +08:00
|
|
|
|
2009-06-17 07:25:22 +08:00
|
|
|
case llvm::Triple::x86_64:
|
|
|
|
llvm::outs() << "x86_64" << "\n";
|
|
|
|
break;
|
|
|
|
|
|
|
|
case llvm::Triple::ppc64:
|
|
|
|
llvm::outs() << "ppc64" << "\n";
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
2009-03-13 08:51:18 +08:00
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
static unsigned PrintActions1(const Compilation &C, Action *A,
|
2009-03-13 20:19:02 +08:00
|
|
|
std::map<Action*, unsigned> &Ids) {
|
|
|
|
if (Ids.count(A))
|
|
|
|
return Ids[A];
|
2009-09-09 07:36:43 +08:00
|
|
|
|
2009-03-13 20:19:02 +08:00
|
|
|
std::string str;
|
|
|
|
llvm::raw_string_ostream os(str);
|
2009-09-09 07:36:43 +08:00
|
|
|
|
2009-03-13 20:19:02 +08:00
|
|
|
os << Action::getClassName(A->getKind()) << ", ";
|
2009-09-09 07:36:43 +08:00
|
|
|
if (InputAction *IA = dyn_cast<InputAction>(A)) {
|
2009-03-18 11:13:20 +08:00
|
|
|
os << "\"" << IA->getInputArg().getValue(C.getArgs()) << "\"";
|
2009-03-13 20:19:02 +08:00
|
|
|
} else if (BindArchAction *BIA = dyn_cast<BindArchAction>(A)) {
|
2009-09-09 07:36:43 +08:00
|
|
|
os << '"' << (BIA->getArchName() ? BIA->getArchName() :
|
2009-03-18 11:13:20 +08:00
|
|
|
C.getDefaultToolChain().getArchName()) << '"'
|
|
|
|
<< ", {" << PrintActions1(C, *BIA->begin(), Ids) << "}";
|
2009-03-13 20:19:02 +08:00
|
|
|
} else {
|
|
|
|
os << "{";
|
|
|
|
for (Action::iterator it = A->begin(), ie = A->end(); it != ie;) {
|
2009-03-18 11:13:20 +08:00
|
|
|
os << PrintActions1(C, *it, Ids);
|
2009-03-13 20:19:02 +08:00
|
|
|
++it;
|
|
|
|
if (it != ie)
|
|
|
|
os << ", ";
|
|
|
|
}
|
|
|
|
os << "}";
|
|
|
|
}
|
|
|
|
|
|
|
|
unsigned Id = Ids.size();
|
|
|
|
Ids[A] = Id;
|
2009-09-09 07:36:43 +08:00
|
|
|
llvm::errs() << Id << ": " << os.str() << ", "
|
2009-03-13 20:19:02 +08:00
|
|
|
<< types::getTypeName(A->getType()) << "\n";
|
|
|
|
|
|
|
|
return Id;
|
|
|
|
}
|
|
|
|
|
2009-03-18 11:13:20 +08:00
|
|
|
void Driver::PrintActions(const Compilation &C) const {
|
2009-03-13 20:19:02 +08:00
|
|
|
std::map<Action*, unsigned> Ids;
|
2009-09-09 07:36:43 +08:00
|
|
|
for (ActionList::const_iterator it = C.getActions().begin(),
|
2009-03-18 11:13:20 +08:00
|
|
|
ie = C.getActions().end(); it != ie; ++it)
|
|
|
|
PrintActions1(C, *it, Ids);
|
2009-03-12 15:58:46 +08:00
|
|
|
}
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
void Driver::BuildUniversalActions(const ArgList &Args,
|
2009-03-18 10:55:38 +08:00
|
|
|
ActionList &Actions) const {
|
2009-09-09 07:36:43 +08:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Building universal build actions");
|
|
|
|
// Collect the list of architectures. Duplicates are allowed, but should only
|
|
|
|
// be handled once (in the order seen).
|
2009-03-14 04:33:35 +08:00
|
|
|
llvm::StringSet<> ArchNames;
|
|
|
|
llvm::SmallVector<const char *, 4> Archs;
|
2009-09-09 07:36:43 +08:00
|
|
|
for (ArgList::const_iterator it = Args.begin(), ie = Args.end();
|
2009-03-13 02:40:18 +08:00
|
|
|
it != ie; ++it) {
|
|
|
|
Arg *A = *it;
|
|
|
|
|
2009-11-19 11:26:40 +08:00
|
|
|
if (A->getOption().matches(options::OPT_arch)) {
|
2009-09-09 07:37:30 +08:00
|
|
|
// Validate the option here; we don't save the type here because its
|
|
|
|
// particular spelling may participate in other driver choices.
|
|
|
|
llvm::Triple::ArchType Arch =
|
|
|
|
llvm::Triple::getArchTypeForDarwinArchName(A->getValue(Args));
|
|
|
|
if (Arch == llvm::Triple::UnknownArch) {
|
|
|
|
Diag(clang::diag::err_drv_invalid_arch_name)
|
|
|
|
<< A->getAsString(Args);
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
2009-03-19 15:55:12 +08:00
|
|
|
A->claim();
|
2009-09-09 07:37:02 +08:00
|
|
|
if (ArchNames.insert(A->getValue(Args)))
|
|
|
|
Archs.push_back(A->getValue(Args));
|
2009-03-13 02:40:18 +08:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// When there is no explicit arch for this platform, make sure we still bind
|
|
|
|
// the architecture (to the default) so that -Xarch_ is handled correctly.
|
2009-03-18 11:13:20 +08:00
|
|
|
if (!Archs.size())
|
|
|
|
Archs.push_back(0);
|
2009-03-13 02:40:18 +08:00
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// FIXME: We killed off some others but these aren't yet detected in a
|
|
|
|
// functional manner. If we added information to jobs about which "auxiliary"
|
|
|
|
// files they wrote then we could detect the conflict these cause downstream.
|
2009-03-13 02:40:18 +08:00
|
|
|
if (Archs.size() > 1) {
|
|
|
|
// No recovery needed, the point of this is just to prevent
|
|
|
|
// overwriting the same files.
|
|
|
|
if (const Arg *A = Args.getLastArg(options::OPT_save_temps))
|
2009-09-09 07:36:43 +08:00
|
|
|
Diag(clang::diag::err_drv_invalid_opt_with_multiple_archs)
|
2009-03-20 14:14:23 +08:00
|
|
|
<< A->getAsString(Args);
|
2009-03-13 02:40:18 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
ActionList SingleActions;
|
|
|
|
BuildActions(Args, SingleActions);
|
|
|
|
|
2010-06-05 02:28:41 +08:00
|
|
|
// Add in arch bindings for every top level action, as well as lipo and
|
|
|
|
// dsymutil steps if needed.
|
2009-03-13 02:40:18 +08:00
|
|
|
for (unsigned i = 0, e = SingleActions.size(); i != e; ++i) {
|
|
|
|
Action *Act = SingleActions[i];
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// Make sure we can lipo this kind of output. If not (and it is an actual
|
|
|
|
// output) then we disallow, since we can't create an output file with the
|
|
|
|
// right name without overwriting it. We could remove this oddity by just
|
|
|
|
// changing the output names to include the arch, which would also fix
|
2009-03-13 02:40:18 +08:00
|
|
|
// -save-temps. Compatibility wins for now.
|
|
|
|
|
2009-03-14 01:46:02 +08:00
|
|
|
if (Archs.size() > 1 && !types::canLipoType(Act->getType()))
|
2009-03-13 02:40:18 +08:00
|
|
|
Diag(clang::diag::err_drv_invalid_output_with_multiple_archs)
|
|
|
|
<< types::getTypeName(Act->getType());
|
|
|
|
|
|
|
|
ActionList Inputs;
|
2010-03-12 02:04:58 +08:00
|
|
|
for (unsigned i = 0, e = Archs.size(); i != e; ++i) {
|
2009-03-14 04:33:35 +08:00
|
|
|
Inputs.push_back(new BindArchAction(Act, Archs[i]));
|
2010-03-12 02:04:58 +08:00
|
|
|
if (i != 0)
|
|
|
|
Inputs.back()->setOwnsInputs(false);
|
|
|
|
}
|
2009-03-13 02:40:18 +08:00
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// Lipo if necessary, we do it this way because we need to set the arch flag
|
|
|
|
// so that -Xarch_ gets overwritten.
|
2009-03-13 02:40:18 +08:00
|
|
|
if (Inputs.size() == 1 || Act->getType() == types::TY_Nothing)
|
|
|
|
Actions.append(Inputs.begin(), Inputs.end());
|
|
|
|
else
|
|
|
|
Actions.push_back(new LipoJobAction(Inputs, Act->getType()));
|
2010-06-05 02:28:41 +08:00
|
|
|
|
|
|
|
// Add a 'dsymutil' step if necessary.
|
|
|
|
if (Act->getType() == types::TY_Image) {
|
|
|
|
Arg *A = Args.getLastArg(options::OPT_g_Group);
|
|
|
|
if (A && !A->getOption().matches(options::OPT_g0) &&
|
|
|
|
!A->getOption().matches(options::OPT_gstabs)) {
|
|
|
|
ActionList Inputs;
|
|
|
|
Inputs.push_back(Actions.back());
|
|
|
|
Actions.pop_back();
|
|
|
|
|
|
|
|
Actions.push_back(new DsymutilJobAction(Inputs, types::TY_dSYM));
|
|
|
|
}
|
|
|
|
}
|
2009-03-13 02:40:18 +08:00
|
|
|
}
|
2009-03-12 15:58:46 +08:00
|
|
|
}
|
|
|
|
|
2009-03-18 10:55:38 +08:00
|
|
|
void Driver::BuildActions(const ArgList &Args, ActionList &Actions) const {
|
2009-03-18 09:38:48 +08:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Building compilation actions");
|
2009-03-13 07:55:14 +08:00
|
|
|
// Start by constructing the list of inputs and their types.
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// Track the current user specified (-x) input. We also explicitly track the
|
|
|
|
// argument used to set the type; we only want to claim the type when we
|
|
|
|
// actually use it, so we warn about unused -x arguments.
|
2009-03-14 01:57:10 +08:00
|
|
|
types::ID InputType = types::TY_Nothing;
|
|
|
|
Arg *InputTypeArg = 0;
|
|
|
|
|
2009-03-12 15:58:46 +08:00
|
|
|
llvm::SmallVector<std::pair<types::ID, const Arg*>, 16> Inputs;
|
2009-09-09 07:36:43 +08:00
|
|
|
for (ArgList::const_iterator it = Args.begin(), ie = Args.end();
|
2009-03-12 15:58:46 +08:00
|
|
|
it != ie; ++it) {
|
|
|
|
Arg *A = *it;
|
|
|
|
|
|
|
|
if (isa<InputOption>(A->getOption())) {
|
|
|
|
const char *Value = A->getValue(Args);
|
|
|
|
types::ID Ty = types::TY_INVALID;
|
|
|
|
|
|
|
|
// Infer the input type if necessary.
|
2009-03-14 01:57:10 +08:00
|
|
|
if (InputType == types::TY_Nothing) {
|
|
|
|
// If there was an explicit arg for this, claim it.
|
|
|
|
if (InputTypeArg)
|
|
|
|
InputTypeArg->claim();
|
|
|
|
|
2009-03-12 15:58:46 +08:00
|
|
|
// stdin must be handled specially.
|
|
|
|
if (memcmp(Value, "-", 2) == 0) {
|
2009-09-09 07:36:43 +08:00
|
|
|
// If running with -E, treat as a C input (this changes the builtin
|
|
|
|
// macros, for example). This may be overridden by -ObjC below.
|
2009-03-12 15:58:46 +08:00
|
|
|
//
|
2009-09-09 07:36:43 +08:00
|
|
|
// Otherwise emit an error but still use a valid type to avoid
|
|
|
|
// spurious errors (e.g., no inputs).
|
2009-11-19 12:00:53 +08:00
|
|
|
if (!Args.hasArgNoClaim(options::OPT_E))
|
2009-03-12 17:13:48 +08:00
|
|
|
Diag(clang::diag::err_drv_unknown_stdin_type);
|
2009-03-12 15:58:46 +08:00
|
|
|
Ty = types::TY_C;
|
|
|
|
} else {
|
2009-09-09 07:36:43 +08:00
|
|
|
// Otherwise lookup by extension, and fallback to ObjectType if not
|
|
|
|
// found. We use a host hook here because Darwin at least has its own
|
|
|
|
// idea of what .s is.
|
2009-03-12 15:58:46 +08:00
|
|
|
if (const char *Ext = strrchr(Value, '.'))
|
2009-03-21 07:39:23 +08:00
|
|
|
Ty = Host->lookupTypeForExtension(Ext + 1);
|
|
|
|
|
2009-03-12 15:58:46 +08:00
|
|
|
if (Ty == types::TY_INVALID)
|
|
|
|
Ty = types::TY_Object;
|
2010-02-18 04:32:58 +08:00
|
|
|
|
|
|
|
// If the driver is invoked as C++ compiler (like clang++ or c++) it
|
|
|
|
// should autodetect some input files as C++ for g++ compatibility.
|
|
|
|
if (CCCIsCXX) {
|
|
|
|
types::ID OldTy = Ty;
|
|
|
|
Ty = types::lookupCXXTypeForCType(Ty);
|
|
|
|
|
|
|
|
if (Ty != OldTy)
|
|
|
|
Diag(clang::diag::warn_drv_treating_input_as_cxx)
|
|
|
|
<< getTypeName(OldTy) << getTypeName(Ty);
|
|
|
|
}
|
2009-03-12 15:58:46 +08:00
|
|
|
}
|
|
|
|
|
2009-05-19 05:47:54 +08:00
|
|
|
// -ObjC and -ObjC++ override the default language, but only for "source
|
|
|
|
// files". We just treat everything that isn't a linker input as a
|
|
|
|
// source file.
|
2009-09-09 07:36:43 +08:00
|
|
|
//
|
2009-05-19 05:47:54 +08:00
|
|
|
// FIXME: Clean this up if we move the phase sequence into the type.
|
2009-03-12 15:58:46 +08:00
|
|
|
if (Ty != types::TY_Object) {
|
|
|
|
if (Args.hasArg(options::OPT_ObjC))
|
|
|
|
Ty = types::TY_ObjC;
|
|
|
|
else if (Args.hasArg(options::OPT_ObjCXX))
|
|
|
|
Ty = types::TY_ObjCXX;
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
assert(InputTypeArg && "InputType set w/o InputTypeArg");
|
|
|
|
InputTypeArg->claim();
|
|
|
|
Ty = InputType;
|
|
|
|
}
|
|
|
|
|
2010-01-25 08:44:02 +08:00
|
|
|
// Check that the file exists, if enabled.
|
|
|
|
if (CheckInputsExist && memcmp(Value, "-", 2) != 0 &&
|
|
|
|
!llvm::sys::Path(Value).exists())
|
2009-03-12 17:13:48 +08:00
|
|
|
Diag(clang::diag::err_drv_no_such_file) << A->getValue(Args);
|
2009-03-12 15:58:46 +08:00
|
|
|
else
|
|
|
|
Inputs.push_back(std::make_pair(Ty, A));
|
|
|
|
|
|
|
|
} else if (A->getOption().isLinkerInput()) {
|
2009-09-09 07:36:43 +08:00
|
|
|
// Just treat as object type, we could make a special type for this if
|
|
|
|
// necessary.
|
2009-03-12 15:58:46 +08:00
|
|
|
Inputs.push_back(std::make_pair(types::TY_Object, A));
|
|
|
|
|
2009-11-19 11:26:40 +08:00
|
|
|
} else if (A->getOption().matches(options::OPT_x)) {
|
2009-09-09 07:36:43 +08:00
|
|
|
InputTypeArg = A;
|
2009-03-12 15:58:46 +08:00
|
|
|
InputType = types::lookupTypeForTypeSpecifier(A->getValue(Args));
|
|
|
|
|
|
|
|
// Follow gcc behavior and treat as linker input for invalid -x
|
2009-09-09 07:36:43 +08:00
|
|
|
// options. Its not clear why we shouldn't just revert to unknown; but
|
|
|
|
// this isn't very important, we might as well be bug comatible.
|
2009-03-12 15:58:46 +08:00
|
|
|
if (!InputType) {
|
2009-03-12 17:13:48 +08:00
|
|
|
Diag(clang::diag::err_drv_unknown_language) << A->getValue(Args);
|
2009-03-12 15:58:46 +08:00
|
|
|
InputType = types::TY_Object;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-03-13 08:17:48 +08:00
|
|
|
if (!SuppressMissingInputWarning && Inputs.empty()) {
|
2009-03-13 07:55:14 +08:00
|
|
|
Diag(clang::diag::err_drv_no_input_files);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// Determine which compilation mode we are in. We look for options which
|
|
|
|
// affect the phase, starting with the earliest phases, and record which
|
|
|
|
// option we used to determine the final phase.
|
2009-03-13 19:38:42 +08:00
|
|
|
Arg *FinalPhaseArg = 0;
|
|
|
|
phases::ID FinalPhase;
|
2009-03-13 07:55:14 +08:00
|
|
|
|
|
|
|
// -{E,M,MM} only run the preprocessor.
|
2009-03-13 19:38:42 +08:00
|
|
|
if ((FinalPhaseArg = Args.getLastArg(options::OPT_E)) ||
|
|
|
|
(FinalPhaseArg = Args.getLastArg(options::OPT_M)) ||
|
|
|
|
(FinalPhaseArg = Args.getLastArg(options::OPT_MM))) {
|
|
|
|
FinalPhase = phases::Preprocess;
|
2009-09-09 07:36:43 +08:00
|
|
|
|
2009-09-02 00:57:46 +08:00
|
|
|
// -{fsyntax-only,-analyze,emit-ast,S} only run up to the compiler.
|
2009-03-15 08:48:16 +08:00
|
|
|
} else if ((FinalPhaseArg = Args.getLastArg(options::OPT_fsyntax_only)) ||
|
2010-02-11 11:16:21 +08:00
|
|
|
(FinalPhaseArg = Args.getLastArg(options::OPT_rewrite_objc)) ||
|
2009-05-06 10:12:32 +08:00
|
|
|
(FinalPhaseArg = Args.getLastArg(options::OPT__analyze,
|
|
|
|
options::OPT__analyze_auto)) ||
|
2009-09-02 00:57:46 +08:00
|
|
|
(FinalPhaseArg = Args.getLastArg(options::OPT_emit_ast)) ||
|
2009-03-13 19:38:42 +08:00
|
|
|
(FinalPhaseArg = Args.getLastArg(options::OPT_S))) {
|
|
|
|
FinalPhase = phases::Compile;
|
2009-03-13 07:55:14 +08:00
|
|
|
|
|
|
|
// -c only runs up to the assembler.
|
2009-03-13 19:38:42 +08:00
|
|
|
} else if ((FinalPhaseArg = Args.getLastArg(options::OPT_c))) {
|
|
|
|
FinalPhase = phases::Assemble;
|
2009-09-09 07:36:43 +08:00
|
|
|
|
2009-03-13 07:55:14 +08:00
|
|
|
// Otherwise do everything.
|
|
|
|
} else
|
2009-03-13 19:38:42 +08:00
|
|
|
FinalPhase = phases::Link;
|
2009-03-13 07:55:14 +08:00
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// Reject -Z* at the top level, these options should never have been exposed
|
|
|
|
// by gcc.
|
2009-03-27 00:12:09 +08:00
|
|
|
if (Arg *A = Args.getLastArg(options::OPT_Z_Joined))
|
2009-03-20 14:14:23 +08:00
|
|
|
Diag(clang::diag::err_drv_use_of_Z_option) << A->getAsString(Args);
|
2009-03-13 07:55:14 +08:00
|
|
|
|
2009-03-13 19:38:42 +08:00
|
|
|
// Construct the actions to perform.
|
|
|
|
ActionList LinkerInputs;
|
2009-03-12 15:58:46 +08:00
|
|
|
for (unsigned i = 0, e = Inputs.size(); i != e; ++i) {
|
2009-03-13 19:38:42 +08:00
|
|
|
types::ID InputType = Inputs[i].first;
|
|
|
|
const Arg *InputArg = Inputs[i].second;
|
|
|
|
|
|
|
|
unsigned NumSteps = types::getNumCompilationPhases(InputType);
|
|
|
|
assert(NumSteps && "Invalid number of steps!");
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// If the first step comes after the final phase we are doing as part of
|
|
|
|
// this compilation, warn the user about it.
|
2009-03-13 19:38:42 +08:00
|
|
|
phases::ID InitialPhase = types::getCompilationPhase(InputType, 0);
|
|
|
|
if (InitialPhase > FinalPhase) {
|
2009-03-19 15:57:08 +08:00
|
|
|
// Claim here to avoid the more general unused warning.
|
|
|
|
InputArg->claim();
|
2009-09-17 12:13:26 +08:00
|
|
|
|
|
|
|
// Special case '-E' warning on a previously preprocessed file to make
|
|
|
|
// more sense.
|
|
|
|
if (InitialPhase == phases::Compile && FinalPhase == phases::Preprocess &&
|
|
|
|
getPreprocessedType(InputType) == types::TY_INVALID)
|
|
|
|
Diag(clang::diag::warn_drv_preprocessed_input_file_unused)
|
|
|
|
<< InputArg->getAsString(Args)
|
|
|
|
<< FinalPhaseArg->getOption().getName();
|
|
|
|
else
|
|
|
|
Diag(clang::diag::warn_drv_input_file_unused)
|
|
|
|
<< InputArg->getAsString(Args)
|
|
|
|
<< getPhaseName(InitialPhase)
|
|
|
|
<< FinalPhaseArg->getOption().getName();
|
2009-03-13 19:38:42 +08:00
|
|
|
continue;
|
|
|
|
}
|
2009-09-09 07:36:43 +08:00
|
|
|
|
2009-03-13 19:38:42 +08:00
|
|
|
// Build the pipeline for this file.
|
2010-01-19 09:29:05 +08:00
|
|
|
llvm::OwningPtr<Action> Current(new InputAction(*InputArg, InputType));
|
2009-03-13 19:38:42 +08:00
|
|
|
for (unsigned i = 0; i != NumSteps; ++i) {
|
|
|
|
phases::ID Phase = types::getCompilationPhase(InputType, i);
|
|
|
|
|
|
|
|
// We are done if this step is past what the user requested.
|
|
|
|
if (Phase > FinalPhase)
|
|
|
|
break;
|
|
|
|
|
|
|
|
// Queue linker inputs.
|
|
|
|
if (Phase == phases::Link) {
|
|
|
|
assert(i + 1 == NumSteps && "linking must be final compilation step.");
|
2010-01-19 09:29:05 +08:00
|
|
|
LinkerInputs.push_back(Current.take());
|
2009-03-13 19:38:42 +08:00
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// Some types skip the assembler phase (e.g., llvm-bc), but we can't
|
|
|
|
// encode this in the steps because the intermediate type depends on
|
|
|
|
// arguments. Just special case here.
|
2009-03-25 04:17:30 +08:00
|
|
|
if (Phase == phases::Assemble && Current->getType() != types::TY_PP_Asm)
|
|
|
|
continue;
|
|
|
|
|
2009-03-13 19:38:42 +08:00
|
|
|
// Otherwise construct the appropriate action.
|
2010-01-19 09:29:05 +08:00
|
|
|
Current.reset(ConstructPhaseAction(Args, Phase, Current.take()));
|
2009-03-13 19:38:42 +08:00
|
|
|
if (Current->getType() == types::TY_Nothing)
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
// If we ended with something, add to the output list.
|
|
|
|
if (Current)
|
2010-01-19 09:29:05 +08:00
|
|
|
Actions.push_back(Current.take());
|
2009-03-12 15:58:46 +08:00
|
|
|
}
|
2009-03-13 19:38:42 +08:00
|
|
|
|
|
|
|
// Add a link action if necessary.
|
|
|
|
if (!LinkerInputs.empty())
|
|
|
|
Actions.push_back(new LinkJobAction(LinkerInputs, types::TY_Image));
|
2009-12-23 07:19:32 +08:00
|
|
|
|
|
|
|
// If we are linking, claim any options which are obviously only used for
|
|
|
|
// compilation.
|
|
|
|
if (FinalPhase == phases::Link)
|
|
|
|
Args.ClaimAllArgs(options::OPT_CompileOnly_Group);
|
2009-03-13 19:38:42 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
Action *Driver::ConstructPhaseAction(const ArgList &Args, phases::ID Phase,
|
|
|
|
Action *Input) const {
|
2009-03-18 09:38:48 +08:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Constructing phase actions");
|
2009-03-13 19:38:42 +08:00
|
|
|
// Build the appropriate action.
|
|
|
|
switch (Phase) {
|
|
|
|
case phases::Link: assert(0 && "link action invalid here.");
|
|
|
|
case phases::Preprocess: {
|
2009-03-30 14:36:42 +08:00
|
|
|
types::ID OutputTy;
|
|
|
|
// -{M, MM} alter the output type.
|
|
|
|
if (Args.hasArg(options::OPT_M) || Args.hasArg(options::OPT_MM)) {
|
|
|
|
OutputTy = types::TY_Dependencies;
|
|
|
|
} else {
|
|
|
|
OutputTy = types::getPreprocessedType(Input->getType());
|
|
|
|
assert(OutputTy != types::TY_INVALID &&
|
|
|
|
"Cannot preprocess this input type!");
|
|
|
|
}
|
2009-03-13 19:38:42 +08:00
|
|
|
return new PreprocessJobAction(Input, OutputTy);
|
|
|
|
}
|
|
|
|
case phases::Precompile:
|
2009-09-09 07:36:43 +08:00
|
|
|
return new PrecompileJobAction(Input, types::TY_PCH);
|
2009-03-13 19:38:42 +08:00
|
|
|
case phases::Compile: {
|
2009-12-23 08:47:42 +08:00
|
|
|
bool HasO4 = false;
|
|
|
|
if (const Arg *A = Args.getLastArg(options::OPT_O_Group))
|
|
|
|
HasO4 = A->getOption().matches(options::OPT_O4);
|
|
|
|
|
2009-03-13 19:38:42 +08:00
|
|
|
if (Args.hasArg(options::OPT_fsyntax_only)) {
|
|
|
|
return new CompileJobAction(Input, types::TY_Nothing);
|
2010-02-11 11:16:21 +08:00
|
|
|
} else if (Args.hasArg(options::OPT_rewrite_objc)) {
|
|
|
|
return new CompileJobAction(Input, types::TY_RewrittenObjC);
|
2009-05-06 10:12:32 +08:00
|
|
|
} else if (Args.hasArg(options::OPT__analyze, options::OPT__analyze_auto)) {
|
2009-03-13 19:38:42 +08:00
|
|
|
return new AnalyzeJobAction(Input, types::TY_Plist);
|
2009-09-02 00:57:46 +08:00
|
|
|
} else if (Args.hasArg(options::OPT_emit_ast)) {
|
|
|
|
return new CompileJobAction(Input, types::TY_AST);
|
2009-03-25 04:17:30 +08:00
|
|
|
} else if (Args.hasArg(options::OPT_emit_llvm) ||
|
2009-12-23 08:47:42 +08:00
|
|
|
Args.hasArg(options::OPT_flto) || HasO4) {
|
2009-09-09 07:36:43 +08:00
|
|
|
types::ID Output =
|
2010-06-08 07:28:45 +08:00
|
|
|
Args.hasArg(options::OPT_S) ? types::TY_LTO_IR : types::TY_LTO_BC;
|
2009-03-13 19:38:42 +08:00
|
|
|
return new CompileJobAction(Input, Output);
|
|
|
|
} else {
|
|
|
|
return new CompileJobAction(Input, types::TY_PP_Asm);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
case phases::Assemble:
|
|
|
|
return new AssembleJobAction(Input, types::TY_Object);
|
|
|
|
}
|
|
|
|
|
|
|
|
assert(0 && "invalid phase in ConstructPhaseAction");
|
|
|
|
return 0;
|
2009-03-12 15:58:46 +08:00
|
|
|
}
|
|
|
|
|
2009-03-18 10:55:38 +08:00
|
|
|
void Driver::BuildJobs(Compilation &C) const {
|
2009-03-18 09:38:48 +08:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Building compilation jobs");
|
2009-03-16 14:56:51 +08:00
|
|
|
bool SaveTemps = C.getArgs().hasArg(options::OPT_save_temps);
|
|
|
|
bool UsePipes = C.getArgs().hasArg(options::OPT_pipe);
|
2009-03-19 07:18:19 +08:00
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// FIXME: Pipes are forcibly disabled until we support executing them.
|
2009-03-19 07:18:19 +08:00
|
|
|
if (!CCCPrintBindings)
|
|
|
|
UsePipes = false;
|
2009-09-09 07:36:43 +08:00
|
|
|
|
2009-03-16 14:56:51 +08:00
|
|
|
// -save-temps inhibits pipes.
|
2009-12-25 23:43:36 +08:00
|
|
|
if (SaveTemps && UsePipes)
|
2009-03-16 14:56:51 +08:00
|
|
|
Diag(clang::diag::warn_drv_pipe_ignored_with_save_temps);
|
|
|
|
|
|
|
|
Arg *FinalOutput = C.getArgs().getLastArg(options::OPT_o);
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// It is an error to provide a -o option if we are making multiple output
|
|
|
|
// files.
|
2009-03-16 14:56:51 +08:00
|
|
|
if (FinalOutput) {
|
|
|
|
unsigned NumOutputs = 0;
|
2009-09-09 07:36:43 +08:00
|
|
|
for (ActionList::const_iterator it = C.getActions().begin(),
|
2009-03-18 10:55:38 +08:00
|
|
|
ie = C.getActions().end(); it != ie; ++it)
|
2009-03-16 14:56:51 +08:00
|
|
|
if ((*it)->getType() != types::TY_Nothing)
|
|
|
|
++NumOutputs;
|
2009-09-09 07:36:43 +08:00
|
|
|
|
2009-03-16 14:56:51 +08:00
|
|
|
if (NumOutputs > 1) {
|
|
|
|
Diag(clang::diag::err_drv_output_argument_with_multiple_files);
|
|
|
|
FinalOutput = 0;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
for (ActionList::const_iterator it = C.getActions().begin(),
|
2009-03-18 10:55:38 +08:00
|
|
|
ie = C.getActions().end(); it != ie; ++it) {
|
2009-03-16 14:56:51 +08:00
|
|
|
Action *A = *it;
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// If we are linking an image for multiple archs then the linker wants
|
|
|
|
// -arch_multiple and -final_output <final image name>. Unfortunately, this
|
|
|
|
// doesn't fit in cleanly because we have to pass this information down.
|
2009-03-16 14:56:51 +08:00
|
|
|
//
|
2009-09-09 07:36:43 +08:00
|
|
|
// FIXME: This is a hack; find a cleaner way to integrate this into the
|
|
|
|
// process.
|
2009-03-16 14:56:51 +08:00
|
|
|
const char *LinkingOutput = 0;
|
2009-03-27 00:12:09 +08:00
|
|
|
if (isa<LipoJobAction>(A)) {
|
2009-03-16 14:56:51 +08:00
|
|
|
if (FinalOutput)
|
|
|
|
LinkingOutput = FinalOutput->getValue(C.getArgs());
|
|
|
|
else
|
|
|
|
LinkingOutput = DefaultImageName.c_str();
|
|
|
|
}
|
|
|
|
|
|
|
|
InputInfo II;
|
2009-09-09 07:36:43 +08:00
|
|
|
BuildJobsForAction(C, A, &C.getDefaultToolChain(),
|
2009-09-10 02:36:01 +08:00
|
|
|
/*BoundArch*/0,
|
2009-03-16 14:56:51 +08:00
|
|
|
/*CanAcceptPipe*/ true,
|
|
|
|
/*AtTopLevel*/ true,
|
|
|
|
/*LinkingOutput*/ LinkingOutput,
|
|
|
|
II);
|
|
|
|
}
|
2009-03-16 14:42:30 +08:00
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// If the user passed -Qunused-arguments or there were errors, don't warn
|
|
|
|
// about any unused arguments.
|
|
|
|
if (Diags.getNumErrors() ||
|
2009-04-08 03:04:18 +08:00
|
|
|
C.getArgs().hasArg(options::OPT_Qunused_arguments))
|
2009-03-19 02:03:46 +08:00
|
|
|
return;
|
|
|
|
|
2009-03-30 06:24:54 +08:00
|
|
|
// Claim -### here.
|
|
|
|
(void) C.getArgs().hasArg(options::OPT__HASH_HASH_HASH);
|
2009-09-09 07:36:43 +08:00
|
|
|
|
2009-03-16 14:42:30 +08:00
|
|
|
for (ArgList::const_iterator it = C.getArgs().begin(), ie = C.getArgs().end();
|
|
|
|
it != ie; ++it) {
|
|
|
|
Arg *A = *it;
|
2009-09-09 07:36:43 +08:00
|
|
|
|
2009-03-16 14:42:30 +08:00
|
|
|
// FIXME: It would be nice to be able to send the argument to the
|
2009-09-09 07:36:43 +08:00
|
|
|
// Diagnostic, so that extra values, position, and so on could be printed.
|
2009-04-04 08:52:26 +08:00
|
|
|
if (!A->isClaimed()) {
|
2009-04-08 03:04:18 +08:00
|
|
|
if (A->getOption().hasNoArgumentUnused())
|
|
|
|
continue;
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// Suppress the warning automatically if this is just a flag, and it is an
|
|
|
|
// instance of an argument we already claimed.
|
2009-04-04 08:52:26 +08:00
|
|
|
const Option &Opt = A->getOption();
|
|
|
|
if (isa<FlagOption>(Opt)) {
|
|
|
|
bool DuplicateClaimed = false;
|
|
|
|
|
2009-11-25 19:53:23 +08:00
|
|
|
for (arg_iterator it = C.getArgs().filtered_begin(&Opt),
|
|
|
|
ie = C.getArgs().filtered_end(); it != ie; ++it) {
|
|
|
|
if ((*it)->isClaimed()) {
|
2009-04-04 08:52:26 +08:00
|
|
|
DuplicateClaimed = true;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if (DuplicateClaimed)
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
Diag(clang::diag::warn_drv_unused_argument)
|
2009-03-20 14:14:23 +08:00
|
|
|
<< A->getAsString(C.getArgs());
|
2009-04-04 08:52:26 +08:00
|
|
|
}
|
2009-03-16 14:42:30 +08:00
|
|
|
}
|
2009-03-14 06:12:33 +08:00
|
|
|
}
|
|
|
|
|
2010-02-03 11:07:56 +08:00
|
|
|
static const Tool &SelectToolForJob(Compilation &C, const ToolChain *TC,
|
|
|
|
const JobAction *JA,
|
|
|
|
const ActionList *&Inputs) {
|
|
|
|
const Tool *ToolForJob = 0;
|
|
|
|
|
|
|
|
// See if we should look for a compiler with an integrated assembler. We match
|
|
|
|
// bottom up, so what we are actually looking for is an assembler job with a
|
|
|
|
// compiler input.
|
2010-05-14 10:03:00 +08:00
|
|
|
|
|
|
|
// FIXME: This doesn't belong here, but ideally we will support static soon
|
|
|
|
// anyway.
|
|
|
|
bool HasStatic = (C.getArgs().hasArg(options::OPT_mkernel) ||
|
|
|
|
C.getArgs().hasArg(options::OPT_static) ||
|
|
|
|
C.getArgs().hasArg(options::OPT_fapple_kext));
|
|
|
|
bool IsIADefault = (TC->IsIntegratedAssemblerDefault() && !HasStatic);
|
|
|
|
if (C.getArgs().hasFlag(options::OPT_integrated_as,
|
2010-02-03 11:07:56 +08:00
|
|
|
options::OPT_no_integrated_as,
|
2010-05-14 10:03:00 +08:00
|
|
|
IsIADefault) &&
|
2010-02-03 11:07:56 +08:00
|
|
|
!C.getArgs().hasArg(options::OPT_save_temps) &&
|
|
|
|
isa<AssembleJobAction>(JA) &&
|
|
|
|
Inputs->size() == 1 && isa<CompileJobAction>(*Inputs->begin())) {
|
|
|
|
const Tool &Compiler = TC->SelectTool(C,cast<JobAction>(**Inputs->begin()));
|
|
|
|
if (Compiler.hasIntegratedAssembler()) {
|
|
|
|
Inputs = &(*Inputs)[0]->getInputs();
|
|
|
|
ToolForJob = &Compiler;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
// Otherwise use the tool for the current job.
|
|
|
|
if (!ToolForJob)
|
|
|
|
ToolForJob = &TC->SelectTool(C, *JA);
|
|
|
|
|
|
|
|
// See if we should use an integrated preprocessor. We do so when we have
|
|
|
|
// exactly one input, since this is the only use case we care about
|
|
|
|
// (irrelevant since we don't support combine yet).
|
|
|
|
if (Inputs->size() == 1 && isa<PreprocessJobAction>(*Inputs->begin()) &&
|
|
|
|
!C.getArgs().hasArg(options::OPT_no_integrated_cpp) &&
|
|
|
|
!C.getArgs().hasArg(options::OPT_traditional_cpp) &&
|
|
|
|
!C.getArgs().hasArg(options::OPT_save_temps) &&
|
|
|
|
ToolForJob->hasIntegratedCPP())
|
|
|
|
Inputs = &(*Inputs)[0]->getInputs();
|
|
|
|
|
|
|
|
return *ToolForJob;
|
|
|
|
}
|
|
|
|
|
2009-03-16 14:56:51 +08:00
|
|
|
void Driver::BuildJobsForAction(Compilation &C,
|
|
|
|
const Action *A,
|
|
|
|
const ToolChain *TC,
|
2009-09-10 02:36:01 +08:00
|
|
|
const char *BoundArch,
|
2009-03-16 14:56:51 +08:00
|
|
|
bool CanAcceptPipe,
|
|
|
|
bool AtTopLevel,
|
|
|
|
const char *LinkingOutput,
|
|
|
|
InputInfo &Result) const {
|
2009-09-09 07:36:43 +08:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Building compilation jobs");
|
2009-03-19 07:18:19 +08:00
|
|
|
|
|
|
|
bool UsePipes = C.getArgs().hasArg(options::OPT_pipe);
|
2009-09-09 07:36:43 +08:00
|
|
|
// FIXME: Pipes are forcibly disabled until we support executing them.
|
2009-03-19 07:18:19 +08:00
|
|
|
if (!CCCPrintBindings)
|
|
|
|
UsePipes = false;
|
|
|
|
|
2009-03-16 14:56:51 +08:00
|
|
|
if (const InputAction *IA = dyn_cast<InputAction>(A)) {
|
2009-09-09 07:36:43 +08:00
|
|
|
// FIXME: It would be nice to not claim this here; maybe the old scheme of
|
|
|
|
// just using Args was better?
|
2009-03-19 15:29:38 +08:00
|
|
|
const Arg &Input = IA->getInputArg();
|
|
|
|
Input.claim();
|
2010-06-10 06:31:08 +08:00
|
|
|
if (Input.getOption().matches(options::OPT_INPUT)) {
|
2009-03-19 15:29:38 +08:00
|
|
|
const char *Name = Input.getValue(C.getArgs());
|
|
|
|
Result = InputInfo(Name, A->getType(), Name);
|
|
|
|
} else
|
|
|
|
Result = InputInfo(&Input, A->getType(), "");
|
2009-03-16 14:56:51 +08:00
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (const BindArchAction *BAA = dyn_cast<BindArchAction>(A)) {
|
2009-09-09 07:37:19 +08:00
|
|
|
const ToolChain *TC = &C.getDefaultToolChain();
|
|
|
|
|
2009-05-22 10:53:45 +08:00
|
|
|
std::string Arch;
|
2009-09-09 07:37:19 +08:00
|
|
|
if (BAA->getArchName())
|
|
|
|
TC = Host->CreateToolChain(C.getArgs(), BAA->getArchName());
|
|
|
|
|
2009-09-10 02:36:01 +08:00
|
|
|
BuildJobsForAction(C, *BAA->begin(), TC, BAA->getArchName(),
|
|
|
|
CanAcceptPipe, AtTopLevel, LinkingOutput, Result);
|
2009-03-16 14:56:51 +08:00
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
const ActionList *Inputs = &A->getInputs();
|
2010-02-03 11:07:56 +08:00
|
|
|
|
|
|
|
const JobAction *JA = cast<JobAction>(A);
|
|
|
|
const Tool &T = SelectToolForJob(C, TC, JA, Inputs);
|
2009-03-16 14:56:51 +08:00
|
|
|
|
|
|
|
// Only use pipes when there is exactly one input.
|
|
|
|
bool TryToUsePipeInput = Inputs->size() == 1 && T.acceptsPipedInput();
|
2009-03-18 14:00:36 +08:00
|
|
|
InputInfoList InputInfos;
|
2009-03-16 14:56:51 +08:00
|
|
|
for (ActionList::const_iterator it = Inputs->begin(), ie = Inputs->end();
|
|
|
|
it != ie; ++it) {
|
2010-06-05 02:28:41 +08:00
|
|
|
// Treat dsymutil sub-jobs as being at the top-level too, they shouldn't get
|
|
|
|
// temporary output names.
|
|
|
|
//
|
|
|
|
// FIXME: Clean this up.
|
|
|
|
bool SubJobAtTopLevel = false;
|
|
|
|
if (AtTopLevel && isa<DsymutilJobAction>(A))
|
|
|
|
SubJobAtTopLevel = true;
|
|
|
|
|
2009-03-16 14:56:51 +08:00
|
|
|
InputInfo II;
|
2009-09-10 02:36:01 +08:00
|
|
|
BuildJobsForAction(C, *it, TC, BoundArch, TryToUsePipeInput,
|
2010-06-05 02:28:41 +08:00
|
|
|
SubJobAtTopLevel, LinkingOutput, II);
|
2009-03-16 14:56:51 +08:00
|
|
|
InputInfos.push_back(II);
|
|
|
|
}
|
|
|
|
|
|
|
|
// Determine if we should output to a pipe.
|
|
|
|
bool OutputToPipe = false;
|
|
|
|
if (CanAcceptPipe && T.canPipeOutput()) {
|
2009-09-09 07:36:43 +08:00
|
|
|
// Some actions default to writing to a pipe if they are the top level phase
|
|
|
|
// and there was no user override.
|
2009-03-16 14:56:51 +08:00
|
|
|
//
|
|
|
|
// FIXME: Is there a better way to handle this?
|
|
|
|
if (AtTopLevel) {
|
|
|
|
if (isa<PreprocessJobAction>(A) && !C.getArgs().hasArg(options::OPT_o))
|
|
|
|
OutputToPipe = true;
|
2009-03-19 07:18:19 +08:00
|
|
|
} else if (UsePipes)
|
2009-03-16 14:56:51 +08:00
|
|
|
OutputToPipe = true;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Figure out where to put the job (pipes).
|
|
|
|
Job *Dest = &C.getJobs();
|
|
|
|
if (InputInfos[0].isPipe()) {
|
2009-03-18 01:53:55 +08:00
|
|
|
assert(TryToUsePipeInput && "Unrequested pipe!");
|
2009-03-16 14:56:51 +08:00
|
|
|
assert(InputInfos.size() == 1 && "Unexpected pipe with multiple inputs.");
|
|
|
|
Dest = &InputInfos[0].getPipe();
|
|
|
|
}
|
|
|
|
|
|
|
|
// Always use the first input as the base input.
|
|
|
|
const char *BaseInput = InputInfos[0].getBaseInput();
|
2009-03-18 01:53:55 +08:00
|
|
|
|
2010-06-05 02:28:41 +08:00
|
|
|
// ... except dsymutil actions, which use their actual input as the base
|
|
|
|
// input.
|
|
|
|
if (JA->getType() == types::TY_dSYM)
|
|
|
|
BaseInput = InputInfos[0].getFilename();
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// Determine the place to write output to (nothing, pipe, or filename) and
|
|
|
|
// where to put the new job.
|
2009-03-18 01:53:55 +08:00
|
|
|
if (JA->getType() == types::TY_Nothing) {
|
2009-03-18 06:47:06 +08:00
|
|
|
Result = InputInfo(A->getType(), BaseInput);
|
2009-03-18 01:53:55 +08:00
|
|
|
} else if (OutputToPipe) {
|
|
|
|
// Append to current piped job or create a new one as appropriate.
|
2009-03-18 06:47:06 +08:00
|
|
|
PipedJob *PJ = dyn_cast<PipedJob>(Dest);
|
|
|
|
if (!PJ) {
|
|
|
|
PJ = new PipedJob();
|
2009-09-09 07:36:43 +08:00
|
|
|
// FIXME: Temporary hack so that -ccc-print-bindings work until we have
|
|
|
|
// pipe support. Please remove later.
|
2009-03-20 08:11:04 +08:00
|
|
|
if (!CCCPrintBindings)
|
|
|
|
cast<JobList>(Dest)->addJob(PJ);
|
2009-03-18 15:06:02 +08:00
|
|
|
Dest = PJ;
|
2009-03-18 01:53:55 +08:00
|
|
|
}
|
2009-03-18 06:47:06 +08:00
|
|
|
Result = InputInfo(PJ, A->getType(), BaseInput);
|
2009-03-18 01:53:55 +08:00
|
|
|
} else {
|
2009-03-18 06:47:06 +08:00
|
|
|
Result = InputInfo(GetNamedOutputPath(C, *JA, BaseInput, AtTopLevel),
|
|
|
|
A->getType(), BaseInput);
|
2009-03-18 01:53:55 +08:00
|
|
|
}
|
|
|
|
|
2009-03-18 06:47:06 +08:00
|
|
|
if (CCCPrintBindings) {
|
2009-03-30 14:36:42 +08:00
|
|
|
llvm::errs() << "# \"" << T.getToolChain().getTripleString() << '"'
|
|
|
|
<< " - \"" << T.getName() << "\", inputs: [";
|
2009-03-18 06:47:06 +08:00
|
|
|
for (unsigned i = 0, e = InputInfos.size(); i != e; ++i) {
|
|
|
|
llvm::errs() << InputInfos[i].getAsString();
|
|
|
|
if (i + 1 != e)
|
|
|
|
llvm::errs() << ", ";
|
|
|
|
}
|
|
|
|
llvm::errs() << "], output: " << Result.getAsString() << "\n";
|
|
|
|
} else {
|
2009-09-09 07:36:43 +08:00
|
|
|
T.ConstructJob(C, *JA, *Dest, Result, InputInfos,
|
2009-09-10 02:36:01 +08:00
|
|
|
C.getArgsForToolChain(TC, BoundArch), LinkingOutput);
|
2009-03-18 06:47:06 +08:00
|
|
|
}
|
2009-03-16 14:56:51 +08:00
|
|
|
}
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
const char *Driver::GetNamedOutputPath(Compilation &C,
|
2009-03-18 01:53:55 +08:00
|
|
|
const JobAction &JA,
|
|
|
|
const char *BaseInput,
|
|
|
|
bool AtTopLevel) const {
|
2009-03-18 09:38:48 +08:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Computing output path");
|
2009-03-18 01:53:55 +08:00
|
|
|
// Output to a user requested destination?
|
2010-06-05 02:28:41 +08:00
|
|
|
if (AtTopLevel && !isa<DsymutilJobAction>(JA)) {
|
2009-03-18 01:53:55 +08:00
|
|
|
if (Arg *FinalOutput = C.getArgs().getLastArg(options::OPT_o))
|
|
|
|
return C.addResultFile(FinalOutput->getValue(C.getArgs()));
|
|
|
|
}
|
|
|
|
|
|
|
|
// Output to a temporary file?
|
|
|
|
if (!AtTopLevel && !C.getArgs().hasArg(options::OPT_save_temps)) {
|
2009-09-09 07:36:43 +08:00
|
|
|
std::string TmpName =
|
2009-03-19 03:34:39 +08:00
|
|
|
GetTemporaryPath(types::getTypeTempSuffix(JA.getType()));
|
|
|
|
return C.addTempFile(C.getArgs().MakeArgString(TmpName.c_str()));
|
2009-03-18 01:53:55 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
llvm::sys::Path BasePath(BaseInput);
|
2009-03-18 10:00:31 +08:00
|
|
|
std::string BaseName(BasePath.getLast());
|
2009-03-18 01:53:55 +08:00
|
|
|
|
|
|
|
// Determine what the derived output name should be.
|
|
|
|
const char *NamedOutput;
|
|
|
|
if (JA.getType() == types::TY_Image) {
|
|
|
|
NamedOutput = DefaultImageName.c_str();
|
|
|
|
} else {
|
|
|
|
const char *Suffix = types::getTypeTempSuffix(JA.getType());
|
|
|
|
assert(Suffix && "All types used for output should have a suffix.");
|
|
|
|
|
|
|
|
std::string::size_type End = std::string::npos;
|
|
|
|
if (!types::appendSuffixForType(JA.getType()))
|
|
|
|
End = BaseName.rfind('.');
|
|
|
|
std::string Suffixed(BaseName.substr(0, End));
|
|
|
|
Suffixed += '.';
|
|
|
|
Suffixed += Suffix;
|
|
|
|
NamedOutput = C.getArgs().MakeArgString(Suffixed.c_str());
|
|
|
|
}
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// As an annoying special case, PCH generation doesn't strip the pathname.
|
2009-03-18 01:53:55 +08:00
|
|
|
if (JA.getType() == types::TY_PCH) {
|
|
|
|
BasePath.eraseComponent();
|
2009-03-18 17:58:30 +08:00
|
|
|
if (BasePath.isEmpty())
|
|
|
|
BasePath = NamedOutput;
|
|
|
|
else
|
|
|
|
BasePath.appendComponent(NamedOutput);
|
2009-03-18 01:53:55 +08:00
|
|
|
return C.addResultFile(C.getArgs().MakeArgString(BasePath.c_str()));
|
|
|
|
} else {
|
|
|
|
return C.addResultFile(NamedOutput);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-09-10 06:33:00 +08:00
|
|
|
std::string Driver::GetFilePath(const char *Name, const ToolChain &TC) const {
|
2010-03-22 09:52:07 +08:00
|
|
|
// Respect a limited subset of the '-Bprefix' functionality in GCC by
|
|
|
|
// attempting to use this prefix when lokup up program paths.
|
|
|
|
if (!PrefixDir.empty()) {
|
|
|
|
llvm::sys::Path P(PrefixDir);
|
|
|
|
P.appendComponent(Name);
|
|
|
|
if (P.exists())
|
|
|
|
return P.str();
|
|
|
|
}
|
|
|
|
|
2009-03-19 04:26:19 +08:00
|
|
|
const ToolChain::path_list &List = TC.getFilePaths();
|
2009-09-09 07:36:43 +08:00
|
|
|
for (ToolChain::path_list::const_iterator
|
2009-03-19 04:26:19 +08:00
|
|
|
it = List.begin(), ie = List.end(); it != ie; ++it) {
|
|
|
|
llvm::sys::Path P(*it);
|
|
|
|
P.appendComponent(Name);
|
|
|
|
if (P.exists())
|
2009-09-10 06:33:00 +08:00
|
|
|
return P.str();
|
2009-03-19 04:26:19 +08:00
|
|
|
}
|
|
|
|
|
2009-09-10 06:33:00 +08:00
|
|
|
return Name;
|
2009-03-13 08:51:18 +08:00
|
|
|
}
|
|
|
|
|
2009-09-10 06:33:00 +08:00
|
|
|
std::string Driver::GetProgramPath(const char *Name, const ToolChain &TC,
|
|
|
|
bool WantFile) const {
|
2010-03-22 09:52:07 +08:00
|
|
|
// Respect a limited subset of the '-Bprefix' functionality in GCC by
|
|
|
|
// attempting to use this prefix when lokup up program paths.
|
|
|
|
if (!PrefixDir.empty()) {
|
|
|
|
llvm::sys::Path P(PrefixDir);
|
|
|
|
P.appendComponent(Name);
|
|
|
|
if (WantFile ? P.exists() : P.canExecute())
|
|
|
|
return P.str();
|
|
|
|
}
|
|
|
|
|
2009-03-19 04:26:19 +08:00
|
|
|
const ToolChain::path_list &List = TC.getProgramPaths();
|
2009-09-09 07:36:43 +08:00
|
|
|
for (ToolChain::path_list::const_iterator
|
2009-03-19 04:26:19 +08:00
|
|
|
it = List.begin(), ie = List.end(); it != ie; ++it) {
|
|
|
|
llvm::sys::Path P(*it);
|
|
|
|
P.appendComponent(Name);
|
2009-03-27 08:40:20 +08:00
|
|
|
if (WantFile ? P.exists() : P.canExecute())
|
2009-09-10 06:33:00 +08:00
|
|
|
return P.str();
|
2009-03-19 04:26:19 +08:00
|
|
|
}
|
|
|
|
|
2009-03-24 00:15:50 +08:00
|
|
|
// If all else failed, search the path.
|
|
|
|
llvm::sys::Path P(llvm::sys::Program::FindProgramByName(Name));
|
2009-03-19 05:34:08 +08:00
|
|
|
if (!P.empty())
|
2009-09-10 06:33:00 +08:00
|
|
|
return P.str();
|
2009-03-19 05:34:08 +08:00
|
|
|
|
2009-09-10 06:33:00 +08:00
|
|
|
return Name;
|
2009-03-13 08:51:18 +08:00
|
|
|
}
|
|
|
|
|
2009-03-19 03:34:39 +08:00
|
|
|
std::string Driver::GetTemporaryPath(const char *Suffix) const {
|
2009-09-09 07:36:43 +08:00
|
|
|
// FIXME: This is lame; sys::Path should provide this function (in particular,
|
|
|
|
// it should know how to find the temporary files dir).
|
2009-03-19 03:34:39 +08:00
|
|
|
std::string Error;
|
2009-04-21 04:28:21 +08:00
|
|
|
const char *TmpDir = ::getenv("TMPDIR");
|
|
|
|
if (!TmpDir)
|
|
|
|
TmpDir = ::getenv("TEMP");
|
2009-04-21 08:25:10 +08:00
|
|
|
if (!TmpDir)
|
|
|
|
TmpDir = ::getenv("TMP");
|
2009-04-21 04:28:21 +08:00
|
|
|
if (!TmpDir)
|
|
|
|
TmpDir = "/tmp";
|
|
|
|
llvm::sys::Path P(TmpDir);
|
2009-04-21 01:32:49 +08:00
|
|
|
P.appendComponent("cc");
|
2009-03-19 03:34:39 +08:00
|
|
|
if (P.makeUnique(false, &Error)) {
|
|
|
|
Diag(clang::diag::err_drv_unable_to_make_temp) << Error;
|
|
|
|
return "";
|
|
|
|
}
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// FIXME: Grumble, makeUnique sometimes leaves the file around!? PR3837.
|
2009-03-19 07:08:52 +08:00
|
|
|
P.eraseFromDisk(false, 0);
|
|
|
|
|
2009-03-19 03:34:39 +08:00
|
|
|
P.appendSuffix(Suffix);
|
2009-08-24 06:45:33 +08:00
|
|
|
return P.str();
|
2009-03-19 03:34:39 +08:00
|
|
|
}
|
|
|
|
|
2009-05-22 10:53:45 +08:00
|
|
|
const HostInfo *Driver::GetHostInfo(const char *TripleStr) const {
|
2009-03-18 09:38:48 +08:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Constructing host");
|
2009-05-22 10:53:45 +08:00
|
|
|
llvm::Triple Triple(TripleStr);
|
2009-03-11 07:41:59 +08:00
|
|
|
|
2010-03-05 05:07:38 +08:00
|
|
|
// TCE is an osless target
|
|
|
|
if (Triple.getArchName() == "tce")
|
2010-06-15 05:23:12 +08:00
|
|
|
return createTCEHostInfo(*this, Triple);
|
2010-03-05 05:07:38 +08:00
|
|
|
|
2009-05-22 10:53:45 +08:00
|
|
|
switch (Triple.getOS()) {
|
2009-08-22 09:06:46 +08:00
|
|
|
case llvm::Triple::AuroraUX:
|
|
|
|
return createAuroraUXHostInfo(*this, Triple);
|
2009-05-22 10:53:45 +08:00
|
|
|
case llvm::Triple::Darwin:
|
|
|
|
return createDarwinHostInfo(*this, Triple);
|
|
|
|
case llvm::Triple::DragonFly:
|
|
|
|
return createDragonFlyHostInfo(*this, Triple);
|
2009-06-30 04:52:51 +08:00
|
|
|
case llvm::Triple::OpenBSD:
|
|
|
|
return createOpenBSDHostInfo(*this, Triple);
|
2009-05-22 10:53:45 +08:00
|
|
|
case llvm::Triple::FreeBSD:
|
|
|
|
return createFreeBSDHostInfo(*this, Triple);
|
2009-05-26 15:52:18 +08:00
|
|
|
case llvm::Triple::Linux:
|
|
|
|
return createLinuxHostInfo(*this, Triple);
|
2009-05-22 10:53:45 +08:00
|
|
|
default:
|
|
|
|
return createUnknownHostInfo(*this, Triple);
|
|
|
|
}
|
2009-03-11 07:41:59 +08:00
|
|
|
}
|
2009-03-25 02:57:02 +08:00
|
|
|
|
|
|
|
bool Driver::ShouldUseClangCompiler(const Compilation &C, const JobAction &JA,
|
2009-09-09 07:36:55 +08:00
|
|
|
const llvm::Triple &Triple) const {
|
2009-09-09 07:36:43 +08:00
|
|
|
// Check if user requested no clang, or clang doesn't understand this type (we
|
|
|
|
// only handle single inputs for now).
|
2009-09-02 00:57:46 +08:00
|
|
|
if (!CCCUseClang || JA.size() != 1 ||
|
2009-03-25 02:57:02 +08:00
|
|
|
!types::isAcceptedByClang((*JA.begin())->getType()))
|
|
|
|
return false;
|
|
|
|
|
2009-03-25 03:02:31 +08:00
|
|
|
// Otherwise make sure this is an action clang understands.
|
2009-03-25 02:57:02 +08:00
|
|
|
if (isa<PreprocessJobAction>(JA)) {
|
2009-03-25 03:14:56 +08:00
|
|
|
if (!CCCUseClangCPP) {
|
|
|
|
Diag(clang::diag::warn_drv_not_using_clang_cpp);
|
2009-03-25 02:57:02 +08:00
|
|
|
return false;
|
2009-03-25 03:14:56 +08:00
|
|
|
}
|
2009-03-25 02:57:02 +08:00
|
|
|
} else if (!isa<PrecompileJobAction>(JA) && !isa<CompileJobAction>(JA))
|
|
|
|
return false;
|
|
|
|
|
2009-03-25 03:02:31 +08:00
|
|
|
// Use clang for C++?
|
2009-03-25 03:14:56 +08:00
|
|
|
if (!CCCUseClangCXX && types::isCXX((*JA.begin())->getType())) {
|
|
|
|
Diag(clang::diag::warn_drv_not_using_clang_cxx);
|
2009-03-25 02:57:02 +08:00
|
|
|
return false;
|
2009-03-25 03:14:56 +08:00
|
|
|
}
|
2009-03-25 02:57:02 +08:00
|
|
|
|
2010-02-11 11:16:21 +08:00
|
|
|
// Always use clang for precompiling, AST generation, and rewriting,
|
|
|
|
// regardless of archs.
|
2010-06-08 07:28:45 +08:00
|
|
|
if (isa<PrecompileJobAction>(JA) ||
|
|
|
|
types::isOnlyAcceptedByClang(JA.getType()))
|
2009-04-17 07:10:13 +08:00
|
|
|
return true;
|
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
// Finally, don't use clang if this isn't one of the user specified archs to
|
|
|
|
// build.
|
2009-09-09 07:36:55 +08:00
|
|
|
if (!CCCClangArchs.empty() && !CCCClangArchs.count(Triple.getArch())) {
|
|
|
|
Diag(clang::diag::warn_drv_not_using_clang_arch) << Triple.getArchName();
|
2009-03-25 02:57:02 +08:00
|
|
|
return false;
|
2009-03-25 03:14:56 +08:00
|
|
|
}
|
2009-03-25 02:57:02 +08:00
|
|
|
|
|
|
|
return true;
|
|
|
|
}
|
2009-03-26 23:58:36 +08:00
|
|
|
|
2009-09-09 07:36:43 +08:00
|
|
|
/// GetReleaseVersion - Parse (([0-9]+)(.([0-9]+)(.([0-9]+)?))?)? and return the
|
|
|
|
/// grouped values as integers. Numbers which are not provided are set to 0.
|
2009-03-26 23:58:36 +08:00
|
|
|
///
|
2009-09-09 07:36:43 +08:00
|
|
|
/// \return True if the entire string was parsed (9.2), or all groups were
|
|
|
|
/// parsed (10.3.5extrastuff).
|
|
|
|
bool Driver::GetReleaseVersion(const char *Str, unsigned &Major,
|
2009-03-26 23:58:36 +08:00
|
|
|
unsigned &Minor, unsigned &Micro,
|
|
|
|
bool &HadExtra) {
|
|
|
|
HadExtra = false;
|
|
|
|
|
|
|
|
Major = Minor = Micro = 0;
|
2009-09-09 07:36:43 +08:00
|
|
|
if (*Str == '\0')
|
2009-03-26 23:58:36 +08:00
|
|
|
return true;
|
|
|
|
|
|
|
|
char *End;
|
|
|
|
Major = (unsigned) strtol(Str, &End, 10);
|
|
|
|
if (*Str != '\0' && *End == '\0')
|
|
|
|
return true;
|
|
|
|
if (*End != '.')
|
|
|
|
return false;
|
2009-09-09 07:36:43 +08:00
|
|
|
|
2009-03-26 23:58:36 +08:00
|
|
|
Str = End+1;
|
|
|
|
Minor = (unsigned) strtol(Str, &End, 10);
|
|
|
|
if (*Str != '\0' && *End == '\0')
|
|
|
|
return true;
|
|
|
|
if (*End != '.')
|
|
|
|
return false;
|
|
|
|
|
|
|
|
Str = End+1;
|
|
|
|
Micro = (unsigned) strtol(Str, &End, 10);
|
|
|
|
if (*Str != '\0' && *End == '\0')
|
|
|
|
return true;
|
|
|
|
if (Str == End)
|
|
|
|
return false;
|
|
|
|
HadExtra = true;
|
|
|
|
return true;
|
|
|
|
}
|