1 //===--- AMDGPU.cpp - AMDGPU 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 "AMDGPU.h"
10 #include "CommonArgs.h"
11 #include "InputInfo.h"
12 #include "clang/Driver/Compilation.h"
13 #include "clang/Driver/DriverDiagnostic.h"
14 #include "llvm/Option/ArgList.h"
15 
16 using namespace clang::driver;
17 using namespace clang::driver::tools;
18 using namespace clang::driver::toolchains;
19 using namespace clang;
20 using namespace llvm::opt;
21 
22 void amdgpu::Linker::ConstructJob(Compilation &C, const JobAction &JA,
23                                   const InputInfo &Output,
24                                   const InputInfoList &Inputs,
25                                   const ArgList &Args,
26                                   const char *LinkingOutput) const {
27 
28   std::string Linker = getToolChain().GetProgramPath(getShortName());
29   ArgStringList CmdArgs;
30   AddLinkerInputs(getToolChain(), Inputs, Args, CmdArgs, JA);
31   CmdArgs.push_back("-shared");
32   CmdArgs.push_back("-o");
33   CmdArgs.push_back(Output.getFilename());
34   C.addCommand(llvm::make_unique<Command>(JA, *this, Args.MakeArgString(Linker),
35                                           CmdArgs, Inputs));
36 }
37 
38 void amdgpu::getAMDGPUTargetFeatures(const Driver &D,
39                                      const llvm::opt::ArgList &Args,
40                                      std::vector<StringRef> &Features) {
41   if (const Arg *dAbi = Args.getLastArg(options::OPT_mamdgpu_debugger_abi))
42     D.Diag(diag::err_drv_clang_unsupported) << dAbi->getAsString(Args);
43 
44   handleTargetFeaturesGroup(
45     Args, Features, options::OPT_m_amdgpu_Features_Group);
46 }
47 
48 /// AMDGPU Toolchain
49 AMDGPUToolChain::AMDGPUToolChain(const Driver &D, const llvm::Triple &Triple,
50                                  const ArgList &Args)
51     : Generic_ELF(D, Triple, Args),
52       OptionsDefault({{options::OPT_O, "3"},
53                       {options::OPT_cl_std_EQ, "CL1.2"}}) {}
54 
55 Tool *AMDGPUToolChain::buildLinker() const {
56   return new tools::amdgpu::Linker(*this);
57 }
58 
59 DerivedArgList *
60 AMDGPUToolChain::TranslateArgs(const DerivedArgList &Args, StringRef BoundArch,
61                                Action::OffloadKind DeviceOffloadKind) const {
62 
63   DerivedArgList *DAL =
64       Generic_ELF::TranslateArgs(Args, BoundArch, DeviceOffloadKind);
65 
66   // Do nothing if not OpenCL (-x cl)
67   if (!Args.getLastArgValue(options::OPT_x).equals("cl"))
68     return DAL;
69 
70   if (!DAL)
71     DAL = new DerivedArgList(Args.getBaseArgs());
72   for (auto *A : Args)
73     DAL->append(A);
74 
75   const OptTable &Opts = getDriver().getOpts();
76 
77   // Phase 1 (.cl -> .bc)
78   if (Args.hasArg(options::OPT_c) && Args.hasArg(options::OPT_emit_llvm)) {
79     DAL->AddFlagArg(nullptr, Opts.getOption(getTriple().isArch64Bit()
80                                                 ? options::OPT_m64
81                                                 : options::OPT_m32));
82 
83     // Have to check OPT_O4, OPT_O0 & OPT_Ofast separately
84     // as they defined that way in Options.td
85     if (!Args.hasArg(options::OPT_O, options::OPT_O0, options::OPT_O4,
86                      options::OPT_Ofast))
87       DAL->AddJoinedArg(nullptr, Opts.getOption(options::OPT_O),
88                         getOptionDefault(options::OPT_O));
89   }
90 
91   return DAL;
92 }
93 
94 void AMDGPUToolChain::addClangTargetOptions(
95     const llvm::opt::ArgList &DriverArgs,
96     llvm::opt::ArgStringList &CC1Args,
97     Action::OffloadKind DeviceOffloadingKind) const {
98   // Default to "hidden" visibility, as object level linking will not be
99   // supported for the foreseeable future.
100   if (!DriverArgs.hasArg(options::OPT_fvisibility_EQ,
101                          options::OPT_fvisibility_ms_compat)) {
102     CC1Args.push_back("-fvisibility");
103     CC1Args.push_back("hidden");
104     CC1Args.push_back("-fapply-global-visibility-to-externs");
105   }
106 }
107