1ef27db87SMehdi Amini //===----- ValueList.cpp - Internal BitcodeReader implementation ----------===//
2ef27db87SMehdi Amini //
3ef27db87SMehdi Amini //                     The LLVM Compiler Infrastructure
4ef27db87SMehdi Amini //
5ef27db87SMehdi Amini // This file is distributed under the University of Illinois Open Source
6ef27db87SMehdi Amini // License. See LICENSE.TXT for details.
7ef27db87SMehdi Amini //
8ef27db87SMehdi Amini //===----------------------------------------------------------------------===//
9ef27db87SMehdi Amini 
10ef27db87SMehdi Amini #include "ValueList.h"
11ef27db87SMehdi Amini #include "llvm/IR/Constants.h"
12ef27db87SMehdi Amini #include "llvm/IR/Instructions.h"
13ef27db87SMehdi Amini 
14ef27db87SMehdi Amini using namespace llvm;
15ef27db87SMehdi Amini 
16ef27db87SMehdi Amini namespace llvm {
17ef27db87SMehdi Amini namespace {
18ef27db87SMehdi Amini 
19ef27db87SMehdi Amini /// \brief A class for maintaining the slot number definition
20ef27db87SMehdi Amini /// as a placeholder for the actual definition for forward constants defs.
21ef27db87SMehdi Amini class ConstantPlaceHolder : public ConstantExpr {
22ef27db87SMehdi Amini   void operator=(const ConstantPlaceHolder &) = delete;
23ef27db87SMehdi Amini 
24ef27db87SMehdi Amini public:
25ef27db87SMehdi Amini   // allocate space for exactly one operand
26ef27db87SMehdi Amini   void *operator new(size_t s) { return User::operator new(s, 1); }
27ef27db87SMehdi Amini   explicit ConstantPlaceHolder(Type *Ty, LLVMContext &Context)
28ef27db87SMehdi Amini       : ConstantExpr(Ty, Instruction::UserOp1, &Op<0>(), 1) {
29ef27db87SMehdi Amini     Op<0>() = UndefValue::get(Type::getInt32Ty(Context));
30ef27db87SMehdi Amini   }
31ef27db87SMehdi Amini 
32ef27db87SMehdi Amini   /// \brief Methods to support type inquiry through isa, cast, and dyn_cast.
33ef27db87SMehdi Amini   static bool classof(const Value *V) {
34ef27db87SMehdi Amini     return isa<ConstantExpr>(V) &&
35ef27db87SMehdi Amini            cast<ConstantExpr>(V)->getOpcode() == Instruction::UserOp1;
36ef27db87SMehdi Amini   }
37ef27db87SMehdi Amini 
38ef27db87SMehdi Amini   /// Provide fast operand accessors
39ef27db87SMehdi Amini   DECLARE_TRANSPARENT_OPERAND_ACCESSORS(Value);
40ef27db87SMehdi Amini };
41ef27db87SMehdi Amini 
42ef27db87SMehdi Amini } // end anonymous namespace
43ef27db87SMehdi Amini 
44ef27db87SMehdi Amini // FIXME: can we inherit this from ConstantExpr?
45ef27db87SMehdi Amini template <>
46ef27db87SMehdi Amini struct OperandTraits<ConstantPlaceHolder>
47ef27db87SMehdi Amini     : public FixedNumOperandTraits<ConstantPlaceHolder, 1> {};
48ef27db87SMehdi Amini DEFINE_TRANSPARENT_OPERAND_ACCESSORS(ConstantPlaceHolder, Value)
49ef27db87SMehdi Amini 
50ef27db87SMehdi Amini } // end namespace llvm
51ef27db87SMehdi Amini 
52ef27db87SMehdi Amini void BitcodeReaderValueList::assignValue(Value *V, unsigned Idx) {
53ef27db87SMehdi Amini   if (Idx == size()) {
54ef27db87SMehdi Amini     push_back(V);
55ef27db87SMehdi Amini     return;
56ef27db87SMehdi Amini   }
57ef27db87SMehdi Amini 
58ef27db87SMehdi Amini   if (Idx >= size())
59ef27db87SMehdi Amini     resize(Idx + 1);
60ef27db87SMehdi Amini 
61*e6bca0eeSSanjoy Das   WeakTrackingVH &OldV = ValuePtrs[Idx];
62ef27db87SMehdi Amini   if (!OldV) {
63ef27db87SMehdi Amini     OldV = V;
64ef27db87SMehdi Amini     return;
65ef27db87SMehdi Amini   }
66ef27db87SMehdi Amini 
67ef27db87SMehdi Amini   // Handle constants and non-constants (e.g. instrs) differently for
68ef27db87SMehdi Amini   // efficiency.
69ef27db87SMehdi Amini   if (Constant *PHC = dyn_cast<Constant>(&*OldV)) {
70ef27db87SMehdi Amini     ResolveConstants.push_back(std::make_pair(PHC, Idx));
71ef27db87SMehdi Amini     OldV = V;
72ef27db87SMehdi Amini   } else {
73ef27db87SMehdi Amini     // If there was a forward reference to this value, replace it.
74ef27db87SMehdi Amini     Value *PrevVal = OldV;
75ef27db87SMehdi Amini     OldV->replaceAllUsesWith(V);
76ef27db87SMehdi Amini     delete PrevVal;
77ef27db87SMehdi Amini   }
78ef27db87SMehdi Amini }
79ef27db87SMehdi Amini 
80ef27db87SMehdi Amini Constant *BitcodeReaderValueList::getConstantFwdRef(unsigned Idx, Type *Ty) {
81ef27db87SMehdi Amini   if (Idx >= size())
82ef27db87SMehdi Amini     resize(Idx + 1);
83ef27db87SMehdi Amini 
84ef27db87SMehdi Amini   if (Value *V = ValuePtrs[Idx]) {
85ef27db87SMehdi Amini     if (Ty != V->getType())
86ef27db87SMehdi Amini       report_fatal_error("Type mismatch in constant table!");
87ef27db87SMehdi Amini     return cast<Constant>(V);
88ef27db87SMehdi Amini   }
89ef27db87SMehdi Amini 
90ef27db87SMehdi Amini   // Create and return a placeholder, which will later be RAUW'd.
91ef27db87SMehdi Amini   Constant *C = new ConstantPlaceHolder(Ty, Context);
92ef27db87SMehdi Amini   ValuePtrs[Idx] = C;
93ef27db87SMehdi Amini   return C;
94ef27db87SMehdi Amini }
95ef27db87SMehdi Amini 
96ef27db87SMehdi Amini Value *BitcodeReaderValueList::getValueFwdRef(unsigned Idx, Type *Ty) {
97ef27db87SMehdi Amini   // Bail out for a clearly invalid value. This would make us call resize(0)
98ef27db87SMehdi Amini   if (Idx == std::numeric_limits<unsigned>::max())
99ef27db87SMehdi Amini     return nullptr;
100ef27db87SMehdi Amini 
101ef27db87SMehdi Amini   if (Idx >= size())
102ef27db87SMehdi Amini     resize(Idx + 1);
103ef27db87SMehdi Amini 
104ef27db87SMehdi Amini   if (Value *V = ValuePtrs[Idx]) {
105ef27db87SMehdi Amini     // If the types don't match, it's invalid.
106ef27db87SMehdi Amini     if (Ty && Ty != V->getType())
107ef27db87SMehdi Amini       return nullptr;
108ef27db87SMehdi Amini     return V;
109ef27db87SMehdi Amini   }
110ef27db87SMehdi Amini 
111ef27db87SMehdi Amini   // No type specified, must be invalid reference.
112ef27db87SMehdi Amini   if (!Ty)
113ef27db87SMehdi Amini     return nullptr;
114ef27db87SMehdi Amini 
115ef27db87SMehdi Amini   // Create and return a placeholder, which will later be RAUW'd.
116ef27db87SMehdi Amini   Value *V = new Argument(Ty);
117ef27db87SMehdi Amini   ValuePtrs[Idx] = V;
118ef27db87SMehdi Amini   return V;
119ef27db87SMehdi Amini }
120ef27db87SMehdi Amini 
121ef27db87SMehdi Amini /// Once all constants are read, this method bulk resolves any forward
122ef27db87SMehdi Amini /// references.  The idea behind this is that we sometimes get constants (such
123ef27db87SMehdi Amini /// as large arrays) which reference *many* forward ref constants.  Replacing
124ef27db87SMehdi Amini /// each of these causes a lot of thrashing when building/reuniquing the
125ef27db87SMehdi Amini /// constant.  Instead of doing this, we look at all the uses and rewrite all
126ef27db87SMehdi Amini /// the place holders at once for any constant that uses a placeholder.
127ef27db87SMehdi Amini void BitcodeReaderValueList::resolveConstantForwardRefs() {
128ef27db87SMehdi Amini   // Sort the values by-pointer so that they are efficient to look up with a
129ef27db87SMehdi Amini   // binary search.
130ef27db87SMehdi Amini   std::sort(ResolveConstants.begin(), ResolveConstants.end());
131ef27db87SMehdi Amini 
132ef27db87SMehdi Amini   SmallVector<Constant *, 64> NewOps;
133ef27db87SMehdi Amini 
134ef27db87SMehdi Amini   while (!ResolveConstants.empty()) {
135ef27db87SMehdi Amini     Value *RealVal = operator[](ResolveConstants.back().second);
136ef27db87SMehdi Amini     Constant *Placeholder = ResolveConstants.back().first;
137ef27db87SMehdi Amini     ResolveConstants.pop_back();
138ef27db87SMehdi Amini 
139ef27db87SMehdi Amini     // Loop over all users of the placeholder, updating them to reference the
140ef27db87SMehdi Amini     // new value.  If they reference more than one placeholder, update them all
141ef27db87SMehdi Amini     // at once.
142ef27db87SMehdi Amini     while (!Placeholder->use_empty()) {
143ef27db87SMehdi Amini       auto UI = Placeholder->user_begin();
144ef27db87SMehdi Amini       User *U = *UI;
145ef27db87SMehdi Amini 
146ef27db87SMehdi Amini       // If the using object isn't uniqued, just update the operands.  This
147ef27db87SMehdi Amini       // handles instructions and initializers for global variables.
148ef27db87SMehdi Amini       if (!isa<Constant>(U) || isa<GlobalValue>(U)) {
149ef27db87SMehdi Amini         UI.getUse().set(RealVal);
150ef27db87SMehdi Amini         continue;
151ef27db87SMehdi Amini       }
152ef27db87SMehdi Amini 
153ef27db87SMehdi Amini       // Otherwise, we have a constant that uses the placeholder.  Replace that
154ef27db87SMehdi Amini       // constant with a new constant that has *all* placeholder uses updated.
155ef27db87SMehdi Amini       Constant *UserC = cast<Constant>(U);
156ef27db87SMehdi Amini       for (User::op_iterator I = UserC->op_begin(), E = UserC->op_end(); I != E;
157ef27db87SMehdi Amini            ++I) {
158ef27db87SMehdi Amini         Value *NewOp;
159ef27db87SMehdi Amini         if (!isa<ConstantPlaceHolder>(*I)) {
160ef27db87SMehdi Amini           // Not a placeholder reference.
161ef27db87SMehdi Amini           NewOp = *I;
162ef27db87SMehdi Amini         } else if (*I == Placeholder) {
163ef27db87SMehdi Amini           // Common case is that it just references this one placeholder.
164ef27db87SMehdi Amini           NewOp = RealVal;
165ef27db87SMehdi Amini         } else {
166ef27db87SMehdi Amini           // Otherwise, look up the placeholder in ResolveConstants.
167ef27db87SMehdi Amini           ResolveConstantsTy::iterator It = std::lower_bound(
168ef27db87SMehdi Amini               ResolveConstants.begin(), ResolveConstants.end(),
169ef27db87SMehdi Amini               std::pair<Constant *, unsigned>(cast<Constant>(*I), 0));
170ef27db87SMehdi Amini           assert(It != ResolveConstants.end() && It->first == *I);
171ef27db87SMehdi Amini           NewOp = operator[](It->second);
172ef27db87SMehdi Amini         }
173ef27db87SMehdi Amini 
174ef27db87SMehdi Amini         NewOps.push_back(cast<Constant>(NewOp));
175ef27db87SMehdi Amini       }
176ef27db87SMehdi Amini 
177ef27db87SMehdi Amini       // Make the new constant.
178ef27db87SMehdi Amini       Constant *NewC;
179ef27db87SMehdi Amini       if (ConstantArray *UserCA = dyn_cast<ConstantArray>(UserC)) {
180ef27db87SMehdi Amini         NewC = ConstantArray::get(UserCA->getType(), NewOps);
181ef27db87SMehdi Amini       } else if (ConstantStruct *UserCS = dyn_cast<ConstantStruct>(UserC)) {
182ef27db87SMehdi Amini         NewC = ConstantStruct::get(UserCS->getType(), NewOps);
183ef27db87SMehdi Amini       } else if (isa<ConstantVector>(UserC)) {
184ef27db87SMehdi Amini         NewC = ConstantVector::get(NewOps);
185ef27db87SMehdi Amini       } else {
186ef27db87SMehdi Amini         assert(isa<ConstantExpr>(UserC) && "Must be a ConstantExpr.");
187ef27db87SMehdi Amini         NewC = cast<ConstantExpr>(UserC)->getWithOperands(NewOps);
188ef27db87SMehdi Amini       }
189ef27db87SMehdi Amini 
190ef27db87SMehdi Amini       UserC->replaceAllUsesWith(NewC);
191ef27db87SMehdi Amini       UserC->destroyConstant();
192ef27db87SMehdi Amini       NewOps.clear();
193ef27db87SMehdi Amini     }
194ef27db87SMehdi Amini 
195ef27db87SMehdi Amini     // Update all ValueHandles, they should be the only users at this point.
196ef27db87SMehdi Amini     Placeholder->replaceAllUsesWith(RealVal);
197ef27db87SMehdi Amini     delete Placeholder;
198ef27db87SMehdi Amini   }
199ef27db87SMehdi Amini }
200