lib/Driver/Driver.cpp

   1 //===--- Driver.cpp - Clang GCC Compatible Driver -------------------------===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file is distributed under the University of Illinois Open Source
   6 // License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9
  10 #ifdef HAVE_CLANG_CONFIG_H
  11 # include "clang/Config/config.h"
  12 #endif
  13
  14 #include "clang/Driver/Driver.h"
  15
  16 #include "clang/Driver/Action.h"
  17 #include "clang/Driver/Arg.h"
  18 #include "clang/Driver/ArgList.h"
  19 #include "clang/Driver/Compilation.h"
  20 #include "clang/Driver/DriverDiagnostic.h"
  21 #include "clang/Driver/HostInfo.h"
  22 #include "clang/Driver/Job.h"
  23 #include "clang/Driver/OptTable.h"
  24 #include "clang/Driver/Option.h"
  25 #include "clang/Driver/Options.h"
  26 #include "clang/Driver/Tool.h"
  27 #include "clang/Driver/ToolChain.h"
  28 #include "clang/Driver/Types.h"
  29
  30 #include "clang/Basic/Version.h"
  31
  32 #include "llvm/Config/config.h"
  33 #include "llvm/ADT/ArrayRef.h"
  34 #include "llvm/ADT/StringSet.h"
  35 #include "llvm/ADT/OwningPtr.h"
  36 #include "llvm/Support/PrettyStackTrace.h"
  37 #include "llvm/Support/raw_ostream.h"
  38 #include "llvm/Support/FileSystem.h"
  39 #include "llvm/Support/Path.h"
  40 #include "llvm/Support/Program.h"
  41
  42 #include "InputInfo.h"
  43
  44 #include <map>
  45
  46 using namespace clang::driver;
  47 using namespace clang;
  48
  49 Driver::Driver(llvm::StringRef _ClangExecutable,
  50                llvm::StringRef _DefaultHostTriple,
  51                llvm::StringRef _DefaultImageName,
  52                bool IsProduction, bool CXXIsProduction,
  53                Diagnostic &_Diags)
  54   : Opts(createDriverOptTable()), Diags(_Diags),
  55     ClangExecutable(_ClangExecutable), UseStdLib(true),
  56     DefaultHostTriple(_DefaultHostTriple), DefaultImageName(_DefaultImageName),
  57     DriverTitle("clang \"gcc-compatible\" driver"),
  58     Host(0),
  59     CCPrintOptionsFilename(0), CCPrintHeadersFilename(0),
  60     CCLogDiagnosticsFilename(0), CCCIsCXX(false),
  61     CCCIsCPP(false),CCCEcho(false), CCCPrintBindings(false),
  62     CCPrintOptions(false), CCPrintHeaders(false), CCLogDiagnostics(false),
  63     CCCGenericGCCName(""), CheckInputsExist(true), CCCUseClang(true),
  64     CCCUseClangCXX(true), CCCUseClangCPP(true), CCCUsePCH(true),
  65     SuppressMissingInputWarning(false) {
  66   if (IsProduction) {
  67     // In a "production" build, only use clang on architectures we expect to
  68     // work, and don't use clang C++.
  69     //
  70     // During development its more convenient to always have the driver use
  71     // clang, but we don't want users to be confused when things don't work, or
  72     // to file bugs for things we don't support.
  73     CCCClangArchs.insert(llvm::Triple::x86);
  74     CCCClangArchs.insert(llvm::Triple::x86_64);
  75     CCCClangArchs.insert(llvm::Triple::arm);
  76
  77     if (!CXXIsProduction)
  78       CCCUseClangCXX = false;
  79   }
  80
  81   Name = llvm::sys::path::stem(ClangExecutable);
  82   Dir  = llvm::sys::path::parent_path(ClangExecutable);
  83
  84   // Compute the path to the resource directory.
  85   llvm::StringRef ClangResourceDir(CLANG_RESOURCE_DIR);
  86   llvm::SmallString<128> P(Dir);
  87   if (ClangResourceDir != "")
  88     llvm::sys::path::append(P, ClangResourceDir);
  89   else
  90     llvm::sys::path::append(P, "..", "lib", "clang", CLANG_VERSION_STRING);
  91   ResourceDir = P.str();
  92 }
  93
  94 Driver::~Driver() {
  95   delete Opts;
  96   delete Host;
  97 }
  98
  99 InputArgList *Driver::ParseArgStrings(llvm::ArrayRef<const char *> ArgList) {
 100   llvm::PrettyStackTraceString CrashInfo("Command line argument parsing");
 101   unsigned MissingArgIndex, MissingArgCount;
 102   InputArgList *Args = getOpts().ParseArgs(ArgList.begin(), ArgList.end(),
 103                                            MissingArgIndex, MissingArgCount);
 104
 105   // Check for missing argument error.
 106   if (MissingArgCount)
 107     Diag(clang::diag::err_drv_missing_argument)
 108       << Args->getArgString(MissingArgIndex) << MissingArgCount;
 109
 110   // Check for unsupported options.
 111   for (ArgList::const_iterator it = Args->begin(), ie = Args->end();
 112        it != ie; ++it) {
 113     Arg *A = *it;
 114     if (A->getOption().isUnsupported()) {
 115       Diag(clang::diag::err_drv_unsupported_opt) << A->getAsString(*Args);
 116       continue;
 117     }
 118   }
 119
 120   return Args;
 121 }
 122
 123 DerivedArgList *Driver::TranslateInputArgs(const InputArgList &Args) const {
 124   DerivedArgList *DAL = new DerivedArgList(Args);
 125
 126   bool HasNostdlib = Args.hasArg(options::OPT_nostdlib);
 127   for (ArgList::const_iterator it = Args.begin(),
 128          ie = Args.end(); it != ie; ++it) {
 129     const Arg *A = *it;
 130
 131     // Unfortunately, we have to parse some forwarding options (-Xassembler,
 132     // -Xlinker, -Xpreprocessor) because we either integrate their functionality
 133     // (assembler and preprocessor), or bypass a previous driver ('collect2').
 134
 135     // Rewrite linker options, to replace --no-demangle with a custom internal
 136     // option.
 137     if ((A->getOption().matches(options::OPT_Wl_COMMA) ||
 138          A->getOption().matches(options::OPT_Xlinker)) &&
 139         A->containsValue("--no-demangle")) {
 140       // Add the rewritten no-demangle argument.
 141       DAL->AddFlagArg(A, Opts->getOption(options::OPT_Z_Xlinker__no_demangle));
 142
 143       // Add the remaining values as Xlinker arguments.
 144       for (unsigned i = 0, e = A->getNumValues(); i != e; ++i)
 145         if (llvm::StringRef(A->getValue(Args, i)) != "--no-demangle")
 146           DAL->AddSeparateArg(A, Opts->getOption(options::OPT_Xlinker),
 147                               A->getValue(Args, i));
 148
 149       continue;
 150     }
 151
 152     // Rewrite preprocessor options, to replace -Wp,-MD,FOO which is used by
 153     // some build systems. We don't try to be complete here because we don't
 154     // care to encourage this usage model.
 155     if (A->getOption().matches(options::OPT_Wp_COMMA) &&
 156         A->getNumValues() == 2 &&
 157         (A->getValue(Args, 0) == llvm::StringRef("-MD") ||
 158          A->getValue(Args, 0) == llvm::StringRef("-MMD"))) {
 159       // Rewrite to -MD/-MMD along with -MF.
 160       if (A->getValue(Args, 0) == llvm::StringRef("-MD"))
 161         DAL->AddFlagArg(A, Opts->getOption(options::OPT_MD));
 162       else
 163         DAL->AddFlagArg(A, Opts->getOption(options::OPT_MMD));
 164       DAL->AddSeparateArg(A, Opts->getOption(options::OPT_MF),
 165                           A->getValue(Args, 1));
 166       continue;
 167     }
 168
 169     // Rewrite reserved library names.
 170     if (A->getOption().matches(options::OPT_l)) {
 171       llvm::StringRef Value = A->getValue(Args);
 172
 173       // Rewrite unless -nostdlib is present.
 174       if (!HasNostdlib && Value == "stdc++") {
 175         DAL->AddFlagArg(A, Opts->getOption(
 176                               options::OPT_Z_reserved_lib_stdcxx));
 177         continue;
 178       }
 179
 180       // Rewrite unconditionally.
 181       if (Value == "cc_kext") {
 182         DAL->AddFlagArg(A, Opts->getOption(
 183                               options::OPT_Z_reserved_lib_cckext));
 184         continue;
 185       }
 186     }
 187
 188     DAL->append(*it);
 189   }
 190
 191   // Add a default value of -mlinker-version=, if one was given and the user
 192   // didn't specify one.
 193 #if defined(HOST_LINK_VERSION)
 194   if (!Args.hasArg(options::OPT_mlinker_version_EQ)) {
 195     DAL->AddJoinedArg(0, Opts->getOption(options::OPT_mlinker_version_EQ),
 196                       HOST_LINK_VERSION);
 197     DAL->getLastArg(options::OPT_mlinker_version_EQ)->claim();
 198   }
 199 #endif
 200
 201   return DAL;
 202 }
 203
 204 Compilation *Driver::BuildCompilation(llvm::ArrayRef<const char *> ArgList) {
 205   llvm::PrettyStackTraceString CrashInfo("Compilation construction");
 206
 207   // FIXME: Handle environment options which effect driver behavior, somewhere
 208   // (client?). GCC_EXEC_PREFIX, COMPILER_PATH, LIBRARY_PATH, LPATH,
 209   // CC_PRINT_OPTIONS.
 210
 211   // FIXME: What are we going to do with -V and -b?
 212
 213   // FIXME: This stuff needs to go into the Compilation, not the driver.
 214   bool CCCPrintOptions = false, CCCPrintActions = false;
 215
 216   InputArgList *Args = ParseArgStrings(ArgList.slice(1));
 217
 218   // -no-canonical-prefixes is used very early in main.
 219   Args->ClaimAllArgs(options::OPT_no_canonical_prefixes);
 220
 221   // Ignore -pipe.
 222   Args->ClaimAllArgs(options::OPT_pipe);
 223
 224   // Extract -ccc args.
 225   //
 226   // FIXME: We need to figure out where this behavior should live. Most of it
 227   // should be outside in the client; the parts that aren't should have proper
 228   // options, either by introducing new ones or by overloading gcc ones like -V
 229   // or -b.
 230   CCCPrintOptions = Args->hasArg(options::OPT_ccc_print_options);
 231   CCCPrintActions = Args->hasArg(options::OPT_ccc_print_phases);
 232   CCCPrintBindings = Args->hasArg(options::OPT_ccc_print_bindings);
 233   CCCIsCXX = Args->hasArg(options::OPT_ccc_cxx) || CCCIsCXX;
 234   CCCEcho = Args->hasArg(options::OPT_ccc_echo);
 235   if (const Arg *A = Args->getLastArg(options::OPT_ccc_gcc_name))
 236     CCCGenericGCCName = A->getValue(*Args);
 237   CCCUseClangCXX = Args->hasFlag(options::OPT_ccc_clang_cxx,
 238                                  options::OPT_ccc_no_clang_cxx,
 239                                  CCCUseClangCXX);
 240   CCCUsePCH = Args->hasFlag(options::OPT_ccc_pch_is_pch,
 241                             options::OPT_ccc_pch_is_pth);
 242   CCCUseClang = !Args->hasArg(options::OPT_ccc_no_clang);
 243   CCCUseClangCPP = !Args->hasArg(options::OPT_ccc_no_clang_cpp);
 244   if (const Arg *A = Args->getLastArg(options::OPT_ccc_clang_archs)) {
 245     llvm::StringRef Cur = A->getValue(*Args);
 246
 247     CCCClangArchs.clear();
 248     while (!Cur.empty()) {
 249       std::pair<llvm::StringRef, llvm::StringRef> Split = Cur.split(',');
 250
 251       if (!Split.first.empty()) {
 252         llvm::Triple::ArchType Arch =
 253           llvm::Triple(Split.first, "", "").getArch();
 254
 255         if (Arch == llvm::Triple::UnknownArch)
 256           Diag(clang::diag::err_drv_invalid_arch_name) << Split.first;
 257
 258         CCCClangArchs.insert(Arch);
 259       }
 260
 261       Cur = Split.second;
 262     }
 263   }
 264   // FIXME: We shouldn't overwrite the default host triple here, but we have
 265   // nowhere else to put this currently.
 266   if (const Arg *A = Args->getLastArg(options::OPT_ccc_host_triple))
 267     DefaultHostTriple = A->getValue(*Args);
 268   if (const Arg *A = Args->getLastArg(options::OPT_ccc_install_dir))
 269     Dir = InstalledDir = A->getValue(*Args);
 270   for (arg_iterator it = Args->filtered_begin(options::OPT_B),
 271          ie = Args->filtered_end(); it != ie; ++it) {
 272     const Arg *A = *it;
 273     A->claim();
 274     PrefixDirs.push_back(A->getValue(*Args, 0));
 275   }
 276   if (const Arg *A = Args->getLastArg(options::OPT__sysroot_EQ))
 277     SysRoot = A->getValue(*Args);
 278   if (Args->hasArg(options::OPT_nostdlib))
 279     UseStdLib = false;
 280
 281   Host = GetHostInfo(DefaultHostTriple.c_str());
 282
 283   // Perform the default argument translations.
 284   DerivedArgList *TranslatedArgs = TranslateInputArgs(*Args);
 285
 286   // The compilation takes ownership of Args.
 287   Compilation *C = new Compilation(*this, *Host->CreateToolChain(*Args), Args,
 288                                    TranslatedArgs);
 289
 290   // FIXME: This behavior shouldn't be here.
 291   if (CCCPrintOptions) {
 292     PrintOptions(C->getInputArgs());
 293     return C;
 294   }
 295
 296   if (!HandleImmediateArgs(*C))
 297     return C;
 298
 299   // Construct the list of abstract actions to perform for this compilation.
 300   if (Host->useDriverDriver())
 301     BuildUniversalActions(C->getDefaultToolChain(), C->getArgs(),
 302                           C->getActions());
 303   else
 304     BuildActions(C->getDefaultToolChain(), C->getArgs(), C->getActions());
 305
 306   if (CCCPrintActions) {
 307     PrintActions(*C);
 308     return C;
 309   }
 310
 311   BuildJobs(*C);
 312
 313   return C;
 314 }
 315
 316 int Driver::ExecuteCompilation(const Compilation &C) const {
 317   // Just print if -### was present.
 318   if (C.getArgs().hasArg(options::OPT__HASH_HASH_HASH)) {
 319     C.PrintJob(llvm::errs(), C.getJobs(), "\n", true);
 320     return 0;
 321   }
 322
 323   // If there were errors building the compilation, quit now.
 324   if (getDiags().hasErrorOccurred())
 325     return 1;
 326
 327   const Command *FailingCommand = 0;
 328   int Res = C.ExecuteJob(C.getJobs(), FailingCommand);
 329
 330   // Remove temp files.
 331   C.CleanupFileList(C.getTempFiles());
 332
 333   // If the command succeeded, we are done.
 334   if (Res == 0)
 335     return Res;
 336
 337   // Otherwise, remove result files as well.
 338   if (!C.getArgs().hasArg(options::OPT_save_temps))
 339     C.CleanupFileList(C.getResultFiles(), true);
 340
 341   // Print extra information about abnormal failures, if possible.
 342   //
 343   // This is ad-hoc, but we don't want to be excessively noisy. If the result
 344   // status was 1, assume the command failed normally. In particular, if it was
 345   // the compiler then assume it gave a reasonable error code. Failures in other
 346   // tools are less common, and they generally have worse diagnostics, so always
 347   // print the diagnostic there.
 348   const Tool &FailingTool = FailingCommand->getCreator();
 349
 350   if (!FailingCommand->getCreator().hasGoodDiagnostics() || Res != 1) {
 351     // FIXME: See FIXME above regarding result code interpretation.
 352     if (Res < 0)
 353       Diag(clang::diag::err_drv_command_signalled)
 354         << FailingTool.getShortName() << -Res;
 355     else
 356       Diag(clang::diag::err_drv_command_failed)
 357         << FailingTool.getShortName() << Res;
 358   }
 359
 360   return Res;
 361 }
 362
 363 void Driver::PrintOptions(const ArgList &Args) const {
 364   unsigned i = 0;
 365   for (ArgList::const_iterator it = Args.begin(), ie = Args.end();
 366        it != ie; ++it, ++i) {
 367     Arg *A = *it;
 368     llvm::errs() << "Option " << i << " - "
 369                  << "Name: \"" << A->getOption().getName() << "\", "
 370                  << "Values: {";
 371     for (unsigned j = 0; j < A->getNumValues(); ++j) {
 372       if (j)
 373         llvm::errs() << ", ";
 374       llvm::errs() << '"' << A->getValue(Args, j) << '"';
 375     }
 376     llvm::errs() << "}\n";
 377   }
 378 }
 379
 380 void Driver::PrintHelp(bool ShowHidden) const {
 381   getOpts().PrintHelp(llvm::outs(), Name.c_str(), DriverTitle.c_str(),
 382                       ShowHidden);
 383 }
 384
 385 void Driver::PrintVersion(const Compilation &C, llvm::raw_ostream &OS) const {
 386   // FIXME: The following handlers should use a callback mechanism, we don't
 387   // know what the client would like to do.
 388   OS << getClangFullVersion() << '\n';
 389   const ToolChain &TC = C.getDefaultToolChain();
 390   OS << "Target: " << TC.getTripleString() << '\n';
 391
 392   // Print the threading model.
 393   //
 394   // FIXME: Implement correctly.
 395   OS << "Thread model: " << "posix" << '\n';
 396 }
 397
 398 /// PrintDiagnosticCategories - Implement the --print-diagnostic-categories
 399 /// option.
 400 static void PrintDiagnosticCategories(llvm::raw_ostream &OS) {
 401   for (unsigned i = 1; // Skip the empty category.
 402        const char *CategoryName = DiagnosticIDs::getCategoryNameFromID(i); ++i)
 403     OS << i << ',' << CategoryName << '\n';
 404 }
 405
 406 bool Driver::HandleImmediateArgs(const Compilation &C) {
 407   // The order these options are handled in gcc is all over the place, but we
 408   // don't expect inconsistencies w.r.t. that to matter in practice.
 409
 410   if (C.getArgs().hasArg(options::OPT_dumpmachine)) {
 411     llvm::outs() << C.getDefaultToolChain().getTripleString() << '\n';
 412     return false;
 413   }
 414
 415   if (C.getArgs().hasArg(options::OPT_dumpversion)) {
 416     // Since -dumpversion is only implemented for pedantic GCC compatibility, we
 417     // return an answer which matches our definition of __VERSION__.
 418     //
 419     // If we want to return a more correct answer some day, then we should
 420     // introduce a non-pedantically GCC compatible mode to Clang in which we
 421     // provide sensible definitions for -dumpversion, __VERSION__, etc.
 422     llvm::outs() << "4.2.1\n";
 423     return false;
 424   }
 425
 426   if (C.getArgs().hasArg(options::OPT__print_diagnostic_categories)) {
 427     PrintDiagnosticCategories(llvm::outs());
 428     return false;
 429   }
 430
 431   if (C.getArgs().hasArg(options::OPT__help) ||
 432       C.getArgs().hasArg(options::OPT__help_hidden)) {
 433     PrintHelp(C.getArgs().hasArg(options::OPT__help_hidden));
 434     return false;
 435   }
 436
 437   if (C.getArgs().hasArg(options::OPT__version)) {
 438     // Follow gcc behavior and use stdout for --version and stderr for -v.
 439     PrintVersion(C, llvm::outs());
 440     return false;
 441   }
 442
 443   if (C.getArgs().hasArg(options::OPT_v) ||
 444       C.getArgs().hasArg(options::OPT__HASH_HASH_HASH)) {
 445     PrintVersion(C, llvm::errs());
 446     SuppressMissingInputWarning = true;
 447   }
 448
 449   const ToolChain &TC = C.getDefaultToolChain();
 450   if (C.getArgs().hasArg(options::OPT_print_search_dirs)) {
 451     llvm::outs() << "programs: =";
 452     for (ToolChain::path_list::const_iterator it = TC.getProgramPaths().begin(),
 453            ie = TC.getProgramPaths().end(); it != ie; ++it) {
 454       if (it != TC.getProgramPaths().begin())
 455         llvm::outs() << ':';
 456       llvm::outs() << *it;
 457     }
 458     llvm::outs() << "\n";
 459     llvm::outs() << "libraries: =";
 460     for (ToolChain::path_list::const_iterator it = TC.getFilePaths().begin(),
 461            ie = TC.getFilePaths().end(); it != ie; ++it) {
 462       if (it != TC.getFilePaths().begin())
 463         llvm::outs() << ':';
 464       llvm::outs() << *it;
 465     }
 466     llvm::outs() << "\n";
 467     return false;
 468   }
 469
 470   // FIXME: The following handlers should use a callback mechanism, we don't
 471   // know what the client would like to do.
 472   if (Arg *A = C.getArgs().getLastArg(options::OPT_print_file_name_EQ)) {
 473     llvm::outs() << GetFilePath(A->getValue(C.getArgs()), TC) << "\n";
 474     return false;
 475   }
 476
 477   if (Arg *A = C.getArgs().getLastArg(options::OPT_print_prog_name_EQ)) {
 478     llvm::outs() << GetProgramPath(A->getValue(C.getArgs()), TC) << "\n";
 479     return false;
 480   }
 481
 482   if (C.getArgs().hasArg(options::OPT_print_libgcc_file_name)) {
 483     llvm::outs() << GetFilePath("libgcc.a", TC) << "\n";
 484     return false;
 485   }
 486
 487   if (C.getArgs().hasArg(options::OPT_print_multi_lib)) {
 488     // FIXME: We need tool chain support for this.
 489     llvm::outs() << ".;\n";
 490
 491     switch (C.getDefaultToolChain().getTriple().getArch()) {
 492     default:
 493       break;
 494
 495     case llvm::Triple::x86_64:
 496       llvm::outs() << "x86_64;@m64" << "\n";
 497       break;
 498
 499     case llvm::Triple::ppc64:
 500       llvm::outs() << "ppc64;@m64" << "\n";
 501       break;
 502     }
 503     return false;
 504   }
 505
 506   // FIXME: What is the difference between print-multi-directory and
 507   // print-multi-os-directory?
 508   if (C.getArgs().hasArg(options::OPT_print_multi_directory) ||
 509       C.getArgs().hasArg(options::OPT_print_multi_os_directory)) {
 510     switch (C.getDefaultToolChain().getTriple().getArch()) {
 511     default:
 512     case llvm::Triple::x86:
 513     case llvm::Triple::ppc:
 514       llvm::outs() << "." << "\n";
 515       break;
 516
 517     case llvm::Triple::x86_64:
 518       llvm::outs() << "x86_64" << "\n";
 519       break;
 520
 521     case llvm::Triple::ppc64:
 522       llvm::outs() << "ppc64" << "\n";
 523       break;
 524     }
 525     return false;
 526   }
 527
 528   return true;
 529 }
 530
 531 static unsigned PrintActions1(const Compilation &C, Action *A,
 532                               std::map<Action*, unsigned> &Ids) {
 533   if (Ids.count(A))
 534     return Ids[A];
 535
 536   std::string str;
 537   llvm::raw_string_ostream os(str);
 538
 539   os << Action::getClassName(A->getKind()) << ", ";
 540   if (InputAction *IA = dyn_cast<InputAction>(A)) {
 541     os << "\"" << IA->getInputArg().getValue(C.getArgs()) << "\"";
 542   } else if (BindArchAction *BIA = dyn_cast<BindArchAction>(A)) {
 543     os << '"' << (BIA->getArchName() ? BIA->getArchName() :
 544                   C.getDefaultToolChain().getArchName()) << '"'
 545        << ", {" << PrintActions1(C, *BIA->begin(), Ids) << "}";
 546   } else {
 547     os << "{";
 548     for (Action::iterator it = A->begin(), ie = A->end(); it != ie;) {
 549       os << PrintActions1(C, *it, Ids);
 550       ++it;
 551       if (it != ie)
 552         os << ", ";
 553     }
 554     os << "}";
 555   }
 556
 557   unsigned Id = Ids.size();
 558   Ids[A] = Id;
 559   llvm::errs() << Id << ": " << os.str() << ", "
 560                << types::getTypeName(A->getType()) << "\n";
 561
 562   return Id;
 563 }
 564
 565 void Driver::PrintActions(const Compilation &C) const {
 566   std::map<Action*, unsigned> Ids;
 567   for (ActionList::const_iterator it = C.getActions().begin(),
 568          ie = C.getActions().end(); it != ie; ++it)
 569     PrintActions1(C, *it, Ids);
 570 }
 571
 572 /// \brief Check whether the given input tree contains any compilation (or
 573 /// assembly) actions.
 574 static bool ContainsCompileAction(const Action *A) {
 575   if (isa<CompileJobAction>(A) || isa<AssembleJobAction>(A))
 576     return true;
 577
 578   for (Action::const_iterator it = A->begin(), ie = A->end(); it != ie; ++it)
 579     if (ContainsCompileAction(*it))
 580       return true;
 581
 582   return false;
 583 }
 584
 585 void Driver::BuildUniversalActions(const ToolChain &TC,
 586                                    const DerivedArgList &Args,
 587                                    ActionList &Actions) const {
 588   llvm::PrettyStackTraceString CrashInfo("Building universal build actions");
 589   // Collect the list of architectures. Duplicates are allowed, but should only
 590   // be handled once (in the order seen).
 591   llvm::StringSet<> ArchNames;
 592   llvm::SmallVector<const char *, 4> Archs;
 593   for (ArgList::const_iterator it = Args.begin(), ie = Args.end();
 594        it != ie; ++it) {
 595     Arg *A = *it;
 596
 597     if (A->getOption().matches(options::OPT_arch)) {
 598       // Validate the option here; we don't save the type here because its
 599       // particular spelling may participate in other driver choices.
 600       llvm::Triple::ArchType Arch =
 601         llvm::Triple::getArchTypeForDarwinArchName(A->getValue(Args));
 602       if (Arch == llvm::Triple::UnknownArch) {
 603         Diag(clang::diag::err_drv_invalid_arch_name)
 604           << A->getAsString(Args);
 605         continue;
 606       }
 607
 608       A->claim();
 609       if (ArchNames.insert(A->getValue(Args)))
 610         Archs.push_back(A->getValue(Args));
 611     }
 612   }
 613
 614   // When there is no explicit arch for this platform, make sure we still bind
 615   // the architecture (to the default) so that -Xarch_ is handled correctly.
 616   if (!Archs.size())
 617     Archs.push_back(0);
 618
 619   // FIXME: We killed off some others but these aren't yet detected in a
 620   // functional manner. If we added information to jobs about which "auxiliary"
 621   // files they wrote then we could detect the conflict these cause downstream.
 622   if (Archs.size() > 1) {
 623     // No recovery needed, the point of this is just to prevent
 624     // overwriting the same files.
 625     if (const Arg *A = Args.getLastArg(options::OPT_save_temps))
 626       Diag(clang::diag::err_drv_invalid_opt_with_multiple_archs)
 627         << A->getAsString(Args);
 628   }
 629
 630   ActionList SingleActions;
 631   BuildActions(TC, Args, SingleActions);
 632
 633   // Add in arch bindings for every top level action, as well as lipo and
 634   // dsymutil steps if needed.
 635   for (unsigned i = 0, e = SingleActions.size(); i != e; ++i) {
 636     Action *Act = SingleActions[i];
 637
 638     // Make sure we can lipo this kind of output. If not (and it is an actual
 639     // output) then we disallow, since we can't create an output file with the
 640     // right name without overwriting it. We could remove this oddity by just
 641     // changing the output names to include the arch, which would also fix
 642     // -save-temps. Compatibility wins for now.
 643
 644     if (Archs.size() > 1 && !types::canLipoType(Act->getType()))
 645       Diag(clang::diag::err_drv_invalid_output_with_multiple_archs)
 646         << types::getTypeName(Act->getType());
 647
 648     ActionList Inputs;
 649     for (unsigned i = 0, e = Archs.size(); i != e; ++i) {
 650       Inputs.push_back(new BindArchAction(Act, Archs[i]));
 651       if (i != 0)
 652         Inputs.back()->setOwnsInputs(false);
 653     }
 654
 655     // Lipo if necessary, we do it this way because we need to set the arch flag
 656     // so that -Xarch_ gets overwritten.
 657     if (Inputs.size() == 1 || Act->getType() == types::TY_Nothing)
 658       Actions.append(Inputs.begin(), Inputs.end());
 659     else
 660       Actions.push_back(new LipoJobAction(Inputs, Act->getType()));
 661
 662     // Add a 'dsymutil' step if necessary, when debug info is enabled and we
 663     // have a compile input. We need to run 'dsymutil' ourselves in such cases
 664     // because the debug info will refer to a temporary object file which is
 665     // will be removed at the end of the compilation process.
 666     if (Act->getType() == types::TY_Image) {
 667       Arg *A = Args.getLastArg(options::OPT_g_Group);
 668       if (A && !A->getOption().matches(options::OPT_g0) &&
 669           !A->getOption().matches(options::OPT_gstabs) &&
 670           ContainsCompileAction(Actions.back())) {
 671         ActionList Inputs;
 672         Inputs.push_back(Actions.back());
 673         Actions.pop_back();
 674
 675         Actions.push_back(new DsymutilJobAction(Inputs, types::TY_dSYM));
 676       }
 677     }
 678   }
 679 }
 680
 681 void Driver::BuildActions(const ToolChain &TC, const DerivedArgList &Args,
 682                           ActionList &Actions) const {
 683   llvm::PrettyStackTraceString CrashInfo("Building compilation actions");
 684   // Start by constructing the list of inputs and their types.
 685
 686   // Track the current user specified (-x) input. We also explicitly track the
 687   // argument used to set the type; we only want to claim the type when we
 688   // actually use it, so we warn about unused -x arguments.
 689   types::ID InputType = types::TY_Nothing;
 690   Arg *InputTypeArg = 0;
 691
 692   llvm::SmallVector<std::pair<types::ID, const Arg*>, 16> Inputs;
 693   for (ArgList::const_iterator it = Args.begin(), ie = Args.end();
 694        it != ie; ++it) {
 695     Arg *A = *it;
 696
 697     if (isa<InputOption>(A->getOption())) {
 698       const char *Value = A->getValue(Args);
 699       types::ID Ty = types::TY_INVALID;
 700
 701       // Infer the input type if necessary.
 702       if (InputType == types::TY_Nothing) {
 703         // If there was an explicit arg for this, claim it.
 704         if (InputTypeArg)
 705           InputTypeArg->claim();
 706
 707         // stdin must be handled specially.
 708         if (memcmp(Value, "-", 2) == 0) {
 709           // If running with -E, treat as a C input (this changes the builtin
 710           // macros, for example). This may be overridden by -ObjC below.
 711           //
 712           // Otherwise emit an error but still use a valid type to avoid
 713           // spurious errors (e.g., no inputs).
 714           if (!Args.hasArgNoClaim(options::OPT_E) && !CCCIsCPP)
 715             Diag(clang::diag::err_drv_unknown_stdin_type);
 716           Ty = types::TY_C;
 717         } else {
 718           // Otherwise lookup by extension.
 719           // Fallback is C if invoked as C preprocessor or Object otherwise.
 720           // We use a host hook here because Darwin at least has its own
 721           // idea of what .s is.
 722           if (const char *Ext = strrchr(Value, '.'))
 723             Ty = TC.LookupTypeForExtension(Ext + 1);
 724
 725           if (Ty == types::TY_INVALID) {
 726             if (CCCIsCPP)
 727               Ty = types::TY_C;
 728             else
 729               Ty = types::TY_Object;
 730           }
 731
 732           // If the driver is invoked as C++ compiler (like clang++ or c++) it
 733           // should autodetect some input files as C++ for g++ compatibility.
 734           if (CCCIsCXX) {
 735             types::ID OldTy = Ty;
 736             Ty = types::lookupCXXTypeForCType(Ty);
 737
 738             if (Ty != OldTy)
 739               Diag(clang::diag::warn_drv_treating_input_as_cxx)
 740                 << getTypeName(OldTy) << getTypeName(Ty);
 741           }
 742         }
 743
 744         // -ObjC and -ObjC++ override the default language, but only for "source
 745         // files". We just treat everything that isn't a linker input as a
 746         // source file.
 747         //
 748         // FIXME: Clean this up if we move the phase sequence into the type.
 749         if (Ty != types::TY_Object) {
 750           if (Args.hasArg(options::OPT_ObjC))
 751             Ty = types::TY_ObjC;
 752           else if (Args.hasArg(options::OPT_ObjCXX))
 753             Ty = types::TY_ObjCXX;
 754         }
 755       } else {
 756         assert(InputTypeArg && "InputType set w/o InputTypeArg");
 757         InputTypeArg->claim();
 758         Ty = InputType;
 759       }
 760
 761       // Check that the file exists, if enabled.
 762       if (CheckInputsExist && memcmp(Value, "-", 2) != 0) {
 763         llvm::SmallString<64> Path(Value);
 764         if (Arg *WorkDir = Args.getLastArg(options::OPT_working_directory))
 765           if (llvm::sys::path::is_absolute(Path.str())) {
 766             Path = WorkDir->getValue(Args);
 767             llvm::sys::path::append(Path, Value);
 768           }
 769
 770         bool exists = false;
 771         if (/*error_code ec =*/llvm::sys::fs::exists(Value, exists) || !exists)
 772           Diag(clang::diag::err_drv_no_such_file) << Path.str();
 773         else
 774           Inputs.push_back(std::make_pair(Ty, A));
 775       } else
 776         Inputs.push_back(std::make_pair(Ty, A));
 777
 778     } else if (A->getOption().isLinkerInput()) {
 779       // Just treat as object type, we could make a special type for this if
 780       // necessary.
 781       Inputs.push_back(std::make_pair(types::TY_Object, A));
 782
 783     } else if (A->getOption().matches(options::OPT_x)) {
 784       InputTypeArg = A;
 785       InputType = types::lookupTypeForTypeSpecifier(A->getValue(Args));
 786
 787       // Follow gcc behavior and treat as linker input for invalid -x
 788       // options. Its not clear why we shouldn't just revert to unknown; but
 789       // this isn't very important, we might as well be bug compatible.
 790       if (!InputType) {
 791         Diag(clang::diag::err_drv_unknown_language) << A->getValue(Args);
 792         InputType = types::TY_Object;
 793       }
 794     }
 795   }
 796
 797   if (CCCIsCPP && Inputs.empty()) {
 798     // If called as standalone preprocessor, stdin is processed
 799     // if no other input is present.
 800     unsigned Index = Args.getBaseArgs().MakeIndex("-");
 801     Arg *A = Opts->ParseOneArg(Args, Index);
 802     A->claim();
 803     Inputs.push_back(std::make_pair(types::TY_C, A));
 804   }
 805
 806   if (!SuppressMissingInputWarning && Inputs.empty()) {
 807     Diag(clang::diag::err_drv_no_input_files);
 808     return;
 809   }
 810
 811   // Determine which compilation mode we are in. We look for options which
 812   // affect the phase, starting with the earliest phases, and record which
 813   // option we used to determine the final phase.
 814   Arg *FinalPhaseArg = 0;
 815   phases::ID FinalPhase;
 816
 817   // -{E,M,MM} only run the preprocessor.
 818   if (CCCIsCPP ||
 819       (FinalPhaseArg = Args.getLastArg(options::OPT_E)) ||
 820       (FinalPhaseArg = Args.getLastArg(options::OPT_M, options::OPT_MM))) {
 821     FinalPhase = phases::Preprocess;
 822
 823     // -{fsyntax-only,-analyze,emit-ast,S} only run up to the compiler.
 824   } else if ((FinalPhaseArg = Args.getLastArg(options::OPT_fsyntax_only)) ||
 825              (FinalPhaseArg = Args.getLastArg(options::OPT_rewrite_objc)) ||
 826              (FinalPhaseArg = Args.getLastArg(options::OPT__analyze,
 827                                               options::OPT__analyze_auto)) ||
 828              (FinalPhaseArg = Args.getLastArg(options::OPT_emit_ast)) ||
 829              (FinalPhaseArg = Args.getLastArg(options::OPT_S))) {
 830     FinalPhase = phases::Compile;
 831
 832     // -c only runs up to the assembler.
 833   } else if ((FinalPhaseArg = Args.getLastArg(options::OPT_c))) {
 834     FinalPhase = phases::Assemble;
 835
 836     // Otherwise do everything.
 837   } else
 838     FinalPhase = phases::Link;
 839
 840   // Reject -Z* at the top level, these options should never have been exposed
 841   // by gcc.
 842   if (Arg *A = Args.getLastArg(options::OPT_Z_Joined))
 843     Diag(clang::diag::err_drv_use_of_Z_option) << A->getAsString(Args);
 844
 845   // Construct the actions to perform.
 846   ActionList LinkerInputs;
 847   for (unsigned i = 0, e = Inputs.size(); i != e; ++i) {
 848     types::ID InputType = Inputs[i].first;
 849     const Arg *InputArg = Inputs[i].second;
 850
 851     unsigned NumSteps = types::getNumCompilationPhases(InputType);
 852     assert(NumSteps && "Invalid number of steps!");
 853
 854     // If the first step comes after the final phase we are doing as part of
 855     // this compilation, warn the user about it.
 856     phases::ID InitialPhase = types::getCompilationPhase(InputType, 0);
 857     if (InitialPhase > FinalPhase) {
 858       // Claim here to avoid the more general unused warning.
 859       InputArg->claim();
 860
 861       // Suppress all unused style warnings with -Qunused-arguments
 862       if (Args.hasArg(options::OPT_Qunused_arguments))
 863         continue;
 864
 865       // Special case '-E' warning on a previously preprocessed file to make
 866       // more sense.
 867       if (InitialPhase == phases::Compile && FinalPhase == phases::Preprocess &&
 868           getPreprocessedType(InputType) == types::TY_INVALID)
 869         Diag(clang::diag::warn_drv_preprocessed_input_file_unused)
 870           << InputArg->getAsString(Args)
 871           << FinalPhaseArg->getOption().getName();
 872       else
 873         Diag(clang::diag::warn_drv_input_file_unused)
 874           << InputArg->getAsString(Args)
 875           << getPhaseName(InitialPhase)
 876           << FinalPhaseArg->getOption().getName();
 877       continue;
 878     }
 879
 880     // Build the pipeline for this file.
 881     llvm::OwningPtr<Action> Current(new InputAction(*InputArg, InputType));
 882     for (unsigned i = 0; i != NumSteps; ++i) {
 883       phases::ID Phase = types::getCompilationPhase(InputType, i);
 884
 885       // We are done if this step is past what the user requested.
 886       if (Phase > FinalPhase)
 887         break;
 888
 889       // Queue linker inputs.
 890       if (Phase == phases::Link) {
 891         assert(i + 1 == NumSteps && "linking must be final compilation step.");
 892         LinkerInputs.push_back(Current.take());
 893         break;
 894       }
 895
 896       // Some types skip the assembler phase (e.g., llvm-bc), but we can't
 897       // encode this in the steps because the intermediate type depends on
 898       // arguments. Just special case here.
 899       if (Phase == phases::Assemble && Current->getType() != types::TY_PP_Asm)
 900         continue;
 901
 902       // Otherwise construct the appropriate action.
 903       Current.reset(ConstructPhaseAction(Args, Phase, Current.take()));
 904       if (Current->getType() == types::TY_Nothing)
 905         break;
 906     }
 907
 908     // If we ended with something, add to the output list.
 909     if (Current)
 910       Actions.push_back(Current.take());
 911   }
 912
 913   // Add a link action if necessary.
 914   if (!LinkerInputs.empty())
 915     Actions.push_back(new LinkJobAction(LinkerInputs, types::TY_Image));
 916
 917   // If we are linking, claim any options which are obviously only used for
 918   // compilation.
 919   if (FinalPhase == phases::Link)
 920     Args.ClaimAllArgs(options::OPT_CompileOnly_Group);
 921 }
 922
 923 Action *Driver::ConstructPhaseAction(const ArgList &Args, phases::ID Phase,
 924                                      Action *Input) const {
 925   llvm::PrettyStackTraceString CrashInfo("Constructing phase actions");
 926   // Build the appropriate action.
 927   switch (Phase) {
 928   case phases::Link: assert(0 && "link action invalid here.");
 929   case phases::Preprocess: {
 930     types::ID OutputTy;
 931     // -{M, MM} alter the output type.
 932     if (Args.hasArg(options::OPT_M, options::OPT_MM)) {
 933       OutputTy = types::TY_Dependencies;
 934     } else {
 935       OutputTy = types::getPreprocessedType(Input->getType());
 936       assert(OutputTy != types::TY_INVALID &&
 937              "Cannot preprocess this input type!");
 938     }
 939     return new PreprocessJobAction(Input, OutputTy);
 940   }
 941   case phases::Precompile:
 942     return new PrecompileJobAction(Input, types::TY_PCH);
 943   case phases::Compile: {
 944     bool HasO4 = false;
 945     if (const Arg *A = Args.getLastArg(options::OPT_O_Group))
 946       HasO4 = A->getOption().matches(options::OPT_O4);
 947
 948     if (Args.hasArg(options::OPT_fsyntax_only)) {
 949       return new CompileJobAction(Input, types::TY_Nothing);
 950     } else if (Args.hasArg(options::OPT_rewrite_objc)) {
 951       return new CompileJobAction(Input, types::TY_RewrittenObjC);
 952     } else if (Args.hasArg(options::OPT__analyze, options::OPT__analyze_auto)) {
 953       return new AnalyzeJobAction(Input, types::TY_Plist);
 954     } else if (Args.hasArg(options::OPT_emit_ast)) {
 955       return new CompileJobAction(Input, types::TY_AST);
 956     } else if (Args.hasArg(options::OPT_emit_llvm) ||
 957                Args.hasFlag(options::OPT_flto, options::OPT_fno_lto, false) ||
 958                HasO4) {
 959       types::ID Output =
 960         Args.hasArg(options::OPT_S) ? types::TY_LTO_IR : types::TY_LTO_BC;
 961       return new CompileJobAction(Input, Output);
 962     } else {
 963       return new CompileJobAction(Input, types::TY_PP_Asm);
 964     }
 965   }
 966   case phases::Assemble:
 967     return new AssembleJobAction(Input, types::TY_Object);
 968   }
 969
 970   assert(0 && "invalid phase in ConstructPhaseAction");
 971   return 0;
 972 }
 973
 974 void Driver::BuildJobs(Compilation &C) const {
 975   llvm::PrettyStackTraceString CrashInfo("Building compilation jobs");
 976
 977   Arg *FinalOutput = C.getArgs().getLastArg(options::OPT_o);
 978
 979   // It is an error to provide a -o option if we are making multiple output
 980   // files.
 981   if (FinalOutput) {
 982     unsigned NumOutputs = 0;
 983     for (ActionList::const_iterator it = C.getActions().begin(),
 984            ie = C.getActions().end(); it != ie; ++it)
 985       if ((*it)->getType() != types::TY_Nothing)
 986         ++NumOutputs;
 987
 988     if (NumOutputs > 1) {
 989       Diag(clang::diag::err_drv_output_argument_with_multiple_files);
 990       FinalOutput = 0;
 991     }
 992   }
 993
 994   for (ActionList::const_iterator it = C.getActions().begin(),
 995          ie = C.getActions().end(); it != ie; ++it) {
 996     Action *A = *it;
 997
 998     // If we are linking an image for multiple archs then the linker wants
 999     // -arch_multiple and -final_output <final image name>. Unfortunately, this
1000     // doesn't fit in cleanly because we have to pass this information down.
1001     //
1002     // FIXME: This is a hack; find a cleaner way to integrate this into the
1003     // process.
1004     const char *LinkingOutput = 0;
1005     if (isa<LipoJobAction>(A)) {
1006       if (FinalOutput)
1007         LinkingOutput = FinalOutput->getValue(C.getArgs());
1008       else
1009         LinkingOutput = DefaultImageName.c_str();
1010     }
1011
1012     InputInfo II;
1013     BuildJobsForAction(C, A, &C.getDefaultToolChain(),
1014                        /*BoundArch*/0,
1015                        /*AtTopLevel*/ true,
1016                        /*LinkingOutput*/ LinkingOutput,
1017                        II);
1018   }
1019
1020   // If the user passed -Qunused-arguments or there were errors, don't warn
1021   // about any unused arguments.
1022   if (Diags.hasErrorOccurred() ||
1023       C.getArgs().hasArg(options::OPT_Qunused_arguments))
1024     return;
1025
1026   // Claim -### here.
1027   (void) C.getArgs().hasArg(options::OPT__HASH_HASH_HASH);
1028
1029   for (ArgList::const_iterator it = C.getArgs().begin(), ie = C.getArgs().end();
1030        it != ie; ++it) {
1031     Arg *A = *it;
1032
1033     // FIXME: It would be nice to be able to send the argument to the
1034     // Diagnostic, so that extra values, position, and so on could be printed.
1035     if (!A->isClaimed()) {
1036       if (A->getOption().hasNoArgumentUnused())
1037         continue;
1038
1039       // Suppress the warning automatically if this is just a flag, and it is an
1040       // instance of an argument we already claimed.
1041       const Option &Opt = A->getOption();
1042       if (isa<FlagOption>(Opt)) {
1043         bool DuplicateClaimed = false;
1044
1045         for (arg_iterator it = C.getArgs().filtered_begin(&Opt),
1046                ie = C.getArgs().filtered_end(); it != ie; ++it) {
1047           if ((*it)->isClaimed()) {
1048             DuplicateClaimed = true;
1049             break;
1050           }
1051         }
1052
1053         if (DuplicateClaimed)
1054           continue;
1055       }
1056
1057       Diag(clang::diag::warn_drv_unused_argument)
1058         << A->getAsString(C.getArgs());
1059     }
1060   }
1061 }
1062
1063 static const Tool &SelectToolForJob(Compilation &C, const ToolChain *TC,
1064                                     const JobAction *JA,
1065                                     const ActionList *&Inputs) {
1066   const Tool *ToolForJob = 0;
1067
1068   // See if we should look for a compiler with an integrated assembler. We match
1069   // bottom up, so what we are actually looking for is an assembler job with a
1070   // compiler input.
1071
1072   // FIXME: This doesn't belong here, but ideally we will support static soon
1073   // anyway.
1074   bool HasStatic = (C.getArgs().hasArg(options::OPT_mkernel) ||
1075                     C.getArgs().hasArg(options::OPT_static) ||
1076                     C.getArgs().hasArg(options::OPT_fapple_kext));
1077   bool IsDarwin = TC->getTriple().getOS() == llvm::Triple::Darwin;
1078   bool IsIADefault = TC->IsIntegratedAssemblerDefault() &&
1079     !(HasStatic && IsDarwin);
1080   if (C.getArgs().hasFlag(options::OPT_integrated_as,
1081                          options::OPT_no_integrated_as,
1082                          IsIADefault) &&
1083       !C.getArgs().hasArg(options::OPT_save_temps) &&
1084       isa<AssembleJobAction>(JA) &&
1085       Inputs->size() == 1 && isa<CompileJobAction>(*Inputs->begin())) {
1086     const Tool &Compiler = TC->SelectTool(
1087       C, cast<JobAction>(**Inputs->begin()), (*Inputs)[0]->getInputs());
1088     if (Compiler.hasIntegratedAssembler()) {
1089       Inputs = &(*Inputs)[0]->getInputs();
1090       ToolForJob = &Compiler;
1091     }
1092   }
1093
1094   // Otherwise use the tool for the current job.
1095   if (!ToolForJob)
1096     ToolForJob = &TC->SelectTool(C, *JA, *Inputs);
1097
1098   // See if we should use an integrated preprocessor. We do so when we have
1099   // exactly one input, since this is the only use case we care about
1100   // (irrelevant since we don't support combine yet).
1101   if (Inputs->size() == 1 && isa<PreprocessJobAction>(*Inputs->begin()) &&
1102       !C.getArgs().hasArg(options::OPT_no_integrated_cpp) &&
1103       !C.getArgs().hasArg(options::OPT_traditional_cpp) &&
1104       !C.getArgs().hasArg(options::OPT_save_temps) &&
1105       ToolForJob->hasIntegratedCPP())
1106     Inputs = &(*Inputs)[0]->getInputs();
1107
1108   return *ToolForJob;
1109 }
1110
1111 void Driver::BuildJobsForAction(Compilation &C,
1112                                 const Action *A,
1113                                 const ToolChain *TC,
1114                                 const char *BoundArch,
1115                                 bool AtTopLevel,
1116                                 const char *LinkingOutput,
1117                                 InputInfo &Result) const {
1118   llvm::PrettyStackTraceString CrashInfo("Building compilation jobs");
1119
1120   if (const InputAction *IA = dyn_cast<InputAction>(A)) {
1121     // FIXME: It would be nice to not claim this here; maybe the old scheme of
1122     // just using Args was better?
1123     const Arg &Input = IA->getInputArg();
1124     Input.claim();
1125     if (Input.getOption().matches(options::OPT_INPUT)) {
1126       const char *Name = Input.getValue(C.getArgs());
1127       Result = InputInfo(Name, A->getType(), Name);
1128     } else
1129       Result = InputInfo(&Input, A->getType(), "");
1130     return;
1131   }
1132
1133   if (const BindArchAction *BAA = dyn_cast<BindArchAction>(A)) {
1134     const ToolChain *TC = &C.getDefaultToolChain();
1135
1136     std::string Arch;
1137     if (BAA->getArchName())
1138       TC = Host->CreateToolChain(C.getArgs(), BAA->getArchName());
1139
1140     BuildJobsForAction(C, *BAA->begin(), TC, BAA->getArchName(),
1141                        AtTopLevel, LinkingOutput, Result);
1142     return;
1143   }
1144
1145   const ActionList *Inputs = &A->getInputs();
1146
1147   const JobAction *JA = cast<JobAction>(A);
1148   const Tool &T = SelectToolForJob(C, TC, JA, Inputs);
1149
1150   // Only use pipes when there is exactly one input.
1151   InputInfoList InputInfos;
1152   for (ActionList::const_iterator it = Inputs->begin(), ie = Inputs->end();
1153        it != ie; ++it) {
1154     // Treat dsymutil sub-jobs as being at the top-level too, they shouldn't get
1155     // temporary output names.
1156     //
1157     // FIXME: Clean this up.
1158     bool SubJobAtTopLevel = false;
1159     if (AtTopLevel && isa<DsymutilJobAction>(A))
1160       SubJobAtTopLevel = true;
1161
1162     InputInfo II;
1163     BuildJobsForAction(C, *it, TC, BoundArch,
1164                        SubJobAtTopLevel, LinkingOutput, II);
1165     InputInfos.push_back(II);
1166   }
1167
1168   // Always use the first input as the base input.
1169   const char *BaseInput = InputInfos[0].getBaseInput();
1170
1171   // ... except dsymutil actions, which use their actual input as the base
1172   // input.
1173   if (JA->getType() == types::TY_dSYM)
1174     BaseInput = InputInfos[0].getFilename();
1175
1176   // Determine the place to write output to, if any.
1177   if (JA->getType() == types::TY_Nothing) {
1178     Result = InputInfo(A->getType(), BaseInput);
1179   } else {
1180     Result = InputInfo(GetNamedOutputPath(C, *JA, BaseInput, AtTopLevel),
1181                        A->getType(), BaseInput);
1182   }
1183
1184   if (CCCPrintBindings) {
1185     llvm::errs() << "# \"" << T.getToolChain().getTripleString() << '"'
1186                  << " - \"" << T.getName() << "\", inputs: [";
1187     for (unsigned i = 0, e = InputInfos.size(); i != e; ++i) {
1188       llvm::errs() << InputInfos[i].getAsString();
1189       if (i + 1 != e)
1190         llvm::errs() << ", ";
1191     }
1192     llvm::errs() << "], output: " << Result.getAsString() << "\n";
1193   } else {
1194     T.ConstructJob(C, *JA, Result, InputInfos,
1195                    C.getArgsForToolChain(TC, BoundArch), LinkingOutput);
1196   }
1197 }
1198
1199 const char *Driver::GetNamedOutputPath(Compilation &C,
1200                                        const JobAction &JA,
1201                                        const char *BaseInput,
1202                                        bool AtTopLevel) const {
1203   llvm::PrettyStackTraceString CrashInfo("Computing output path");
1204   // Output to a user requested destination?
1205   if (AtTopLevel && !isa<DsymutilJobAction>(JA)) {
1206     if (Arg *FinalOutput = C.getArgs().getLastArg(options::OPT_o))
1207       return C.addResultFile(FinalOutput->getValue(C.getArgs()));
1208   }
1209
1210   // Default to writing to stdout?
1211   if (AtTopLevel && isa<PreprocessJobAction>(JA))
1212     return "-";
1213
1214   // Output to a temporary file?
1215   if (!AtTopLevel && !C.getArgs().hasArg(options::OPT_save_temps)) {
1216     std::string TmpName =
1217       GetTemporaryPath(types::getTypeTempSuffix(JA.getType()));
1218     return C.addTempFile(C.getArgs().MakeArgString(TmpName.c_str()));
1219   }
1220
1221   llvm::SmallString<128> BasePath(BaseInput);
1222   llvm::StringRef BaseName;
1223
1224   // Dsymutil actions should use the full path.
1225   if (isa<DsymutilJobAction>(JA))
1226     BaseName = BasePath;
1227   else
1228     BaseName = llvm::sys::path::filename(BasePath);
1229
1230   // Determine what the derived output name should be.
1231   const char *NamedOutput;
1232   if (JA.getType() == types::TY_Image) {
1233     NamedOutput = DefaultImageName.c_str();
1234   } else {
1235     const char *Suffix = types::getTypeTempSuffix(JA.getType());
1236     assert(Suffix && "All types used for output should have a suffix.");
1237
1238     std::string::size_type End = std::string::npos;
1239     if (!types::appendSuffixForType(JA.getType()))
1240       End = BaseName.rfind('.');
1241     std::string Suffixed(BaseName.substr(0, End));
1242     Suffixed += '.';
1243     Suffixed += Suffix;
1244     NamedOutput = C.getArgs().MakeArgString(Suffixed.c_str());
1245   }
1246
1247   // As an annoying special case, PCH generation doesn't strip the pathname.
1248   if (JA.getType() == types::TY_PCH) {
1249     llvm::sys::path::remove_filename(BasePath);
1250     if (BasePath.empty())
1251       BasePath = NamedOutput;
1252     else
1253       llvm::sys::path::append(BasePath, NamedOutput);
1254     return C.addResultFile(C.getArgs().MakeArgString(BasePath.c_str()));
1255   } else {
1256     return C.addResultFile(NamedOutput);
1257   }
1258 }
1259
1260 std::string Driver::GetFilePath(const char *Name, const ToolChain &TC) const {
1261   // Respect a limited subset of the '-Bprefix' functionality in GCC by
1262   // attempting to use this prefix when lokup up program paths.
1263   for (Driver::prefix_list::const_iterator it = PrefixDirs.begin(),
1264        ie = PrefixDirs.end(); it != ie; ++it) {
1265     std::string Dir(*it);
1266     if (Dir.empty())
1267       continue;
1268     if (Dir[0] == '=')
1269       Dir = SysRoot + Dir.substr(1);
1270     llvm::sys::Path P(Dir);
1271     P.appendComponent(Name);
1272     bool Exists;
1273     if (!llvm::sys::fs::exists(P.str(), Exists) && Exists)
1274       return P.str();
1275   }
1276
1277   const ToolChain::path_list &List = TC.getFilePaths();
1278   for (ToolChain::path_list::const_iterator
1279          it = List.begin(), ie = List.end(); it != ie; ++it) {
1280     std::string Dir(*it);
1281     if (Dir.empty())
1282       continue;
1283     if (Dir[0] == '=')
1284       Dir = SysRoot + Dir.substr(1);
1285     llvm::sys::Path P(Dir);
1286     P.appendComponent(Name);
1287     bool Exists;
1288     if (!llvm::sys::fs::exists(P.str(), Exists) && Exists)
1289       return P.str();
1290   }
1291
1292   return Name;
1293 }
1294
1295 std::string Driver::GetProgramPath(const char *Name, const ToolChain &TC,
1296                                    bool WantFile) const {
1297   // Respect a limited subset of the '-Bprefix' functionality in GCC by
1298   // attempting to use this prefix when lokup up program paths.
1299   for (Driver::prefix_list::const_iterator it = PrefixDirs.begin(),
1300        ie = PrefixDirs.end(); it != ie; ++it) {
1301     llvm::sys::Path P(*it);
1302     P.appendComponent(Name);
1303     bool Exists;
1304     if (WantFile ? !llvm::sys::fs::exists(P.str(), Exists) && Exists
1305                  : P.canExecute())
1306       return P.str();
1307   }
1308
1309   const ToolChain::path_list &List = TC.getProgramPaths();
1310   for (ToolChain::path_list::const_iterator
1311          it = List.begin(), ie = List.end(); it != ie; ++it) {
1312     llvm::sys::Path P(*it);
1313     P.appendComponent(Name);
1314     bool Exists;
1315     if (WantFile ? !llvm::sys::fs::exists(P.str(), Exists) && Exists
1316                  : P.canExecute())
1317       return P.str();
1318   }
1319
1320   // If all else failed, search the path.
1321   llvm::sys::Path P(llvm::sys::Program::FindProgramByName(Name));
1322   if (!P.empty())
1323     return P.str();
1324
1325   return Name;
1326 }
1327
1328 std::string Driver::GetTemporaryPath(const char *Suffix) const {
1329   // FIXME: This is lame; sys::Path should provide this function (in particular,
1330   // it should know how to find the temporary files dir).
1331   std::string Error;
1332   const char *TmpDir = ::getenv("TMPDIR");
1333   if (!TmpDir)
1334     TmpDir = ::getenv("TEMP");
1335   if (!TmpDir)
1336     TmpDir = ::getenv("TMP");
1337   if (!TmpDir)
1338     TmpDir = "/tmp";
1339   llvm::sys::Path P(TmpDir);
1340   P.appendComponent("cc");
1341   if (P.makeUnique(false, &Error)) {
1342     Diag(clang::diag::err_drv_unable_to_make_temp) << Error;
1343     return "";
1344   }
1345
1346   // FIXME: Grumble, makeUnique sometimes leaves the file around!?  PR3837.
1347   P.eraseFromDisk(false, 0);
1348
1349   P.appendSuffix(Suffix);
1350   return P.str();
1351 }
1352
1353 const HostInfo *Driver::GetHostInfo(const char *TripleStr) const {
1354   llvm::PrettyStackTraceString CrashInfo("Constructing host");
1355   llvm::Triple Triple(llvm::Triple::normalize(TripleStr).c_str());
1356
1357   // TCE is an osless target
1358   if (Triple.getArchName() == "tce")
1359     return createTCEHostInfo(*this, Triple);
1360
1361   switch (Triple.getOS()) {
1362   case llvm::Triple::AuroraUX:
1363     return createAuroraUXHostInfo(*this, Triple);
1364   case llvm::Triple::Darwin:
1365     return createDarwinHostInfo(*this, Triple);
1366   case llvm::Triple::DragonFly:
1367     return createDragonFlyHostInfo(*this, Triple);
1368   case llvm::Triple::OpenBSD:
1369     return createOpenBSDHostInfo(*this, Triple);
1370   case llvm::Triple::NetBSD:
1371     return createNetBSDHostInfo(*this, Triple);
1372   case llvm::Triple::FreeBSD:
1373     return createFreeBSDHostInfo(*this, Triple);
1374   case llvm::Triple::Minix:
1375     return createMinixHostInfo(*this, Triple);
1376   case llvm::Triple::Linux:
1377     return createLinuxHostInfo(*this, Triple);
1378   case llvm::Triple::Win32:
1379     return createWindowsHostInfo(*this, Triple);
1380   case llvm::Triple::MinGW32:
1381     return createMinGWHostInfo(*this, Triple);
1382   default:
1383     return createUnknownHostInfo(*this, Triple);
1384   }
1385 }
1386
1387 bool Driver::ShouldUseClangCompiler(const Compilation &C, const JobAction &JA,
1388                                     const llvm::Triple &Triple) const {
1389   // Check if user requested no clang, or clang doesn't understand this type (we
1390   // only handle single inputs for now).
1391   if (!CCCUseClang || JA.size() != 1 ||
1392       !types::isAcceptedByClang((*JA.begin())->getType()))
1393     return false;
1394
1395   // Otherwise make sure this is an action clang understands.
1396   if (isa<PreprocessJobAction>(JA)) {
1397     if (!CCCUseClangCPP) {
1398       Diag(clang::diag::warn_drv_not_using_clang_cpp);
1399       return false;
1400     }
1401   } else if (!isa<PrecompileJobAction>(JA) && !isa<CompileJobAction>(JA))
1402     return false;
1403
1404   // Use clang for C++?
1405   if (!CCCUseClangCXX && types::isCXX((*JA.begin())->getType())) {
1406     Diag(clang::diag::warn_drv_not_using_clang_cxx);
1407     return false;
1408   }
1409
1410   // Always use clang for precompiling, AST generation, and rewriting,
1411   // regardless of archs.
1412   if (isa<PrecompileJobAction>(JA) ||
1413       types::isOnlyAcceptedByClang(JA.getType()))
1414     return true;
1415
1416   // Finally, don't use clang if this isn't one of the user specified archs to
1417   // build.
1418   if (!CCCClangArchs.empty() && !CCCClangArchs.count(Triple.getArch())) {
1419     Diag(clang::diag::warn_drv_not_using_clang_arch) << Triple.getArchName();
1420     return false;
1421   }
1422
1423   return true;
1424 }
1425
1426 /// GetReleaseVersion - Parse (([0-9]+)(.([0-9]+)(.([0-9]+)?))?)? and return the
1427 /// grouped values as integers. Numbers which are not provided are set to 0.
1428 ///
1429 /// \return True if the entire string was parsed (9.2), or all groups were
1430 /// parsed (10.3.5extrastuff).
1431 bool Driver::GetReleaseVersion(const char *Str, unsigned &Major,
1432                                unsigned &Minor, unsigned &Micro,
1433                                bool &HadExtra) {
1434   HadExtra = false;
1435
1436   Major = Minor = Micro = 0;
1437   if (*Str == '\0')
1438     return true;
1439
1440   char *End;
1441   Major = (unsigned) strtol(Str, &End, 10);
1442   if (*Str != '\0' && *End == '\0')
1443     return true;
1444   if (*End != '.')
1445     return false;
1446
1447   Str = End+1;
1448   Minor = (unsigned) strtol(Str, &End, 10);
1449   if (*Str != '\0' && *End == '\0')
1450     return true;
1451   if (*End != '.')
1452     return false;
1453
1454   Str = End+1;
1455   Micro = (unsigned) strtol(Str, &End, 10);
1456   if (*Str != '\0' && *End == '\0')
1457     return true;
1458   if (Str == End)
1459     return false;
1460   HadExtra = true;
1461   return true;
1462 }