lib/CodeGen/AsmPrinter/AsmPrinter.cpp

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