clang/lib/Driver/ToolChains/DragonFly.cpp

   1 //===--- DragonFly.cpp - DragonFly 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 "DragonFly.h"
  10 #include "CommonArgs.h"
  11 #include "clang/Driver/Compilation.h"
  12 #include "clang/Driver/Driver.h"
  13 #include "clang/Driver/Options.h"
  14 #include "llvm/Option/ArgList.h"
  15 #include "llvm/Support/Path.h"
  16
  17 using namespace clang::driver;
  18 using namespace clang::driver::tools;
  19 using namespace clang::driver::toolchains;
  20 using namespace clang;
  21 using namespace llvm::opt;
  22
  23 void dragonfly::Assembler::ConstructJob(Compilation &C, const JobAction &JA,
  24                                         const InputInfo &Output,
  25                                         const InputInfoList &Inputs,
  26                                         const ArgList &Args,
  27                                         const char *LinkingOutput) const {
  28   const auto &ToolChain = static_cast<const DragonFly &>(getToolChain());
  29   ArgStringList CmdArgs;
  30
  31   claimNoWarnArgs(Args);
  32
  33   // When building 32-bit code on DragonFly/pc64, we have to explicitly
  34   // instruct as in the base system to assemble 32-bit code.
  35   if (ToolChain.getArch() == llvm::Triple::x86)
  36     CmdArgs.push_back("--32");
  37
  38   Args.AddAllArgValues(CmdArgs, options::OPT_Wa_COMMA, options::OPT_Xassembler);
  39
  40   CmdArgs.push_back("-o");
  41   CmdArgs.push_back(Output.getFilename());
  42
  43   for (const auto &II : Inputs)
  44     CmdArgs.push_back(II.getFilename());
  45
  46   const char *Exec = Args.MakeArgString(ToolChain.GetProgramPath("as"));
  47   C.addCommand(std::make_unique<Command>(JA, *this,
  48                                          ResponseFileSupport::AtFileCurCP(),
  49                                          Exec, CmdArgs, Inputs, Output));
  50 }
  51
  52 void dragonfly::Linker::ConstructJob(Compilation &C, const JobAction &JA,
  53                                      const InputInfo &Output,
  54                                      const InputInfoList &Inputs,
  55                                      const ArgList &Args,
  56                                      const char *LinkingOutput) const {
  57   const auto &ToolChain = static_cast<const DragonFly &>(getToolChain());
  58   const Driver &D = ToolChain.getDriver();
  59   const llvm::Triple::ArchType Arch = ToolChain.getArch();
  60   const bool Static = Args.hasArg(options::OPT_static);
  61   const bool Shared = Args.hasArg(options::OPT_shared);
  62   const bool Profiling = Args.hasArg(options::OPT_pg);
  63   const bool Pie = Args.hasArg(options::OPT_pie);
  64   ArgStringList CmdArgs;
  65
  66   if (!D.SysRoot.empty())
  67     CmdArgs.push_back(Args.MakeArgString("--sysroot=" + D.SysRoot));
  68
  69   CmdArgs.push_back("--eh-frame-hdr");
  70   if (Static) {
  71     CmdArgs.push_back("-Bstatic");
  72   } else {
  73     if (Args.hasArg(options::OPT_rdynamic))
  74       CmdArgs.push_back("-export-dynamic");
  75     if (Shared)
  76       CmdArgs.push_back("-shared");
  77     else if (!Args.hasArg(options::OPT_r)) {
  78       CmdArgs.push_back("-dynamic-linker");
  79       CmdArgs.push_back("/usr/libexec/ld-elf.so.2");
  80     }
  81     CmdArgs.push_back("--hash-style=gnu");
  82     CmdArgs.push_back("--enable-new-dtags");
  83   }
  84
  85   // When building 32-bit code on DragonFly/pc64, we have to explicitly
  86   // instruct ld in the base system to link 32-bit code.
  87   if (Arch == llvm::Triple::x86) {
  88     CmdArgs.push_back("-m");
  89     CmdArgs.push_back("elf_i386");
  90   }
  91
  92   assert((Output.isFilename() || Output.isNothing()) && "Invalid output.");
  93   if (Output.isFilename()) {
  94     CmdArgs.push_back("-o");
  95     CmdArgs.push_back(Output.getFilename());
  96   }
  97
  98   if (!Args.hasArg(options::OPT_nostdlib, options::OPT_nostartfiles,
  99                    options::OPT_r)) {
 100     const char *crt1 = nullptr;
 101     const char *crtbegin = nullptr;
 102     if (!Shared) {
 103       if (Profiling)
 104         crt1 = "gcrt1.o";
 105       else {
 106         if (Pie)
 107           crt1 = "Scrt1.o";
 108         else
 109           crt1 = "crt1.o";
 110       }
 111     }
 112
 113     if (Shared || Pie)
 114       crtbegin = "crtbeginS.o";
 115     else
 116       crtbegin = "crtbegin.o";
 117
 118     if (crt1)
 119       CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath(crt1)));
 120     CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crti.o")));
 121     CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath(crtbegin)));
 122   }
 123
 124   Args.addAllArgs(CmdArgs, {options::OPT_L, options::OPT_T_Group,
 125                             options::OPT_s, options::OPT_t, options::OPT_r});
 126   ToolChain.AddFilePathLibArgs(Args, CmdArgs);
 127
 128   AddLinkerInputs(ToolChain, Inputs, Args, CmdArgs, JA);
 129
 130   if (!Args.hasArg(options::OPT_nostdlib, options::OPT_nodefaultlibs,
 131                    options::OPT_r)) {
 132     if (!Static) {
 133       CmdArgs.push_back("-rpath");
 134       CmdArgs.push_back("/usr/lib/gcc80");
 135     }
 136
 137     // Use the static OpenMP runtime with -static-openmp
 138     bool StaticOpenMP = Args.hasArg(options::OPT_static_openmp) && !Static;
 139     addOpenMPRuntime(CmdArgs, ToolChain, Args, StaticOpenMP);
 140
 141     if (D.CCCIsCXX()) {
 142       if (ToolChain.ShouldLinkCXXStdlib(Args))
 143         ToolChain.AddCXXStdlibLibArgs(Args, CmdArgs);
 144       CmdArgs.push_back("-lm");
 145     }
 146
 147     // Silence warnings when linking C code with a C++ '-stdlib' argument.
 148     Args.ClaimAllArgs(options::OPT_stdlib_EQ);
 149
 150     // Additional linker set-up and flags for Fortran. This is required in order
 151     // to generate executables. As Fortran runtime depends on the C runtime,
 152     // these dependencies need to be listed before the C runtime below (i.e.
 153     // AddRunTimeLibs).
 154     if (D.IsFlangMode()) {
 155       addFortranRuntimeLibraryPath(ToolChain, Args, CmdArgs);
 156       addFortranRuntimeLibs(ToolChain, Args, CmdArgs);
 157       CmdArgs.push_back("-lm");
 158     }
 159
 160     if (Args.hasArg(options::OPT_pthread))
 161       CmdArgs.push_back("-lpthread");
 162
 163     if (!Args.hasArg(options::OPT_nolibc))
 164       CmdArgs.push_back("-lc");
 165
 166     if (Static || Args.hasArg(options::OPT_static_libgcc)) {
 167         CmdArgs.push_back("-lgcc");
 168         CmdArgs.push_back("-lgcc_eh");
 169     } else {
 170       if (Args.hasArg(options::OPT_shared_libgcc)) {
 171           CmdArgs.push_back("-lgcc_pic");
 172           if (!Shared)
 173             CmdArgs.push_back("-lgcc");
 174       } else {
 175           CmdArgs.push_back("-lgcc");
 176           CmdArgs.push_back("--as-needed");
 177           CmdArgs.push_back("-lgcc_pic");
 178           CmdArgs.push_back("--no-as-needed");
 179       }
 180     }
 181   }
 182
 183   if (!Args.hasArg(options::OPT_nostdlib, options::OPT_nostartfiles,
 184                    options::OPT_r)) {
 185     const char *crtend = nullptr;
 186     if (Shared || Pie)
 187       crtend ="crtendS.o";
 188     else
 189       crtend = "crtend.o";
 190
 191     CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath(crtend)));
 192     CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crtn.o")));
 193   }
 194
 195   ToolChain.addProfileRTLibs(Args, CmdArgs);
 196
 197   const char *Exec = Args.MakeArgString(ToolChain.GetLinkerPath());
 198   C.addCommand(std::make_unique<Command>(JA, *this,
 199                                          ResponseFileSupport::AtFileCurCP(),
 200                                          Exec, CmdArgs, Inputs, Output));
 201 }
 202
 203 /// DragonFly - DragonFly tool chain which can call as(1) and ld(1) directly.
 204
 205 DragonFly::DragonFly(const Driver &D, const llvm::Triple &Triple,
 206                      const ArgList &Args)
 207     : Generic_ELF(D, Triple, Args) {
 208
 209   // Path mangling to find libexec
 210   getProgramPaths().push_back(getDriver().getInstalledDir());
 211   if (getDriver().getInstalledDir() != getDriver().Dir)
 212     getProgramPaths().push_back(getDriver().Dir);
 213
 214   getFilePaths().push_back(getDriver().Dir + "/../lib");
 215   getFilePaths().push_back(concat(getDriver().SysRoot, "/usr/lib"));
 216   getFilePaths().push_back(concat(getDriver().SysRoot, "/usr/lib/gcc80"));
 217 }
 218
 219 void DragonFly::AddClangSystemIncludeArgs(
 220     const llvm::opt::ArgList &DriverArgs,
 221     llvm::opt::ArgStringList &CC1Args) const {
 222   const Driver &D = getDriver();
 223
 224   if (DriverArgs.hasArg(clang::driver::options::OPT_nostdinc))
 225     return;
 226
 227   if (!DriverArgs.hasArg(options::OPT_nobuiltininc)) {
 228     SmallString<128> Dir(D.ResourceDir);
 229     llvm::sys::path::append(Dir, "include");
 230     addSystemInclude(DriverArgs, CC1Args, Dir.str());
 231   }
 232
 233   if (DriverArgs.hasArg(options::OPT_nostdlibinc))
 234     return;
 235
 236   addExternCSystemInclude(DriverArgs, CC1Args,
 237                           concat(D.SysRoot, "/usr/include"));
 238 }
 239
 240 void DragonFly::addLibStdCxxIncludePaths(const llvm::opt::ArgList &DriverArgs,
 241                                          llvm::opt::ArgStringList &CC1Args) const {
 242   addLibStdCXXIncludePaths(concat(getDriver().SysRoot, "/usr/include/c++/8.0"), "", "",
 243                            DriverArgs, CC1Args);
 244 }
 245
 246 Tool *DragonFly::buildAssembler() const {
 247   return new tools::dragonfly::Assembler(*this);
 248 }
 249
 250 Tool *DragonFly::buildLinker() const {
 251   return new tools::dragonfly::Linker(*this);
 252 }