1 | //===--- M68k.cpp - M68k Helpers for Tools -------------------*- 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 "M68k.h" |
10 | #include "ToolChains/CommonArgs.h" |
11 | #include "clang/Driver/Driver.h" |
12 | #include "clang/Driver/DriverDiagnostic.h" |
13 | #include "clang/Driver/Options.h" |
14 | #include "llvm/ADT/SmallVector.h" |
15 | #include "llvm/ADT/StringSwitch.h" |
16 | #include "llvm/Option/ArgList.h" |
17 | #include "llvm/Support/Regex.h" |
18 | #include "llvm/TargetParser/Host.h" |
19 | #include <sstream> |
20 | |
21 | using namespace clang::driver; |
22 | using namespace clang::driver::tools; |
23 | using namespace clang; |
24 | using namespace llvm::opt; |
25 | |
26 | /// getM68kTargetCPU - Get the (LLVM) name of the 68000 cpu we are targeting. |
27 | std::string m68k::getM68kTargetCPU(const ArgList &Args) { |
28 | if (Arg *A = Args.getLastArg(clang::driver::options::OPT_mcpu_EQ)) { |
29 | // The canonical CPU name is captalize. However, we allow |
30 | // starting with lower case or numbers only |
31 | StringRef CPUName = A->getValue(); |
32 | |
33 | if (CPUName == "native" ) { |
34 | std::string CPU = std::string(llvm::sys::getHostCPUName()); |
35 | if (!CPU.empty() && CPU != "generic" ) |
36 | return CPU; |
37 | } |
38 | |
39 | if (CPUName == "common" ) |
40 | return "generic" ; |
41 | |
42 | return llvm::StringSwitch<std::string>(CPUName) |
43 | .Cases(S0: "m68000" , S1: "68000" , Value: "M68000" ) |
44 | .Cases(S0: "m68010" , S1: "68010" , Value: "M68010" ) |
45 | .Cases(S0: "m68020" , S1: "68020" , Value: "M68020" ) |
46 | .Cases(S0: "m68030" , S1: "68030" , Value: "M68030" ) |
47 | .Cases(S0: "m68040" , S1: "68040" , Value: "M68040" ) |
48 | .Cases(S0: "m68060" , S1: "68060" , Value: "M68060" ) |
49 | .Default(Value: CPUName.str()); |
50 | } |
51 | // FIXME: Throw error when multiple sub-architecture flag exist |
52 | if (Args.hasArg(clang::driver::options::OPT_m68000)) |
53 | return "M68000" ; |
54 | if (Args.hasArg(clang::driver::options::OPT_m68010)) |
55 | return "M68010" ; |
56 | if (Args.hasArg(clang::driver::options::OPT_m68020)) |
57 | return "M68020" ; |
58 | if (Args.hasArg(clang::driver::options::OPT_m68030)) |
59 | return "M68030" ; |
60 | if (Args.hasArg(clang::driver::options::OPT_m68040)) |
61 | return "M68040" ; |
62 | if (Args.hasArg(clang::driver::options::OPT_m68060)) |
63 | return "M68060" ; |
64 | |
65 | return "" ; |
66 | } |
67 | |
68 | static void addFloatABIFeatures(const llvm::opt::ArgList &Args, |
69 | std::vector<llvm::StringRef> &Features) { |
70 | Arg *A = Args.getLastArg(options::OPT_msoft_float, options::OPT_mhard_float, |
71 | options::OPT_m68881); |
72 | // Opt out FPU even for newer CPUs. |
73 | if (A && A->getOption().matches(options::ID: OPT_msoft_float)) { |
74 | Features.push_back(x: "-isa-68881" ); |
75 | Features.push_back(x: "-isa-68882" ); |
76 | return; |
77 | } |
78 | |
79 | std::string CPU = m68k::getM68kTargetCPU(Args); |
80 | // Only enable M68881 for CPU < 68020 if the related flags are present. |
81 | if ((A && (CPU == "M68000" || CPU == "M68010" )) || |
82 | // Otherwise, by default we assume newer CPUs have M68881/2. |
83 | CPU == "M68020" ) |
84 | Features.push_back(x: "+isa-68881" ); |
85 | else if (CPU == "M68030" || CPU == "M68040" || CPU == "M68060" ) |
86 | // Note that although CPU >= M68040 imply M68882, we still add `isa-68882` |
87 | // anyway so that it's easier to add or not add the corresponding macro |
88 | // definitions later, in case we want to disable 68881/2 in newer CPUs |
89 | // (with -msoft-float, for instance). |
90 | Features.push_back(x: "+isa-68882" ); |
91 | } |
92 | |
93 | void m68k::getM68kTargetFeatures(const Driver &D, const llvm::Triple &Triple, |
94 | const ArgList &Args, |
95 | std::vector<StringRef> &Features) { |
96 | addFloatABIFeatures(Args, Features); |
97 | |
98 | // Handle '-ffixed-<register>' flags |
99 | if (Args.hasArg(options::OPT_ffixed_a0)) |
100 | Features.push_back(x: "+reserve-a0" ); |
101 | if (Args.hasArg(options::OPT_ffixed_a1)) |
102 | Features.push_back(x: "+reserve-a1" ); |
103 | if (Args.hasArg(options::OPT_ffixed_a2)) |
104 | Features.push_back(x: "+reserve-a2" ); |
105 | if (Args.hasArg(options::OPT_ffixed_a3)) |
106 | Features.push_back(x: "+reserve-a3" ); |
107 | if (Args.hasArg(options::OPT_ffixed_a4)) |
108 | Features.push_back(x: "+reserve-a4" ); |
109 | if (Args.hasArg(options::OPT_ffixed_a5)) |
110 | Features.push_back(x: "+reserve-a5" ); |
111 | if (Args.hasArg(options::OPT_ffixed_a6)) |
112 | Features.push_back(x: "+reserve-a6" ); |
113 | if (Args.hasArg(options::OPT_ffixed_d0)) |
114 | Features.push_back(x: "+reserve-d0" ); |
115 | if (Args.hasArg(options::OPT_ffixed_d1)) |
116 | Features.push_back(x: "+reserve-d1" ); |
117 | if (Args.hasArg(options::OPT_ffixed_d2)) |
118 | Features.push_back(x: "+reserve-d2" ); |
119 | if (Args.hasArg(options::OPT_ffixed_d3)) |
120 | Features.push_back(x: "+reserve-d3" ); |
121 | if (Args.hasArg(options::OPT_ffixed_d4)) |
122 | Features.push_back(x: "+reserve-d4" ); |
123 | if (Args.hasArg(options::OPT_ffixed_d5)) |
124 | Features.push_back(x: "+reserve-d5" ); |
125 | if (Args.hasArg(options::OPT_ffixed_d6)) |
126 | Features.push_back(x: "+reserve-d6" ); |
127 | if (Args.hasArg(options::OPT_ffixed_d7)) |
128 | Features.push_back(x: "+reserve-d7" ); |
129 | } |
130 | |