1 //===-- SparcMCCodeEmitter.cpp - Convert Sparc code to machine code -------===// 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 // This file implements the SparcMCCodeEmitter class. 11 // 12 //===----------------------------------------------------------------------===// 13 14 #include "SparcMCExpr.h" 15 #include "MCTargetDesc/SparcFixupKinds.h" 16 #include "SparcMCTargetDesc.h" 17 #include "llvm/ADT/Statistic.h" 18 #include "llvm/MC/MCCodeEmitter.h" 19 #include "llvm/MC/MCContext.h" 20 #include "llvm/MC/MCExpr.h" 21 #include "llvm/MC/MCInst.h" 22 #include "llvm/MC/MCRegisterInfo.h" 23 #include "llvm/MC/MCSymbol.h" 24 #include "llvm/MC/MCAsmInfo.h" 25 #include "llvm/Support/raw_ostream.h" 26 27 using namespace llvm; 28 29 #define DEBUG_TYPE "mccodeemitter" 30 31 STATISTIC(MCNumEmitted, "Number of MC instructions emitted"); 32 33 namespace { 34 class SparcMCCodeEmitter : public MCCodeEmitter { 35 SparcMCCodeEmitter(const SparcMCCodeEmitter &) = delete; 36 void operator=(const SparcMCCodeEmitter &) = delete; 37 MCContext &Ctx; 38 39 public: 40 SparcMCCodeEmitter(MCContext &ctx): Ctx(ctx) {} 41 42 ~SparcMCCodeEmitter() override {} 43 44 void encodeInstruction(const MCInst &MI, raw_ostream &OS, 45 SmallVectorImpl<MCFixup> &Fixups, 46 const MCSubtargetInfo &STI) const override; 47 48 // getBinaryCodeForInstr - TableGen'erated function for getting the 49 // binary encoding for an instruction. 50 uint64_t getBinaryCodeForInstr(const MCInst &MI, 51 SmallVectorImpl<MCFixup> &Fixups, 52 const MCSubtargetInfo &STI) const; 53 54 /// getMachineOpValue - Return binary encoding of operand. If the machine 55 /// operand requires relocation, record the relocation and return zero. 56 unsigned getMachineOpValue(const MCInst &MI, const MCOperand &MO, 57 SmallVectorImpl<MCFixup> &Fixups, 58 const MCSubtargetInfo &STI) const; 59 60 unsigned getCallTargetOpValue(const MCInst &MI, unsigned OpNo, 61 SmallVectorImpl<MCFixup> &Fixups, 62 const MCSubtargetInfo &STI) const; 63 unsigned getBranchTargetOpValue(const MCInst &MI, unsigned OpNo, 64 SmallVectorImpl<MCFixup> &Fixups, 65 const MCSubtargetInfo &STI) const; 66 unsigned getBranchPredTargetOpValue(const MCInst &MI, unsigned OpNo, 67 SmallVectorImpl<MCFixup> &Fixups, 68 const MCSubtargetInfo &STI) const; 69 unsigned getBranchOnRegTargetOpValue(const MCInst &MI, unsigned OpNo, 70 SmallVectorImpl<MCFixup> &Fixups, 71 const MCSubtargetInfo &STI) const; 72 73 }; 74 } // end anonymous namespace 75 76 MCCodeEmitter *llvm::createSparcMCCodeEmitter(const MCInstrInfo &MCII, 77 const MCRegisterInfo &MRI, 78 MCContext &Ctx) { 79 return new SparcMCCodeEmitter(Ctx); 80 } 81 82 void SparcMCCodeEmitter::encodeInstruction(const MCInst &MI, raw_ostream &OS, 83 SmallVectorImpl<MCFixup> &Fixups, 84 const MCSubtargetInfo &STI) const { 85 unsigned Bits = getBinaryCodeForInstr(MI, Fixups, STI); 86 87 if (Ctx.getAsmInfo()->isLittleEndian()) { 88 // Output the bits in little-endian byte order. 89 support::endian::Writer<support::little>(OS).write<uint32_t>(Bits); 90 } else { 91 // Output the bits in big-endian byte order. 92 support::endian::Writer<support::big>(OS).write<uint32_t>(Bits); 93 } 94 unsigned tlsOpNo = 0; 95 switch (MI.getOpcode()) { 96 default: break; 97 case SP::TLS_CALL: tlsOpNo = 1; break; 98 case SP::TLS_ADDrr: 99 case SP::TLS_ADDXrr: 100 case SP::TLS_LDrr: 101 case SP::TLS_LDXrr: tlsOpNo = 3; break; 102 } 103 if (tlsOpNo != 0) { 104 const MCOperand &MO = MI.getOperand(tlsOpNo); 105 uint64_t op = getMachineOpValue(MI, MO, Fixups, STI); 106 assert(op == 0 && "Unexpected operand value!"); 107 (void)op; // suppress warning. 108 } 109 110 ++MCNumEmitted; // Keep track of the # of mi's emitted. 111 } 112 113 114 unsigned SparcMCCodeEmitter:: 115 getMachineOpValue(const MCInst &MI, const MCOperand &MO, 116 SmallVectorImpl<MCFixup> &Fixups, 117 const MCSubtargetInfo &STI) const { 118 119 if (MO.isReg()) 120 return Ctx.getRegisterInfo()->getEncodingValue(MO.getReg()); 121 122 if (MO.isImm()) 123 return MO.getImm(); 124 125 assert(MO.isExpr()); 126 const MCExpr *Expr = MO.getExpr(); 127 if (const SparcMCExpr *SExpr = dyn_cast<SparcMCExpr>(Expr)) { 128 MCFixupKind Kind = (MCFixupKind)SExpr->getFixupKind(); 129 Fixups.push_back(MCFixup::create(0, Expr, Kind)); 130 return 0; 131 } 132 133 int64_t Res; 134 if (Expr->evaluateAsAbsolute(Res)) 135 return Res; 136 137 llvm_unreachable("Unhandled expression!"); 138 return 0; 139 } 140 141 unsigned SparcMCCodeEmitter:: 142 getCallTargetOpValue(const MCInst &MI, unsigned OpNo, 143 SmallVectorImpl<MCFixup> &Fixups, 144 const MCSubtargetInfo &STI) const { 145 const MCOperand &MO = MI.getOperand(OpNo); 146 if (MO.isReg() || MO.isImm()) 147 return getMachineOpValue(MI, MO, Fixups, STI); 148 149 if (MI.getOpcode() == SP::TLS_CALL) { 150 // No fixups for __tls_get_addr. Will emit for fixups for tls_symbol in 151 // encodeInstruction. 152 #ifndef NDEBUG 153 // Verify that the callee is actually __tls_get_addr. 154 const SparcMCExpr *SExpr = dyn_cast<SparcMCExpr>(MO.getExpr()); 155 assert(SExpr && SExpr->getSubExpr()->getKind() == MCExpr::SymbolRef && 156 "Unexpected expression in TLS_CALL"); 157 const MCSymbolRefExpr *SymExpr = cast<MCSymbolRefExpr>(SExpr->getSubExpr()); 158 assert(SymExpr->getSymbol().getName() == "__tls_get_addr" && 159 "Unexpected function for TLS_CALL"); 160 #endif 161 return 0; 162 } 163 164 MCFixupKind fixupKind = (MCFixupKind)Sparc::fixup_sparc_call30; 165 166 if (const SparcMCExpr *SExpr = dyn_cast<SparcMCExpr>(MO.getExpr())) { 167 if (SExpr->getKind() == SparcMCExpr::VK_Sparc_WPLT30) 168 fixupKind = (MCFixupKind)Sparc::fixup_sparc_wplt30; 169 } 170 171 Fixups.push_back(MCFixup::create(0, MO.getExpr(), fixupKind)); 172 173 return 0; 174 } 175 176 unsigned SparcMCCodeEmitter:: 177 getBranchTargetOpValue(const MCInst &MI, unsigned OpNo, 178 SmallVectorImpl<MCFixup> &Fixups, 179 const MCSubtargetInfo &STI) const { 180 const MCOperand &MO = MI.getOperand(OpNo); 181 if (MO.isReg() || MO.isImm()) 182 return getMachineOpValue(MI, MO, Fixups, STI); 183 184 Fixups.push_back(MCFixup::create(0, MO.getExpr(), 185 (MCFixupKind)Sparc::fixup_sparc_br22)); 186 return 0; 187 } 188 189 unsigned SparcMCCodeEmitter:: 190 getBranchPredTargetOpValue(const MCInst &MI, unsigned OpNo, 191 SmallVectorImpl<MCFixup> &Fixups, 192 const MCSubtargetInfo &STI) const { 193 const MCOperand &MO = MI.getOperand(OpNo); 194 if (MO.isReg() || MO.isImm()) 195 return getMachineOpValue(MI, MO, Fixups, STI); 196 197 Fixups.push_back(MCFixup::create(0, MO.getExpr(), 198 (MCFixupKind)Sparc::fixup_sparc_br19)); 199 return 0; 200 } 201 unsigned SparcMCCodeEmitter:: 202 getBranchOnRegTargetOpValue(const MCInst &MI, unsigned OpNo, 203 SmallVectorImpl<MCFixup> &Fixups, 204 const MCSubtargetInfo &STI) const { 205 const MCOperand &MO = MI.getOperand(OpNo); 206 if (MO.isReg() || MO.isImm()) 207 return getMachineOpValue(MI, MO, Fixups, STI); 208 209 Fixups.push_back(MCFixup::create(0, MO.getExpr(), 210 (MCFixupKind)Sparc::fixup_sparc_br16_2)); 211 Fixups.push_back(MCFixup::create(0, MO.getExpr(), 212 (MCFixupKind)Sparc::fixup_sparc_br16_14)); 213 214 return 0; 215 } 216 217 218 219 #include "SparcGenMCCodeEmitter.inc" 220