lib/Target/XCore/XCoreAsmPrinter.cpp

   1 //===-- XCoreAsmPrinter.cpp - XCore LLVM assembly writer ------------------===//
   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 contains a printer that converts from our internal representation
  11 // of machine-dependent LLVM code to the XAS-format XCore assembly language.
  12 //
  13 //===----------------------------------------------------------------------===//
  14
  15 #define DEBUG_TYPE "asm-printer"
  16 #include "XCore.h"
  17 #include "InstPrinter/XCoreInstPrinter.h"
  18 #include "XCoreInstrInfo.h"
  19 #include "XCoreMCInstLower.h"
  20 #include "XCoreSubtarget.h"
  21 #include "XCoreTargetMachine.h"
  22 #include "llvm/ADT/SmallString.h"
  23 #include "llvm/ADT/StringExtras.h"
  24 #include "llvm/CodeGen/AsmPrinter.h"
  25 #include "llvm/CodeGen/MachineConstantPool.h"
  26 #include "llvm/CodeGen/MachineFunctionPass.h"
  27 #include "llvm/CodeGen/MachineInstr.h"
  28 #include "llvm/CodeGen/MachineJumpTableInfo.h"
  29 #include "llvm/CodeGen/MachineModuleInfo.h"
  30 #include "llvm/DebugInfo.h"
  31 #include "llvm/IR/Constants.h"
  32 #include "llvm/IR/DataLayout.h"
  33 #include "llvm/IR/DerivedTypes.h"
  34 #include "llvm/IR/Mangler.h"
  35 #include "llvm/IR/Module.h"
  36 #include "llvm/MC/MCAsmInfo.h"
  37 #include "llvm/MC/MCExpr.h"
  38 #include "llvm/MC/MCInst.h"
  39 #include "llvm/MC/MCStreamer.h"
  40 #include "llvm/MC/MCSymbol.h"
  41 #include "llvm/Support/ErrorHandling.h"
  42 #include "llvm/Support/TargetRegistry.h"
  43 #include "llvm/Support/raw_ostream.h"
  44 #include "llvm/Target/TargetLoweringObjectFile.h"
  45 #include <algorithm>
  46 #include <cctype>
  47 using namespace llvm;
  48
  49 namespace {
  50   class XCoreAsmPrinter : public AsmPrinter {
  51     const XCoreSubtarget &Subtarget;
  52     XCoreMCInstLower MCInstLowering;
  53   public:
  54     explicit XCoreAsmPrinter(TargetMachine &TM, MCStreamer &Streamer)
  55       : AsmPrinter(TM, Streamer), Subtarget(TM.getSubtarget<XCoreSubtarget>()),
  56         MCInstLowering(*this) {}
  57
  58     virtual const char *getPassName() const {
  59       return "XCore Assembly Printer";
  60     }
  61
  62     void printInlineJT(const MachineInstr *MI, int opNum, raw_ostream &O,
  63                        const std::string &directive = ".jmptable");
  64     void printInlineJT32(const MachineInstr *MI, int opNum, raw_ostream &O) {
  65       printInlineJT(MI, opNum, O, ".jmptable32");
  66     }
  67     void printOperand(const MachineInstr *MI, int opNum, raw_ostream &O);
  68     bool PrintAsmOperand(const MachineInstr *MI, unsigned OpNo,
  69                          unsigned AsmVariant, const char *ExtraCode,
  70                          raw_ostream &O);
  71
  72     void emitArrayBound(MCSymbol *Sym, const GlobalVariable *GV);
  73     virtual void EmitGlobalVariable(const GlobalVariable *GV);
  74
  75     void EmitFunctionEntryLabel();
  76     void EmitInstruction(const MachineInstr *MI);
  77     void EmitFunctionBodyStart();
  78     void EmitFunctionBodyEnd();
  79   };
  80 } // end of anonymous namespace
  81
  82 void XCoreAsmPrinter::emitArrayBound(MCSymbol *Sym, const GlobalVariable *GV) {
  83   assert(((GV->hasExternalLinkage() ||
  84     GV->hasWeakLinkage()) ||
  85     GV->hasLinkOnceLinkage()) && "Unexpected linkage");
  86   if (ArrayType *ATy = dyn_cast<ArrayType>(
  87                         cast<PointerType>(GV->getType())->getElementType())) {
  88
  89     MCSymbol *SymGlob = OutContext.GetOrCreateSymbol(
  90                           Twine(Sym->getName() + StringRef(".globound")));
  91     OutStreamer.EmitSymbolAttribute(SymGlob, MCSA_Global);
  92     OutStreamer.EmitAssignment(SymGlob,
  93                                MCConstantExpr::Create(ATy->getNumElements(),
  94                                                       OutContext));
  95     if (GV->hasWeakLinkage() || GV->hasLinkOnceLinkage()) {
  96       // TODO Use COMDAT groups for LinkOnceLinkage
  97       OutStreamer.EmitSymbolAttribute(SymGlob, MCSA_Weak);
  98     }
  99   }
 100 }
 101
 102 void XCoreAsmPrinter::EmitGlobalVariable(const GlobalVariable *GV) {
 103   // Check to see if this is a special global used by LLVM, if so, emit it.
 104   if (!GV->hasInitializer() ||
 105       EmitSpecialLLVMGlobal(GV))
 106     return;
 107
 108   const DataLayout *TD = TM.getDataLayout();
 109   OutStreamer.SwitchSection(getObjFileLowering().SectionForGlobal(GV, Mang,TM));
 110
 111
 112   MCSymbol *GVSym = getSymbol(GV);
 113   const Constant *C = GV->getInitializer();
 114   unsigned Align = (unsigned)TD->getPreferredTypeAlignmentShift(C->getType());
 115
 116   // Mark the start of the global
 117   OutStreamer.EmitRawText("\t.cc_top " + Twine(GVSym->getName()) + ".data," +
 118                           GVSym->getName());
 119
 120   switch (GV->getLinkage()) {
 121   case GlobalValue::AppendingLinkage:
 122     report_fatal_error("AppendingLinkage is not supported by this target!");
 123   case GlobalValue::LinkOnceAnyLinkage:
 124   case GlobalValue::LinkOnceODRLinkage:
 125   case GlobalValue::WeakAnyLinkage:
 126   case GlobalValue::WeakODRLinkage:
 127   case GlobalValue::ExternalLinkage:
 128     emitArrayBound(GVSym, GV);
 129     OutStreamer.EmitSymbolAttribute(GVSym, MCSA_Global);
 130
 131     // TODO Use COMDAT groups for LinkOnceLinkage
 132     if (GV->hasWeakLinkage() || GV->hasLinkOnceLinkage())
 133       OutStreamer.EmitSymbolAttribute(GVSym, MCSA_Weak);
 134     // FALL THROUGH
 135   case GlobalValue::InternalLinkage:
 136   case GlobalValue::PrivateLinkage:
 137     break;
 138   default:
 139     llvm_unreachable("Unknown linkage type!");
 140   }
 141
 142   EmitAlignment(Align > 2 ? Align : 2, GV);
 143
 144   if (GV->isThreadLocal()) {
 145     report_fatal_error("TLS is not supported by this target!");
 146   }
 147   unsigned Size = TD->getTypeAllocSize(C->getType());
 148   if (MAI->hasDotTypeDotSizeDirective()) {
 149     OutStreamer.EmitSymbolAttribute(GVSym, MCSA_ELF_TypeObject);
 150     OutStreamer.EmitRawText("\t.size " + Twine(GVSym->getName()) + "," +
 151                             Twine(Size));
 152   }
 153   OutStreamer.EmitLabel(GVSym);
 154
 155   EmitGlobalConstant(C);
 156   // The ABI requires that unsigned scalar types smaller than 32 bits
 157   // are padded to 32 bits.
 158   if (Size < 4)
 159     OutStreamer.EmitZeros(4 - Size);
 160
 161   // Mark the end of the global
 162   OutStreamer.EmitRawText("\t.cc_bottom " + Twine(GVSym->getName()) + ".data");
 163 }
 164
 165 void XCoreAsmPrinter::EmitFunctionBodyStart() {
 166   MCInstLowering.Initialize(Mang, &MF->getContext());
 167 }
 168
 169 /// EmitFunctionBodyEnd - Targets can override this to emit stuff after
 170 /// the last basic block in the function.
 171 void XCoreAsmPrinter::EmitFunctionBodyEnd() {
 172   // Emit function end directives
 173   OutStreamer.EmitRawText("\t.cc_bottom " + Twine(CurrentFnSym->getName()) +
 174                           ".function");
 175 }
 176
 177 void XCoreAsmPrinter::EmitFunctionEntryLabel() {
 178   // Mark the start of the function
 179   OutStreamer.EmitRawText("\t.cc_top " + Twine(CurrentFnSym->getName()) +
 180                           ".function," + CurrentFnSym->getName());
 181   OutStreamer.EmitLabel(CurrentFnSym);
 182 }
 183
 184 void XCoreAsmPrinter::
 185 printInlineJT(const MachineInstr *MI, int opNum, raw_ostream &O,
 186               const std::string &directive) {
 187   unsigned JTI = MI->getOperand(opNum).getIndex();
 188   const MachineFunction *MF = MI->getParent()->getParent();
 189   const MachineJumpTableInfo *MJTI = MF->getJumpTableInfo();
 190   const std::vector<MachineJumpTableEntry> &JT = MJTI->getJumpTables();
 191   const std::vector<MachineBasicBlock*> &JTBBs = JT[JTI].MBBs;
 192   O << "\t" << directive << " ";
 193   for (unsigned i = 0, e = JTBBs.size(); i != e; ++i) {
 194     MachineBasicBlock *MBB = JTBBs[i];
 195     if (i > 0)
 196       O << ",";
 197     O << *MBB->getSymbol();
 198   }
 199 }
 200
 201 void XCoreAsmPrinter::printOperand(const MachineInstr *MI, int opNum,
 202                                    raw_ostream &O) {
 203   const DataLayout *DL = TM.getDataLayout();
 204   const MachineOperand &MO = MI->getOperand(opNum);
 205   switch (MO.getType()) {
 206   case MachineOperand::MO_Register:
 207     O << XCoreInstPrinter::getRegisterName(MO.getReg());
 208     break;
 209   case MachineOperand::MO_Immediate:
 210     O << MO.getImm();
 211     break;
 212   case MachineOperand::MO_MachineBasicBlock:
 213     O << *MO.getMBB()->getSymbol();
 214     break;
 215   case MachineOperand::MO_GlobalAddress:
 216     O << *getSymbol(MO.getGlobal());
 217     break;
 218   case MachineOperand::MO_ConstantPoolIndex:
 219     O << DL->getPrivateGlobalPrefix() << "CPI" << getFunctionNumber()
 220       << '_' << MO.getIndex();
 221     break;
 222   case MachineOperand::MO_BlockAddress:
 223     O << *GetBlockAddressSymbol(MO.getBlockAddress());
 224     break;
 225   default:
 226     llvm_unreachable("not implemented");
 227   }
 228 }
 229
 230 /// PrintAsmOperand - Print out an operand for an inline asm expression.
 231 ///
 232 bool XCoreAsmPrinter::PrintAsmOperand(const MachineInstr *MI, unsigned OpNo,
 233                                       unsigned AsmVariant,const char *ExtraCode,
 234                                       raw_ostream &O) {
 235   // Print the operand if there is no operand modifier.
 236   if (!ExtraCode || !ExtraCode[0]) {
 237     printOperand(MI, OpNo, O);
 238     return false;
 239   }
 240
 241   // Otherwise fallback on the default implementation.
 242   return AsmPrinter::PrintAsmOperand(MI, OpNo, AsmVariant, ExtraCode, O);
 243 }
 244
 245 void XCoreAsmPrinter::EmitInstruction(const MachineInstr *MI) {
 246   SmallString<128> Str;
 247   raw_svector_ostream O(Str);
 248
 249   switch (MI->getOpcode()) {
 250   case XCore::DBG_VALUE:
 251     llvm_unreachable("Should be handled target independently");
 252   case XCore::ADD_2rus:
 253     if (MI->getOperand(2).getImm() == 0) {
 254       O << "\tmov "
 255         << XCoreInstPrinter::getRegisterName(MI->getOperand(0).getReg()) << ", "
 256         << XCoreInstPrinter::getRegisterName(MI->getOperand(1).getReg());
 257       OutStreamer.EmitRawText(O.str());
 258       return;
 259     }
 260     break;
 261   case XCore::BR_JT:
 262   case XCore::BR_JT32:
 263     O << "\tbru "
 264       << XCoreInstPrinter::getRegisterName(MI->getOperand(1).getReg()) << '\n';
 265     if (MI->getOpcode() == XCore::BR_JT)
 266       printInlineJT(MI, 0, O);
 267     else
 268       printInlineJT32(MI, 0, O);
 269     O << '\n';
 270     OutStreamer.EmitRawText(O.str());
 271     return;
 272   }
 273
 274   MCInst TmpInst;
 275   MCInstLowering.Lower(MI, TmpInst);
 276
 277   OutStreamer.EmitInstruction(TmpInst);
 278 }
 279
 280 // Force static initialization.
 281 extern "C" void LLVMInitializeXCoreAsmPrinter() {
 282   RegisterAsmPrinter<XCoreAsmPrinter> X(TheXCoreTarget);
 283 }