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-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-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-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-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,
|
|
|
|
Diagnostic &_Diags)
|
|
|
|
: Opts(new OptTable()), Diags(_Diags),
|
2009-03-11 02:41:59 +03:00
|
|
|
Name(_Name), Dir(_Dir), DefaultHostTriple(_DefaultHostTriple),
|
|
|
|
Host(0),
|
2009-03-10 23:52:46 +03:00
|
|
|
CCCIsCXX(false), CCCEcho(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-02 22:59:07 +03:00
|
|
|
}
|
|
|
|
|
2009-03-05 09:38:47 +03:00
|
|
|
ArgList *Driver::ParseArgStrings(const char **ArgBegin, const char **ArgEnd) {
|
|
|
|
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;
|
|
|
|
Arg *A = getOpts().ParseOneArg(*Args, Index, End);
|
2009-03-12 10:58:46 +03:00
|
|
|
if (A) {
|
|
|
|
if (A->getOption().isUnsupported()) {
|
2009-03-12 12:13:48 +03:00
|
|
|
Diag(clang::diag::err_drv_unsupported_opt) << A->getOption().getName();
|
2009-03-12 10:58:46 +03:00
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
2009-03-05 09:38:47 +03:00
|
|
|
Args->append(A);
|
2009-03-12 10:58:46 +03:00
|
|
|
}
|
2009-03-05 09:38:47 +03:00
|
|
|
|
|
|
|
assert(Index > Prev && "Parser failed to consume argument.");
|
|
|
|
}
|
|
|
|
|
|
|
|
return Args;
|
|
|
|
}
|
|
|
|
|
2009-03-02 22:59:07 +03:00
|
|
|
Compilation *Driver::BuildCompilation(int argc, const char **argv) {
|
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-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-13 03:51:18 +03:00
|
|
|
Host = Driver::GetHostInfo(HostTriple);
|
|
|
|
DefaultToolChain = Host->getToolChain(*Args);
|
|
|
|
|
2009-03-10 23:52:46 +03:00
|
|
|
// FIXME: This behavior shouldn't be here.
|
|
|
|
if (CCCPrintOptions) {
|
2009-03-12 10:58:46 +03:00
|
|
|
PrintOptions(*Args);
|
2009-03-13 20:24:34 +03:00
|
|
|
return 0;
|
2009-03-10 23:52:46 +03:00
|
|
|
}
|
2009-03-12 10:58:46 +03:00
|
|
|
|
2009-03-13 03:51:18 +03:00
|
|
|
if (!HandleImmediateArgs(*Args))
|
|
|
|
return 0;
|
|
|
|
|
2009-03-12 10:58:46 +03:00
|
|
|
// Construct the list of abstract actions to perform for this
|
|
|
|
// compilation.
|
2009-03-12 21:24:49 +03:00
|
|
|
ActionList Actions;
|
2009-03-12 10:58:46 +03:00
|
|
|
if (Host->useDriverDriver())
|
|
|
|
BuildUniversalActions(*Args, Actions);
|
|
|
|
else
|
|
|
|
BuildActions(*Args, Actions);
|
|
|
|
|
|
|
|
if (CCCPrintActions) {
|
2009-03-13 15:19:02 +03:00
|
|
|
PrintActions(*Args, Actions);
|
2009-03-13 20:24:34 +03:00
|
|
|
return 0;
|
2009-03-12 10:58:46 +03:00
|
|
|
}
|
2009-03-13 20:24:34 +03:00
|
|
|
|
2009-03-14 01:12:33 +03:00
|
|
|
return BuildJobs(*Args, Actions);
|
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 {
|
|
|
|
// FIXME: Get a reasonable version number.
|
|
|
|
|
|
|
|
// FIXME: The following handlers should use a callback mechanism, we
|
|
|
|
// don't know what the client would like to do.
|
|
|
|
llvm::outs() << "ccc version 1.0" << "\n";
|
|
|
|
}
|
|
|
|
|
|
|
|
bool Driver::HandleImmediateArgs(const ArgList &Args) {
|
|
|
|
// 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.
|
|
|
|
if (Args.hasArg(options::OPT_v) ||
|
|
|
|
Args.hasArg(options::OPT__HASH_HASH_HASH)) {
|
|
|
|
PrintVersion();
|
|
|
|
SuppressMissingInputWarning = true;
|
|
|
|
}
|
|
|
|
|
|
|
|
// FIXME: The following handlers should use a callback mechanism, we
|
|
|
|
// don't know what the client would like to do.
|
|
|
|
if (Arg *A = Args.getLastArg(options::OPT_print_file_name_EQ)) {
|
|
|
|
llvm::outs() << GetFilePath(A->getValue(Args)).toString() << "\n";
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (Arg *A = Args.getLastArg(options::OPT_print_prog_name_EQ)) {
|
|
|
|
llvm::outs() << GetProgramPath(A->getValue(Args)).toString() << "\n";
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
2009-03-13 04:01:44 +03:00
|
|
|
if (Args.hasArg(options::OPT_print_libgcc_file_name)) {
|
2009-03-13 03:51:18 +03:00
|
|
|
llvm::outs() << GetProgramPath("libgcc.a").toString() << "\n";
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
2009-03-13 15:19:02 +03:00
|
|
|
static unsigned PrintActions1(const ArgList &Args,
|
|
|
|
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-13 20:46:02 +03:00
|
|
|
os << "\"" << IA->getInputArg().getValue(Args) << "\"";
|
2009-03-13 15:19:02 +03:00
|
|
|
} else if (BindArchAction *BIA = dyn_cast<BindArchAction>(A)) {
|
|
|
|
os << "\"" << BIA->getArchName() << "\", "
|
|
|
|
<< "{" << PrintActions1(Args, *BIA->begin(), Ids) << "}";
|
|
|
|
} else {
|
|
|
|
os << "{";
|
|
|
|
for (Action::iterator it = A->begin(), ie = A->end(); it != ie;) {
|
|
|
|
os << PrintActions1(Args, *it, Ids);
|
|
|
|
++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;
|
|
|
|
}
|
|
|
|
|
|
|
|
void Driver::PrintActions(const ArgList &Args,
|
|
|
|
const ActionList &Actions) const {
|
|
|
|
std::map<Action*, unsigned> Ids;
|
|
|
|
for (ActionList::const_iterator it = Actions.begin(), ie = Actions.end();
|
2009-03-13 20:20:20 +03:00
|
|
|
it != ie; ++it)
|
2009-03-13 15:19:02 +03:00
|
|
|
PrintActions1(Args, *it, Ids);
|
2009-03-12 10:58:46 +03:00
|
|
|
}
|
|
|
|
|
2009-03-14 01:12:33 +03:00
|
|
|
void Driver::BuildUniversalActions(ArgList &Args, ActionList &Actions) const {
|
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-13 23:33:35 +03:00
|
|
|
if (ArchNames.insert(Name))
|
|
|
|
Archs.push_back(Name);
|
2009-03-12 21:40:18 +03:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
// When there is no explicit arch for this platform, get one from
|
|
|
|
// the host so that -Xarch_ is handled correctly.
|
|
|
|
if (!Archs.size()) {
|
|
|
|
const char *Arch = Host->getArchName().c_str();
|
2009-03-13 23:33:35 +03:00
|
|
|
Archs.push_back(Arch);
|
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)
|
|
|
|
<< A->getOption().getName();
|
|
|
|
if (const Arg *A = Args.getLastArg(options::OPT_save_temps))
|
|
|
|
Diag(clang::diag::err_drv_invalid_opt_with_multiple_archs)
|
|
|
|
<< A->getOption().getName();
|
|
|
|
}
|
|
|
|
|
|
|
|
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-13 23:33:35 +03:00
|
|
|
for (unsigned i = 0, e = Archs.size(); i != e; ++i )
|
|
|
|
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-14 01:12:33 +03:00
|
|
|
void Driver::BuildActions(ArgList &Args, ActionList &Actions) const {
|
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
|
|
|
|
// if not found.
|
|
|
|
if (const char *Ext = strrchr(Value, '.'))
|
|
|
|
Ty = types::lookupTypeForExtension(Ext + 1);
|
|
|
|
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))
|
|
|
|
Diag(clang::diag::err_drv_use_of_Z_option) << A->getValue(Args);
|
|
|
|
|
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) {
|
|
|
|
Diag(clang::diag::warn_drv_input_file_unused)
|
|
|
|
<< InputArg->getValue(Args)
|
|
|
|
<< 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 {
|
|
|
|
// 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-14 01:12:33 +03:00
|
|
|
Compilation *Driver::BuildJobs(const ArgList &Args,
|
|
|
|
const ActionList &Actions) const {
|
|
|
|
assert(0 && "FIXME: Implement");
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2009-03-13 03:51:18 +03:00
|
|
|
llvm::sys::Path Driver::GetFilePath(const char *Name) const {
|
|
|
|
// FIXME: Implement.
|
|
|
|
return llvm::sys::Path(Name);
|
|
|
|
}
|
|
|
|
|
|
|
|
llvm::sys::Path Driver::GetProgramPath(const char *Name) const {
|
|
|
|
// FIXME: Implement.
|
|
|
|
return llvm::sys::Path(Name);
|
|
|
|
}
|
|
|
|
|
2009-03-11 02:41:59 +03:00
|
|
|
HostInfo *Driver::GetHostInfo(const char *Triple) {
|
|
|
|
// 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-13 15:23:29 +03:00
|
|
|
if (memcmp(&OS[0], "darwin", 6) == 0)
|
2009-03-11 02:41:59 +03:00
|
|
|
return new DarwinHostInfo(Arch.c_str(), Platform.c_str(), OS.c_str());
|
|
|
|
|
|
|
|
return new UnknownHostInfo(Arch.c_str(), Platform.c_str(), OS.c_str());
|
|
|
|
}
|