Push LLVMContexts through the IntegerType APIs.
[oota-llvm.git] / lib / VMCore / 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 "LLVMContextImpl.h"
15 #include "llvm/Metadata.h"
16 #include "llvm/LLVMContext.h"
17 #include "llvm/Module.h"
18 #include "SymbolTableListTraitsImpl.h"
19 using namespace llvm;
20
21 //===----------------------------------------------------------------------===//
22 //MetadataBase implementation
23 //
24
25 /// resizeOperands - Metadata keeps track of other metadata uses using 
26 /// OperandList. Resize this list to hold anticipated number of metadata
27 /// operands.
28 void MetadataBase::resizeOperands(unsigned NumOps) {
29   unsigned e = getNumOperands();
30   if (NumOps == 0) {
31     NumOps = e*2;
32     if (NumOps < 2) NumOps = 2;  
33   } else if (NumOps > NumOperands) {
34     // No resize needed.
35     if (ReservedSpace >= NumOps) return;
36   } else if (NumOps == NumOperands) {
37     if (ReservedSpace == NumOps) return;
38   } else {
39     return;
40   }
41
42   ReservedSpace = NumOps;
43   Use *OldOps = OperandList;
44   Use *NewOps = allocHungoffUses(NumOps);
45   std::copy(OldOps, OldOps + e, NewOps);
46   OperandList = NewOps;
47   if (OldOps) Use::zap(OldOps, OldOps + e, true);
48 }
49 //===----------------------------------------------------------------------===//
50 //MDString implementation
51 //
52 MDString *MDString::get(LLVMContext &Context, const StringRef &Str) {
53   LLVMContextImpl *pImpl = Context.pImpl;
54   sys::SmartScopedWriter<true> Writer(pImpl->ConstantsLock);
55   StringMapEntry<MDString *> &Entry = 
56     pImpl->MDStringCache.GetOrCreateValue(Str);
57   MDString *&S = Entry.getValue();
58   if (!S) S = new MDString(Context, Entry.getKeyData(),
59                            Entry.getKeyLength());
60
61   return S;
62 }
63
64 //===----------------------------------------------------------------------===//
65 //MDNode implementation
66 //
67 MDNode::MDNode(LLVMContext &C, Value*const* Vals, unsigned NumVals)
68   : MetadataBase(Type::getMetadataTy(C), Value::MDNodeVal) {
69   NumOperands = 0;
70   resizeOperands(NumVals);
71   for (unsigned i = 0; i != NumVals; ++i) {
72     // Only record metadata uses.
73     if (MetadataBase *MB = dyn_cast_or_null<MetadataBase>(Vals[i]))
74       OperandList[NumOperands++] = MB;
75     Node.push_back(WeakVH(Vals[i]));
76   }
77 }
78
79 MDNode *MDNode::get(LLVMContext &Context, Value*const* Vals, unsigned NumVals) {
80   LLVMContextImpl *pImpl = Context.pImpl;
81   std::vector<Value*> V;
82   V.reserve(NumVals);
83   for (unsigned i = 0; i < NumVals; ++i)
84     V.push_back(Vals[i]);
85   
86   return pImpl->MDNodes.getOrCreate(Type::getMetadataTy(Context), V);
87 }
88
89 /// dropAllReferences - Remove all uses and clear node vector.
90 void MDNode::dropAllReferences() {
91   User::dropAllReferences();
92   Node.clear();
93 }
94
95 static std::vector<Value*> getValType(MDNode *N) {
96   std::vector<Value*> Elements;
97   Elements.reserve(N->getNumElements());
98   for (unsigned i = 0, e = N->getNumElements(); i != e; ++i)
99     Elements.push_back(N->getElement(i));
100   return Elements;
101 }
102
103 MDNode::~MDNode() {
104   dropAllReferences();
105   getType()->getContext().pImpl->MDNodes.remove(this);
106 }
107
108 //===----------------------------------------------------------------------===//
109 //NamedMDNode implementation
110 //
111 NamedMDNode::NamedMDNode(LLVMContext &C, const Twine &N,
112                          MetadataBase*const* MDs, 
113                          unsigned NumMDs, Module *ParentModule)
114   : MetadataBase(Type::getMetadataTy(C), Value::NamedMDNodeVal), Parent(0) {
115   setName(N);
116   NumOperands = 0;
117   resizeOperands(NumMDs);
118
119   for (unsigned i = 0; i != NumMDs; ++i) {
120     if (MDs[i])
121       OperandList[NumOperands++] = MDs[i];
122     Node.push_back(WeakMetadataVH(MDs[i]));
123   }
124   if (ParentModule)
125     ParentModule->getNamedMDList().push_back(this);
126 }
127
128 NamedMDNode *NamedMDNode::Create(const NamedMDNode *NMD, Module *M) {
129   assert (NMD && "Invalid source NamedMDNode!");
130   SmallVector<MetadataBase *, 4> Elems;
131   for (unsigned i = 0, e = NMD->getNumElements(); i != e; ++i)
132     Elems.push_back(NMD->getElement(i));
133   return new NamedMDNode(NMD->getContext(), NMD->getName().data(),
134                          Elems.data(), Elems.size(), M);
135 }
136
137 /// eraseFromParent - Drop all references and remove the node from parent
138 /// module.
139 void NamedMDNode::eraseFromParent() {
140   getParent()->getNamedMDList().erase(this);
141 }
142
143 /// dropAllReferences - Remove all uses and clear node vector.
144 void NamedMDNode::dropAllReferences() {
145   User::dropAllReferences();
146   Node.clear();
147 }
148
149 NamedMDNode::~NamedMDNode() {
150   dropAllReferences();
151 }