AsmPrinter.cpp revision 597b0fc0795cad9bc222538348a4a6c6c92b5d82 
1//===-- AsmPrinter.cpp - Common AsmPrinter code ---------------------------===//
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 implements the AsmPrinter class.
11//
12//===----------------------------------------------------------------------===//
13
14#define DEBUG_TYPE "asm-printer"
15#include "llvm/CodeGen/AsmPrinter.h"
16#include "llvm/Assembly/Writer.h"
17#include "llvm/DerivedTypes.h"
18#include "llvm/Constants.h"
19#include "llvm/Module.h"
20#include "llvm/CodeGen/DwarfWriter.h"
21#include "llvm/CodeGen/GCMetadataPrinter.h"
22#include "llvm/CodeGen/MachineConstantPool.h"
23#include "llvm/CodeGen/MachineFrameInfo.h"
24#include "llvm/CodeGen/MachineFunction.h"
25#include "llvm/CodeGen/MachineJumpTableInfo.h"
26#include "llvm/CodeGen/MachineLoopInfo.h"
27#include "llvm/CodeGen/MachineModuleInfo.h"
28#include "llvm/Analysis/ConstantFolding.h"
29#include "llvm/Analysis/DebugInfo.h"
30#include "llvm/MC/MCContext.h"
31#include "llvm/MC/MCExpr.h"
32#include "llvm/MC/MCInst.h"
33#include "llvm/MC/MCSection.h"
34#include "llvm/MC/MCStreamer.h"
35#include "llvm/MC/MCSymbol.h"
36#include "llvm/MC/MCAsmInfo.h"
37#include "llvm/Target/Mangler.h"
38#include "llvm/Target/TargetData.h"
39#include "llvm/Target/TargetInstrInfo.h"
40#include "llvm/Target/TargetLowering.h"
41#include "llvm/Target/TargetLoweringObjectFile.h"
42#include "llvm/Target/TargetOptions.h"
43#include "llvm/Target/TargetRegisterInfo.h"
44#include "llvm/ADT/SmallPtrSet.h"
45#include "llvm/ADT/SmallString.h"
46#include "llvm/ADT/Statistic.h"
47#include "llvm/Support/CommandLine.h"
48#include "llvm/Support/Debug.h"
49#include "llvm/Support/ErrorHandling.h"
50#include "llvm/Support/Format.h"
51#include "llvm/Support/FormattedStream.h"
52#include <cerrno>
53using namespace llvm;
54
55STATISTIC(EmittedInsts, "Number of machine instrs printed");
56
57char AsmPrinter::ID = 0;
58AsmPrinter::AsmPrinter(formatted_raw_ostream &o, TargetMachine &tm,
59                       MCContext &Ctx, MCStreamer &Streamer,
60                       const MCAsmInfo *T)
61  : MachineFunctionPass(&ID), O(o),
62    TM(tm), MAI(T), TRI(tm.getRegisterInfo()),
63    OutContext(Ctx), OutStreamer(Streamer),
64    LastMI(0), LastFn(0), Counter(~0U), SetCounter(0), PrevDLT(NULL) {
65  DW = 0; MMI = 0;
66  VerboseAsm = Streamer.isVerboseAsm();
67}
68
69AsmPrinter::~AsmPrinter() {
70  for (gcp_iterator I = GCMetadataPrinters.begin(),
71                    E = GCMetadataPrinters.end(); I != E; ++I)
72    delete I->second;
73
74  delete &OutStreamer;
75  delete &OutContext;
76}
77
78/// getFunctionNumber - Return a unique ID for the current function.
79///
80unsigned AsmPrinter::getFunctionNumber() const {
81  return MF->getFunctionNumber();
82}
83
84TargetLoweringObjectFile &AsmPrinter::getObjFileLowering() const {
85  return TM.getTargetLowering()->getObjFileLowering();
86}
87
88/// getCurrentSection() - Return the current section we are emitting to.
89const MCSection *AsmPrinter::getCurrentSection() const {
90  return OutStreamer.getCurrentSection();
91}
92
93
94void AsmPrinter::getAnalysisUsage(AnalysisUsage &AU) const {
95  AU.setPreservesAll();
96  MachineFunctionPass::getAnalysisUsage(AU);
97  AU.addRequired<GCModuleInfo>();
98  if (VerboseAsm)
99    AU.addRequired<MachineLoopInfo>();
100}
101
102bool AsmPrinter::doInitialization(Module &M) {
103  // Initialize TargetLoweringObjectFile.
104  const_cast<TargetLoweringObjectFile&>(getObjFileLowering())
105    .Initialize(OutContext, TM);
106
107  Mang = new Mangler(*MAI);
108
109  // Allow the target to emit any magic that it wants at the start of the file.
110  EmitStartOfAsmFile(M);
111
112  // Very minimal debug info. It is ignored if we emit actual debug info. If we
113  // don't, this at least helps the user find where a global came from.
114  if (MAI->hasSingleParameterDotFile()) {
115    // .file "foo.c"
116    OutStreamer.EmitFileDirective(M.getModuleIdentifier());
117  }
118
119  GCModuleInfo *MI = getAnalysisIfAvailable<GCModuleInfo>();
120  assert(MI && "AsmPrinter didn't require GCModuleInfo?");
121  for (GCModuleInfo::iterator I = MI->begin(), E = MI->end(); I != E; ++I)
122    if (GCMetadataPrinter *MP = GetOrCreateGCPrinter(*I))
123      MP->beginAssembly(O, *this, *MAI);
124
125  if (!M.getModuleInlineAsm().empty())
126    O << MAI->getCommentString() << " Start of file scope inline assembly\n"
127      << M.getModuleInlineAsm()
128      << '\n' << MAI->getCommentString()
129      << " End of file scope inline assembly\n";
130
131  MMI = getAnalysisIfAvailable<MachineModuleInfo>();
132  if (MMI)
133    MMI->AnalyzeModule(M);
134  DW = getAnalysisIfAvailable<DwarfWriter>();
135  if (DW)
136    DW->BeginModule(&M, MMI, O, this, MAI);
137
138  return false;
139}
140
141void AsmPrinter::EmitLinkage(unsigned Linkage, MCSymbol *GVSym) const {
142  switch ((GlobalValue::LinkageTypes)Linkage) {
143  case GlobalValue::CommonLinkage:
144  case GlobalValue::LinkOnceAnyLinkage:
145  case GlobalValue::LinkOnceODRLinkage:
146  case GlobalValue::WeakAnyLinkage:
147  case GlobalValue::WeakODRLinkage:
148  case GlobalValue::LinkerPrivateLinkage:
149    if (MAI->getWeakDefDirective() != 0) {
150      // .globl _foo
151      OutStreamer.EmitSymbolAttribute(GVSym, MCSA_Global);
152      // .weak_definition _foo
153      OutStreamer.EmitSymbolAttribute(GVSym, MCSA_WeakDefinition);
154    } else if (const char *LinkOnce = MAI->getLinkOnceDirective()) {
155      // .globl _foo
156      OutStreamer.EmitSymbolAttribute(GVSym, MCSA_Global);
157      // FIXME: linkonce should be a section attribute, handled by COFF Section
158      // assignment.
159      // http://sourceware.org/binutils/docs-2.20/as/Linkonce.html#Linkonce
160      // .linkonce discard
161      // FIXME: It would be nice to use .linkonce samesize for non-common
162      // globals.
163      O << LinkOnce;
164    } else {
165      // .weak _foo
166      OutStreamer.EmitSymbolAttribute(GVSym, MCSA_Weak);
167    }
168    break;
169  case GlobalValue::DLLExportLinkage:
170  case GlobalValue::AppendingLinkage:
171    // FIXME: appending linkage variables should go into a section of
172    // their name or something.  For now, just emit them as external.
173  case GlobalValue::ExternalLinkage:
174    // If external or appending, declare as a global symbol.
175    // .globl _foo
176    OutStreamer.EmitSymbolAttribute(GVSym, MCSA_Global);
177    break;
178  case GlobalValue::PrivateLinkage:
179  case GlobalValue::InternalLinkage:
180    break;
181  default:
182    llvm_unreachable("Unknown linkage type!");
183  }
184}
185
186
187/// EmitGlobalVariable - Emit the specified global variable to the .s file.
188void AsmPrinter::EmitGlobalVariable(const GlobalVariable *GV) {
189  if (!GV->hasInitializer())   // External globals require no code.
190    return;
191
192  // Check to see if this is a special global used by LLVM, if so, emit it.
193  if (EmitSpecialLLVMGlobal(GV))
194    return;
195
196  MCSymbol *GVSym = GetGlobalValueSymbol(GV);
197  EmitVisibility(GVSym, GV->getVisibility());
198
199  if (MAI->hasDotTypeDotSizeDirective())
200    OutStreamer.EmitSymbolAttribute(GVSym, MCSA_ELF_TypeObject);
201
202  SectionKind GVKind = TargetLoweringObjectFile::getKindForGlobal(GV, TM);
203
204  const TargetData *TD = TM.getTargetData();
205  unsigned Size = TD->getTypeAllocSize(GV->getType()->getElementType());
206  unsigned AlignLog = TD->getPreferredAlignmentLog(GV);
207
208  // Handle common and BSS local symbols (.lcomm).
209  if (GVKind.isCommon() || GVKind.isBSSLocal()) {
210    if (Size == 0) Size = 1;   // .comm Foo, 0 is undefined, avoid it.
211
212    if (VerboseAsm) {
213      WriteAsOperand(OutStreamer.GetCommentOS(), GV,
214                     /*PrintType=*/false, GV->getParent());
215      OutStreamer.GetCommentOS() << '\n';
216    }
217
218    // Handle common symbols.
219    if (GVKind.isCommon()) {
220      // .comm _foo, 42, 4
221      OutStreamer.EmitCommonSymbol(GVSym, Size, 1 << AlignLog);
222      return;
223    }
224
225    // Handle local BSS symbols.
226    if (MAI->hasMachoZeroFillDirective()) {
227      const MCSection *TheSection =
228        getObjFileLowering().SectionForGlobal(GV, GVKind, Mang, TM);
229      // .zerofill __DATA, __bss, _foo, 400, 5
230      OutStreamer.EmitZerofill(TheSection, GVSym, Size, 1 << AlignLog);
231      return;
232    }
233
234    if (MAI->hasLCOMMDirective()) {
235      // .lcomm _foo, 42
236      OutStreamer.EmitLocalCommonSymbol(GVSym, Size);
237      return;
238    }
239
240    // .local _foo
241    OutStreamer.EmitSymbolAttribute(GVSym, MCSA_Local);
242    // .comm _foo, 42, 4
243    OutStreamer.EmitCommonSymbol(GVSym, Size, 1 << AlignLog);
244    return;
245  }
246
247  const MCSection *TheSection =
248    getObjFileLowering().SectionForGlobal(GV, GVKind, Mang, TM);
249
250  // Handle the zerofill directive on darwin, which is a special form of BSS
251  // emission.
252  if (GVKind.isBSSExtern() && MAI->hasMachoZeroFillDirective()) {
253    // .globl _foo
254    OutStreamer.EmitSymbolAttribute(GVSym, MCSA_Global);
255    // .zerofill __DATA, __common, _foo, 400, 5
256    OutStreamer.EmitZerofill(TheSection, GVSym, Size, 1 << AlignLog);
257    return;
258  }
259
260  OutStreamer.SwitchSection(TheSection);
261
262  EmitLinkage(GV->getLinkage(), GVSym);
263  EmitAlignment(AlignLog, GV);
264
265  if (VerboseAsm) {
266    WriteAsOperand(OutStreamer.GetCommentOS(), GV,
267                   /*PrintType=*/false, GV->getParent());
268    OutStreamer.GetCommentOS() << '\n';
269  }
270  OutStreamer.EmitLabel(GVSym);
271
272  EmitGlobalConstant(GV->getInitializer());
273
274  if (MAI->hasDotTypeDotSizeDirective())
275    // .size foo, 42
276    OutStreamer.EmitELFSize(GVSym, MCConstantExpr::Create(Size, OutContext));
277
278  OutStreamer.AddBlankLine();
279}
280
281/// EmitFunctionHeader - This method emits the header for the current
282/// function.
283void AsmPrinter::EmitFunctionHeader() {
284  // Print out constants referenced by the function
285  EmitConstantPool();
286
287  // Print the 'header' of function.
288  const Function *F = MF->getFunction();
289
290  OutStreamer.SwitchSection(getObjFileLowering().SectionForGlobal(F, Mang, TM));
291  EmitVisibility(CurrentFnSym, F->getVisibility());
292
293  EmitLinkage(F->getLinkage(), CurrentFnSym);
294  EmitAlignment(MF->getAlignment(), F);
295
296  if (MAI->hasDotTypeDotSizeDirective())
297    OutStreamer.EmitSymbolAttribute(CurrentFnSym, MCSA_ELF_TypeFunction);
298
299  if (VerboseAsm) {
300    WriteAsOperand(OutStreamer.GetCommentOS(), F,
301                   /*PrintType=*/false, F->getParent());
302    OutStreamer.GetCommentOS() << '\n';
303  }
304
305  // Emit the CurrentFnSym.  This is a virtual function to allow targets to
306  // do their wild and crazy things as required.
307  EmitFunctionEntryLabel();
308
309  // Add some workaround for linkonce linkage on Cygwin\MinGW.
310  if (MAI->getLinkOnceDirective() != 0 &&
311      (F->hasLinkOnceLinkage() || F->hasWeakLinkage()))
312    // FIXME: What is this?
313    O << "Lllvm$workaround$fake$stub$" << *CurrentFnSym << ":\n";
314
315  // Emit pre-function debug and/or EH information.
316  if (MAI->doesSupportDebugInformation() || MAI->doesSupportExceptionHandling())
317    DW->BeginFunction(MF);
318}
319
320/// EmitFunctionEntryLabel - Emit the label that is the entrypoint for the
321/// function.  This can be overridden by targets as required to do custom stuff.
322void AsmPrinter::EmitFunctionEntryLabel() {
323  OutStreamer.EmitLabel(CurrentFnSym);
324}
325
326
327/// EmitComments - Pretty-print comments for instructions.
328static void EmitComments(const MachineInstr &MI, raw_ostream &CommentOS) {
329  const MachineFunction *MF = MI.getParent()->getParent();
330  const TargetMachine &TM = MF->getTarget();
331
332  if (!MI.getDebugLoc().isUnknown()) {
333    DILocation DLT = MF->getDILocation(MI.getDebugLoc());
334
335    // Print source line info.
336    DIScope Scope = DLT.getScope();
337    // Omit the directory, because it's likely to be long and uninteresting.
338    if (Scope.Verify())
339      CommentOS << Scope.getFilename();
340    else
341      CommentOS << "<unknown>";
342    CommentOS << ':' << DLT.getLineNumber();
343    if (DLT.getColumnNumber() != 0)
344      CommentOS << ':' << DLT.getColumnNumber();
345    CommentOS << '\n';
346  }
347
348  // Check for spills and reloads
349  int FI;
350
351  const MachineFrameInfo *FrameInfo = MF->getFrameInfo();
352
353  // We assume a single instruction only has a spill or reload, not
354  // both.
355  const MachineMemOperand *MMO;
356  if (TM.getInstrInfo()->isLoadFromStackSlotPostFE(&MI, FI)) {
357    if (FrameInfo->isSpillSlotObjectIndex(FI)) {
358      MMO = *MI.memoperands_begin();
359      CommentOS << MMO->getSize() << "-byte Reload\n";
360    }
361  } else if (TM.getInstrInfo()->hasLoadFromStackSlot(&MI, MMO, FI)) {
362    if (FrameInfo->isSpillSlotObjectIndex(FI))
363      CommentOS << MMO->getSize() << "-byte Folded Reload\n";
364  } else if (TM.getInstrInfo()->isStoreToStackSlotPostFE(&MI, FI)) {
365    if (FrameInfo->isSpillSlotObjectIndex(FI)) {
366      MMO = *MI.memoperands_begin();
367      CommentOS << MMO->getSize() << "-byte Spill\n";
368    }
369  } else if (TM.getInstrInfo()->hasStoreToStackSlot(&MI, MMO, FI)) {
370    if (FrameInfo->isSpillSlotObjectIndex(FI))
371      CommentOS << MMO->getSize() << "-byte Folded Spill\n";
372  }
373
374  // Check for spill-induced copies
375  unsigned SrcReg, DstReg, SrcSubIdx, DstSubIdx;
376  if (TM.getInstrInfo()->isMoveInstr(MI, SrcReg, DstReg,
377                                     SrcSubIdx, DstSubIdx)) {
378    if (MI.getAsmPrinterFlag(MachineInstr::ReloadReuse))
379      CommentOS << " Reload Reuse\n";
380  }
381}
382
383
384
385/// EmitFunctionBody - This method emits the body and trailer for a
386/// function.
387void AsmPrinter::EmitFunctionBody() {
388  // Emit target-specific gunk before the function body.
389  EmitFunctionBodyStart();
390
391  // Print out code for the function.
392  bool HasAnyRealCode = false;
393  for (MachineFunction::const_iterator I = MF->begin(), E = MF->end();
394       I != E; ++I) {
395    // Print a label for the basic block.
396    EmitBasicBlockStart(I);
397    for (MachineBasicBlock::const_iterator II = I->begin(), IE = I->end();
398         II != IE; ++II) {
399      // Print the assembly for the instruction.
400      if (!II->isLabel())
401        HasAnyRealCode = true;
402
403      ++EmittedInsts;
404
405      // FIXME: Clean up processDebugLoc.
406      processDebugLoc(II, true);
407
408      if (VerboseAsm)
409        EmitComments(*II, OutStreamer.GetCommentOS());
410
411      switch (II->getOpcode()) {
412      case TargetOpcode::DBG_LABEL:
413      case TargetOpcode::EH_LABEL:
414      case TargetOpcode::GC_LABEL:
415        printLabelInst(II);
416        break;
417      case TargetOpcode::INLINEASM:
418        printInlineAsm(II);
419        break;
420      case TargetOpcode::IMPLICIT_DEF:
421        printImplicitDef(II);
422        break;
423      case TargetOpcode::KILL:
424        printKill(II);
425        break;
426      default:
427        EmitInstruction(II);
428        break;
429      }
430
431      // FIXME: Clean up processDebugLoc.
432      processDebugLoc(II, false);
433    }
434  }
435
436  // If the function is empty and the object file uses .subsections_via_symbols,
437  // then we need to emit *something* to the function body to prevent the
438  // labels from collapsing together.  Just emit a 0 byte.
439  if (MAI->hasSubsectionsViaSymbols() && !HasAnyRealCode)
440    OutStreamer.EmitIntValue(0, 1, 0/*addrspace*/);
441
442  // Emit target-specific gunk after the function body.
443  EmitFunctionBodyEnd();
444
445  if (MAI->hasDotTypeDotSizeDirective())
446    O << "\t.size\t" << *CurrentFnSym << ", .-" << *CurrentFnSym << '\n';
447
448  // Emit post-function debug information.
449  if (MAI->doesSupportDebugInformation() || MAI->doesSupportExceptionHandling())
450    DW->EndFunction(MF);
451
452  // Print out jump tables referenced by the function.
453  EmitJumpTableInfo();
454
455  OutStreamer.AddBlankLine();
456}
457
458
459bool AsmPrinter::doFinalization(Module &M) {
460  // Emit global variables.
461  for (Module::const_global_iterator I = M.global_begin(), E = M.global_end();
462       I != E; ++I)
463    EmitGlobalVariable(I);
464
465  // Emit final debug information.
466  if (MAI->doesSupportDebugInformation() || MAI->doesSupportExceptionHandling())
467    DW->EndModule();
468
469  // If the target wants to know about weak references, print them all.
470  if (MAI->getWeakRefDirective()) {
471    // FIXME: This is not lazy, it would be nice to only print weak references
472    // to stuff that is actually used.  Note that doing so would require targets
473    // to notice uses in operands (due to constant exprs etc).  This should
474    // happen with the MC stuff eventually.
475
476    // Print out module-level global variables here.
477    for (Module::const_global_iterator I = M.global_begin(), E = M.global_end();
478         I != E; ++I) {
479      if (!I->hasExternalWeakLinkage()) continue;
480      OutStreamer.EmitSymbolAttribute(GetGlobalValueSymbol(I),
481                                      MCSA_WeakReference);
482    }
483
484    for (Module::const_iterator I = M.begin(), E = M.end(); I != E; ++I) {
485      if (!I->hasExternalWeakLinkage()) continue;
486      OutStreamer.EmitSymbolAttribute(GetGlobalValueSymbol(I),
487                                      MCSA_WeakReference);
488    }
489  }
490
491  if (MAI->hasSetDirective()) {
492    OutStreamer.AddBlankLine();
493    for (Module::const_alias_iterator I = M.alias_begin(), E = M.alias_end();
494         I != E; ++I) {
495      MCSymbol *Name = GetGlobalValueSymbol(I);
496
497      const GlobalValue *GV = cast<GlobalValue>(I->getAliasedGlobal());
498      MCSymbol *Target = GetGlobalValueSymbol(GV);
499
500      if (I->hasExternalLinkage() || !MAI->getWeakRefDirective())
501        OutStreamer.EmitSymbolAttribute(Name, MCSA_Global);
502      else if (I->hasWeakLinkage())
503        OutStreamer.EmitSymbolAttribute(Name, MCSA_WeakReference);
504      else
505        assert(I->hasLocalLinkage() && "Invalid alias linkage");
506
507      EmitVisibility(Name, I->getVisibility());
508
509      // Emit the directives as assignments aka .set:
510      OutStreamer.EmitAssignment(Name,
511                                 MCSymbolRefExpr::Create(Target, OutContext));
512    }
513  }
514
515  GCModuleInfo *MI = getAnalysisIfAvailable<GCModuleInfo>();
516  assert(MI && "AsmPrinter didn't require GCModuleInfo?");
517  for (GCModuleInfo::iterator I = MI->end(), E = MI->begin(); I != E; )
518    if (GCMetadataPrinter *MP = GetOrCreateGCPrinter(*--I))
519      MP->finishAssembly(O, *this, *MAI);
520
521  // If we don't have any trampolines, then we don't require stack memory
522  // to be executable. Some targets have a directive to declare this.
523  Function *InitTrampolineIntrinsic = M.getFunction("llvm.init.trampoline");
524  if (!InitTrampolineIntrinsic || InitTrampolineIntrinsic->use_empty())
525    if (MCSection *S = MAI->getNonexecutableStackSection(OutContext))
526      OutStreamer.SwitchSection(S);
527
528  // Allow the target to emit any magic that it wants at the end of the file,
529  // after everything else has gone out.
530  EmitEndOfAsmFile(M);
531
532  delete Mang; Mang = 0;
533  DW = 0; MMI = 0;
534
535  OutStreamer.Finish();
536  return false;
537}
538
539void AsmPrinter::SetupMachineFunction(MachineFunction &MF) {
540  this->MF = &MF;
541  // Get the function symbol.
542  CurrentFnSym = GetGlobalValueSymbol(MF.getFunction());
543
544  if (VerboseAsm)
545    LI = &getAnalysis<MachineLoopInfo>();
546}
547
548namespace {
549  // SectionCPs - Keep track the alignment, constpool entries per Section.
550  struct SectionCPs {
551    const MCSection *S;
552    unsigned Alignment;
553    SmallVector<unsigned, 4> CPEs;
554    SectionCPs(const MCSection *s, unsigned a) : S(s), Alignment(a) {}
555  };
556}
557
558/// EmitConstantPool - Print to the current output stream assembly
559/// representations of the constants in the constant pool MCP. This is
560/// used to print out constants which have been "spilled to memory" by
561/// the code generator.
562///
563void AsmPrinter::EmitConstantPool() {
564  const MachineConstantPool *MCP = MF->getConstantPool();
565  const std::vector<MachineConstantPoolEntry> &CP = MCP->getConstants();
566  if (CP.empty()) return;
567
568  // Calculate sections for constant pool entries. We collect entries to go into
569  // the same section together to reduce amount of section switch statements.
570  SmallVector<SectionCPs, 4> CPSections;
571  for (unsigned i = 0, e = CP.size(); i != e; ++i) {
572    const MachineConstantPoolEntry &CPE = CP[i];
573    unsigned Align = CPE.getAlignment();
574
575    SectionKind Kind;
576    switch (CPE.getRelocationInfo()) {
577    default: llvm_unreachable("Unknown section kind");
578    case 2: Kind = SectionKind::getReadOnlyWithRel(); break;
579    case 1:
580      Kind = SectionKind::getReadOnlyWithRelLocal();
581      break;
582    case 0:
583    switch (TM.getTargetData()->getTypeAllocSize(CPE.getType())) {
584    case 4:  Kind = SectionKind::getMergeableConst4(); break;
585    case 8:  Kind = SectionKind::getMergeableConst8(); break;
586    case 16: Kind = SectionKind::getMergeableConst16();break;
587    default: Kind = SectionKind::getMergeableConst(); break;
588    }
589    }
590
591    const MCSection *S = getObjFileLowering().getSectionForConstant(Kind);
592
593    // The number of sections are small, just do a linear search from the
594    // last section to the first.
595    bool Found = false;
596    unsigned SecIdx = CPSections.size();
597    while (SecIdx != 0) {
598      if (CPSections[--SecIdx].S == S) {
599        Found = true;
600        break;
601      }
602    }
603    if (!Found) {
604      SecIdx = CPSections.size();
605      CPSections.push_back(SectionCPs(S, Align));
606    }
607
608    if (Align > CPSections[SecIdx].Alignment)
609      CPSections[SecIdx].Alignment = Align;
610    CPSections[SecIdx].CPEs.push_back(i);
611  }
612
613  // Now print stuff into the calculated sections.
614  for (unsigned i = 0, e = CPSections.size(); i != e; ++i) {
615    OutStreamer.SwitchSection(CPSections[i].S);
616    EmitAlignment(Log2_32(CPSections[i].Alignment));
617
618    unsigned Offset = 0;
619    for (unsigned j = 0, ee = CPSections[i].CPEs.size(); j != ee; ++j) {
620      unsigned CPI = CPSections[i].CPEs[j];
621      MachineConstantPoolEntry CPE = CP[CPI];
622
623      // Emit inter-object padding for alignment.
624      unsigned AlignMask = CPE.getAlignment() - 1;
625      unsigned NewOffset = (Offset + AlignMask) & ~AlignMask;
626      OutStreamer.EmitFill(NewOffset - Offset, 0/*fillval*/, 0/*addrspace*/);
627
628      const Type *Ty = CPE.getType();
629      Offset = NewOffset + TM.getTargetData()->getTypeAllocSize(Ty);
630
631      // Emit the label with a comment on it.
632      if (VerboseAsm) {
633        OutStreamer.GetCommentOS() << "constant pool ";
634        WriteTypeSymbolic(OutStreamer.GetCommentOS(), CPE.getType(),
635                          MF->getFunction()->getParent());
636        OutStreamer.GetCommentOS() << '\n';
637      }
638      OutStreamer.EmitLabel(GetCPISymbol(CPI));
639
640      if (CPE.isMachineConstantPoolEntry())
641        EmitMachineConstantPoolValue(CPE.Val.MachineCPVal);
642      else
643        EmitGlobalConstant(CPE.Val.ConstVal);
644    }
645  }
646}
647
648/// EmitJumpTableInfo - Print assembly representations of the jump tables used
649/// by the current function to the current output stream.
650///
651void AsmPrinter::EmitJumpTableInfo() {
652  const MachineJumpTableInfo *MJTI = MF->getJumpTableInfo();
653  if (MJTI == 0) return;
654  const std::vector<MachineJumpTableEntry> &JT = MJTI->getJumpTables();
655  if (JT.empty()) return;
656
657  // Pick the directive to use to print the jump table entries, and switch to
658  // the appropriate section.
659  const Function *F = MF->getFunction();
660  bool JTInDiffSection = false;
661  if (// In PIC mode, we need to emit the jump table to the same section as the
662      // function body itself, otherwise the label differences won't make sense.
663      // FIXME: Need a better predicate for this: what about custom entries?
664      MJTI->getEntryKind() == MachineJumpTableInfo::EK_LabelDifference32 ||
665      // We should also do if the section name is NULL or function is declared
666      // in discardable section
667      // FIXME: this isn't the right predicate, should be based on the MCSection
668      // for the function.
669      F->isWeakForLinker()) {
670    OutStreamer.SwitchSection(getObjFileLowering().SectionForGlobal(F,Mang,TM));
671  } else {
672    // Otherwise, drop it in the readonly section.
673    const MCSection *ReadOnlySection =
674      getObjFileLowering().getSectionForConstant(SectionKind::getReadOnly());
675    OutStreamer.SwitchSection(ReadOnlySection);
676    JTInDiffSection = true;
677  }
678
679  EmitAlignment(Log2_32(MJTI->getEntryAlignment(*TM.getTargetData())));
680
681  for (unsigned JTI = 0, e = JT.size(); JTI != e; ++JTI) {
682    const std::vector<MachineBasicBlock*> &JTBBs = JT[JTI].MBBs;
683
684    // If this jump table was deleted, ignore it.
685    if (JTBBs.empty()) continue;
686
687    // For the EK_LabelDifference32 entry, if the target supports .set, emit a
688    // .set directive for each unique entry.  This reduces the number of
689    // relocations the assembler will generate for the jump table.
690    if (MJTI->getEntryKind() == MachineJumpTableInfo::EK_LabelDifference32 &&
691        MAI->hasSetDirective()) {
692      SmallPtrSet<const MachineBasicBlock*, 16> EmittedSets;
693      const TargetLowering *TLI = TM.getTargetLowering();
694      const MCExpr *Base = TLI->getPICJumpTableRelocBaseExpr(MF,JTI,OutContext);
695      for (unsigned ii = 0, ee = JTBBs.size(); ii != ee; ++ii) {
696        const MachineBasicBlock *MBB = JTBBs[ii];
697        if (!EmittedSets.insert(MBB)) continue;
698
699        // .set LJTSet, LBB32-base
700        const MCExpr *LHS =
701          MCSymbolRefExpr::Create(MBB->getSymbol(OutContext), OutContext);
702        OutStreamer.EmitAssignment(GetJTSetSymbol(JTI, MBB->getNumber()),
703                                MCBinaryExpr::CreateSub(LHS, Base, OutContext));
704      }
705    }
706
707    // On some targets (e.g. Darwin) we want to emit two consequtive labels
708    // before each jump table.  The first label is never referenced, but tells
709    // the assembler and linker the extents of the jump table object.  The
710    // second label is actually referenced by the code.
711    if (JTInDiffSection && MAI->getLinkerPrivateGlobalPrefix()[0])
712      // FIXME: This doesn't have to have any specific name, just any randomly
713      // named and numbered 'l' label would work.  Simplify GetJTISymbol.
714      OutStreamer.EmitLabel(GetJTISymbol(JTI, true));
715
716    OutStreamer.EmitLabel(GetJTISymbol(JTI));
717
718    for (unsigned ii = 0, ee = JTBBs.size(); ii != ee; ++ii)
719      EmitJumpTableEntry(MJTI, JTBBs[ii], JTI);
720  }
721}
722
723/// EmitJumpTableEntry - Emit a jump table entry for the specified MBB to the
724/// current stream.
725void AsmPrinter::EmitJumpTableEntry(const MachineJumpTableInfo *MJTI,
726                                    const MachineBasicBlock *MBB,
727                                    unsigned UID) const {
728  const MCExpr *Value = 0;
729  switch (MJTI->getEntryKind()) {
730  case MachineJumpTableInfo::EK_Custom32:
731    Value = TM.getTargetLowering()->LowerCustomJumpTableEntry(MJTI, MBB, UID,
732                                                              OutContext);
733    break;
734  case MachineJumpTableInfo::EK_BlockAddress:
735    // EK_BlockAddress - Each entry is a plain address of block, e.g.:
736    //     .word LBB123
737    Value = MCSymbolRefExpr::Create(MBB->getSymbol(OutContext), OutContext);
738    break;
739  case MachineJumpTableInfo::EK_GPRel32BlockAddress: {
740    // EK_GPRel32BlockAddress - Each entry is an address of block, encoded
741    // with a relocation as gp-relative, e.g.:
742    //     .gprel32 LBB123
743    MCSymbol *MBBSym = MBB->getSymbol(OutContext);
744    OutStreamer.EmitGPRel32Value(MCSymbolRefExpr::Create(MBBSym, OutContext));
745    return;
746  }
747
748  case MachineJumpTableInfo::EK_LabelDifference32: {
749    // EK_LabelDifference32 - Each entry is the address of the block minus
750    // the address of the jump table.  This is used for PIC jump tables where
751    // gprel32 is not supported.  e.g.:
752    //      .word LBB123 - LJTI1_2
753    // If the .set directive is supported, this is emitted as:
754    //      .set L4_5_set_123, LBB123 - LJTI1_2
755    //      .word L4_5_set_123
756
757    // If we have emitted set directives for the jump table entries, print
758    // them rather than the entries themselves.  If we're emitting PIC, then
759    // emit the table entries as differences between two text section labels.
760    if (MAI->hasSetDirective()) {
761      // If we used .set, reference the .set's symbol.
762      Value = MCSymbolRefExpr::Create(GetJTSetSymbol(UID, MBB->getNumber()),
763                                      OutContext);
764      break;
765    }
766    // Otherwise, use the difference as the jump table entry.
767    Value = MCSymbolRefExpr::Create(MBB->getSymbol(OutContext), OutContext);
768    const MCExpr *JTI = MCSymbolRefExpr::Create(GetJTISymbol(UID), OutContext);
769    Value = MCBinaryExpr::CreateSub(Value, JTI, OutContext);
770    break;
771  }
772  }
773
774  assert(Value && "Unknown entry kind!");
775
776  unsigned EntrySize = MJTI->getEntrySize(*TM.getTargetData());
777  OutStreamer.EmitValue(Value, EntrySize, /*addrspace*/0);
778}
779
780
781/// EmitSpecialLLVMGlobal - Check to see if the specified global is a
782/// special global used by LLVM.  If so, emit it and return true, otherwise
783/// do nothing and return false.
784bool AsmPrinter::EmitSpecialLLVMGlobal(const GlobalVariable *GV) {
785  if (GV->getName() == "llvm.used") {
786    if (MAI->hasNoDeadStrip())    // No need to emit this at all.
787      EmitLLVMUsedList(GV->getInitializer());
788    return true;
789  }
790
791  // Ignore debug and non-emitted data.  This handles llvm.compiler.used.
792  if (GV->getSection() == "llvm.metadata" ||
793      GV->hasAvailableExternallyLinkage())
794    return true;
795
796  if (!GV->hasAppendingLinkage()) return false;
797
798  assert(GV->hasInitializer() && "Not a special LLVM global!");
799
800  const TargetData *TD = TM.getTargetData();
801  unsigned Align = Log2_32(TD->getPointerPrefAlignment());
802  if (GV->getName() == "llvm.global_ctors") {
803    OutStreamer.SwitchSection(getObjFileLowering().getStaticCtorSection());
804    EmitAlignment(Align, 0);
805    EmitXXStructorList(GV->getInitializer());
806
807    if (TM.getRelocationModel() == Reloc::Static &&
808        MAI->hasStaticCtorDtorReferenceInStaticMode()) {
809      StringRef Sym(".constructors_used");
810      OutStreamer.EmitSymbolAttribute(OutContext.GetOrCreateSymbol(Sym),
811                                      MCSA_Reference);
812    }
813    return true;
814  }
815
816  if (GV->getName() == "llvm.global_dtors") {
817    OutStreamer.SwitchSection(getObjFileLowering().getStaticDtorSection());
818    EmitAlignment(Align, 0);
819    EmitXXStructorList(GV->getInitializer());
820
821    if (TM.getRelocationModel() == Reloc::Static &&
822        MAI->hasStaticCtorDtorReferenceInStaticMode()) {
823      StringRef Sym(".destructors_used");
824      OutStreamer.EmitSymbolAttribute(OutContext.GetOrCreateSymbol(Sym),
825                                      MCSA_Reference);
826    }
827    return true;
828  }
829
830  return false;
831}
832
833/// EmitLLVMUsedList - For targets that define a MAI::UsedDirective, mark each
834/// global in the specified llvm.used list for which emitUsedDirectiveFor
835/// is true, as being used with this directive.
836void AsmPrinter::EmitLLVMUsedList(Constant *List) {
837  // Should be an array of 'i8*'.
838  ConstantArray *InitList = dyn_cast<ConstantArray>(List);
839  if (InitList == 0) return;
840
841  for (unsigned i = 0, e = InitList->getNumOperands(); i != e; ++i) {
842    const GlobalValue *GV =
843      dyn_cast<GlobalValue>(InitList->getOperand(i)->stripPointerCasts());
844    if (GV && getObjFileLowering().shouldEmitUsedDirectiveFor(GV, Mang))
845      OutStreamer.EmitSymbolAttribute(GetGlobalValueSymbol(GV),
846                                      MCSA_NoDeadStrip);
847  }
848}
849
850/// EmitXXStructorList - Emit the ctor or dtor list.  This just prints out the
851/// function pointers, ignoring the init priority.
852void AsmPrinter::EmitXXStructorList(Constant *List) {
853  // Should be an array of '{ int, void ()* }' structs.  The first value is the
854  // init priority, which we ignore.
855  if (!isa<ConstantArray>(List)) return;
856  ConstantArray *InitList = cast<ConstantArray>(List);
857  for (unsigned i = 0, e = InitList->getNumOperands(); i != e; ++i)
858    if (ConstantStruct *CS = dyn_cast<ConstantStruct>(InitList->getOperand(i))){
859      if (CS->getNumOperands() != 2) return;  // Not array of 2-element structs.
860
861      if (CS->getOperand(1)->isNullValue())
862        return;  // Found a null terminator, exit printing.
863      // Emit the function pointer.
864      EmitGlobalConstant(CS->getOperand(1));
865    }
866}
867
868//===--------------------------------------------------------------------===//
869// Emission and print routines
870//
871
872/// EmitInt8 - Emit a byte directive and value.
873///
874void AsmPrinter::EmitInt8(int Value) const {
875  OutStreamer.EmitIntValue(Value, 1, 0/*addrspace*/);
876}
877
878/// EmitInt16 - Emit a short directive and value.
879///
880void AsmPrinter::EmitInt16(int Value) const {
881  OutStreamer.EmitIntValue(Value, 2, 0/*addrspace*/);
882}
883
884/// EmitInt32 - Emit a long directive and value.
885///
886void AsmPrinter::EmitInt32(int Value) const {
887  OutStreamer.EmitIntValue(Value, 4, 0/*addrspace*/);
888}
889
890/// EmitInt64 - Emit a long long directive and value.
891///
892void AsmPrinter::EmitInt64(uint64_t Value) const {
893  OutStreamer.EmitIntValue(Value, 8, 0/*addrspace*/);
894}
895
896/// EmitLabelDifference - Emit something like ".long Hi-Lo" where the size
897/// in bytes of the directive is specified by Size and Hi/Lo specify the
898/// labels.  This implicitly uses .set if it is available.
899void AsmPrinter::EmitLabelDifference(const MCSymbol *Hi, const MCSymbol *Lo,
900                                     unsigned Size) const {
901  // Get the Hi-Lo expression.
902  const MCExpr *Diff =
903    MCBinaryExpr::CreateSub(MCSymbolRefExpr::Create(Hi, OutContext),
904                            MCSymbolRefExpr::Create(Lo, OutContext),
905                            OutContext);
906
907  if (!MAI->hasSetDirective()) {
908    OutStreamer.EmitValue(Diff, Size, 0/*AddrSpace*/);
909    return;
910  }
911
912  // Otherwise, emit with .set (aka assignment).
913  MCSymbol *SetLabel =
914    OutContext.GetOrCreateSymbol(Twine(MAI->getPrivateGlobalPrefix()) + "set" +
915                                 Twine(SetCounter++));
916  OutStreamer.EmitAssignment(SetLabel, Diff);
917  OutStreamer.EmitSymbolValue(SetLabel, Size, 0/*AddrSpace*/);
918}
919
920
921//===----------------------------------------------------------------------===//
922
923// EmitAlignment - Emit an alignment directive to the specified power of
924// two boundary.  For example, if you pass in 3 here, you will get an 8
925// byte alignment.  If a global value is specified, and if that global has
926// an explicit alignment requested, it will unconditionally override the
927// alignment request.  However, if ForcedAlignBits is specified, this value
928// has final say: the ultimate alignment will be the max of ForcedAlignBits
929// and the alignment computed with NumBits and the global.
930//
931// The algorithm is:
932//     Align = NumBits;
933//     if (GV && GV->hasalignment) Align = GV->getalignment();
934//     Align = std::max(Align, ForcedAlignBits);
935//
936void AsmPrinter::EmitAlignment(unsigned NumBits, const GlobalValue *GV,
937                               unsigned ForcedAlignBits,
938                               bool UseFillExpr) const {
939  if (GV && GV->getAlignment())
940    NumBits = Log2_32(GV->getAlignment());
941  NumBits = std::max(NumBits, ForcedAlignBits);
942
943  if (NumBits == 0) return;   // No need to emit alignment.
944
945  if (getCurrentSection()->getKind().isText())
946    OutStreamer.EmitCodeAlignment(1 << NumBits);
947  else
948    OutStreamer.EmitValueToAlignment(1 << NumBits, 0, 1, 0);
949}
950
951/// LowerConstant - Lower the specified LLVM Constant to an MCExpr.
952///
953static const MCExpr *LowerConstant(const Constant *CV, AsmPrinter &AP) {
954  MCContext &Ctx = AP.OutContext;
955
956  if (CV->isNullValue() || isa<UndefValue>(CV))
957    return MCConstantExpr::Create(0, Ctx);
958
959  if (const ConstantInt *CI = dyn_cast<ConstantInt>(CV))
960    return MCConstantExpr::Create(CI->getZExtValue(), Ctx);
961
962  if (const GlobalValue *GV = dyn_cast<GlobalValue>(CV))
963    return MCSymbolRefExpr::Create(AP.GetGlobalValueSymbol(GV), Ctx);
964  if (const BlockAddress *BA = dyn_cast<BlockAddress>(CV))
965    return MCSymbolRefExpr::Create(AP.GetBlockAddressSymbol(BA), Ctx);
966
967  const ConstantExpr *CE = dyn_cast<ConstantExpr>(CV);
968  if (CE == 0) {
969    llvm_unreachable("Unknown constant value to lower!");
970    return MCConstantExpr::Create(0, Ctx);
971  }
972
973  switch (CE->getOpcode()) {
974  default:
975    // If the code isn't optimized, there may be outstanding folding
976    // opportunities. Attempt to fold the expression using TargetData as a
977    // last resort before giving up.
978    if (Constant *C =
979          ConstantFoldConstantExpression(CE, AP.TM.getTargetData()))
980      if (C != CE)
981        return LowerConstant(C, AP);
982#ifndef NDEBUG
983    CE->dump();
984#endif
985    llvm_unreachable("FIXME: Don't support this constant expr");
986  case Instruction::GetElementPtr: {
987    const TargetData &TD = *AP.TM.getTargetData();
988    // Generate a symbolic expression for the byte address
989    const Constant *PtrVal = CE->getOperand(0);
990    SmallVector<Value*, 8> IdxVec(CE->op_begin()+1, CE->op_end());
991    int64_t Offset = TD.getIndexedOffset(PtrVal->getType(), &IdxVec[0],
992                                         IdxVec.size());
993
994    const MCExpr *Base = LowerConstant(CE->getOperand(0), AP);
995    if (Offset == 0)
996      return Base;
997
998    // Truncate/sext the offset to the pointer size.
999    if (TD.getPointerSizeInBits() != 64) {
1000      int SExtAmount = 64-TD.getPointerSizeInBits();
1001      Offset = (Offset << SExtAmount) >> SExtAmount;
1002    }
1003
1004    return MCBinaryExpr::CreateAdd(Base, MCConstantExpr::Create(Offset, Ctx),
1005                                   Ctx);
1006  }
1007
1008  case Instruction::Trunc:
1009    // We emit the value and depend on the assembler to truncate the generated
1010    // expression properly.  This is important for differences between
1011    // blockaddress labels.  Since the two labels are in the same function, it
1012    // is reasonable to treat their delta as a 32-bit value.
1013    // FALL THROUGH.
1014  case Instruction::BitCast:
1015    return LowerConstant(CE->getOperand(0), AP);
1016
1017  case Instruction::IntToPtr: {
1018    const TargetData &TD = *AP.TM.getTargetData();
1019    // Handle casts to pointers by changing them into casts to the appropriate
1020    // integer type.  This promotes constant folding and simplifies this code.
1021    Constant *Op = CE->getOperand(0);
1022    Op = ConstantExpr::getIntegerCast(Op, TD.getIntPtrType(CV->getContext()),
1023                                      false/*ZExt*/);
1024    return LowerConstant(Op, AP);
1025  }
1026
1027  case Instruction::PtrToInt: {
1028    const TargetData &TD = *AP.TM.getTargetData();
1029    // Support only foldable casts to/from pointers that can be eliminated by
1030    // changing the pointer to the appropriately sized integer type.
1031    Constant *Op = CE->getOperand(0);
1032    const Type *Ty = CE->getType();
1033
1034    const MCExpr *OpExpr = LowerConstant(Op, AP);
1035
1036    // We can emit the pointer value into this slot if the slot is an
1037    // integer slot equal to the size of the pointer.
1038    if (TD.getTypeAllocSize(Ty) == TD.getTypeAllocSize(Op->getType()))
1039      return OpExpr;
1040
1041    // Otherwise the pointer is smaller than the resultant integer, mask off
1042    // the high bits so we are sure to get a proper truncation if the input is
1043    // a constant expr.
1044    unsigned InBits = TD.getTypeAllocSizeInBits(Op->getType());
1045    const MCExpr *MaskExpr = MCConstantExpr::Create(~0ULL >> (64-InBits), Ctx);
1046    return MCBinaryExpr::CreateAnd(OpExpr, MaskExpr, Ctx);
1047  }
1048
1049  // The MC library also has a right-shift operator, but it isn't consistently
1050  // signed or unsigned between different targets.
1051  case Instruction::Add:
1052  case Instruction::Sub:
1053  case Instruction::Mul:
1054  case Instruction::SDiv:
1055  case Instruction::SRem:
1056  case Instruction::Shl:
1057  case Instruction::And:
1058  case Instruction::Or:
1059  case Instruction::Xor: {
1060    const MCExpr *LHS = LowerConstant(CE->getOperand(0), AP);
1061    const MCExpr *RHS = LowerConstant(CE->getOperand(1), AP);
1062    switch (CE->getOpcode()) {
1063    default: llvm_unreachable("Unknown binary operator constant cast expr");
1064    case Instruction::Add: return MCBinaryExpr::CreateAdd(LHS, RHS, Ctx);
1065    case Instruction::Sub: return MCBinaryExpr::CreateSub(LHS, RHS, Ctx);
1066    case Instruction::Mul: return MCBinaryExpr::CreateMul(LHS, RHS, Ctx);
1067    case Instruction::SDiv: return MCBinaryExpr::CreateDiv(LHS, RHS, Ctx);
1068    case Instruction::SRem: return MCBinaryExpr::CreateMod(LHS, RHS, Ctx);
1069    case Instruction::Shl: return MCBinaryExpr::CreateShl(LHS, RHS, Ctx);
1070    case Instruction::And: return MCBinaryExpr::CreateAnd(LHS, RHS, Ctx);
1071    case Instruction::Or:  return MCBinaryExpr::CreateOr (LHS, RHS, Ctx);
1072    case Instruction::Xor: return MCBinaryExpr::CreateXor(LHS, RHS, Ctx);
1073    }
1074  }
1075  }
1076}
1077
1078static void EmitGlobalConstantArray(const ConstantArray *CA, unsigned AddrSpace,
1079                                    AsmPrinter &AP) {
1080  if (AddrSpace != 0 || !CA->isString()) {
1081    // Not a string.  Print the values in successive locations
1082    for (unsigned i = 0, e = CA->getNumOperands(); i != e; ++i)
1083      AP.EmitGlobalConstant(CA->getOperand(i), AddrSpace);
1084    return;
1085  }
1086
1087  // Otherwise, it can be emitted as .ascii.
1088  SmallVector<char, 128> TmpVec;
1089  TmpVec.reserve(CA->getNumOperands());
1090  for (unsigned i = 0, e = CA->getNumOperands(); i != e; ++i)
1091    TmpVec.push_back(cast<ConstantInt>(CA->getOperand(i))->getZExtValue());
1092
1093  AP.OutStreamer.EmitBytes(StringRef(TmpVec.data(), TmpVec.size()), AddrSpace);
1094}
1095
1096static void EmitGlobalConstantVector(const ConstantVector *CV,
1097                                     unsigned AddrSpace, AsmPrinter &AP) {
1098  for (unsigned i = 0, e = CV->getType()->getNumElements(); i != e; ++i)
1099    AP.EmitGlobalConstant(CV->getOperand(i), AddrSpace);
1100}
1101
1102static void EmitGlobalConstantStruct(const ConstantStruct *CS,
1103                                     unsigned AddrSpace, AsmPrinter &AP) {
1104  // Print the fields in successive locations. Pad to align if needed!
1105  const TargetData *TD = AP.TM.getTargetData();
1106  unsigned Size = TD->getTypeAllocSize(CS->getType());
1107  const StructLayout *Layout = TD->getStructLayout(CS->getType());
1108  uint64_t SizeSoFar = 0;
1109  for (unsigned i = 0, e = CS->getNumOperands(); i != e; ++i) {
1110    const Constant *Field = CS->getOperand(i);
1111
1112    // Check if padding is needed and insert one or more 0s.
1113    uint64_t FieldSize = TD->getTypeAllocSize(Field->getType());
1114    uint64_t PadSize = ((i == e-1 ? Size : Layout->getElementOffset(i+1))
1115                        - Layout->getElementOffset(i)) - FieldSize;
1116    SizeSoFar += FieldSize + PadSize;
1117
1118    // Now print the actual field value.
1119    AP.EmitGlobalConstant(Field, AddrSpace);
1120
1121    // Insert padding - this may include padding to increase the size of the
1122    // current field up to the ABI size (if the struct is not packed) as well
1123    // as padding to ensure that the next field starts at the right offset.
1124    AP.OutStreamer.EmitZeros(PadSize, AddrSpace);
1125  }
1126  assert(SizeSoFar == Layout->getSizeInBytes() &&
1127         "Layout of constant struct may be incorrect!");
1128}
1129
1130static void EmitGlobalConstantFP(const ConstantFP *CFP, unsigned AddrSpace,
1131                                 AsmPrinter &AP) {
1132  // FP Constants are printed as integer constants to avoid losing
1133  // precision.
1134  if (CFP->getType()->isDoubleTy()) {
1135    if (AP.VerboseAsm) {
1136      double Val = CFP->getValueAPF().convertToDouble();
1137      AP.OutStreamer.GetCommentOS() << "double " << Val << '\n';
1138    }
1139
1140    uint64_t Val = CFP->getValueAPF().bitcastToAPInt().getZExtValue();
1141    AP.OutStreamer.EmitIntValue(Val, 8, AddrSpace);
1142    return;
1143  }
1144
1145  if (CFP->getType()->isFloatTy()) {
1146    if (AP.VerboseAsm) {
1147      float Val = CFP->getValueAPF().convertToFloat();
1148      AP.OutStreamer.GetCommentOS() << "float " << Val << '\n';
1149    }
1150    uint64_t Val = CFP->getValueAPF().bitcastToAPInt().getZExtValue();
1151    AP.OutStreamer.EmitIntValue(Val, 4, AddrSpace);
1152    return;
1153  }
1154
1155  if (CFP->getType()->isX86_FP80Ty()) {
1156    // all long double variants are printed as hex
1157    // api needed to prevent premature destruction
1158    APInt API = CFP->getValueAPF().bitcastToAPInt();
1159    const uint64_t *p = API.getRawData();
1160    if (AP.VerboseAsm) {
1161      // Convert to double so we can print the approximate val as a comment.
1162      APFloat DoubleVal = CFP->getValueAPF();
1163      bool ignored;
1164      DoubleVal.convert(APFloat::IEEEdouble, APFloat::rmNearestTiesToEven,
1165                        &ignored);
1166      AP.OutStreamer.GetCommentOS() << "x86_fp80 ~= "
1167        << DoubleVal.convertToDouble() << '\n';
1168    }
1169
1170    if (AP.TM.getTargetData()->isBigEndian()) {
1171      AP.OutStreamer.EmitIntValue(p[1], 2, AddrSpace);
1172      AP.OutStreamer.EmitIntValue(p[0], 8, AddrSpace);
1173    } else {
1174      AP.OutStreamer.EmitIntValue(p[0], 8, AddrSpace);
1175      AP.OutStreamer.EmitIntValue(p[1], 2, AddrSpace);
1176    }
1177
1178    // Emit the tail padding for the long double.
1179    const TargetData &TD = *AP.TM.getTargetData();
1180    AP.OutStreamer.EmitZeros(TD.getTypeAllocSize(CFP->getType()) -
1181                             TD.getTypeStoreSize(CFP->getType()), AddrSpace);
1182    return;
1183  }
1184
1185  assert(CFP->getType()->isPPC_FP128Ty() &&
1186         "Floating point constant type not handled");
1187  // All long double variants are printed as hex api needed to prevent
1188  // premature destruction.
1189  APInt API = CFP->getValueAPF().bitcastToAPInt();
1190  const uint64_t *p = API.getRawData();
1191  if (AP.TM.getTargetData()->isBigEndian()) {
1192    AP.OutStreamer.EmitIntValue(p[0], 8, AddrSpace);
1193    AP.OutStreamer.EmitIntValue(p[1], 8, AddrSpace);
1194  } else {
1195    AP.OutStreamer.EmitIntValue(p[1], 8, AddrSpace);
1196    AP.OutStreamer.EmitIntValue(p[0], 8, AddrSpace);
1197  }
1198}
1199
1200static void EmitGlobalConstantLargeInt(const ConstantInt *CI,
1201                                       unsigned AddrSpace, AsmPrinter &AP) {
1202  const TargetData *TD = AP.TM.getTargetData();
1203  unsigned BitWidth = CI->getBitWidth();
1204  assert((BitWidth & 63) == 0 && "only support multiples of 64-bits");
1205
1206  // We don't expect assemblers to support integer data directives
1207  // for more than 64 bits, so we emit the data in at most 64-bit
1208  // quantities at a time.
1209  const uint64_t *RawData = CI->getValue().getRawData();
1210  for (unsigned i = 0, e = BitWidth / 64; i != e; ++i) {
1211    uint64_t Val = TD->isBigEndian() ? RawData[e - i - 1] : RawData[i];
1212    AP.OutStreamer.EmitIntValue(Val, 8, AddrSpace);
1213  }
1214}
1215
1216/// EmitGlobalConstant - Print a general LLVM constant to the .s file.
1217void AsmPrinter::EmitGlobalConstant(const Constant *CV, unsigned AddrSpace) {
1218  if (isa<ConstantAggregateZero>(CV) || isa<UndefValue>(CV)) {
1219    uint64_t Size = TM.getTargetData()->getTypeAllocSize(CV->getType());
1220    if (Size == 0) Size = 1; // An empty "_foo:" followed by a section is undef.
1221    return OutStreamer.EmitZeros(Size, AddrSpace);
1222  }
1223
1224  if (const ConstantInt *CI = dyn_cast<ConstantInt>(CV)) {
1225    unsigned Size = TM.getTargetData()->getTypeAllocSize(CV->getType());
1226    switch (Size) {
1227    case 1:
1228    case 2:
1229    case 4:
1230    case 8:
1231      if (VerboseAsm)
1232        OutStreamer.GetCommentOS() << format("0x%llx\n", CI->getZExtValue());
1233      OutStreamer.EmitIntValue(CI->getZExtValue(), Size, AddrSpace);
1234      return;
1235    default:
1236      EmitGlobalConstantLargeInt(CI, AddrSpace, *this);
1237      return;
1238    }
1239  }
1240
1241  if (const ConstantArray *CVA = dyn_cast<ConstantArray>(CV))
1242    return EmitGlobalConstantArray(CVA, AddrSpace, *this);
1243
1244  if (const ConstantStruct *CVS = dyn_cast<ConstantStruct>(CV))
1245    return EmitGlobalConstantStruct(CVS, AddrSpace, *this);
1246
1247  if (const ConstantFP *CFP = dyn_cast<ConstantFP>(CV))
1248    return EmitGlobalConstantFP(CFP, AddrSpace, *this);
1249
1250  if (const ConstantVector *V = dyn_cast<ConstantVector>(CV))
1251    return EmitGlobalConstantVector(V, AddrSpace, *this);
1252
1253  if (isa<ConstantPointerNull>(CV)) {
1254    unsigned Size = TM.getTargetData()->getTypeAllocSize(CV->getType());
1255    OutStreamer.EmitIntValue(0, Size, AddrSpace);
1256    return;
1257  }
1258
1259  // Otherwise, it must be a ConstantExpr.  Lower it to an MCExpr, then emit it
1260  // thread the streamer with EmitValue.
1261  OutStreamer.EmitValue(LowerConstant(CV, *this),
1262                        TM.getTargetData()->getTypeAllocSize(CV->getType()),
1263                        AddrSpace);
1264}
1265
1266void AsmPrinter::EmitMachineConstantPoolValue(MachineConstantPoolValue *MCPV) {
1267  // Target doesn't support this yet!
1268  llvm_unreachable("Target does not support EmitMachineConstantPoolValue");
1269}
1270
1271/// PrintSpecial - Print information related to the specified machine instr
1272/// that is independent of the operand, and may be independent of the instr
1273/// itself.  This can be useful for portably encoding the comment character
1274/// or other bits of target-specific knowledge into the asmstrings.  The
1275/// syntax used is ${:comment}.  Targets can override this to add support
1276/// for their own strange codes.
1277void AsmPrinter::PrintSpecial(const MachineInstr *MI, const char *Code) const {
1278  if (!strcmp(Code, "private")) {
1279    O << MAI->getPrivateGlobalPrefix();
1280  } else if (!strcmp(Code, "comment")) {
1281    if (VerboseAsm)
1282      O << MAI->getCommentString();
1283  } else if (!strcmp(Code, "uid")) {
1284    // Comparing the address of MI isn't sufficient, because machineinstrs may
1285    // be allocated to the same address across functions.
1286    const Function *ThisF = MI->getParent()->getParent()->getFunction();
1287
1288    // If this is a new LastFn instruction, bump the counter.
1289    if (LastMI != MI || LastFn != ThisF) {
1290      ++Counter;
1291      LastMI = MI;
1292      LastFn = ThisF;
1293    }
1294    O << Counter;
1295  } else {
1296    std::string msg;
1297    raw_string_ostream Msg(msg);
1298    Msg << "Unknown special formatter '" << Code
1299         << "' for machine instr: " << *MI;
1300    llvm_report_error(Msg.str());
1301  }
1302}
1303
1304/// processDebugLoc - Processes the debug information of each machine
1305/// instruction's DebugLoc.
1306void AsmPrinter::processDebugLoc(const MachineInstr *MI,
1307                                 bool BeforePrintingInsn) {
1308  if (!MAI || !DW || !MAI->doesSupportDebugInformation()
1309      || !DW->ShouldEmitDwarfDebug())
1310    return;
1311  DebugLoc DL = MI->getDebugLoc();
1312  if (DL.isUnknown())
1313    return;
1314  DILocation CurDLT = MF->getDILocation(DL);
1315  if (!CurDLT.getScope().Verify())
1316    return;
1317
1318  if (!BeforePrintingInsn) {
1319    // After printing instruction
1320    DW->EndScope(MI);
1321  } else if (CurDLT.getNode() != PrevDLT) {
1322    MCSymbol *L = DW->RecordSourceLine(CurDLT.getLineNumber(),
1323                                       CurDLT.getColumnNumber(),
1324                                       CurDLT.getScope().getNode());
1325    DW->BeginScope(MI, L);
1326    PrevDLT = CurDLT.getNode();
1327  }
1328}
1329
1330
1331/// printInlineAsm - This method formats and prints the specified machine
1332/// instruction that is an inline asm.
1333void AsmPrinter::printInlineAsm(const MachineInstr *MI) const {
1334  unsigned NumOperands = MI->getNumOperands();
1335
1336  // Count the number of register definitions.
1337  unsigned NumDefs = 0;
1338  for (; MI->getOperand(NumDefs).isReg() && MI->getOperand(NumDefs).isDef();
1339       ++NumDefs)
1340    assert(NumDefs != NumOperands-1 && "No asm string?");
1341
1342  assert(MI->getOperand(NumDefs).isSymbol() && "No asm string?");
1343
1344  // Disassemble the AsmStr, printing out the literal pieces, the operands, etc.
1345  const char *AsmStr = MI->getOperand(NumDefs).getSymbolName();
1346
1347  O << '\t';
1348
1349  // If this asmstr is empty, just print the #APP/#NOAPP markers.
1350  // These are useful to see where empty asm's wound up.
1351  if (AsmStr[0] == 0) {
1352    O << MAI->getCommentString() << MAI->getInlineAsmStart() << "\n\t";
1353    O << MAI->getCommentString() << MAI->getInlineAsmEnd() << '\n';
1354    return;
1355  }
1356
1357  O << MAI->getCommentString() << MAI->getInlineAsmStart() << "\n\t";
1358
1359  // The variant of the current asmprinter.
1360  int AsmPrinterVariant = MAI->getAssemblerDialect();
1361
1362  int CurVariant = -1;            // The number of the {.|.|.} region we are in.
1363  const char *LastEmitted = AsmStr; // One past the last character emitted.
1364
1365  while (*LastEmitted) {
1366    switch (*LastEmitted) {
1367    default: {
1368      // Not a special case, emit the string section literally.
1369      const char *LiteralEnd = LastEmitted+1;
1370      while (*LiteralEnd && *LiteralEnd != '{' && *LiteralEnd != '|' &&
1371             *LiteralEnd != '}' && *LiteralEnd != '$' && *LiteralEnd != '\n')
1372        ++LiteralEnd;
1373      if (CurVariant == -1 || CurVariant == AsmPrinterVariant)
1374        O.write(LastEmitted, LiteralEnd-LastEmitted);
1375      LastEmitted = LiteralEnd;
1376      break;
1377    }
1378    case '\n':
1379      ++LastEmitted;   // Consume newline character.
1380      O << '\n';       // Indent code with newline.
1381      break;
1382    case '$': {
1383      ++LastEmitted;   // Consume '$' character.
1384      bool Done = true;
1385
1386      // Handle escapes.
1387      switch (*LastEmitted) {
1388      default: Done = false; break;
1389      case '$':     // $$ -> $
1390        if (CurVariant == -1 || CurVariant == AsmPrinterVariant)
1391          O << '$';
1392        ++LastEmitted;  // Consume second '$' character.
1393        break;
1394      case '(':             // $( -> same as GCC's { character.
1395        ++LastEmitted;      // Consume '(' character.
1396        if (CurVariant != -1) {
1397          llvm_report_error("Nested variants found in inline asm string: '"
1398                            + std::string(AsmStr) + "'");
1399        }
1400        CurVariant = 0;     // We're in the first variant now.
1401        break;
1402      case '|':
1403        ++LastEmitted;  // consume '|' character.
1404        if (CurVariant == -1)
1405          O << '|';       // this is gcc's behavior for | outside a variant
1406        else
1407          ++CurVariant;   // We're in the next variant.
1408        break;
1409      case ')':         // $) -> same as GCC's } char.
1410        ++LastEmitted;  // consume ')' character.
1411        if (CurVariant == -1)
1412          O << '}';     // this is gcc's behavior for } outside a variant
1413        else
1414          CurVariant = -1;
1415        break;
1416      }
1417      if (Done) break;
1418
1419      bool HasCurlyBraces = false;
1420      if (*LastEmitted == '{') {     // ${variable}
1421        ++LastEmitted;               // Consume '{' character.
1422        HasCurlyBraces = true;
1423      }
1424
1425      // If we have ${:foo}, then this is not a real operand reference, it is a
1426      // "magic" string reference, just like in .td files.  Arrange to call
1427      // PrintSpecial.
1428      if (HasCurlyBraces && *LastEmitted == ':') {
1429        ++LastEmitted;
1430        const char *StrStart = LastEmitted;
1431        const char *StrEnd = strchr(StrStart, '}');
1432        if (StrEnd == 0) {
1433          llvm_report_error("Unterminated ${:foo} operand in inline asm string: '"
1434                            + std::string(AsmStr) + "'");
1435        }
1436
1437        std::string Val(StrStart, StrEnd);
1438        PrintSpecial(MI, Val.c_str());
1439        LastEmitted = StrEnd+1;
1440        break;
1441      }
1442
1443      const char *IDStart = LastEmitted;
1444      char *IDEnd;
1445      errno = 0;
1446      long Val = strtol(IDStart, &IDEnd, 10); // We only accept numbers for IDs.
1447      if (!isdigit(*IDStart) || (Val == 0 && errno == EINVAL)) {
1448        llvm_report_error("Bad $ operand number in inline asm string: '"
1449                          + std::string(AsmStr) + "'");
1450      }
1451      LastEmitted = IDEnd;
1452
1453      char Modifier[2] = { 0, 0 };
1454
1455      if (HasCurlyBraces) {
1456        // If we have curly braces, check for a modifier character.  This
1457        // supports syntax like ${0:u}, which correspond to "%u0" in GCC asm.
1458        if (*LastEmitted == ':') {
1459          ++LastEmitted;    // Consume ':' character.
1460          if (*LastEmitted == 0) {
1461            llvm_report_error("Bad ${:} expression in inline asm string: '"
1462                              + std::string(AsmStr) + "'");
1463          }
1464
1465          Modifier[0] = *LastEmitted;
1466          ++LastEmitted;    // Consume modifier character.
1467        }
1468
1469        if (*LastEmitted != '}') {
1470          llvm_report_error("Bad ${} expression in inline asm string: '"
1471                            + std::string(AsmStr) + "'");
1472        }
1473        ++LastEmitted;    // Consume '}' character.
1474      }
1475
1476      if ((unsigned)Val >= NumOperands-1) {
1477        llvm_report_error("Invalid $ operand number in inline asm string: '"
1478                          + std::string(AsmStr) + "'");
1479      }
1480
1481      // Okay, we finally have a value number.  Ask the target to print this
1482      // operand!
1483      if (CurVariant == -1 || CurVariant == AsmPrinterVariant) {
1484        unsigned OpNo = 1;
1485
1486        bool Error = false;
1487
1488        // Scan to find the machine operand number for the operand.
1489        for (; Val; --Val) {
1490          if (OpNo >= MI->getNumOperands()) break;
1491          unsigned OpFlags = MI->getOperand(OpNo).getImm();
1492          OpNo += InlineAsm::getNumOperandRegisters(OpFlags) + 1;
1493        }
1494
1495        if (OpNo >= MI->getNumOperands()) {
1496          Error = true;
1497        } else {
1498          unsigned OpFlags = MI->getOperand(OpNo).getImm();
1499          ++OpNo;  // Skip over the ID number.
1500
1501          if (Modifier[0] == 'l')  // labels are target independent
1502            O << *MI->getOperand(OpNo).getMBB()->getSymbol(OutContext);
1503          else {
1504            AsmPrinter *AP = const_cast<AsmPrinter*>(this);
1505            if ((OpFlags & 7) == 4) {
1506              Error = AP->PrintAsmMemoryOperand(MI, OpNo, AsmPrinterVariant,
1507                                                Modifier[0] ? Modifier : 0);
1508            } else {
1509              Error = AP->PrintAsmOperand(MI, OpNo, AsmPrinterVariant,
1510                                          Modifier[0] ? Modifier : 0);
1511            }
1512          }
1513        }
1514        if (Error) {
1515          std::string msg;
1516          raw_string_ostream Msg(msg);
1517          Msg << "Invalid operand found in inline asm: '" << AsmStr << "'\n";
1518          MI->print(Msg);
1519          llvm_report_error(Msg.str());
1520        }
1521      }
1522      break;
1523    }
1524    }
1525  }
1526  O << "\n\t" << MAI->getCommentString() << MAI->getInlineAsmEnd();
1527  OutStreamer.AddBlankLine();
1528}
1529
1530/// printImplicitDef - This method prints the specified machine instruction
1531/// that is an implicit def.
1532void AsmPrinter::printImplicitDef(const MachineInstr *MI) const {
1533  if (!VerboseAsm) return;
1534  O.PadToColumn(MAI->getCommentColumn());
1535  O << MAI->getCommentString() << " implicit-def: "
1536    << TRI->getName(MI->getOperand(0).getReg());
1537  OutStreamer.AddBlankLine();
1538}
1539
1540void AsmPrinter::printKill(const MachineInstr *MI) const {
1541  if (!VerboseAsm) return;
1542  O.PadToColumn(MAI->getCommentColumn());
1543  O << MAI->getCommentString() << " kill:";
1544  for (unsigned n = 0, e = MI->getNumOperands(); n != e; ++n) {
1545    const MachineOperand &op = MI->getOperand(n);
1546    assert(op.isReg() && "KILL instruction must have only register operands");
1547    O << ' ' << TRI->getName(op.getReg()) << (op.isDef() ? "<def>" : "<kill>");
1548  }
1549  OutStreamer.AddBlankLine();
1550}
1551
1552/// printLabel - This method prints a local label used by debug and
1553/// exception handling tables.
1554void AsmPrinter::printLabelInst(const MachineInstr *MI) const {
1555  MCSymbol *Sym =
1556    OutContext.GetOrCreateSymbol(Twine(MAI->getPrivateGlobalPrefix()) +
1557                                 "label" + Twine(MI->getOperand(0).getImm()));
1558  OutStreamer.EmitLabel(Sym);
1559}
1560
1561void AsmPrinter::printLabel(unsigned Id) const {
1562  MCSymbol *Sym =
1563    OutContext.GetOrCreateSymbol(Twine(MAI->getPrivateGlobalPrefix()) +
1564                                 "label" + Twine(Id));
1565  OutStreamer.EmitLabel(Sym);
1566}
1567
1568/// PrintAsmOperand - Print the specified operand of MI, an INLINEASM
1569/// instruction, using the specified assembler variant.  Targets should
1570/// override this to format as appropriate.
1571bool AsmPrinter::PrintAsmOperand(const MachineInstr *MI, unsigned OpNo,
1572                                 unsigned AsmVariant, const char *ExtraCode) {
1573  // Target doesn't support this yet!
1574  return true;
1575}
1576
1577bool AsmPrinter::PrintAsmMemoryOperand(const MachineInstr *MI, unsigned OpNo,
1578                                       unsigned AsmVariant,
1579                                       const char *ExtraCode) {
1580  // Target doesn't support this yet!
1581  return true;
1582}
1583
1584MCSymbol *AsmPrinter::GetBlockAddressSymbol(const BlockAddress *BA) const {
1585  return GetBlockAddressSymbol(BA->getFunction(), BA->getBasicBlock());
1586}
1587
1588MCSymbol *AsmPrinter::GetBlockAddressSymbol(const Function *F,
1589                                            const BasicBlock *BB) const {
1590  assert(BB->hasName() &&
1591         "Address of anonymous basic block not supported yet!");
1592
1593  // This code must use the function name itself, and not the function number,
1594  // since it must be possible to generate the label name from within other
1595  // functions.
1596  SmallString<60> FnName;
1597  Mang->getNameWithPrefix(FnName, F, false);
1598
1599  // FIXME: THIS IS BROKEN IF THE LLVM BASIC BLOCK DOESN'T HAVE A NAME!
1600  SmallString<60> NameResult;
1601  Mang->getNameWithPrefix(NameResult,
1602                          StringRef("BA") + Twine((unsigned)FnName.size()) +
1603                          "_" + FnName.str() + "_" + BB->getName(),
1604                          Mangler::Private);
1605
1606  return OutContext.GetOrCreateSymbol(NameResult.str());
1607}
1608
1609/// GetCPISymbol - Return the symbol for the specified constant pool entry.
1610MCSymbol *AsmPrinter::GetCPISymbol(unsigned CPID) const {
1611  SmallString<60> Name;
1612  raw_svector_ostream(Name) << MAI->getPrivateGlobalPrefix() << "CPI"
1613    << getFunctionNumber() << '_' << CPID;
1614  return OutContext.GetOrCreateSymbol(Name.str());
1615}
1616
1617/// GetJTISymbol - Return the symbol for the specified jump table entry.
1618MCSymbol *AsmPrinter::GetJTISymbol(unsigned JTID, bool isLinkerPrivate) const {
1619  return MF->getJTISymbol(JTID, OutContext, isLinkerPrivate);
1620}
1621
1622/// GetJTSetSymbol - Return the symbol for the specified jump table .set
1623/// FIXME: privatize to AsmPrinter.
1624MCSymbol *AsmPrinter::GetJTSetSymbol(unsigned UID, unsigned MBBID) const {
1625  SmallString<60> Name;
1626  raw_svector_ostream(Name) << MAI->getPrivateGlobalPrefix()
1627    << getFunctionNumber() << '_' << UID << "_set_" << MBBID;
1628  return OutContext.GetOrCreateSymbol(Name.str());
1629}
1630
1631/// GetGlobalValueSymbol - Return the MCSymbol for the specified global
1632/// value.
1633MCSymbol *AsmPrinter::GetGlobalValueSymbol(const GlobalValue *GV) const {
1634  SmallString<60> NameStr;
1635  Mang->getNameWithPrefix(NameStr, GV, false);
1636  return OutContext.GetOrCreateSymbol(NameStr.str());
1637}
1638
1639/// GetSymbolWithGlobalValueBase - Return the MCSymbol for a symbol with
1640/// global value name as its base, with the specified suffix, and where the
1641/// symbol is forced to have private linkage if ForcePrivate is true.
1642MCSymbol *AsmPrinter::GetSymbolWithGlobalValueBase(const GlobalValue *GV,
1643                                                   StringRef Suffix,
1644                                                   bool ForcePrivate) const {
1645  SmallString<60> NameStr;
1646  Mang->getNameWithPrefix(NameStr, GV, ForcePrivate);
1647  NameStr.append(Suffix.begin(), Suffix.end());
1648  return OutContext.GetOrCreateSymbol(NameStr.str());
1649}
1650
1651/// GetExternalSymbolSymbol - Return the MCSymbol for the specified
1652/// ExternalSymbol.
1653MCSymbol *AsmPrinter::GetExternalSymbolSymbol(StringRef Sym) const {
1654  SmallString<60> NameStr;
1655  Mang->getNameWithPrefix(NameStr, Sym);
1656  return OutContext.GetOrCreateSymbol(NameStr.str());
1657}
1658
1659
1660
1661/// PrintParentLoopComment - Print comments about parent loops of this one.
1662static void PrintParentLoopComment(raw_ostream &OS, const MachineLoop *Loop,
1663                                   unsigned FunctionNumber) {
1664  if (Loop == 0) return;
1665  PrintParentLoopComment(OS, Loop->getParentLoop(), FunctionNumber);
1666  OS.indent(Loop->getLoopDepth()*2)
1667    << "Parent Loop BB" << FunctionNumber << "_"
1668    << Loop->getHeader()->getNumber()
1669    << " Depth=" << Loop->getLoopDepth() << '\n';
1670}
1671
1672
1673/// PrintChildLoopComment - Print comments about child loops within
1674/// the loop for this basic block, with nesting.
1675static void PrintChildLoopComment(raw_ostream &OS, const MachineLoop *Loop,
1676                                  unsigned FunctionNumber) {
1677  // Add child loop information
1678  for (MachineLoop::iterator CL = Loop->begin(), E = Loop->end();CL != E; ++CL){
1679    OS.indent((*CL)->getLoopDepth()*2)
1680      << "Child Loop BB" << FunctionNumber << "_"
1681      << (*CL)->getHeader()->getNumber() << " Depth " << (*CL)->getLoopDepth()
1682      << '\n';
1683    PrintChildLoopComment(OS, *CL, FunctionNumber);
1684  }
1685}
1686
1687/// PrintBasicBlockLoopComments - Pretty-print comments for basic blocks.
1688static void PrintBasicBlockLoopComments(const MachineBasicBlock &MBB,
1689                                        const MachineLoopInfo *LI,
1690                                        const AsmPrinter &AP) {
1691  // Add loop depth information
1692  const MachineLoop *Loop = LI->getLoopFor(&MBB);
1693  if (Loop == 0) return;
1694
1695  MachineBasicBlock *Header = Loop->getHeader();
1696  assert(Header && "No header for loop");
1697
1698  // If this block is not a loop header, just print out what is the loop header
1699  // and return.
1700  if (Header != &MBB) {
1701    AP.OutStreamer.AddComment("  in Loop: Header=BB" +
1702                              Twine(AP.getFunctionNumber())+"_" +
1703                              Twine(Loop->getHeader()->getNumber())+
1704                              " Depth="+Twine(Loop->getLoopDepth()));
1705    return;
1706  }
1707
1708  // Otherwise, it is a loop header.  Print out information about child and
1709  // parent loops.
1710  raw_ostream &OS = AP.OutStreamer.GetCommentOS();
1711
1712  PrintParentLoopComment(OS, Loop->getParentLoop(), AP.getFunctionNumber());
1713
1714  OS << "=>";
1715  OS.indent(Loop->getLoopDepth()*2-2);
1716
1717  OS << "This ";
1718  if (Loop->empty())
1719    OS << "Inner ";
1720  OS << "Loop Header: Depth=" + Twine(Loop->getLoopDepth()) << '\n';
1721
1722  PrintChildLoopComment(OS, Loop, AP.getFunctionNumber());
1723}
1724
1725
1726/// EmitBasicBlockStart - This method prints the label for the specified
1727/// MachineBasicBlock, an alignment (if present) and a comment describing
1728/// it if appropriate.
1729void AsmPrinter::EmitBasicBlockStart(const MachineBasicBlock *MBB) const {
1730  // Emit an alignment directive for this block, if needed.
1731  if (unsigned Align = MBB->getAlignment())
1732    EmitAlignment(Log2_32(Align));
1733
1734  // If the block has its address taken, emit a special label to satisfy
1735  // references to the block. This is done so that we don't need to
1736  // remember the number of this label, and so that we can make
1737  // forward references to labels without knowing what their numbers
1738  // will be.
1739  if (MBB->hasAddressTaken()) {
1740    const BasicBlock *BB = MBB->getBasicBlock();
1741    if (VerboseAsm)
1742      OutStreamer.AddComment("Address Taken");
1743    OutStreamer.EmitLabel(GetBlockAddressSymbol(BB->getParent(), BB));
1744  }
1745
1746  // Print the main label for the block.
1747  if (MBB->pred_empty() || isBlockOnlyReachableByFallthrough(MBB)) {
1748    if (VerboseAsm) {
1749      // NOTE: Want this comment at start of line.
1750      O << MAI->getCommentString() << " BB#" << MBB->getNumber() << ':';
1751      if (const BasicBlock *BB = MBB->getBasicBlock())
1752        if (BB->hasName())
1753          OutStreamer.AddComment("%" + BB->getName());
1754
1755      PrintBasicBlockLoopComments(*MBB, LI, *this);
1756      OutStreamer.AddBlankLine();
1757    }
1758  } else {
1759    if (VerboseAsm) {
1760      if (const BasicBlock *BB = MBB->getBasicBlock())
1761        if (BB->hasName())
1762          OutStreamer.AddComment("%" + BB->getName());
1763      PrintBasicBlockLoopComments(*MBB, LI, *this);
1764    }
1765
1766    OutStreamer.EmitLabel(MBB->getSymbol(OutContext));
1767  }
1768}
1769
1770void AsmPrinter::EmitVisibility(MCSymbol *Sym, unsigned Visibility) const {
1771  MCSymbolAttr Attr = MCSA_Invalid;
1772
1773  switch (Visibility) {
1774  default: break;
1775  case GlobalValue::HiddenVisibility:
1776    Attr = MAI->getHiddenVisibilityAttr();
1777    break;
1778  case GlobalValue::ProtectedVisibility:
1779    Attr = MAI->getProtectedVisibilityAttr();
1780    break;
1781  }
1782
1783  if (Attr != MCSA_Invalid)
1784    OutStreamer.EmitSymbolAttribute(Sym, Attr);
1785}
1786
1787void AsmPrinter::printOffset(int64_t Offset) const {
1788  if (Offset > 0)
1789    O << '+' << Offset;
1790  else if (Offset < 0)
1791    O << Offset;
1792}
1793
1794/// isBlockOnlyReachableByFallthough - Return true if the basic block has
1795/// exactly one predecessor and the control transfer mechanism between
1796/// the predecessor and this block is a fall-through.
1797bool AsmPrinter::isBlockOnlyReachableByFallthrough(const MachineBasicBlock *MBB)
1798    const {
1799  // If this is a landing pad, it isn't a fall through.  If it has no preds,
1800  // then nothing falls through to it.
1801  if (MBB->isLandingPad() || MBB->pred_empty())
1802    return false;
1803
1804  // If there isn't exactly one predecessor, it can't be a fall through.
1805  MachineBasicBlock::const_pred_iterator PI = MBB->pred_begin(), PI2 = PI;
1806  ++PI2;
1807  if (PI2 != MBB->pred_end())
1808    return false;
1809
1810  // The predecessor has to be immediately before this block.
1811  const MachineBasicBlock *Pred = *PI;
1812
1813  if (!Pred->isLayoutSuccessor(MBB))
1814    return false;
1815
1816  // If the block is completely empty, then it definitely does fall through.
1817  if (Pred->empty())
1818    return true;
1819
1820  // Otherwise, check the last instruction.
1821  const MachineInstr &LastInst = Pred->back();
1822  return !LastInst.getDesc().isBarrier();
1823}
1824
1825
1826
1827GCMetadataPrinter *AsmPrinter::GetOrCreateGCPrinter(GCStrategy *S) {
1828  if (!S->usesMetadata())
1829    return 0;
1830
1831  gcp_iterator GCPI = GCMetadataPrinters.find(S);
1832  if (GCPI != GCMetadataPrinters.end())
1833    return GCPI->second;
1834
1835  const char *Name = S->getName().c_str();
1836
1837  for (GCMetadataPrinterRegistry::iterator
1838         I = GCMetadataPrinterRegistry::begin(),
1839         E = GCMetadataPrinterRegistry::end(); I != E; ++I)
1840    if (strcmp(Name, I->getName()) == 0) {
1841      GCMetadataPrinter *GMP = I->instantiate();
1842      GMP->S = S;
1843      GCMetadataPrinters.insert(std::make_pair(S, GMP));
1844      return GMP;
1845    }
1846
1847  llvm_report_error("no GCMetadataPrinter registered for GC: " + Twine(Name));
1848  return 0;
1849}
1850
1851