1e5dd7070Spatrick //===--- Ananas.cpp - Ananas ToolChain Implementations ------*- C++ -*-===//
2e5dd7070Spatrick //
3e5dd7070Spatrick // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4e5dd7070Spatrick // See https://llvm.org/LICENSE.txt for license information.
5e5dd7070Spatrick // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6e5dd7070Spatrick //
7e5dd7070Spatrick //===----------------------------------------------------------------------===//
8e5dd7070Spatrick
9e5dd7070Spatrick #include "Ananas.h"
10e5dd7070Spatrick #include "CommonArgs.h"
11e5dd7070Spatrick #include "clang/Driver/Compilation.h"
12e5dd7070Spatrick #include "clang/Driver/Driver.h"
13a9ac8606Spatrick #include "clang/Driver/InputInfo.h"
14e5dd7070Spatrick #include "clang/Driver/Options.h"
15e5dd7070Spatrick #include "llvm/ADT/SmallString.h"
16e5dd7070Spatrick #include "llvm/Option/ArgList.h"
17e5dd7070Spatrick #include "llvm/Support/Path.h"
18e5dd7070Spatrick
19e5dd7070Spatrick using namespace clang::driver;
20e5dd7070Spatrick using namespace clang::driver::tools;
21e5dd7070Spatrick using namespace clang::driver::toolchains;
22e5dd7070Spatrick using namespace clang;
23e5dd7070Spatrick using namespace llvm::opt;
24e5dd7070Spatrick
ConstructJob(Compilation & C,const JobAction & JA,const InputInfo & Output,const InputInfoList & Inputs,const ArgList & Args,const char * LinkingOutput) const25e5dd7070Spatrick void ananas::Assembler::ConstructJob(Compilation &C, const JobAction &JA,
26e5dd7070Spatrick const InputInfo &Output,
27e5dd7070Spatrick const InputInfoList &Inputs,
28e5dd7070Spatrick const ArgList &Args,
29e5dd7070Spatrick const char *LinkingOutput) const {
30e5dd7070Spatrick claimNoWarnArgs(Args);
31e5dd7070Spatrick ArgStringList CmdArgs;
32e5dd7070Spatrick
33e5dd7070Spatrick Args.AddAllArgValues(CmdArgs, options::OPT_Wa_COMMA, options::OPT_Xassembler);
34e5dd7070Spatrick
35e5dd7070Spatrick CmdArgs.push_back("-o");
36e5dd7070Spatrick CmdArgs.push_back(Output.getFilename());
37e5dd7070Spatrick
38e5dd7070Spatrick for (const auto &II : Inputs)
39e5dd7070Spatrick CmdArgs.push_back(II.getFilename());
40e5dd7070Spatrick
41e5dd7070Spatrick const char *Exec = Args.MakeArgString(getToolChain().GetProgramPath("as"));
42a9ac8606Spatrick C.addCommand(std::make_unique<Command>(JA, *this,
43a9ac8606Spatrick ResponseFileSupport::AtFileCurCP(),
44a9ac8606Spatrick Exec, CmdArgs, Inputs, Output));
45e5dd7070Spatrick }
46e5dd7070Spatrick
ConstructJob(Compilation & C,const JobAction & JA,const InputInfo & Output,const InputInfoList & Inputs,const ArgList & Args,const char * LinkingOutput) const47e5dd7070Spatrick void ananas::Linker::ConstructJob(Compilation &C, const JobAction &JA,
48e5dd7070Spatrick const InputInfo &Output,
49e5dd7070Spatrick const InputInfoList &Inputs,
50e5dd7070Spatrick const ArgList &Args,
51e5dd7070Spatrick const char *LinkingOutput) const {
52e5dd7070Spatrick const ToolChain &ToolChain = getToolChain();
53e5dd7070Spatrick const Driver &D = ToolChain.getDriver();
54e5dd7070Spatrick ArgStringList CmdArgs;
55e5dd7070Spatrick
56e5dd7070Spatrick // Silence warning for "clang -g foo.o -o foo"
57e5dd7070Spatrick Args.ClaimAllArgs(options::OPT_g_Group);
58e5dd7070Spatrick // and "clang -emit-llvm foo.o -o foo"
59e5dd7070Spatrick Args.ClaimAllArgs(options::OPT_emit_llvm);
60e5dd7070Spatrick // and for "clang -w foo.o -o foo". Other warning options are already
61e5dd7070Spatrick // handled somewhere else.
62e5dd7070Spatrick Args.ClaimAllArgs(options::OPT_w);
63e5dd7070Spatrick
64e5dd7070Spatrick if (!D.SysRoot.empty())
65e5dd7070Spatrick CmdArgs.push_back(Args.MakeArgString("--sysroot=" + D.SysRoot));
66e5dd7070Spatrick
67e5dd7070Spatrick if (Args.hasArg(options::OPT_static)) {
68e5dd7070Spatrick CmdArgs.push_back("-Bstatic");
69e5dd7070Spatrick } else {
70e5dd7070Spatrick if (Args.hasArg(options::OPT_rdynamic))
71e5dd7070Spatrick CmdArgs.push_back("-export-dynamic");
72e5dd7070Spatrick if (Args.hasArg(options::OPT_shared)) {
73e5dd7070Spatrick CmdArgs.push_back("-Bshareable");
74*12c85518Srobert } else if (!Args.hasArg(options::OPT_r)) {
75e5dd7070Spatrick Args.AddAllArgs(CmdArgs, options::OPT_pie);
76e5dd7070Spatrick CmdArgs.push_back("-dynamic-linker");
77e5dd7070Spatrick CmdArgs.push_back("/lib/ld-ananas.so");
78e5dd7070Spatrick }
79e5dd7070Spatrick }
80e5dd7070Spatrick
81e5dd7070Spatrick if (Output.isFilename()) {
82e5dd7070Spatrick CmdArgs.push_back("-o");
83e5dd7070Spatrick CmdArgs.push_back(Output.getFilename());
84e5dd7070Spatrick } else {
85e5dd7070Spatrick assert(Output.isNothing() && "Invalid output.");
86e5dd7070Spatrick }
87e5dd7070Spatrick
88*12c85518Srobert if (!Args.hasArg(options::OPT_nostdlib, options::OPT_nostartfiles,
89*12c85518Srobert options::OPT_r)) {
90e5dd7070Spatrick if (!Args.hasArg(options::OPT_shared)) {
91e5dd7070Spatrick CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crt0.o")));
92e5dd7070Spatrick }
93e5dd7070Spatrick CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crti.o")));
94e5dd7070Spatrick if (Args.hasArg(options::OPT_shared) || Args.hasArg(options::OPT_pie)) {
95e5dd7070Spatrick CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crtbeginS.o")));
96e5dd7070Spatrick } else {
97e5dd7070Spatrick CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crtbegin.o")));
98e5dd7070Spatrick }
99e5dd7070Spatrick }
100e5dd7070Spatrick
101e5dd7070Spatrick Args.AddAllArgs(CmdArgs, options::OPT_L);
102e5dd7070Spatrick ToolChain.AddFilePathLibArgs(Args, CmdArgs);
103e5dd7070Spatrick Args.AddAllArgs(CmdArgs,
104e5dd7070Spatrick {options::OPT_T_Group, options::OPT_e, options::OPT_s,
105e5dd7070Spatrick options::OPT_t, options::OPT_Z_Flag, options::OPT_r});
106e5dd7070Spatrick
107e5dd7070Spatrick if (D.isUsingLTO()) {
108e5dd7070Spatrick assert(!Inputs.empty() && "Must have at least one input.");
109ec727ea7Spatrick addLTOOptions(ToolChain, Args, CmdArgs, Output, Inputs[0],
110e5dd7070Spatrick D.getLTOMode() == LTOK_Thin);
111e5dd7070Spatrick }
112e5dd7070Spatrick
113e5dd7070Spatrick AddLinkerInputs(ToolChain, Inputs, Args, CmdArgs, JA);
114e5dd7070Spatrick
115*12c85518Srobert if (!Args.hasArg(options::OPT_nostdlib, options::OPT_nodefaultlibs,
116*12c85518Srobert options::OPT_r)) {
117e5dd7070Spatrick if (ToolChain.ShouldLinkCXXStdlib(Args))
118e5dd7070Spatrick ToolChain.AddCXXStdlibLibArgs(Args, CmdArgs);
119e5dd7070Spatrick CmdArgs.push_back("-lc");
120*12c85518Srobert }
121e5dd7070Spatrick
122*12c85518Srobert if (!Args.hasArg(options::OPT_nostdlib, options::OPT_nostartfiles,
123*12c85518Srobert options::OPT_r)) {
124e5dd7070Spatrick if (Args.hasArg(options::OPT_shared) || Args.hasArg(options::OPT_pie))
125e5dd7070Spatrick CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crtendS.o")));
126e5dd7070Spatrick else
127e5dd7070Spatrick CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crtend.o")));
128e5dd7070Spatrick CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crtn.o")));
129e5dd7070Spatrick }
130e5dd7070Spatrick
131e5dd7070Spatrick const char *Exec = Args.MakeArgString(ToolChain.GetLinkerPath());
132a9ac8606Spatrick C.addCommand(std::make_unique<Command>(JA, *this,
133a9ac8606Spatrick ResponseFileSupport::AtFileCurCP(),
134a9ac8606Spatrick Exec, CmdArgs, Inputs, Output));
135e5dd7070Spatrick }
136e5dd7070Spatrick
137e5dd7070Spatrick // Ananas - Ananas tool chain which can call as(1) and ld(1) directly.
138e5dd7070Spatrick
Ananas(const Driver & D,const llvm::Triple & Triple,const ArgList & Args)139e5dd7070Spatrick Ananas::Ananas(const Driver &D, const llvm::Triple &Triple, const ArgList &Args)
140e5dd7070Spatrick : Generic_ELF(D, Triple, Args) {
141e5dd7070Spatrick getFilePaths().push_back(getDriver().SysRoot + "/usr/lib");
142e5dd7070Spatrick }
143e5dd7070Spatrick
buildAssembler() const144e5dd7070Spatrick Tool *Ananas::buildAssembler() const {
145e5dd7070Spatrick return new tools::ananas::Assembler(*this);
146e5dd7070Spatrick }
147e5dd7070Spatrick
buildLinker() const148e5dd7070Spatrick Tool *Ananas::buildLinker() const { return new tools::ananas::Linker(*this); }
149