1 //===--- Sparc.cpp - Tools 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 "Sparc.h" 10 #include "clang/Driver/Driver.h" 11 #include "clang/Driver/DriverDiagnostic.h" 12 #include "clang/Driver/Options.h" 13 #include "llvm/ADT/StringSwitch.h" 14 #include "llvm/Option/ArgList.h" 15 #include "llvm/TargetParser/Host.h" 16 17 using namespace clang::driver; 18 using namespace clang::driver::tools; 19 using namespace clang; 20 using namespace llvm::opt; 21 22 const char *sparc::getSparcAsmModeForCPU(StringRef Name, 23 const llvm::Triple &Triple) { 24 if (Triple.getArch() == llvm::Triple::sparcv9) { 25 const char *DefV9CPU; 26 27 if (Triple.isOSLinux() || Triple.isOSFreeBSD() || Triple.isOSOpenBSD()) 28 DefV9CPU = "-Av9a"; 29 else 30 DefV9CPU = "-Av9"; 31 32 return llvm::StringSwitch<const char *>(Name) 33 .Case("niagara", "-Av9b") 34 .Case("niagara2", "-Av9b") 35 .Case("niagara3", "-Av9d") 36 .Case("niagara4", "-Av9d") 37 .Default(DefV9CPU); 38 } else { 39 return llvm::StringSwitch<const char *>(Name) 40 .Case("v8", "-Av8") 41 .Case("supersparc", "-Av8") 42 .Case("sparclite", "-Asparclite") 43 .Case("f934", "-Asparclite") 44 .Case("hypersparc", "-Av8") 45 .Case("sparclite86x", "-Asparclite") 46 .Case("sparclet", "-Asparclet") 47 .Case("tsc701", "-Asparclet") 48 .Case("v9", "-Av8plus") 49 .Case("ultrasparc", "-Av8plus") 50 .Case("ultrasparc3", "-Av8plus") 51 .Case("niagara", "-Av8plusb") 52 .Case("niagara2", "-Av8plusb") 53 .Case("niagara3", "-Av8plusd") 54 .Case("niagara4", "-Av8plusd") 55 .Case("ma2100", "-Aleon") 56 .Case("ma2150", "-Aleon") 57 .Case("ma2155", "-Aleon") 58 .Case("ma2450", "-Aleon") 59 .Case("ma2455", "-Aleon") 60 .Case("ma2x5x", "-Aleon") 61 .Case("ma2080", "-Aleon") 62 .Case("ma2085", "-Aleon") 63 .Case("ma2480", "-Aleon") 64 .Case("ma2485", "-Aleon") 65 .Case("ma2x8x", "-Aleon") 66 .Case("leon2", "-Av8") 67 .Case("at697e", "-Av8") 68 .Case("at697f", "-Av8") 69 .Case("leon3", "-Aleon") 70 .Case("ut699", "-Av8") 71 .Case("gr712rc", "-Aleon") 72 .Case("leon4", "-Aleon") 73 .Case("gr740", "-Aleon") 74 .Default("-Av8"); 75 } 76 } 77 78 sparc::FloatABI sparc::getSparcFloatABI(const Driver &D, 79 const ArgList &Args) { 80 sparc::FloatABI ABI = sparc::FloatABI::Invalid; 81 if (Arg *A = Args.getLastArg(options::OPT_msoft_float, options::OPT_mno_fpu, 82 options::OPT_mhard_float, options::OPT_mfpu, 83 options::OPT_mfloat_abi_EQ)) { 84 if (A->getOption().matches(options::OPT_msoft_float) || 85 A->getOption().matches(options::OPT_mno_fpu)) 86 ABI = sparc::FloatABI::Soft; 87 else if (A->getOption().matches(options::OPT_mhard_float) || 88 A->getOption().matches(options::OPT_mfpu)) 89 ABI = sparc::FloatABI::Hard; 90 else { 91 ABI = llvm::StringSwitch<sparc::FloatABI>(A->getValue()) 92 .Case("soft", sparc::FloatABI::Soft) 93 .Case("hard", sparc::FloatABI::Hard) 94 .Default(sparc::FloatABI::Invalid); 95 if (ABI == sparc::FloatABI::Invalid && 96 !StringRef(A->getValue()).empty()) { 97 D.Diag(clang::diag::err_drv_invalid_mfloat_abi) << A->getAsString(Args); 98 ABI = sparc::FloatABI::Hard; 99 } 100 } 101 } 102 103 // If unspecified, choose the default based on the platform. 104 // Only the hard-float ABI on Sparc is standardized, and it is the 105 // default. GCC also supports a nonstandard soft-float ABI mode, also 106 // implemented in LLVM. However as this is not standard we set the default 107 // to be hard-float. 108 if (ABI == sparc::FloatABI::Invalid) { 109 ABI = sparc::FloatABI::Hard; 110 } 111 112 return ABI; 113 } 114 115 std::string sparc::getSparcTargetCPU(const Driver &D, const ArgList &Args, 116 const llvm::Triple &Triple) { 117 if (const Arg *A = Args.getLastArg(clang::driver::options::OPT_mcpu_EQ)) { 118 StringRef CPUName = A->getValue(); 119 if (CPUName == "native") { 120 std::string CPU = std::string(llvm::sys::getHostCPUName()); 121 if (!CPU.empty() && CPU != "generic") 122 return CPU; 123 return ""; 124 } 125 return std::string(CPUName); 126 } 127 128 if (Triple.getArch() == llvm::Triple::sparc && 129 (Triple.isOSSolaris() || Triple.isOSLinux())) 130 return "v9"; 131 return ""; 132 } 133 134 void sparc::getSparcTargetFeatures(const Driver &D, const ArgList &Args, 135 std::vector<StringRef> &Features) { 136 sparc::FloatABI FloatABI = sparc::getSparcFloatABI(D, Args); 137 if (FloatABI == sparc::FloatABI::Soft) 138 Features.push_back("+soft-float"); 139 140 if (Arg *A = Args.getLastArg(options::OPT_mfsmuld, options::OPT_mno_fsmuld)) { 141 if (A->getOption().matches(options::OPT_mfsmuld)) 142 Features.push_back("+fsmuld"); 143 else 144 Features.push_back("-fsmuld"); 145 } 146 147 if (Arg *A = Args.getLastArg(options::OPT_mpopc, options::OPT_mno_popc)) { 148 if (A->getOption().matches(options::OPT_mpopc)) 149 Features.push_back("+popc"); 150 else 151 Features.push_back("-popc"); 152 } 153 154 if (Arg *A = Args.getLastArg(options::OPT_mvis, options::OPT_mno_vis)) { 155 if (A->getOption().matches(options::OPT_mvis)) 156 Features.push_back("+vis"); 157 else 158 Features.push_back("-vis"); 159 } 160 161 if (Arg *A = Args.getLastArg(options::OPT_mvis2, options::OPT_mno_vis2)) { 162 if (A->getOption().matches(options::OPT_mvis2)) 163 Features.push_back("+vis2"); 164 else 165 Features.push_back("-vis2"); 166 } 167 168 if (Arg *A = Args.getLastArg(options::OPT_mvis3, options::OPT_mno_vis3)) { 169 if (A->getOption().matches(options::OPT_mvis3)) 170 Features.push_back("+vis3"); 171 else 172 Features.push_back("-vis3"); 173 } 174 175 if (Arg *A = Args.getLastArg(options::OPT_mhard_quad_float, 176 options::OPT_msoft_quad_float)) { 177 if (A->getOption().matches(options::OPT_mhard_quad_float)) 178 Features.push_back("+hard-quad-float"); 179 else 180 Features.push_back("-hard-quad-float"); 181 } 182 183 if (Arg *A = Args.getLastArg(options::OPT_mv8plus, options::OPT_mno_v8plus)) { 184 if (A->getOption().matches(options::OPT_mv8plus)) 185 Features.push_back("+v8plus"); 186 } 187 188 if (Args.hasArg(options::OPT_ffixed_g1)) 189 Features.push_back("+reserve-g1"); 190 191 if (Args.hasArg(options::OPT_ffixed_g2)) 192 Features.push_back("+reserve-g2"); 193 194 if (Args.hasArg(options::OPT_ffixed_g3)) 195 Features.push_back("+reserve-g3"); 196 197 if (Args.hasArg(options::OPT_ffixed_g4)) 198 Features.push_back("+reserve-g4"); 199 200 if (Args.hasArg(options::OPT_ffixed_g5)) 201 Features.push_back("+reserve-g5"); 202 203 if (Args.hasArg(options::OPT_ffixed_g6)) 204 Features.push_back("+reserve-g6"); 205 206 if (Args.hasArg(options::OPT_ffixed_g7)) 207 Features.push_back("+reserve-g7"); 208 209 if (Args.hasArg(options::OPT_ffixed_o0)) 210 Features.push_back("+reserve-o0"); 211 212 if (Args.hasArg(options::OPT_ffixed_o1)) 213 Features.push_back("+reserve-o1"); 214 215 if (Args.hasArg(options::OPT_ffixed_o2)) 216 Features.push_back("+reserve-o2"); 217 218 if (Args.hasArg(options::OPT_ffixed_o3)) 219 Features.push_back("+reserve-o3"); 220 221 if (Args.hasArg(options::OPT_ffixed_o4)) 222 Features.push_back("+reserve-o4"); 223 224 if (Args.hasArg(options::OPT_ffixed_o5)) 225 Features.push_back("+reserve-o5"); 226 227 if (Args.hasArg(options::OPT_ffixed_l0)) 228 Features.push_back("+reserve-l0"); 229 230 if (Args.hasArg(options::OPT_ffixed_l1)) 231 Features.push_back("+reserve-l1"); 232 233 if (Args.hasArg(options::OPT_ffixed_l2)) 234 Features.push_back("+reserve-l2"); 235 236 if (Args.hasArg(options::OPT_ffixed_l3)) 237 Features.push_back("+reserve-l3"); 238 239 if (Args.hasArg(options::OPT_ffixed_l4)) 240 Features.push_back("+reserve-l4"); 241 242 if (Args.hasArg(options::OPT_ffixed_l5)) 243 Features.push_back("+reserve-l5"); 244 245 if (Args.hasArg(options::OPT_ffixed_l6)) 246 Features.push_back("+reserve-l6"); 247 248 if (Args.hasArg(options::OPT_ffixed_l7)) 249 Features.push_back("+reserve-l7"); 250 251 if (Args.hasArg(options::OPT_ffixed_i0)) 252 Features.push_back("+reserve-i0"); 253 254 if (Args.hasArg(options::OPT_ffixed_i1)) 255 Features.push_back("+reserve-i1"); 256 257 if (Args.hasArg(options::OPT_ffixed_i2)) 258 Features.push_back("+reserve-i2"); 259 260 if (Args.hasArg(options::OPT_ffixed_i3)) 261 Features.push_back("+reserve-i3"); 262 263 if (Args.hasArg(options::OPT_ffixed_i4)) 264 Features.push_back("+reserve-i4"); 265 266 if (Args.hasArg(options::OPT_ffixed_i5)) 267 Features.push_back("+reserve-i5"); 268 269 if (Args.hasArg(options::OPT_mfix_gr712rc)) { 270 Features.push_back("+fix-tn0009"); 271 Features.push_back("+fix-tn0011"); 272 Features.push_back("+fix-tn0012"); 273 Features.push_back("+fix-tn0013"); 274 } 275 276 if (Args.hasArg(options::OPT_mfix_ut700)) { 277 Features.push_back("+fix-tn0009"); 278 Features.push_back("+fix-tn0010"); 279 Features.push_back("+fix-tn0013"); 280 } 281 } 282