102d32aecSArgyrios Kyrtzidis //===--- CreateInvocationFromCommandLine.cpp - CompilerInvocation from Args ==//
202d32aecSArgyrios Kyrtzidis //
32946cd70SChandler Carruth // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
42946cd70SChandler Carruth // See https://llvm.org/LICENSE.txt for license information.
52946cd70SChandler Carruth // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
602d32aecSArgyrios Kyrtzidis //
702d32aecSArgyrios Kyrtzidis //===----------------------------------------------------------------------===//
802d32aecSArgyrios Kyrtzidis //
902d32aecSArgyrios Kyrtzidis // Construct a compiler invocation object for command line driver arguments
1002d32aecSArgyrios Kyrtzidis //
1102d32aecSArgyrios Kyrtzidis //===----------------------------------------------------------------------===//
1202d32aecSArgyrios Kyrtzidis 
133a02247dSChandler Carruth #include "clang/Basic/DiagnosticOptions.h"
14d2a6ec8eSKadir Cetinkaya #include "clang/Driver/Action.h"
1502d32aecSArgyrios Kyrtzidis #include "clang/Driver/Compilation.h"
1602d32aecSArgyrios Kyrtzidis #include "clang/Driver/Driver.h"
1702d32aecSArgyrios Kyrtzidis #include "clang/Driver/Options.h"
1802d32aecSArgyrios Kyrtzidis #include "clang/Driver/Tool.h"
193a02247dSChandler Carruth #include "clang/Frontend/CompilerInstance.h"
203a02247dSChandler Carruth #include "clang/Frontend/FrontendDiagnostic.h"
21d2a6ec8eSKadir Cetinkaya #include "clang/Frontend/Utils.h"
22d2a6ec8eSKadir Cetinkaya #include "llvm/ADT/STLExtras.h"
23d2a6ec8eSKadir Cetinkaya #include "llvm/ADT/StringRef.h"
24898229abSReid Kleckner #include "llvm/Option/ArgList.h"
2502d32aecSArgyrios Kyrtzidis #include "llvm/Support/Host.h"
2602d32aecSArgyrios Kyrtzidis using namespace clang;
27898229abSReid Kleckner using namespace llvm::opt;
2802d32aecSArgyrios Kyrtzidis 
2940c13720SSam McCall std::unique_ptr<CompilerInvocation>
createInvocation(ArrayRef<const char * > ArgList,CreateInvocationOptions Opts)3040c13720SSam McCall clang::createInvocation(ArrayRef<const char *> ArgList,
3140c13720SSam McCall                         CreateInvocationOptions Opts) {
32444a5f30SKadir Cetinkaya   assert(!ArgList.empty());
3340c13720SSam McCall   auto Diags = Opts.Diags
3440c13720SSam McCall                    ? std::move(Opts.Diags)
3540c13720SSam McCall                    : CompilerInstance::createDiagnostics(new DiagnosticOptions);
3602d32aecSArgyrios Kyrtzidis 
37c02670edSBenjamin Kramer   SmallVector<const char *, 16> Args(ArgList.begin(), ArgList.end());
3802d32aecSArgyrios Kyrtzidis 
393169e806SArgyrios Kyrtzidis   // FIXME: Find a cleaner way to force the driver into restricted modes.
40d2a6ec8eSKadir Cetinkaya   Args.insert(
41d2a6ec8eSKadir Cetinkaya       llvm::find_if(
42d2a6ec8eSKadir Cetinkaya           Args, [](const char *Elem) { return llvm::StringRef(Elem) == "--"; }),
43d2a6ec8eSKadir Cetinkaya       "-fsyntax-only");
4402d32aecSArgyrios Kyrtzidis 
4502d32aecSArgyrios Kyrtzidis   // FIXME: We shouldn't have to pass in the path info.
46257b2971SCaroline Concatto   driver::Driver TheDriver(Args[0], llvm::sys::getDefaultTargetTriple(), *Diags,
4740c13720SSam McCall                            "clang LLVM compiler", Opts.VFS);
4802d32aecSArgyrios Kyrtzidis 
4902d32aecSArgyrios Kyrtzidis   // Don't check that inputs exist, they may have been remapped.
5002d32aecSArgyrios Kyrtzidis   TheDriver.setCheckInputsExist(false);
5104b41904SSam McCall   TheDriver.setProbePrecompiled(Opts.ProbePrecompiled);
5202d32aecSArgyrios Kyrtzidis 
53b8984329SAhmed Charles   std::unique_ptr<driver::Compilation> C(TheDriver.BuildCompilation(Args));
54c46064c2SSerge Pavlov   if (!C)
55c46064c2SSerge Pavlov     return nullptr;
5602d32aecSArgyrios Kyrtzidis 
57*c12577c6SJan Svoboda   if (C->getArgs().hasArg(driver::options::OPT_fdriver_only))
58*c12577c6SJan Svoboda     return nullptr;
59*c12577c6SJan Svoboda 
6002d32aecSArgyrios Kyrtzidis   // Just print the cc1 options if -### was present.
6102d32aecSArgyrios Kyrtzidis   if (C->getArgs().hasArg(driver::options::OPT__HASH_HASH_HASH)) {
62b212b34fSHans Wennborg     C->getJobs().Print(llvm::errs(), "\n", true);
6349a2790fSCraig Topper     return nullptr;
6402d32aecSArgyrios Kyrtzidis   }
6502d32aecSArgyrios Kyrtzidis 
6602d32aecSArgyrios Kyrtzidis   // We expect to get back exactly one command job, if we didn't something
67d06239d3SSamuel Antao   // failed. Offload compilation is an exception as it creates multiple jobs. If
68d06239d3SSamuel Antao   // that's the case, we proceed with the first job. If caller needs a
69d06239d3SSamuel Antao   // particular job, it should be controlled via options (e.g.
70d06239d3SSamuel Antao   // --cuda-{host|device}-only for CUDA) passed to the driver.
7102d32aecSArgyrios Kyrtzidis   const driver::JobList &Jobs = C->getJobs();
72d06239d3SSamuel Antao   bool OffloadCompilation = false;
730ff05cd1SArtem Belevich   if (Jobs.size() > 1) {
740ff05cd1SArtem Belevich     for (auto &A : C->getActions()){
750ff05cd1SArtem Belevich       // On MacOSX real actions may end up being wrapped in BindArchAction
760ff05cd1SArtem Belevich       if (isa<driver::BindArchAction>(A))
775a459f82SNico Weber         A = *A->input_begin();
78d06239d3SSamuel Antao       if (isa<driver::OffloadAction>(A)) {
79d06239d3SSamuel Antao         OffloadCompilation = true;
800ff05cd1SArtem Belevich         break;
810ff05cd1SArtem Belevich       }
820ff05cd1SArtem Belevich     }
830ff05cd1SArtem Belevich   }
842ff7ca98SSam McCall 
8540c13720SSam McCall   bool PickFirstOfMany = OffloadCompilation || Opts.RecoverOnError;
862ff7ca98SSam McCall   if (Jobs.size() == 0 || (Jobs.size() > 1 && !PickFirstOfMany)) {
872c1dd271SDylan Noblesmith     SmallString<256> Msg;
8802d32aecSArgyrios Kyrtzidis     llvm::raw_svector_ostream OS(Msg);
89b212b34fSHans Wennborg     Jobs.Print(OS, "; ", true);
9002d32aecSArgyrios Kyrtzidis     Diags->Report(diag::err_fe_expected_compiler_job) << OS.str();
9149a2790fSCraig Topper     return nullptr;
9202d32aecSArgyrios Kyrtzidis   }
932ff7ca98SSam McCall   auto Cmd = llvm::find_if(Jobs, [](const driver::Command &Cmd) {
942ff7ca98SSam McCall     return StringRef(Cmd.getCreator().getName()) == "clang";
952ff7ca98SSam McCall   });
962ff7ca98SSam McCall   if (Cmd == Jobs.end()) {
9702d32aecSArgyrios Kyrtzidis     Diags->Report(diag::err_fe_expected_clang_command);
9849a2790fSCraig Topper     return nullptr;
9902d32aecSArgyrios Kyrtzidis   }
10002d32aecSArgyrios Kyrtzidis 
1012ff7ca98SSam McCall   const ArgStringList &CCArgs = Cmd->getArguments();
10240c13720SSam McCall   if (Opts.CC1Args)
10340c13720SSam McCall     *Opts.CC1Args = {CCArgs.begin(), CCArgs.end()};
1042b3d49b6SJonas Devlieghere   auto CI = std::make_unique<CompilerInvocation>();
10589ea0b05SAlexandre Ganea   if (!CompilerInvocation::CreateFromArgs(*CI, CCArgs, *Diags, Args[0]) &&
10640c13720SSam McCall       !Opts.RecoverOnError)
10749a2790fSCraig Topper     return nullptr;
108ea4395ebSDavid Blaikie   return CI;
10902d32aecSArgyrios Kyrtzidis }
110