1 //===-- PPCMCInstLower.cpp - Convert PPC MachineInstr to an MCInst --------===//
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 code to lower PPC MachineInstrs to their corresponding
10 // MCInst records.
11 //
12 //===----------------------------------------------------------------------===//
13 
14 #include "MCTargetDesc/PPCMCExpr.h"
15 #include "PPC.h"
16 #include "PPCSubtarget.h"
17 #include "llvm/ADT/SmallString.h"
18 #include "llvm/ADT/Twine.h"
19 #include "llvm/CodeGen/AsmPrinter.h"
20 #include "llvm/CodeGen/MachineFunction.h"
21 #include "llvm/CodeGen/MachineModuleInfoImpls.h"
22 #include "llvm/CodeGen/TargetLowering.h"
23 #include "llvm/IR/DataLayout.h"
24 #include "llvm/IR/GlobalValue.h"
25 #include "llvm/IR/Mangler.h"
26 #include "llvm/MC/MCAsmInfo.h"
27 #include "llvm/MC/MCExpr.h"
28 #include "llvm/MC/MCInst.h"
29 #include "llvm/Target/TargetLoweringObjectFile.h"
30 using namespace llvm;
31 
32 static MCSymbol *GetSymbolFromOperand(const MachineOperand &MO,
33                                       AsmPrinter &AP) {
34   const TargetMachine &TM = AP.TM;
35   Mangler &Mang = TM.getObjFileLowering()->getMangler();
36   const DataLayout &DL = AP.getDataLayout();
37   MCContext &Ctx = AP.OutContext;
38 
39   SmallString<128> Name;
40   if (!MO.isGlobal()) {
41     assert(MO.isSymbol() && "Isn't a symbol reference");
42     Mangler::getNameWithPrefix(Name, MO.getSymbolName(), DL);
43   } else {
44     const GlobalValue *GV = MO.getGlobal();
45     TM.getNameWithPrefix(Name, GV, Mang);
46   }
47 
48   MCSymbol *Sym = Ctx.getOrCreateSymbol(Name);
49 
50   return Sym;
51 }
52 
53 static MCOperand GetSymbolRef(const MachineOperand &MO, const MCSymbol *Symbol,
54                               AsmPrinter &Printer) {
55   MCContext &Ctx = Printer.OutContext;
56   MCSymbolRefExpr::VariantKind RefKind = MCSymbolRefExpr::VK_None;
57 
58   unsigned access = MO.getTargetFlags() & PPCII::MO_ACCESS_MASK;
59 
60   switch (access) {
61     case PPCII::MO_TPREL_LO:
62       RefKind = MCSymbolRefExpr::VK_PPC_TPREL_LO;
63       break;
64     case PPCII::MO_TPREL_HA:
65       RefKind = MCSymbolRefExpr::VK_PPC_TPREL_HA;
66       break;
67     case PPCII::MO_DTPREL_LO:
68       RefKind = MCSymbolRefExpr::VK_PPC_DTPREL_LO;
69       break;
70     case PPCII::MO_TLSLD_LO:
71       RefKind = MCSymbolRefExpr::VK_PPC_GOT_TLSLD_LO;
72       break;
73     case PPCII::MO_TOC_LO:
74       RefKind = MCSymbolRefExpr::VK_PPC_TOC_LO;
75       break;
76     case PPCII::MO_TLS:
77       RefKind = MCSymbolRefExpr::VK_PPC_TLS;
78       break;
79   }
80 
81   if (MO.getTargetFlags() == PPCII::MO_PLT)
82     RefKind = MCSymbolRefExpr::VK_PLT;
83   else if (MO.getTargetFlags() == PPCII::MO_PCREL_FLAG)
84     RefKind = MCSymbolRefExpr::VK_PCREL;
85   else if (MO.getTargetFlags() == (PPCII::MO_PCREL_FLAG | PPCII::MO_GOT_FLAG))
86     RefKind = MCSymbolRefExpr::VK_PPC_GOT_PCREL;
87 
88   const MachineInstr *MI = MO.getParent();
89 
90   if (MI->getOpcode() == PPC::BL8_NOTOC)
91     RefKind = MCSymbolRefExpr::VK_PPC_NOTOC;
92 
93   const MachineFunction *MF = MI->getMF();
94   const Module *M = MF->getFunction().getParent();
95   const PPCSubtarget *Subtarget = &(MF->getSubtarget<PPCSubtarget>());
96   const TargetMachine &TM = Printer.TM;
97   const MCExpr *Expr = MCSymbolRefExpr::create(Symbol, RefKind, Ctx);
98   // If -msecure-plt -fPIC, add 32768 to symbol.
99   if (Subtarget->isSecurePlt() && TM.isPositionIndependent() &&
100       M->getPICLevel() == PICLevel::BigPIC &&
101       MO.getTargetFlags() == PPCII::MO_PLT)
102     Expr =
103         MCBinaryExpr::createAdd(Expr, MCConstantExpr::create(32768, Ctx), Ctx);
104 
105   if (!MO.isJTI() && MO.getOffset())
106     Expr = MCBinaryExpr::createAdd(Expr,
107                                    MCConstantExpr::create(MO.getOffset(), Ctx),
108                                    Ctx);
109 
110   // Subtract off the PIC base if required.
111   if (MO.getTargetFlags() & PPCII::MO_PIC_FLAG) {
112     const MachineFunction *MF = MO.getParent()->getParent()->getParent();
113 
114     const MCExpr *PB = MCSymbolRefExpr::create(MF->getPICBaseSymbol(), Ctx);
115     Expr = MCBinaryExpr::createSub(Expr, PB, Ctx);
116   }
117 
118   // Add ha16() / lo16() markers if required.
119   switch (access) {
120     case PPCII::MO_LO:
121       Expr = PPCMCExpr::createLo(Expr, Ctx);
122       break;
123     case PPCII::MO_HA:
124       Expr = PPCMCExpr::createHa(Expr, Ctx);
125       break;
126   }
127 
128   return MCOperand::createExpr(Expr);
129 }
130 
131 void llvm::LowerPPCMachineInstrToMCInst(const MachineInstr *MI, MCInst &OutMI,
132                                         AsmPrinter &AP) {
133   OutMI.setOpcode(MI->getOpcode());
134 
135   for (unsigned i = 0, e = MI->getNumOperands(); i != e; ++i) {
136     MCOperand MCOp;
137     if (LowerPPCMachineOperandToMCOperand(MI->getOperand(i), MCOp, AP))
138       OutMI.addOperand(MCOp);
139   }
140 }
141 
142 bool llvm::LowerPPCMachineOperandToMCOperand(const MachineOperand &MO,
143                                              MCOperand &OutMO, AsmPrinter &AP) {
144   switch (MO.getType()) {
145   default:
146     llvm_unreachable("unknown operand type");
147   case MachineOperand::MO_Register:
148     assert(!MO.getSubReg() && "Subregs should be eliminated!");
149     assert(MO.getReg() > PPC::NoRegister &&
150            MO.getReg() < PPC::NUM_TARGET_REGS &&
151            "Invalid register for this target!");
152     // Ignore all implicit register operands.
153     if (MO.isImplicit())
154       return false;
155     OutMO = MCOperand::createReg(MO.getReg());
156     return true;
157   case MachineOperand::MO_Immediate:
158     OutMO = MCOperand::createImm(MO.getImm());
159     return true;
160   case MachineOperand::MO_MachineBasicBlock:
161     OutMO = MCOperand::createExpr(
162         MCSymbolRefExpr::create(MO.getMBB()->getSymbol(), AP.OutContext));
163     return true;
164   case MachineOperand::MO_GlobalAddress:
165   case MachineOperand::MO_ExternalSymbol:
166     OutMO = GetSymbolRef(MO, GetSymbolFromOperand(MO, AP), AP);
167     return true;
168   case MachineOperand::MO_JumpTableIndex:
169     OutMO = GetSymbolRef(MO, AP.GetJTISymbol(MO.getIndex()), AP);
170     return true;
171   case MachineOperand::MO_ConstantPoolIndex:
172     OutMO = GetSymbolRef(MO, AP.GetCPISymbol(MO.getIndex()), AP);
173     return true;
174   case MachineOperand::MO_BlockAddress:
175     OutMO =
176         GetSymbolRef(MO, AP.GetBlockAddressSymbol(MO.getBlockAddress()), AP);
177     return true;
178   case MachineOperand::MO_MCSymbol:
179     OutMO = GetSymbolRef(MO, MO.getMCSymbol(), AP);
180     return true;
181   case MachineOperand::MO_RegisterMask:
182     return false;
183   }
184 }
185