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
21using namespace clang::driver;
22using namespace clang::driver::tools;
23using namespace clang;
24using namespace llvm::opt;
25
26/// getM68kTargetCPU - Get the (LLVM) name of the 68000 cpu we are targeting.
27std::string m68k::getM68kTargetCPU(const ArgList &Args) {
28 if (Arg *A = Args.getLastArg(Ids: 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(Ids: clang::driver::options::OPT_m68000))
53 return "M68000";
54 if (Args.hasArg(Ids: clang::driver::options::OPT_m68010))
55 return "M68010";
56 if (Args.hasArg(Ids: clang::driver::options::OPT_m68020))
57 return "M68020";
58 if (Args.hasArg(Ids: clang::driver::options::OPT_m68030))
59 return "M68030";
60 if (Args.hasArg(Ids: clang::driver::options::OPT_m68040))
61 return "M68040";
62 if (Args.hasArg(Ids: clang::driver::options::OPT_m68060))
63 return "M68060";
64
65 return "";
66}
67
68static void addFloatABIFeatures(const llvm::opt::ArgList &Args,
69 std::vector<llvm::StringRef> &Features) {
70 Arg *A = Args.getLastArg(Ids: options::OPT_msoft_float, Ids: options::OPT_mhard_float,
71 Ids: options::OPT_m68881);
72 // Opt out FPU even for newer CPUs.
73 if (A && A->getOption().matches(ID: options::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
93void 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(Ids: options::OPT_ffixed_a0))
100 Features.push_back(x: "+reserve-a0");
101 if (Args.hasArg(Ids: options::OPT_ffixed_a1))
102 Features.push_back(x: "+reserve-a1");
103 if (Args.hasArg(Ids: options::OPT_ffixed_a2))
104 Features.push_back(x: "+reserve-a2");
105 if (Args.hasArg(Ids: options::OPT_ffixed_a3))
106 Features.push_back(x: "+reserve-a3");
107 if (Args.hasArg(Ids: options::OPT_ffixed_a4))
108 Features.push_back(x: "+reserve-a4");
109 if (Args.hasArg(Ids: options::OPT_ffixed_a5))
110 Features.push_back(x: "+reserve-a5");
111 if (Args.hasArg(Ids: options::OPT_ffixed_a6))
112 Features.push_back(x: "+reserve-a6");
113 if (Args.hasArg(Ids: options::OPT_ffixed_d0))
114 Features.push_back(x: "+reserve-d0");
115 if (Args.hasArg(Ids: options::OPT_ffixed_d1))
116 Features.push_back(x: "+reserve-d1");
117 if (Args.hasArg(Ids: options::OPT_ffixed_d2))
118 Features.push_back(x: "+reserve-d2");
119 if (Args.hasArg(Ids: options::OPT_ffixed_d3))
120 Features.push_back(x: "+reserve-d3");
121 if (Args.hasArg(Ids: options::OPT_ffixed_d4))
122 Features.push_back(x: "+reserve-d4");
123 if (Args.hasArg(Ids: options::OPT_ffixed_d5))
124 Features.push_back(x: "+reserve-d5");
125 if (Args.hasArg(Ids: options::OPT_ffixed_d6))
126 Features.push_back(x: "+reserve-d6");
127 if (Args.hasArg(Ids: options::OPT_ffixed_d7))
128 Features.push_back(x: "+reserve-d7");
129}
130