1 //===--- CGCleanup.cpp - Bookkeeping and code emission for cleanups -------===// 2 // 3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. 4 // See https://llvm.org/LICENSE.txt for license information. 5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception 6 // 7 //===----------------------------------------------------------------------===// 8 // 9 // This file contains code dealing with the IR generation for cleanups 10 // and related information. 11 // 12 // A "cleanup" is a piece of code which needs to be executed whenever 13 // control transfers out of a particular scope. This can be 14 // conditionalized to occur only on exceptional control flow, only on 15 // normal control flow, or both. 16 // 17 //===----------------------------------------------------------------------===// 18 19 #include "CGCleanup.h" 20 #include "CodeGenFunction.h" 21 #include "llvm/Support/SaveAndRestore.h" 22 23 using namespace clang; 24 using namespace CodeGen; 25 26 bool DominatingValue<RValue>::saved_type::needsSaving(RValue rv) { 27 if (rv.isScalar()) 28 return DominatingLLVMValue::needsSaving(rv.getScalarVal()); 29 if (rv.isAggregate()) 30 return DominatingLLVMValue::needsSaving(rv.getAggregatePointer()); 31 return true; 32 } 33 34 DominatingValue<RValue>::saved_type 35 DominatingValue<RValue>::saved_type::save(CodeGenFunction &CGF, RValue rv) { 36 if (rv.isScalar()) { 37 llvm::Value *V = rv.getScalarVal(); 38 39 // These automatically dominate and don't need to be saved. 40 if (!DominatingLLVMValue::needsSaving(V)) 41 return saved_type(V, ScalarLiteral); 42 43 // Everything else needs an alloca. 44 Address addr = 45 CGF.CreateDefaultAlignTempAlloca(V->getType(), "saved-rvalue"); 46 CGF.Builder.CreateStore(V, addr); 47 return saved_type(addr.getPointer(), ScalarAddress); 48 } 49 50 if (rv.isComplex()) { 51 CodeGenFunction::ComplexPairTy V = rv.getComplexVal(); 52 llvm::Type *ComplexTy = 53 llvm::StructType::get(V.first->getType(), V.second->getType()); 54 Address addr = CGF.CreateDefaultAlignTempAlloca(ComplexTy, "saved-complex"); 55 CGF.Builder.CreateStore(V.first, 56 CGF.Builder.CreateStructGEP(addr, 0, CharUnits())); 57 CharUnits offset = CharUnits::fromQuantity( 58 CGF.CGM.getDataLayout().getTypeAllocSize(V.first->getType())); 59 CGF.Builder.CreateStore(V.second, 60 CGF.Builder.CreateStructGEP(addr, 1, offset)); 61 return saved_type(addr.getPointer(), ComplexAddress); 62 } 63 64 assert(rv.isAggregate()); 65 Address V = rv.getAggregateAddress(); // TODO: volatile? 66 if (!DominatingLLVMValue::needsSaving(V.getPointer())) 67 return saved_type(V.getPointer(), AggregateLiteral, 68 V.getAlignment().getQuantity()); 69 70 Address addr = 71 CGF.CreateTempAlloca(V.getType(), CGF.getPointerAlign(), "saved-rvalue"); 72 CGF.Builder.CreateStore(V.getPointer(), addr); 73 return saved_type(addr.getPointer(), AggregateAddress, 74 V.getAlignment().getQuantity()); 75 } 76 77 /// Given a saved r-value produced by SaveRValue, perform the code 78 /// necessary to restore it to usability at the current insertion 79 /// point. 80 RValue DominatingValue<RValue>::saved_type::restore(CodeGenFunction &CGF) { 81 auto getSavingAddress = [&](llvm::Value *value) { 82 auto alignment = cast<llvm::AllocaInst>(value)->getAlignment(); 83 return Address(value, CharUnits::fromQuantity(alignment)); 84 }; 85 switch (K) { 86 case ScalarLiteral: 87 return RValue::get(Value); 88 case ScalarAddress: 89 return RValue::get(CGF.Builder.CreateLoad(getSavingAddress(Value))); 90 case AggregateLiteral: 91 return RValue::getAggregate(Address(Value, CharUnits::fromQuantity(Align))); 92 case AggregateAddress: { 93 auto addr = CGF.Builder.CreateLoad(getSavingAddress(Value)); 94 return RValue::getAggregate(Address(addr, CharUnits::fromQuantity(Align))); 95 } 96 case ComplexAddress: { 97 Address address = getSavingAddress(Value); 98 llvm::Value *real = CGF.Builder.CreateLoad( 99 CGF.Builder.CreateStructGEP(address, 0, CharUnits())); 100 CharUnits offset = CharUnits::fromQuantity( 101 CGF.CGM.getDataLayout().getTypeAllocSize(real->getType())); 102 llvm::Value *imag = CGF.Builder.CreateLoad( 103 CGF.Builder.CreateStructGEP(address, 1, offset)); 104 return RValue::getComplex(real, imag); 105 } 106 } 107 108 llvm_unreachable("bad saved r-value kind"); 109 } 110 111 /// Push an entry of the given size onto this protected-scope stack. 112 char *EHScopeStack::allocate(size_t Size) { 113 Size = llvm::alignTo(Size, ScopeStackAlignment); 114 if (!StartOfBuffer) { 115 unsigned Capacity = 1024; 116 while (Capacity < Size) Capacity *= 2; 117 StartOfBuffer = new char[Capacity]; 118 StartOfData = EndOfBuffer = StartOfBuffer + Capacity; 119 } else if (static_cast<size_t>(StartOfData - StartOfBuffer) < Size) { 120 unsigned CurrentCapacity = EndOfBuffer - StartOfBuffer; 121 unsigned UsedCapacity = CurrentCapacity - (StartOfData - StartOfBuffer); 122 123 unsigned NewCapacity = CurrentCapacity; 124 do { 125 NewCapacity *= 2; 126 } while (NewCapacity < UsedCapacity + Size); 127 128 char *NewStartOfBuffer = new char[NewCapacity]; 129 char *NewEndOfBuffer = NewStartOfBuffer + NewCapacity; 130 char *NewStartOfData = NewEndOfBuffer - UsedCapacity; 131 memcpy(NewStartOfData, StartOfData, UsedCapacity); 132 delete [] StartOfBuffer; 133 StartOfBuffer = NewStartOfBuffer; 134 EndOfBuffer = NewEndOfBuffer; 135 StartOfData = NewStartOfData; 136 } 137 138 assert(StartOfBuffer + Size <= StartOfData); 139 StartOfData -= Size; 140 return StartOfData; 141 } 142 143 void EHScopeStack::deallocate(size_t Size) { 144 StartOfData += llvm::alignTo(Size, ScopeStackAlignment); 145 } 146 147 bool EHScopeStack::containsOnlyLifetimeMarkers( 148 EHScopeStack::stable_iterator Old) const { 149 for (EHScopeStack::iterator it = begin(); stabilize(it) != Old; it++) { 150 EHCleanupScope *cleanup = dyn_cast<EHCleanupScope>(&*it); 151 if (!cleanup || !cleanup->isLifetimeMarker()) 152 return false; 153 } 154 155 return true; 156 } 157 158 bool EHScopeStack::requiresLandingPad() const { 159 for (stable_iterator si = getInnermostEHScope(); si != stable_end(); ) { 160 // Skip lifetime markers. 161 if (auto *cleanup = dyn_cast<EHCleanupScope>(&*find(si))) 162 if (cleanup->isLifetimeMarker()) { 163 si = cleanup->getEnclosingEHScope(); 164 continue; 165 } 166 return true; 167 } 168 169 return false; 170 } 171 172 EHScopeStack::stable_iterator 173 EHScopeStack::getInnermostActiveNormalCleanup() const { 174 for (stable_iterator si = getInnermostNormalCleanup(), se = stable_end(); 175 si != se; ) { 176 EHCleanupScope &cleanup = cast<EHCleanupScope>(*find(si)); 177 if (cleanup.isActive()) return si; 178 si = cleanup.getEnclosingNormalCleanup(); 179 } 180 return stable_end(); 181 } 182 183 184 void *EHScopeStack::pushCleanup(CleanupKind Kind, size_t Size) { 185 char *Buffer = allocate(EHCleanupScope::getSizeForCleanupSize(Size)); 186 bool IsNormalCleanup = Kind & NormalCleanup; 187 bool IsEHCleanup = Kind & EHCleanup; 188 bool IsActive = !(Kind & InactiveCleanup); 189 bool IsLifetimeMarker = Kind & LifetimeMarker; 190 EHCleanupScope *Scope = 191 new (Buffer) EHCleanupScope(IsNormalCleanup, 192 IsEHCleanup, 193 IsActive, 194 Size, 195 BranchFixups.size(), 196 InnermostNormalCleanup, 197 InnermostEHScope); 198 if (IsNormalCleanup) 199 InnermostNormalCleanup = stable_begin(); 200 if (IsEHCleanup) 201 InnermostEHScope = stable_begin(); 202 if (IsLifetimeMarker) 203 Scope->setLifetimeMarker(); 204 205 return Scope->getCleanupBuffer(); 206 } 207 208 void EHScopeStack::popCleanup() { 209 assert(!empty() && "popping exception stack when not empty"); 210 211 assert(isa<EHCleanupScope>(*begin())); 212 EHCleanupScope &Cleanup = cast<EHCleanupScope>(*begin()); 213 InnermostNormalCleanup = Cleanup.getEnclosingNormalCleanup(); 214 InnermostEHScope = Cleanup.getEnclosingEHScope(); 215 deallocate(Cleanup.getAllocatedSize()); 216 217 // Destroy the cleanup. 218 Cleanup.Destroy(); 219 220 // Check whether we can shrink the branch-fixups stack. 221 if (!BranchFixups.empty()) { 222 // If we no longer have any normal cleanups, all the fixups are 223 // complete. 224 if (!hasNormalCleanups()) 225 BranchFixups.clear(); 226 227 // Otherwise we can still trim out unnecessary nulls. 228 else 229 popNullFixups(); 230 } 231 } 232 233 EHFilterScope *EHScopeStack::pushFilter(unsigned numFilters) { 234 assert(getInnermostEHScope() == stable_end()); 235 char *buffer = allocate(EHFilterScope::getSizeForNumFilters(numFilters)); 236 EHFilterScope *filter = new (buffer) EHFilterScope(numFilters); 237 InnermostEHScope = stable_begin(); 238 return filter; 239 } 240 241 void EHScopeStack::popFilter() { 242 assert(!empty() && "popping exception stack when not empty"); 243 244 EHFilterScope &filter = cast<EHFilterScope>(*begin()); 245 deallocate(EHFilterScope::getSizeForNumFilters(filter.getNumFilters())); 246 247 InnermostEHScope = filter.getEnclosingEHScope(); 248 } 249 250 EHCatchScope *EHScopeStack::pushCatch(unsigned numHandlers) { 251 char *buffer = allocate(EHCatchScope::getSizeForNumHandlers(numHandlers)); 252 EHCatchScope *scope = 253 new (buffer) EHCatchScope(numHandlers, InnermostEHScope); 254 InnermostEHScope = stable_begin(); 255 return scope; 256 } 257 258 void EHScopeStack::pushTerminate() { 259 char *Buffer = allocate(EHTerminateScope::getSize()); 260 new (Buffer) EHTerminateScope(InnermostEHScope); 261 InnermostEHScope = stable_begin(); 262 } 263 264 /// Remove any 'null' fixups on the stack. However, we can't pop more 265 /// fixups than the fixup depth on the innermost normal cleanup, or 266 /// else fixups that we try to add to that cleanup will end up in the 267 /// wrong place. We *could* try to shrink fixup depths, but that's 268 /// actually a lot of work for little benefit. 269 void EHScopeStack::popNullFixups() { 270 // We expect this to only be called when there's still an innermost 271 // normal cleanup; otherwise there really shouldn't be any fixups. 272 assert(hasNormalCleanups()); 273 274 EHScopeStack::iterator it = find(InnermostNormalCleanup); 275 unsigned MinSize = cast<EHCleanupScope>(*it).getFixupDepth(); 276 assert(BranchFixups.size() >= MinSize && "fixup stack out of order"); 277 278 while (BranchFixups.size() > MinSize && 279 BranchFixups.back().Destination == nullptr) 280 BranchFixups.pop_back(); 281 } 282 283 Address CodeGenFunction::createCleanupActiveFlag() { 284 // Create a variable to decide whether the cleanup needs to be run. 285 Address active = CreateTempAllocaWithoutCast( 286 Builder.getInt1Ty(), CharUnits::One(), "cleanup.cond"); 287 288 // Initialize it to false at a site that's guaranteed to be run 289 // before each evaluation. 290 setBeforeOutermostConditional(Builder.getFalse(), active); 291 292 // Initialize it to true at the current location. 293 Builder.CreateStore(Builder.getTrue(), active); 294 295 return active; 296 } 297 298 void CodeGenFunction::initFullExprCleanupWithFlag(Address ActiveFlag) { 299 // Set that as the active flag in the cleanup. 300 EHCleanupScope &cleanup = cast<EHCleanupScope>(*EHStack.begin()); 301 assert(!cleanup.hasActiveFlag() && "cleanup already has active flag?"); 302 cleanup.setActiveFlag(ActiveFlag); 303 304 if (cleanup.isNormalCleanup()) cleanup.setTestFlagInNormalCleanup(); 305 if (cleanup.isEHCleanup()) cleanup.setTestFlagInEHCleanup(); 306 } 307 308 void EHScopeStack::Cleanup::anchor() {} 309 310 static void createStoreInstBefore(llvm::Value *value, Address addr, 311 llvm::Instruction *beforeInst) { 312 auto store = new llvm::StoreInst(value, addr.getPointer(), beforeInst); 313 store->setAlignment(addr.getAlignment().getQuantity()); 314 } 315 316 static llvm::LoadInst *createLoadInstBefore(Address addr, const Twine &name, 317 llvm::Instruction *beforeInst) { 318 auto load = new llvm::LoadInst(addr.getPointer(), name, beforeInst); 319 load->setAlignment(addr.getAlignment().getQuantity()); 320 return load; 321 } 322 323 /// All the branch fixups on the EH stack have propagated out past the 324 /// outermost normal cleanup; resolve them all by adding cases to the 325 /// given switch instruction. 326 static void ResolveAllBranchFixups(CodeGenFunction &CGF, 327 llvm::SwitchInst *Switch, 328 llvm::BasicBlock *CleanupEntry) { 329 llvm::SmallPtrSet<llvm::BasicBlock*, 4> CasesAdded; 330 331 for (unsigned I = 0, E = CGF.EHStack.getNumBranchFixups(); I != E; ++I) { 332 // Skip this fixup if its destination isn't set. 333 BranchFixup &Fixup = CGF.EHStack.getBranchFixup(I); 334 if (Fixup.Destination == nullptr) continue; 335 336 // If there isn't an OptimisticBranchBlock, then InitialBranch is 337 // still pointing directly to its destination; forward it to the 338 // appropriate cleanup entry. This is required in the specific 339 // case of 340 // { std::string s; goto lbl; } 341 // lbl: 342 // i.e. where there's an unresolved fixup inside a single cleanup 343 // entry which we're currently popping. 344 if (Fixup.OptimisticBranchBlock == nullptr) { 345 createStoreInstBefore(CGF.Builder.getInt32(Fixup.DestinationIndex), 346 CGF.getNormalCleanupDestSlot(), 347 Fixup.InitialBranch); 348 Fixup.InitialBranch->setSuccessor(0, CleanupEntry); 349 } 350 351 // Don't add this case to the switch statement twice. 352 if (!CasesAdded.insert(Fixup.Destination).second) 353 continue; 354 355 Switch->addCase(CGF.Builder.getInt32(Fixup.DestinationIndex), 356 Fixup.Destination); 357 } 358 359 CGF.EHStack.clearFixups(); 360 } 361 362 /// Transitions the terminator of the given exit-block of a cleanup to 363 /// be a cleanup switch. 364 static llvm::SwitchInst *TransitionToCleanupSwitch(CodeGenFunction &CGF, 365 llvm::BasicBlock *Block) { 366 // If it's a branch, turn it into a switch whose default 367 // destination is its original target. 368 llvm::Instruction *Term = Block->getTerminator(); 369 assert(Term && "can't transition block without terminator"); 370 371 if (llvm::BranchInst *Br = dyn_cast<llvm::BranchInst>(Term)) { 372 assert(Br->isUnconditional()); 373 auto Load = createLoadInstBefore(CGF.getNormalCleanupDestSlot(), 374 "cleanup.dest", Term); 375 llvm::SwitchInst *Switch = 376 llvm::SwitchInst::Create(Load, Br->getSuccessor(0), 4, Block); 377 Br->eraseFromParent(); 378 return Switch; 379 } else { 380 return cast<llvm::SwitchInst>(Term); 381 } 382 } 383 384 void CodeGenFunction::ResolveBranchFixups(llvm::BasicBlock *Block) { 385 assert(Block && "resolving a null target block"); 386 if (!EHStack.getNumBranchFixups()) return; 387 388 assert(EHStack.hasNormalCleanups() && 389 "branch fixups exist with no normal cleanups on stack"); 390 391 llvm::SmallPtrSet<llvm::BasicBlock*, 4> ModifiedOptimisticBlocks; 392 bool ResolvedAny = false; 393 394 for (unsigned I = 0, E = EHStack.getNumBranchFixups(); I != E; ++I) { 395 // Skip this fixup if its destination doesn't match. 396 BranchFixup &Fixup = EHStack.getBranchFixup(I); 397 if (Fixup.Destination != Block) continue; 398 399 Fixup.Destination = nullptr; 400 ResolvedAny = true; 401 402 // If it doesn't have an optimistic branch block, LatestBranch is 403 // already pointing to the right place. 404 llvm::BasicBlock *BranchBB = Fixup.OptimisticBranchBlock; 405 if (!BranchBB) 406 continue; 407 408 // Don't process the same optimistic branch block twice. 409 if (!ModifiedOptimisticBlocks.insert(BranchBB).second) 410 continue; 411 412 llvm::SwitchInst *Switch = TransitionToCleanupSwitch(*this, BranchBB); 413 414 // Add a case to the switch. 415 Switch->addCase(Builder.getInt32(Fixup.DestinationIndex), Block); 416 } 417 418 if (ResolvedAny) 419 EHStack.popNullFixups(); 420 } 421 422 /// Pops cleanup blocks until the given savepoint is reached. 423 void CodeGenFunction::PopCleanupBlocks( 424 EHScopeStack::stable_iterator Old, 425 std::initializer_list<llvm::Value **> ValuesToReload) { 426 assert(Old.isValid()); 427 428 bool HadBranches = false; 429 while (EHStack.stable_begin() != Old) { 430 EHCleanupScope &Scope = cast<EHCleanupScope>(*EHStack.begin()); 431 HadBranches |= Scope.hasBranches(); 432 433 // As long as Old strictly encloses the scope's enclosing normal 434 // cleanup, we're going to emit another normal cleanup which 435 // fallthrough can propagate through. 436 bool FallThroughIsBranchThrough = 437 Old.strictlyEncloses(Scope.getEnclosingNormalCleanup()); 438 439 PopCleanupBlock(FallThroughIsBranchThrough); 440 } 441 442 // If we didn't have any branches, the insertion point before cleanups must 443 // dominate the current insertion point and we don't need to reload any 444 // values. 445 if (!HadBranches) 446 return; 447 448 // Spill and reload all values that the caller wants to be live at the current 449 // insertion point. 450 for (llvm::Value **ReloadedValue : ValuesToReload) { 451 auto *Inst = dyn_cast_or_null<llvm::Instruction>(*ReloadedValue); 452 if (!Inst) 453 continue; 454 455 // Don't spill static allocas, they dominate all cleanups. These are created 456 // by binding a reference to a local variable or temporary. 457 auto *AI = dyn_cast<llvm::AllocaInst>(Inst); 458 if (AI && AI->isStaticAlloca()) 459 continue; 460 461 Address Tmp = 462 CreateDefaultAlignTempAlloca(Inst->getType(), "tmp.exprcleanup"); 463 464 // Find an insertion point after Inst and spill it to the temporary. 465 llvm::BasicBlock::iterator InsertBefore; 466 if (auto *Invoke = dyn_cast<llvm::InvokeInst>(Inst)) 467 InsertBefore = Invoke->getNormalDest()->getFirstInsertionPt(); 468 else 469 InsertBefore = std::next(Inst->getIterator()); 470 CGBuilderTy(CGM, &*InsertBefore).CreateStore(Inst, Tmp); 471 472 // Reload the value at the current insertion point. 473 *ReloadedValue = Builder.CreateLoad(Tmp); 474 } 475 } 476 477 /// Pops cleanup blocks until the given savepoint is reached, then add the 478 /// cleanups from the given savepoint in the lifetime-extended cleanups stack. 479 void CodeGenFunction::PopCleanupBlocks( 480 EHScopeStack::stable_iterator Old, size_t OldLifetimeExtendedSize, 481 std::initializer_list<llvm::Value **> ValuesToReload) { 482 PopCleanupBlocks(Old, ValuesToReload); 483 484 // Move our deferred cleanups onto the EH stack. 485 for (size_t I = OldLifetimeExtendedSize, 486 E = LifetimeExtendedCleanupStack.size(); I != E; /**/) { 487 // Alignment should be guaranteed by the vptrs in the individual cleanups. 488 assert((I % alignof(LifetimeExtendedCleanupHeader) == 0) && 489 "misaligned cleanup stack entry"); 490 491 LifetimeExtendedCleanupHeader &Header = 492 reinterpret_cast<LifetimeExtendedCleanupHeader&>( 493 LifetimeExtendedCleanupStack[I]); 494 I += sizeof(Header); 495 496 EHStack.pushCopyOfCleanup(Header.getKind(), 497 &LifetimeExtendedCleanupStack[I], 498 Header.getSize()); 499 I += Header.getSize(); 500 501 if (Header.isConditional()) { 502 Address ActiveFlag = 503 reinterpret_cast<Address &>(LifetimeExtendedCleanupStack[I]); 504 initFullExprCleanupWithFlag(ActiveFlag); 505 I += sizeof(ActiveFlag); 506 } 507 } 508 LifetimeExtendedCleanupStack.resize(OldLifetimeExtendedSize); 509 } 510 511 static llvm::BasicBlock *CreateNormalEntry(CodeGenFunction &CGF, 512 EHCleanupScope &Scope) { 513 assert(Scope.isNormalCleanup()); 514 llvm::BasicBlock *Entry = Scope.getNormalBlock(); 515 if (!Entry) { 516 Entry = CGF.createBasicBlock("cleanup"); 517 Scope.setNormalBlock(Entry); 518 } 519 return Entry; 520 } 521 522 /// Attempts to reduce a cleanup's entry block to a fallthrough. This 523 /// is basically llvm::MergeBlockIntoPredecessor, except 524 /// simplified/optimized for the tighter constraints on cleanup blocks. 525 /// 526 /// Returns the new block, whatever it is. 527 static llvm::BasicBlock *SimplifyCleanupEntry(CodeGenFunction &CGF, 528 llvm::BasicBlock *Entry) { 529 llvm::BasicBlock *Pred = Entry->getSinglePredecessor(); 530 if (!Pred) return Entry; 531 532 llvm::BranchInst *Br = dyn_cast<llvm::BranchInst>(Pred->getTerminator()); 533 if (!Br || Br->isConditional()) return Entry; 534 assert(Br->getSuccessor(0) == Entry); 535 536 // If we were previously inserting at the end of the cleanup entry 537 // block, we'll need to continue inserting at the end of the 538 // predecessor. 539 bool WasInsertBlock = CGF.Builder.GetInsertBlock() == Entry; 540 assert(!WasInsertBlock || CGF.Builder.GetInsertPoint() == Entry->end()); 541 542 // Kill the branch. 543 Br->eraseFromParent(); 544 545 // Replace all uses of the entry with the predecessor, in case there 546 // are phis in the cleanup. 547 Entry->replaceAllUsesWith(Pred); 548 549 // Merge the blocks. 550 Pred->getInstList().splice(Pred->end(), Entry->getInstList()); 551 552 // Kill the entry block. 553 Entry->eraseFromParent(); 554 555 if (WasInsertBlock) 556 CGF.Builder.SetInsertPoint(Pred); 557 558 return Pred; 559 } 560 561 static void EmitCleanup(CodeGenFunction &CGF, 562 EHScopeStack::Cleanup *Fn, 563 EHScopeStack::Cleanup::Flags flags, 564 Address ActiveFlag) { 565 // If there's an active flag, load it and skip the cleanup if it's 566 // false. 567 llvm::BasicBlock *ContBB = nullptr; 568 if (ActiveFlag.isValid()) { 569 ContBB = CGF.createBasicBlock("cleanup.done"); 570 llvm::BasicBlock *CleanupBB = CGF.createBasicBlock("cleanup.action"); 571 llvm::Value *IsActive 572 = CGF.Builder.CreateLoad(ActiveFlag, "cleanup.is_active"); 573 CGF.Builder.CreateCondBr(IsActive, CleanupBB, ContBB); 574 CGF.EmitBlock(CleanupBB); 575 } 576 577 // Ask the cleanup to emit itself. 578 Fn->Emit(CGF, flags); 579 assert(CGF.HaveInsertPoint() && "cleanup ended with no insertion point?"); 580 581 // Emit the continuation block if there was an active flag. 582 if (ActiveFlag.isValid()) 583 CGF.EmitBlock(ContBB); 584 } 585 586 static void ForwardPrebranchedFallthrough(llvm::BasicBlock *Exit, 587 llvm::BasicBlock *From, 588 llvm::BasicBlock *To) { 589 // Exit is the exit block of a cleanup, so it always terminates in 590 // an unconditional branch or a switch. 591 llvm::Instruction *Term = Exit->getTerminator(); 592 593 if (llvm::BranchInst *Br = dyn_cast<llvm::BranchInst>(Term)) { 594 assert(Br->isUnconditional() && Br->getSuccessor(0) == From); 595 Br->setSuccessor(0, To); 596 } else { 597 llvm::SwitchInst *Switch = cast<llvm::SwitchInst>(Term); 598 for (unsigned I = 0, E = Switch->getNumSuccessors(); I != E; ++I) 599 if (Switch->getSuccessor(I) == From) 600 Switch->setSuccessor(I, To); 601 } 602 } 603 604 /// We don't need a normal entry block for the given cleanup. 605 /// Optimistic fixup branches can cause these blocks to come into 606 /// existence anyway; if so, destroy it. 607 /// 608 /// The validity of this transformation is very much specific to the 609 /// exact ways in which we form branches to cleanup entries. 610 static void destroyOptimisticNormalEntry(CodeGenFunction &CGF, 611 EHCleanupScope &scope) { 612 llvm::BasicBlock *entry = scope.getNormalBlock(); 613 if (!entry) return; 614 615 // Replace all the uses with unreachable. 616 llvm::BasicBlock *unreachableBB = CGF.getUnreachableBlock(); 617 for (llvm::BasicBlock::use_iterator 618 i = entry->use_begin(), e = entry->use_end(); i != e; ) { 619 llvm::Use &use = *i; 620 ++i; 621 622 use.set(unreachableBB); 623 624 // The only uses should be fixup switches. 625 llvm::SwitchInst *si = cast<llvm::SwitchInst>(use.getUser()); 626 if (si->getNumCases() == 1 && si->getDefaultDest() == unreachableBB) { 627 // Replace the switch with a branch. 628 llvm::BranchInst::Create(si->case_begin()->getCaseSuccessor(), si); 629 630 // The switch operand is a load from the cleanup-dest alloca. 631 llvm::LoadInst *condition = cast<llvm::LoadInst>(si->getCondition()); 632 633 // Destroy the switch. 634 si->eraseFromParent(); 635 636 // Destroy the load. 637 assert(condition->getOperand(0) == CGF.NormalCleanupDest.getPointer()); 638 assert(condition->use_empty()); 639 condition->eraseFromParent(); 640 } 641 } 642 643 assert(entry->use_empty()); 644 delete entry; 645 } 646 647 /// Pops a cleanup block. If the block includes a normal cleanup, the 648 /// current insertion point is threaded through the cleanup, as are 649 /// any branch fixups on the cleanup. 650 void CodeGenFunction::PopCleanupBlock(bool FallthroughIsBranchThrough) { 651 assert(!EHStack.empty() && "cleanup stack is empty!"); 652 assert(isa<EHCleanupScope>(*EHStack.begin()) && "top not a cleanup!"); 653 EHCleanupScope &Scope = cast<EHCleanupScope>(*EHStack.begin()); 654 assert(Scope.getFixupDepth() <= EHStack.getNumBranchFixups()); 655 656 // Remember activation information. 657 bool IsActive = Scope.isActive(); 658 Address NormalActiveFlag = 659 Scope.shouldTestFlagInNormalCleanup() ? Scope.getActiveFlag() 660 : Address::invalid(); 661 Address EHActiveFlag = 662 Scope.shouldTestFlagInEHCleanup() ? Scope.getActiveFlag() 663 : Address::invalid(); 664 665 // Check whether we need an EH cleanup. This is only true if we've 666 // generated a lazy EH cleanup block. 667 llvm::BasicBlock *EHEntry = Scope.getCachedEHDispatchBlock(); 668 assert(Scope.hasEHBranches() == (EHEntry != nullptr)); 669 bool RequiresEHCleanup = (EHEntry != nullptr); 670 EHScopeStack::stable_iterator EHParent = Scope.getEnclosingEHScope(); 671 672 // Check the three conditions which might require a normal cleanup: 673 674 // - whether there are branch fix-ups through this cleanup 675 unsigned FixupDepth = Scope.getFixupDepth(); 676 bool HasFixups = EHStack.getNumBranchFixups() != FixupDepth; 677 678 // - whether there are branch-throughs or branch-afters 679 bool HasExistingBranches = Scope.hasBranches(); 680 681 // - whether there's a fallthrough 682 llvm::BasicBlock *FallthroughSource = Builder.GetInsertBlock(); 683 bool HasFallthrough = (FallthroughSource != nullptr && IsActive); 684 685 // Branch-through fall-throughs leave the insertion point set to the 686 // end of the last cleanup, which points to the current scope. The 687 // rest of IR gen doesn't need to worry about this; it only happens 688 // during the execution of PopCleanupBlocks(). 689 bool HasPrebranchedFallthrough = 690 (FallthroughSource && FallthroughSource->getTerminator()); 691 692 // If this is a normal cleanup, then having a prebranched 693 // fallthrough implies that the fallthrough source unconditionally 694 // jumps here. 695 assert(!Scope.isNormalCleanup() || !HasPrebranchedFallthrough || 696 (Scope.getNormalBlock() && 697 FallthroughSource->getTerminator()->getSuccessor(0) 698 == Scope.getNormalBlock())); 699 700 bool RequiresNormalCleanup = false; 701 if (Scope.isNormalCleanup() && 702 (HasFixups || HasExistingBranches || HasFallthrough)) { 703 RequiresNormalCleanup = true; 704 } 705 706 // If we have a prebranched fallthrough into an inactive normal 707 // cleanup, rewrite it so that it leads to the appropriate place. 708 if (Scope.isNormalCleanup() && HasPrebranchedFallthrough && !IsActive) { 709 llvm::BasicBlock *prebranchDest; 710 711 // If the prebranch is semantically branching through the next 712 // cleanup, just forward it to the next block, leaving the 713 // insertion point in the prebranched block. 714 if (FallthroughIsBranchThrough) { 715 EHScope &enclosing = *EHStack.find(Scope.getEnclosingNormalCleanup()); 716 prebranchDest = CreateNormalEntry(*this, cast<EHCleanupScope>(enclosing)); 717 718 // Otherwise, we need to make a new block. If the normal cleanup 719 // isn't being used at all, we could actually reuse the normal 720 // entry block, but this is simpler, and it avoids conflicts with 721 // dead optimistic fixup branches. 722 } else { 723 prebranchDest = createBasicBlock("forwarded-prebranch"); 724 EmitBlock(prebranchDest); 725 } 726 727 llvm::BasicBlock *normalEntry = Scope.getNormalBlock(); 728 assert(normalEntry && !normalEntry->use_empty()); 729 730 ForwardPrebranchedFallthrough(FallthroughSource, 731 normalEntry, prebranchDest); 732 } 733 734 // If we don't need the cleanup at all, we're done. 735 if (!RequiresNormalCleanup && !RequiresEHCleanup) { 736 destroyOptimisticNormalEntry(*this, Scope); 737 EHStack.popCleanup(); // safe because there are no fixups 738 assert(EHStack.getNumBranchFixups() == 0 || 739 EHStack.hasNormalCleanups()); 740 return; 741 } 742 743 // Copy the cleanup emission data out. This uses either a stack 744 // array or malloc'd memory, depending on the size, which is 745 // behavior that SmallVector would provide, if we could use it 746 // here. Unfortunately, if you ask for a SmallVector<char>, the 747 // alignment isn't sufficient. 748 auto *CleanupSource = reinterpret_cast<char *>(Scope.getCleanupBuffer()); 749 llvm::AlignedCharArray<EHScopeStack::ScopeStackAlignment, 8 * sizeof(void *)> CleanupBufferStack; 750 std::unique_ptr<char[]> CleanupBufferHeap; 751 size_t CleanupSize = Scope.getCleanupSize(); 752 EHScopeStack::Cleanup *Fn; 753 754 if (CleanupSize <= sizeof(CleanupBufferStack)) { 755 memcpy(CleanupBufferStack.buffer, CleanupSource, CleanupSize); 756 Fn = reinterpret_cast<EHScopeStack::Cleanup *>(CleanupBufferStack.buffer); 757 } else { 758 CleanupBufferHeap.reset(new char[CleanupSize]); 759 memcpy(CleanupBufferHeap.get(), CleanupSource, CleanupSize); 760 Fn = reinterpret_cast<EHScopeStack::Cleanup *>(CleanupBufferHeap.get()); 761 } 762 763 EHScopeStack::Cleanup::Flags cleanupFlags; 764 if (Scope.isNormalCleanup()) 765 cleanupFlags.setIsNormalCleanupKind(); 766 if (Scope.isEHCleanup()) 767 cleanupFlags.setIsEHCleanupKind(); 768 769 if (!RequiresNormalCleanup) { 770 destroyOptimisticNormalEntry(*this, Scope); 771 EHStack.popCleanup(); 772 } else { 773 // If we have a fallthrough and no other need for the cleanup, 774 // emit it directly. 775 if (HasFallthrough && !HasPrebranchedFallthrough && 776 !HasFixups && !HasExistingBranches) { 777 778 destroyOptimisticNormalEntry(*this, Scope); 779 EHStack.popCleanup(); 780 781 EmitCleanup(*this, Fn, cleanupFlags, NormalActiveFlag); 782 783 // Otherwise, the best approach is to thread everything through 784 // the cleanup block and then try to clean up after ourselves. 785 } else { 786 // Force the entry block to exist. 787 llvm::BasicBlock *NormalEntry = CreateNormalEntry(*this, Scope); 788 789 // I. Set up the fallthrough edge in. 790 791 CGBuilderTy::InsertPoint savedInactiveFallthroughIP; 792 793 // If there's a fallthrough, we need to store the cleanup 794 // destination index. For fall-throughs this is always zero. 795 if (HasFallthrough) { 796 if (!HasPrebranchedFallthrough) 797 Builder.CreateStore(Builder.getInt32(0), getNormalCleanupDestSlot()); 798 799 // Otherwise, save and clear the IP if we don't have fallthrough 800 // because the cleanup is inactive. 801 } else if (FallthroughSource) { 802 assert(!IsActive && "source without fallthrough for active cleanup"); 803 savedInactiveFallthroughIP = Builder.saveAndClearIP(); 804 } 805 806 // II. Emit the entry block. This implicitly branches to it if 807 // we have fallthrough. All the fixups and existing branches 808 // should already be branched to it. 809 EmitBlock(NormalEntry); 810 811 // III. Figure out where we're going and build the cleanup 812 // epilogue. 813 814 bool HasEnclosingCleanups = 815 (Scope.getEnclosingNormalCleanup() != EHStack.stable_end()); 816 817 // Compute the branch-through dest if we need it: 818 // - if there are branch-throughs threaded through the scope 819 // - if fall-through is a branch-through 820 // - if there are fixups that will be optimistically forwarded 821 // to the enclosing cleanup 822 llvm::BasicBlock *BranchThroughDest = nullptr; 823 if (Scope.hasBranchThroughs() || 824 (FallthroughSource && FallthroughIsBranchThrough) || 825 (HasFixups && HasEnclosingCleanups)) { 826 assert(HasEnclosingCleanups); 827 EHScope &S = *EHStack.find(Scope.getEnclosingNormalCleanup()); 828 BranchThroughDest = CreateNormalEntry(*this, cast<EHCleanupScope>(S)); 829 } 830 831 llvm::BasicBlock *FallthroughDest = nullptr; 832 SmallVector<llvm::Instruction*, 2> InstsToAppend; 833 834 // If there's exactly one branch-after and no other threads, 835 // we can route it without a switch. 836 if (!Scope.hasBranchThroughs() && !HasFixups && !HasFallthrough && 837 Scope.getNumBranchAfters() == 1) { 838 assert(!BranchThroughDest || !IsActive); 839 840 // Clean up the possibly dead store to the cleanup dest slot. 841 llvm::Instruction *NormalCleanupDestSlot = 842 cast<llvm::Instruction>(getNormalCleanupDestSlot().getPointer()); 843 if (NormalCleanupDestSlot->hasOneUse()) { 844 NormalCleanupDestSlot->user_back()->eraseFromParent(); 845 NormalCleanupDestSlot->eraseFromParent(); 846 NormalCleanupDest = Address::invalid(); 847 } 848 849 llvm::BasicBlock *BranchAfter = Scope.getBranchAfterBlock(0); 850 InstsToAppend.push_back(llvm::BranchInst::Create(BranchAfter)); 851 852 // Build a switch-out if we need it: 853 // - if there are branch-afters threaded through the scope 854 // - if fall-through is a branch-after 855 // - if there are fixups that have nowhere left to go and 856 // so must be immediately resolved 857 } else if (Scope.getNumBranchAfters() || 858 (HasFallthrough && !FallthroughIsBranchThrough) || 859 (HasFixups && !HasEnclosingCleanups)) { 860 861 llvm::BasicBlock *Default = 862 (BranchThroughDest ? BranchThroughDest : getUnreachableBlock()); 863 864 // TODO: base this on the number of branch-afters and fixups 865 const unsigned SwitchCapacity = 10; 866 867 llvm::LoadInst *Load = 868 createLoadInstBefore(getNormalCleanupDestSlot(), "cleanup.dest", 869 nullptr); 870 llvm::SwitchInst *Switch = 871 llvm::SwitchInst::Create(Load, Default, SwitchCapacity); 872 873 InstsToAppend.push_back(Load); 874 InstsToAppend.push_back(Switch); 875 876 // Branch-after fallthrough. 877 if (FallthroughSource && !FallthroughIsBranchThrough) { 878 FallthroughDest = createBasicBlock("cleanup.cont"); 879 if (HasFallthrough) 880 Switch->addCase(Builder.getInt32(0), FallthroughDest); 881 } 882 883 for (unsigned I = 0, E = Scope.getNumBranchAfters(); I != E; ++I) { 884 Switch->addCase(Scope.getBranchAfterIndex(I), 885 Scope.getBranchAfterBlock(I)); 886 } 887 888 // If there aren't any enclosing cleanups, we can resolve all 889 // the fixups now. 890 if (HasFixups && !HasEnclosingCleanups) 891 ResolveAllBranchFixups(*this, Switch, NormalEntry); 892 } else { 893 // We should always have a branch-through destination in this case. 894 assert(BranchThroughDest); 895 InstsToAppend.push_back(llvm::BranchInst::Create(BranchThroughDest)); 896 } 897 898 // IV. Pop the cleanup and emit it. 899 EHStack.popCleanup(); 900 assert(EHStack.hasNormalCleanups() == HasEnclosingCleanups); 901 902 EmitCleanup(*this, Fn, cleanupFlags, NormalActiveFlag); 903 904 // Append the prepared cleanup prologue from above. 905 llvm::BasicBlock *NormalExit = Builder.GetInsertBlock(); 906 for (unsigned I = 0, E = InstsToAppend.size(); I != E; ++I) 907 NormalExit->getInstList().push_back(InstsToAppend[I]); 908 909 // Optimistically hope that any fixups will continue falling through. 910 for (unsigned I = FixupDepth, E = EHStack.getNumBranchFixups(); 911 I < E; ++I) { 912 BranchFixup &Fixup = EHStack.getBranchFixup(I); 913 if (!Fixup.Destination) continue; 914 if (!Fixup.OptimisticBranchBlock) { 915 createStoreInstBefore(Builder.getInt32(Fixup.DestinationIndex), 916 getNormalCleanupDestSlot(), 917 Fixup.InitialBranch); 918 Fixup.InitialBranch->setSuccessor(0, NormalEntry); 919 } 920 Fixup.OptimisticBranchBlock = NormalExit; 921 } 922 923 // V. Set up the fallthrough edge out. 924 925 // Case 1: a fallthrough source exists but doesn't branch to the 926 // cleanup because the cleanup is inactive. 927 if (!HasFallthrough && FallthroughSource) { 928 // Prebranched fallthrough was forwarded earlier. 929 // Non-prebranched fallthrough doesn't need to be forwarded. 930 // Either way, all we need to do is restore the IP we cleared before. 931 assert(!IsActive); 932 Builder.restoreIP(savedInactiveFallthroughIP); 933 934 // Case 2: a fallthrough source exists and should branch to the 935 // cleanup, but we're not supposed to branch through to the next 936 // cleanup. 937 } else if (HasFallthrough && FallthroughDest) { 938 assert(!FallthroughIsBranchThrough); 939 EmitBlock(FallthroughDest); 940 941 // Case 3: a fallthrough source exists and should branch to the 942 // cleanup and then through to the next. 943 } else if (HasFallthrough) { 944 // Everything is already set up for this. 945 946 // Case 4: no fallthrough source exists. 947 } else { 948 Builder.ClearInsertionPoint(); 949 } 950 951 // VI. Assorted cleaning. 952 953 // Check whether we can merge NormalEntry into a single predecessor. 954 // This might invalidate (non-IR) pointers to NormalEntry. 955 llvm::BasicBlock *NewNormalEntry = 956 SimplifyCleanupEntry(*this, NormalEntry); 957 958 // If it did invalidate those pointers, and NormalEntry was the same 959 // as NormalExit, go back and patch up the fixups. 960 if (NewNormalEntry != NormalEntry && NormalEntry == NormalExit) 961 for (unsigned I = FixupDepth, E = EHStack.getNumBranchFixups(); 962 I < E; ++I) 963 EHStack.getBranchFixup(I).OptimisticBranchBlock = NewNormalEntry; 964 } 965 } 966 967 assert(EHStack.hasNormalCleanups() || EHStack.getNumBranchFixups() == 0); 968 969 // Emit the EH cleanup if required. 970 if (RequiresEHCleanup) { 971 CGBuilderTy::InsertPoint SavedIP = Builder.saveAndClearIP(); 972 973 EmitBlock(EHEntry); 974 975 llvm::BasicBlock *NextAction = getEHDispatchBlock(EHParent); 976 977 // Push a terminate scope or cleanupendpad scope around the potentially 978 // throwing cleanups. For funclet EH personalities, the cleanupendpad models 979 // program termination when cleanups throw. 980 bool PushedTerminate = false; 981 SaveAndRestore<llvm::Instruction *> RestoreCurrentFuncletPad( 982 CurrentFuncletPad); 983 llvm::CleanupPadInst *CPI = nullptr; 984 985 const EHPersonality &Personality = EHPersonality::get(*this); 986 if (Personality.usesFuncletPads()) { 987 llvm::Value *ParentPad = CurrentFuncletPad; 988 if (!ParentPad) 989 ParentPad = llvm::ConstantTokenNone::get(CGM.getLLVMContext()); 990 CurrentFuncletPad = CPI = Builder.CreateCleanupPad(ParentPad); 991 } 992 993 // Non-MSVC personalities need to terminate when an EH cleanup throws. 994 if (!Personality.isMSVCPersonality()) { 995 EHStack.pushTerminate(); 996 PushedTerminate = true; 997 } 998 999 // We only actually emit the cleanup code if the cleanup is either 1000 // active or was used before it was deactivated. 1001 if (EHActiveFlag.isValid() || IsActive) { 1002 cleanupFlags.setIsForEHCleanup(); 1003 EmitCleanup(*this, Fn, cleanupFlags, EHActiveFlag); 1004 } 1005 1006 if (CPI) 1007 Builder.CreateCleanupRet(CPI, NextAction); 1008 else 1009 Builder.CreateBr(NextAction); 1010 1011 // Leave the terminate scope. 1012 if (PushedTerminate) 1013 EHStack.popTerminate(); 1014 1015 Builder.restoreIP(SavedIP); 1016 1017 SimplifyCleanupEntry(*this, EHEntry); 1018 } 1019 } 1020 1021 /// isObviouslyBranchWithoutCleanups - Return true if a branch to the 1022 /// specified destination obviously has no cleanups to run. 'false' is always 1023 /// a conservatively correct answer for this method. 1024 bool CodeGenFunction::isObviouslyBranchWithoutCleanups(JumpDest Dest) const { 1025 assert(Dest.getScopeDepth().encloses(EHStack.stable_begin()) 1026 && "stale jump destination"); 1027 1028 // Calculate the innermost active normal cleanup. 1029 EHScopeStack::stable_iterator TopCleanup = 1030 EHStack.getInnermostActiveNormalCleanup(); 1031 1032 // If we're not in an active normal cleanup scope, or if the 1033 // destination scope is within the innermost active normal cleanup 1034 // scope, we don't need to worry about fixups. 1035 if (TopCleanup == EHStack.stable_end() || 1036 TopCleanup.encloses(Dest.getScopeDepth())) // works for invalid 1037 return true; 1038 1039 // Otherwise, we might need some cleanups. 1040 return false; 1041 } 1042 1043 1044 /// Terminate the current block by emitting a branch which might leave 1045 /// the current cleanup-protected scope. The target scope may not yet 1046 /// be known, in which case this will require a fixup. 1047 /// 1048 /// As a side-effect, this method clears the insertion point. 1049 void CodeGenFunction::EmitBranchThroughCleanup(JumpDest Dest) { 1050 assert(Dest.getScopeDepth().encloses(EHStack.stable_begin()) 1051 && "stale jump destination"); 1052 1053 if (!HaveInsertPoint()) 1054 return; 1055 1056 // Create the branch. 1057 llvm::BranchInst *BI = Builder.CreateBr(Dest.getBlock()); 1058 1059 // Calculate the innermost active normal cleanup. 1060 EHScopeStack::stable_iterator 1061 TopCleanup = EHStack.getInnermostActiveNormalCleanup(); 1062 1063 // If we're not in an active normal cleanup scope, or if the 1064 // destination scope is within the innermost active normal cleanup 1065 // scope, we don't need to worry about fixups. 1066 if (TopCleanup == EHStack.stable_end() || 1067 TopCleanup.encloses(Dest.getScopeDepth())) { // works for invalid 1068 Builder.ClearInsertionPoint(); 1069 return; 1070 } 1071 1072 // If we can't resolve the destination cleanup scope, just add this 1073 // to the current cleanup scope as a branch fixup. 1074 if (!Dest.getScopeDepth().isValid()) { 1075 BranchFixup &Fixup = EHStack.addBranchFixup(); 1076 Fixup.Destination = Dest.getBlock(); 1077 Fixup.DestinationIndex = Dest.getDestIndex(); 1078 Fixup.InitialBranch = BI; 1079 Fixup.OptimisticBranchBlock = nullptr; 1080 1081 Builder.ClearInsertionPoint(); 1082 return; 1083 } 1084 1085 // Otherwise, thread through all the normal cleanups in scope. 1086 1087 // Store the index at the start. 1088 llvm::ConstantInt *Index = Builder.getInt32(Dest.getDestIndex()); 1089 createStoreInstBefore(Index, getNormalCleanupDestSlot(), BI); 1090 1091 // Adjust BI to point to the first cleanup block. 1092 { 1093 EHCleanupScope &Scope = 1094 cast<EHCleanupScope>(*EHStack.find(TopCleanup)); 1095 BI->setSuccessor(0, CreateNormalEntry(*this, Scope)); 1096 } 1097 1098 // Add this destination to all the scopes involved. 1099 EHScopeStack::stable_iterator I = TopCleanup; 1100 EHScopeStack::stable_iterator E = Dest.getScopeDepth(); 1101 if (E.strictlyEncloses(I)) { 1102 while (true) { 1103 EHCleanupScope &Scope = cast<EHCleanupScope>(*EHStack.find(I)); 1104 assert(Scope.isNormalCleanup()); 1105 I = Scope.getEnclosingNormalCleanup(); 1106 1107 // If this is the last cleanup we're propagating through, tell it 1108 // that there's a resolved jump moving through it. 1109 if (!E.strictlyEncloses(I)) { 1110 Scope.addBranchAfter(Index, Dest.getBlock()); 1111 break; 1112 } 1113 1114 // Otherwise, tell the scope that there's a jump propagating 1115 // through it. If this isn't new information, all the rest of 1116 // the work has been done before. 1117 if (!Scope.addBranchThrough(Dest.getBlock())) 1118 break; 1119 } 1120 } 1121 1122 Builder.ClearInsertionPoint(); 1123 } 1124 1125 static bool IsUsedAsNormalCleanup(EHScopeStack &EHStack, 1126 EHScopeStack::stable_iterator C) { 1127 // If we needed a normal block for any reason, that counts. 1128 if (cast<EHCleanupScope>(*EHStack.find(C)).getNormalBlock()) 1129 return true; 1130 1131 // Check whether any enclosed cleanups were needed. 1132 for (EHScopeStack::stable_iterator 1133 I = EHStack.getInnermostNormalCleanup(); 1134 I != C; ) { 1135 assert(C.strictlyEncloses(I)); 1136 EHCleanupScope &S = cast<EHCleanupScope>(*EHStack.find(I)); 1137 if (S.getNormalBlock()) return true; 1138 I = S.getEnclosingNormalCleanup(); 1139 } 1140 1141 return false; 1142 } 1143 1144 static bool IsUsedAsEHCleanup(EHScopeStack &EHStack, 1145 EHScopeStack::stable_iterator cleanup) { 1146 // If we needed an EH block for any reason, that counts. 1147 if (EHStack.find(cleanup)->hasEHBranches()) 1148 return true; 1149 1150 // Check whether any enclosed cleanups were needed. 1151 for (EHScopeStack::stable_iterator 1152 i = EHStack.getInnermostEHScope(); i != cleanup; ) { 1153 assert(cleanup.strictlyEncloses(i)); 1154 1155 EHScope &scope = *EHStack.find(i); 1156 if (scope.hasEHBranches()) 1157 return true; 1158 1159 i = scope.getEnclosingEHScope(); 1160 } 1161 1162 return false; 1163 } 1164 1165 enum ForActivation_t { 1166 ForActivation, 1167 ForDeactivation 1168 }; 1169 1170 /// The given cleanup block is changing activation state. Configure a 1171 /// cleanup variable if necessary. 1172 /// 1173 /// It would be good if we had some way of determining if there were 1174 /// extra uses *after* the change-over point. 1175 static void SetupCleanupBlockActivation(CodeGenFunction &CGF, 1176 EHScopeStack::stable_iterator C, 1177 ForActivation_t kind, 1178 llvm::Instruction *dominatingIP) { 1179 EHCleanupScope &Scope = cast<EHCleanupScope>(*CGF.EHStack.find(C)); 1180 1181 // We always need the flag if we're activating the cleanup in a 1182 // conditional context, because we have to assume that the current 1183 // location doesn't necessarily dominate the cleanup's code. 1184 bool isActivatedInConditional = 1185 (kind == ForActivation && CGF.isInConditionalBranch()); 1186 1187 bool needFlag = false; 1188 1189 // Calculate whether the cleanup was used: 1190 1191 // - as a normal cleanup 1192 if (Scope.isNormalCleanup() && 1193 (isActivatedInConditional || IsUsedAsNormalCleanup(CGF.EHStack, C))) { 1194 Scope.setTestFlagInNormalCleanup(); 1195 needFlag = true; 1196 } 1197 1198 // - as an EH cleanup 1199 if (Scope.isEHCleanup() && 1200 (isActivatedInConditional || IsUsedAsEHCleanup(CGF.EHStack, C))) { 1201 Scope.setTestFlagInEHCleanup(); 1202 needFlag = true; 1203 } 1204 1205 // If it hasn't yet been used as either, we're done. 1206 if (!needFlag) return; 1207 1208 Address var = Scope.getActiveFlag(); 1209 if (!var.isValid()) { 1210 var = CGF.CreateTempAlloca(CGF.Builder.getInt1Ty(), CharUnits::One(), 1211 "cleanup.isactive"); 1212 Scope.setActiveFlag(var); 1213 1214 assert(dominatingIP && "no existing variable and no dominating IP!"); 1215 1216 // Initialize to true or false depending on whether it was 1217 // active up to this point. 1218 llvm::Constant *value = CGF.Builder.getInt1(kind == ForDeactivation); 1219 1220 // If we're in a conditional block, ignore the dominating IP and 1221 // use the outermost conditional branch. 1222 if (CGF.isInConditionalBranch()) { 1223 CGF.setBeforeOutermostConditional(value, var); 1224 } else { 1225 createStoreInstBefore(value, var, dominatingIP); 1226 } 1227 } 1228 1229 CGF.Builder.CreateStore(CGF.Builder.getInt1(kind == ForActivation), var); 1230 } 1231 1232 /// Activate a cleanup that was created in an inactivated state. 1233 void CodeGenFunction::ActivateCleanupBlock(EHScopeStack::stable_iterator C, 1234 llvm::Instruction *dominatingIP) { 1235 assert(C != EHStack.stable_end() && "activating bottom of stack?"); 1236 EHCleanupScope &Scope = cast<EHCleanupScope>(*EHStack.find(C)); 1237 assert(!Scope.isActive() && "double activation"); 1238 1239 SetupCleanupBlockActivation(*this, C, ForActivation, dominatingIP); 1240 1241 Scope.setActive(true); 1242 } 1243 1244 /// Deactive a cleanup that was created in an active state. 1245 void CodeGenFunction::DeactivateCleanupBlock(EHScopeStack::stable_iterator C, 1246 llvm::Instruction *dominatingIP) { 1247 assert(C != EHStack.stable_end() && "deactivating bottom of stack?"); 1248 EHCleanupScope &Scope = cast<EHCleanupScope>(*EHStack.find(C)); 1249 assert(Scope.isActive() && "double deactivation"); 1250 1251 // If it's the top of the stack, just pop it, but do so only if it belongs 1252 // to the current RunCleanupsScope. 1253 if (C == EHStack.stable_begin() && 1254 CurrentCleanupScopeDepth.strictlyEncloses(C)) { 1255 // If it's a normal cleanup, we need to pretend that the 1256 // fallthrough is unreachable. 1257 CGBuilderTy::InsertPoint SavedIP = Builder.saveAndClearIP(); 1258 PopCleanupBlock(); 1259 Builder.restoreIP(SavedIP); 1260 return; 1261 } 1262 1263 // Otherwise, follow the general case. 1264 SetupCleanupBlockActivation(*this, C, ForDeactivation, dominatingIP); 1265 1266 Scope.setActive(false); 1267 } 1268 1269 Address CodeGenFunction::getNormalCleanupDestSlot() { 1270 if (!NormalCleanupDest.isValid()) 1271 NormalCleanupDest = 1272 CreateDefaultAlignTempAlloca(Builder.getInt32Ty(), "cleanup.dest.slot"); 1273 return NormalCleanupDest; 1274 } 1275 1276 /// Emits all the code to cause the given temporary to be cleaned up. 1277 void CodeGenFunction::EmitCXXTemporary(const CXXTemporary *Temporary, 1278 QualType TempType, 1279 Address Ptr) { 1280 pushDestroy(NormalAndEHCleanup, Ptr, TempType, destroyCXXObject, 1281 /*useEHCleanup*/ true); 1282 } 1283