contrib/llvm/lib/Target/SystemZ/SystemZAsmPrinter.cpp

   1 //===-- SystemZAsmPrinter.cpp - SystemZ LLVM assembly printer -------------===//
   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 // Streams SystemZ assembly language and associated data, in the form of
  11 // MCInsts and MCExprs respectively.
  12 //
  13 //===----------------------------------------------------------------------===//
  14
  15 #include "SystemZAsmPrinter.h"
  16 #include "InstPrinter/SystemZInstPrinter.h"
  17 #include "SystemZConstantPoolValue.h"
  18 #include "SystemZMCInstLower.h"
  19 #include "llvm/CodeGen/MachineModuleInfoImpls.h"
  20 #include "llvm/CodeGen/TargetLoweringObjectFileImpl.h"
  21 #include "llvm/MC/MCExpr.h"
  22 #include "llvm/MC/MCInstBuilder.h"
  23 #include "llvm/MC/MCStreamer.h"
  24 #include "llvm/Support/TargetRegistry.h"
  25 #include "llvm/Target/Mangler.h"
  26
  27 using namespace llvm;
  28
  29 // Return an RI instruction like MI with opcode Opcode, but with the
  30 // GR64 register operands turned into GR32s.
  31 static MCInst lowerRILow(const MachineInstr *MI, unsigned Opcode) {
  32   if (MI->isCompare())
  33     return MCInstBuilder(Opcode)
  34       .addReg(SystemZMC::getRegAsGR32(MI->getOperand(0).getReg()))
  35       .addImm(MI->getOperand(1).getImm());
  36   else
  37     return MCInstBuilder(Opcode)
  38       .addReg(SystemZMC::getRegAsGR32(MI->getOperand(0).getReg()))
  39       .addReg(SystemZMC::getRegAsGR32(MI->getOperand(1).getReg()))
  40       .addImm(MI->getOperand(2).getImm());
  41 }
  42
  43 // Return an RI instruction like MI with opcode Opcode, but with the
  44 // GR64 register operands turned into GRH32s.
  45 static MCInst lowerRIHigh(const MachineInstr *MI, unsigned Opcode) {
  46   if (MI->isCompare())
  47     return MCInstBuilder(Opcode)
  48       .addReg(SystemZMC::getRegAsGRH32(MI->getOperand(0).getReg()))
  49       .addImm(MI->getOperand(1).getImm());
  50   else
  51     return MCInstBuilder(Opcode)
  52       .addReg(SystemZMC::getRegAsGRH32(MI->getOperand(0).getReg()))
  53       .addReg(SystemZMC::getRegAsGRH32(MI->getOperand(1).getReg()))
  54       .addImm(MI->getOperand(2).getImm());
  55 }
  56
  57 // Return an RI instruction like MI with opcode Opcode, but with the
  58 // R2 register turned into a GR64.
  59 static MCInst lowerRIEfLow(const MachineInstr *MI, unsigned Opcode) {
  60   return MCInstBuilder(Opcode)
  61     .addReg(MI->getOperand(0).getReg())
  62     .addReg(MI->getOperand(1).getReg())
  63     .addReg(SystemZMC::getRegAsGR64(MI->getOperand(2).getReg()))
  64     .addImm(MI->getOperand(3).getImm())
  65     .addImm(MI->getOperand(4).getImm())
  66     .addImm(MI->getOperand(5).getImm());
  67 }
  68
  69 void SystemZAsmPrinter::EmitInstruction(const MachineInstr *MI) {
  70   SystemZMCInstLower Lower(MF->getContext(), *this);
  71   MCInst LoweredMI;
  72   switch (MI->getOpcode()) {
  73   case SystemZ::Return:
  74     LoweredMI = MCInstBuilder(SystemZ::BR).addReg(SystemZ::R14D);
  75     break;
  76
  77   case SystemZ::CallBRASL:
  78     LoweredMI = MCInstBuilder(SystemZ::BRASL)
  79       .addReg(SystemZ::R14D)
  80       .addExpr(Lower.getExpr(MI->getOperand(0), MCSymbolRefExpr::VK_PLT));
  81     break;
  82
  83   case SystemZ::CallBASR:
  84     LoweredMI = MCInstBuilder(SystemZ::BASR)
  85       .addReg(SystemZ::R14D)
  86       .addReg(MI->getOperand(0).getReg());
  87     break;
  88
  89   case SystemZ::CallJG:
  90     LoweredMI = MCInstBuilder(SystemZ::JG)
  91       .addExpr(Lower.getExpr(MI->getOperand(0), MCSymbolRefExpr::VK_PLT));
  92     break;
  93
  94   case SystemZ::CallBR:
  95     LoweredMI = MCInstBuilder(SystemZ::BR).addReg(SystemZ::R1D);
  96     break;
  97
  98   case SystemZ::IILF64:
  99     LoweredMI = MCInstBuilder(SystemZ::IILF)
 100       .addReg(SystemZMC::getRegAsGR32(MI->getOperand(0).getReg()))
 101       .addImm(MI->getOperand(2).getImm());
 102     break;
 103
 104   case SystemZ::IIHF64:
 105     LoweredMI = MCInstBuilder(SystemZ::IIHF)
 106       .addReg(SystemZMC::getRegAsGRH32(MI->getOperand(0).getReg()))
 107       .addImm(MI->getOperand(2).getImm());
 108     break;
 109
 110   case SystemZ::RISBHH:
 111   case SystemZ::RISBHL:
 112     LoweredMI = lowerRIEfLow(MI, SystemZ::RISBHG);
 113     break;
 114
 115   case SystemZ::RISBLH:
 116   case SystemZ::RISBLL:
 117     LoweredMI = lowerRIEfLow(MI, SystemZ::RISBLG);
 118     break;
 119
 120 #define LOWER_LOW(NAME)                                                 \
 121   case SystemZ::NAME##64: LoweredMI = lowerRILow(MI, SystemZ::NAME); break
 122
 123   LOWER_LOW(IILL);
 124   LOWER_LOW(IILH);
 125   LOWER_LOW(TMLL);
 126   LOWER_LOW(TMLH);
 127   LOWER_LOW(NILL);
 128   LOWER_LOW(NILH);
 129   LOWER_LOW(NILF);
 130   LOWER_LOW(OILL);
 131   LOWER_LOW(OILH);
 132   LOWER_LOW(OILF);
 133   LOWER_LOW(XILF);
 134
 135 #undef LOWER_LOW
 136
 137 #define LOWER_HIGH(NAME) \
 138   case SystemZ::NAME##64: LoweredMI = lowerRIHigh(MI, SystemZ::NAME); break
 139
 140   LOWER_HIGH(IIHL);
 141   LOWER_HIGH(IIHH);
 142   LOWER_HIGH(TMHL);
 143   LOWER_HIGH(TMHH);
 144   LOWER_HIGH(NIHL);
 145   LOWER_HIGH(NIHH);
 146   LOWER_HIGH(NIHF);
 147   LOWER_HIGH(OIHL);
 148   LOWER_HIGH(OIHH);
 149   LOWER_HIGH(OIHF);
 150   LOWER_HIGH(XIHF);
 151
 152 #undef LOWER_HIGH
 153
 154   default:
 155     Lower.lower(MI, LoweredMI);
 156     break;
 157   }
 158   OutStreamer.EmitInstruction(LoweredMI);
 159 }
 160
 161 // Convert a SystemZ-specific constant pool modifier into the associated
 162 // MCSymbolRefExpr variant kind.
 163 static MCSymbolRefExpr::VariantKind
 164 getModifierVariantKind(SystemZCP::SystemZCPModifier Modifier) {
 165   switch (Modifier) {
 166   case SystemZCP::NTPOFF: return MCSymbolRefExpr::VK_NTPOFF;
 167   }
 168   llvm_unreachable("Invalid SystemCPModifier!");
 169 }
 170
 171 void SystemZAsmPrinter::
 172 EmitMachineConstantPoolValue(MachineConstantPoolValue *MCPV) {
 173   SystemZConstantPoolValue *ZCPV =
 174     static_cast<SystemZConstantPoolValue*>(MCPV);
 175
 176   const MCExpr *Expr =
 177     MCSymbolRefExpr::Create(getSymbol(ZCPV->getGlobalValue()),
 178                             getModifierVariantKind(ZCPV->getModifier()),
 179                             OutContext);
 180   uint64_t Size = TM.getDataLayout()->getTypeAllocSize(ZCPV->getType());
 181
 182   OutStreamer.EmitValue(Expr, Size);
 183 }
 184
 185 bool SystemZAsmPrinter::PrintAsmOperand(const MachineInstr *MI,
 186                                         unsigned OpNo,
 187                                         unsigned AsmVariant,
 188                                         const char *ExtraCode,
 189                                         raw_ostream &OS) {
 190   if (ExtraCode && *ExtraCode == 'n') {
 191     if (!MI->getOperand(OpNo).isImm())
 192       return true;
 193     OS << -int64_t(MI->getOperand(OpNo).getImm());
 194   } else {
 195     SystemZMCInstLower Lower(MF->getContext(), *this);
 196     MCOperand MO(Lower.lowerOperand(MI->getOperand(OpNo)));
 197     SystemZInstPrinter::printOperand(MO, OS);
 198   }
 199   return false;
 200 }
 201
 202 bool SystemZAsmPrinter::PrintAsmMemoryOperand(const MachineInstr *MI,
 203                                               unsigned OpNo,
 204                                               unsigned AsmVariant,
 205                                               const char *ExtraCode,
 206                                               raw_ostream &OS) {
 207   SystemZInstPrinter::printAddress(MI->getOperand(OpNo).getReg(),
 208                                    MI->getOperand(OpNo + 1).getImm(),
 209                                    MI->getOperand(OpNo + 2).getReg(), OS);
 210   return false;
 211 }
 212
 213 void SystemZAsmPrinter::EmitEndOfAsmFile(Module &M) {
 214   if (Subtarget->isTargetELF()) {
 215     const TargetLoweringObjectFileELF &TLOFELF =
 216       static_cast<const TargetLoweringObjectFileELF &>(getObjFileLowering());
 217
 218     MachineModuleInfoELF &MMIELF = MMI->getObjFileInfo<MachineModuleInfoELF>();
 219
 220     // Output stubs for external and common global variables.
 221     MachineModuleInfoELF::SymbolListTy Stubs = MMIELF.GetGVStubList();
 222     if (!Stubs.empty()) {
 223       OutStreamer.SwitchSection(TLOFELF.getDataRelSection());
 224       const DataLayout *TD = TM.getDataLayout();
 225
 226       for (unsigned i = 0, e = Stubs.size(); i != e; ++i) {
 227         OutStreamer.EmitLabel(Stubs[i].first);
 228         OutStreamer.EmitSymbolValue(Stubs[i].second.getPointer(),
 229                                     TD->getPointerSize(0));
 230       }
 231       Stubs.clear();
 232     }
 233   }
 234 }
 235
 236 // Force static initialization.
 237 extern "C" void LLVMInitializeSystemZAsmPrinter() {
 238   RegisterAsmPrinter<SystemZAsmPrinter> X(TheSystemZTarget);
 239 }