annotate clang/lib/Driver/ToolChains/Ananas.cpp @ 221:79ff65ed7e25

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