1 //===-- WebAssemblyAsmPrinter.cpp - WebAssembly LLVM assembly writer ------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 ///
10 /// \file
11 /// \brief This file contains a printer that converts from our internal
12 /// representation of machine-dependent LLVM code to the WebAssembly assembly
13 /// language.
14 ///
15 //===----------------------------------------------------------------------===//
16 
17 #include "WebAssembly.h"
18 #include "InstPrinter/WebAssemblyInstPrinter.h"
19 #include "MCTargetDesc/WebAssemblyMCTargetDesc.h"
20 #include "WebAssemblyMCInstLower.h"
21 #include "WebAssemblyMachineFunctionInfo.h"
22 #include "WebAssemblyRegisterInfo.h"
23 #include "WebAssemblySubtarget.h"
24 #include "llvm/ADT/SmallString.h"
25 #include "llvm/ADT/StringExtras.h"
26 #include "llvm/CodeGen/Analysis.h"
27 #include "llvm/CodeGen/AsmPrinter.h"
28 #include "llvm/CodeGen/MachineConstantPool.h"
29 #include "llvm/CodeGen/MachineInstr.h"
30 #include "llvm/IR/DataLayout.h"
31 #include "llvm/MC/MCContext.h"
32 #include "llvm/MC/MCStreamer.h"
33 #include "llvm/MC/MCSymbol.h"
34 #include "llvm/Support/Debug.h"
35 #include "llvm/Support/TargetRegistry.h"
36 #include "llvm/Support/raw_ostream.h"
37 
38 using namespace llvm;
39 
40 #define DEBUG_TYPE "asm-printer"
41 
42 namespace {
43 
44 class WebAssemblyAsmPrinter final : public AsmPrinter {
45   const MachineRegisterInfo *MRI;
46   const WebAssemblyFunctionInfo *MFI;
47 
48 public:
49   WebAssemblyAsmPrinter(TargetMachine &TM, std::unique_ptr<MCStreamer> Streamer)
50       : AsmPrinter(TM, std::move(Streamer)), MRI(nullptr), MFI(nullptr) {}
51 
52 private:
53   const char *getPassName() const override {
54     return "WebAssembly Assembly Printer";
55   }
56 
57   //===------------------------------------------------------------------===//
58   // MachineFunctionPass Implementation.
59   //===------------------------------------------------------------------===//
60 
61   void getAnalysisUsage(AnalysisUsage &AU) const override {
62     AsmPrinter::getAnalysisUsage(AU);
63   }
64 
65   bool runOnMachineFunction(MachineFunction &MF) override {
66     MRI = &MF.getRegInfo();
67     MFI = MF.getInfo<WebAssemblyFunctionInfo>();
68     return AsmPrinter::runOnMachineFunction(MF);
69   }
70 
71   //===------------------------------------------------------------------===//
72   // AsmPrinter Implementation.
73   //===------------------------------------------------------------------===//
74 
75   void EmitJumpTableInfo() override;
76   void EmitConstantPool() override;
77   void EmitFunctionBodyStart() override;
78   void EmitInstruction(const MachineInstr *MI) override;
79   void EmitEndOfAsmFile(Module &M) override;
80   bool PrintAsmOperand(const MachineInstr *MI, unsigned OpNo,
81                        unsigned AsmVariant, const char *ExtraCode,
82                        raw_ostream &OS) override;
83   bool PrintAsmMemoryOperand(const MachineInstr *MI, unsigned OpNo,
84                              unsigned AsmVariant, const char *ExtraCode,
85                              raw_ostream &OS) override;
86 
87   std::string getRegTypeName(unsigned RegNo) const;
88   const char *toString(MVT VT) const;
89   std::string regToString(const MachineOperand &MO);
90 };
91 
92 } // end anonymous namespace
93 
94 //===----------------------------------------------------------------------===//
95 // Helpers.
96 //===----------------------------------------------------------------------===//
97 
98 std::string WebAssemblyAsmPrinter::getRegTypeName(unsigned RegNo) const {
99   const TargetRegisterClass *TRC = MRI->getRegClass(RegNo);
100   for (MVT T : {MVT::i32, MVT::i64, MVT::f32, MVT::f64})
101     if (TRC->hasType(T))
102       return EVT(T).getEVTString();
103   DEBUG(errs() << "Unknown type for register number: " << RegNo);
104   llvm_unreachable("Unknown register type");
105   return "?";
106 }
107 
108 std::string WebAssemblyAsmPrinter::regToString(const MachineOperand &MO) {
109   unsigned RegNo = MO.getReg();
110   if (TargetRegisterInfo::isPhysicalRegister(RegNo))
111     return WebAssemblyInstPrinter::getRegisterName(RegNo);
112 
113   unsigned WAReg = MFI->getWAReg(RegNo);
114   assert(WAReg != WebAssemblyFunctionInfo::UnusedReg);
115   return utostr(WAReg);
116 }
117 
118 const char *WebAssemblyAsmPrinter::toString(MVT VT) const {
119   switch (VT.SimpleTy) {
120   default:
121     break;
122   case MVT::f32:
123     return "f32";
124   case MVT::f64:
125     return "f64";
126   case MVT::i32:
127     return "i32";
128   case MVT::i64:
129     return "i64";
130   }
131   DEBUG(dbgs() << "Invalid type " << EVT(VT).getEVTString() << '\n');
132   llvm_unreachable("invalid type");
133   return "<invalid>";
134 }
135 
136 //===----------------------------------------------------------------------===//
137 // WebAssemblyAsmPrinter Implementation.
138 //===----------------------------------------------------------------------===//
139 
140 void WebAssemblyAsmPrinter::EmitConstantPool() {
141   assert(MF->getConstantPool()->getConstants().empty() &&
142          "WebAssembly disables constant pools");
143 }
144 
145 void WebAssemblyAsmPrinter::EmitJumpTableInfo() {
146   // Nothing to do; jump tables are incorporated into the instruction stream.
147 }
148 
149 static void ComputeLegalValueVTs(const Function &F,
150                                  const TargetMachine &TM,
151                                  Type *Ty,
152                                  SmallVectorImpl<MVT> &ValueVTs) {
153   const DataLayout& DL(F.getParent()->getDataLayout());
154   const WebAssemblyTargetLowering &TLI =
155       *TM.getSubtarget<WebAssemblySubtarget>(F).getTargetLowering();
156   SmallVector<EVT, 4> VTs;
157   ComputeValueVTs(TLI, DL, Ty, VTs);
158 
159   for (EVT VT : VTs) {
160     unsigned NumRegs = TLI.getNumRegisters(F.getContext(), VT);
161     MVT RegisterVT = TLI.getRegisterType(F.getContext(), VT);
162     for (unsigned i = 0; i != NumRegs; ++i)
163       ValueVTs.push_back(RegisterVT);
164   }
165 }
166 
167 void WebAssemblyAsmPrinter::EmitFunctionBodyStart() {
168   SmallString<128> Str;
169   raw_svector_ostream OS(Str);
170 
171   for (MVT VT : MFI->getParams())
172     OS << "\t" ".param " << toString(VT) << '\n';
173 
174   SmallVector<MVT, 4> ResultVTs;
175   const Function &F(*MF->getFunction());
176   ComputeLegalValueVTs(F, TM, F.getReturnType(), ResultVTs);
177   // If the return type needs to be legalized it will get converted into
178   // passing a pointer.
179   if (ResultVTs.size() == 1)
180     OS << "\t" ".result " << toString(ResultVTs.front()) << '\n';
181 
182   bool FirstVReg = true;
183   for (unsigned Idx = 0, IdxE = MRI->getNumVirtRegs(); Idx != IdxE; ++Idx) {
184     unsigned VReg = TargetRegisterInfo::index2VirtReg(Idx);
185     if (!MRI->use_empty(VReg)) {
186       if (FirstVReg)
187         OS << "\t" ".local ";
188       else
189         OS << ", ";
190       OS << getRegTypeName(VReg);
191       FirstVReg = false;
192     }
193   }
194   if (!FirstVReg)
195     OS << '\n';
196 
197   // EmitRawText appends a newline, so strip off the last newline.
198   StringRef Text = OS.str();
199   if (!Text.empty())
200     OutStreamer->EmitRawText(Text.substr(0, Text.size() - 1));
201   AsmPrinter::EmitFunctionBodyStart();
202 }
203 
204 void WebAssemblyAsmPrinter::EmitInstruction(const MachineInstr *MI) {
205   DEBUG(dbgs() << "EmitInstruction: " << *MI << '\n');
206 
207   assert(MI->getDesc().getNumDefs() <= 1 &&
208          "Instructions with multiple result values not implemented");
209 
210   switch (MI->getOpcode()) {
211   case TargetOpcode::COPY: {
212     // TODO: Figure out a way to lower COPY instructions to MCInst form.
213     SmallString<128> Str;
214     raw_svector_ostream OS(Str);
215     OS << "\t" "set_local " << regToString(MI->getOperand(0)) << ", "
216                "(get_local " << regToString(MI->getOperand(1)) << ")";
217     OutStreamer->EmitRawText(OS.str());
218     break;
219   }
220   case WebAssembly::ARGUMENT_I32:
221   case WebAssembly::ARGUMENT_I64:
222   case WebAssembly::ARGUMENT_F32:
223   case WebAssembly::ARGUMENT_F64:
224     // These represent values which are live into the function entry, so there's
225     // no instruction to emit.
226     break;
227   default: {
228     WebAssemblyMCInstLower MCInstLowering(OutContext, *this);
229     MCInst TmpInst;
230     MCInstLowering.Lower(MI, TmpInst);
231     EmitToStreamer(*OutStreamer, TmpInst);
232     break;
233   }
234   }
235 }
236 
237 
238 
239 void WebAssemblyAsmPrinter::EmitEndOfAsmFile(Module &M) {
240   const DataLayout &DL = M.getDataLayout();
241 
242   SmallString<128> Str;
243   raw_svector_ostream OS(Str);
244   for (const Function &F : M)
245     if (F.isDeclarationForLinker()) {
246       assert(F.hasName() && "imported functions must have a name");
247       if (F.isIntrinsic())
248         continue;
249       if (Str.empty())
250         OS << "\t.imports\n";
251 
252       MCSymbol *Sym = OutStreamer->getContext().getOrCreateSymbol(F.getName());
253       OS << "\t.import " << *Sym << " \"\" " << *Sym;
254 
255       const WebAssemblyTargetLowering &TLI =
256           *TM.getSubtarget<WebAssemblySubtarget>(F).getTargetLowering();
257 
258       // If we need to legalize the return type, it'll get converted into
259       // passing a pointer.
260       bool SawParam = false;
261       SmallVector<MVT, 4> ResultVTs;
262       ComputeLegalValueVTs(F, TM, F.getReturnType(), ResultVTs);
263       if (ResultVTs.size() > 1) {
264         ResultVTs.clear();
265         OS << " (param " << toString(TLI.getPointerTy(DL));
266         SawParam = true;
267       }
268 
269       for (const Argument &A : F.args()) {
270         SmallVector<MVT, 4> ParamVTs;
271         ComputeLegalValueVTs(F, TM, A.getType(), ParamVTs);
272         for (MVT VT : ParamVTs) {
273           if (!SawParam) {
274             OS << " (param";
275             SawParam = true;
276           }
277           OS << ' ' << toString(VT);
278         }
279       }
280       if (SawParam)
281         OS << ')';
282 
283       for (MVT VT : ResultVTs)
284         OS << " (result " << toString(VT) << ')';
285 
286       OS << '\n';
287     }
288 
289   StringRef Text = OS.str();
290   if (!Text.empty())
291     OutStreamer->EmitRawText(Text.substr(0, Text.size() - 1));
292 }
293 
294 bool WebAssemblyAsmPrinter::PrintAsmOperand(const MachineInstr *MI,
295                                             unsigned OpNo, unsigned AsmVariant,
296                                             const char *ExtraCode,
297                                             raw_ostream &OS) {
298   if (AsmVariant != 0)
299     report_fatal_error("There are no defined alternate asm variants");
300 
301   if (!ExtraCode) {
302     const MachineOperand &MO = MI->getOperand(OpNo);
303     if (MO.isImm())
304       OS << MO.getImm();
305     else
306       OS << regToString(MO);
307     return false;
308   }
309 
310   return AsmPrinter::PrintAsmOperand(MI, OpNo, AsmVariant, ExtraCode, OS);
311 }
312 
313 bool WebAssemblyAsmPrinter::PrintAsmMemoryOperand(const MachineInstr *MI,
314                                                   unsigned OpNo,
315                                                   unsigned AsmVariant,
316                                                   const char *ExtraCode,
317                                                   raw_ostream &OS) {
318   if (AsmVariant != 0)
319     report_fatal_error("There are no defined alternate asm variants");
320 
321   if (!ExtraCode) {
322     OS << regToString(MI->getOperand(OpNo));
323     return false;
324   }
325 
326   return AsmPrinter::PrintAsmMemoryOperand(MI, OpNo, AsmVariant, ExtraCode, OS);
327 }
328 
329 // Force static initialization.
330 extern "C" void LLVMInitializeWebAssemblyAsmPrinter() {
331   RegisterAsmPrinter<WebAssemblyAsmPrinter> X(TheWebAssemblyTarget32);
332   RegisterAsmPrinter<WebAssemblyAsmPrinter> Y(TheWebAssemblyTarget64);
333 }
334