Start using the AsmPrinter shared SwitchSection code. This allows the X86
[oota-llvm.git] / lib / Target / X86 / X86AsmPrinter.cpp
1 //===-- X86AsmPrinter.cpp - Convert X86 LLVM IR to X86 assembly -----------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file was developed by the LLVM research group and is distributed under
6 // the University of Illinois Open Source License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This file the shared super class printer that converts from our internal
11 // representation of machine-dependent LLVM code to Intel and AT&T format
12 // assembly language.
13 // This printer is the output mechanism used by `llc'.
14 //
15 //===----------------------------------------------------------------------===//
16
17 #include "X86ATTAsmPrinter.h"
18 #include "X86IntelAsmPrinter.h"
19 #include "X86.h"
20 #include "llvm/Module.h"
21 #include "llvm/Type.h"
22 #include "llvm/Assembly/Writer.h"
23 #include "llvm/CodeGen/MachineConstantPool.h"
24 #include "llvm/Support/Mangler.h"
25 #include "llvm/Support/CommandLine.h"
26 using namespace llvm;
27 using namespace x86;
28
29 Statistic<> llvm::x86::EmittedInsts("asm-printer",
30                                     "Number of machine instrs printed");
31
32 enum AsmWriterFlavorTy { att, intel };
33 cl::opt<AsmWriterFlavorTy>
34 AsmWriterFlavor("x86-asm-syntax",
35                 cl::desc("Choose style of code to emit from X86 backend:"),
36                 cl::values(
37                            clEnumVal(att,   "  Emit AT&T-style assembly"),
38                            clEnumVal(intel, "  Emit Intel-style assembly"),
39                            clEnumValEnd),
40                 cl::init(att));
41
42 /// doInitialization
43 bool X86SharedAsmPrinter::doInitialization(Module& M) {
44   bool leadingUnderscore = false;
45   forCygwin = false;
46   const std::string& TT = M.getTargetTriple();
47   if (TT.length() > 5) {
48     forCygwin = TT.find("cygwin") != std::string::npos ||
49                 TT.find("mingw")  != std::string::npos;
50     forDarwin = TT.find("darwin") != std::string::npos;
51   } else if (TT.empty()) {
52 #if defined(__CYGWIN__) || defined(__MINGW32__)
53     forCygwin = true;
54 #elif defined(__APPLE__)
55     forDarwin = true;
56 #elif defined(_WIN32)
57     leadingUnderscore = true;
58 #else
59     leadingUnderscore = false;
60 #endif
61   }
62
63   if (leadingUnderscore || forCygwin || forDarwin)
64     GlobalPrefix = "_";
65
66   if (forDarwin) {
67     AlignmentIsInBytes = false;
68     Data64bitsDirective = 0;       // we can't emit a 64-bit unit
69     ZeroDirective = "\t.space\t";  // ".space N" emits N zeros.
70     PrivateGlobalPrefix = "L";     // Marker for constant pool idxs
71   }
72
73   return AsmPrinter::doInitialization(M);
74 }
75
76 /// printConstantPool - Print to the current output stream assembly
77 /// representations of the constants in the constant pool MCP. This is
78 /// used to print out constants which have been "spilled to memory" by
79 /// the code generator.
80 ///
81 void X86SharedAsmPrinter::printConstantPool(MachineConstantPool *MCP) {
82   const std::vector<Constant*> &CP = MCP->getConstants();
83   const TargetData &TD = TM.getTargetData();
84
85   if (CP.empty()) return;
86
87   if (forDarwin) {
88     O << "\t.const\n";
89   } else {
90     O << "\t.section .rodata\n";
91   }
92   
93   for (unsigned i = 0, e = CP.size(); i != e; ++i) {
94     // FIXME: force doubles to be naturally aligned.  We should handle this
95     // more correctly in the future.
96     if (CP[i]->getType() == Type::DoubleTy)
97       emitAlignment(3);
98     else
99       emitAlignment(TD.getTypeAlignmentShift(CP[i]->getType()));
100     O << PrivateGlobalPrefix << "CPI" << CurrentFnName << "_" << i
101       << ":\t\t\t\t\t" << CommentString << *CP[i] << "\n";
102     emitGlobalConstant(CP[i]);
103   }
104 }
105
106 bool X86SharedAsmPrinter::doFinalization(Module &M) {
107   const TargetData &TD = TM.getTargetData();
108
109   // Print out module-level global variables here.
110   for (Module::const_global_iterator I = M.global_begin(),
111          E = M.global_end(); I != E; ++I)
112     if (I->hasInitializer()) {   // External global require no code
113       O << "\n\n";
114       std::string name = Mang->getValueName(I);
115       Constant *C = I->getInitializer();
116       unsigned Size = TD.getTypeSize(C->getType());
117       unsigned Align = TD.getTypeAlignmentShift(C->getType());
118
119       if (C->isNullValue() &&
120           (I->hasLinkOnceLinkage() || I->hasInternalLinkage() ||
121            I->hasWeakLinkage() /* FIXME: Verify correct */)) {
122         SwitchSection(".data", I);
123         if (!forCygwin && !forDarwin && I->hasInternalLinkage())
124           O << "\t.local " << name << "\n";
125         if (forDarwin && I->hasInternalLinkage())
126           O << "\t.lcomm " << name << "," << Size << "," << Align;
127         else
128           O << "\t.comm " << name << "," << Size;
129         if (!forCygwin && !forDarwin)
130           O << "," << (1 << Align);
131         O << "\t\t# ";
132         WriteAsOperand(O, I, true, true, &M);
133         O << "\n";
134       } else {
135         switch (I->getLinkage()) {
136         default: assert(0 && "Unknown linkage type!");
137         case GlobalValue::LinkOnceLinkage:
138         case GlobalValue::WeakLinkage:   // FIXME: Verify correct for weak.
139           // Nonnull linkonce -> weak
140           O << "\t.weak " << name << "\n";
141           O << "\t.section\t.llvm.linkonce.d." << name << ",\"aw\",@progbits\n";
142           SwitchSection("", I);
143           break;
144         case GlobalValue::AppendingLinkage:
145           // FIXME: appending linkage variables should go into a section of
146           // their name or something.  For now, just emit them as external.
147         case GlobalValue::ExternalLinkage:
148           // If external or appending, declare as a global symbol
149           O << "\t.globl " << name << "\n";
150           // FALL THROUGH
151         case GlobalValue::InternalLinkage:
152           SwitchSection(C->isNullValue() ? ".bss" : ".data", I);
153           break;
154         }
155
156         emitAlignment(Align);
157         if (!forCygwin && !forDarwin) {
158           O << "\t.type " << name << ",@object\n";
159           O << "\t.size " << name << "," << Size << "\n";
160         }
161         O << name << ":\t\t\t\t# ";
162         WriteAsOperand(O, I, true, true, &M);
163         O << " = ";
164         WriteAsOperand(O, C, false, false, &M);
165         O << "\n";
166         emitGlobalConstant(C);
167       }
168     }
169
170   if (forDarwin) {
171     // Output stubs for external global variables
172     if (GVStubs.begin() != GVStubs.end())
173       O << "\t.non_lazy_symbol_pointer\n";
174     for (std::set<std::string>::iterator i = GVStubs.begin(), e = GVStubs.end();
175          i != e; ++i) {
176       O << "L" << *i << "$non_lazy_ptr:\n";
177       O << "\t.indirect_symbol " << *i << "\n";
178       O << "\t.long\t0\n";
179     }
180
181     // Output stubs for dynamically-linked functions
182     unsigned j = 1;
183     for (std::set<std::string>::iterator i = FnStubs.begin(), e = FnStubs.end();
184          i != e; ++i, ++j) {
185       O << "\t.symbol_stub\n";
186       O << "L" << *i << "$stub:\n";
187       O << "\t.indirect_symbol " << *i << "\n";
188       O << "\tjmp\t*L" << j << "$lz\n";
189       O << "L" << *i << "$stub_binder:\n";
190       O << "\tpushl\t$L" << j << "$lz\n";
191       O << "\tjmp\tdyld_stub_binding_helper\n";
192       O << "\t.section __DATA, __la_sym_ptr3,lazy_symbol_pointers\n";
193       O << "L" << j << "$lz:\n";
194       O << "\t.indirect_symbol " << *i << "\n";
195       O << "\t.long\tL" << *i << "$stub_binder\n";
196     }
197
198     O << "\n";
199
200     // Output stubs for link-once variables
201     if (LinkOnceStubs.begin() != LinkOnceStubs.end())
202       O << ".data\n.align 2\n";
203     for (std::set<std::string>::iterator i = LinkOnceStubs.begin(),
204          e = LinkOnceStubs.end(); i != e; ++i) {
205       O << "L" << *i << "$non_lazy_ptr:\n"
206         << "\t.long\t" << *i << '\n';
207     }
208   }
209
210   AsmPrinter::doFinalization(M);
211   return false; // success
212 }
213
214 /// createX86CodePrinterPass - Returns a pass that prints the X86 assembly code
215 /// for a MachineFunction to the given output stream, using the given target
216 /// machine description.
217 ///
218 FunctionPass *llvm::createX86CodePrinterPass(std::ostream &o,TargetMachine &tm){
219   switch (AsmWriterFlavor) {
220   default:
221     assert(0 && "Unknown asm flavor!");
222   case intel:
223     return new X86IntelAsmPrinter(o, tm);
224   case att:
225     return new X86ATTAsmPrinter(o, tm);
226   }
227 }