clang/lib/Driver/ToolChains/Arch/Sparc.cpp

   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 && Triple.isOSSolaris())
 129     return "v9";
 130   return "";
 131 }
 132
 133 void sparc::getSparcTargetFeatures(const Driver &D, const ArgList &Args,
 134                                    std::vector<StringRef> &Features) {
 135   sparc::FloatABI FloatABI = sparc::getSparcFloatABI(D, Args);
 136   if (FloatABI == sparc::FloatABI::Soft)
 137     Features.push_back("+soft-float");
 138
 139   if (Arg *A = Args.getLastArg(options::OPT_mfsmuld, options::OPT_mno_fsmuld)) {
 140     if (A->getOption().matches(options::OPT_mfsmuld))
 141       Features.push_back("+fsmuld");
 142     else
 143       Features.push_back("-fsmuld");
 144   }
 145
 146   if (Arg *A = Args.getLastArg(options::OPT_mpopc, options::OPT_mno_popc)) {
 147     if (A->getOption().matches(options::OPT_mpopc))
 148       Features.push_back("+popc");
 149     else
 150       Features.push_back("-popc");
 151   }
 152
 153   if (Arg *A = Args.getLastArg(options::OPT_mvis, options::OPT_mno_vis)) {
 154     if (A->getOption().matches(options::OPT_mvis))
 155       Features.push_back("+vis");
 156     else
 157       Features.push_back("-vis");
 158   }
 159
 160   if (Arg *A = Args.getLastArg(options::OPT_mvis2, options::OPT_mno_vis2)) {
 161     if (A->getOption().matches(options::OPT_mvis2))
 162       Features.push_back("+vis2");
 163     else
 164       Features.push_back("-vis2");
 165   }
 166
 167   if (Arg *A = Args.getLastArg(options::OPT_mvis3, options::OPT_mno_vis3)) {
 168     if (A->getOption().matches(options::OPT_mvis3))
 169       Features.push_back("+vis3");
 170     else
 171       Features.push_back("-vis3");
 172   }
 173
 174   if (Arg *A = Args.getLastArg(options::OPT_mhard_quad_float,
 175                                options::OPT_msoft_quad_float)) {
 176     if (A->getOption().matches(options::OPT_mhard_quad_float))
 177       Features.push_back("+hard-quad-float");
 178     else
 179       Features.push_back("-hard-quad-float");
 180   }
 181 }