1 //===--- Ananas.cpp - Ananas ToolChain Implementations ------*- C++ -*-===//
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 #include "Ananas.h"
11 #include "InputInfo.h"
12 #include "CommonArgs.h"
13 #include "clang/Config/config.h"
14 #include "clang/Driver/Compilation.h"
15 #include "clang/Driver/Driver.h"
16 #include "clang/Driver/Options.h"
17 #include "llvm/ADT/SmallString.h"
18 #include "llvm/Option/ArgList.h"
19 #include "llvm/Support/Path.h"
20 
21 using namespace clang::driver;
22 using namespace clang::driver::tools;
23 using namespace clang::driver::toolchains;
24 using namespace clang;
25 using namespace llvm::opt;
26 
27 void ananas::Assembler::ConstructJob(Compilation &C, const JobAction &JA,
28                                      const InputInfo &Output,
29                                      const InputInfoList &Inputs,
30                                      const ArgList &Args,
31                                      const char *LinkingOutput) const {
32   claimNoWarnArgs(Args);
33   ArgStringList CmdArgs;
34 
35   Args.AddAllArgValues(CmdArgs, options::OPT_Wa_COMMA, options::OPT_Xassembler);
36 
37   CmdArgs.push_back("-o");
38   CmdArgs.push_back(Output.getFilename());
39 
40   for (const auto &II : Inputs)
41     CmdArgs.push_back(II.getFilename());
42 
43   const char *Exec = Args.MakeArgString(getToolChain().GetProgramPath("as"));
44   C.addCommand(llvm::make_unique<Command>(JA, *this, Exec, CmdArgs, Inputs));
45 }
46 
47 void ananas::Linker::ConstructJob(Compilation &C, const JobAction &JA,
48                                   const InputInfo &Output,
49                                   const InputInfoList &Inputs,
50                                   const ArgList &Args,
51                                   const char *LinkingOutput) const {
52   const ToolChain &ToolChain = getToolChain();
53   const Driver &D = ToolChain.getDriver();
54   ArgStringList CmdArgs;
55 
56   // Silence warning for "clang -g foo.o -o foo"
57   Args.ClaimAllArgs(options::OPT_g_Group);
58   // and "clang -emit-llvm foo.o -o foo"
59   Args.ClaimAllArgs(options::OPT_emit_llvm);
60   // and for "clang -w foo.o -o foo". Other warning options are already
61   // handled somewhere else.
62   Args.ClaimAllArgs(options::OPT_w);
63 
64   if (!D.SysRoot.empty())
65     CmdArgs.push_back(Args.MakeArgString("--sysroot=" + D.SysRoot));
66 
67   if (Args.hasArg(options::OPT_static)) {
68     CmdArgs.push_back("-Bstatic");
69   } else {
70     if (Args.hasArg(options::OPT_rdynamic))
71       CmdArgs.push_back("-export-dynamic");
72     if (Args.hasArg(options::OPT_shared)) {
73       CmdArgs.push_back("-Bshareable");
74     } else {
75       Args.AddAllArgs(CmdArgs, options::OPT_pie);
76       CmdArgs.push_back("-dynamic-linker");
77       CmdArgs.push_back("/lib/ld-ananas.so");
78     }
79   }
80 
81   if (Output.isFilename()) {
82     CmdArgs.push_back("-o");
83     CmdArgs.push_back(Output.getFilename());
84   } else {
85     assert(Output.isNothing() && "Invalid output.");
86   }
87 
88   if (!Args.hasArg(options::OPT_nostdlib, options::OPT_nostartfiles)) {
89     if (!Args.hasArg(options::OPT_shared)) {
90       CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crt0.o")));
91     }
92     CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crti.o")));
93     if (Args.hasArg(options::OPT_shared) || Args.hasArg(options::OPT_pie)) {
94       CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crtbeginS.o")));
95     } else {
96       CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crtbegin.o")));
97     }
98   }
99 
100   Args.AddAllArgs(CmdArgs, options::OPT_L);
101   ToolChain.AddFilePathLibArgs(Args, CmdArgs);
102   Args.AddAllArgs(CmdArgs,
103                   {options::OPT_T_Group, options::OPT_e, options::OPT_s,
104                    options::OPT_t, options::OPT_Z_Flag, options::OPT_r});
105 
106   if (D.isUsingLTO()) {
107     assert(!Inputs.empty() && "Must have at least one input.");
108     AddGoldPlugin(ToolChain, Args, CmdArgs, Output, Inputs[0],
109                   D.getLTOMode() == LTOK_Thin);
110   }
111 
112   AddLinkerInputs(ToolChain, Inputs, Args, CmdArgs, JA);
113 
114   if (ToolChain.ShouldLinkCXXStdlib(Args))
115     ToolChain.AddCXXStdlibLibArgs(Args, CmdArgs);
116   if (!Args.hasArg(options::OPT_nostdlib, options::OPT_nodefaultlibs))
117     CmdArgs.push_back("-lc");
118 
119   if (!Args.hasArg(options::OPT_nostdlib, options::OPT_nostartfiles)) {
120     if (Args.hasArg(options::OPT_shared) || Args.hasArg(options::OPT_pie))
121       CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crtendS.o")));
122     else
123       CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crtend.o")));
124     CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crtn.o")));
125   }
126 
127   const char *Exec = Args.MakeArgString(ToolChain.GetLinkerPath());
128   C.addCommand(llvm::make_unique<Command>(JA, *this, 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