IR: Disallow function-local metadata attachments
[oota-llvm.git] / lib / IR / Metadata.cpp
1 //===-- Metadata.cpp - Implement Metadata classes -------------------------===//
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 Metadata classes.
11 //
12 //===----------------------------------------------------------------------===//
13
14 #include "llvm/IR/Metadata.h"
15 #include "LLVMContextImpl.h"
16 #include "SymbolTableListTraitsImpl.h"
17 #include "llvm/ADT/DenseMap.h"
18 #include "llvm/ADT/STLExtras.h"
19 #include "llvm/ADT/SmallSet.h"
20 #include "llvm/ADT/SmallString.h"
21 #include "llvm/ADT/StringMap.h"
22 #include "llvm/IR/ConstantRange.h"
23 #include "llvm/IR/Instruction.h"
24 #include "llvm/IR/LLVMContext.h"
25 #include "llvm/IR/LeakDetector.h"
26 #include "llvm/IR/Module.h"
27 #include "llvm/IR/ValueHandle.h"
28
29 using namespace llvm;
30
31 Metadata::Metadata(LLVMContext &Context, unsigned ID)
32     : Value(Type::getMetadataTy(Context), ID) {}
33
34 //===----------------------------------------------------------------------===//
35 // MDString implementation.
36 //
37
38 void MDString::anchor() { }
39
40 MDString *MDString::get(LLVMContext &Context, StringRef Str) {
41   auto &Store = Context.pImpl->MDStringCache;
42   auto I = Store.find(Str);
43   if (I != Store.end())
44     return &I->second;
45
46   auto *Entry =
47       StringMapEntry<MDString>::Create(Str, Store.getAllocator(), Context);
48   bool WasInserted = Store.insert(Entry);
49   (void)WasInserted;
50   assert(WasInserted && "Expected entry to be inserted");
51   Entry->second.Entry = Entry;
52   return &Entry->second;
53 }
54
55 StringRef MDString::getString() const {
56   assert(Entry && "Expected to find string map entry");
57   return Entry->first();
58 }
59
60 //===----------------------------------------------------------------------===//
61 // MDNodeOperand implementation.
62 //
63
64 // Use CallbackVH to hold MDNode operands.
65 namespace llvm {
66 class MDNodeOperand : public CallbackVH {
67   MDNode *getParent() {
68     MDNodeOperand *Cur = this;
69
70     while (Cur->getValPtrInt() != 1)
71       ++Cur;
72
73     assert(Cur->getValPtrInt() == 1 &&
74            "Couldn't find the end of the operand list!");
75     return reinterpret_cast<MDNode *>(Cur + 1);
76   }
77
78 public:
79   MDNodeOperand() {}
80   virtual ~MDNodeOperand();
81
82   void set(Value *V) {
83     unsigned IsLast = this->getValPtrInt();
84     this->setValPtr(V);
85     this->setAsLastOperand(IsLast);
86   }
87
88   /// \brief Accessor method to mark the operand as the first in the list.
89   void setAsLastOperand(unsigned I) { this->setValPtrInt(I); }
90
91   void deleted() override;
92   void allUsesReplacedWith(Value *NV) override;
93 };
94 } // end namespace llvm.
95
96 // Provide out-of-line definition to prevent weak vtable.
97 MDNodeOperand::~MDNodeOperand() {}
98
99 void MDNodeOperand::deleted() {
100   getParent()->replaceOperand(this, nullptr);
101 }
102
103 void MDNodeOperand::allUsesReplacedWith(Value *NV) {
104   getParent()->replaceOperand(this, NV);
105 }
106
107 //===----------------------------------------------------------------------===//
108 // MDNode implementation.
109 //
110
111 /// \brief Get the MDNodeOperand's coallocated on the end of the MDNode.
112 static MDNodeOperand *getOperandPtr(MDNode *N, unsigned Op) {
113   // Use <= instead of < to permit a one-past-the-end address.
114   assert(Op <= N->getNumOperands() && "Invalid operand number");
115   return reinterpret_cast<MDNodeOperand *>(N) - N->getNumOperands() + Op;
116 }
117
118 void MDNode::replaceOperandWith(unsigned i, Value *Val) {
119   MDNodeOperand *Op = getOperandPtr(this, i);
120   replaceOperand(Op, Val);
121 }
122
123 void *MDNode::operator new(size_t Size, unsigned NumOps) {
124   void *Ptr = ::operator new(Size + NumOps * sizeof(MDNodeOperand));
125   MDNodeOperand *Op = static_cast<MDNodeOperand *>(Ptr);
126   if (NumOps) {
127     MDNodeOperand *Last = Op + NumOps;
128     for (; Op != Last; ++Op)
129       new (Op) MDNodeOperand();
130     (Op - 1)->setAsLastOperand(1);
131   }
132   return Op;
133 }
134
135 void MDNode::operator delete(void *Mem) {
136   MDNode *N = static_cast<MDNode *>(Mem);
137   MDNodeOperand *Op = static_cast<MDNodeOperand *>(Mem);
138   for (unsigned I = 0, E = N->NumOperands; I != E; ++I)
139     (--Op)->~MDNodeOperand();
140   ::operator delete(Op);
141 }
142
143 MDNode::MDNode(LLVMContext &C, unsigned ID, ArrayRef<Value *> Vals,
144                bool isFunctionLocal)
145     : Metadata(C, ID) {
146   NumOperands = Vals.size();
147
148   if (isFunctionLocal)
149     setValueSubclassData(getSubclassDataFromValue() | FunctionLocalBit);
150
151   // Initialize the operand list.
152   unsigned i = 0;
153   for (MDNodeOperand *Op = getOperandPtr(this, 0), *E = Op + NumOperands;
154        Op != E; ++Op, ++i)
155     Op->set(Vals[i]);
156 }
157
158 GenericMDNode::~GenericMDNode() {
159   LLVMContextImpl *pImpl = getType()->getContext().pImpl;
160   if (isNotUniqued()) {
161     pImpl->NonUniquedMDNodes.erase(this);
162   } else {
163     pImpl->MDNodeSet.erase(this);
164   }
165 }
166
167 void GenericMDNode::dropAllReferences() {
168   for (MDNodeOperand *Op = getOperandPtr(this, 0), *E = Op + NumOperands;
169        Op != E; ++Op)
170     Op->set(nullptr);
171 }
172
173 static const Function *getFunctionForValue(Value *V) {
174   if (!V) return nullptr;
175   if (Instruction *I = dyn_cast<Instruction>(V)) {
176     BasicBlock *BB = I->getParent();
177     return BB ? BB->getParent() : nullptr;
178   }
179   if (Argument *A = dyn_cast<Argument>(V))
180     return A->getParent();
181   if (BasicBlock *BB = dyn_cast<BasicBlock>(V))
182     return BB->getParent();
183   if (MDNode *MD = dyn_cast<MDNode>(V))
184     return MD->getFunction();
185   return nullptr;
186 }
187
188 // getFunction - If this metadata is function-local and recursively has a
189 // function-local operand, return the first such operand's parent function.
190 // Otherwise, return null. getFunction() should not be used for performance-
191 // critical code because it recursively visits all the MDNode's operands.  
192 const Function *MDNode::getFunction() const {
193   if (!isFunctionLocal())
194     return nullptr;
195   assert(getNumOperands() == 1 &&
196          "Expected one operand for function-local metadata");
197   assert(getOperand(0) &&
198          "Expected non-null operand for function-local metadata");
199   assert(!getOperand(0)->getType()->isMetadataTy() &&
200          "Expected non-metadata as operand of function-local metadata");
201   return getFunctionForValue(getOperand(0));
202 }
203
204 /// \brief Check if the Value  would require a function-local MDNode.
205 static bool isFunctionLocalValue(Value *V) {
206   return isa<Instruction>(V) || isa<Argument>(V) || isa<BasicBlock>(V) ||
207          (isa<MDNode>(V) && cast<MDNode>(V)->isFunctionLocal());
208 }
209
210 MDNode *MDNode::getMDNode(LLVMContext &Context, ArrayRef<Value*> Vals,
211                           FunctionLocalness FL, bool Insert) {
212   auto &Store = Context.pImpl->MDNodeSet;
213
214   GenericMDNodeInfo::KeyTy Key(Vals);
215   auto I = Store.find_as(Key);
216   if (I != Store.end())
217     return *I;
218   if (!Insert)
219     return nullptr;
220
221   bool isFunctionLocal = false;
222   switch (FL) {
223   case FL_Unknown:
224     for (Value *V : Vals) {
225       if (!V) continue;
226       if (isFunctionLocalValue(V)) {
227         isFunctionLocal = true;
228         break;
229       }
230     }
231     break;
232   case FL_No:
233     isFunctionLocal = false;
234     break;
235   case FL_Yes:
236     isFunctionLocal = true;
237     break;
238   }
239
240   if (isFunctionLocal) {
241     assert(Vals.size() == 1 &&
242            "Expected exactly one operand for function-local metadata");
243     assert(Vals[0] && "Expected non-null operand for function-local metadata");
244     assert(!Vals[0]->getType()->isMetadataTy() &&
245            "Expected non-metadata as operand of function-local metadata");
246   }
247
248   // Coallocate space for the node and Operands together, then placement new.
249   GenericMDNode *N =
250       new (Vals.size()) GenericMDNode(Context, Vals, isFunctionLocal);
251
252   N->Hash = Key.Hash;
253   Store.insert(N);
254   return N;
255 }
256
257 MDNode *MDNode::get(LLVMContext &Context, ArrayRef<Value*> Vals) {
258   return getMDNode(Context, Vals, FL_Unknown);
259 }
260
261 MDNode *MDNode::getWhenValsUnresolved(LLVMContext &Context,
262                                       ArrayRef<Value*> Vals,
263                                       bool isFunctionLocal) {
264   return getMDNode(Context, Vals, isFunctionLocal ? FL_Yes : FL_No);
265 }
266
267 MDNode *MDNode::getIfExists(LLVMContext &Context, ArrayRef<Value*> Vals) {
268   return getMDNode(Context, Vals, FL_Unknown, false);
269 }
270
271 MDNode *MDNode::getTemporary(LLVMContext &Context, ArrayRef<Value*> Vals) {
272   MDNode *N = new (Vals.size()) MDNodeFwdDecl(Context, Vals, FL_No);
273   N->setValueSubclassData(N->getSubclassDataFromValue() | NotUniquedBit);
274   LeakDetector::addGarbageObject(N);
275   return N;
276 }
277
278 void MDNode::deleteTemporary(MDNode *N) {
279   assert(N->use_empty() && "Temporary MDNode has uses!");
280   assert(isa<MDNodeFwdDecl>(N) && "Expected forward declaration");
281   assert((N->getSubclassDataFromValue() & NotUniquedBit) &&
282          "Temporary MDNode does not have NotUniquedBit set!");
283   LeakDetector::removeGarbageObject(N);
284   delete cast<MDNodeFwdDecl>(N);
285 }
286
287 /// \brief Return specified operand.
288 Value *MDNode::getOperand(unsigned i) const {
289   assert(i < getNumOperands() && "Invalid operand number");
290   return *getOperandPtr(const_cast<MDNode*>(this), i);
291 }
292
293 void MDNode::setIsNotUniqued() {
294   setValueSubclassData(getSubclassDataFromValue() | NotUniquedBit);
295   LLVMContextImpl *pImpl = getType()->getContext().pImpl;
296   auto *G = cast<GenericMDNode>(this);
297   G->Hash = 0;
298   pImpl->NonUniquedMDNodes.insert(G);
299 }
300
301 // Replace value from this node's operand list.
302 void MDNode::replaceOperand(MDNodeOperand *Op, Value *To) {
303   Value *From = *Op;
304
305   // If is possible that someone did GV->RAUW(inst), replacing a global variable
306   // with an instruction or some other function-local object.  If this is a
307   // non-function-local MDNode, it can't point to a function-local object.
308   // Handle this case by implicitly dropping the MDNode reference to null.
309   // Likewise if the MDNode is function-local but for a different function.
310   if (To && isFunctionLocalValue(To)) {
311     assert(!To->getType()->isMetadataTy() &&
312            "Expected non-metadata as operand of function-local metadata");
313     if (!isFunctionLocal())
314       To = nullptr;
315     else {
316       const Function *F = getFunction();
317       const Function *FV = getFunctionForValue(To);
318       // Metadata can be function-local without having an associated function.
319       // So only consider functions to have changed if non-null.
320       if (F && FV && F != FV)
321         To = nullptr;
322     }
323   }
324   
325   if (From == To)
326     return;
327
328   // If this MDValue was previously function-local but no longer is, clear
329   // its function-local flag.
330   if (isFunctionLocal() && !(To && isFunctionLocalValue(To))) {
331     assert(getNumOperands() == 1 &&
332            "Expected function-local metadata to have exactly one operand");
333     setValueSubclassData(getSubclassDataFromValue() & ~FunctionLocalBit);
334   }
335
336   // If this node is already not being uniqued (because one of the operands
337   // already went to null), then there is nothing else to do here.
338   if (isNotUniqued()) {
339     Op->set(To);
340     return;
341   }
342
343   auto &Store = getContext().pImpl->MDNodeSet;
344   auto *N = cast<GenericMDNode>(this);
345
346   // Remove "this" from the context map.
347   Store.erase(N);
348
349   // Update the operand.
350   Op->set(To);
351
352   // If we are dropping an argument to null, we choose to not unique the MDNode
353   // anymore.  This commonly occurs during destruction, and uniquing these
354   // brings little reuse.  Also, this means we don't need to include
355   // isFunctionLocal bits in the hash for MDNodes.
356   if (!To) {
357     setIsNotUniqued();
358     return;
359   }
360
361   // Now that the node is out of the table, get ready to reinsert it.  First,
362   // check to see if another node with the same operands already exists in the
363   // set.  If so, then this node is redundant.
364   SmallVector<Value *, 8> Vals;
365   GenericMDNodeInfo::KeyTy Key(N, Vals);
366   auto I = Store.find_as(Key);
367   if (I != Store.end()) {
368     N->replaceAllUsesWith(*I);
369     delete N;
370     return;
371   }
372
373   N->Hash = Key.Hash;
374   Store.insert(N);
375 }
376
377 MDNode *MDNode::concatenate(MDNode *A, MDNode *B) {
378   if (!A)
379     return B;
380   if (!B)
381     return A;
382
383   SmallVector<Value *, 4> Vals(A->getNumOperands() +
384                                B->getNumOperands());
385
386   unsigned j = 0;
387   for (unsigned i = 0, ie = A->getNumOperands(); i != ie; ++i)
388     Vals[j++] = A->getOperand(i);
389   for (unsigned i = 0, ie = B->getNumOperands(); i != ie; ++i)
390     Vals[j++] = B->getOperand(i);
391
392   return MDNode::get(A->getContext(), Vals);
393 }
394
395 MDNode *MDNode::intersect(MDNode *A, MDNode *B) {
396   if (!A || !B)
397     return nullptr;
398
399   SmallVector<Value *, 4> Vals;
400   for (unsigned i = 0, ie = A->getNumOperands(); i != ie; ++i) {
401     Value *V = A->getOperand(i);
402     for (unsigned j = 0, je = B->getNumOperands(); j != je; ++j)
403       if (V == B->getOperand(j)) {
404         Vals.push_back(V);
405         break;
406       }
407   }
408
409   return MDNode::get(A->getContext(), Vals);
410 }
411
412 MDNode *MDNode::getMostGenericFPMath(MDNode *A, MDNode *B) {
413   if (!A || !B)
414     return nullptr;
415
416   APFloat AVal = cast<ConstantFP>(A->getOperand(0))->getValueAPF();
417   APFloat BVal = cast<ConstantFP>(B->getOperand(0))->getValueAPF();
418   if (AVal.compare(BVal) == APFloat::cmpLessThan)
419     return A;
420   return B;
421 }
422
423 static bool isContiguous(const ConstantRange &A, const ConstantRange &B) {
424   return A.getUpper() == B.getLower() || A.getLower() == B.getUpper();
425 }
426
427 static bool canBeMerged(const ConstantRange &A, const ConstantRange &B) {
428   return !A.intersectWith(B).isEmptySet() || isContiguous(A, B);
429 }
430
431 static bool tryMergeRange(SmallVectorImpl<Value *> &EndPoints, ConstantInt *Low,
432                           ConstantInt *High) {
433   ConstantRange NewRange(Low->getValue(), High->getValue());
434   unsigned Size = EndPoints.size();
435   APInt LB = cast<ConstantInt>(EndPoints[Size - 2])->getValue();
436   APInt LE = cast<ConstantInt>(EndPoints[Size - 1])->getValue();
437   ConstantRange LastRange(LB, LE);
438   if (canBeMerged(NewRange, LastRange)) {
439     ConstantRange Union = LastRange.unionWith(NewRange);
440     Type *Ty = High->getType();
441     EndPoints[Size - 2] = ConstantInt::get(Ty, Union.getLower());
442     EndPoints[Size - 1] = ConstantInt::get(Ty, Union.getUpper());
443     return true;
444   }
445   return false;
446 }
447
448 static void addRange(SmallVectorImpl<Value *> &EndPoints, ConstantInt *Low,
449                      ConstantInt *High) {
450   if (!EndPoints.empty())
451     if (tryMergeRange(EndPoints, Low, High))
452       return;
453
454   EndPoints.push_back(Low);
455   EndPoints.push_back(High);
456 }
457
458 MDNode *MDNode::getMostGenericRange(MDNode *A, MDNode *B) {
459   // Given two ranges, we want to compute the union of the ranges. This
460   // is slightly complitade by having to combine the intervals and merge
461   // the ones that overlap.
462
463   if (!A || !B)
464     return nullptr;
465
466   if (A == B)
467     return A;
468
469   // First, walk both lists in older of the lower boundary of each interval.
470   // At each step, try to merge the new interval to the last one we adedd.
471   SmallVector<Value*, 4> EndPoints;
472   int AI = 0;
473   int BI = 0;
474   int AN = A->getNumOperands() / 2;
475   int BN = B->getNumOperands() / 2;
476   while (AI < AN && BI < BN) {
477     ConstantInt *ALow = cast<ConstantInt>(A->getOperand(2 * AI));
478     ConstantInt *BLow = cast<ConstantInt>(B->getOperand(2 * BI));
479
480     if (ALow->getValue().slt(BLow->getValue())) {
481       addRange(EndPoints, ALow, cast<ConstantInt>(A->getOperand(2 * AI + 1)));
482       ++AI;
483     } else {
484       addRange(EndPoints, BLow, cast<ConstantInt>(B->getOperand(2 * BI + 1)));
485       ++BI;
486     }
487   }
488   while (AI < AN) {
489     addRange(EndPoints, cast<ConstantInt>(A->getOperand(2 * AI)),
490              cast<ConstantInt>(A->getOperand(2 * AI + 1)));
491     ++AI;
492   }
493   while (BI < BN) {
494     addRange(EndPoints, cast<ConstantInt>(B->getOperand(2 * BI)),
495              cast<ConstantInt>(B->getOperand(2 * BI + 1)));
496     ++BI;
497   }
498
499   // If we have more than 2 ranges (4 endpoints) we have to try to merge
500   // the last and first ones.
501   unsigned Size = EndPoints.size();
502   if (Size > 4) {
503     ConstantInt *FB = cast<ConstantInt>(EndPoints[0]);
504     ConstantInt *FE = cast<ConstantInt>(EndPoints[1]);
505     if (tryMergeRange(EndPoints, FB, FE)) {
506       for (unsigned i = 0; i < Size - 2; ++i) {
507         EndPoints[i] = EndPoints[i + 2];
508       }
509       EndPoints.resize(Size - 2);
510     }
511   }
512
513   // If in the end we have a single range, it is possible that it is now the
514   // full range. Just drop the metadata in that case.
515   if (EndPoints.size() == 2) {
516     ConstantRange Range(cast<ConstantInt>(EndPoints[0])->getValue(),
517                         cast<ConstantInt>(EndPoints[1])->getValue());
518     if (Range.isFullSet())
519       return nullptr;
520   }
521
522   return MDNode::get(A->getContext(), EndPoints);
523 }
524
525 //===----------------------------------------------------------------------===//
526 // NamedMDNode implementation.
527 //
528
529 static SmallVector<TrackingVH<MDNode>, 4> &getNMDOps(void *Operands) {
530   return *(SmallVector<TrackingVH<MDNode>, 4> *)Operands;
531 }
532
533 NamedMDNode::NamedMDNode(const Twine &N)
534     : Name(N.str()), Parent(nullptr),
535       Operands(new SmallVector<TrackingVH<MDNode>, 4>()) {}
536
537 NamedMDNode::~NamedMDNode() {
538   dropAllReferences();
539   delete &getNMDOps(Operands);
540 }
541
542 unsigned NamedMDNode::getNumOperands() const {
543   return (unsigned)getNMDOps(Operands).size();
544 }
545
546 MDNode *NamedMDNode::getOperand(unsigned i) const {
547   assert(i < getNumOperands() && "Invalid Operand number!");
548   return &*getNMDOps(Operands)[i];
549 }
550
551 void NamedMDNode::addOperand(MDNode *M) {
552   assert(!M->isFunctionLocal() &&
553          "NamedMDNode operands must not be function-local!");
554   getNMDOps(Operands).push_back(TrackingVH<MDNode>(M));
555 }
556
557 void NamedMDNode::eraseFromParent() {
558   getParent()->eraseNamedMetadata(this);
559 }
560
561 void NamedMDNode::dropAllReferences() {
562   getNMDOps(Operands).clear();
563 }
564
565 StringRef NamedMDNode::getName() const {
566   return StringRef(Name);
567 }
568
569 //===----------------------------------------------------------------------===//
570 // Instruction Metadata method implementations.
571 //
572
573 void Instruction::setMetadata(StringRef Kind, MDNode *Node) {
574   if (!Node && !hasMetadata())
575     return;
576   setMetadata(getContext().getMDKindID(Kind), Node);
577 }
578
579 MDNode *Instruction::getMetadataImpl(StringRef Kind) const {
580   return getMetadataImpl(getContext().getMDKindID(Kind));
581 }
582
583 void Instruction::dropUnknownMetadata(ArrayRef<unsigned> KnownIDs) {
584   SmallSet<unsigned, 5> KnownSet;
585   KnownSet.insert(KnownIDs.begin(), KnownIDs.end());
586
587   // Drop debug if needed
588   if (KnownSet.erase(LLVMContext::MD_dbg))
589     DbgLoc = DebugLoc();
590
591   if (!hasMetadataHashEntry())
592     return; // Nothing to remove!
593
594   DenseMap<const Instruction *, LLVMContextImpl::MDMapTy> &MetadataStore =
595       getContext().pImpl->MetadataStore;
596
597   if (KnownSet.empty()) {
598     // Just drop our entry at the store.
599     MetadataStore.erase(this);
600     setHasMetadataHashEntry(false);
601     return;
602   }
603
604   LLVMContextImpl::MDMapTy &Info = MetadataStore[this];
605   unsigned I;
606   unsigned E;
607   // Walk the array and drop any metadata we don't know.
608   for (I = 0, E = Info.size(); I != E;) {
609     if (KnownSet.count(Info[I].first)) {
610       ++I;
611       continue;
612     }
613
614     Info[I] = Info.back();
615     Info.pop_back();
616     --E;
617   }
618   assert(E == Info.size());
619
620   if (E == 0) {
621     // Drop our entry at the store.
622     MetadataStore.erase(this);
623     setHasMetadataHashEntry(false);
624   }
625 }
626
627 /// setMetadata - Set the metadata of of the specified kind to the specified
628 /// node.  This updates/replaces metadata if already present, or removes it if
629 /// Node is null.
630 void Instruction::setMetadata(unsigned KindID, MDNode *Node) {
631   if (!Node && !hasMetadata())
632     return;
633
634   // Handle 'dbg' as a special case since it is not stored in the hash table.
635   if (KindID == LLVMContext::MD_dbg) {
636     DbgLoc = DebugLoc::getFromDILocation(Node);
637     return;
638   }
639   
640   // Handle the case when we're adding/updating metadata on an instruction.
641   if (Node) {
642     assert(!Node->isFunctionLocal() &&
643            "Function-local metadata cannot be attached to instructions");
644     LLVMContextImpl::MDMapTy &Info = getContext().pImpl->MetadataStore[this];
645     assert(!Info.empty() == hasMetadataHashEntry() &&
646            "HasMetadata bit is wonked");
647     if (Info.empty()) {
648       setHasMetadataHashEntry(true);
649     } else {
650       // Handle replacement of an existing value.
651       for (auto &P : Info)
652         if (P.first == KindID) {
653           P.second = Node;
654           return;
655         }
656     }
657
658     // No replacement, just add it to the list.
659     Info.push_back(std::make_pair(KindID, Node));
660     return;
661   }
662
663   // Otherwise, we're removing metadata from an instruction.
664   assert((hasMetadataHashEntry() ==
665           (getContext().pImpl->MetadataStore.count(this) > 0)) &&
666          "HasMetadata bit out of date!");
667   if (!hasMetadataHashEntry())
668     return;  // Nothing to remove!
669   LLVMContextImpl::MDMapTy &Info = getContext().pImpl->MetadataStore[this];
670
671   // Common case is removing the only entry.
672   if (Info.size() == 1 && Info[0].first == KindID) {
673     getContext().pImpl->MetadataStore.erase(this);
674     setHasMetadataHashEntry(false);
675     return;
676   }
677
678   // Handle removal of an existing value.
679   for (unsigned i = 0, e = Info.size(); i != e; ++i)
680     if (Info[i].first == KindID) {
681       Info[i] = Info.back();
682       Info.pop_back();
683       assert(!Info.empty() && "Removing last entry should be handled above");
684       return;
685     }
686   // Otherwise, removing an entry that doesn't exist on the instruction.
687 }
688
689 void Instruction::setAAMetadata(const AAMDNodes &N) {
690   setMetadata(LLVMContext::MD_tbaa, N.TBAA);
691   setMetadata(LLVMContext::MD_alias_scope, N.Scope);
692   setMetadata(LLVMContext::MD_noalias, N.NoAlias);
693 }
694
695 MDNode *Instruction::getMetadataImpl(unsigned KindID) const {
696   // Handle 'dbg' as a special case since it is not stored in the hash table.
697   if (KindID == LLVMContext::MD_dbg)
698     return DbgLoc.getAsMDNode(getContext());
699   
700   if (!hasMetadataHashEntry()) return nullptr;
701   
702   LLVMContextImpl::MDMapTy &Info = getContext().pImpl->MetadataStore[this];
703   assert(!Info.empty() && "bit out of sync with hash table");
704
705   for (const auto &I : Info)
706     if (I.first == KindID)
707       return I.second;
708   return nullptr;
709 }
710
711 void Instruction::getAllMetadataImpl(
712     SmallVectorImpl<std::pair<unsigned, MDNode *>> &Result) const {
713   Result.clear();
714   
715   // Handle 'dbg' as a special case since it is not stored in the hash table.
716   if (!DbgLoc.isUnknown()) {
717     Result.push_back(std::make_pair((unsigned)LLVMContext::MD_dbg,
718                                     DbgLoc.getAsMDNode(getContext())));
719     if (!hasMetadataHashEntry()) return;
720   }
721   
722   assert(hasMetadataHashEntry() &&
723          getContext().pImpl->MetadataStore.count(this) &&
724          "Shouldn't have called this");
725   const LLVMContextImpl::MDMapTy &Info =
726     getContext().pImpl->MetadataStore.find(this)->second;
727   assert(!Info.empty() && "Shouldn't have called this");
728
729   Result.append(Info.begin(), Info.end());
730
731   // Sort the resulting array so it is stable.
732   if (Result.size() > 1)
733     array_pod_sort(Result.begin(), Result.end());
734 }
735
736 void Instruction::getAllMetadataOtherThanDebugLocImpl(
737     SmallVectorImpl<std::pair<unsigned, MDNode *>> &Result) const {
738   Result.clear();
739   assert(hasMetadataHashEntry() &&
740          getContext().pImpl->MetadataStore.count(this) &&
741          "Shouldn't have called this");
742   const LLVMContextImpl::MDMapTy &Info =
743     getContext().pImpl->MetadataStore.find(this)->second;
744   assert(!Info.empty() && "Shouldn't have called this");
745   Result.append(Info.begin(), Info.end());
746
747   // Sort the resulting array so it is stable.
748   if (Result.size() > 1)
749     array_pod_sort(Result.begin(), Result.end());
750 }
751
752 /// clearMetadataHashEntries - Clear all hashtable-based metadata from
753 /// this instruction.
754 void Instruction::clearMetadataHashEntries() {
755   assert(hasMetadataHashEntry() && "Caller should check");
756   getContext().pImpl->MetadataStore.erase(this);
757   setHasMetadataHashEntry(false);
758 }
759