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