blob: 3439460880755d36f769ae017da5f18701ed4efc [file] [log] [blame]
Chris Lattner6a8e0f52004-08-16 23:15:22 +00001//===-- AsmPrinter.cpp - Common AsmPrinter code ---------------------------===//
2//
3// The LLVM Compiler Infrastructure
4//
Chris Lattnerf3ebc3f2007-12-29 20:36:04 +00005// This file is distributed under the University of Illinois Open Source
6// License. See LICENSE.TXT for details.
Chris Lattner6a8e0f52004-08-16 23:15:22 +00007//
8//===----------------------------------------------------------------------===//
9//
10// This file implements the AsmPrinter class.
11//
12//===----------------------------------------------------------------------===//
13
Evan Cheng993e9cf2006-03-03 02:04:29 +000014#include "llvm/CodeGen/AsmPrinter.h"
Evan Cheng38d5e762006-03-01 22:18:09 +000015#include "llvm/Assembly/Writer.h"
Nate Begeman41b1cdc2005-12-06 06:18:55 +000016#include "llvm/DerivedTypes.h"
Chris Lattner6a8e0f52004-08-16 23:15:22 +000017#include "llvm/Constants.h"
Chris Lattnerc0a1eba2005-11-10 18:36:17 +000018#include "llvm/Module.h"
Gordon Henriksen5180e852008-01-07 01:30:38 +000019#include "llvm/CodeGen/Collector.h"
20#include "llvm/CodeGen/CollectorMetadata.h"
Chris Lattnerf2991ce2005-11-21 08:25:09 +000021#include "llvm/CodeGen/MachineConstantPool.h"
Nate Begeman4ca2ea52006-04-22 18:53:45 +000022#include "llvm/CodeGen/MachineJumpTableInfo.h"
Chris Lattnera10fff52007-12-31 04:13:23 +000023#include "llvm/CodeGen/MachineModuleInfo.h"
Jim Laskey1c055e82007-01-25 15:12:02 +000024#include "llvm/Support/CommandLine.h"
Chris Lattner6a8e0f52004-08-16 23:15:22 +000025#include "llvm/Support/Mangler.h"
Jim Laskeyb74c6662005-08-17 19:34:49 +000026#include "llvm/Support/MathExtras.h"
Bill Wendling5c3966a2006-11-29 00:39:47 +000027#include "llvm/Support/Streams.h"
Jim Laskeya6211dc2006-09-06 18:34:40 +000028#include "llvm/Target/TargetAsmInfo.h"
Owen Anderson8c2c1e92006-05-12 06:33:49 +000029#include "llvm/Target/TargetData.h"
Chris Lattner90438232006-10-06 22:50:56 +000030#include "llvm/Target/TargetLowering.h"
Chris Lattner6a8e0f52004-08-16 23:15:22 +000031#include "llvm/Target/TargetMachine.h"
Evan Cheng797d56f2007-11-09 01:32:10 +000032#include "llvm/ADT/SmallPtrSet.h"
Chris Lattneraa23fa92006-02-01 22:41:11 +000033#include <cerrno>
Chris Lattner6a8e0f52004-08-16 23:15:22 +000034using namespace llvm;
35
Jim Laskey1c055e82007-01-25 15:12:02 +000036static cl::opt<bool>
37AsmVerbose("asm-verbose", cl::Hidden, cl::desc("Add comments to directives."));
38
Devang Patel8c78a0b2007-05-03 01:11:54 +000039char AsmPrinter::ID = 0;
Jim Laskey261779b2006-09-07 22:06:40 +000040AsmPrinter::AsmPrinter(std::ostream &o, TargetMachine &tm,
41 const TargetAsmInfo *T)
Evan Chengc7990652008-02-28 00:43:03 +000042 : MachineFunctionPass((intptr_t)&ID), FunctionNumber(0), O(o), TM(tm), TAI(T),
43 IsInTextSection(false)
Jim Laskeya6211dc2006-09-06 18:34:40 +000044{}
Chris Lattnerf0e9aef2005-12-13 06:32:10 +000045
Chris Lattnerdc822412006-10-05 02:42:47 +000046std::string AsmPrinter::getSectionForFunction(const Function &F) const {
47 return TAI->getTextSection();
48}
49
Chris Lattnerf0e9aef2005-12-13 06:32:10 +000050
Chris Lattner8488ba22006-05-09 04:59:56 +000051/// SwitchToTextSection - Switch to the specified text section of the executable
52/// if we are not already in it!
Chris Lattner2ea5c992005-11-21 07:06:27 +000053///
Chris Lattner8488ba22006-05-09 04:59:56 +000054void AsmPrinter::SwitchToTextSection(const char *NewSection,
55 const GlobalValue *GV) {
Chris Lattner2ea5c992005-11-21 07:06:27 +000056 std::string NS;
Chris Lattner8c2bfc02006-05-09 05:24:50 +000057 if (GV && GV->hasSection())
Jim Laskeya6211dc2006-09-06 18:34:40 +000058 NS = TAI->getSwitchToSectionDirective() + GV->getSection();
Chris Lattner8c2bfc02006-05-09 05:24:50 +000059 else
60 NS = NewSection;
61
62 // If we're already in this section, we're done.
63 if (CurrentSection == NS) return;
Jeff Cohen470f4312006-05-02 03:58:45 +000064
Chris Lattner4ebc6a22006-05-09 05:33:48 +000065 // Close the current section, if applicable.
Jim Laskeya6211dc2006-09-06 18:34:40 +000066 if (TAI->getSectionEndDirectiveSuffix() && !CurrentSection.empty())
67 O << CurrentSection << TAI->getSectionEndDirectiveSuffix() << "\n";
Jeff Cohen470f4312006-05-02 03:58:45 +000068
Chris Lattner4ebc6a22006-05-09 05:33:48 +000069 CurrentSection = NS;
70
71 if (!CurrentSection.empty())
Jim Laskeya6211dc2006-09-06 18:34:40 +000072 O << CurrentSection << TAI->getTextSectionStartSuffix() << '\n';
Evan Chengc7990652008-02-28 00:43:03 +000073
74 IsInTextSection = true;
Chris Lattner2ea5c992005-11-21 07:06:27 +000075}
76
Nate Begeman78756502006-07-27 01:13:04 +000077/// SwitchToDataSection - Switch to the specified data section of the executable
Chris Lattner8488ba22006-05-09 04:59:56 +000078/// if we are not already in it!
79///
80void AsmPrinter::SwitchToDataSection(const char *NewSection,
81 const GlobalValue *GV) {
82 std::string NS;
Chris Lattner6341df82006-05-09 05:23:12 +000083 if (GV && GV->hasSection())
Jim Laskeya6211dc2006-09-06 18:34:40 +000084 NS = TAI->getSwitchToSectionDirective() + GV->getSection();
Chris Lattner6341df82006-05-09 05:23:12 +000085 else
86 NS = NewSection;
Chris Lattner8488ba22006-05-09 04:59:56 +000087
Chris Lattner6341df82006-05-09 05:23:12 +000088 // If we're already in this section, we're done.
89 if (CurrentSection == NS) return;
90
Chris Lattner4ebc6a22006-05-09 05:33:48 +000091 // Close the current section, if applicable.
Jim Laskeya6211dc2006-09-06 18:34:40 +000092 if (TAI->getSectionEndDirectiveSuffix() && !CurrentSection.empty())
93 O << CurrentSection << TAI->getSectionEndDirectiveSuffix() << "\n";
Chris Lattner4ebc6a22006-05-09 05:33:48 +000094
95 CurrentSection = NS;
Chris Lattner8488ba22006-05-09 04:59:56 +000096
Chris Lattner4ebc6a22006-05-09 05:33:48 +000097 if (!CurrentSection.empty())
Jim Laskeya6211dc2006-09-06 18:34:40 +000098 O << CurrentSection << TAI->getDataSectionStartSuffix() << '\n';
Evan Chengc7990652008-02-28 00:43:03 +000099
100 IsInTextSection = false;
Chris Lattner8488ba22006-05-09 04:59:56 +0000101}
102
103
Gordon Henriksen5180e852008-01-07 01:30:38 +0000104void AsmPrinter::getAnalysisUsage(AnalysisUsage &AU) const {
105 MachineFunctionPass::getAnalysisUsage(AU);
106 AU.addRequired<CollectorModuleMetadata>();
107}
108
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000109bool AsmPrinter::doInitialization(Module &M) {
Jim Laskeya6211dc2006-09-06 18:34:40 +0000110 Mang = new Mangler(M, TAI->getGlobalPrefix());
Chris Lattnere3a79262006-01-23 23:47:53 +0000111
Gordon Henriksen5180e852008-01-07 01:30:38 +0000112 CollectorModuleMetadata *CMM = getAnalysisToUpdate<CollectorModuleMetadata>();
113 assert(CMM && "AsmPrinter didn't require CollectorModuleMetadata?");
114 for (CollectorModuleMetadata::iterator I = CMM->begin(),
115 E = CMM->end(); I != E; ++I)
116 (*I)->beginAssembly(O, *this, *TAI);
117
Chris Lattner00fcdfe2006-01-24 04:16:34 +0000118 if (!M.getModuleInlineAsm().empty())
Jim Laskeya6211dc2006-09-06 18:34:40 +0000119 O << TAI->getCommentString() << " Start of file scope inline assembly\n"
Chris Lattner00fcdfe2006-01-24 04:16:34 +0000120 << M.getModuleInlineAsm()
Jim Laskeya6211dc2006-09-06 18:34:40 +0000121 << "\n" << TAI->getCommentString()
122 << " End of file scope inline assembly\n";
Chris Lattnere3a79262006-01-23 23:47:53 +0000123
Anton Korobeynikovaa4c0f92006-10-31 08:31:24 +0000124 SwitchToDataSection(""); // Reset back to no section.
Jim Laskey0bbdc552006-01-26 20:21:46 +0000125
Evan Cheng2cb90682008-02-04 23:06:48 +0000126 MMI = getAnalysisToUpdate<MachineModuleInfo>();
127 if (MMI) MMI->AnalyzeModule(M);
Jim Laskey0bbdc552006-01-26 20:21:46 +0000128
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000129 return false;
130}
131
132bool AsmPrinter::doFinalization(Module &M) {
Rafael Espindolad7998d02006-12-18 03:37:18 +0000133 if (TAI->getWeakRefDirective()) {
Anton Korobeynikova97b6942007-04-25 14:27:10 +0000134 if (!ExtWeakSymbols.empty())
Rafael Espindolad7998d02006-12-18 03:37:18 +0000135 SwitchToDataSection("");
136
137 for (std::set<const GlobalValue*>::iterator i = ExtWeakSymbols.begin(),
138 e = ExtWeakSymbols.end(); i != e; ++i) {
139 const GlobalValue *GV = *i;
140 std::string Name = Mang->getValueName(GV);
141 O << TAI->getWeakRefDirective() << Name << "\n";
142 }
143 }
144
Anton Korobeynikova97b6942007-04-25 14:27:10 +0000145 if (TAI->getSetDirective()) {
Anton Korobeynikovb18f8f82007-04-28 13:45:00 +0000146 if (!M.alias_empty())
Anton Korobeynikova97b6942007-04-25 14:27:10 +0000147 SwitchToTextSection(TAI->getTextSection());
148
149 O << "\n";
150 for (Module::const_alias_iterator I = M.alias_begin(), E = M.alias_end();
151 I!=E; ++I) {
Anton Korobeynikovb18f8f82007-04-28 13:45:00 +0000152 std::string Name = Mang->getValueName(I);
153 std::string Target;
Anton Korobeynikova07765b2007-09-06 17:21:48 +0000154
155 const GlobalValue *GV = cast<GlobalValue>(I->getAliasedGlobal());
156 Target = Mang->getValueName(GV);
Anton Korobeynikovb18f8f82007-04-28 13:45:00 +0000157
Anton Korobeynikova07765b2007-09-06 17:21:48 +0000158 if (I->hasExternalLinkage() || !TAI->getWeakRefDirective())
Anton Korobeynikova97b6942007-04-25 14:27:10 +0000159 O << "\t.globl\t" << Name << "\n";
160 else if (I->hasWeakLinkage())
161 O << TAI->getWeakRefDirective() << Name << "\n";
162 else if (!I->hasInternalLinkage())
163 assert(0 && "Invalid alias linkage");
Anton Korobeynikov2601d7e2008-03-11 21:41:14 +0000164
165 if (I->hasHiddenVisibility()) {
166 if (const char *Directive = TAI->getHiddenDirective())
167 O << Directive << Name << "\n";
168 } else if (I->hasProtectedVisibility()) {
169 if (const char *Directive = TAI->getProtectedDirective())
170 O << Directive << Name << "\n";
171 }
172
Nick Lewycky7c1d7872008-02-07 06:36:26 +0000173 O << TAI->getSetDirective() << ' ' << Name << ", " << Target << "\n";
Anton Korobeynikova07765b2007-09-06 17:21:48 +0000174
175 // If the aliasee has external weak linkage it can be referenced only by
176 // alias itself. In this case it can be not in ExtWeakSymbols list. Emit
177 // weak reference in such case.
Anton Korobeynikov035eaac2008-02-20 11:10:28 +0000178 if (GV->hasExternalWeakLinkage()) {
Anton Korobeynikova07765b2007-09-06 17:21:48 +0000179 if (TAI->getWeakRefDirective())
180 O << TAI->getWeakRefDirective() << Target << "\n";
181 else
182 O << "\t.globl\t" << Target << "\n";
Anton Korobeynikov035eaac2008-02-20 11:10:28 +0000183 }
Anton Korobeynikova97b6942007-04-25 14:27:10 +0000184 }
185 }
186
Gordon Henriksen5180e852008-01-07 01:30:38 +0000187 CollectorModuleMetadata *CMM = getAnalysisToUpdate<CollectorModuleMetadata>();
188 assert(CMM && "AsmPrinter didn't require CollectorModuleMetadata?");
189 for (CollectorModuleMetadata::iterator I = CMM->end(),
190 E = CMM->begin(); I != E; )
191 (*--I)->finishAssembly(O, *this, *TAI);
192
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000193 delete Mang; Mang = 0;
194 return false;
195}
196
Bill Wendlinge8c885f2007-09-18 09:10:16 +0000197std::string AsmPrinter::getCurrentFunctionEHName(const MachineFunction *MF) {
Bill Wendling067f1d82007-09-18 01:47:22 +0000198 assert(MF && "No machine function?");
Bill Wendling69833b62007-09-18 05:03:44 +0000199 return Mang->makeNameProper(MF->getFunction()->getName() + ".eh",
200 TAI->getGlobalPrefix());
Bill Wendling067f1d82007-09-18 01:47:22 +0000201}
202
Chris Lattnerbb644e32005-11-21 07:51:36 +0000203void AsmPrinter::SetupMachineFunction(MachineFunction &MF) {
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000204 // What's my mangled name?
Chris Lattnerc0a1eba2005-11-10 18:36:17 +0000205 CurrentFnName = Mang->getValueName(MF.getFunction());
Evan Chengcdf36092007-10-14 05:57:21 +0000206 IncrementFunctionNumber();
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000207}
208
Chris Lattnerf2991ce2005-11-21 08:25:09 +0000209/// EmitConstantPool - Print to the current output stream assembly
210/// representations of the constants in the constant pool MCP. This is
211/// used to print out constants which have been "spilled to memory" by
212/// the code generator.
213///
214void AsmPrinter::EmitConstantPool(MachineConstantPool *MCP) {
Chris Lattnerba972642006-02-09 04:22:52 +0000215 const std::vector<MachineConstantPoolEntry> &CP = MCP->getConstants();
Chris Lattnerf2991ce2005-11-21 08:25:09 +0000216 if (CP.empty()) return;
Evan Chengec1d60b2006-06-29 00:26:09 +0000217
218 // Some targets require 4-, 8-, and 16- byte constant literals to be placed
219 // in special sections.
220 std::vector<std::pair<MachineConstantPoolEntry,unsigned> > FourByteCPs;
221 std::vector<std::pair<MachineConstantPoolEntry,unsigned> > EightByteCPs;
222 std::vector<std::pair<MachineConstantPoolEntry,unsigned> > SixteenByteCPs;
223 std::vector<std::pair<MachineConstantPoolEntry,unsigned> > OtherCPs;
Evan Cheng45fe3bc2006-09-12 21:00:35 +0000224 std::vector<std::pair<MachineConstantPoolEntry,unsigned> > TargetCPs;
Chris Lattnerf2991ce2005-11-21 08:25:09 +0000225 for (unsigned i = 0, e = CP.size(); i != e; ++i) {
Evan Chengec1d60b2006-06-29 00:26:09 +0000226 MachineConstantPoolEntry CPE = CP[i];
Evan Cheng2ad050f2006-09-14 07:35:00 +0000227 const Type *Ty = CPE.getType();
Jim Laskeya6211dc2006-09-06 18:34:40 +0000228 if (TAI->getFourByteConstantSection() &&
Duncan Sands283207a2007-11-05 00:04:43 +0000229 TM.getTargetData()->getABITypeSize(Ty) == 4)
Evan Chengec1d60b2006-06-29 00:26:09 +0000230 FourByteCPs.push_back(std::make_pair(CPE, i));
Evan Cheng95b3dde2006-09-07 18:50:20 +0000231 else if (TAI->getEightByteConstantSection() &&
Duncan Sands283207a2007-11-05 00:04:43 +0000232 TM.getTargetData()->getABITypeSize(Ty) == 8)
Evan Chengec1d60b2006-06-29 00:26:09 +0000233 EightByteCPs.push_back(std::make_pair(CPE, i));
Evan Cheng95b3dde2006-09-07 18:50:20 +0000234 else if (TAI->getSixteenByteConstantSection() &&
Duncan Sands283207a2007-11-05 00:04:43 +0000235 TM.getTargetData()->getABITypeSize(Ty) == 16)
Evan Chengec1d60b2006-06-29 00:26:09 +0000236 SixteenByteCPs.push_back(std::make_pair(CPE, i));
237 else
238 OtherCPs.push_back(std::make_pair(CPE, i));
239 }
240
241 unsigned Alignment = MCP->getConstantPoolAlignment();
Jim Laskeya6211dc2006-09-06 18:34:40 +0000242 EmitConstantPool(Alignment, TAI->getFourByteConstantSection(), FourByteCPs);
243 EmitConstantPool(Alignment, TAI->getEightByteConstantSection(), EightByteCPs);
244 EmitConstantPool(Alignment, TAI->getSixteenByteConstantSection(),
245 SixteenByteCPs);
246 EmitConstantPool(Alignment, TAI->getConstantPoolSection(), OtherCPs);
Evan Chengec1d60b2006-06-29 00:26:09 +0000247}
248
249void AsmPrinter::EmitConstantPool(unsigned Alignment, const char *Section,
250 std::vector<std::pair<MachineConstantPoolEntry,unsigned> > &CP) {
251 if (CP.empty()) return;
252
Anton Korobeynikovaa4c0f92006-10-31 08:31:24 +0000253 SwitchToDataSection(Section);
Evan Chengec1d60b2006-06-29 00:26:09 +0000254 EmitAlignment(Alignment);
255 for (unsigned i = 0, e = CP.size(); i != e; ++i) {
Evan Chengcdf36092007-10-14 05:57:21 +0000256 O << TAI->getPrivateGlobalPrefix() << "CPI" << getFunctionNumber() << '_'
257 << CP[i].second << ":\t\t\t\t\t" << TAI->getCommentString() << " ";
Evan Cheng2ad050f2006-09-14 07:35:00 +0000258 WriteTypeSymbolic(O, CP[i].first.getType(), 0) << '\n';
259 if (CP[i].first.isMachineConstantPoolEntry())
Evan Cheng45fe3bc2006-09-12 21:00:35 +0000260 EmitMachineConstantPoolValue(CP[i].first.Val.MachineCPVal);
Evan Cheng2ad050f2006-09-14 07:35:00 +0000261 else
Evan Cheng45fe3bc2006-09-12 21:00:35 +0000262 EmitGlobalConstant(CP[i].first.Val.ConstVal);
Chris Lattnerf6190822006-02-09 04:46:04 +0000263 if (i != e-1) {
Evan Cheng2ad050f2006-09-14 07:35:00 +0000264 const Type *Ty = CP[i].first.getType();
Evan Chengec1d60b2006-06-29 00:26:09 +0000265 unsigned EntSize =
Duncan Sands283207a2007-11-05 00:04:43 +0000266 TM.getTargetData()->getABITypeSize(Ty);
Evan Cheng2ad050f2006-09-14 07:35:00 +0000267 unsigned ValEnd = CP[i].first.getOffset() + EntSize;
Chris Lattnerf6190822006-02-09 04:46:04 +0000268 // Emit inter-object padding for alignment.
Evan Cheng2ad050f2006-09-14 07:35:00 +0000269 EmitZeros(CP[i+1].first.getOffset()-ValEnd);
Chris Lattnerf6190822006-02-09 04:46:04 +0000270 }
Chris Lattnerf2991ce2005-11-21 08:25:09 +0000271 }
272}
273
Nate Begeman4ca2ea52006-04-22 18:53:45 +0000274/// EmitJumpTableInfo - Print assembly representations of the jump tables used
275/// by the current function to the current output stream.
276///
Chris Lattnera6a570e2006-10-05 03:01:21 +0000277void AsmPrinter::EmitJumpTableInfo(MachineJumpTableInfo *MJTI,
278 MachineFunction &MF) {
Nate Begeman4ca2ea52006-04-22 18:53:45 +0000279 const std::vector<MachineJumpTableEntry> &JT = MJTI->getJumpTables();
280 if (JT.empty()) return;
Anton Korobeynikov2c638782007-11-14 09:18:41 +0000281
Jim Laskey70323a82006-12-14 19:17:33 +0000282 bool IsPic = TM.getRelocationModel() == Reloc::PIC_;
Nate Begemanefc312a2006-07-27 16:46:58 +0000283
Nate Begeman78756502006-07-27 01:13:04 +0000284 // Pick the directive to use to print the jump table entries, and switch to
285 // the appropriate section.
Jim Laskey70323a82006-12-14 19:17:33 +0000286 TargetLowering *LoweringInfo = TM.getTargetLowering();
Anton Korobeynikov44ef9342006-12-19 21:04:20 +0000287
288 const char* JumpTableDataSection = TAI->getJumpTableDataSection();
289 if ((IsPic && !(LoweringInfo && LoweringInfo->usesGlobalOffsetTable())) ||
290 !JumpTableDataSection) {
Jim Laskey70323a82006-12-14 19:17:33 +0000291 // In PIC mode, we need to emit the jump table to the same section as the
292 // function body itself, otherwise the label differences won't make sense.
Anton Korobeynikov44ef9342006-12-19 21:04:20 +0000293 // We should also do if the section name is NULL.
Jim Laskey70323a82006-12-14 19:17:33 +0000294 const Function *F = MF.getFunction();
295 SwitchToTextSection(getSectionForFunction(*F).c_str(), F);
Nate Begeman78756502006-07-27 01:13:04 +0000296 } else {
Anton Korobeynikov44ef9342006-12-19 21:04:20 +0000297 SwitchToDataSection(JumpTableDataSection);
Nate Begeman78756502006-07-27 01:13:04 +0000298 }
Jim Laskey70323a82006-12-14 19:17:33 +0000299
300 EmitAlignment(Log2_32(MJTI->getAlignment()));
Chris Lattnerfd5a8eb2006-07-15 01:34:12 +0000301
Nate Begeman4ca2ea52006-04-22 18:53:45 +0000302 for (unsigned i = 0, e = JT.size(); i != e; ++i) {
Nate Begeman984c1a42006-08-12 21:29:52 +0000303 const std::vector<MachineBasicBlock*> &JTBBs = JT[i].MBBs;
Chris Lattner28bfe382006-10-28 18:10:06 +0000304
305 // If this jump table was deleted, ignore it.
306 if (JTBBs.empty()) continue;
Nate Begeman984c1a42006-08-12 21:29:52 +0000307
308 // For PIC codegen, if possible we want to use the SetDirective to reduce
309 // the number of relocations the assembler will generate for the jump table.
310 // Set directives are all printed before the jump table itself.
Evan Cheng797d56f2007-11-09 01:32:10 +0000311 SmallPtrSet<MachineBasicBlock*, 16> EmittedSets;
Jim Laskey70323a82006-12-14 19:17:33 +0000312 if (TAI->getSetDirective() && IsPic)
Nate Begeman984c1a42006-08-12 21:29:52 +0000313 for (unsigned ii = 0, ee = JTBBs.size(); ii != ee; ++ii)
Evan Cheng797d56f2007-11-09 01:32:10 +0000314 if (EmittedSets.insert(JTBBs[ii]))
315 printPICJumpTableSetLabel(i, JTBBs[ii]);
Nate Begeman984c1a42006-08-12 21:29:52 +0000316
Chris Lattner0ee2d462007-01-18 01:12:56 +0000317 // On some targets (e.g. darwin) we want to emit two consequtive labels
318 // before each jump table. The first label is never referenced, but tells
319 // the assembler and linker the extents of the jump table object. The
320 // second label is actually referenced by the code.
321 if (const char *JTLabelPrefix = TAI->getJumpTableSpecialLabelPrefix())
Evan Chengcdf36092007-10-14 05:57:21 +0000322 O << JTLabelPrefix << "JTI" << getFunctionNumber() << '_' << i << ":\n";
Chris Lattner0ee2d462007-01-18 01:12:56 +0000323
Evan Chengcdf36092007-10-14 05:57:21 +0000324 O << TAI->getPrivateGlobalPrefix() << "JTI" << getFunctionNumber()
325 << '_' << i << ":\n";
Nate Begeman984c1a42006-08-12 21:29:52 +0000326
Nate Begeman4ca2ea52006-04-22 18:53:45 +0000327 for (unsigned ii = 0, ee = JTBBs.size(); ii != ee; ++ii) {
Anton Korobeynikov2c638782007-11-14 09:18:41 +0000328 printPICJumpTableEntry(MJTI, JTBBs[ii], i);
Nate Begeman4ca2ea52006-04-22 18:53:45 +0000329 O << '\n';
330 }
331 }
332}
333
Anton Korobeynikov2c638782007-11-14 09:18:41 +0000334void AsmPrinter::printPICJumpTableEntry(const MachineJumpTableInfo *MJTI,
335 const MachineBasicBlock *MBB,
336 unsigned uid) const {
337 bool IsPic = TM.getRelocationModel() == Reloc::PIC_;
338
339 // Use JumpTableDirective otherwise honor the entry size from the jump table
340 // info.
341 const char *JTEntryDirective = TAI->getJumpTableDirective();
342 bool HadJTEntryDirective = JTEntryDirective != NULL;
343 if (!HadJTEntryDirective) {
344 JTEntryDirective = MJTI->getEntrySize() == 4 ?
345 TAI->getData32bitsDirective() : TAI->getData64bitsDirective();
346 }
347
348 O << JTEntryDirective << ' ';
349
350 // If we have emitted set directives for the jump table entries, print
351 // them rather than the entries themselves. If we're emitting PIC, then
352 // emit the table entries as differences between two text section labels.
353 // If we're emitting non-PIC code, then emit the entries as direct
354 // references to the target basic blocks.
355 if (IsPic) {
356 if (TAI->getSetDirective()) {
357 O << TAI->getPrivateGlobalPrefix() << getFunctionNumber()
358 << '_' << uid << "_set_" << MBB->getNumber();
359 } else {
Evan Chengc7990652008-02-28 00:43:03 +0000360 printBasicBlockLabel(MBB, false, false, false);
Anton Korobeynikov2c638782007-11-14 09:18:41 +0000361 // If the arch uses custom Jump Table directives, don't calc relative to
362 // JT
363 if (!HadJTEntryDirective)
364 O << '-' << TAI->getPrivateGlobalPrefix() << "JTI"
365 << getFunctionNumber() << '_' << uid;
366 }
367 } else {
Evan Chengc7990652008-02-28 00:43:03 +0000368 printBasicBlockLabel(MBB, false, false, false);
Anton Korobeynikov2c638782007-11-14 09:18:41 +0000369 }
370}
371
372
Chris Lattnerf0e9aef2005-12-13 06:32:10 +0000373/// EmitSpecialLLVMGlobal - Check to see if the specified global is a
374/// special global used by LLVM. If so, emit it and return true, otherwise
375/// do nothing and return false.
376bool AsmPrinter::EmitSpecialLLVMGlobal(const GlobalVariable *GV) {
Andrew Lenharthbeb80a92007-08-22 19:33:11 +0000377 if (GV->getName() == "llvm.used") {
378 if (TAI->getUsedDirective() != 0) // No need to emit this at all.
379 EmitLLVMUsedList(GV->getInitializer());
380 return true;
381 }
382
Jim Laskey313570f2006-03-07 22:00:35 +0000383 // Ignore debug and non-emitted data.
384 if (GV->getSection() == "llvm.metadata") return true;
385
386 if (!GV->hasAppendingLinkage()) return false;
387
388 assert(GV->hasInitializer() && "Not a special LLVM global!");
Chris Lattnerf0e9aef2005-12-13 06:32:10 +0000389
Evan Cheng53ce7de2007-06-04 20:39:18 +0000390 const TargetData *TD = TM.getTargetData();
391 unsigned Align = Log2_32(TD->getPointerPrefAlignment());
Chris Lattner3760e902006-01-12 19:17:23 +0000392 if (GV->getName() == "llvm.global_ctors" && GV->use_empty()) {
Anton Korobeynikovaa4c0f92006-10-31 08:31:24 +0000393 SwitchToDataSection(TAI->getStaticCtorsSection());
Evan Cheng53ce7de2007-06-04 20:39:18 +0000394 EmitAlignment(Align, 0);
Chris Lattnerf0e9aef2005-12-13 06:32:10 +0000395 EmitXXStructorList(GV->getInitializer());
396 return true;
397 }
398
Chris Lattner3760e902006-01-12 19:17:23 +0000399 if (GV->getName() == "llvm.global_dtors" && GV->use_empty()) {
Anton Korobeynikovaa4c0f92006-10-31 08:31:24 +0000400 SwitchToDataSection(TAI->getStaticDtorsSection());
Evan Cheng53ce7de2007-06-04 20:39:18 +0000401 EmitAlignment(Align, 0);
Chris Lattnerf0e9aef2005-12-13 06:32:10 +0000402 EmitXXStructorList(GV->getInitializer());
403 return true;
404 }
405
406 return false;
407}
408
Chris Lattner66af3902006-09-26 03:38:18 +0000409/// EmitLLVMUsedList - For targets that define a TAI::UsedDirective, mark each
410/// global in the specified llvm.used list as being used with this directive.
411void AsmPrinter::EmitLLVMUsedList(Constant *List) {
412 const char *Directive = TAI->getUsedDirective();
413
414 // Should be an array of 'sbyte*'.
415 ConstantArray *InitList = dyn_cast<ConstantArray>(List);
416 if (InitList == 0) return;
417
418 for (unsigned i = 0, e = InitList->getNumOperands(); i != e; ++i) {
419 O << Directive;
420 EmitConstantValueOnly(InitList->getOperand(i));
421 O << "\n";
422 }
423}
424
Chris Lattnerf0e9aef2005-12-13 06:32:10 +0000425/// EmitXXStructorList - Emit the ctor or dtor list. This just prints out the
426/// function pointers, ignoring the init priority.
427void AsmPrinter::EmitXXStructorList(Constant *List) {
428 // Should be an array of '{ int, void ()* }' structs. The first value is the
429 // init priority, which we ignore.
430 if (!isa<ConstantArray>(List)) return;
431 ConstantArray *InitList = cast<ConstantArray>(List);
432 for (unsigned i = 0, e = InitList->getNumOperands(); i != e; ++i)
433 if (ConstantStruct *CS = dyn_cast<ConstantStruct>(InitList->getOperand(i))){
434 if (CS->getNumOperands() != 2) return; // Not array of 2-element structs.
Chris Lattner434ffe42005-12-21 01:17:37 +0000435
436 if (CS->getOperand(1)->isNullValue())
437 return; // Found a null terminator, exit printing.
438 // Emit the function pointer.
Chris Lattnerf0e9aef2005-12-13 06:32:10 +0000439 EmitGlobalConstant(CS->getOperand(1));
440 }
441}
Chris Lattnerf2991ce2005-11-21 08:25:09 +0000442
Jim Laskey71262542006-10-17 13:41:07 +0000443/// getGlobalLinkName - Returns the asm/link name of of the specified
444/// global variable. Should be overridden by each target asm printer to
445/// generate the appropriate value.
Jim Laskeyd24b9132006-10-17 17:17:24 +0000446const std::string AsmPrinter::getGlobalLinkName(const GlobalVariable *GV) const{
447 std::string LinkName;
Jim Laskeyd7f53cd2006-11-20 20:29:06 +0000448
449 if (isa<Function>(GV)) {
450 LinkName += TAI->getFunctionAddrPrefix();
451 LinkName += Mang->getValueName(GV);
452 LinkName += TAI->getFunctionAddrSuffix();
453 } else {
454 LinkName += TAI->getGlobalVarAddrPrefix();
455 LinkName += Mang->getValueName(GV);
456 LinkName += TAI->getGlobalVarAddrSuffix();
457 }
458
Jim Laskeyd24b9132006-10-17 17:17:24 +0000459 return LinkName;
Jim Laskey71262542006-10-17 13:41:07 +0000460}
461
Jim Laskey18fc0972007-02-21 22:47:38 +0000462/// EmitExternalGlobal - Emit the external reference to a global variable.
463/// Should be overridden if an indirect reference should be used.
464void AsmPrinter::EmitExternalGlobal(const GlobalVariable *GV) {
465 O << getGlobalLinkName(GV);
466}
467
468
469
Jim Laskey1c055e82007-01-25 15:12:02 +0000470//===----------------------------------------------------------------------===//
471/// LEB 128 number encoding.
472
473/// PrintULEB128 - Print a series of hexidecimal values (separated by commas)
474/// representing an unsigned leb128 value.
475void AsmPrinter::PrintULEB128(unsigned Value) const {
476 do {
477 unsigned Byte = Value & 0x7f;
478 Value >>= 7;
479 if (Value) Byte |= 0x80;
480 O << "0x" << std::hex << Byte << std::dec;
481 if (Value) O << ", ";
482 } while (Value);
483}
484
485/// SizeULEB128 - Compute the number of bytes required for an unsigned leb128
486/// value.
487unsigned AsmPrinter::SizeULEB128(unsigned Value) {
488 unsigned Size = 0;
489 do {
490 Value >>= 7;
491 Size += sizeof(int8_t);
492 } while (Value);
493 return Size;
494}
495
496/// PrintSLEB128 - Print a series of hexidecimal values (separated by commas)
497/// representing a signed leb128 value.
498void AsmPrinter::PrintSLEB128(int Value) const {
499 int Sign = Value >> (8 * sizeof(Value) - 1);
500 bool IsMore;
501
502 do {
503 unsigned Byte = Value & 0x7f;
504 Value >>= 7;
505 IsMore = Value != Sign || ((Byte ^ Sign) & 0x40) != 0;
506 if (IsMore) Byte |= 0x80;
507 O << "0x" << std::hex << Byte << std::dec;
508 if (IsMore) O << ", ";
509 } while (IsMore);
510}
511
512/// SizeSLEB128 - Compute the number of bytes required for a signed leb128
513/// value.
514unsigned AsmPrinter::SizeSLEB128(int Value) {
515 unsigned Size = 0;
516 int Sign = Value >> (8 * sizeof(Value) - 1);
517 bool IsMore;
518
519 do {
520 unsigned Byte = Value & 0x7f;
521 Value >>= 7;
522 IsMore = Value != Sign || ((Byte ^ Sign) & 0x40) != 0;
523 Size += sizeof(int8_t);
524 } while (IsMore);
525 return Size;
526}
527
528//===--------------------------------------------------------------------===//
529// Emission and print routines
530//
531
532/// PrintHex - Print a value as a hexidecimal value.
533///
534void AsmPrinter::PrintHex(int Value) const {
535 O << "0x" << std::hex << Value << std::dec;
536}
537
538/// EOL - Print a newline character to asm stream. If a comment is present
539/// then it will be printed first. Comments should not contain '\n'.
Jim Laskey18fc0972007-02-21 22:47:38 +0000540void AsmPrinter::EOL() const {
541 O << "\n";
542}
Jim Laskey1c055e82007-01-25 15:12:02 +0000543void AsmPrinter::EOL(const std::string &Comment) const {
544 if (AsmVerbose && !Comment.empty()) {
545 O << "\t"
546 << TAI->getCommentString()
547 << " "
548 << Comment;
549 }
550 O << "\n";
551}
552
553/// EmitULEB128Bytes - Emit an assembler byte data directive to compose an
554/// unsigned leb128 value.
555void AsmPrinter::EmitULEB128Bytes(unsigned Value) const {
556 if (TAI->hasLEB128()) {
557 O << "\t.uleb128\t"
558 << Value;
559 } else {
560 O << TAI->getData8bitsDirective();
561 PrintULEB128(Value);
562 }
563}
564
565/// EmitSLEB128Bytes - print an assembler byte data directive to compose a
566/// signed leb128 value.
567void AsmPrinter::EmitSLEB128Bytes(int Value) const {
568 if (TAI->hasLEB128()) {
569 O << "\t.sleb128\t"
570 << Value;
571 } else {
572 O << TAI->getData8bitsDirective();
573 PrintSLEB128(Value);
574 }
575}
576
577/// EmitInt8 - Emit a byte directive and value.
578///
579void AsmPrinter::EmitInt8(int Value) const {
580 O << TAI->getData8bitsDirective();
581 PrintHex(Value & 0xFF);
582}
583
584/// EmitInt16 - Emit a short directive and value.
585///
586void AsmPrinter::EmitInt16(int Value) const {
587 O << TAI->getData16bitsDirective();
588 PrintHex(Value & 0xFFFF);
589}
590
591/// EmitInt32 - Emit a long directive and value.
592///
593void AsmPrinter::EmitInt32(int Value) const {
594 O << TAI->getData32bitsDirective();
595 PrintHex(Value);
596}
597
598/// EmitInt64 - Emit a long long directive and value.
599///
600void AsmPrinter::EmitInt64(uint64_t Value) const {
601 if (TAI->getData64bitsDirective()) {
602 O << TAI->getData64bitsDirective();
603 PrintHex(Value);
604 } else {
605 if (TM.getTargetData()->isBigEndian()) {
606 EmitInt32(unsigned(Value >> 32)); O << "\n";
607 EmitInt32(unsigned(Value));
608 } else {
609 EmitInt32(unsigned(Value)); O << "\n";
610 EmitInt32(unsigned(Value >> 32));
611 }
612 }
613}
614
615/// toOctal - Convert the low order bits of X into an octal digit.
616///
617static inline char toOctal(int X) {
618 return (X&7)+'0';
619}
620
621/// printStringChar - Print a char, escaped if necessary.
622///
623static void printStringChar(std::ostream &O, unsigned char C) {
624 if (C == '"') {
625 O << "\\\"";
626 } else if (C == '\\') {
627 O << "\\\\";
628 } else if (isprint(C)) {
629 O << C;
630 } else {
631 switch(C) {
632 case '\b': O << "\\b"; break;
633 case '\f': O << "\\f"; break;
634 case '\n': O << "\\n"; break;
635 case '\r': O << "\\r"; break;
636 case '\t': O << "\\t"; break;
637 default:
638 O << '\\';
639 O << toOctal(C >> 6);
640 O << toOctal(C >> 3);
641 O << toOctal(C >> 0);
642 break;
643 }
644 }
645}
646
647/// EmitString - Emit a string with quotes and a null terminator.
648/// Special characters are emitted properly.
649/// \literal (Eg. '\t') \endliteral
650void AsmPrinter::EmitString(const std::string &String) const {
Anton Korobeynikov6c5e0ad2007-03-06 19:25:02 +0000651 const char* AscizDirective = TAI->getAscizDirective();
652 if (AscizDirective)
653 O << AscizDirective;
654 else
655 O << TAI->getAsciiDirective();
656 O << "\"";
Jim Laskey1c055e82007-01-25 15:12:02 +0000657 for (unsigned i = 0, N = String.size(); i < N; ++i) {
658 unsigned char C = String[i];
659 printStringChar(O, C);
660 }
Anton Korobeynikov6c5e0ad2007-03-06 19:25:02 +0000661 if (AscizDirective)
662 O << "\"";
663 else
664 O << "\\0\"";
Jim Laskey1c055e82007-01-25 15:12:02 +0000665}
666
667
Dan Gohmanbd8331d2007-09-24 20:58:13 +0000668/// EmitFile - Emit a .file directive.
669void AsmPrinter::EmitFile(unsigned Number, const std::string &Name) const {
670 O << "\t.file\t" << Number << " \"";
671 for (unsigned i = 0, N = Name.size(); i < N; ++i) {
672 unsigned char C = Name[i];
673 printStringChar(O, C);
674 }
675 O << "\"";
676}
677
678
Jim Laskey1c055e82007-01-25 15:12:02 +0000679//===----------------------------------------------------------------------===//
680
Chris Lattner3e3ff302007-05-31 18:57:45 +0000681// EmitAlignment - Emit an alignment directive to the specified power of
682// two boundary. For example, if you pass in 3 here, you will get an 8
683// byte alignment. If a global value is specified, and if that global has
684// an explicit alignment requested, it will unconditionally override the
685// alignment request. However, if ForcedAlignBits is specified, this value
686// has final say: the ultimate alignment will be the max of ForcedAlignBits
687// and the alignment computed with NumBits and the global.
688//
689// The algorithm is:
690// Align = NumBits;
691// if (GV && GV->hasalignment) Align = GV->getalignment();
692// Align = std::max(Align, ForcedAlignBits);
693//
694void AsmPrinter::EmitAlignment(unsigned NumBits, const GlobalValue *GV,
Evan Cheng26edb592008-02-29 19:36:59 +0000695 unsigned ForcedAlignBits,
696 bool UseFillExpr) const {
Dale Johannesen8653d292007-04-23 23:33:31 +0000697 if (GV && GV->getAlignment())
Chris Lattner3e3ff302007-05-31 18:57:45 +0000698 NumBits = Log2_32(GV->getAlignment());
699 NumBits = std::max(NumBits, ForcedAlignBits);
700
Chris Lattner747960d2005-11-10 18:09:27 +0000701 if (NumBits == 0) return; // No need to emit alignment.
Jim Laskeya6211dc2006-09-06 18:34:40 +0000702 if (TAI->getAlignmentIsInBytes()) NumBits = 1 << NumBits;
Evan Cheng86eb3fd2007-07-25 23:35:07 +0000703 O << TAI->getAlignDirective() << NumBits;
Evan Chengc7990652008-02-28 00:43:03 +0000704
705 unsigned FillValue = TAI->getTextAlignFillValue();
Evan Cheng26edb592008-02-29 19:36:59 +0000706 UseFillExpr &= IsInTextSection && FillValue;
Evan Cheng86eb3fd2007-07-25 23:35:07 +0000707 if (UseFillExpr) O << ",0x" << std::hex << FillValue << std::dec;
708 O << "\n";
Chris Lattner1d35c162004-08-17 19:14:29 +0000709}
710
Jim Laskey18fc0972007-02-21 22:47:38 +0000711
Chris Lattnerbb644e32005-11-21 07:51:36 +0000712/// EmitZeros - Emit a block of zeros.
Chris Lattnerea751992004-08-17 21:38:40 +0000713///
Chris Lattnerbb644e32005-11-21 07:51:36 +0000714void AsmPrinter::EmitZeros(uint64_t NumZeros) const {
Chris Lattnerea751992004-08-17 21:38:40 +0000715 if (NumZeros) {
Jim Laskeya6211dc2006-09-06 18:34:40 +0000716 if (TAI->getZeroDirective()) {
717 O << TAI->getZeroDirective() << NumZeros;
718 if (TAI->getZeroDirectiveSuffix())
719 O << TAI->getZeroDirectiveSuffix();
Jeff Cohenf34ddb12006-05-02 03:46:13 +0000720 O << "\n";
721 } else {
Chris Lattnerea751992004-08-17 21:38:40 +0000722 for (; NumZeros; --NumZeros)
Jim Laskeya6211dc2006-09-06 18:34:40 +0000723 O << TAI->getData8bitsDirective() << "0\n";
Chris Lattnerea751992004-08-17 21:38:40 +0000724 }
725 }
726}
727
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000728// Print out the specified constant, without a storage class. Only the
729// constants valid in constant expressions can occur here.
Chris Lattnerbb644e32005-11-21 07:51:36 +0000730void AsmPrinter::EmitConstantValueOnly(const Constant *CV) {
Chris Lattner61753bf2004-10-16 18:19:26 +0000731 if (CV->isNullValue() || isa<UndefValue>(CV))
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000732 O << "0";
Zhou Sheng75b871f2007-01-11 12:24:14 +0000733 else if (const ConstantInt *CI = dyn_cast<ConstantInt>(CV)) {
Chris Lattner7f6fac42007-01-12 18:15:09 +0000734 O << CI->getZExtValue();
Reid Spencere0fc4df2006-10-20 07:07:24 +0000735 } else if (const GlobalValue *GV = dyn_cast<GlobalValue>(CV)) {
Duraid Madina73a316d2005-04-02 12:21:51 +0000736 // This is a constant address for a global variable or function. Use the
737 // name of the variable or function as the address value, possibly
738 // decorating it with GlobalVarAddrPrefix/Suffix or
739 // FunctionAddrPrefix/Suffix (these all default to "" )
Jim Laskeya6211dc2006-09-06 18:34:40 +0000740 if (isa<Function>(GV)) {
741 O << TAI->getFunctionAddrPrefix()
742 << Mang->getValueName(GV)
743 << TAI->getFunctionAddrSuffix();
744 } else {
745 O << TAI->getGlobalVarAddrPrefix()
746 << Mang->getValueName(GV)
747 << TAI->getGlobalVarAddrSuffix();
748 }
Duraid Madina73a316d2005-04-02 12:21:51 +0000749 } else if (const ConstantExpr *CE = dyn_cast<ConstantExpr>(CV)) {
Owen Anderson20a631f2006-05-03 01:29:57 +0000750 const TargetData *TD = TM.getTargetData();
Anton Korobeynikov465c0252007-02-04 23:27:42 +0000751 unsigned Opcode = CE->getOpcode();
752 switch (Opcode) {
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000753 case Instruction::GetElementPtr: {
754 // generate a symbolic expression for the byte address
755 const Constant *ptrVal = CE->getOperand(0);
Chris Lattner83dfca82007-02-10 20:31:59 +0000756 SmallVector<Value*, 8> idxVec(CE->op_begin()+1, CE->op_end());
757 if (int64_t Offset = TD->getIndexedOffset(ptrVal->getType(), &idxVec[0],
758 idxVec.size())) {
Chris Lattner145569b2005-02-14 21:40:26 +0000759 if (Offset)
760 O << "(";
Chris Lattnerbb644e32005-11-21 07:51:36 +0000761 EmitConstantValueOnly(ptrVal);
Chris Lattner145569b2005-02-14 21:40:26 +0000762 if (Offset > 0)
763 O << ") + " << Offset;
764 else if (Offset < 0)
765 O << ") - " << -Offset;
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000766 } else {
Chris Lattnerbb644e32005-11-21 07:51:36 +0000767 EmitConstantValueOnly(ptrVal);
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000768 }
769 break;
770 }
Reid Spencer6c38f0b2006-11-27 01:05:10 +0000771 case Instruction::Trunc:
772 case Instruction::ZExt:
773 case Instruction::SExt:
774 case Instruction::FPTrunc:
775 case Instruction::FPExt:
776 case Instruction::UIToFP:
777 case Instruction::SIToFP:
778 case Instruction::FPToUI:
779 case Instruction::FPToSI:
780 assert(0 && "FIXME: Don't yet support this kind of constant cast expr");
781 break;
Chris Lattnerb9e41f52006-12-12 05:14:13 +0000782 case Instruction::BitCast:
783 return EmitConstantValueOnly(CE->getOperand(0));
784
Chris Lattner0c537da2006-12-12 05:18:19 +0000785 case Instruction::IntToPtr: {
786 // Handle casts to pointers by changing them into casts to the appropriate
787 // integer type. This promotes constant folding and simplifies this code.
788 Constant *Op = CE->getOperand(0);
789 Op = ConstantExpr::getIntegerCast(Op, TD->getIntPtrType(), false/*ZExt*/);
790 return EmitConstantValueOnly(Op);
791 }
792
793
794 case Instruction::PtrToInt: {
Chris Lattner85492422006-07-29 01:57:19 +0000795 // Support only foldable casts to/from pointers that can be eliminated by
796 // changing the pointer to the appropriately sized integer type.
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000797 Constant *Op = CE->getOperand(0);
Chris Lattner0c537da2006-12-12 05:18:19 +0000798 const Type *Ty = CE->getType();
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000799
Chris Lattner0c537da2006-12-12 05:18:19 +0000800 // We can emit the pointer value into this slot if the slot is an
801 // integer slot greater or equal to the size of the pointer.
Chris Lattner03c49532007-01-15 02:27:26 +0000802 if (Ty->isInteger() &&
Duncan Sands283207a2007-11-05 00:04:43 +0000803 TD->getABITypeSize(Ty) >= TD->getABITypeSize(Op->getType()))
Chris Lattner85492422006-07-29 01:57:19 +0000804 return EmitConstantValueOnly(Op);
Chris Lattner85492422006-07-29 01:57:19 +0000805
806 assert(0 && "FIXME: Don't yet support this kind of constant cast expr");
Chris Lattnerbb644e32005-11-21 07:51:36 +0000807 EmitConstantValueOnly(Op);
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000808 break;
809 }
810 case Instruction::Add:
Anton Korobeynikov465c0252007-02-04 23:27:42 +0000811 case Instruction::Sub:
Anton Korobeynikov95cc3e02007-12-18 20:53:41 +0000812 case Instruction::And:
813 case Instruction::Or:
814 case Instruction::Xor:
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000815 O << "(";
Chris Lattnerbb644e32005-11-21 07:51:36 +0000816 EmitConstantValueOnly(CE->getOperand(0));
Anton Korobeynikov95cc3e02007-12-18 20:53:41 +0000817 O << ")";
818 switch (Opcode) {
819 case Instruction::Add:
820 O << " + ";
821 break;
822 case Instruction::Sub:
823 O << " - ";
824 break;
825 case Instruction::And:
826 O << " & ";
827 break;
828 case Instruction::Or:
829 O << " | ";
830 break;
831 case Instruction::Xor:
832 O << " ^ ";
833 break;
834 default:
835 break;
836 }
837 O << "(";
Chris Lattnerbb644e32005-11-21 07:51:36 +0000838 EmitConstantValueOnly(CE->getOperand(1));
Chris Lattner6a8e0f52004-08-16 23:15:22 +0000839 O << ")";
840 break;
841 default:
842 assert(0 && "Unsupported operator!");
843 }
844 } else {
845 assert(0 && "Unknown constant value!");
846 }
847}
Chris Lattner8452a1f2004-08-17 06:36:49 +0000848
Chris Lattner55a6d902005-11-10 18:06:33 +0000849/// printAsCString - Print the specified array as a C compatible string, only if
Chris Lattner8452a1f2004-08-17 06:36:49 +0000850/// the predicate isString is true.
851///
Chris Lattner55a6d902005-11-10 18:06:33 +0000852static void printAsCString(std::ostream &O, const ConstantArray *CVA,
853 unsigned LastElt) {
Chris Lattner8452a1f2004-08-17 06:36:49 +0000854 assert(CVA->isString() && "Array is not string compatible!");
855
856 O << "\"";
Chris Lattner55a6d902005-11-10 18:06:33 +0000857 for (unsigned i = 0; i != LastElt; ++i) {
Misha Brukman835702a2005-04-21 22:36:52 +0000858 unsigned char C =
Reid Spencere0fc4df2006-10-20 07:07:24 +0000859 (unsigned char)cast<ConstantInt>(CVA->getOperand(i))->getZExtValue();
Jim Laskey1c055e82007-01-25 15:12:02 +0000860 printStringChar(O, C);
Chris Lattner8452a1f2004-08-17 06:36:49 +0000861 }
862 O << "\"";
863}
864
Jeff Cohen24a62a92006-05-02 01:16:28 +0000865/// EmitString - Emit a zero-byte-terminated string constant.
866///
867void AsmPrinter::EmitString(const ConstantArray *CVA) const {
868 unsigned NumElts = CVA->getNumOperands();
Jim Laskeya6211dc2006-09-06 18:34:40 +0000869 if (TAI->getAscizDirective() && NumElts &&
Reid Spencere0fc4df2006-10-20 07:07:24 +0000870 cast<ConstantInt>(CVA->getOperand(NumElts-1))->getZExtValue() == 0) {
Jim Laskeya6211dc2006-09-06 18:34:40 +0000871 O << TAI->getAscizDirective();
Jeff Cohen24a62a92006-05-02 01:16:28 +0000872 printAsCString(O, CVA, NumElts-1);
873 } else {
Jim Laskeya6211dc2006-09-06 18:34:40 +0000874 O << TAI->getAsciiDirective();
Jeff Cohen24a62a92006-05-02 01:16:28 +0000875 printAsCString(O, CVA, NumElts);
876 }
877 O << "\n";
878}
879
Chris Lattnerbb644e32005-11-21 07:51:36 +0000880/// EmitGlobalConstant - Print a general LLVM constant to the .s file.
Duncan Sands283207a2007-11-05 00:04:43 +0000881/// If Packed is false, pad to the ABI size.
882void AsmPrinter::EmitGlobalConstant(const Constant *CV, bool Packed) {
Owen Anderson20a631f2006-05-03 01:29:57 +0000883 const TargetData *TD = TM.getTargetData();
Duncan Sands283207a2007-11-05 00:04:43 +0000884 unsigned Size = Packed ?
885 TD->getTypeStoreSize(CV->getType()) : TD->getABITypeSize(CV->getType());
Chris Lattner8452a1f2004-08-17 06:36:49 +0000886
Chris Lattner61753bf2004-10-16 18:19:26 +0000887 if (CV->isNullValue() || isa<UndefValue>(CV)) {
Duncan Sands283207a2007-11-05 00:04:43 +0000888 EmitZeros(Size);
Chris Lattner8452a1f2004-08-17 06:36:49 +0000889 return;
890 } else if (const ConstantArray *CVA = dyn_cast<ConstantArray>(CV)) {
891 if (CVA->isString()) {
Jeff Cohen24a62a92006-05-02 01:16:28 +0000892 EmitString(CVA);
Chris Lattner8452a1f2004-08-17 06:36:49 +0000893 } else { // Not a string. Print the values in successive locations
Duncan Sands283207a2007-11-05 00:04:43 +0000894 for (unsigned i = 0, e = CVA->getNumOperands(); i != e; ++i)
895 EmitGlobalConstant(CVA->getOperand(i), false);
Chris Lattner8452a1f2004-08-17 06:36:49 +0000896 }
897 return;
898 } else if (const ConstantStruct *CVS = dyn_cast<ConstantStruct>(CV)) {
899 // Print the fields in successive locations. Pad to align if needed!
Owen Anderson20a631f2006-05-03 01:29:57 +0000900 const StructLayout *cvsLayout = TD->getStructLayout(CVS->getType());
Chris Lattner0b955fd2005-01-08 19:59:10 +0000901 uint64_t sizeSoFar = 0;
Chris Lattner8452a1f2004-08-17 06:36:49 +0000902 for (unsigned i = 0, e = CVS->getNumOperands(); i != e; ++i) {
903 const Constant* field = CVS->getOperand(i);
904
905 // Check if padding is needed and insert one or more 0s.
Duncan Sands283207a2007-11-05 00:04:43 +0000906 uint64_t fieldSize = TD->getTypeStoreSize(field->getType());
Duncan Sandsf7ae8bd2007-11-05 18:03:02 +0000907 uint64_t padSize = ((i == e-1 ? Size : cvsLayout->getElementOffset(i+1))
Chris Lattnerc473d8e2007-02-10 19:55:17 +0000908 - cvsLayout->getElementOffset(i)) - fieldSize;
Chris Lattner8452a1f2004-08-17 06:36:49 +0000909 sizeSoFar += fieldSize + padSize;
910
Duncan Sandsf7ae8bd2007-11-05 18:03:02 +0000911 // Now print the actual field value without ABI size padding.
912 EmitGlobalConstant(field, true);
Chris Lattner8452a1f2004-08-17 06:36:49 +0000913
Duncan Sandsf7ae8bd2007-11-05 18:03:02 +0000914 // Insert padding - this may include padding to increase the size of the
915 // current field up to the ABI size (if the struct is not packed) as well
916 // as padding to ensure that the next field starts at the right offset.
Chris Lattnerbb644e32005-11-21 07:51:36 +0000917 EmitZeros(padSize);
Chris Lattner8452a1f2004-08-17 06:36:49 +0000918 }
Chris Lattnerb84892d2007-02-10 19:59:22 +0000919 assert(sizeSoFar == cvsLayout->getSizeInBytes() &&
Chris Lattner8452a1f2004-08-17 06:36:49 +0000920 "Layout of constant struct may be incorrect!");
921 return;
922 } else if (const ConstantFP *CFP = dyn_cast<ConstantFP>(CV)) {
923 // FP Constants are printed as integer constants to avoid losing
924 // precision...
Chris Lattner8452a1f2004-08-17 06:36:49 +0000925 if (CFP->getType() == Type::DoubleTy) {
Dale Johannesen245dceb2007-09-11 18:32:33 +0000926 double Val = CFP->getValueAPF().convertToDouble(); // for comment only
Dale Johannesen028084e2007-09-12 03:30:33 +0000927 uint64_t i = CFP->getValueAPF().convertToAPInt().getZExtValue();
Jim Laskeya6211dc2006-09-06 18:34:40 +0000928 if (TAI->getData64bitsDirective())
Dale Johannesen245dceb2007-09-11 18:32:33 +0000929 O << TAI->getData64bitsDirective() << i << "\t"
Jim Laskeya6211dc2006-09-06 18:34:40 +0000930 << TAI->getCommentString() << " double value: " << Val << "\n";
Owen Anderson20a631f2006-05-03 01:29:57 +0000931 else if (TD->isBigEndian()) {
Dale Johannesen245dceb2007-09-11 18:32:33 +0000932 O << TAI->getData32bitsDirective() << unsigned(i >> 32)
Jim Laskeya6211dc2006-09-06 18:34:40 +0000933 << "\t" << TAI->getCommentString()
934 << " double most significant word " << Val << "\n";
Dale Johannesen245dceb2007-09-11 18:32:33 +0000935 O << TAI->getData32bitsDirective() << unsigned(i)
Jim Laskeya6211dc2006-09-06 18:34:40 +0000936 << "\t" << TAI->getCommentString()
937 << " double least significant word " << Val << "\n";
Chris Lattner8452a1f2004-08-17 06:36:49 +0000938 } else {
Dale Johannesen245dceb2007-09-11 18:32:33 +0000939 O << TAI->getData32bitsDirective() << unsigned(i)
Jim Laskeya6211dc2006-09-06 18:34:40 +0000940 << "\t" << TAI->getCommentString()
941 << " double least significant word " << Val << "\n";
Dale Johannesen245dceb2007-09-11 18:32:33 +0000942 O << TAI->getData32bitsDirective() << unsigned(i >> 32)
Jim Laskeya6211dc2006-09-06 18:34:40 +0000943 << "\t" << TAI->getCommentString()
944 << " double most significant word " << Val << "\n";
Chris Lattner8452a1f2004-08-17 06:36:49 +0000945 }
946 return;
Dale Johannesen028084e2007-09-12 03:30:33 +0000947 } else if (CFP->getType() == Type::FloatTy) {
Dale Johannesen245dceb2007-09-11 18:32:33 +0000948 float Val = CFP->getValueAPF().convertToFloat(); // for comment only
949 O << TAI->getData32bitsDirective()
Dale Johannesen028084e2007-09-12 03:30:33 +0000950 << CFP->getValueAPF().convertToAPInt().getZExtValue()
Jim Laskeya6211dc2006-09-06 18:34:40 +0000951 << "\t" << TAI->getCommentString() << " float " << Val << "\n";
Chris Lattner8452a1f2004-08-17 06:36:49 +0000952 return;
Dale Johannesen028084e2007-09-12 03:30:33 +0000953 } else if (CFP->getType() == Type::X86_FP80Ty) {
954 // all long double variants are printed as hex
Dale Johannesen34aa41c2007-09-26 23:20:33 +0000955 // api needed to prevent premature destruction
956 APInt api = CFP->getValueAPF().convertToAPInt();
957 const uint64_t *p = api.getRawData();
Chris Lattnerf1a6c9f2008-01-27 06:09:28 +0000958 APFloat DoubleVal = CFP->getValueAPF();
959 DoubleVal.convert(APFloat::IEEEdouble, APFloat::rmNearestTiesToEven);
Dale Johannesen028084e2007-09-12 03:30:33 +0000960 if (TD->isBigEndian()) {
961 O << TAI->getData16bitsDirective() << uint16_t(p[0] >> 48)
962 << "\t" << TAI->getCommentString()
Chris Lattnerf1a6c9f2008-01-27 06:09:28 +0000963 << " long double most significant halfword of ~"
964 << DoubleVal.convertToDouble() << "\n";
Dale Johannesen028084e2007-09-12 03:30:33 +0000965 O << TAI->getData16bitsDirective() << uint16_t(p[0] >> 32)
966 << "\t" << TAI->getCommentString()
967 << " long double next halfword\n";
968 O << TAI->getData16bitsDirective() << uint16_t(p[0] >> 16)
969 << "\t" << TAI->getCommentString()
970 << " long double next halfword\n";
971 O << TAI->getData16bitsDirective() << uint16_t(p[0])
972 << "\t" << TAI->getCommentString()
973 << " long double next halfword\n";
974 O << TAI->getData16bitsDirective() << uint16_t(p[1])
975 << "\t" << TAI->getCommentString()
976 << " long double least significant halfword\n";
977 } else {
978 O << TAI->getData16bitsDirective() << uint16_t(p[1])
979 << "\t" << TAI->getCommentString()
Chris Lattnerf1a6c9f2008-01-27 06:09:28 +0000980 << " long double least significant halfword of ~"
981 << DoubleVal.convertToDouble() << "\n";
Dale Johannesen028084e2007-09-12 03:30:33 +0000982 O << TAI->getData16bitsDirective() << uint16_t(p[0])
983 << "\t" << TAI->getCommentString()
984 << " long double next halfword\n";
985 O << TAI->getData16bitsDirective() << uint16_t(p[0] >> 16)
986 << "\t" << TAI->getCommentString()
987 << " long double next halfword\n";
988 O << TAI->getData16bitsDirective() << uint16_t(p[0] >> 32)
989 << "\t" << TAI->getCommentString()
990 << " long double next halfword\n";
991 O << TAI->getData16bitsDirective() << uint16_t(p[0] >> 48)
992 << "\t" << TAI->getCommentString()
993 << " long double most significant halfword\n";
994 }
Duncan Sands283207a2007-11-05 00:04:43 +0000995 EmitZeros(Size - TD->getTypeStoreSize(Type::X86_FP80Ty));
Dale Johannesen028084e2007-09-12 03:30:33 +0000996 return;
Dale Johannesen6472eb62007-10-11 23:32:15 +0000997 } else if (CFP->getType() == Type::PPC_FP128Ty) {
998 // all long double variants are printed as hex
999 // api needed to prevent premature destruction
1000 APInt api = CFP->getValueAPF().convertToAPInt();
1001 const uint64_t *p = api.getRawData();
1002 if (TD->isBigEndian()) {
1003 O << TAI->getData32bitsDirective() << uint32_t(p[0] >> 32)
1004 << "\t" << TAI->getCommentString()
1005 << " long double most significant word\n";
1006 O << TAI->getData32bitsDirective() << uint32_t(p[0])
1007 << "\t" << TAI->getCommentString()
1008 << " long double next word\n";
1009 O << TAI->getData32bitsDirective() << uint32_t(p[1] >> 32)
1010 << "\t" << TAI->getCommentString()
1011 << " long double next word\n";
1012 O << TAI->getData32bitsDirective() << uint32_t(p[1])
1013 << "\t" << TAI->getCommentString()
1014 << " long double least significant word\n";
1015 } else {
1016 O << TAI->getData32bitsDirective() << uint32_t(p[1])
1017 << "\t" << TAI->getCommentString()
1018 << " long double least significant word\n";
1019 O << TAI->getData32bitsDirective() << uint32_t(p[1] >> 32)
1020 << "\t" << TAI->getCommentString()
1021 << " long double next word\n";
1022 O << TAI->getData32bitsDirective() << uint32_t(p[0])
1023 << "\t" << TAI->getCommentString()
1024 << " long double next word\n";
1025 O << TAI->getData32bitsDirective() << uint32_t(p[0] >> 32)
1026 << "\t" << TAI->getCommentString()
1027 << " long double most significant word\n";
1028 }
1029 return;
Dale Johannesen028084e2007-09-12 03:30:33 +00001030 } else assert(0 && "Floating point constant type not handled");
Reid Spencere63b6512006-12-31 05:55:36 +00001031 } else if (CV->getType() == Type::Int64Ty) {
Chris Lattner8452a1f2004-08-17 06:36:49 +00001032 if (const ConstantInt *CI = dyn_cast<ConstantInt>(CV)) {
Reid Spencere0fc4df2006-10-20 07:07:24 +00001033 uint64_t Val = CI->getZExtValue();
Misha Brukman835702a2005-04-21 22:36:52 +00001034
Jim Laskeya6211dc2006-09-06 18:34:40 +00001035 if (TAI->getData64bitsDirective())
1036 O << TAI->getData64bitsDirective() << Val << "\n";
Owen Anderson20a631f2006-05-03 01:29:57 +00001037 else if (TD->isBigEndian()) {
Jim Laskeya6211dc2006-09-06 18:34:40 +00001038 O << TAI->getData32bitsDirective() << unsigned(Val >> 32)
1039 << "\t" << TAI->getCommentString()
1040 << " Double-word most significant word " << Val << "\n";
1041 O << TAI->getData32bitsDirective() << unsigned(Val)
1042 << "\t" << TAI->getCommentString()
1043 << " Double-word least significant word " << Val << "\n";
Chris Lattner8452a1f2004-08-17 06:36:49 +00001044 } else {
Jim Laskeya6211dc2006-09-06 18:34:40 +00001045 O << TAI->getData32bitsDirective() << unsigned(Val)
1046 << "\t" << TAI->getCommentString()
1047 << " Double-word least significant word " << Val << "\n";
1048 O << TAI->getData32bitsDirective() << unsigned(Val >> 32)
1049 << "\t" << TAI->getCommentString()
1050 << " Double-word most significant word " << Val << "\n";
Chris Lattner8452a1f2004-08-17 06:36:49 +00001051 }
1052 return;
1053 }
Reid Spencerd84d35b2007-02-15 02:26:10 +00001054 } else if (const ConstantVector *CP = dyn_cast<ConstantVector>(CV)) {
1055 const VectorType *PTy = CP->getType();
Nate Begeman41b1cdc2005-12-06 06:18:55 +00001056
1057 for (unsigned I = 0, E = PTy->getNumElements(); I < E; ++I)
Duncan Sands283207a2007-11-05 00:04:43 +00001058 EmitGlobalConstant(CP->getOperand(I), false);
Nate Begeman41b1cdc2005-12-06 06:18:55 +00001059
1060 return;
Chris Lattner8452a1f2004-08-17 06:36:49 +00001061 }
1062
1063 const Type *type = CV->getType();
Evan Cheng45fe3bc2006-09-12 21:00:35 +00001064 printDataDirective(type);
Chris Lattnerbb644e32005-11-21 07:51:36 +00001065 EmitConstantValueOnly(CV);
Chris Lattner8452a1f2004-08-17 06:36:49 +00001066 O << "\n";
1067}
Chris Lattner061d9e22006-01-27 02:10:10 +00001068
Evan Cheng45fe3bc2006-09-12 21:00:35 +00001069void
1070AsmPrinter::EmitMachineConstantPoolValue(MachineConstantPoolValue *MCPV) {
1071 // Target doesn't support this yet!
1072 abort();
1073}
1074
Chris Lattnera32814b2006-09-26 23:59:50 +00001075/// PrintSpecial - Print information related to the specified machine instr
1076/// that is independent of the operand, and may be independent of the instr
1077/// itself. This can be useful for portably encoding the comment character
1078/// or other bits of target-specific knowledge into the asmstrings. The
1079/// syntax used is ${:comment}. Targets can override this to add support
1080/// for their own strange codes.
1081void AsmPrinter::PrintSpecial(const MachineInstr *MI, const char *Code) {
Chris Lattner30b47082006-09-27 00:06:07 +00001082 if (!strcmp(Code, "private")) {
1083 O << TAI->getPrivateGlobalPrefix();
1084 } else if (!strcmp(Code, "comment")) {
Chris Lattnera32814b2006-09-26 23:59:50 +00001085 O << TAI->getCommentString();
1086 } else if (!strcmp(Code, "uid")) {
1087 // Assign a unique ID to this machine instruction.
1088 static const MachineInstr *LastMI = 0;
Chris Lattnera9428c42007-02-05 21:23:52 +00001089 static const Function *F = 0;
Chris Lattnera32814b2006-09-26 23:59:50 +00001090 static unsigned Counter = 0U-1;
Chris Lattnera9428c42007-02-05 21:23:52 +00001091
1092 // Comparing the address of MI isn't sufficient, because machineinstrs may
1093 // be allocated to the same address across functions.
1094 const Function *ThisF = MI->getParent()->getParent()->getFunction();
1095
Chris Lattnera32814b2006-09-26 23:59:50 +00001096 // If this is a new machine instruction, bump the counter.
Chris Lattnera9428c42007-02-05 21:23:52 +00001097 if (LastMI != MI || F != ThisF) {
1098 ++Counter;
1099 LastMI = MI;
Chris Lattner89e66e02007-02-06 01:56:31 +00001100 F = ThisF;
Chris Lattnera9428c42007-02-05 21:23:52 +00001101 }
Chris Lattnera32814b2006-09-26 23:59:50 +00001102 O << Counter;
1103 } else {
Bill Wendlingf3baad32006-12-07 01:30:32 +00001104 cerr << "Unknown special formatter '" << Code
1105 << "' for machine instr: " << *MI;
Chris Lattnera32814b2006-09-26 23:59:50 +00001106 exit(1);
1107 }
1108}
1109
1110
Chris Lattner061d9e22006-01-27 02:10:10 +00001111/// printInlineAsm - This method formats and prints the specified machine
1112/// instruction that is an inline asm.
1113void AsmPrinter::printInlineAsm(const MachineInstr *MI) const {
Chris Lattner57ecb562006-01-30 23:00:08 +00001114 unsigned NumOperands = MI->getNumOperands();
1115
1116 // Count the number of register definitions.
1117 unsigned NumDefs = 0;
Dan Gohman9da02f52007-09-14 20:33:02 +00001118 for (; MI->getOperand(NumDefs).isRegister() && MI->getOperand(NumDefs).isDef();
Chris Lattner45456d42006-09-05 20:02:51 +00001119 ++NumDefs)
Chris Lattner57ecb562006-01-30 23:00:08 +00001120 assert(NumDefs != NumOperands-1 && "No asm string?");
1121
1122 assert(MI->getOperand(NumDefs).isExternalSymbol() && "No asm string?");
Chris Lattneraa23fa92006-02-01 22:41:11 +00001123
1124 // Disassemble the AsmStr, printing out the literal pieces, the operands, etc.
Chris Lattner57ecb562006-01-30 23:00:08 +00001125 const char *AsmStr = MI->getOperand(NumDefs).getSymbolName();
Chris Lattneraa23fa92006-02-01 22:41:11 +00001126
Dale Johannesen2b3bc302008-01-29 02:21:21 +00001127 // If this asmstr is empty, just print the #APP/#NOAPP markers.
1128 // These are useful to see where empty asm's wound up.
Chris Lattner3390cbe2006-07-28 00:17:20 +00001129 if (AsmStr[0] == 0) {
Dale Johannesen2b3bc302008-01-29 02:21:21 +00001130 O << TAI->getInlineAsmStart() << "\n\t" << TAI->getInlineAsmEnd() << "\n";
Chris Lattner3390cbe2006-07-28 00:17:20 +00001131 return;
1132 }
1133
Jim Laskeya6211dc2006-09-06 18:34:40 +00001134 O << TAI->getInlineAsmStart() << "\n\t";
Chris Lattner3390cbe2006-07-28 00:17:20 +00001135
Bill Wendlinge21237e2007-01-16 03:42:04 +00001136 // The variant of the current asmprinter.
1137 int AsmPrinterVariant = TAI->getAssemblerDialect();
1138
Chris Lattneraa23fa92006-02-01 22:41:11 +00001139 int CurVariant = -1; // The number of the {.|.|.} region we are in.
1140 const char *LastEmitted = AsmStr; // One past the last character emitted.
Chris Lattner3a5ed552006-02-01 01:28:23 +00001141
Chris Lattneraa23fa92006-02-01 22:41:11 +00001142 while (*LastEmitted) {
1143 switch (*LastEmitted) {
1144 default: {
1145 // Not a special case, emit the string section literally.
1146 const char *LiteralEnd = LastEmitted+1;
1147 while (*LiteralEnd && *LiteralEnd != '{' && *LiteralEnd != '|' &&
Chris Lattnera633c3132006-05-05 21:47:05 +00001148 *LiteralEnd != '}' && *LiteralEnd != '$' && *LiteralEnd != '\n')
Chris Lattneraa23fa92006-02-01 22:41:11 +00001149 ++LiteralEnd;
1150 if (CurVariant == -1 || CurVariant == AsmPrinterVariant)
1151 O.write(LastEmitted, LiteralEnd-LastEmitted);
1152 LastEmitted = LiteralEnd;
1153 break;
1154 }
Chris Lattnera633c3132006-05-05 21:47:05 +00001155 case '\n':
1156 ++LastEmitted; // Consume newline character.
Chris Lattnerb58f93f2007-04-30 17:00:18 +00001157 O << "\n"; // Indent code with newline.
Chris Lattnera633c3132006-05-05 21:47:05 +00001158 break;
Chris Lattneraa23fa92006-02-01 22:41:11 +00001159 case '$': {
1160 ++LastEmitted; // Consume '$' character.
Chris Lattnerfc416fa2006-10-03 23:27:09 +00001161 bool Done = true;
1162
1163 // Handle escapes.
1164 switch (*LastEmitted) {
1165 default: Done = false; break;
1166 case '$': // $$ -> $
Chris Lattneraa23fa92006-02-01 22:41:11 +00001167 if (CurVariant == -1 || CurVariant == AsmPrinterVariant)
1168 O << '$';
1169 ++LastEmitted; // Consume second '$' character.
1170 break;
Chris Lattnerfc416fa2006-10-03 23:27:09 +00001171 case '(': // $( -> same as GCC's { character.
1172 ++LastEmitted; // Consume '(' character.
1173 if (CurVariant != -1) {
Bill Wendlingf3baad32006-12-07 01:30:32 +00001174 cerr << "Nested variants found in inline asm string: '"
1175 << AsmStr << "'\n";
Chris Lattnerfc416fa2006-10-03 23:27:09 +00001176 exit(1);
1177 }
1178 CurVariant = 0; // We're in the first variant now.
1179 break;
1180 case '|':
1181 ++LastEmitted; // consume '|' character.
1182 if (CurVariant == -1) {
Bill Wendlingf3baad32006-12-07 01:30:32 +00001183 cerr << "Found '|' character outside of variant in inline asm "
1184 << "string: '" << AsmStr << "'\n";
Chris Lattnerfc416fa2006-10-03 23:27:09 +00001185 exit(1);
1186 }
1187 ++CurVariant; // We're in the next variant.
1188 break;
1189 case ')': // $) -> same as GCC's } char.
1190 ++LastEmitted; // consume ')' character.
1191 if (CurVariant == -1) {
Bill Wendlingf3baad32006-12-07 01:30:32 +00001192 cerr << "Found '}' character outside of variant in inline asm "
1193 << "string: '" << AsmStr << "'\n";
Chris Lattnerfc416fa2006-10-03 23:27:09 +00001194 exit(1);
1195 }
1196 CurVariant = -1;
1197 break;
Chris Lattneraa23fa92006-02-01 22:41:11 +00001198 }
Chris Lattnerfc416fa2006-10-03 23:27:09 +00001199 if (Done) break;
Chris Lattneraa23fa92006-02-01 22:41:11 +00001200
1201 bool HasCurlyBraces = false;
1202 if (*LastEmitted == '{') { // ${variable}
1203 ++LastEmitted; // Consume '{' character.
1204 HasCurlyBraces = true;
1205 }
1206
1207 const char *IDStart = LastEmitted;
1208 char *IDEnd;
Chris Lattnerd39e3882007-01-23 00:36:17 +00001209 errno = 0;
Chris Lattneraa23fa92006-02-01 22:41:11 +00001210 long Val = strtol(IDStart, &IDEnd, 10); // We only accept numbers for IDs.
1211 if (!isdigit(*IDStart) || (Val == 0 && errno == EINVAL)) {
Bill Wendlingf3baad32006-12-07 01:30:32 +00001212 cerr << "Bad $ operand number in inline asm string: '"
1213 << AsmStr << "'\n";
Chris Lattneraa23fa92006-02-01 22:41:11 +00001214 exit(1);
1215 }
1216 LastEmitted = IDEnd;
1217
Chris Lattner34f74c12006-02-06 22:17:23 +00001218 char Modifier[2] = { 0, 0 };
1219
Chris Lattneraa23fa92006-02-01 22:41:11 +00001220 if (HasCurlyBraces) {
Chris Lattner34f74c12006-02-06 22:17:23 +00001221 // If we have curly braces, check for a modifier character. This
1222 // supports syntax like ${0:u}, which correspond to "%u0" in GCC asm.
1223 if (*LastEmitted == ':') {
1224 ++LastEmitted; // Consume ':' character.
1225 if (*LastEmitted == 0) {
Bill Wendlingf3baad32006-12-07 01:30:32 +00001226 cerr << "Bad ${:} expression in inline asm string: '"
1227 << AsmStr << "'\n";
Chris Lattner34f74c12006-02-06 22:17:23 +00001228 exit(1);
1229 }
1230
1231 Modifier[0] = *LastEmitted;
1232 ++LastEmitted; // Consume modifier character.
1233 }
1234
Chris Lattneraa23fa92006-02-01 22:41:11 +00001235 if (*LastEmitted != '}') {
Bill Wendlingf3baad32006-12-07 01:30:32 +00001236 cerr << "Bad ${} expression in inline asm string: '"
1237 << AsmStr << "'\n";
Chris Lattneraa23fa92006-02-01 22:41:11 +00001238 exit(1);
1239 }
1240 ++LastEmitted; // Consume '}' character.
1241 }
1242
1243 if ((unsigned)Val >= NumOperands-1) {
Bill Wendlingf3baad32006-12-07 01:30:32 +00001244 cerr << "Invalid $ operand number in inline asm string: '"
1245 << AsmStr << "'\n";
Chris Lattneraa23fa92006-02-01 22:41:11 +00001246 exit(1);
1247 }
1248
Chris Lattner571d9642006-02-23 19:21:04 +00001249 // Okay, we finally have a value number. Ask the target to print this
Chris Lattneraa23fa92006-02-01 22:41:11 +00001250 // operand!
Chris Lattner571d9642006-02-23 19:21:04 +00001251 if (CurVariant == -1 || CurVariant == AsmPrinterVariant) {
1252 unsigned OpNo = 1;
Chris Lattner8f8b5e42006-06-08 18:00:47 +00001253
1254 bool Error = false;
1255
Chris Lattner571d9642006-02-23 19:21:04 +00001256 // Scan to find the machine operand number for the operand.
Chris Lattner5af3fde2006-02-24 19:50:58 +00001257 for (; Val; --Val) {
Chris Lattner8f8b5e42006-06-08 18:00:47 +00001258 if (OpNo >= MI->getNumOperands()) break;
Chris Lattner81798412007-12-30 20:50:28 +00001259 unsigned OpFlags = MI->getOperand(OpNo).getImm();
Chris Lattner5af3fde2006-02-24 19:50:58 +00001260 OpNo += (OpFlags >> 3) + 1;
1261 }
Chris Lattner1d08c652006-02-24 20:21:58 +00001262
Chris Lattner8f8b5e42006-06-08 18:00:47 +00001263 if (OpNo >= MI->getNumOperands()) {
1264 Error = true;
Chris Lattner1d08c652006-02-24 20:21:58 +00001265 } else {
Chris Lattner81798412007-12-30 20:50:28 +00001266 unsigned OpFlags = MI->getOperand(OpNo).getImm();
Chris Lattner8f8b5e42006-06-08 18:00:47 +00001267 ++OpNo; // Skip over the ID number.
1268
Dale Johannesen4646aa32007-11-05 21:20:28 +00001269 if (Modifier[0]=='l') // labels are target independent
Chris Lattnera5bb3702007-12-30 23:10:15 +00001270 printBasicBlockLabel(MI->getOperand(OpNo).getMBB(),
Evan Chengc7990652008-02-28 00:43:03 +00001271 false, false, false);
Dale Johannesen4646aa32007-11-05 21:20:28 +00001272 else {
1273 AsmPrinter *AP = const_cast<AsmPrinter*>(this);
1274 if ((OpFlags & 7) == 4 /*ADDR MODE*/) {
1275 Error = AP->PrintAsmMemoryOperand(MI, OpNo, AsmPrinterVariant,
1276 Modifier[0] ? Modifier : 0);
1277 } else {
1278 Error = AP->PrintAsmOperand(MI, OpNo, AsmPrinterVariant,
1279 Modifier[0] ? Modifier : 0);
1280 }
Chris Lattner8f8b5e42006-06-08 18:00:47 +00001281 }
Chris Lattner1d08c652006-02-24 20:21:58 +00001282 }
1283 if (Error) {
Bill Wendlingf3baad32006-12-07 01:30:32 +00001284 cerr << "Invalid operand found in inline asm: '"
1285 << AsmStr << "'\n";
Chris Lattneraa23fa92006-02-01 22:41:11 +00001286 MI->dump();
1287 exit(1);
1288 }
Chris Lattner571d9642006-02-23 19:21:04 +00001289 }
Chris Lattneraa23fa92006-02-01 22:41:11 +00001290 break;
1291 }
Chris Lattneraa23fa92006-02-01 22:41:11 +00001292 }
1293 }
Jim Laskeya6211dc2006-09-06 18:34:40 +00001294 O << "\n\t" << TAI->getInlineAsmEnd() << "\n";
Chris Lattneraa23fa92006-02-01 22:41:11 +00001295}
1296
Jim Laskeyf9e54452007-01-26 14:34:52 +00001297/// printLabel - This method prints a local label used by debug and
1298/// exception handling tables.
1299void AsmPrinter::printLabel(const MachineInstr *MI) const {
Evan Cheng32e53472008-02-02 08:39:46 +00001300 O << TAI->getPrivateGlobalPrefix()
Chris Lattner81798412007-12-30 20:50:28 +00001301 << "label" << MI->getOperand(0).getImm() << ":\n";
Jim Laskeyf9e54452007-01-26 14:34:52 +00001302}
1303
Evan Chengd6e44ab2008-02-01 09:10:45 +00001304void AsmPrinter::printLabel(unsigned Id) const {
Evan Cheng32e53472008-02-02 08:39:46 +00001305 O << TAI->getPrivateGlobalPrefix() << "label" << Id << ":\n";
Evan Chengd6e44ab2008-02-01 09:10:45 +00001306}
1307
Evan Chengefd142a2008-02-02 04:07:54 +00001308/// printDeclare - This method prints a local variable declaration used by
1309/// debug tables.
Evan Cheng2cb90682008-02-04 23:06:48 +00001310/// FIXME: It doesn't really print anything rather it inserts a DebugVariable
1311/// entry into dwarf table.
Evan Chengefd142a2008-02-02 04:07:54 +00001312void AsmPrinter::printDeclare(const MachineInstr *MI) const {
Evan Cheng2cb90682008-02-04 23:06:48 +00001313 int FI = MI->getOperand(0).getIndex();
1314 GlobalValue *GV = MI->getOperand(1).getGlobal();
1315 MMI->RecordVariable(GV, FI);
Evan Chengefd142a2008-02-02 04:07:54 +00001316}
1317
Chris Lattneraa23fa92006-02-01 22:41:11 +00001318/// PrintAsmOperand - Print the specified operand of MI, an INLINEASM
1319/// instruction, using the specified assembler variant. Targets should
1320/// overried this to format as appropriate.
1321bool AsmPrinter::PrintAsmOperand(const MachineInstr *MI, unsigned OpNo,
Chris Lattner34f74c12006-02-06 22:17:23 +00001322 unsigned AsmVariant, const char *ExtraCode) {
Chris Lattneraa23fa92006-02-01 22:41:11 +00001323 // Target doesn't support this yet!
1324 return true;
Chris Lattner061d9e22006-01-27 02:10:10 +00001325}
Chris Lattner1d08c652006-02-24 20:21:58 +00001326
1327bool AsmPrinter::PrintAsmMemoryOperand(const MachineInstr *MI, unsigned OpNo,
1328 unsigned AsmVariant,
1329 const char *ExtraCode) {
1330 // Target doesn't support this yet!
1331 return true;
1332}
Nate Begeman4ca2ea52006-04-22 18:53:45 +00001333
1334/// printBasicBlockLabel - This method prints the label for the specified
1335/// MachineBasicBlock
Nate Begemanb9d4f832006-05-02 05:37:32 +00001336void AsmPrinter::printBasicBlockLabel(const MachineBasicBlock *MBB,
Evan Chengc7990652008-02-28 00:43:03 +00001337 bool printAlign,
Nate Begemanb9d4f832006-05-02 05:37:32 +00001338 bool printColon,
1339 bool printComment) const {
Evan Chengc7990652008-02-28 00:43:03 +00001340 if (printAlign) {
1341 unsigned Align = MBB->getAlignment();
1342 if (Align)
1343 EmitAlignment(Log2_32(Align));
1344 }
1345
Evan Chengcdf36092007-10-14 05:57:21 +00001346 O << TAI->getPrivateGlobalPrefix() << "BB" << getFunctionNumber() << "_"
1347 << MBB->getNumber();
Nate Begemanb9d4f832006-05-02 05:37:32 +00001348 if (printColon)
1349 O << ':';
Chris Lattner8b1a59a2006-10-05 21:40:14 +00001350 if (printComment && MBB->getBasicBlock())
Dan Gohman33d0ea22007-07-30 15:06:25 +00001351 O << '\t' << TAI->getCommentString() << ' '
1352 << MBB->getBasicBlock()->getName();
Nate Begeman4ca2ea52006-04-22 18:53:45 +00001353}
Nate Begeman984c1a42006-08-12 21:29:52 +00001354
Evan Cheng797d56f2007-11-09 01:32:10 +00001355/// printPICJumpTableSetLabel - This method prints a set label for the
1356/// specified MachineBasicBlock for a jumptable entry.
1357void AsmPrinter::printPICJumpTableSetLabel(unsigned uid,
1358 const MachineBasicBlock *MBB) const {
Jim Laskeya6211dc2006-09-06 18:34:40 +00001359 if (!TAI->getSetDirective())
Nate Begeman984c1a42006-08-12 21:29:52 +00001360 return;
1361
Jim Laskeya6211dc2006-09-06 18:34:40 +00001362 O << TAI->getSetDirective() << ' ' << TAI->getPrivateGlobalPrefix()
Evan Chengcdf36092007-10-14 05:57:21 +00001363 << getFunctionNumber() << '_' << uid << "_set_" << MBB->getNumber() << ',';
Evan Chengc7990652008-02-28 00:43:03 +00001364 printBasicBlockLabel(MBB, false, false, false);
Evan Chengcdf36092007-10-14 05:57:21 +00001365 O << '-' << TAI->getPrivateGlobalPrefix() << "JTI" << getFunctionNumber()
1366 << '_' << uid << '\n';
Nate Begeman984c1a42006-08-12 21:29:52 +00001367}
Evan Cheng45fe3bc2006-09-12 21:00:35 +00001368
Evan Cheng797d56f2007-11-09 01:32:10 +00001369void AsmPrinter::printPICJumpTableSetLabel(unsigned uid, unsigned uid2,
1370 const MachineBasicBlock *MBB) const {
Evan Cheng91f120f2006-11-01 09:23:08 +00001371 if (!TAI->getSetDirective())
1372 return;
1373
1374 O << TAI->getSetDirective() << ' ' << TAI->getPrivateGlobalPrefix()
Evan Chengcdf36092007-10-14 05:57:21 +00001375 << getFunctionNumber() << '_' << uid << '_' << uid2
1376 << "_set_" << MBB->getNumber() << ',';
Evan Chengc7990652008-02-28 00:43:03 +00001377 printBasicBlockLabel(MBB, false, false, false);
Evan Chengcdf36092007-10-14 05:57:21 +00001378 O << '-' << TAI->getPrivateGlobalPrefix() << "JTI" << getFunctionNumber()
1379 << '_' << uid << '_' << uid2 << '\n';
Evan Cheng91f120f2006-11-01 09:23:08 +00001380}
1381
Evan Cheng45fe3bc2006-09-12 21:00:35 +00001382/// printDataDirective - This method prints the asm directive for the
1383/// specified type.
1384void AsmPrinter::printDataDirective(const Type *type) {
1385 const TargetData *TD = TM.getTargetData();
1386 switch (type->getTypeID()) {
Reid Spencer7a9c62b2007-01-12 07:05:14 +00001387 case Type::IntegerTyID: {
1388 unsigned BitWidth = cast<IntegerType>(type)->getBitWidth();
1389 if (BitWidth <= 8)
1390 O << TAI->getData8bitsDirective();
1391 else if (BitWidth <= 16)
1392 O << TAI->getData16bitsDirective();
1393 else if (BitWidth <= 32)
1394 O << TAI->getData32bitsDirective();
1395 else if (BitWidth <= 64) {
1396 assert(TAI->getData64bitsDirective() &&
1397 "Target cannot handle 64-bit constant exprs!");
1398 O << TAI->getData64bitsDirective();
1399 }
Evan Cheng45fe3bc2006-09-12 21:00:35 +00001400 break;
Reid Spencer7a9c62b2007-01-12 07:05:14 +00001401 }
Evan Cheng45fe3bc2006-09-12 21:00:35 +00001402 case Type::PointerTyID:
1403 if (TD->getPointerSize() == 8) {
1404 assert(TAI->getData64bitsDirective() &&
1405 "Target cannot handle 64-bit pointer exprs!");
1406 O << TAI->getData64bitsDirective();
Reid Spencer7a9c62b2007-01-12 07:05:14 +00001407 } else {
1408 O << TAI->getData32bitsDirective();
Evan Cheng45fe3bc2006-09-12 21:00:35 +00001409 }
Evan Cheng45fe3bc2006-09-12 21:00:35 +00001410 break;
1411 case Type::FloatTyID: case Type::DoubleTyID:
Dale Johannesen6bf69ed2007-09-28 18:06:58 +00001412 case Type::X86_FP80TyID: case Type::FP128TyID: case Type::PPC_FP128TyID:
Evan Cheng45fe3bc2006-09-12 21:00:35 +00001413 assert (0 && "Should have already output floating point constant.");
1414 default:
1415 assert (0 && "Can't handle printing this type of thing");
1416 break;
1417 }
1418}
Dale Johannesen915e1542007-02-16 01:54:53 +00001419