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 
182   if (Args.hasArg(options::OPT_ffixed_g1))
183     Features.push_back("+reserve-g1");
184 
185   if (Args.hasArg(options::OPT_ffixed_g2))
186     Features.push_back("+reserve-g2");
187 
188   if (Args.hasArg(options::OPT_ffixed_g3))
189     Features.push_back("+reserve-g3");
190 
191   if (Args.hasArg(options::OPT_ffixed_g4))
192     Features.push_back("+reserve-g4");
193 
194   if (Args.hasArg(options::OPT_ffixed_g5))
195     Features.push_back("+reserve-g5");
196 
197   if (Args.hasArg(options::OPT_ffixed_g6))
198     Features.push_back("+reserve-g6");
199 
200   if (Args.hasArg(options::OPT_ffixed_g7))
201     Features.push_back("+reserve-g7");
202 
203   if (Args.hasArg(options::OPT_ffixed_o0))
204     Features.push_back("+reserve-o0");
205 
206   if (Args.hasArg(options::OPT_ffixed_o1))
207     Features.push_back("+reserve-o1");
208 
209   if (Args.hasArg(options::OPT_ffixed_o2))
210     Features.push_back("+reserve-o2");
211 
212   if (Args.hasArg(options::OPT_ffixed_o3))
213     Features.push_back("+reserve-o3");
214 
215   if (Args.hasArg(options::OPT_ffixed_o4))
216     Features.push_back("+reserve-o4");
217 
218   if (Args.hasArg(options::OPT_ffixed_o5))
219     Features.push_back("+reserve-o5");
220 
221   if (Args.hasArg(options::OPT_ffixed_l0))
222     Features.push_back("+reserve-l0");
223 
224   if (Args.hasArg(options::OPT_ffixed_l1))
225     Features.push_back("+reserve-l1");
226 
227   if (Args.hasArg(options::OPT_ffixed_l2))
228     Features.push_back("+reserve-l2");
229 
230   if (Args.hasArg(options::OPT_ffixed_l3))
231     Features.push_back("+reserve-l3");
232 
233   if (Args.hasArg(options::OPT_ffixed_l4))
234     Features.push_back("+reserve-l4");
235 
236   if (Args.hasArg(options::OPT_ffixed_l5))
237     Features.push_back("+reserve-l5");
238 
239   if (Args.hasArg(options::OPT_ffixed_l6))
240     Features.push_back("+reserve-l6");
241 
242   if (Args.hasArg(options::OPT_ffixed_l7))
243     Features.push_back("+reserve-l7");
244 
245   if (Args.hasArg(options::OPT_ffixed_i0))
246     Features.push_back("+reserve-i0");
247 
248   if (Args.hasArg(options::OPT_ffixed_i1))
249     Features.push_back("+reserve-i1");
250 
251   if (Args.hasArg(options::OPT_ffixed_i2))
252     Features.push_back("+reserve-i2");
253 
254   if (Args.hasArg(options::OPT_ffixed_i3))
255     Features.push_back("+reserve-i3");
256 
257   if (Args.hasArg(options::OPT_ffixed_i4))
258     Features.push_back("+reserve-i4");
259 
260   if (Args.hasArg(options::OPT_ffixed_i5))
261     Features.push_back("+reserve-i5");
262 }
263