2009-03-02 22:59:07 +03: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 10:58:46 +03:00
|
|
|
#include "clang/Driver/Action.h"
|
2009-03-04 23:49:20 +03:00
|
|
|
#include "clang/Driver/Arg.h"
|
|
|
|
#include "clang/Driver/ArgList.h"
|
|
|
|
#include "clang/Driver/Compilation.h"
|
2009-03-12 11:55:43 +03:00
|
|
|
#include "clang/Driver/DriverDiagnostic.h"
|
2009-03-11 02:41:59 +03:00
|
|
|
#include "clang/Driver/HostInfo.h"
|
2009-03-16 09:56:51 +03:00
|
|
|
#include "clang/Driver/Job.h"
|
2009-03-05 09:38:47 +03:00
|
|
|
#include "clang/Driver/Option.h"
|
2009-03-04 23:49:20 +03:00
|
|
|
#include "clang/Driver/Options.h"
|
2009-03-16 09:56:51 +03:00
|
|
|
#include "clang/Driver/Tool.h"
|
|
|
|
#include "clang/Driver/ToolChain.h"
|
2009-03-12 10:58:46 +03:00
|
|
|
#include "clang/Driver/Types.h"
|
2009-03-05 09:38:47 +03:00
|
|
|
|
2009-03-13 23:33:35 +03:00
|
|
|
#include "llvm/ADT/StringSet.h"
|
2009-03-18 04:38:48 +03:00
|
|
|
#include "llvm/Support/PrettyStackTrace.h"
|
2009-03-05 09:38:47 +03:00
|
|
|
#include "llvm/Support/raw_ostream.h"
|
2009-03-12 10:58:46 +03:00
|
|
|
#include "llvm/System/Path.h"
|
2009-03-19 00:34:08 +03:00
|
|
|
#include "llvm/System/Program.h"
|
2009-03-13 15:19:02 +03:00
|
|
|
|
2009-03-16 09:56:51 +03:00
|
|
|
#include "InputInfo.h"
|
|
|
|
|
2009-03-13 15:19:02 +03:00
|
|
|
#include <map>
|
|
|
|
|
2009-03-04 23:49:20 +03:00
|
|
|
using namespace clang::driver;
|
|
|
|
|
2009-03-11 02:41:59 +03:00
|
|
|
Driver::Driver(const char *_Name, const char *_Dir,
|
2009-03-12 11:55:43 +03:00
|
|
|
const char *_DefaultHostTriple,
|
2009-03-16 09:56:51 +03:00
|
|
|
const char *_DefaultImageName,
|
2009-03-12 11:55:43 +03:00
|
|
|
Diagnostic &_Diags)
|
|
|
|
: Opts(new OptTable()), Diags(_Diags),
|
2009-03-11 02:41:59 +03:00
|
|
|
Name(_Name), Dir(_Dir), DefaultHostTriple(_DefaultHostTriple),
|
2009-03-16 09:56:51 +03:00
|
|
|
DefaultImageName(_DefaultImageName),
|
2009-03-11 02:41:59 +03:00
|
|
|
Host(0),
|
2009-03-18 01:47:06 +03:00
|
|
|
CCCIsCXX(false), CCCEcho(false), CCCPrintBindings(false),
|
2009-03-13 03:17:48 +03:00
|
|
|
CCCNoClang(false), CCCNoClangCXX(false), CCCNoClangCPP(false),
|
|
|
|
SuppressMissingInputWarning(false)
|
2009-03-10 23:52:46 +03:00
|
|
|
{
|
2009-03-02 22:59:07 +03:00
|
|
|
}
|
|
|
|
|
|
|
|
Driver::~Driver() {
|
2009-03-04 23:49:20 +03:00
|
|
|
delete Opts;
|
2009-03-18 04:09:40 +03:00
|
|
|
delete Host;
|
2009-03-02 22:59:07 +03:00
|
|
|
}
|
|
|
|
|
2009-03-05 09:38:47 +03:00
|
|
|
ArgList *Driver::ParseArgStrings(const char **ArgBegin, const char **ArgEnd) {
|
2009-03-18 04:38:48 +03:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Command line argument parsing");
|
2009-03-05 09:38:47 +03:00
|
|
|
ArgList *Args = new ArgList(ArgBegin, ArgEnd);
|
|
|
|
|
2009-03-13 14:38:42 +03:00
|
|
|
// FIXME: Handle '@' args (or at least error on them).
|
|
|
|
|
2009-03-05 09:38:47 +03:00
|
|
|
unsigned Index = 0, End = ArgEnd - ArgBegin;
|
|
|
|
while (Index < End) {
|
2009-03-13 04:01:44 +03:00
|
|
|
// gcc's handling of empty arguments doesn't make
|
|
|
|
// sense, but this is not a common use case. :)
|
|
|
|
//
|
|
|
|
// We just ignore them here (note that other things may
|
|
|
|
// still take them as arguments).
|
|
|
|
if (Args->getArgString(Index)[0] == '\0') {
|
|
|
|
++Index;
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
2009-03-05 09:38:47 +03:00
|
|
|
unsigned Prev = Index;
|
2009-03-23 02:26:43 +03:00
|
|
|
Arg *A = getOpts().ParseOneArg(*Args, Index);
|
|
|
|
assert(Index > Prev && "Parser failed to consume argument.");
|
|
|
|
|
|
|
|
// Check for missing argument error.
|
|
|
|
if (!A) {
|
|
|
|
assert(Index >= End && "Unexpected parser error.");
|
|
|
|
Diag(clang::diag::err_drv_missing_argument)
|
|
|
|
<< Args->getArgString(Prev)
|
|
|
|
<< (Index - Prev - 1);
|
|
|
|
break;
|
2009-03-12 10:58:46 +03:00
|
|
|
}
|
2009-03-05 09:38:47 +03:00
|
|
|
|
2009-03-23 02:26:43 +03:00
|
|
|
if (A->getOption().isUnsupported()) {
|
|
|
|
Diag(clang::diag::err_drv_unsupported_opt) << A->getAsString(*Args);
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
Args->append(A);
|
2009-03-05 09:38:47 +03:00
|
|
|
}
|
|
|
|
|
|
|
|
return Args;
|
|
|
|
}
|
|
|
|
|
2009-03-02 22:59:07 +03:00
|
|
|
Compilation *Driver::BuildCompilation(int argc, const char **argv) {
|
2009-03-18 04:38:48 +03:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Compilation construction");
|
|
|
|
|
2009-03-13 03:51:18 +03:00
|
|
|
// FIXME: Handle environment options which effect driver behavior,
|
|
|
|
// somewhere (client?). GCC_EXEC_PREFIX, COMPILER_PATH,
|
|
|
|
// LIBRARY_PATH, LPATH, CC_PRINT_OPTIONS, QA_OVERRIDE_GCC3_OPTIONS.
|
|
|
|
|
|
|
|
// FIXME: What are we going to do with -V and -b?
|
|
|
|
|
|
|
|
// FIXME: Handle CCC_ADD_ARGS.
|
|
|
|
|
2009-03-10 23:52:46 +03:00
|
|
|
// FIXME: This stuff needs to go into the Compilation, not the
|
|
|
|
// driver.
|
2009-03-12 10:58:46 +03:00
|
|
|
bool CCCPrintOptions = false, CCCPrintActions = false;
|
2009-03-05 09:38:47 +03:00
|
|
|
|
2009-03-10 23:52:46 +03:00
|
|
|
const char **Start = argv + 1, **End = argv + argc;
|
2009-03-11 02:41:59 +03:00
|
|
|
const char *HostTriple = DefaultHostTriple.c_str();
|
2009-03-10 23:52:46 +03:00
|
|
|
|
|
|
|
// Read -ccc args.
|
|
|
|
//
|
|
|
|
// 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.
|
|
|
|
for (; Start != End && memcmp(*Start, "-ccc-", 5) == 0; ++Start) {
|
|
|
|
const char *Opt = *Start + 5;
|
|
|
|
|
|
|
|
if (!strcmp(Opt, "print-options")) {
|
|
|
|
CCCPrintOptions = true;
|
|
|
|
} else if (!strcmp(Opt, "print-phases")) {
|
2009-03-12 10:58:46 +03:00
|
|
|
CCCPrintActions = true;
|
2009-03-18 01:47:06 +03:00
|
|
|
} else if (!strcmp(Opt, "print-bindings")) {
|
|
|
|
CCCPrintBindings = true;
|
2009-03-10 23:52:46 +03:00
|
|
|
} else if (!strcmp(Opt, "cxx")) {
|
|
|
|
CCCIsCXX = true;
|
|
|
|
} else if (!strcmp(Opt, "echo")) {
|
|
|
|
CCCEcho = true;
|
|
|
|
|
|
|
|
} else if (!strcmp(Opt, "no-clang")) {
|
|
|
|
CCCNoClang = true;
|
|
|
|
} else if (!strcmp(Opt, "no-clang-cxx")) {
|
|
|
|
CCCNoClangCXX = true;
|
|
|
|
} else if (!strcmp(Opt, "no-clang-cpp")) {
|
|
|
|
CCCNoClangCPP = true;
|
|
|
|
} else if (!strcmp(Opt, "clang-archs")) {
|
|
|
|
assert(Start+1 < End && "FIXME: -ccc- argument handling.");
|
|
|
|
const char *Cur = *++Start;
|
|
|
|
|
|
|
|
for (;;) {
|
|
|
|
const char *Next = strchr(Cur, ',');
|
|
|
|
|
|
|
|
if (Next) {
|
|
|
|
CCCClangArchs.insert(std::string(Cur, Next));
|
|
|
|
Cur = Next + 1;
|
|
|
|
} else {
|
|
|
|
CCCClangArchs.insert(std::string(Cur));
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-03-11 02:41:59 +03:00
|
|
|
} else if (!strcmp(Opt, "host-triple")) {
|
2009-03-10 23:52:46 +03:00
|
|
|
assert(Start+1 < End && "FIXME: -ccc- argument handling.");
|
2009-03-11 02:41:59 +03:00
|
|
|
HostTriple = *++Start;
|
2009-03-10 23:52:46 +03:00
|
|
|
|
|
|
|
} else {
|
|
|
|
// FIXME: Error handling.
|
|
|
|
llvm::errs() << "invalid option: " << *Start << "\n";
|
|
|
|
exit(1);
|
|
|
|
}
|
|
|
|
}
|
2009-03-11 02:41:59 +03:00
|
|
|
|
2009-03-10 23:52:46 +03:00
|
|
|
ArgList *Args = ParseArgStrings(Start, End);
|
|
|
|
|
2009-03-17 23:45:45 +03:00
|
|
|
Host = GetHostInfo(HostTriple);
|
2009-03-13 03:51:18 +03:00
|
|
|
|
2009-03-18 05:55:38 +03:00
|
|
|
// The compilation takes ownership of Args.
|
2009-03-19 01:16:03 +03:00
|
|
|
Compilation *C = new Compilation(*this, *Host->getToolChain(*Args), Args);
|
2009-03-18 05:55:38 +03:00
|
|
|
|
2009-03-10 23:52:46 +03:00
|
|
|
// FIXME: This behavior shouldn't be here.
|
|
|
|
if (CCCPrintOptions) {
|
2009-03-18 05:55:38 +03:00
|
|
|
PrintOptions(C->getArgs());
|
|
|
|
return C;
|
2009-03-10 23:52:46 +03:00
|
|
|
}
|
2009-03-12 10:58:46 +03:00
|
|
|
|
2009-03-18 05:55:38 +03:00
|
|
|
if (!HandleImmediateArgs(*C))
|
|
|
|
return C;
|
2009-03-13 03:51:18 +03:00
|
|
|
|
2009-03-12 10:58:46 +03:00
|
|
|
// Construct the list of abstract actions to perform for this
|
2009-03-18 05:55:38 +03:00
|
|
|
// 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 10:58:46 +03:00
|
|
|
if (Host->useDriverDriver())
|
2009-03-18 05:55:38 +03:00
|
|
|
BuildUniversalActions(C->getArgs(), C->getActions());
|
2009-03-12 10:58:46 +03:00
|
|
|
else
|
2009-03-18 05:55:38 +03:00
|
|
|
BuildActions(C->getArgs(), C->getActions());
|
2009-03-12 10:58:46 +03:00
|
|
|
|
|
|
|
if (CCCPrintActions) {
|
2009-03-18 06:13:20 +03:00
|
|
|
PrintActions(*C);
|
2009-03-18 05:55:38 +03:00
|
|
|
return C;
|
2009-03-12 10:58:46 +03:00
|
|
|
}
|
2009-03-13 20:24:34 +03:00
|
|
|
|
2009-03-18 05:55:38 +03:00
|
|
|
BuildJobs(*C);
|
2009-03-15 04:38:15 +03:00
|
|
|
|
|
|
|
return C;
|
2009-03-10 23:52:46 +03:00
|
|
|
}
|
|
|
|
|
2009-03-12 21:24:49 +03:00
|
|
|
void Driver::PrintOptions(const ArgList &Args) const {
|
2009-03-05 09:38:47 +03:00
|
|
|
unsigned i = 0;
|
2009-03-12 10:58:46 +03:00
|
|
|
for (ArgList::const_iterator it = Args.begin(), ie = Args.end();
|
2009-03-05 09:38:47 +03: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 10:58:46 +03:00
|
|
|
llvm::errs() << '"' << A->getValue(Args, j) << '"';
|
2009-03-05 09:38:47 +03:00
|
|
|
}
|
|
|
|
llvm::errs() << "}\n";
|
|
|
|
}
|
2009-03-02 22:59:07 +03:00
|
|
|
}
|
2009-03-11 02:41:59 +03:00
|
|
|
|
2009-03-13 03:51:18 +03:00
|
|
|
void Driver::PrintVersion() const {
|
2009-03-18 17:00:02 +03:00
|
|
|
static char buf[] = "$URL$";
|
|
|
|
char *zap = strstr(buf, "/lib/Driver");
|
|
|
|
if (zap)
|
|
|
|
*zap = 0;
|
|
|
|
zap = strstr(buf, "/clang/tools/clang");
|
|
|
|
if (zap)
|
|
|
|
*zap = 0;
|
2009-03-18 18:19:35 +03:00
|
|
|
const char *vers = buf+6;
|
2009-03-18 21:45:55 +03:00
|
|
|
// FIXME: Add cmake support and remove #ifdef
|
|
|
|
#ifdef SVN_REVISION
|
|
|
|
const char *revision = SVN_REVISION;
|
|
|
|
#else
|
|
|
|
const char *revision = "";
|
|
|
|
#endif
|
2009-03-13 03:51:18 +03:00
|
|
|
// FIXME: The following handlers should use a callback mechanism, we
|
|
|
|
// don't know what the client would like to do.
|
2009-03-19 00:19:11 +03:00
|
|
|
llvm::errs() << "clang version 1.0 (" << vers << " " << revision << ")" << "\n";
|
2009-03-18 17:00:02 +03:00
|
|
|
// FIXME: Add cmake support and remove #ifdef
|
|
|
|
#ifdef TARGET_TRIPLE
|
|
|
|
llvm::errs() << "Target: " << TARGET_TRIPLE << "\n";
|
|
|
|
#endif
|
2009-03-13 03:51:18 +03:00
|
|
|
}
|
|
|
|
|
2009-03-18 05:55:38 +03:00
|
|
|
bool Driver::HandleImmediateArgs(const Compilation &C) {
|
2009-03-13 03:51:18 +03:00
|
|
|
// The order these options are handled in in gcc is all over the
|
|
|
|
// place, but we don't expect inconsistencies w.r.t. that to matter
|
|
|
|
// in practice.
|
2009-03-18 05:55:38 +03:00
|
|
|
if (C.getArgs().hasArg(options::OPT_v) ||
|
|
|
|
C.getArgs().hasArg(options::OPT__HASH_HASH_HASH)) {
|
2009-03-13 03:51:18 +03:00
|
|
|
PrintVersion();
|
|
|
|
SuppressMissingInputWarning = true;
|
|
|
|
}
|
|
|
|
|
2009-03-18 05:55:38 +03:00
|
|
|
const ToolChain &TC = C.getDefaultToolChain();
|
2009-03-20 07:37:21 +03: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: =";
|
|
|
|
for (ToolChain::path_list::const_iterator it = TC.getFilePaths().begin(),
|
|
|
|
ie = TC.getFilePaths().end(); it != ie; ++it) {
|
|
|
|
if (it != TC.getFilePaths().begin())
|
|
|
|
llvm::outs() << ':';
|
|
|
|
llvm::outs() << *it;
|
|
|
|
}
|
|
|
|
llvm::outs() << "\n";
|
|
|
|
}
|
|
|
|
|
2009-03-13 03:51:18 +03:00
|
|
|
// FIXME: The following handlers should use a callback mechanism, we
|
|
|
|
// don't know what the client would like to do.
|
2009-03-18 05:55:38 +03:00
|
|
|
if (Arg *A = C.getArgs().getLastArg(options::OPT_print_file_name_EQ)) {
|
|
|
|
llvm::outs() << GetFilePath(A->getValue(C.getArgs()), TC).toString()
|
|
|
|
<< "\n";
|
2009-03-13 03:51:18 +03:00
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
2009-03-18 05:55:38 +03:00
|
|
|
if (Arg *A = C.getArgs().getLastArg(options::OPT_print_prog_name_EQ)) {
|
|
|
|
llvm::outs() << GetProgramPath(A->getValue(C.getArgs()), TC).toString()
|
|
|
|
<< "\n";
|
2009-03-13 03:51:18 +03:00
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
2009-03-18 05:55:38 +03:00
|
|
|
if (C.getArgs().hasArg(options::OPT_print_libgcc_file_name)) {
|
|
|
|
llvm::outs() << GetProgramPath("libgcc.a", TC).toString() << "\n";
|
2009-03-13 03:51:18 +03:00
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
2009-03-18 06:13:20 +03:00
|
|
|
static unsigned PrintActions1(const Compilation &C,
|
2009-03-13 15:19:02 +03:00
|
|
|
Action *A,
|
|
|
|
std::map<Action*, unsigned> &Ids) {
|
|
|
|
if (Ids.count(A))
|
|
|
|
return Ids[A];
|
|
|
|
|
|
|
|
std::string str;
|
|
|
|
llvm::raw_string_ostream os(str);
|
|
|
|
|
|
|
|
os << Action::getClassName(A->getKind()) << ", ";
|
|
|
|
if (InputAction *IA = dyn_cast<InputAction>(A)) {
|
2009-03-18 06:13:20 +03:00
|
|
|
os << "\"" << IA->getInputArg().getValue(C.getArgs()) << "\"";
|
2009-03-13 15:19:02 +03:00
|
|
|
} else if (BindArchAction *BIA = dyn_cast<BindArchAction>(A)) {
|
2009-03-18 06:13:20 +03:00
|
|
|
os << '"' << (BIA->getArchName() ? BIA->getArchName() :
|
|
|
|
C.getDefaultToolChain().getArchName()) << '"'
|
|
|
|
<< ", {" << PrintActions1(C, *BIA->begin(), Ids) << "}";
|
2009-03-13 15:19:02 +03:00
|
|
|
} else {
|
|
|
|
os << "{";
|
|
|
|
for (Action::iterator it = A->begin(), ie = A->end(); it != ie;) {
|
2009-03-18 06:13:20 +03:00
|
|
|
os << PrintActions1(C, *it, Ids);
|
2009-03-13 15:19:02 +03:00
|
|
|
++it;
|
|
|
|
if (it != ie)
|
|
|
|
os << ", ";
|
|
|
|
}
|
|
|
|
os << "}";
|
|
|
|
}
|
|
|
|
|
|
|
|
unsigned Id = Ids.size();
|
|
|
|
Ids[A] = Id;
|
2009-03-13 20:20:20 +03:00
|
|
|
llvm::errs() << Id << ": " << os.str() << ", "
|
2009-03-13 15:19:02 +03:00
|
|
|
<< types::getTypeName(A->getType()) << "\n";
|
|
|
|
|
|
|
|
return Id;
|
|
|
|
}
|
|
|
|
|
2009-03-18 06:13:20 +03:00
|
|
|
void Driver::PrintActions(const Compilation &C) const {
|
2009-03-13 15:19:02 +03:00
|
|
|
std::map<Action*, unsigned> Ids;
|
2009-03-18 06:13:20 +03:00
|
|
|
for (ActionList::const_iterator it = C.getActions().begin(),
|
|
|
|
ie = C.getActions().end(); it != ie; ++it)
|
|
|
|
PrintActions1(C, *it, Ids);
|
2009-03-12 10:58:46 +03:00
|
|
|
}
|
|
|
|
|
2009-03-18 05:55:38 +03:00
|
|
|
void Driver::BuildUniversalActions(const ArgList &Args,
|
|
|
|
ActionList &Actions) const {
|
2009-03-18 04:38:48 +03:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Building actions for universal build");
|
2009-03-13 23:33:35 +03:00
|
|
|
// Collect the list of architectures. Duplicates are allowed, but
|
|
|
|
// should only be handled once (in the order seen).
|
|
|
|
llvm::StringSet<> ArchNames;
|
|
|
|
llvm::SmallVector<const char *, 4> Archs;
|
2009-03-12 21:40:18 +03:00
|
|
|
for (ArgList::const_iterator it = Args.begin(), ie = Args.end();
|
|
|
|
it != ie; ++it) {
|
|
|
|
Arg *A = *it;
|
|
|
|
|
|
|
|
if (A->getOption().getId() == options::OPT_arch) {
|
2009-03-13 23:33:35 +03:00
|
|
|
const char *Name = A->getValue(Args);
|
|
|
|
|
2009-03-12 21:40:18 +03:00
|
|
|
// FIXME: We need to handle canonicalization of the specified
|
|
|
|
// arch?
|
|
|
|
|
2009-03-19 10:55:12 +03:00
|
|
|
A->claim();
|
2009-03-13 23:33:35 +03:00
|
|
|
if (ArchNames.insert(Name))
|
|
|
|
Archs.push_back(Name);
|
2009-03-12 21:40:18 +03:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-03-18 06:13:20 +03: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.
|
|
|
|
if (!Archs.size())
|
|
|
|
Archs.push_back(0);
|
2009-03-12 21:40:18 +03: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.
|
|
|
|
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_M_Group))
|
|
|
|
Diag(clang::diag::err_drv_invalid_opt_with_multiple_archs)
|
2009-03-20 09:14:23 +03:00
|
|
|
<< A->getAsString(Args);
|
2009-03-12 21:40:18 +03:00
|
|
|
if (const Arg *A = Args.getLastArg(options::OPT_save_temps))
|
|
|
|
Diag(clang::diag::err_drv_invalid_opt_with_multiple_archs)
|
2009-03-20 09:14:23 +03:00
|
|
|
<< A->getAsString(Args);
|
2009-03-12 21:40:18 +03:00
|
|
|
}
|
|
|
|
|
|
|
|
ActionList SingleActions;
|
|
|
|
BuildActions(Args, SingleActions);
|
|
|
|
|
|
|
|
// Add in arch binding and lipo (if necessary) for every top level
|
|
|
|
// action.
|
|
|
|
for (unsigned i = 0, e = SingleActions.size(); i != e; ++i) {
|
|
|
|
Action *Act = SingleActions[i];
|
|
|
|
|
|
|
|
// 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
|
|
|
|
// -save-temps. Compatibility wins for now.
|
|
|
|
|
2009-03-13 20:46:02 +03:00
|
|
|
if (Archs.size() > 1 && !types::canLipoType(Act->getType()))
|
2009-03-12 21:40:18 +03:00
|
|
|
Diag(clang::diag::err_drv_invalid_output_with_multiple_archs)
|
|
|
|
<< types::getTypeName(Act->getType());
|
|
|
|
|
|
|
|
ActionList Inputs;
|
2009-03-19 10:55:12 +03:00
|
|
|
for (unsigned i = 0, e = Archs.size(); i != e; ++i)
|
2009-03-13 23:33:35 +03:00
|
|
|
Inputs.push_back(new BindArchAction(Act, Archs[i]));
|
2009-03-12 21:40:18 +03:00
|
|
|
|
|
|
|
// Lipo if necessary, We do it this way because we need to set the
|
|
|
|
// arch flag so that -Xarch_ gets overwritten.
|
|
|
|
if (Inputs.size() == 1 || Act->getType() == types::TY_Nothing)
|
|
|
|
Actions.append(Inputs.begin(), Inputs.end());
|
|
|
|
else
|
|
|
|
Actions.push_back(new LipoJobAction(Inputs, Act->getType()));
|
|
|
|
}
|
2009-03-12 10:58:46 +03:00
|
|
|
}
|
|
|
|
|
2009-03-18 05:55:38 +03:00
|
|
|
void Driver::BuildActions(const ArgList &Args, ActionList &Actions) const {
|
2009-03-18 04:38:48 +03:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Building compilation actions");
|
2009-03-13 02:55:14 +03:00
|
|
|
// Start by constructing the list of inputs and their types.
|
|
|
|
|
2009-03-13 20:57:10 +03: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.
|
|
|
|
types::ID InputType = types::TY_Nothing;
|
|
|
|
Arg *InputTypeArg = 0;
|
|
|
|
|
2009-03-12 10:58:46 +03:00
|
|
|
llvm::SmallVector<std::pair<types::ID, const Arg*>, 16> Inputs;
|
|
|
|
for (ArgList::const_iterator it = Args.begin(), ie = Args.end();
|
|
|
|
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-13 20:57:10 +03:00
|
|
|
if (InputType == types::TY_Nothing) {
|
|
|
|
// If there was an explicit arg for this, claim it.
|
|
|
|
if (InputTypeArg)
|
|
|
|
InputTypeArg->claim();
|
|
|
|
|
2009-03-12 10:58:46 +03:00
|
|
|
// stdin must be handled specially.
|
|
|
|
if (memcmp(Value, "-", 2) == 0) {
|
|
|
|
// If running with -E, treat as a C input (this changes the
|
|
|
|
// builtin macros, for example). This may be overridden by
|
|
|
|
// -ObjC below.
|
|
|
|
//
|
|
|
|
// Otherwise emit an error but still use a valid type to
|
|
|
|
// avoid spurious errors (e.g., no inputs).
|
2009-03-15 03:48:16 +03:00
|
|
|
if (!Args.hasArg(options::OPT_E, false))
|
2009-03-12 12:13:48 +03:00
|
|
|
Diag(clang::diag::err_drv_unknown_stdin_type);
|
2009-03-12 10:58:46 +03:00
|
|
|
Ty = types::TY_C;
|
|
|
|
} else {
|
|
|
|
// Otherwise lookup by extension, and fallback to ObjectType
|
2009-03-21 02:39:23 +03:00
|
|
|
// if not found. We use a host hook here because Darwin at
|
|
|
|
// least has its own idea of what .s is.
|
2009-03-12 10:58:46 +03:00
|
|
|
if (const char *Ext = strrchr(Value, '.'))
|
2009-03-21 02:39:23 +03:00
|
|
|
Ty = Host->lookupTypeForExtension(Ext + 1);
|
|
|
|
|
2009-03-12 10:58:46 +03:00
|
|
|
if (Ty == types::TY_INVALID)
|
|
|
|
Ty = types::TY_Object;
|
|
|
|
}
|
|
|
|
|
|
|
|
// -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.
|
|
|
|
//
|
|
|
|
// FIXME: Clean this up if we move the phase sequence into the
|
|
|
|
// type.
|
|
|
|
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;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Check that the file exists. It isn't clear this is worth
|
|
|
|
// doing, since the tool presumably does this anyway, and this
|
|
|
|
// just adds an extra stat to the equation, but this is gcc
|
|
|
|
// compatible.
|
|
|
|
if (memcmp(Value, "-", 2) != 0 && !llvm::sys::Path(Value).exists())
|
2009-03-12 12:13:48 +03:00
|
|
|
Diag(clang::diag::err_drv_no_such_file) << A->getValue(Args);
|
2009-03-12 10:58:46 +03:00
|
|
|
else
|
|
|
|
Inputs.push_back(std::make_pair(Ty, A));
|
|
|
|
|
|
|
|
} else if (A->getOption().isLinkerInput()) {
|
|
|
|
// Just treat as object type, we could make a special type for
|
|
|
|
// this if necessary.
|
|
|
|
Inputs.push_back(std::make_pair(types::TY_Object, A));
|
|
|
|
|
|
|
|
} else if (A->getOption().getId() == options::OPT_x) {
|
|
|
|
InputTypeArg = A;
|
|
|
|
InputType = types::lookupTypeForTypeSpecifier(A->getValue(Args));
|
|
|
|
|
|
|
|
// Follow gcc behavior and treat as linker input for invalid -x
|
|
|
|
// 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.
|
|
|
|
if (!InputType) {
|
2009-03-12 12:13:48 +03:00
|
|
|
Diag(clang::diag::err_drv_unknown_language) << A->getValue(Args);
|
2009-03-12 10:58:46 +03:00
|
|
|
InputType = types::TY_Object;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-03-13 03:17:48 +03:00
|
|
|
if (!SuppressMissingInputWarning && Inputs.empty()) {
|
2009-03-13 02:55:14 +03:00
|
|
|
Diag(clang::diag::err_drv_no_input_files);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
// 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 14:38:42 +03:00
|
|
|
Arg *FinalPhaseArg = 0;
|
|
|
|
phases::ID FinalPhase;
|
2009-03-13 02:55:14 +03:00
|
|
|
|
|
|
|
// -{E,M,MM} only run the preprocessor.
|
2009-03-13 14:38:42 +03:00
|
|
|
if ((FinalPhaseArg = Args.getLastArg(options::OPT_E)) ||
|
|
|
|
(FinalPhaseArg = Args.getLastArg(options::OPT_M)) ||
|
|
|
|
(FinalPhaseArg = Args.getLastArg(options::OPT_MM))) {
|
|
|
|
FinalPhase = phases::Preprocess;
|
2009-03-13 02:55:14 +03:00
|
|
|
|
2009-03-15 03:48:16 +03:00
|
|
|
// -{fsyntax-only,-analyze,emit-llvm,S} only run up to the compiler.
|
|
|
|
} else if ((FinalPhaseArg = Args.getLastArg(options::OPT_fsyntax_only)) ||
|
|
|
|
(FinalPhaseArg = Args.getLastArg(options::OPT__analyze)) ||
|
|
|
|
(FinalPhaseArg = Args.getLastArg(options::OPT_emit_llvm)) ||
|
2009-03-13 14:38:42 +03:00
|
|
|
(FinalPhaseArg = Args.getLastArg(options::OPT_S))) {
|
|
|
|
FinalPhase = phases::Compile;
|
2009-03-13 02:55:14 +03:00
|
|
|
|
|
|
|
// -c only runs up to the assembler.
|
2009-03-13 14:38:42 +03:00
|
|
|
} else if ((FinalPhaseArg = Args.getLastArg(options::OPT_c))) {
|
|
|
|
FinalPhase = phases::Assemble;
|
2009-03-13 02:55:14 +03:00
|
|
|
|
|
|
|
// Otherwise do everything.
|
|
|
|
} else
|
2009-03-13 14:38:42 +03:00
|
|
|
FinalPhase = phases::Link;
|
2009-03-13 02:55:14 +03:00
|
|
|
|
|
|
|
// Reject -Z* at the top level, these options should never have been
|
|
|
|
// exposed by gcc.
|
|
|
|
if (Arg *A = Args.getLastArg(options::OPT_Z))
|
2009-03-20 09:14:23 +03:00
|
|
|
Diag(clang::diag::err_drv_use_of_Z_option) << A->getAsString(Args);
|
2009-03-13 02:55:14 +03:00
|
|
|
|
2009-03-13 14:38:42 +03:00
|
|
|
// Construct the actions to perform.
|
|
|
|
ActionList LinkerInputs;
|
2009-03-12 10:58:46 +03:00
|
|
|
for (unsigned i = 0, e = Inputs.size(); i != e; ++i) {
|
2009-03-13 14:38:42 +03:00
|
|
|
types::ID InputType = Inputs[i].first;
|
|
|
|
const Arg *InputArg = Inputs[i].second;
|
|
|
|
|
|
|
|
unsigned NumSteps = types::getNumCompilationPhases(InputType);
|
|
|
|
assert(NumSteps && "Invalid number of steps!");
|
|
|
|
|
|
|
|
// If the first step comes after the final phase we are doing as
|
|
|
|
// part of this compilation, warn the user about it.
|
|
|
|
phases::ID InitialPhase = types::getCompilationPhase(InputType, 0);
|
|
|
|
if (InitialPhase > FinalPhase) {
|
2009-03-19 10:57:08 +03:00
|
|
|
// Claim here to avoid the more general unused warning.
|
|
|
|
InputArg->claim();
|
2009-03-13 14:38:42 +03:00
|
|
|
Diag(clang::diag::warn_drv_input_file_unused)
|
2009-03-20 09:14:23 +03:00
|
|
|
<< InputArg->getAsString(Args)
|
2009-03-13 14:38:42 +03:00
|
|
|
<< getPhaseName(InitialPhase)
|
|
|
|
<< FinalPhaseArg->getOption().getName();
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Build the pipeline for this file.
|
|
|
|
Action *Current = new InputAction(*InputArg, InputType);
|
|
|
|
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.");
|
|
|
|
LinkerInputs.push_back(Current);
|
|
|
|
Current = 0;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Otherwise construct the appropriate action.
|
|
|
|
Current = ConstructPhaseAction(Args, Phase, Current);
|
|
|
|
if (Current->getType() == types::TY_Nothing)
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
// If we ended with something, add to the output list.
|
|
|
|
if (Current)
|
|
|
|
Actions.push_back(Current);
|
2009-03-12 10:58:46 +03:00
|
|
|
}
|
2009-03-13 14:38:42 +03:00
|
|
|
|
|
|
|
// Add a link action if necessary.
|
|
|
|
if (!LinkerInputs.empty())
|
|
|
|
Actions.push_back(new LinkJobAction(LinkerInputs, types::TY_Image));
|
|
|
|
}
|
|
|
|
|
|
|
|
Action *Driver::ConstructPhaseAction(const ArgList &Args, phases::ID Phase,
|
|
|
|
Action *Input) const {
|
2009-03-18 04:38:48 +03:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Constructing phase actions");
|
2009-03-13 14:38:42 +03:00
|
|
|
// Build the appropriate action.
|
|
|
|
switch (Phase) {
|
|
|
|
case phases::Link: assert(0 && "link action invalid here.");
|
|
|
|
case phases::Preprocess: {
|
|
|
|
types::ID OutputTy = types::getPreprocessedType(Input->getType());
|
|
|
|
assert(OutputTy != types::TY_INVALID &&
|
|
|
|
"Cannot preprocess this input type!");
|
|
|
|
return new PreprocessJobAction(Input, OutputTy);
|
|
|
|
}
|
|
|
|
case phases::Precompile:
|
|
|
|
return new PrecompileJobAction(Input, types::TY_PCH);
|
|
|
|
case phases::Compile: {
|
|
|
|
if (Args.hasArg(options::OPT_fsyntax_only)) {
|
|
|
|
return new CompileJobAction(Input, types::TY_Nothing);
|
|
|
|
} else if (Args.hasArg(options::OPT__analyze)) {
|
|
|
|
return new AnalyzeJobAction(Input, types::TY_Plist);
|
|
|
|
} else if (Args.hasArg(options::OPT_emit_llvm)) {
|
|
|
|
types::ID Output =
|
|
|
|
Args.hasArg(options::OPT_S) ? types::TY_LLVMAsm : types::TY_LLVMBC;
|
|
|
|
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 10:58:46 +03:00
|
|
|
}
|
|
|
|
|
2009-03-18 05:55:38 +03:00
|
|
|
void Driver::BuildJobs(Compilation &C) const {
|
2009-03-18 04:38:48 +03:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Building compilation jobs");
|
2009-03-16 09:56:51 +03:00
|
|
|
bool SaveTemps = C.getArgs().hasArg(options::OPT_save_temps);
|
|
|
|
bool UsePipes = C.getArgs().hasArg(options::OPT_pipe);
|
2009-03-19 02:18:19 +03:00
|
|
|
|
|
|
|
// FIXME: Pipes are forcibly disabled until we support executing
|
|
|
|
// them.
|
|
|
|
if (!CCCPrintBindings)
|
|
|
|
UsePipes = false;
|
2009-03-16 09:56:51 +03:00
|
|
|
|
|
|
|
// -save-temps inhibits pipes.
|
|
|
|
if (SaveTemps && UsePipes) {
|
|
|
|
Diag(clang::diag::warn_drv_pipe_ignored_with_save_temps);
|
|
|
|
UsePipes = true;
|
|
|
|
}
|
|
|
|
|
|
|
|
Arg *FinalOutput = C.getArgs().getLastArg(options::OPT_o);
|
|
|
|
|
|
|
|
// It is an error to provide a -o option if we are making multiple
|
|
|
|
// output files.
|
|
|
|
if (FinalOutput) {
|
|
|
|
unsigned NumOutputs = 0;
|
2009-03-18 05:55:38 +03:00
|
|
|
for (ActionList::const_iterator it = C.getActions().begin(),
|
|
|
|
ie = C.getActions().end(); it != ie; ++it)
|
2009-03-16 09:56:51 +03:00
|
|
|
if ((*it)->getType() != types::TY_Nothing)
|
|
|
|
++NumOutputs;
|
|
|
|
|
|
|
|
if (NumOutputs > 1) {
|
|
|
|
Diag(clang::diag::err_drv_output_argument_with_multiple_files);
|
|
|
|
FinalOutput = 0;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-03-18 05:55:38 +03:00
|
|
|
for (ActionList::const_iterator it = C.getActions().begin(),
|
|
|
|
ie = C.getActions().end(); it != ie; ++it) {
|
2009-03-16 09:56:51 +03:00
|
|
|
Action *A = *it;
|
|
|
|
|
|
|
|
// 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.
|
|
|
|
//
|
|
|
|
// FIXME: This is a hack; find a cleaner way to integrate this
|
|
|
|
// into the process.
|
|
|
|
const char *LinkingOutput = 0;
|
|
|
|
if (isa<LinkJobAction>(A)) {
|
|
|
|
if (FinalOutput)
|
|
|
|
LinkingOutput = FinalOutput->getValue(C.getArgs());
|
|
|
|
else
|
|
|
|
LinkingOutput = DefaultImageName.c_str();
|
|
|
|
}
|
|
|
|
|
|
|
|
InputInfo II;
|
2009-03-18 06:13:20 +03:00
|
|
|
BuildJobsForAction(C, A, &C.getDefaultToolChain(),
|
2009-03-16 09:56:51 +03:00
|
|
|
/*CanAcceptPipe*/ true,
|
|
|
|
/*AtTopLevel*/ true,
|
|
|
|
/*LinkingOutput*/ LinkingOutput,
|
|
|
|
II);
|
|
|
|
}
|
2009-03-16 09:42:30 +03:00
|
|
|
|
2009-03-18 21:03:46 +03:00
|
|
|
// If there were errors, don't warn about any unused arguments.
|
|
|
|
if (Diags.getNumErrors())
|
|
|
|
return;
|
|
|
|
|
2009-03-16 09:42:30 +03:00
|
|
|
for (ArgList::const_iterator it = C.getArgs().begin(), ie = C.getArgs().end();
|
|
|
|
it != ie; ++it) {
|
|
|
|
Arg *A = *it;
|
2009-03-18 21:03:46 +03:00
|
|
|
|
2009-03-16 09:42:30 +03:00
|
|
|
// FIXME: It would be nice to be able to send the argument to the
|
|
|
|
// Diagnostic, so that extra values, position, and so on could be
|
|
|
|
// printed.
|
|
|
|
if (!A->isClaimed())
|
|
|
|
Diag(clang::diag::warn_drv_unused_argument)
|
2009-03-20 09:14:23 +03:00
|
|
|
<< A->getAsString(C.getArgs());
|
2009-03-16 09:42:30 +03:00
|
|
|
}
|
2009-03-14 01:12:33 +03:00
|
|
|
}
|
|
|
|
|
2009-03-16 09:56:51 +03:00
|
|
|
void Driver::BuildJobsForAction(Compilation &C,
|
|
|
|
const Action *A,
|
|
|
|
const ToolChain *TC,
|
|
|
|
bool CanAcceptPipe,
|
|
|
|
bool AtTopLevel,
|
|
|
|
const char *LinkingOutput,
|
|
|
|
InputInfo &Result) const {
|
2009-03-18 04:38:48 +03:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Building compilation jobs for action");
|
2009-03-19 02:18:19 +03:00
|
|
|
|
|
|
|
bool UsePipes = C.getArgs().hasArg(options::OPT_pipe);
|
|
|
|
// FIXME: Pipes are forcibly disabled until we support executing
|
|
|
|
// them.
|
|
|
|
if (!CCCPrintBindings)
|
|
|
|
UsePipes = false;
|
|
|
|
|
2009-03-16 09:56:51 +03:00
|
|
|
if (const InputAction *IA = dyn_cast<InputAction>(A)) {
|
2009-03-19 10:29:38 +03:00
|
|
|
// FIXME: It would be nice to not claim this here; maybe the old
|
|
|
|
// scheme of just using Args was better?
|
|
|
|
const Arg &Input = IA->getInputArg();
|
|
|
|
Input.claim();
|
|
|
|
if (isa<PositionalArg>(Input)) {
|
|
|
|
const char *Name = Input.getValue(C.getArgs());
|
|
|
|
Result = InputInfo(Name, A->getType(), Name);
|
|
|
|
} else
|
|
|
|
Result = InputInfo(&Input, A->getType(), "");
|
2009-03-16 09:56:51 +03:00
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (const BindArchAction *BAA = dyn_cast<BindArchAction>(A)) {
|
|
|
|
const char *ArchName = BAA->getArchName();
|
2009-03-18 06:13:20 +03:00
|
|
|
if (!ArchName)
|
|
|
|
ArchName = C.getDefaultToolChain().getArchName().c_str();
|
2009-03-16 09:56:51 +03:00
|
|
|
BuildJobsForAction(C,
|
|
|
|
*BAA->begin(),
|
|
|
|
Host->getToolChain(C.getArgs(), ArchName),
|
|
|
|
CanAcceptPipe,
|
|
|
|
AtTopLevel,
|
|
|
|
LinkingOutput,
|
|
|
|
Result);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
const JobAction *JA = cast<JobAction>(A);
|
|
|
|
const Tool &T = 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).
|
|
|
|
bool UseIntegratedCPP = false;
|
|
|
|
const ActionList *Inputs = &A->getInputs();
|
|
|
|
if (Inputs->size() == 1 && isa<PreprocessJobAction>(*Inputs->begin())) {
|
|
|
|
if (!C.getArgs().hasArg(options::OPT_no_integrated_cpp) &&
|
|
|
|
!C.getArgs().hasArg(options::OPT_traditional_cpp) &&
|
|
|
|
!C.getArgs().hasArg(options::OPT_save_temps) &&
|
|
|
|
T.hasIntegratedCPP()) {
|
|
|
|
UseIntegratedCPP = true;
|
|
|
|
Inputs = &(*Inputs)[0]->getInputs();
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
// Only use pipes when there is exactly one input.
|
|
|
|
bool TryToUsePipeInput = Inputs->size() == 1 && T.acceptsPipedInput();
|
2009-03-18 09:00:36 +03:00
|
|
|
InputInfoList InputInfos;
|
2009-03-16 09:56:51 +03:00
|
|
|
for (ActionList::const_iterator it = Inputs->begin(), ie = Inputs->end();
|
|
|
|
it != ie; ++it) {
|
|
|
|
InputInfo II;
|
|
|
|
BuildJobsForAction(C, *it, TC, TryToUsePipeInput,
|
|
|
|
/*AtTopLevel*/false,
|
|
|
|
LinkingOutput,
|
|
|
|
II);
|
|
|
|
InputInfos.push_back(II);
|
|
|
|
}
|
|
|
|
|
|
|
|
// Determine if we should output to a pipe.
|
|
|
|
bool OutputToPipe = false;
|
|
|
|
if (CanAcceptPipe && T.canPipeOutput()) {
|
|
|
|
// Some actions default to writing to a pipe if they are the top
|
|
|
|
// level phase and there was no user override.
|
|
|
|
//
|
|
|
|
// 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 02:18:19 +03:00
|
|
|
} else if (UsePipes)
|
2009-03-16 09:56:51 +03:00
|
|
|
OutputToPipe = true;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Figure out where to put the job (pipes).
|
|
|
|
Job *Dest = &C.getJobs();
|
|
|
|
if (InputInfos[0].isPipe()) {
|
2009-03-17 20:53:55 +03:00
|
|
|
assert(TryToUsePipeInput && "Unrequested pipe!");
|
2009-03-16 09:56:51 +03: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-17 20:53:55 +03:00
|
|
|
|
|
|
|
// Determine the place to write output to (nothing, pipe, or
|
|
|
|
// filename) and where to put the new job.
|
|
|
|
if (JA->getType() == types::TY_Nothing) {
|
2009-03-18 01:47:06 +03:00
|
|
|
Result = InputInfo(A->getType(), BaseInput);
|
2009-03-17 20:53:55 +03:00
|
|
|
} else if (OutputToPipe) {
|
|
|
|
// Append to current piped job or create a new one as appropriate.
|
2009-03-18 01:47:06 +03:00
|
|
|
PipedJob *PJ = dyn_cast<PipedJob>(Dest);
|
|
|
|
if (!PJ) {
|
|
|
|
PJ = new PipedJob();
|
2009-03-20 03:11:04 +03:00
|
|
|
// FIXME: Temporary hack so that -ccc-print-bindings work until
|
|
|
|
// we have pipe support. Please remove later.
|
|
|
|
if (!CCCPrintBindings)
|
|
|
|
cast<JobList>(Dest)->addJob(PJ);
|
2009-03-18 10:06:02 +03:00
|
|
|
Dest = PJ;
|
2009-03-17 20:53:55 +03:00
|
|
|
}
|
2009-03-18 01:47:06 +03:00
|
|
|
Result = InputInfo(PJ, A->getType(), BaseInput);
|
2009-03-17 20:53:55 +03:00
|
|
|
} else {
|
2009-03-18 01:47:06 +03:00
|
|
|
Result = InputInfo(GetNamedOutputPath(C, *JA, BaseInput, AtTopLevel),
|
|
|
|
A->getType(), BaseInput);
|
2009-03-17 20:53:55 +03:00
|
|
|
}
|
|
|
|
|
2009-03-18 01:47:06 +03:00
|
|
|
if (CCCPrintBindings) {
|
|
|
|
llvm::errs() << "bind - \"" << T.getName() << "\", inputs: [";
|
|
|
|
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-03-18 09:00:36 +03:00
|
|
|
const ArgList &TCArgs = C.getArgsForToolChain(TC);
|
2009-03-18 10:06:02 +03:00
|
|
|
T.ConstructJob(C, *JA, *Dest, Result, InputInfos, TCArgs, LinkingOutput);
|
2009-03-18 01:47:06 +03:00
|
|
|
}
|
2009-03-16 09:56:51 +03:00
|
|
|
}
|
|
|
|
|
2009-03-17 20:53:55 +03:00
|
|
|
const char *Driver::GetNamedOutputPath(Compilation &C,
|
|
|
|
const JobAction &JA,
|
|
|
|
const char *BaseInput,
|
|
|
|
bool AtTopLevel) const {
|
2009-03-18 04:38:48 +03:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Computing output path");
|
2009-03-17 20:53:55 +03:00
|
|
|
// Output to a user requested destination?
|
|
|
|
if (AtTopLevel) {
|
|
|
|
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-03-18 22:34:39 +03:00
|
|
|
std::string TmpName =
|
|
|
|
GetTemporaryPath(types::getTypeTempSuffix(JA.getType()));
|
|
|
|
return C.addTempFile(C.getArgs().MakeArgString(TmpName.c_str()));
|
2009-03-17 20:53:55 +03:00
|
|
|
}
|
|
|
|
|
|
|
|
llvm::sys::Path BasePath(BaseInput);
|
2009-03-18 05:00:31 +03:00
|
|
|
std::string BaseName(BasePath.getLast());
|
2009-03-17 20:53:55 +03: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());
|
|
|
|
}
|
|
|
|
|
|
|
|
// As an annoying special case, PCH generation doesn't strip the
|
|
|
|
// pathname.
|
|
|
|
if (JA.getType() == types::TY_PCH) {
|
|
|
|
BasePath.eraseComponent();
|
2009-03-18 12:58:30 +03:00
|
|
|
if (BasePath.isEmpty())
|
|
|
|
BasePath = NamedOutput;
|
|
|
|
else
|
|
|
|
BasePath.appendComponent(NamedOutput);
|
2009-03-17 20:53:55 +03:00
|
|
|
return C.addResultFile(C.getArgs().MakeArgString(BasePath.c_str()));
|
|
|
|
} else {
|
|
|
|
return C.addResultFile(NamedOutput);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-03-16 08:25:36 +03:00
|
|
|
llvm::sys::Path Driver::GetFilePath(const char *Name,
|
2009-03-18 05:55:38 +03:00
|
|
|
const ToolChain &TC) const {
|
2009-03-18 23:26:19 +03:00
|
|
|
const ToolChain::path_list &List = TC.getFilePaths();
|
|
|
|
for (ToolChain::path_list::const_iterator
|
|
|
|
it = List.begin(), ie = List.end(); it != ie; ++it) {
|
|
|
|
llvm::sys::Path P(*it);
|
|
|
|
P.appendComponent(Name);
|
|
|
|
if (P.exists())
|
|
|
|
return P;
|
|
|
|
}
|
|
|
|
|
2009-03-13 03:51:18 +03:00
|
|
|
return llvm::sys::Path(Name);
|
|
|
|
}
|
|
|
|
|
2009-03-16 08:25:36 +03:00
|
|
|
llvm::sys::Path Driver::GetProgramPath(const char *Name,
|
2009-03-18 05:55:38 +03:00
|
|
|
const ToolChain &TC) const {
|
2009-03-18 23:26:19 +03:00
|
|
|
const ToolChain::path_list &List = TC.getProgramPaths();
|
|
|
|
for (ToolChain::path_list::const_iterator
|
|
|
|
it = List.begin(), ie = List.end(); it != ie; ++it) {
|
|
|
|
llvm::sys::Path P(*it);
|
|
|
|
P.appendComponent(Name);
|
|
|
|
if (P.exists())
|
|
|
|
return P;
|
|
|
|
}
|
|
|
|
|
2009-03-23 19:15:50 +03:00
|
|
|
// If all else failed, search the path.
|
|
|
|
llvm::sys::Path P(llvm::sys::Program::FindProgramByName(Name));
|
2009-03-19 00:34:08 +03:00
|
|
|
if (!P.empty())
|
|
|
|
return P;
|
|
|
|
|
2009-03-13 03:51:18 +03:00
|
|
|
return llvm::sys::Path(Name);
|
|
|
|
}
|
|
|
|
|
2009-03-18 22:34:39 +03:00
|
|
|
std::string Driver::GetTemporaryPath(const char *Suffix) const {
|
|
|
|
// FIXME: This is lame; sys::Path should provide this function (in
|
|
|
|
// particular, it should know how to find the temporary files dir).
|
|
|
|
std::string Error;
|
|
|
|
llvm::sys::Path P("/tmp/cc");
|
|
|
|
if (P.makeUnique(false, &Error)) {
|
|
|
|
Diag(clang::diag::err_drv_unable_to_make_temp) << Error;
|
|
|
|
return "";
|
|
|
|
}
|
|
|
|
|
2009-03-19 02:08:52 +03:00
|
|
|
// FIXME: Grumble, makeUnique sometimes leaves the file around!?
|
|
|
|
// PR3837.
|
|
|
|
P.eraseFromDisk(false, 0);
|
|
|
|
|
2009-03-18 22:34:39 +03:00
|
|
|
P.appendSuffix(Suffix);
|
|
|
|
return P.toString();
|
|
|
|
}
|
|
|
|
|
2009-03-17 23:45:45 +03:00
|
|
|
const HostInfo *Driver::GetHostInfo(const char *Triple) const {
|
2009-03-18 04:38:48 +03:00
|
|
|
llvm::PrettyStackTraceString CrashInfo("Constructing host");
|
2009-03-11 02:41:59 +03:00
|
|
|
// Dice into arch, platform, and OS. This matches
|
|
|
|
// arch,platform,os = '(.*?)-(.*?)-(.*?)'
|
|
|
|
// and missing fields are left empty.
|
|
|
|
std::string Arch, Platform, OS;
|
|
|
|
|
|
|
|
if (const char *ArchEnd = strchr(Triple, '-')) {
|
|
|
|
Arch = std::string(Triple, ArchEnd);
|
|
|
|
|
|
|
|
if (const char *PlatformEnd = strchr(ArchEnd+1, '-')) {
|
|
|
|
Platform = std::string(ArchEnd+1, PlatformEnd);
|
|
|
|
OS = PlatformEnd+1;
|
|
|
|
} else
|
|
|
|
Platform = ArchEnd+1;
|
|
|
|
} else
|
|
|
|
Arch = Triple;
|
|
|
|
|
2009-03-17 22:00:50 +03:00
|
|
|
// Normalize Arch a bit.
|
|
|
|
//
|
|
|
|
// FIXME: This is very incomplete.
|
|
|
|
if (Arch == "i686")
|
|
|
|
Arch = "i386";
|
|
|
|
else if (Arch == "amd64")
|
|
|
|
Arch = "x86_64";
|
2009-03-18 07:41:46 +03:00
|
|
|
else if (Arch == "powerpc" || Arch == "Power Macintosh")
|
|
|
|
Arch = "ppc";
|
2009-03-17 22:00:50 +03:00
|
|
|
|
2009-03-13 15:23:29 +03:00
|
|
|
if (memcmp(&OS[0], "darwin", 6) == 0)
|
2009-03-17 23:45:45 +03:00
|
|
|
return createDarwinHostInfo(*this, Arch.c_str(), Platform.c_str(),
|
|
|
|
OS.c_str());
|
2009-03-11 02:41:59 +03:00
|
|
|
|
2009-03-17 23:45:45 +03:00
|
|
|
return createUnknownHostInfo(*this, Arch.c_str(), Platform.c_str(),
|
|
|
|
OS.c_str());
|
2009-03-11 02:41:59 +03:00
|
|
|
}
|