1 //===--- Haiku.cpp - Haiku 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 "Haiku.h" 10 #include "CommonArgs.h" 11 #include "clang/Config/config.h" 12 #include "clang/Driver/Compilation.h" 13 #include "llvm/Support/Path.h" 14 15 using namespace clang::driver; 16 using namespace clang::driver::tools; 17 using namespace clang::driver::toolchains; 18 using namespace clang; 19 using namespace llvm::opt; 20 21 void haiku::Linker::ConstructJob(Compilation &C, const JobAction &JA, 22 const InputInfo &Output, 23 const InputInfoList &Inputs, 24 const ArgList &Args, 25 const char *LinkingOutput) const { 26 const auto &ToolChain = static_cast<const Haiku &>(getToolChain()); 27 const Driver &D = ToolChain.getDriver(); 28 const llvm::Triple::ArchType Arch = ToolChain.getArch(); 29 const bool Static = Args.hasArg(options::OPT_static); 30 const bool Shared = Args.hasArg(options::OPT_shared); 31 ArgStringList CmdArgs; 32 33 // Silence warning for "clang -g foo.o -o foo" 34 Args.ClaimAllArgs(options::OPT_g_Group); 35 // and "clang -emit-llvm foo.o -o foo" 36 Args.ClaimAllArgs(options::OPT_emit_llvm); 37 // and for "clang -w foo.o -o foo". Other warning options are already 38 // handled somewhere else. 39 Args.ClaimAllArgs(options::OPT_w); 40 41 // Silence warning for "clang -pie foo.o -o foo" 42 Args.ClaimAllArgs(options::OPT_pie); 43 44 // -rdynamic is a no-op with Haiku. Claim argument to avoid warning. 45 Args.ClaimAllArgs(options::OPT_rdynamic); 46 47 if (!D.SysRoot.empty()) 48 CmdArgs.push_back(Args.MakeArgString("--sysroot=" + D.SysRoot)); 49 50 CmdArgs.push_back("--eh-frame-hdr"); 51 if (Static) { 52 CmdArgs.push_back("-Bstatic"); 53 } else { 54 if (Shared) 55 CmdArgs.push_back("-shared"); 56 CmdArgs.push_back("--enable-new-dtags"); 57 } 58 59 CmdArgs.push_back("-shared"); 60 61 if (!Shared) 62 CmdArgs.push_back("--no-undefined"); 63 64 if (Arch == llvm::Triple::riscv64) 65 CmdArgs.push_back("-X"); 66 67 assert((Output.isFilename() || Output.isNothing()) && "Invalid output."); 68 if (Output.isFilename()) { 69 CmdArgs.push_back("-o"); 70 CmdArgs.push_back(Output.getFilename()); 71 } 72 73 if (!Args.hasArg(options::OPT_nostdlib, options::OPT_nostartfiles, 74 options::OPT_r)) { 75 CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crti.o"))); 76 CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crtbeginS.o"))); 77 if (!Shared) 78 CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("start_dyn.o"))); 79 CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("init_term_dyn.o"))); 80 } 81 82 Args.addAllArgs(CmdArgs, {options::OPT_L, options::OPT_T_Group, 83 options::OPT_s, options::OPT_t, options::OPT_r}); 84 ToolChain.AddFilePathLibArgs(Args, CmdArgs); 85 86 if (D.isUsingLTO()) { 87 assert(!Inputs.empty() && "Must have at least one input."); 88 // Find the first filename InputInfo object. 89 auto Input = llvm::find_if( 90 Inputs, [](const InputInfo &II) -> bool { return II.isFilename(); }); 91 if (Input == Inputs.end()) 92 // For a very rare case, all of the inputs to the linker are 93 // InputArg. If that happens, just use the first InputInfo. 94 Input = Inputs.begin(); 95 96 addLTOOptions(ToolChain, Args, CmdArgs, Output, *Input, 97 D.getLTOMode() == LTOK_Thin); 98 } 99 100 addLinkerCompressDebugSectionsOption(ToolChain, Args, CmdArgs); 101 AddLinkerInputs(ToolChain, Inputs, Args, CmdArgs, JA); 102 103 if (!Args.hasArg(options::OPT_nostdlib, options::OPT_nodefaultlibs, 104 options::OPT_r)) { 105 // Use the static OpenMP runtime with -static-openmp 106 bool StaticOpenMP = Args.hasArg(options::OPT_static_openmp) && !Static; 107 addOpenMPRuntime(CmdArgs, ToolChain, Args, StaticOpenMP); 108 109 if (D.CCCIsCXX() && ToolChain.ShouldLinkCXXStdlib(Args)) 110 ToolChain.AddCXXStdlibLibArgs(Args, CmdArgs); 111 112 // Silence warnings when linking C code with a C++ '-stdlib' argument. 113 Args.ClaimAllArgs(options::OPT_stdlib_EQ); 114 115 // Additional linker set-up and flags for Fortran. This is required in order 116 // to generate executables. As Fortran runtime depends on the C runtime, 117 // these dependencies need to be listed before the C runtime below (i.e. 118 // AddRunTimeLibs). 119 if (D.IsFlangMode()) { 120 addFortranRuntimeLibraryPath(ToolChain, Args, CmdArgs); 121 addFortranRuntimeLibs(ToolChain, Args, CmdArgs); 122 } 123 124 CmdArgs.push_back("-lgcc"); 125 126 CmdArgs.push_back("--push-state"); 127 CmdArgs.push_back("--as-needed"); 128 CmdArgs.push_back("-lgcc_s"); 129 CmdArgs.push_back("--no-as-needed"); 130 CmdArgs.push_back("--pop-state"); 131 132 CmdArgs.push_back("-lroot"); 133 134 CmdArgs.push_back("-lgcc"); 135 136 CmdArgs.push_back("--push-state"); 137 CmdArgs.push_back("--as-needed"); 138 CmdArgs.push_back("-lgcc_s"); 139 CmdArgs.push_back("--no-as-needed"); 140 CmdArgs.push_back("--pop-state"); 141 } 142 143 // No need to do anything for pthreads. Claim argument to avoid warning. 144 Args.claimAllArgs(options::OPT_pthread, options::OPT_pthreads); 145 146 if (!Args.hasArg(options::OPT_nostdlib, options::OPT_nostartfiles, 147 options::OPT_r)) { 148 CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crtendS.o"))); 149 CmdArgs.push_back(Args.MakeArgString(ToolChain.GetFilePath("crtn.o"))); 150 } 151 152 ToolChain.addProfileRTLibs(Args, CmdArgs); 153 154 const char *Exec = Args.MakeArgString(getToolChain().GetLinkerPath()); 155 C.addCommand(std::make_unique<Command>(JA, *this, 156 ResponseFileSupport::AtFileCurCP(), 157 Exec, CmdArgs, Inputs, Output)); 158 } 159 160 /// Haiku - Haiku tool chain which can call as(1) and ld(1) directly. 161 162 Haiku::Haiku(const Driver &D, const llvm::Triple& Triple, const ArgList &Args) 163 : Generic_ELF(D, Triple, Args) { 164 165 GCCInstallation.init(Triple, Args); 166 167 getFilePaths().push_back(concat(getDriver().SysRoot, "/boot/system/lib")); 168 getFilePaths().push_back(concat(getDriver().SysRoot, "/boot/system/develop/lib")); 169 170 if (GCCInstallation.isValid()) 171 getFilePaths().push_back(GCCInstallation.getInstallPath().str()); 172 } 173 174 void Haiku::AddClangSystemIncludeArgs(const llvm::opt::ArgList &DriverArgs, 175 llvm::opt::ArgStringList &CC1Args) const { 176 const Driver &D = getDriver(); 177 178 if (DriverArgs.hasArg(options::OPT_nostdinc)) 179 return; 180 181 if (!DriverArgs.hasArg(options::OPT_nobuiltininc)) { 182 SmallString<128> Dir(D.ResourceDir); 183 llvm::sys::path::append(Dir, "include"); 184 addSystemInclude(DriverArgs, CC1Args, Dir.str()); 185 } 186 187 if (DriverArgs.hasArg(options::OPT_nostdlibinc)) 188 return; 189 190 // Add dirs specified via 'configure --with-c-include-dirs'. 191 StringRef CIncludeDirs(C_INCLUDE_DIRS); 192 if (!CIncludeDirs.empty()) { 193 SmallVector<StringRef, 5> dirs; 194 CIncludeDirs.split(dirs, ":"); 195 for (StringRef dir : dirs) { 196 StringRef Prefix = 197 llvm::sys::path::is_absolute(dir) ? StringRef(D.SysRoot) : ""; 198 addExternCSystemInclude(DriverArgs, CC1Args, Prefix + dir); 199 } 200 return; 201 } 202 203 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 204 "/boot/system/non-packaged/develop/headers")); 205 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 206 "/boot/system/develop/headers/os")); 207 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 208 "/boot/system/develop/headers/os/app")); 209 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 210 "/boot/system/develop/headers/os/device")); 211 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 212 "/boot/system/develop/headers/os/drivers")); 213 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 214 "/boot/system/develop/headers/os/game")); 215 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 216 "/boot/system/develop/headers/os/interface")); 217 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 218 "/boot/system/develop/headers/os/kernel")); 219 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 220 "/boot/system/develop/headers/os/locale")); 221 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 222 "/boot/system/develop/headers/os/mail")); 223 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 224 "/boot/system/develop/headers/os/media")); 225 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 226 "/boot/system/develop/headers/os/midi")); 227 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 228 "/boot/system/develop/headers/os/midi2")); 229 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 230 "/boot/system/develop/headers/os/net")); 231 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 232 "/boot/system/develop/headers/os/opengl")); 233 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 234 "/boot/system/develop/headers/os/storage")); 235 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 236 "/boot/system/develop/headers/os/support")); 237 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 238 "/boot/system/develop/headers/os/translation")); 239 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 240 "/boot/system/develop/headers/os/add-ons/graphics")); 241 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 242 "/boot/system/develop/headers/os/add-ons/input_server")); 243 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 244 "/boot/system/develop/headers/os/add-ons/mail_daemon")); 245 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 246 "/boot/system/develop/headers/os/add-ons/registrar")); 247 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 248 "/boot/system/develop/headers/os/add-ons/screen_saver")); 249 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 250 "/boot/system/develop/headers/os/add-ons/tracker")); 251 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 252 "/boot/system/develop/headers/os/be_apps/Deskbar")); 253 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 254 "/boot/system/develop/headers/os/be_apps/NetPositive")); 255 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 256 "/boot/system/develop/headers/os/be_apps/Tracker")); 257 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 258 "/boot/system/develop/headers/3rdparty")); 259 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 260 "/boot/system/develop/headers/bsd")); 261 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 262 "/boot/system/develop/headers/glibc")); 263 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 264 "/boot/system/develop/headers/gnu")); 265 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 266 "/boot/system/develop/headers/posix")); 267 addSystemInclude(DriverArgs, CC1Args, concat(D.SysRoot, 268 "/boot/system/develop/headers")); 269 } 270 271 void Haiku::addLibCxxIncludePaths(const llvm::opt::ArgList &DriverArgs, 272 llvm::opt::ArgStringList &CC1Args) const { 273 addSystemInclude(DriverArgs, CC1Args, 274 concat(getDriver().SysRoot, "/boot/system/develop/headers/c++/v1")); 275 } 276 277 Tool *Haiku::buildLinker() const { return new tools::haiku::Linker(*this); } 278 279 bool Haiku::HasNativeLLVMSupport() const { return true; } 280