965f5a180987ff320d9fed75cc4d2142c0495de5
[oota-llvm.git] / lib / Target / SystemZ / AsmPrinter / SystemZAsmPrinter.cpp
1 //===-- SystemZAsmPrinter.cpp - SystemZ 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 SystemZ assembly language.
12 //
13 //===----------------------------------------------------------------------===//
14
15 #define DEBUG_TYPE "asm-printer"
16 #include "SystemZ.h"
17 #include "SystemZInstrInfo.h"
18 #include "SystemZTargetMachine.h"
19 #include "llvm/Constants.h"
20 #include "llvm/DerivedTypes.h"
21 #include "llvm/Module.h"
22 #include "llvm/Assembly/Writer.h"
23 #include "llvm/CodeGen/AsmPrinter.h"
24 #include "llvm/CodeGen/DwarfWriter.h"
25 #include "llvm/CodeGen/MachineModuleInfo.h"
26 #include "llvm/CodeGen/MachineFunctionPass.h"
27 #include "llvm/CodeGen/MachineConstantPool.h"
28 #include "llvm/CodeGen/MachineInstr.h"
29 #include "llvm/MC/MCStreamer.h"
30 #include "llvm/MC/MCAsmInfo.h"
31 #include "llvm/MC/MCSymbol.h"
32 #include "llvm/Target/TargetData.h"
33 #include "llvm/Target/TargetLoweringObjectFile.h"
34 #include "llvm/Target/TargetRegistry.h"
35 #include "llvm/Support/ErrorHandling.h"
36 #include "llvm/Support/FormattedStream.h"
37 using namespace llvm;
38
39 namespace {
40   class SystemZAsmPrinter : public AsmPrinter {
41   public:
42     SystemZAsmPrinter(formatted_raw_ostream &O, TargetMachine &TM,
43                       MCContext &Ctx, MCStreamer &Streamer,
44                       const MCAsmInfo *MAI)
45       : AsmPrinter(O, TM, Ctx, Streamer, MAI) {}
46
47     virtual const char *getPassName() const {
48       return "SystemZ Assembly Printer";
49     }
50
51     void printOperand(const MachineInstr *MI, int OpNum,
52                       const char* Modifier = 0);
53     void printPCRelImmOperand(const MachineInstr *MI, int OpNum);
54     void printRIAddrOperand(const MachineInstr *MI, int OpNum,
55                             const char* Modifier = 0);
56     void printRRIAddrOperand(const MachineInstr *MI, int OpNum,
57                              const char* Modifier = 0);
58     void printS16ImmOperand(const MachineInstr *MI, int OpNum) {
59       O << (int16_t)MI->getOperand(OpNum).getImm();
60     }
61     void printS32ImmOperand(const MachineInstr *MI, int OpNum) {
62       O << (int32_t)MI->getOperand(OpNum).getImm();
63     }
64
65     void printInstruction(const MachineInstr *MI);  // autogenerated.
66     static const char *getRegisterName(unsigned RegNo);
67
68     void EmitInstruction(const MachineInstr *MI);
69
70     void getAnalysisUsage(AnalysisUsage &AU) const {
71       AsmPrinter::getAnalysisUsage(AU);
72       AU.setPreservesAll();
73     }
74   };
75 } // end of anonymous namespace
76
77 #include "SystemZGenAsmWriter.inc"
78
79 void SystemZAsmPrinter::EmitInstruction(const MachineInstr *MI) {
80   // Call the autogenerated instruction printer routines.
81   printInstruction(MI);
82   O << '\n';
83 }
84
85 void SystemZAsmPrinter::printPCRelImmOperand(const MachineInstr *MI, int OpNum){
86   const MachineOperand &MO = MI->getOperand(OpNum);
87   switch (MO.getType()) {
88   case MachineOperand::MO_Immediate:
89     O << MO.getImm();
90     return;
91   case MachineOperand::MO_MachineBasicBlock:
92     O << *MO.getMBB()->getSymbol(OutContext);
93     return;
94   case MachineOperand::MO_GlobalAddress: {
95     const GlobalValue *GV = MO.getGlobal();
96     O << *GetGlobalValueSymbol(GV);
97
98     // Assemble calls via PLT for externally visible symbols if PIC.
99     if (TM.getRelocationModel() == Reloc::PIC_ &&
100         !GV->hasHiddenVisibility() && !GV->hasProtectedVisibility() &&
101         !GV->hasLocalLinkage())
102       O << "@PLT";
103
104     printOffset(MO.getOffset());
105     return;
106   }
107   case MachineOperand::MO_ExternalSymbol: {
108     std::string Name(MAI->getGlobalPrefix());
109     Name += MO.getSymbolName();
110     O << Name;
111
112     if (TM.getRelocationModel() == Reloc::PIC_)
113       O << "@PLT";
114
115     return;
116   }
117   default:
118     assert(0 && "Not implemented yet!");
119   }
120 }
121
122
123 void SystemZAsmPrinter::printOperand(const MachineInstr *MI, int OpNum,
124                                      const char* Modifier) {
125   const MachineOperand &MO = MI->getOperand(OpNum);
126   switch (MO.getType()) {
127   case MachineOperand::MO_Register: {
128     assert (TargetRegisterInfo::isPhysicalRegister(MO.getReg()) &&
129             "Virtual registers should be already mapped!");
130     unsigned Reg = MO.getReg();
131     if (Modifier && strncmp(Modifier, "subreg", 6) == 0) {
132       if (strncmp(Modifier + 7, "even", 4) == 0)
133         Reg = TRI->getSubReg(Reg, SystemZ::SUBREG_EVEN);
134       else if (strncmp(Modifier + 7, "odd", 3) == 0)
135         Reg = TRI->getSubReg(Reg, SystemZ::SUBREG_ODD);
136       else
137         assert(0 && "Invalid subreg modifier");
138     }
139
140     O << '%' << getRegisterName(Reg);
141     return;
142   }
143   case MachineOperand::MO_Immediate:
144     O << MO.getImm();
145     return;
146   case MachineOperand::MO_MachineBasicBlock:
147     O << *MO.getMBB()->getSymbol(OutContext);
148     return;
149   case MachineOperand::MO_JumpTableIndex:
150     O << MAI->getPrivateGlobalPrefix() << "JTI" << getFunctionNumber() << '_'
151       << MO.getIndex();
152
153     return;
154   case MachineOperand::MO_ConstantPoolIndex:
155     O << MAI->getPrivateGlobalPrefix() << "CPI" << getFunctionNumber() << '_'
156       << MO.getIndex();
157
158     printOffset(MO.getOffset());
159     break;
160   case MachineOperand::MO_GlobalAddress:
161     O << *GetGlobalValueSymbol(MO.getGlobal());
162     break;
163   case MachineOperand::MO_ExternalSymbol: {
164     O << *GetExternalSymbolSymbol(MO.getSymbolName());
165     break;
166   }
167   default:
168     assert(0 && "Not implemented yet!");
169   }
170
171   switch (MO.getTargetFlags()) {
172   default:
173     llvm_unreachable("Unknown target flag on GV operand");
174   case SystemZII::MO_NO_FLAG:
175     break;
176   case SystemZII::MO_GOTENT:    O << "@GOTENT";    break;
177   case SystemZII::MO_PLT:       O << "@PLT";       break;
178   }
179
180   printOffset(MO.getOffset());
181 }
182
183 void SystemZAsmPrinter::printRIAddrOperand(const MachineInstr *MI, int OpNum,
184                                            const char* Modifier) {
185   const MachineOperand &Base = MI->getOperand(OpNum);
186
187   // Print displacement operand.
188   printOperand(MI, OpNum+1);
189
190   // Print base operand (if any)
191   if (Base.getReg()) {
192     O << '(';
193     printOperand(MI, OpNum);
194     O << ')';
195   }
196 }
197
198 void SystemZAsmPrinter::printRRIAddrOperand(const MachineInstr *MI, int OpNum,
199                                             const char* Modifier) {
200   const MachineOperand &Base = MI->getOperand(OpNum);
201   const MachineOperand &Index = MI->getOperand(OpNum+2);
202
203   // Print displacement operand.
204   printOperand(MI, OpNum+1);
205
206   // Print base operand (if any)
207   if (Base.getReg()) {
208     O << '(';
209     printOperand(MI, OpNum);
210     if (Index.getReg()) {
211       O << ',';
212       printOperand(MI, OpNum+2);
213     }
214     O << ')';
215   } else
216     assert(!Index.getReg() && "Should allocate base register first!");
217 }
218
219 // Force static initialization.
220 extern "C" void LLVMInitializeSystemZAsmPrinter() {
221   RegisterAsmPrinter<SystemZAsmPrinter> X(TheSystemZTarget);
222 }