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