1 //===--- AIX.cpp - AIX 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 "AIX.h"
10 #include "Arch/PPC.h"
11 #include "CommonArgs.h"
12 #include "clang/Driver/Compilation.h"
13 #include "clang/Driver/Options.h"
14 #include "clang/Driver/SanitizerArgs.h"
15 #include "llvm/Option/ArgList.h"
16 #include "llvm/Support/Path.h"
17 
18 using AIX = clang::driver::toolchains::AIX;
19 using namespace clang::driver;
20 using namespace clang::driver::tools;
21 using namespace clang::driver::toolchains;
22 
23 using namespace llvm::opt;
24 using namespace llvm::sys;
25 
26 void aix::Assembler::ConstructJob(Compilation &C, const JobAction &JA,
27                                   const InputInfo &Output,
28                                   const InputInfoList &Inputs,
29                                   const ArgList &Args,
30                                   const char *LinkingOutput) const {
31   ArgStringList CmdArgs;
32 
33   const bool IsArch32Bit = getToolChain().getTriple().isArch32Bit();
34   const bool IsArch64Bit = getToolChain().getTriple().isArch64Bit();
35   // Only support 32 and 64 bit.
36   if (!IsArch32Bit && !IsArch64Bit)
37     llvm_unreachable("Unsupported bit width value.");
38 
39   // Specify the mode in which the as(1) command operates.
40   if (IsArch32Bit) {
41     CmdArgs.push_back("-a32");
42   } else {
43     // Must be 64-bit, otherwise asserted already.
44     CmdArgs.push_back("-a64");
45   }
46 
47   // Accept any mixture of instructions.
48   // On Power for AIX and Linux, this behaviour matches that of GCC for both the
49   // user-provided assembler source case and the compiler-produced assembler
50   // source case. Yet XL with user-provided assembler source would not add this.
51   CmdArgs.push_back("-many");
52 
53   Args.AddAllArgValues(CmdArgs, options::OPT_Wa_COMMA, options::OPT_Xassembler);
54 
55   // Specify assembler output file.
56   assert((Output.isFilename() || Output.isNothing()) && "Invalid output.");
57   if (Output.isFilename()) {
58     CmdArgs.push_back("-o");
59     CmdArgs.push_back(Output.getFilename());
60   }
61 
62   // Specify assembler input file.
63   // The system assembler on AIX takes exactly one input file. The driver is
64   // expected to invoke as(1) separately for each assembler source input file.
65   if (Inputs.size() != 1)
66     llvm_unreachable("Invalid number of input files.");
67   const InputInfo &II = Inputs[0];
68   assert((II.isFilename() || II.isNothing()) && "Invalid input.");
69   if (II.isFilename())
70     CmdArgs.push_back(II.getFilename());
71 
72   const char *Exec = Args.MakeArgString(getToolChain().GetProgramPath("as"));
73   C.addCommand(std::make_unique<Command>(JA, *this, ResponseFileSupport::None(),
74                                          Exec, CmdArgs, Inputs));
75 }
76 
77 void aix::Linker::ConstructJob(Compilation &C, const JobAction &JA,
78                                const InputInfo &Output,
79                                const InputInfoList &Inputs, const ArgList &Args,
80                                const char *LinkingOutput) const {
81   const AIX &ToolChain = static_cast<const AIX &>(getToolChain());
82   const Driver &D = ToolChain.getDriver();
83   ArgStringList CmdArgs;
84 
85   const bool IsArch32Bit = ToolChain.getTriple().isArch32Bit();
86   const bool IsArch64Bit = ToolChain.getTriple().isArch64Bit();
87   // Only support 32 and 64 bit.
88   if (!(IsArch32Bit || IsArch64Bit))
89     llvm_unreachable("Unsupported bit width value.");
90 
91   // Force static linking when "-static" is present.
92   if (Args.hasArg(options::OPT_static))
93     CmdArgs.push_back("-bnso");
94 
95   // Specify linker output file.
96   assert((Output.isFilename() || Output.isNothing()) && "Invalid output.");
97   if (Output.isFilename()) {
98     CmdArgs.push_back("-o");
99     CmdArgs.push_back(Output.getFilename());
100   }
101 
102   // Set linking mode (i.e., 32/64-bit) and the address of
103   // text and data sections based on arch bit width.
104   if (IsArch32Bit) {
105     CmdArgs.push_back("-b32");
106     CmdArgs.push_back("-bpT:0x10000000");
107     CmdArgs.push_back("-bpD:0x20000000");
108   } else {
109     // Must be 64-bit, otherwise asserted already.
110     CmdArgs.push_back("-b64");
111     CmdArgs.push_back("-bpT:0x100000000");
112     CmdArgs.push_back("-bpD:0x110000000");
113   }
114 
115   auto getCrt0Basename = [&Args, IsArch32Bit] {
116     // Enable gprofiling when "-pg" is specified.
117     if (Args.hasArg(options::OPT_pg))
118       return IsArch32Bit ? "gcrt0.o" : "gcrt0_64.o";
119     // Enable profiling when "-p" is specified.
120     else if (Args.hasArg(options::OPT_p))
121       return IsArch32Bit ? "mcrt0.o" : "mcrt0_64.o";
122     else
123       return IsArch32Bit ? "crt0.o" : "crt0_64.o";
124   };
125 
126   if (!Args.hasArg(options::OPT_nostdlib)) {
127     CmdArgs.push_back(
128         Args.MakeArgString(ToolChain.GetFilePath(getCrt0Basename())));
129   }
130 
131   // Collect all static constructor and destructor functions in CXX mode. This
132   // has to come before AddLinkerInputs as the implied option needs to precede
133   // any other '-bcdtors' settings or '-bnocdtors' that '-Wl' might forward.
134   if (D.CCCIsCXX())
135     CmdArgs.push_back("-bcdtors:all:0:s");
136 
137   // Specify linker input file(s).
138   AddLinkerInputs(ToolChain, Inputs, Args, CmdArgs, JA);
139 
140   // Add directory to library search path.
141   Args.AddAllArgs(CmdArgs, options::OPT_L);
142   ToolChain.AddFilePathLibArgs(Args, CmdArgs);
143 
144   if (getToolChain().ShouldLinkCXXStdlib(Args))
145     getToolChain().AddCXXStdlibLibArgs(Args, CmdArgs);
146 
147   if (!Args.hasArg(options::OPT_nostdlib, options::OPT_nodefaultlibs)) {
148     // Support POSIX threads if "-pthreads" or "-pthread" is present.
149     if (Args.hasArg(options::OPT_pthreads, options::OPT_pthread))
150       CmdArgs.push_back("-lpthreads");
151 
152     CmdArgs.push_back("-lc");
153   }
154 
155   const char *Exec = Args.MakeArgString(ToolChain.GetLinkerPath());
156   C.addCommand(std::make_unique<Command>(JA, *this, ResponseFileSupport::None(),
157                                          Exec, CmdArgs, Inputs));
158 }
159 
160 /// AIX - AIX tool chain which can call as(1) and ld(1) directly.
161 AIX::AIX(const Driver &D, const llvm::Triple &Triple, const ArgList &Args)
162     : ToolChain(D, Triple, Args) {
163   getFilePaths().push_back(getDriver().SysRoot + "/usr/lib");
164 }
165 
166 // Returns the effective header sysroot path to use.
167 // This comes from either -isysroot or --sysroot.
168 llvm::StringRef
169 AIX::GetHeaderSysroot(const llvm::opt::ArgList &DriverArgs) const {
170   if (DriverArgs.hasArg(options::OPT_isysroot))
171     return DriverArgs.getLastArgValue(options::OPT_isysroot);
172   if (!getDriver().SysRoot.empty())
173     return getDriver().SysRoot;
174   return "/";
175 }
176 
177 void AIX::AddClangSystemIncludeArgs(const ArgList &DriverArgs,
178                                     ArgStringList &CC1Args) const {
179   // Return if -nostdinc is specified as a driver option.
180   if (DriverArgs.hasArg(options::OPT_nostdinc))
181     return;
182 
183   llvm::StringRef Sysroot = GetHeaderSysroot(DriverArgs);
184   const Driver &D = getDriver();
185 
186   // Add the Clang builtin headers (<resource>/include).
187   if (!DriverArgs.hasArg(options::OPT_nobuiltininc)) {
188     SmallString<128> P(D.ResourceDir);
189     path::append(P, "/include");
190     addSystemInclude(DriverArgs, CC1Args, P.str());
191   }
192 
193   // Return if -nostdlibinc is specified as a driver option.
194   if (DriverArgs.hasArg(options::OPT_nostdlibinc))
195     return;
196 
197   // Add <sysroot>/usr/include.
198   SmallString<128> UP(Sysroot);
199   path::append(UP, "/usr/include");
200   addSystemInclude(DriverArgs, CC1Args, UP.str());
201 }
202 
203 void AIX::AddCXXStdlibLibArgs(const llvm::opt::ArgList &DriverArgs,
204                               llvm::opt::ArgStringList &CC1Args) const {
205   switch (GetCXXStdlibType(DriverArgs)) {
206   case ToolChain::CST_Libcxx:
207     CC1Args.push_back("-lc++");
208     return;
209   case ToolChain::CST_Libstdcxx:
210     llvm::report_fatal_error("linking libstdc++ unimplemented on AIX");
211   }
212 
213   llvm_unreachable("Unexpected C++ library type; only libc++ is supported.");
214 }
215 
216 ToolChain::CXXStdlibType AIX::GetDefaultCXXStdlibType() const {
217   return ToolChain::CST_Libcxx;
218 }
219 
220 auto AIX::buildAssembler() const -> Tool * { return new aix::Assembler(*this); }
221 
222 auto AIX::buildLinker() const -> Tool * { return new aix::Linker(*this); }
223