1*d4bcb45dSJez Ng //===-- MCTargetOptionsCommandFlags.cpp -----------------------*- C++ //-*-===//
2ac1d23edSserge-sans-paille //
3ac1d23edSserge-sans-paille // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4ac1d23edSserge-sans-paille // See https://llvm.org/LICENSE.txt for license information.
5ac1d23edSserge-sans-paille // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6ac1d23edSserge-sans-paille //
7ac1d23edSserge-sans-paille //===----------------------------------------------------------------------===//
8ac1d23edSserge-sans-paille //
9ac1d23edSserge-sans-paille // This file contains machine code-specific flags that are shared between
10ac1d23edSserge-sans-paille // different command line tools.
11ac1d23edSserge-sans-paille //
12ac1d23edSserge-sans-paille //===----------------------------------------------------------------------===//
13ac1d23edSserge-sans-paille 
14ac1d23edSserge-sans-paille #include "llvm/MC/MCTargetOptionsCommandFlags.h"
15f3b20c2aSSimon Pilgrim #include "llvm/MC/MCTargetOptions.h"
16f3b20c2aSSimon Pilgrim #include "llvm/Support/CommandLine.h"
17ac1d23edSserge-sans-paille 
18ac1d23edSserge-sans-paille using namespace llvm;
19ac1d23edSserge-sans-paille 
20ac1d23edSserge-sans-paille #define MCOPT(TY, NAME)                                                        \
21ac1d23edSserge-sans-paille   static cl::opt<TY> *NAME##View;                                              \
22ac1d23edSserge-sans-paille   TY llvm::mc::get##NAME() {                                                   \
23ac1d23edSserge-sans-paille     assert(NAME##View && "RegisterMCTargetOptionsFlags not created.");         \
24ac1d23edSserge-sans-paille     return *NAME##View;                                                        \
25ac1d23edSserge-sans-paille   }
26ac1d23edSserge-sans-paille 
27ac1d23edSserge-sans-paille #define MCOPT_EXP(TY, NAME)                                                    \
28ac1d23edSserge-sans-paille   MCOPT(TY, NAME)                                                              \
29ac1d23edSserge-sans-paille   Optional<TY> llvm::mc::getExplicit##NAME() {                                 \
30ac1d23edSserge-sans-paille     if (NAME##View->getNumOccurrences()) {                                     \
31ac1d23edSserge-sans-paille       TY res = *NAME##View;                                                    \
32ac1d23edSserge-sans-paille       return res;                                                              \
33ac1d23edSserge-sans-paille     }                                                                          \
34ac1d23edSserge-sans-paille     return None;                                                               \
35ac1d23edSserge-sans-paille   }
36ac1d23edSserge-sans-paille 
MCOPT_EXP(bool,RelaxAll)37ac1d23edSserge-sans-paille MCOPT_EXP(bool, RelaxAll)
38ac1d23edSserge-sans-paille MCOPT(bool, IncrementalLinkerCompatible)
39ac1d23edSserge-sans-paille MCOPT(int, DwarfVersion)
40a8ec9de4SIgor Kudrin MCOPT(bool, Dwarf64)
41*d4bcb45dSJez Ng MCOPT(EmitDwarfUnwindType, EmitDwarfUnwind)
42ac1d23edSserge-sans-paille MCOPT(bool, ShowMCInst)
43ac1d23edSserge-sans-paille MCOPT(bool, FatalWarnings)
44ac1d23edSserge-sans-paille MCOPT(bool, NoWarn)
45ac1d23edSserge-sans-paille MCOPT(bool, NoDeprecatedWarn)
469647a6f7SWouter van Oortmerssen MCOPT(bool, NoTypeCheck)
47ac1d23edSserge-sans-paille MCOPT(std::string, ABIName)
48ac1d23edSserge-sans-paille 
49ac1d23edSserge-sans-paille llvm::mc::RegisterMCTargetOptionsFlags::RegisterMCTargetOptionsFlags() {
50ac1d23edSserge-sans-paille #define MCBINDOPT(NAME)                                                        \
51ac1d23edSserge-sans-paille   do {                                                                         \
52ac1d23edSserge-sans-paille     NAME##View = std::addressof(NAME);                                         \
53ac1d23edSserge-sans-paille   } while (0)
54ac1d23edSserge-sans-paille 
55ac1d23edSserge-sans-paille   static cl::opt<bool> RelaxAll(
56ac1d23edSserge-sans-paille       "mc-relax-all", cl::desc("When used with filetype=obj, relax all fixups "
57ac1d23edSserge-sans-paille                                "in the emitted object file"));
58ac1d23edSserge-sans-paille   MCBINDOPT(RelaxAll);
59ac1d23edSserge-sans-paille 
60ac1d23edSserge-sans-paille   static cl::opt<bool> IncrementalLinkerCompatible(
61ac1d23edSserge-sans-paille       "incremental-linker-compatible",
62ac1d23edSserge-sans-paille       cl::desc(
63ac1d23edSserge-sans-paille           "When used with filetype=obj, "
64ac1d23edSserge-sans-paille           "emit an object file which can be used with an incremental linker"));
65ac1d23edSserge-sans-paille   MCBINDOPT(IncrementalLinkerCompatible);
66ac1d23edSserge-sans-paille 
67ac1d23edSserge-sans-paille   static cl::opt<int> DwarfVersion("dwarf-version", cl::desc("Dwarf version"),
68ac1d23edSserge-sans-paille                                    cl::init(0));
69ac1d23edSserge-sans-paille   MCBINDOPT(DwarfVersion);
70ac1d23edSserge-sans-paille 
71a8ec9de4SIgor Kudrin   static cl::opt<bool> Dwarf64(
72a8ec9de4SIgor Kudrin       "dwarf64",
73a8ec9de4SIgor Kudrin       cl::desc("Generate debugging info in the 64-bit DWARF format"));
74a8ec9de4SIgor Kudrin   MCBINDOPT(Dwarf64);
75a8ec9de4SIgor Kudrin 
76*d4bcb45dSJez Ng   static cl::opt<EmitDwarfUnwindType> EmitDwarfUnwind(
77*d4bcb45dSJez Ng       "emit-dwarf-unwind", cl::desc("Whether to emit DWARF EH frame entries."),
78*d4bcb45dSJez Ng       cl::init(EmitDwarfUnwindType::Default),
79*d4bcb45dSJez Ng       cl::values(clEnumValN(EmitDwarfUnwindType::Always, "always",
80*d4bcb45dSJez Ng                             "Always emit EH frame entries"),
81*d4bcb45dSJez Ng                  clEnumValN(EmitDwarfUnwindType::NoCompactUnwind,
82*d4bcb45dSJez Ng                             "no-compact-unwind",
83*d4bcb45dSJez Ng                             "Only emit EH frame entries when compact unwind is "
84*d4bcb45dSJez Ng                             "not available"),
85*d4bcb45dSJez Ng                  clEnumValN(EmitDwarfUnwindType::Default, "default",
86*d4bcb45dSJez Ng                             "Use target platform default")));
87*d4bcb45dSJez Ng   MCBINDOPT(EmitDwarfUnwind);
88*d4bcb45dSJez Ng 
89ac1d23edSserge-sans-paille   static cl::opt<bool> ShowMCInst(
90ac1d23edSserge-sans-paille       "asm-show-inst",
91ac1d23edSserge-sans-paille       cl::desc("Emit internal instruction representation to assembly file"));
92ac1d23edSserge-sans-paille   MCBINDOPT(ShowMCInst);
93ac1d23edSserge-sans-paille 
94ac1d23edSserge-sans-paille   static cl::opt<bool> FatalWarnings("fatal-warnings",
95ac1d23edSserge-sans-paille                                      cl::desc("Treat warnings as errors"));
96ac1d23edSserge-sans-paille   MCBINDOPT(FatalWarnings);
97ac1d23edSserge-sans-paille 
98ac1d23edSserge-sans-paille   static cl::opt<bool> NoWarn("no-warn", cl::desc("Suppress all warnings"));
99ac1d23edSserge-sans-paille   static cl::alias NoWarnW("W", cl::desc("Alias for --no-warn"),
100ac1d23edSserge-sans-paille                            cl::aliasopt(NoWarn));
101ac1d23edSserge-sans-paille   MCBINDOPT(NoWarn);
102ac1d23edSserge-sans-paille 
103ac1d23edSserge-sans-paille   static cl::opt<bool> NoDeprecatedWarn(
104ac1d23edSserge-sans-paille       "no-deprecated-warn", cl::desc("Suppress all deprecated warnings"));
105ac1d23edSserge-sans-paille   MCBINDOPT(NoDeprecatedWarn);
106ac1d23edSserge-sans-paille 
1079647a6f7SWouter van Oortmerssen   static cl::opt<bool> NoTypeCheck(
1089647a6f7SWouter van Oortmerssen       "no-type-check", cl::desc("Suppress type errors (Wasm)"));
1099647a6f7SWouter van Oortmerssen   MCBINDOPT(NoTypeCheck);
1109647a6f7SWouter van Oortmerssen 
111ac1d23edSserge-sans-paille   static cl::opt<std::string> ABIName(
112ac1d23edSserge-sans-paille       "target-abi", cl::Hidden,
113ac1d23edSserge-sans-paille       cl::desc("The name of the ABI to be targeted from the backend."),
114ac1d23edSserge-sans-paille       cl::init(""));
115ac1d23edSserge-sans-paille   MCBINDOPT(ABIName);
116ac1d23edSserge-sans-paille 
117ac1d23edSserge-sans-paille #undef MCBINDOPT
118ac1d23edSserge-sans-paille }
119ac1d23edSserge-sans-paille 
InitMCTargetOptionsFromFlags()120ac1d23edSserge-sans-paille MCTargetOptions llvm::mc::InitMCTargetOptionsFromFlags() {
121ac1d23edSserge-sans-paille   MCTargetOptions Options;
122ac1d23edSserge-sans-paille   Options.MCRelaxAll = getRelaxAll();
123ac1d23edSserge-sans-paille   Options.MCIncrementalLinkerCompatible = getIncrementalLinkerCompatible();
124a8ec9de4SIgor Kudrin   Options.Dwarf64 = getDwarf64();
125ac1d23edSserge-sans-paille   Options.DwarfVersion = getDwarfVersion();
126ac1d23edSserge-sans-paille   Options.ShowMCInst = getShowMCInst();
127ac1d23edSserge-sans-paille   Options.ABIName = getABIName();
128ac1d23edSserge-sans-paille   Options.MCFatalWarnings = getFatalWarnings();
129ac1d23edSserge-sans-paille   Options.MCNoWarn = getNoWarn();
130ac1d23edSserge-sans-paille   Options.MCNoDeprecatedWarn = getNoDeprecatedWarn();
1319647a6f7SWouter van Oortmerssen   Options.MCNoTypeCheck = getNoTypeCheck();
132*d4bcb45dSJez Ng   Options.EmitDwarfUnwind = getEmitDwarfUnwind();
133*d4bcb45dSJez Ng 
134ac1d23edSserge-sans-paille   return Options;
135ac1d23edSserge-sans-paille }
136