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