| 1 | //=- SystemZInstPrinterCommon.cpp - Common SystemZ MCInst to assembly funcs -=// |
| 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 | #include "SystemZInstPrinterCommon.h" |
| 10 | #include "MCTargetDesc/SystemZMCAsmInfo.h" |
| 11 | #include "llvm/MC/MCExpr.h" |
| 12 | #include "llvm/MC/MCInst.h" |
| 13 | #include "llvm/MC/MCRegister.h" |
| 14 | #include "llvm/MC/MCSymbol.h" |
| 15 | #include "llvm/Support/Casting.h" |
| 16 | #include "llvm/Support/ErrorHandling.h" |
| 17 | #include "llvm/Support/MathExtras.h" |
| 18 | #include "llvm/Support/raw_ostream.h" |
| 19 | #include <cassert> |
| 20 | #include <cstdint> |
| 21 | |
| 22 | using namespace llvm; |
| 23 | |
| 24 | #define DEBUG_TYPE "asm-printer" |
| 25 | |
| 26 | void SystemZInstPrinterCommon::printAddress(const MCAsmInfo *MAI, |
| 27 | MCRegister Base, |
| 28 | const MCOperand &DispMO, |
| 29 | MCRegister Index, raw_ostream &O) { |
| 30 | printOperand(MO: DispMO, MAI, O); |
| 31 | if (Base || Index) { |
| 32 | O << '('; |
| 33 | if (Index) { |
| 34 | printRegName(O, Reg: Index); |
| 35 | O << ','; |
| 36 | } |
| 37 | if (Base) |
| 38 | printRegName(O, Reg: Base); |
| 39 | else |
| 40 | O << '0'; |
| 41 | O << ')'; |
| 42 | } |
| 43 | } |
| 44 | |
| 45 | void SystemZInstPrinterCommon::printOperand(const MCOperand &MO, |
| 46 | const MCAsmInfo *MAI, |
| 47 | raw_ostream &O) { |
| 48 | if (MO.isReg()) { |
| 49 | if (!MO.getReg()) |
| 50 | O << '0'; |
| 51 | else |
| 52 | printRegName(O, Reg: MO.getReg()); |
| 53 | } else if (MO.isImm()) |
| 54 | markup(OS&: O, M: Markup::Immediate) << MO.getImm(); |
| 55 | else if (MO.isExpr()) |
| 56 | MAI->printExpr(O, *MO.getExpr()); |
| 57 | else |
| 58 | llvm_unreachable("Invalid operand" ); |
| 59 | } |
| 60 | |
| 61 | void SystemZInstPrinterCommon::printRegName(raw_ostream &O, MCRegister Reg) { |
| 62 | printFormattedRegName(MAI: &MAI, Reg, O); |
| 63 | } |
| 64 | |
| 65 | template <unsigned N> |
| 66 | void SystemZInstPrinterCommon::printUImmOperand(const MCInst *MI, int OpNum, |
| 67 | raw_ostream &O) { |
| 68 | const MCOperand &MO = MI->getOperand(i: OpNum); |
| 69 | if (MO.isExpr()) { |
| 70 | MAI.printExpr(O, *MO.getExpr()); |
| 71 | return; |
| 72 | } |
| 73 | uint64_t Value = static_cast<uint64_t>(MO.getImm()); |
| 74 | assert(isUInt<N>(Value) && "Invalid uimm argument" ); |
| 75 | markup(OS&: O, M: Markup::Immediate) << Value; |
| 76 | } |
| 77 | |
| 78 | template <unsigned N> |
| 79 | void SystemZInstPrinterCommon::printSImmOperand(const MCInst *MI, int OpNum, |
| 80 | raw_ostream &O) { |
| 81 | const MCOperand &MO = MI->getOperand(i: OpNum); |
| 82 | if (MO.isExpr()) { |
| 83 | MAI.printExpr(O, *MO.getExpr()); |
| 84 | return; |
| 85 | } |
| 86 | int64_t Value = MI->getOperand(i: OpNum).getImm(); |
| 87 | assert(isInt<N>(Value) && "Invalid simm argument" ); |
| 88 | markup(OS&: O, M: Markup::Immediate) << Value; |
| 89 | } |
| 90 | |
| 91 | void SystemZInstPrinterCommon::printU1ImmOperand(const MCInst *MI, int OpNum, |
| 92 | raw_ostream &O) { |
| 93 | printUImmOperand<1>(MI, OpNum, O); |
| 94 | } |
| 95 | |
| 96 | void SystemZInstPrinterCommon::printU2ImmOperand(const MCInst *MI, int OpNum, |
| 97 | raw_ostream &O) { |
| 98 | printUImmOperand<2>(MI, OpNum, O); |
| 99 | } |
| 100 | |
| 101 | void SystemZInstPrinterCommon::printU3ImmOperand(const MCInst *MI, int OpNum, |
| 102 | raw_ostream &O) { |
| 103 | printUImmOperand<3>(MI, OpNum, O); |
| 104 | } |
| 105 | |
| 106 | void SystemZInstPrinterCommon::printU4ImmOperand(const MCInst *MI, int OpNum, |
| 107 | raw_ostream &O) { |
| 108 | printUImmOperand<4>(MI, OpNum, O); |
| 109 | } |
| 110 | |
| 111 | void SystemZInstPrinterCommon::printS8ImmOperand(const MCInst *MI, int OpNum, |
| 112 | raw_ostream &O) { |
| 113 | printSImmOperand<8>(MI, OpNum, O); |
| 114 | } |
| 115 | |
| 116 | void SystemZInstPrinterCommon::printU8ImmOperand(const MCInst *MI, int OpNum, |
| 117 | raw_ostream &O) { |
| 118 | printUImmOperand<8>(MI, OpNum, O); |
| 119 | } |
| 120 | |
| 121 | void SystemZInstPrinterCommon::printU12ImmOperand(const MCInst *MI, int OpNum, |
| 122 | raw_ostream &O) { |
| 123 | printUImmOperand<12>(MI, OpNum, O); |
| 124 | } |
| 125 | |
| 126 | void SystemZInstPrinterCommon::printS16ImmOperand(const MCInst *MI, int OpNum, |
| 127 | raw_ostream &O) { |
| 128 | printSImmOperand<16>(MI, OpNum, O); |
| 129 | } |
| 130 | |
| 131 | void SystemZInstPrinterCommon::printU16ImmOperand(const MCInst *MI, int OpNum, |
| 132 | raw_ostream &O) { |
| 133 | printUImmOperand<16>(MI, OpNum, O); |
| 134 | } |
| 135 | |
| 136 | void SystemZInstPrinterCommon::printS32ImmOperand(const MCInst *MI, int OpNum, |
| 137 | raw_ostream &O) { |
| 138 | printSImmOperand<32>(MI, OpNum, O); |
| 139 | } |
| 140 | |
| 141 | void SystemZInstPrinterCommon::printU32ImmOperand(const MCInst *MI, int OpNum, |
| 142 | raw_ostream &O) { |
| 143 | printUImmOperand<32>(MI, OpNum, O); |
| 144 | } |
| 145 | |
| 146 | void SystemZInstPrinterCommon::printU48ImmOperand(const MCInst *MI, int OpNum, |
| 147 | raw_ostream &O) { |
| 148 | printUImmOperand<48>(MI, OpNum, O); |
| 149 | } |
| 150 | |
| 151 | void SystemZInstPrinterCommon::printPCRelOperand(const MCInst *MI, |
| 152 | uint64_t Address, int OpNum, |
| 153 | raw_ostream &O) { |
| 154 | const MCOperand &MO = MI->getOperand(i: OpNum); |
| 155 | |
| 156 | // If the label has already been resolved to an immediate offset (say, when |
| 157 | // we're running the disassembler), just print the immediate. |
| 158 | if (MO.isImm()) { |
| 159 | int64_t Offset = MO.getImm(); |
| 160 | if (PrintBranchImmAsAddress) |
| 161 | markup(OS&: O, M: Markup::Target) << formatHex(Value: Address + Offset); |
| 162 | else |
| 163 | markup(OS&: O, M: Markup::Immediate) << formatImm(Value: Offset); |
| 164 | return; |
| 165 | } |
| 166 | |
| 167 | // If the branch target is simply an address then print it in hex. |
| 168 | const MCConstantExpr *BranchTarget = dyn_cast<MCConstantExpr>(Val: MO.getExpr()); |
| 169 | int64_t TargetAddress; |
| 170 | if (BranchTarget && BranchTarget->evaluateAsAbsolute(Res&: TargetAddress)) { |
| 171 | markup(OS&: O, M: Markup::Target) << formatHex(Value: (uint64_t)TargetAddress); |
| 172 | } else { |
| 173 | // Otherwise, just print the expression. |
| 174 | MAI.printExpr(O, *MO.getExpr()); |
| 175 | } |
| 176 | } |
| 177 | |
| 178 | void SystemZInstPrinterCommon::printPCRelTLSOperand(const MCInst *MI, |
| 179 | uint64_t Address, int OpNum, |
| 180 | raw_ostream &O) { |
| 181 | // Output the PC-relative operand. |
| 182 | printPCRelOperand(MI, Address, OpNum, O); |
| 183 | |
| 184 | // Output the TLS marker if present. |
| 185 | if ((unsigned)OpNum + 1 < MI->getNumOperands()) { |
| 186 | const MCOperand &MO = MI->getOperand(i: OpNum + 1); |
| 187 | const MCSymbolRefExpr &refExp = cast<MCSymbolRefExpr>(Val: *MO.getExpr()); |
| 188 | switch (refExp.getSpecifier()) { |
| 189 | case SystemZ::S_TLSGD: |
| 190 | O << ":tls_gdcall:" ; |
| 191 | break; |
| 192 | case SystemZ::S_TLSLDM: |
| 193 | O << ":tls_ldcall:" ; |
| 194 | break; |
| 195 | default: |
| 196 | llvm_unreachable("Unexpected symbol kind" ); |
| 197 | } |
| 198 | O << refExp.getSymbol().getName(); |
| 199 | } |
| 200 | } |
| 201 | |
| 202 | void SystemZInstPrinterCommon::printOperand(const MCInst *MI, int OpNum, |
| 203 | raw_ostream &O) { |
| 204 | printOperand(MO: MI->getOperand(i: OpNum), MAI: &MAI, O); |
| 205 | } |
| 206 | |
| 207 | void SystemZInstPrinterCommon::printBDAddrOperand(const MCInst *MI, int OpNum, |
| 208 | raw_ostream &O) { |
| 209 | printAddress(MAI: &MAI, Base: MI->getOperand(i: OpNum).getReg(), DispMO: MI->getOperand(i: OpNum + 1), |
| 210 | Index: 0, O); |
| 211 | } |
| 212 | |
| 213 | void SystemZInstPrinterCommon::printBDXAddrOperand(const MCInst *MI, int OpNum, |
| 214 | raw_ostream &O) { |
| 215 | printAddress(MAI: &MAI, Base: MI->getOperand(i: OpNum).getReg(), DispMO: MI->getOperand(i: OpNum + 1), |
| 216 | Index: MI->getOperand(i: OpNum + 2).getReg(), O); |
| 217 | } |
| 218 | |
| 219 | void SystemZInstPrinterCommon::printBDLAddrOperand(const MCInst *MI, int OpNum, |
| 220 | raw_ostream &O) { |
| 221 | unsigned Base = MI->getOperand(i: OpNum).getReg(); |
| 222 | const MCOperand &DispMO = MI->getOperand(i: OpNum + 1); |
| 223 | uint64_t Length = MI->getOperand(i: OpNum + 2).getImm(); |
| 224 | printOperand(MO: DispMO, MAI: &MAI, O); |
| 225 | O << '(' << Length; |
| 226 | if (Base) { |
| 227 | O << "," ; |
| 228 | printRegName(O, Reg: Base); |
| 229 | } |
| 230 | O << ')'; |
| 231 | } |
| 232 | |
| 233 | void SystemZInstPrinterCommon::printBDRAddrOperand(const MCInst *MI, int OpNum, |
| 234 | raw_ostream &O) { |
| 235 | unsigned Base = MI->getOperand(i: OpNum).getReg(); |
| 236 | const MCOperand &DispMO = MI->getOperand(i: OpNum + 1); |
| 237 | unsigned Length = MI->getOperand(i: OpNum + 2).getReg(); |
| 238 | printOperand(MO: DispMO, MAI: &MAI, O); |
| 239 | O << "(" ; |
| 240 | printRegName(O, Reg: Length); |
| 241 | if (Base) { |
| 242 | O << "," ; |
| 243 | printRegName(O, Reg: Base); |
| 244 | } |
| 245 | O << ')'; |
| 246 | } |
| 247 | |
| 248 | void SystemZInstPrinterCommon::printBDVAddrOperand(const MCInst *MI, int OpNum, |
| 249 | raw_ostream &O) { |
| 250 | printAddress(MAI: &MAI, Base: MI->getOperand(i: OpNum).getReg(), DispMO: MI->getOperand(i: OpNum + 1), |
| 251 | Index: MI->getOperand(i: OpNum + 2).getReg(), O); |
| 252 | } |
| 253 | |
| 254 | void SystemZInstPrinterCommon::printLXAAddrOperand(const MCInst *MI, int OpNum, |
| 255 | raw_ostream &O) { |
| 256 | printAddress(MAI: &MAI, Base: MI->getOperand(i: OpNum).getReg(), DispMO: MI->getOperand(i: OpNum + 1), |
| 257 | Index: MI->getOperand(i: OpNum + 2).getReg(), O); |
| 258 | } |
| 259 | |
| 260 | void SystemZInstPrinterCommon::printCond4Operand(const MCInst *MI, int OpNum, |
| 261 | raw_ostream &O) { |
| 262 | static const char *const CondNames[] = {"o" , "h" , "nle" , "l" , "nhe" , |
| 263 | "lh" , "ne" , "e" , "nlh" , "he" , |
| 264 | "nl" , "le" , "nh" , "no" }; |
| 265 | uint64_t Imm = MI->getOperand(i: OpNum).getImm(); |
| 266 | assert(Imm > 0 && Imm < 15 && "Invalid condition" ); |
| 267 | O << CondNames[Imm - 1]; |
| 268 | } |
| 269 | |