1 | //===- MipsAsmPrinter.cpp - Mips LLVM Assembly Printer --------------------===// |
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 | // This file contains a printer that converts from our internal representation |
10 | // of machine-dependent LLVM code to GAS-format MIPS assembly language. |
11 | // |
12 | //===----------------------------------------------------------------------===// |
13 | |
14 | #include "MipsAsmPrinter.h" |
15 | #include "MCTargetDesc/MipsABIInfo.h" |
16 | #include "MCTargetDesc/MipsBaseInfo.h" |
17 | #include "MCTargetDesc/MipsInstPrinter.h" |
18 | #include "MCTargetDesc/MipsMCAsmInfo.h" |
19 | #include "MCTargetDesc/MipsMCNaCl.h" |
20 | #include "MCTargetDesc/MipsMCTargetDesc.h" |
21 | #include "MCTargetDesc/MipsTargetStreamer.h" |
22 | #include "Mips.h" |
23 | #include "MipsMCInstLower.h" |
24 | #include "MipsMachineFunction.h" |
25 | #include "MipsSubtarget.h" |
26 | #include "MipsTargetMachine.h" |
27 | #include "TargetInfo/MipsTargetInfo.h" |
28 | #include "llvm/ADT/SmallString.h" |
29 | #include "llvm/ADT/StringRef.h" |
30 | #include "llvm/ADT/Twine.h" |
31 | #include "llvm/BinaryFormat/ELF.h" |
32 | #include "llvm/CodeGen/MachineBasicBlock.h" |
33 | #include "llvm/CodeGen/MachineConstantPool.h" |
34 | #include "llvm/CodeGen/MachineFrameInfo.h" |
35 | #include "llvm/CodeGen/MachineFunction.h" |
36 | #include "llvm/CodeGen/MachineInstr.h" |
37 | #include "llvm/CodeGen/MachineJumpTableInfo.h" |
38 | #include "llvm/CodeGen/MachineOperand.h" |
39 | #include "llvm/CodeGen/TargetRegisterInfo.h" |
40 | #include "llvm/CodeGen/TargetSubtargetInfo.h" |
41 | #include "llvm/IR/Attributes.h" |
42 | #include "llvm/IR/BasicBlock.h" |
43 | #include "llvm/IR/DataLayout.h" |
44 | #include "llvm/IR/Function.h" |
45 | #include "llvm/IR/InlineAsm.h" |
46 | #include "llvm/IR/Instructions.h" |
47 | #include "llvm/IR/Module.h" |
48 | #include "llvm/MC/MCContext.h" |
49 | #include "llvm/MC/MCExpr.h" |
50 | #include "llvm/MC/MCInst.h" |
51 | #include "llvm/MC/MCInstBuilder.h" |
52 | #include "llvm/MC/MCObjectFileInfo.h" |
53 | #include "llvm/MC/MCSectionELF.h" |
54 | #include "llvm/MC/MCSymbol.h" |
55 | #include "llvm/MC/MCSymbolELF.h" |
56 | #include "llvm/MC/TargetRegistry.h" |
57 | #include "llvm/Support/Casting.h" |
58 | #include "llvm/Support/Compiler.h" |
59 | #include "llvm/Support/ErrorHandling.h" |
60 | #include "llvm/Support/raw_ostream.h" |
61 | #include "llvm/Target/TargetLoweringObjectFile.h" |
62 | #include "llvm/Target/TargetMachine.h" |
63 | #include "llvm/TargetParser/Triple.h" |
64 | #include <cassert> |
65 | #include <cstdint> |
66 | #include <map> |
67 | #include <memory> |
68 | #include <string> |
69 | #include <vector> |
70 | |
71 | using namespace llvm; |
72 | |
73 | #define DEBUG_TYPE "mips-asm-printer" |
74 | |
75 | extern cl::opt<bool> EmitJalrReloc; |
76 | |
77 | MipsTargetStreamer &MipsAsmPrinter::getTargetStreamer() const { |
78 | return static_cast<MipsTargetStreamer &>(*OutStreamer->getTargetStreamer()); |
79 | } |
80 | |
81 | bool MipsAsmPrinter::runOnMachineFunction(MachineFunction &MF) { |
82 | Subtarget = &MF.getSubtarget<MipsSubtarget>(); |
83 | |
84 | MipsFI = MF.getInfo<MipsFunctionInfo>(); |
85 | if (Subtarget->inMips16Mode()) |
86 | for (const auto &I : MipsFI->StubsNeeded) |
87 | StubsNeeded.insert(x: I); |
88 | MCP = MF.getConstantPool(); |
89 | |
90 | // In NaCl, all indirect jump targets must be aligned to bundle size. |
91 | if (Subtarget->isTargetNaCl()) |
92 | NaClAlignIndirectJumpTargets(MF); |
93 | |
94 | AsmPrinter::runOnMachineFunction(MF); |
95 | |
96 | emitXRayTable(); |
97 | |
98 | return true; |
99 | } |
100 | |
101 | bool MipsAsmPrinter::lowerOperand(const MachineOperand &MO, MCOperand &MCOp) { |
102 | MCOp = MCInstLowering.LowerOperand(MO); |
103 | return MCOp.isValid(); |
104 | } |
105 | |
106 | #include "MipsGenMCPseudoLowering.inc" |
107 | |
108 | // Lower PseudoReturn/PseudoIndirectBranch/PseudoIndirectBranch64 to JR, JR_MM, |
109 | // JALR, or JALR64 as appropriate for the target. |
110 | void MipsAsmPrinter::emitPseudoIndirectBranch(MCStreamer &OutStreamer, |
111 | const MachineInstr *MI) { |
112 | bool HasLinkReg = false; |
113 | bool InMicroMipsMode = Subtarget->inMicroMipsMode(); |
114 | MCInst TmpInst0; |
115 | |
116 | if (Subtarget->hasMips64r6()) { |
117 | // MIPS64r6 should use (JALR64 ZERO_64, $rs) |
118 | TmpInst0.setOpcode(Mips::JALR64); |
119 | HasLinkReg = true; |
120 | } else if (Subtarget->hasMips32r6()) { |
121 | // MIPS32r6 should use (JALR ZERO, $rs) |
122 | if (InMicroMipsMode) |
123 | TmpInst0.setOpcode(Mips::JRC16_MMR6); |
124 | else { |
125 | TmpInst0.setOpcode(Mips::JALR); |
126 | HasLinkReg = true; |
127 | } |
128 | } else if (Subtarget->inMicroMipsMode()) |
129 | // microMIPS should use (JR_MM $rs) |
130 | TmpInst0.setOpcode(Mips::JR_MM); |
131 | else { |
132 | // Everything else should use (JR $rs) |
133 | TmpInst0.setOpcode(Mips::JR); |
134 | } |
135 | |
136 | MCOperand MCOp; |
137 | |
138 | if (HasLinkReg) { |
139 | unsigned ZeroReg = Subtarget->isGP64bit() ? Mips::ZERO_64 : Mips::ZERO; |
140 | TmpInst0.addOperand(Op: MCOperand::createReg(Reg: ZeroReg)); |
141 | } |
142 | |
143 | lowerOperand(MO: MI->getOperand(i: 0), MCOp); |
144 | TmpInst0.addOperand(Op: MCOp); |
145 | |
146 | EmitToStreamer(S&: OutStreamer, Inst: TmpInst0); |
147 | } |
148 | |
149 | // If there is an MO_JALR operand, insert: |
150 | // |
151 | // .reloc tmplabel, R_{MICRO}MIPS_JALR, symbol |
152 | // tmplabel: |
153 | // |
154 | // This is an optimization hint for the linker which may then replace |
155 | // an indirect call with a direct branch. |
156 | static void emitDirectiveRelocJalr(const MachineInstr &MI, |
157 | MCContext &OutContext, |
158 | TargetMachine &TM, |
159 | MCStreamer &OutStreamer, |
160 | const MipsSubtarget &Subtarget) { |
161 | for (const MachineOperand &MO : |
162 | llvm::drop_begin(RangeOrContainer: MI.operands(), N: MI.getDesc().getNumOperands())) { |
163 | if (MO.isMCSymbol() && (MO.getTargetFlags() & MipsII::MO_JALR)) { |
164 | MCSymbol *Callee = MO.getMCSymbol(); |
165 | if (Callee && !Callee->getName().empty()) { |
166 | MCSymbol *OffsetLabel = OutContext.createTempSymbol(); |
167 | const MCExpr *OffsetExpr = |
168 | MCSymbolRefExpr::create(Symbol: OffsetLabel, Ctx&: OutContext); |
169 | const MCExpr *CaleeExpr = |
170 | MCSymbolRefExpr::create(Symbol: Callee, Ctx&: OutContext); |
171 | OutStreamer.emitRelocDirective( |
172 | Offset: *OffsetExpr, |
173 | Name: Subtarget.inMicroMipsMode() ? "R_MICROMIPS_JALR" : "R_MIPS_JALR" , |
174 | Expr: CaleeExpr, Loc: SMLoc(), STI: *TM.getMCSubtargetInfo()); |
175 | OutStreamer.emitLabel(Symbol: OffsetLabel); |
176 | return; |
177 | } |
178 | } |
179 | } |
180 | } |
181 | |
182 | void MipsAsmPrinter::emitInstruction(const MachineInstr *MI) { |
183 | // FIXME: Enable feature predicate checks once all the test pass. |
184 | // Mips_MC::verifyInstructionPredicates(MI->getOpcode(), |
185 | // getSubtargetInfo().getFeatureBits()); |
186 | |
187 | MipsTargetStreamer &TS = getTargetStreamer(); |
188 | unsigned Opc = MI->getOpcode(); |
189 | TS.forbidModuleDirective(); |
190 | |
191 | if (MI->isDebugValue()) { |
192 | SmallString<128> Str; |
193 | raw_svector_ostream OS(Str); |
194 | |
195 | PrintDebugValueComment(MI, OS); |
196 | return; |
197 | } |
198 | if (MI->isDebugLabel()) |
199 | return; |
200 | |
201 | // If we just ended a constant pool, mark it as such. |
202 | if (InConstantPool && Opc != Mips::CONSTPOOL_ENTRY) { |
203 | OutStreamer->emitDataRegion(Kind: MCDR_DataRegionEnd); |
204 | InConstantPool = false; |
205 | } |
206 | if (Opc == Mips::CONSTPOOL_ENTRY) { |
207 | // CONSTPOOL_ENTRY - This instruction represents a floating |
208 | // constant pool in the function. The first operand is the ID# |
209 | // for this instruction, the second is the index into the |
210 | // MachineConstantPool that this is, the third is the size in |
211 | // bytes of this constant pool entry. |
212 | // The required alignment is specified on the basic block holding this MI. |
213 | // |
214 | unsigned LabelId = (unsigned)MI->getOperand(i: 0).getImm(); |
215 | unsigned CPIdx = (unsigned)MI->getOperand(i: 1).getIndex(); |
216 | |
217 | // If this is the first entry of the pool, mark it. |
218 | if (!InConstantPool) { |
219 | OutStreamer->emitDataRegion(Kind: MCDR_DataRegion); |
220 | InConstantPool = true; |
221 | } |
222 | |
223 | OutStreamer->emitLabel(Symbol: GetCPISymbol(CPID: LabelId)); |
224 | |
225 | const MachineConstantPoolEntry &MCPE = MCP->getConstants()[CPIdx]; |
226 | if (MCPE.isMachineConstantPoolEntry()) |
227 | emitMachineConstantPoolValue(MCPV: MCPE.Val.MachineCPVal); |
228 | else |
229 | emitGlobalConstant(DL: MF->getDataLayout(), CV: MCPE.Val.ConstVal); |
230 | return; |
231 | } |
232 | |
233 | switch (Opc) { |
234 | case Mips::PATCHABLE_FUNCTION_ENTER: |
235 | LowerPATCHABLE_FUNCTION_ENTER(MI: *MI); |
236 | return; |
237 | case Mips::PATCHABLE_FUNCTION_EXIT: |
238 | LowerPATCHABLE_FUNCTION_EXIT(MI: *MI); |
239 | return; |
240 | case Mips::PATCHABLE_TAIL_CALL: |
241 | LowerPATCHABLE_TAIL_CALL(MI: *MI); |
242 | return; |
243 | } |
244 | |
245 | if (EmitJalrReloc && |
246 | (MI->isReturn() || MI->isCall() || MI->isIndirectBranch())) { |
247 | emitDirectiveRelocJalr(MI: *MI, OutContext, TM, OutStreamer&: *OutStreamer, Subtarget: *Subtarget); |
248 | } |
249 | |
250 | MachineBasicBlock::const_instr_iterator I = MI->getIterator(); |
251 | MachineBasicBlock::const_instr_iterator E = MI->getParent()->instr_end(); |
252 | |
253 | do { |
254 | // Do any auto-generated pseudo lowerings. |
255 | if (MCInst OutInst; lowerPseudoInstExpansion(MI: &*I, Inst&: OutInst)) { |
256 | EmitToStreamer(S&: *OutStreamer, Inst: OutInst); |
257 | continue; |
258 | } |
259 | |
260 | // Skip the BUNDLE pseudo instruction and lower the contents |
261 | if (I->isBundle()) |
262 | continue; |
263 | |
264 | if (I->getOpcode() == Mips::PseudoReturn || |
265 | I->getOpcode() == Mips::PseudoReturn64 || |
266 | I->getOpcode() == Mips::PseudoIndirectBranch || |
267 | I->getOpcode() == Mips::PseudoIndirectBranch64 || |
268 | I->getOpcode() == Mips::TAILCALLREG || |
269 | I->getOpcode() == Mips::TAILCALLREG64) { |
270 | emitPseudoIndirectBranch(OutStreamer&: *OutStreamer, MI: &*I); |
271 | continue; |
272 | } |
273 | |
274 | // The inMips16Mode() test is not permanent. |
275 | // Some instructions are marked as pseudo right now which |
276 | // would make the test fail for the wrong reason but |
277 | // that will be fixed soon. We need this here because we are |
278 | // removing another test for this situation downstream in the |
279 | // callchain. |
280 | // |
281 | if (I->isPseudo() && !Subtarget->inMips16Mode() |
282 | && !isLongBranchPseudo(Opcode: I->getOpcode())) |
283 | llvm_unreachable("Pseudo opcode found in emitInstruction()" ); |
284 | |
285 | MCInst TmpInst0; |
286 | MCInstLowering.Lower(MI: &*I, OutMI&: TmpInst0); |
287 | EmitToStreamer(S&: *OutStreamer, Inst: TmpInst0); |
288 | } while ((++I != E) && I->isInsideBundle()); // Delay slot check |
289 | } |
290 | |
291 | //===----------------------------------------------------------------------===// |
292 | // |
293 | // Mips Asm Directives |
294 | // |
295 | // -- Frame directive "frame Stackpointer, Stacksize, RARegister" |
296 | // Describe the stack frame. |
297 | // |
298 | // -- Mask directives "(f)mask bitmask, offset" |
299 | // Tells the assembler which registers are saved and where. |
300 | // bitmask - contain a little endian bitset indicating which registers are |
301 | // saved on function prologue (e.g. with a 0x80000000 mask, the |
302 | // assembler knows the register 31 (RA) is saved at prologue. |
303 | // offset - the position before stack pointer subtraction indicating where |
304 | // the first saved register on prologue is located. (e.g. with a |
305 | // |
306 | // Consider the following function prologue: |
307 | // |
308 | // .frame $fp,48,$ra |
309 | // .mask 0xc0000000,-8 |
310 | // addiu $sp, $sp, -48 |
311 | // sw $ra, 40($sp) |
312 | // sw $fp, 36($sp) |
313 | // |
314 | // With a 0xc0000000 mask, the assembler knows the register 31 (RA) and |
315 | // 30 (FP) are saved at prologue. As the save order on prologue is from |
316 | // left to right, RA is saved first. A -8 offset means that after the |
317 | // stack pointer subtration, the first register in the mask (RA) will be |
318 | // saved at address 48-8=40. |
319 | // |
320 | //===----------------------------------------------------------------------===// |
321 | |
322 | //===----------------------------------------------------------------------===// |
323 | // Mask directives |
324 | //===----------------------------------------------------------------------===// |
325 | |
326 | // Create a bitmask with all callee saved registers for CPU or Floating Point |
327 | // registers. For CPU registers consider RA, GP and FP for saving if necessary. |
328 | void MipsAsmPrinter::printSavedRegsBitmask() { |
329 | // CPU and FPU Saved Registers Bitmasks |
330 | unsigned CPUBitmask = 0, FPUBitmask = 0; |
331 | int CPUTopSavedRegOff, FPUTopSavedRegOff; |
332 | |
333 | // Set the CPU and FPU Bitmasks |
334 | const MachineFrameInfo &MFI = MF->getFrameInfo(); |
335 | const TargetRegisterInfo *TRI = MF->getSubtarget().getRegisterInfo(); |
336 | const std::vector<CalleeSavedInfo> &CSI = MFI.getCalleeSavedInfo(); |
337 | // size of stack area to which FP callee-saved regs are saved. |
338 | unsigned CPURegSize = TRI->getRegSizeInBits(RC: Mips::GPR32RegClass) / 8; |
339 | unsigned FGR32RegSize = TRI->getRegSizeInBits(RC: Mips::FGR32RegClass) / 8; |
340 | unsigned AFGR64RegSize = TRI->getRegSizeInBits(RC: Mips::AFGR64RegClass) / 8; |
341 | bool HasAFGR64Reg = false; |
342 | unsigned CSFPRegsSize = 0; |
343 | |
344 | for (const auto &I : CSI) { |
345 | Register Reg = I.getReg(); |
346 | unsigned RegNum = TRI->getEncodingValue(Reg); |
347 | |
348 | // If it's a floating point register, set the FPU Bitmask. |
349 | // If it's a general purpose register, set the CPU Bitmask. |
350 | if (Mips::FGR32RegClass.contains(Reg)) { |
351 | FPUBitmask |= (1 << RegNum); |
352 | CSFPRegsSize += FGR32RegSize; |
353 | } else if (Mips::AFGR64RegClass.contains(Reg)) { |
354 | FPUBitmask |= (3 << RegNum); |
355 | CSFPRegsSize += AFGR64RegSize; |
356 | HasAFGR64Reg = true; |
357 | } else if (Mips::GPR32RegClass.contains(Reg)) |
358 | CPUBitmask |= (1 << RegNum); |
359 | } |
360 | |
361 | // FP Regs are saved right below where the virtual frame pointer points to. |
362 | FPUTopSavedRegOff = FPUBitmask ? |
363 | (HasAFGR64Reg ? -AFGR64RegSize : -FGR32RegSize) : 0; |
364 | |
365 | // CPU Regs are saved below FP Regs. |
366 | CPUTopSavedRegOff = CPUBitmask ? -CSFPRegsSize - CPURegSize : 0; |
367 | |
368 | MipsTargetStreamer &TS = getTargetStreamer(); |
369 | // Print CPUBitmask |
370 | TS.emitMask(CPUBitmask, CPUTopSavedRegOff); |
371 | |
372 | // Print FPUBitmask |
373 | TS.emitFMask(FPUBitmask, FPUTopSavedRegOff); |
374 | } |
375 | |
376 | //===----------------------------------------------------------------------===// |
377 | // Frame and Set directives |
378 | //===----------------------------------------------------------------------===// |
379 | |
380 | /// Frame Directive |
381 | void MipsAsmPrinter::emitFrameDirective() { |
382 | const TargetRegisterInfo &RI = *MF->getSubtarget().getRegisterInfo(); |
383 | |
384 | Register stackReg = RI.getFrameRegister(MF: *MF); |
385 | MCRegister returnReg = RI.getRARegister(); |
386 | unsigned stackSize = MF->getFrameInfo().getStackSize(); |
387 | |
388 | getTargetStreamer().emitFrame(StackReg: stackReg, StackSize: stackSize, ReturnReg: returnReg); |
389 | } |
390 | |
391 | /// Emit Set directives. |
392 | const char *MipsAsmPrinter::getCurrentABIString() const { |
393 | switch (static_cast<MipsTargetMachine &>(TM).getABI().GetEnumValue()) { |
394 | case MipsABIInfo::ABI::O32: return "abi32" ; |
395 | case MipsABIInfo::ABI::N32: return "abiN32" ; |
396 | case MipsABIInfo::ABI::N64: return "abi64" ; |
397 | default: llvm_unreachable("Unknown Mips ABI" ); |
398 | } |
399 | } |
400 | |
401 | void MipsAsmPrinter::emitFunctionEntryLabel() { |
402 | MipsTargetStreamer &TS = getTargetStreamer(); |
403 | |
404 | // NaCl sandboxing requires that indirect call instructions are masked. |
405 | // This means that function entry points should be bundle-aligned. |
406 | if (Subtarget->isTargetNaCl()) |
407 | emitAlignment(Alignment: std::max(a: MF->getAlignment(), b: MIPS_NACL_BUNDLE_ALIGN)); |
408 | |
409 | if (Subtarget->inMicroMipsMode()) { |
410 | TS.emitDirectiveSetMicroMips(); |
411 | TS.setUsesMicroMips(); |
412 | TS.updateABIInfo(P: *Subtarget); |
413 | } else |
414 | TS.emitDirectiveSetNoMicroMips(); |
415 | |
416 | if (Subtarget->inMips16Mode()) |
417 | TS.emitDirectiveSetMips16(); |
418 | else |
419 | TS.emitDirectiveSetNoMips16(); |
420 | |
421 | TS.emitDirectiveEnt(Symbol: *CurrentFnSym); |
422 | OutStreamer->emitLabel(Symbol: CurrentFnSym); |
423 | } |
424 | |
425 | /// EmitFunctionBodyStart - Targets can override this to emit stuff before |
426 | /// the first basic block in the function. |
427 | void MipsAsmPrinter::emitFunctionBodyStart() { |
428 | MipsTargetStreamer &TS = getTargetStreamer(); |
429 | |
430 | MCInstLowering.Initialize(C: &MF->getContext()); |
431 | |
432 | bool IsNakedFunction = MF->getFunction().hasFnAttribute(Kind: Attribute::Naked); |
433 | if (!IsNakedFunction) |
434 | emitFrameDirective(); |
435 | |
436 | if (!IsNakedFunction) |
437 | printSavedRegsBitmask(); |
438 | |
439 | if (!Subtarget->inMips16Mode()) { |
440 | TS.emitDirectiveSetNoReorder(); |
441 | TS.emitDirectiveSetNoMacro(); |
442 | TS.emitDirectiveSetNoAt(); |
443 | } |
444 | } |
445 | |
446 | /// EmitFunctionBodyEnd - Targets can override this to emit stuff after |
447 | /// the last basic block in the function. |
448 | void MipsAsmPrinter::emitFunctionBodyEnd() { |
449 | MipsTargetStreamer &TS = getTargetStreamer(); |
450 | |
451 | // There are instruction for this macros, but they must |
452 | // always be at the function end, and we can't emit and |
453 | // break with BB logic. |
454 | if (!Subtarget->inMips16Mode()) { |
455 | TS.emitDirectiveSetAt(); |
456 | TS.emitDirectiveSetMacro(); |
457 | TS.emitDirectiveSetReorder(); |
458 | } |
459 | TS.emitDirectiveEnd(Name: CurrentFnSym->getName()); |
460 | // Make sure to terminate any constant pools that were at the end |
461 | // of the function. |
462 | if (!InConstantPool) |
463 | return; |
464 | InConstantPool = false; |
465 | OutStreamer->emitDataRegion(Kind: MCDR_DataRegionEnd); |
466 | } |
467 | |
468 | void MipsAsmPrinter::emitBasicBlockEnd(const MachineBasicBlock &MBB) { |
469 | AsmPrinter::emitBasicBlockEnd(MBB); |
470 | MipsTargetStreamer &TS = getTargetStreamer(); |
471 | if (MBB.empty()) |
472 | TS.emitDirectiveInsn(); |
473 | } |
474 | |
475 | // Print out an operand for an inline asm expression. |
476 | bool MipsAsmPrinter::PrintAsmOperand(const MachineInstr *MI, unsigned OpNum, |
477 | const char *, raw_ostream &O) { |
478 | // Does this asm operand have a single letter operand modifier? |
479 | if (ExtraCode && ExtraCode[0]) { |
480 | if (ExtraCode[1] != 0) return true; // Unknown modifier. |
481 | |
482 | const MachineOperand &MO = MI->getOperand(i: OpNum); |
483 | switch (ExtraCode[0]) { |
484 | default: |
485 | // See if this is a generic print operand |
486 | return AsmPrinter::PrintAsmOperand(MI, OpNo: OpNum, ExtraCode, OS&: O); |
487 | case 'X': // hex const int |
488 | if (!MO.isImm()) |
489 | return true; |
490 | O << "0x" << Twine::utohexstr(Val: MO.getImm()); |
491 | return false; |
492 | case 'x': // hex const int (low 16 bits) |
493 | if (!MO.isImm()) |
494 | return true; |
495 | O << "0x" << Twine::utohexstr(Val: MO.getImm() & 0xffff); |
496 | return false; |
497 | case 'd': // decimal const int |
498 | if (!MO.isImm()) |
499 | return true; |
500 | O << MO.getImm(); |
501 | return false; |
502 | case 'm': // decimal const int minus 1 |
503 | if (!MO.isImm()) |
504 | return true; |
505 | O << MO.getImm() - 1; |
506 | return false; |
507 | case 'y': // exact log2 |
508 | if (!MO.isImm()) |
509 | return true; |
510 | if (!isPowerOf2_64(Value: MO.getImm())) |
511 | return true; |
512 | O << Log2_64(Value: MO.getImm()); |
513 | return false; |
514 | case 'z': |
515 | // $0 if zero, regular printing otherwise |
516 | if (MO.isImm() && MO.getImm() == 0) { |
517 | O << "$0" ; |
518 | return false; |
519 | } |
520 | // If not, call printOperand as normal. |
521 | break; |
522 | case 'D': // Second part of a double word register operand |
523 | case 'L': // Low order register of a double word register operand |
524 | case 'M': // High order register of a double word register operand |
525 | { |
526 | if (OpNum == 0) |
527 | return true; |
528 | const MachineOperand &FlagsOP = MI->getOperand(i: OpNum - 1); |
529 | if (!FlagsOP.isImm()) |
530 | return true; |
531 | const InlineAsm::Flag Flags(FlagsOP.getImm()); |
532 | const unsigned NumVals = Flags.getNumOperandRegisters(); |
533 | // Number of registers represented by this operand. We are looking |
534 | // for 2 for 32 bit mode and 1 for 64 bit mode. |
535 | if (NumVals != 2) { |
536 | if (Subtarget->isGP64bit() && NumVals == 1 && MO.isReg()) { |
537 | Register Reg = MO.getReg(); |
538 | O << '$' << MipsInstPrinter::getRegisterName(Reg); |
539 | return false; |
540 | } |
541 | return true; |
542 | } |
543 | |
544 | unsigned RegOp = OpNum; |
545 | if (!Subtarget->isGP64bit()){ |
546 | // Endianness reverses which register holds the high or low value |
547 | // between M and L. |
548 | switch(ExtraCode[0]) { |
549 | case 'M': |
550 | RegOp = (Subtarget->isLittle()) ? OpNum + 1 : OpNum; |
551 | break; |
552 | case 'L': |
553 | RegOp = (Subtarget->isLittle()) ? OpNum : OpNum + 1; |
554 | break; |
555 | case 'D': // Always the second part |
556 | RegOp = OpNum + 1; |
557 | } |
558 | if (RegOp >= MI->getNumOperands()) |
559 | return true; |
560 | const MachineOperand &MO = MI->getOperand(i: RegOp); |
561 | if (!MO.isReg()) |
562 | return true; |
563 | Register Reg = MO.getReg(); |
564 | O << '$' << MipsInstPrinter::getRegisterName(Reg); |
565 | return false; |
566 | } |
567 | break; |
568 | } |
569 | case 'w': { |
570 | MCRegister w = getMSARegFromFReg(Reg: MO.getReg()); |
571 | if (w != Mips::NoRegister) { |
572 | O << '$' << MipsInstPrinter::getRegisterName(Reg: w); |
573 | return false; |
574 | } |
575 | break; |
576 | } |
577 | } |
578 | } |
579 | |
580 | printOperand(MI, opNum: OpNum, O); |
581 | return false; |
582 | } |
583 | |
584 | bool MipsAsmPrinter::PrintAsmMemoryOperand(const MachineInstr *MI, |
585 | unsigned OpNum, |
586 | const char *, |
587 | raw_ostream &O) { |
588 | assert(OpNum + 1 < MI->getNumOperands() && "Insufficient operands" ); |
589 | const MachineOperand &BaseMO = MI->getOperand(i: OpNum); |
590 | const MachineOperand &OffsetMO = MI->getOperand(i: OpNum + 1); |
591 | assert(BaseMO.isReg() && |
592 | "Unexpected base pointer for inline asm memory operand." ); |
593 | assert(OffsetMO.isImm() && |
594 | "Unexpected offset for inline asm memory operand." ); |
595 | int Offset = OffsetMO.getImm(); |
596 | |
597 | // Currently we are expecting either no ExtraCode or 'D','M','L'. |
598 | if (ExtraCode) { |
599 | switch (ExtraCode[0]) { |
600 | case 'D': |
601 | Offset += 4; |
602 | break; |
603 | case 'M': |
604 | if (Subtarget->isLittle()) |
605 | Offset += 4; |
606 | break; |
607 | case 'L': |
608 | if (!Subtarget->isLittle()) |
609 | Offset += 4; |
610 | break; |
611 | default: |
612 | return true; // Unknown modifier. |
613 | } |
614 | } |
615 | |
616 | O << Offset << "($" << MipsInstPrinter::getRegisterName(Reg: BaseMO.getReg()) |
617 | << ")" ; |
618 | |
619 | return false; |
620 | } |
621 | |
622 | void MipsAsmPrinter::printOperand(const MachineInstr *MI, int opNum, |
623 | raw_ostream &O) { |
624 | const MachineOperand &MO = MI->getOperand(i: opNum); |
625 | bool closeP = false; |
626 | |
627 | if (MO.getTargetFlags()) |
628 | closeP = true; |
629 | |
630 | switch(MO.getTargetFlags()) { |
631 | case MipsII::MO_GPREL: O << "%gp_rel(" ; break; |
632 | case MipsII::MO_GOT_CALL: O << "%call16(" ; break; |
633 | case MipsII::MO_GOT: O << "%got(" ; break; |
634 | case MipsII::MO_ABS_HI: O << "%hi(" ; break; |
635 | case MipsII::MO_ABS_LO: O << "%lo(" ; break; |
636 | case MipsII::MO_HIGHER: O << "%higher(" ; break; |
637 | case MipsII::MO_HIGHEST: O << "%highest((" ; break; |
638 | case MipsII::MO_TLSGD: O << "%tlsgd(" ; break; |
639 | case MipsII::MO_GOTTPREL: O << "%gottprel(" ; break; |
640 | case MipsII::MO_TPREL_HI: O << "%tprel_hi(" ; break; |
641 | case MipsII::MO_TPREL_LO: O << "%tprel_lo(" ; break; |
642 | case MipsII::MO_GPOFF_HI: O << "%hi(%neg(%gp_rel(" ; break; |
643 | case MipsII::MO_GPOFF_LO: O << "%lo(%neg(%gp_rel(" ; break; |
644 | case MipsII::MO_GOT_DISP: O << "%got_disp(" ; break; |
645 | case MipsII::MO_GOT_PAGE: O << "%got_page(" ; break; |
646 | case MipsII::MO_GOT_OFST: O << "%got_ofst(" ; break; |
647 | } |
648 | |
649 | switch (MO.getType()) { |
650 | case MachineOperand::MO_Register: |
651 | O << '$' |
652 | << StringRef(MipsInstPrinter::getRegisterName(Reg: MO.getReg())).lower(); |
653 | break; |
654 | |
655 | case MachineOperand::MO_Immediate: |
656 | O << MO.getImm(); |
657 | break; |
658 | |
659 | case MachineOperand::MO_MachineBasicBlock: |
660 | MO.getMBB()->getSymbol()->print(OS&: O, MAI); |
661 | return; |
662 | |
663 | case MachineOperand::MO_GlobalAddress: |
664 | PrintSymbolOperand(MO, OS&: O); |
665 | break; |
666 | |
667 | case MachineOperand::MO_BlockAddress: { |
668 | MCSymbol *BA = GetBlockAddressSymbol(BA: MO.getBlockAddress()); |
669 | O << BA->getName(); |
670 | break; |
671 | } |
672 | |
673 | case MachineOperand::MO_ConstantPoolIndex: |
674 | O << getDataLayout().getPrivateGlobalPrefix() << "CPI" |
675 | << getFunctionNumber() << "_" << MO.getIndex(); |
676 | if (MO.getOffset()) |
677 | O << "+" << MO.getOffset(); |
678 | break; |
679 | |
680 | default: |
681 | llvm_unreachable("<unknown operand type>" ); |
682 | } |
683 | |
684 | if (closeP) O << ")" ; |
685 | } |
686 | |
687 | void MipsAsmPrinter:: |
688 | printMemOperand(const MachineInstr *MI, int opNum, raw_ostream &O) { |
689 | // Load/Store memory operands -- imm($reg) |
690 | // If PIC target the target is loaded as the |
691 | // pattern lw $25,%call16($28) |
692 | |
693 | // opNum can be invalid if instruction has reglist as operand. |
694 | // MemOperand is always last operand of instruction (base + offset). |
695 | switch (MI->getOpcode()) { |
696 | default: |
697 | break; |
698 | case Mips::SWM32_MM: |
699 | case Mips::LWM32_MM: |
700 | opNum = MI->getNumOperands() - 2; |
701 | break; |
702 | } |
703 | |
704 | printOperand(MI, opNum: opNum+1, O); |
705 | O << "(" ; |
706 | printOperand(MI, opNum, O); |
707 | O << ")" ; |
708 | } |
709 | |
710 | void MipsAsmPrinter:: |
711 | printMemOperandEA(const MachineInstr *MI, int opNum, raw_ostream &O) { |
712 | // when using stack locations for not load/store instructions |
713 | // print the same way as all normal 3 operand instructions. |
714 | printOperand(MI, opNum, O); |
715 | O << ", " ; |
716 | printOperand(MI, opNum: opNum+1, O); |
717 | } |
718 | |
719 | void MipsAsmPrinter::printFCCOperand(const MachineInstr *MI, int opNum, |
720 | raw_ostream &O) { |
721 | const MachineOperand &MO = MI->getOperand(i: opNum); |
722 | O << Mips::MipsFCCToString(CC: (Mips::CondCode)MO.getImm()); |
723 | } |
724 | |
725 | void MipsAsmPrinter:: |
726 | printRegisterList(const MachineInstr *MI, int opNum, raw_ostream &O) { |
727 | for (int i = opNum, e = MI->getNumOperands(); i != e; ++i) { |
728 | if (i != opNum) O << ", " ; |
729 | printOperand(MI, opNum: i, O); |
730 | } |
731 | } |
732 | |
733 | void MipsAsmPrinter::emitStartOfAsmFile(Module &M) { |
734 | const Triple &TT = TM.getTargetTriple(); |
735 | |
736 | if (TT.isOSBinFormatELF()) { |
737 | MipsTargetStreamer &TS = getTargetStreamer(); |
738 | |
739 | // MipsTargetStreamer has an initialization order problem when emitting an |
740 | // object file directly (see MipsTargetELFStreamer for full details). Work |
741 | // around it by re-initializing the PIC state here. |
742 | TS.setPic(OutContext.getObjectFileInfo()->isPositionIndependent()); |
743 | |
744 | // Try to get target-features from the first function. |
745 | StringRef FS = TM.getTargetFeatureString(); |
746 | Module::iterator F = M.begin(); |
747 | if (FS.empty() && M.size() && F->hasFnAttribute(Kind: "target-features" )) |
748 | FS = F->getFnAttribute(Kind: "target-features" ).getValueAsString(); |
749 | |
750 | // Compute MIPS architecture attributes based on the default subtarget |
751 | // that we'd have constructed. |
752 | // FIXME: For ifunc related functions we could iterate over and look |
753 | // for a feature string that doesn't match the default one. |
754 | StringRef CPU = MIPS_MC::selectMipsCPU(TT, CPU: TM.getTargetCPU()); |
755 | const MipsTargetMachine &MTM = static_cast<const MipsTargetMachine &>(TM); |
756 | const MipsSubtarget STI(TT, CPU, FS, MTM.isLittleEndian(), MTM, |
757 | std::nullopt); |
758 | |
759 | bool IsABICalls = STI.isABICalls(); |
760 | const MipsABIInfo &ABI = MTM.getABI(); |
761 | if (IsABICalls) { |
762 | TS.emitDirectiveAbiCalls(); |
763 | // FIXME: This condition should be a lot more complicated that it is here. |
764 | // Ideally it should test for properties of the ABI and not the ABI |
765 | // itself. |
766 | // For the moment, I'm only correcting enough to make MIPS-IV work. |
767 | if (!isPositionIndependent() && STI.hasSym32()) |
768 | TS.emitDirectiveOptionPic0(); |
769 | } |
770 | |
771 | // Tell the assembler which ABI we are using |
772 | std::string SectionName = std::string(".mdebug." ) + getCurrentABIString(); |
773 | OutStreamer->switchSection( |
774 | Section: OutContext.getELFSection(Section: SectionName, Type: ELF::SHT_PROGBITS, Flags: 0)); |
775 | |
776 | // NaN: At the moment we only support: |
777 | // 1. .nan legacy (default) |
778 | // 2. .nan 2008 |
779 | STI.isNaN2008() ? TS.emitDirectiveNaN2008() : TS.emitDirectiveNaNLegacy(); |
780 | |
781 | // TODO: handle O64 ABI |
782 | |
783 | TS.updateABIInfo(P: STI); |
784 | |
785 | // We should always emit a '.module fp=...' but binutils 2.24 does not |
786 | // accept it. We therefore emit it when it contradicts the ABI defaults |
787 | // (-mfpxx or -mfp64) and omit it otherwise. |
788 | if ((ABI.IsO32() && (STI.isABI_FPXX() || STI.isFP64bit())) || |
789 | STI.useSoftFloat()) |
790 | TS.emitDirectiveModuleFP(); |
791 | |
792 | // We should always emit a '.module [no]oddspreg' but binutils 2.24 does not |
793 | // accept it. We therefore emit it when it contradicts the default or an |
794 | // option has changed the default (i.e. FPXX) and omit it otherwise. |
795 | if (ABI.IsO32() && (!STI.useOddSPReg() || STI.isABI_FPXX())) |
796 | TS.emitDirectiveModuleOddSPReg(); |
797 | |
798 | // Switch to the .text section. |
799 | OutStreamer->switchSection(Section: getObjFileLowering().getTextSection()); |
800 | } |
801 | } |
802 | |
803 | void MipsAsmPrinter::emitInlineAsmStart() const { |
804 | MipsTargetStreamer &TS = getTargetStreamer(); |
805 | |
806 | // GCC's choice of assembler options for inline assembly code ('at', 'macro' |
807 | // and 'reorder') is different from LLVM's choice for generated code ('noat', |
808 | // 'nomacro' and 'noreorder'). |
809 | // In order to maintain compatibility with inline assembly code which depends |
810 | // on GCC's assembler options being used, we have to switch to those options |
811 | // for the duration of the inline assembly block and then switch back. |
812 | TS.emitDirectiveSetPush(); |
813 | TS.emitDirectiveSetAt(); |
814 | TS.emitDirectiveSetMacro(); |
815 | TS.emitDirectiveSetReorder(); |
816 | OutStreamer->addBlankLine(); |
817 | } |
818 | |
819 | void MipsAsmPrinter::emitInlineAsmEnd(const MCSubtargetInfo &StartInfo, |
820 | const MCSubtargetInfo *EndInfo) const { |
821 | OutStreamer->addBlankLine(); |
822 | getTargetStreamer().emitDirectiveSetPop(); |
823 | } |
824 | |
825 | void MipsAsmPrinter::emitJumpTableEntry(const MachineJumpTableInfo &MJTI, |
826 | const MachineBasicBlock *MBB, |
827 | unsigned uid) const { |
828 | MCSymbol *MBBSym = MBB->getSymbol(); |
829 | switch (MJTI.getEntryKind()) { |
830 | case MachineJumpTableInfo::EK_BlockAddress: |
831 | OutStreamer->emitValue(Value: MCSymbolRefExpr::create(Symbol: MBBSym, Ctx&: OutContext), |
832 | Size: getDataLayout().getPointerSize()); |
833 | break; |
834 | case MachineJumpTableInfo::EK_GPRel32BlockAddress: |
835 | // Each entry is a GP-relative value targeting the block symbol. |
836 | getTargetStreamer().emitGPRel32Value( |
837 | MCSymbolRefExpr::create(Symbol: MBBSym, Ctx&: OutContext)); |
838 | break; |
839 | case MachineJumpTableInfo::EK_GPRel64BlockAddress: |
840 | getTargetStreamer().emitGPRel64Value( |
841 | MCSymbolRefExpr::create(Symbol: MBBSym, Ctx&: OutContext)); |
842 | break; |
843 | default: |
844 | llvm_unreachable("" ); |
845 | } |
846 | } |
847 | |
848 | void MipsAsmPrinter::EmitJal(const MCSubtargetInfo &STI, MCSymbol *Symbol) { |
849 | MCInst I; |
850 | I.setOpcode(Mips::JAL); |
851 | I.addOperand( |
852 | Op: MCOperand::createExpr(Val: MCSymbolRefExpr::create(Symbol, Ctx&: OutContext))); |
853 | OutStreamer->emitInstruction(Inst: I, STI); |
854 | } |
855 | |
856 | void MipsAsmPrinter::EmitInstrReg(const MCSubtargetInfo &STI, unsigned Opcode, |
857 | unsigned Reg) { |
858 | MCInst I; |
859 | I.setOpcode(Opcode); |
860 | I.addOperand(Op: MCOperand::createReg(Reg)); |
861 | OutStreamer->emitInstruction(Inst: I, STI); |
862 | } |
863 | |
864 | void MipsAsmPrinter::EmitInstrRegReg(const MCSubtargetInfo &STI, |
865 | unsigned Opcode, unsigned Reg1, |
866 | unsigned Reg2) { |
867 | MCInst I; |
868 | // |
869 | // Because of the current td files for Mips32, the operands for MTC1 |
870 | // appear backwards from their normal assembly order. It's not a trivial |
871 | // change to fix this in the td file so we adjust for it here. |
872 | // |
873 | if (Opcode == Mips::MTC1) { |
874 | unsigned Temp = Reg1; |
875 | Reg1 = Reg2; |
876 | Reg2 = Temp; |
877 | } |
878 | I.setOpcode(Opcode); |
879 | I.addOperand(Op: MCOperand::createReg(Reg: Reg1)); |
880 | I.addOperand(Op: MCOperand::createReg(Reg: Reg2)); |
881 | OutStreamer->emitInstruction(Inst: I, STI); |
882 | } |
883 | |
884 | void MipsAsmPrinter::EmitInstrRegRegReg(const MCSubtargetInfo &STI, |
885 | unsigned Opcode, unsigned Reg1, |
886 | unsigned Reg2, unsigned Reg3) { |
887 | MCInst I; |
888 | I.setOpcode(Opcode); |
889 | I.addOperand(Op: MCOperand::createReg(Reg: Reg1)); |
890 | I.addOperand(Op: MCOperand::createReg(Reg: Reg2)); |
891 | I.addOperand(Op: MCOperand::createReg(Reg: Reg3)); |
892 | OutStreamer->emitInstruction(Inst: I, STI); |
893 | } |
894 | |
895 | void MipsAsmPrinter::EmitMovFPIntPair(const MCSubtargetInfo &STI, |
896 | unsigned MovOpc, unsigned Reg1, |
897 | unsigned Reg2, unsigned FPReg1, |
898 | unsigned FPReg2, bool LE) { |
899 | if (!LE) { |
900 | unsigned temp = Reg1; |
901 | Reg1 = Reg2; |
902 | Reg2 = temp; |
903 | } |
904 | EmitInstrRegReg(STI, Opcode: MovOpc, Reg1, Reg2: FPReg1); |
905 | EmitInstrRegReg(STI, Opcode: MovOpc, Reg1: Reg2, Reg2: FPReg2); |
906 | } |
907 | |
908 | void MipsAsmPrinter::EmitSwapFPIntParams(const MCSubtargetInfo &STI, |
909 | Mips16HardFloatInfo::FPParamVariant PV, |
910 | bool LE, bool ToFP) { |
911 | using namespace Mips16HardFloatInfo; |
912 | |
913 | unsigned MovOpc = ToFP ? Mips::MTC1 : Mips::MFC1; |
914 | switch (PV) { |
915 | case FSig: |
916 | EmitInstrRegReg(STI, Opcode: MovOpc, Reg1: Mips::A0, Reg2: Mips::F12); |
917 | break; |
918 | case FFSig: |
919 | EmitMovFPIntPair(STI, MovOpc, Reg1: Mips::A0, Reg2: Mips::A1, FPReg1: Mips::F12, FPReg2: Mips::F14, LE); |
920 | break; |
921 | case FDSig: |
922 | EmitInstrRegReg(STI, Opcode: MovOpc, Reg1: Mips::A0, Reg2: Mips::F12); |
923 | EmitMovFPIntPair(STI, MovOpc, Reg1: Mips::A2, Reg2: Mips::A3, FPReg1: Mips::F14, FPReg2: Mips::F15, LE); |
924 | break; |
925 | case DSig: |
926 | EmitMovFPIntPair(STI, MovOpc, Reg1: Mips::A0, Reg2: Mips::A1, FPReg1: Mips::F12, FPReg2: Mips::F13, LE); |
927 | break; |
928 | case DDSig: |
929 | EmitMovFPIntPair(STI, MovOpc, Reg1: Mips::A0, Reg2: Mips::A1, FPReg1: Mips::F12, FPReg2: Mips::F13, LE); |
930 | EmitMovFPIntPair(STI, MovOpc, Reg1: Mips::A2, Reg2: Mips::A3, FPReg1: Mips::F14, FPReg2: Mips::F15, LE); |
931 | break; |
932 | case DFSig: |
933 | EmitMovFPIntPair(STI, MovOpc, Reg1: Mips::A0, Reg2: Mips::A1, FPReg1: Mips::F12, FPReg2: Mips::F13, LE); |
934 | EmitInstrRegReg(STI, Opcode: MovOpc, Reg1: Mips::A2, Reg2: Mips::F14); |
935 | break; |
936 | case NoSig: |
937 | return; |
938 | } |
939 | } |
940 | |
941 | void MipsAsmPrinter::EmitSwapFPIntRetval( |
942 | const MCSubtargetInfo &STI, Mips16HardFloatInfo::FPReturnVariant RV, |
943 | bool LE) { |
944 | using namespace Mips16HardFloatInfo; |
945 | |
946 | unsigned MovOpc = Mips::MFC1; |
947 | switch (RV) { |
948 | case FRet: |
949 | EmitInstrRegReg(STI, Opcode: MovOpc, Reg1: Mips::V0, Reg2: Mips::F0); |
950 | break; |
951 | case DRet: |
952 | EmitMovFPIntPair(STI, MovOpc, Reg1: Mips::V0, Reg2: Mips::V1, FPReg1: Mips::F0, FPReg2: Mips::F1, LE); |
953 | break; |
954 | case CFRet: |
955 | EmitMovFPIntPair(STI, MovOpc, Reg1: Mips::V0, Reg2: Mips::V1, FPReg1: Mips::F0, FPReg2: Mips::F1, LE); |
956 | break; |
957 | case CDRet: |
958 | EmitMovFPIntPair(STI, MovOpc, Reg1: Mips::V0, Reg2: Mips::V1, FPReg1: Mips::F0, FPReg2: Mips::F1, LE); |
959 | EmitMovFPIntPair(STI, MovOpc, Reg1: Mips::A0, Reg2: Mips::A1, FPReg1: Mips::F2, FPReg2: Mips::F3, LE); |
960 | break; |
961 | case NoFPRet: |
962 | break; |
963 | } |
964 | } |
965 | |
966 | void MipsAsmPrinter::EmitFPCallStub( |
967 | const char *Symbol, const Mips16HardFloatInfo::FuncSignature *Signature) { |
968 | using namespace Mips16HardFloatInfo; |
969 | |
970 | MCSymbol *MSymbol = OutContext.getOrCreateSymbol(Name: StringRef(Symbol)); |
971 | bool LE = getDataLayout().isLittleEndian(); |
972 | // Construct a local MCSubtargetInfo here. |
973 | // This is because the MachineFunction won't exist (but have not yet been |
974 | // freed) and since we're at the global level we can use the default |
975 | // constructed subtarget. |
976 | std::unique_ptr<MCSubtargetInfo> STI(TM.getTarget().createMCSubtargetInfo( |
977 | TheTriple: TM.getTargetTriple().str(), CPU: TM.getTargetCPU(), |
978 | Features: TM.getTargetFeatureString())); |
979 | |
980 | // |
981 | // .global xxxx |
982 | // |
983 | OutStreamer->emitSymbolAttribute(Symbol: MSymbol, Attribute: MCSA_Global); |
984 | const char *RetType; |
985 | // |
986 | // make the comment field identifying the return and parameter |
987 | // types of the floating point stub |
988 | // # Stub function to call rettype xxxx (params) |
989 | // |
990 | switch (Signature->RetSig) { |
991 | case FRet: |
992 | RetType = "float" ; |
993 | break; |
994 | case DRet: |
995 | RetType = "double" ; |
996 | break; |
997 | case CFRet: |
998 | RetType = "complex" ; |
999 | break; |
1000 | case CDRet: |
1001 | RetType = "double complex" ; |
1002 | break; |
1003 | case NoFPRet: |
1004 | RetType = "" ; |
1005 | break; |
1006 | } |
1007 | const char *Parms; |
1008 | switch (Signature->ParamSig) { |
1009 | case FSig: |
1010 | Parms = "float" ; |
1011 | break; |
1012 | case FFSig: |
1013 | Parms = "float, float" ; |
1014 | break; |
1015 | case FDSig: |
1016 | Parms = "float, double" ; |
1017 | break; |
1018 | case DSig: |
1019 | Parms = "double" ; |
1020 | break; |
1021 | case DDSig: |
1022 | Parms = "double, double" ; |
1023 | break; |
1024 | case DFSig: |
1025 | Parms = "double, float" ; |
1026 | break; |
1027 | case NoSig: |
1028 | Parms = "" ; |
1029 | break; |
1030 | } |
1031 | OutStreamer->AddComment(T: "\t# Stub function to call " + Twine(RetType) + " " + |
1032 | Twine(Symbol) + " (" + Twine(Parms) + ")" ); |
1033 | // |
1034 | // probably not necessary but we save and restore the current section state |
1035 | // |
1036 | OutStreamer->pushSection(); |
1037 | // |
1038 | // .section mips16.call.fpxxxx,"ax",@progbits |
1039 | // |
1040 | MCSectionELF *M = OutContext.getELFSection( |
1041 | Section: ".mips16.call.fp." + std::string(Symbol), Type: ELF::SHT_PROGBITS, |
1042 | Flags: ELF::SHF_ALLOC | ELF::SHF_EXECINSTR); |
1043 | OutStreamer->switchSection(Section: M); |
1044 | // |
1045 | // .align 2 |
1046 | // |
1047 | OutStreamer->emitValueToAlignment(Alignment: Align(4)); |
1048 | MipsTargetStreamer &TS = getTargetStreamer(); |
1049 | // |
1050 | // .set nomips16 |
1051 | // .set nomicromips |
1052 | // |
1053 | TS.emitDirectiveSetNoMips16(); |
1054 | TS.emitDirectiveSetNoMicroMips(); |
1055 | // |
1056 | // .ent __call_stub_fp_xxxx |
1057 | // .type __call_stub_fp_xxxx,@function |
1058 | // __call_stub_fp_xxxx: |
1059 | // |
1060 | std::string x = "__call_stub_fp_" + std::string(Symbol); |
1061 | MCSymbolELF *Stub = |
1062 | cast<MCSymbolELF>(Val: OutContext.getOrCreateSymbol(Name: StringRef(x))); |
1063 | TS.emitDirectiveEnt(Symbol: *Stub); |
1064 | MCSymbol *MType = |
1065 | OutContext.getOrCreateSymbol(Name: "__call_stub_fp_" + Twine(Symbol)); |
1066 | OutStreamer->emitSymbolAttribute(Symbol: MType, Attribute: MCSA_ELF_TypeFunction); |
1067 | OutStreamer->emitLabel(Symbol: Stub); |
1068 | |
1069 | // Only handle non-pic for now. |
1070 | assert(!isPositionIndependent() && |
1071 | "should not be here if we are compiling pic" ); |
1072 | TS.emitDirectiveSetReorder(); |
1073 | // |
1074 | // We need to add a MipsMCExpr class to MCTargetDesc to fully implement |
1075 | // stubs without raw text but this current patch is for compiler generated |
1076 | // functions and they all return some value. |
1077 | // The calling sequence for non pic is different in that case and we need |
1078 | // to implement %lo and %hi in order to handle the case of no return value |
1079 | // See the corresponding method in Mips16HardFloat for details. |
1080 | // |
1081 | // mov the return address to S2. |
1082 | // we have no stack space to store it and we are about to make another call. |
1083 | // We need to make sure that the enclosing function knows to save S2 |
1084 | // This should have already been handled. |
1085 | // |
1086 | // Mov $18, $31 |
1087 | |
1088 | EmitInstrRegRegReg(STI: *STI, Opcode: Mips::OR, Reg1: Mips::S2, Reg2: Mips::RA, Reg3: Mips::ZERO); |
1089 | |
1090 | EmitSwapFPIntParams(STI: *STI, PV: Signature->ParamSig, LE, ToFP: true); |
1091 | |
1092 | // Jal xxxx |
1093 | // |
1094 | EmitJal(STI: *STI, Symbol: MSymbol); |
1095 | |
1096 | // fix return values |
1097 | EmitSwapFPIntRetval(STI: *STI, RV: Signature->RetSig, LE); |
1098 | // |
1099 | // do the return |
1100 | // if (Signature->RetSig == NoFPRet) |
1101 | // llvm_unreachable("should not be any stubs here with no return value"); |
1102 | // else |
1103 | EmitInstrReg(STI: *STI, Opcode: Mips::JR, Reg: Mips::S2); |
1104 | |
1105 | MCSymbol *Tmp = OutContext.createTempSymbol(); |
1106 | OutStreamer->emitLabel(Symbol: Tmp); |
1107 | const MCSymbolRefExpr *E = MCSymbolRefExpr::create(Symbol: Stub, Ctx&: OutContext); |
1108 | const MCSymbolRefExpr *T = MCSymbolRefExpr::create(Symbol: Tmp, Ctx&: OutContext); |
1109 | const MCExpr *T_min_E = MCBinaryExpr::createSub(LHS: T, RHS: E, Ctx&: OutContext); |
1110 | OutStreamer->emitELFSize(Symbol: Stub, Value: T_min_E); |
1111 | TS.emitDirectiveEnd(Name: x); |
1112 | OutStreamer->popSection(); |
1113 | } |
1114 | |
1115 | void MipsAsmPrinter::emitEndOfAsmFile(Module &M) { |
1116 | // Emit needed stubs |
1117 | // |
1118 | for (std::map< |
1119 | const char *, |
1120 | const Mips16HardFloatInfo::FuncSignature *>::const_iterator |
1121 | it = StubsNeeded.begin(); |
1122 | it != StubsNeeded.end(); ++it) { |
1123 | const char *Symbol = it->first; |
1124 | const Mips16HardFloatInfo::FuncSignature *Signature = it->second; |
1125 | EmitFPCallStub(Symbol, Signature); |
1126 | } |
1127 | // return to the text section |
1128 | OutStreamer->switchSection(Section: OutContext.getObjectFileInfo()->getTextSection()); |
1129 | } |
1130 | |
1131 | void MipsAsmPrinter::EmitSled(const MachineInstr &MI, SledKind Kind) { |
1132 | const uint8_t NoopsInSledCount = Subtarget->isGP64bit() ? 15 : 11; |
1133 | // For mips32 we want to emit the following pattern: |
1134 | // |
1135 | // .Lxray_sled_N: |
1136 | // ALIGN |
1137 | // B .tmpN |
1138 | // 11 NOP instructions (44 bytes) |
1139 | // ADDIU T9, T9, 52 |
1140 | // .tmpN |
1141 | // |
1142 | // We need the 44 bytes (11 instructions) because at runtime, we'd |
1143 | // be patching over the full 48 bytes (12 instructions) with the following |
1144 | // pattern: |
1145 | // |
1146 | // ADDIU SP, SP, -8 |
1147 | // NOP |
1148 | // SW RA, 4(SP) |
1149 | // SW T9, 0(SP) |
1150 | // LUI T9, %hi(__xray_FunctionEntry/Exit) |
1151 | // ORI T9, T9, %lo(__xray_FunctionEntry/Exit) |
1152 | // LUI T0, %hi(function_id) |
1153 | // JALR T9 |
1154 | // ORI T0, T0, %lo(function_id) |
1155 | // LW T9, 0(SP) |
1156 | // LW RA, 4(SP) |
1157 | // ADDIU SP, SP, 8 |
1158 | // |
1159 | // We add 52 bytes to t9 because we want to adjust the function pointer to |
1160 | // the actual start of function i.e. the address just after the noop sled. |
1161 | // We do this because gp displacement relocation is emitted at the start of |
1162 | // of the function i.e after the nop sled and to correctly calculate the |
1163 | // global offset table address, t9 must hold the address of the instruction |
1164 | // containing the gp displacement relocation. |
1165 | // FIXME: Is this correct for the static relocation model? |
1166 | // |
1167 | // For mips64 we want to emit the following pattern: |
1168 | // |
1169 | // .Lxray_sled_N: |
1170 | // ALIGN |
1171 | // B .tmpN |
1172 | // 15 NOP instructions (60 bytes) |
1173 | // .tmpN |
1174 | // |
1175 | // We need the 60 bytes (15 instructions) because at runtime, we'd |
1176 | // be patching over the full 64 bytes (16 instructions) with the following |
1177 | // pattern: |
1178 | // |
1179 | // DADDIU SP, SP, -16 |
1180 | // NOP |
1181 | // SD RA, 8(SP) |
1182 | // SD T9, 0(SP) |
1183 | // LUI T9, %highest(__xray_FunctionEntry/Exit) |
1184 | // ORI T9, T9, %higher(__xray_FunctionEntry/Exit) |
1185 | // DSLL T9, T9, 16 |
1186 | // ORI T9, T9, %hi(__xray_FunctionEntry/Exit) |
1187 | // DSLL T9, T9, 16 |
1188 | // ORI T9, T9, %lo(__xray_FunctionEntry/Exit) |
1189 | // LUI T0, %hi(function_id) |
1190 | // JALR T9 |
1191 | // ADDIU T0, T0, %lo(function_id) |
1192 | // LD T9, 0(SP) |
1193 | // LD RA, 8(SP) |
1194 | // DADDIU SP, SP, 16 |
1195 | // |
1196 | OutStreamer->emitCodeAlignment(Alignment: Align(4), STI: &getSubtargetInfo()); |
1197 | auto CurSled = OutContext.createTempSymbol(Name: "xray_sled_" , AlwaysAddSuffix: true); |
1198 | OutStreamer->emitLabel(Symbol: CurSled); |
1199 | auto Target = OutContext.createTempSymbol(); |
1200 | |
1201 | // Emit "B .tmpN" instruction, which jumps over the nop sled to the actual |
1202 | // start of function |
1203 | const MCExpr *TargetExpr = MCSymbolRefExpr::create(Symbol: Target, Ctx&: OutContext); |
1204 | EmitToStreamer(S&: *OutStreamer, Inst: MCInstBuilder(Mips::BEQ) |
1205 | .addReg(Reg: Mips::ZERO) |
1206 | .addReg(Reg: Mips::ZERO) |
1207 | .addExpr(Val: TargetExpr)); |
1208 | |
1209 | for (int8_t I = 0; I < NoopsInSledCount; I++) |
1210 | EmitToStreamer(S&: *OutStreamer, Inst: MCInstBuilder(Mips::SLL) |
1211 | .addReg(Reg: Mips::ZERO) |
1212 | .addReg(Reg: Mips::ZERO) |
1213 | .addImm(Val: 0)); |
1214 | |
1215 | OutStreamer->emitLabel(Symbol: Target); |
1216 | |
1217 | if (!Subtarget->isGP64bit()) { |
1218 | EmitToStreamer(S&: *OutStreamer, |
1219 | Inst: MCInstBuilder(Mips::ADDiu) |
1220 | .addReg(Reg: Mips::T9) |
1221 | .addReg(Reg: Mips::T9) |
1222 | .addImm(Val: 0x34)); |
1223 | } |
1224 | |
1225 | recordSled(Sled: CurSled, MI, Kind, Version: 2); |
1226 | } |
1227 | |
1228 | void MipsAsmPrinter::LowerPATCHABLE_FUNCTION_ENTER(const MachineInstr &MI) { |
1229 | EmitSled(MI, Kind: SledKind::FUNCTION_ENTER); |
1230 | } |
1231 | |
1232 | void MipsAsmPrinter::LowerPATCHABLE_FUNCTION_EXIT(const MachineInstr &MI) { |
1233 | EmitSled(MI, Kind: SledKind::FUNCTION_EXIT); |
1234 | } |
1235 | |
1236 | void MipsAsmPrinter::LowerPATCHABLE_TAIL_CALL(const MachineInstr &MI) { |
1237 | EmitSled(MI, Kind: SledKind::TAIL_CALL); |
1238 | } |
1239 | |
1240 | void MipsAsmPrinter::(const MachineInstr *MI, |
1241 | raw_ostream &OS) { |
1242 | // TODO: implement |
1243 | } |
1244 | |
1245 | // Emit .dtprelword or .dtpreldword directive |
1246 | // and value for debug thread local expression. |
1247 | void MipsAsmPrinter::emitDebugValue(const MCExpr *Value, unsigned Size) const { |
1248 | if (auto *MipsExpr = dyn_cast<MCSpecifierExpr>(Val: Value)) { |
1249 | if (MipsExpr && MipsExpr->getSpecifier() == Mips::S_DTPREL) { |
1250 | switch (Size) { |
1251 | case 4: |
1252 | getTargetStreamer().emitDTPRel32Value(MipsExpr->getSubExpr()); |
1253 | break; |
1254 | case 8: |
1255 | getTargetStreamer().emitDTPRel64Value(MipsExpr->getSubExpr()); |
1256 | break; |
1257 | default: |
1258 | llvm_unreachable("Unexpected size of expression value." ); |
1259 | } |
1260 | return; |
1261 | } |
1262 | } |
1263 | AsmPrinter::emitDebugValue(Value, Size); |
1264 | } |
1265 | |
1266 | // Align all targets of indirect branches on bundle size. Used only if target |
1267 | // is NaCl. |
1268 | void MipsAsmPrinter::NaClAlignIndirectJumpTargets(MachineFunction &MF) { |
1269 | // Align all blocks that are jumped to through jump table. |
1270 | if (MachineJumpTableInfo *JtInfo = MF.getJumpTableInfo()) { |
1271 | const std::vector<MachineJumpTableEntry> &JT = JtInfo->getJumpTables(); |
1272 | for (const auto &I : JT) { |
1273 | const std::vector<MachineBasicBlock *> &MBBs = I.MBBs; |
1274 | |
1275 | for (MachineBasicBlock *MBB : MBBs) |
1276 | MBB->setAlignment(MIPS_NACL_BUNDLE_ALIGN); |
1277 | } |
1278 | } |
1279 | |
1280 | // If basic block address is taken, block can be target of indirect branch. |
1281 | for (auto &MBB : MF) { |
1282 | if (MBB.hasAddressTaken()) |
1283 | MBB.setAlignment(MIPS_NACL_BUNDLE_ALIGN); |
1284 | } |
1285 | } |
1286 | |
1287 | bool MipsAsmPrinter::isLongBranchPseudo(int Opcode) const { |
1288 | return (Opcode == Mips::LONG_BRANCH_LUi |
1289 | || Opcode == Mips::LONG_BRANCH_LUi2Op |
1290 | || Opcode == Mips::LONG_BRANCH_LUi2Op_64 |
1291 | || Opcode == Mips::LONG_BRANCH_ADDiu |
1292 | || Opcode == Mips::LONG_BRANCH_ADDiu2Op |
1293 | || Opcode == Mips::LONG_BRANCH_DADDiu |
1294 | || Opcode == Mips::LONG_BRANCH_DADDiu2Op); |
1295 | } |
1296 | |
1297 | char MipsAsmPrinter::ID = 0; |
1298 | |
1299 | INITIALIZE_PASS(MipsAsmPrinter, "mips-asm-printer" , "Mips Assembly Printer" , |
1300 | false, false) |
1301 | |
1302 | // Force static initialization. |
1303 | extern "C" LLVM_ABI LLVM_EXTERNAL_VISIBILITY void |
1304 | LLVMInitializeMipsAsmPrinter() { |
1305 | RegisterAsmPrinter<MipsAsmPrinter> X(getTheMipsTarget()); |
1306 | RegisterAsmPrinter<MipsAsmPrinter> Y(getTheMipselTarget()); |
1307 | RegisterAsmPrinter<MipsAsmPrinter> A(getTheMips64Target()); |
1308 | RegisterAsmPrinter<MipsAsmPrinter> B(getTheMips64elTarget()); |
1309 | } |
1310 | |