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