OLD | NEW |
---|---|
(Empty) | |
1 // Copyright (c) 2016, the Dart project authors. Please see the AUTHORS file | |
2 // for details. All rights reserved. Use of this source code is governed by a | |
3 // BSD-style license that can be found in the LICENSE file. | |
4 | |
5 #include "vm/become.h" | |
6 | |
7 #include "platform/assert.h" | |
8 #include "platform/utils.h" | |
9 | |
10 #include "vm/dart_api_state.h" | |
11 #include "vm/freelist.h" | |
12 #include "vm/isolate_reload.h" | |
13 #include "vm/object.h" | |
14 #include "vm/raw_object.h" | |
15 #include "vm/safepoint.h" | |
16 #include "vm/timeline.h" | |
17 #include "vm/visitor.h" | |
18 | |
19 namespace dart { | |
20 | |
21 DECLARE_FLAG(bool, trace_reload); | |
22 | |
23 static bool IsForwardingObject(RawObject* object) { | |
Ivan Posva
2016/05/16 20:58:59
Please add a general comment explaining that free
Cutch
2016/05/17 18:03:51
Done.
| |
24 return object->IsHeapObject() && object->IsFreeListElement(); | |
25 } | |
26 | |
27 | |
28 static RawObject* GetForwardedObject(RawObject* object) { | |
29 ASSERT(IsForwardingObject(object)); | |
30 uword addr = reinterpret_cast<uword>(object) - kHeapObjectTag; | |
31 FreeListElement* forwarder = reinterpret_cast<FreeListElement*>(addr); | |
32 RawObject* new_target = reinterpret_cast<RawObject*>(forwarder->next()); | |
33 return new_target; | |
34 } | |
35 | |
36 | |
37 static void ForwardObjectTo(RawObject* before_obj, RawObject* after_obj) { | |
38 const intptr_t size_before = before_obj->Size(); | |
39 | |
40 // TODO(rmacnak): We should use different cids for forwarding corpses and | |
41 // free list elements. | |
42 uword corpse_addr = reinterpret_cast<uword>(before_obj) - kHeapObjectTag; | |
43 FreeListElement* forwarder = FreeListElement::AsElement(corpse_addr, | |
44 size_before); | |
45 forwarder->set_next(reinterpret_cast<FreeListElement*>(after_obj)); | |
46 if (!IsForwardingObject(before_obj)) { | |
47 FATAL("become: ForwardObjectTo failure."); | |
48 } | |
49 // Still need to be able to iterate over the forwarding corpse. | |
50 const intptr_t size_after = before_obj->Size(); | |
51 if (size_before != size_after) { | |
52 FATAL("become: Before and after sizes do not match."); | |
53 } | |
54 ASSERT(size_before == size_after); | |
Ivan Posva
2016/05/16 20:58:59
Redundant assert is redundant.
Cutch
2016/05/17 18:03:51
Done.
| |
55 } | |
56 | |
57 | |
58 class ForwardPointersVisitor : public ObjectPointerVisitor { | |
59 public: | |
60 explicit ForwardPointersVisitor(Isolate* isolate) | |
61 : ObjectPointerVisitor(isolate), visiting_object_(NULL), count_(0) { } | |
62 | |
63 virtual void VisitPointers(RawObject** first, RawObject** last) { | |
64 for (RawObject** p = first; p <= last; p++) { | |
65 RawObject* old_target = *p; | |
66 if (IsForwardingObject(old_target)) { | |
67 RawObject* new_target = GetForwardedObject(old_target); | |
68 if (visiting_object_ == NULL) { | |
69 *p = new_target; | |
70 } else { | |
71 visiting_object_->StorePointer(p, new_target); | |
72 } | |
73 count_++; | |
74 } | |
75 } | |
76 } | |
77 | |
78 void VisitingObject(RawObject* obj) { visiting_object_ = obj; } | |
79 | |
80 intptr_t count() const { return count_; } | |
81 | |
82 private: | |
83 RawObject* visiting_object_; | |
84 intptr_t count_; | |
85 | |
86 DISALLOW_COPY_AND_ASSIGN(ForwardPointersVisitor); | |
87 }; | |
88 | |
89 | |
90 class ForwardHeapPointersVisitor : public ObjectVisitor { | |
91 public: | |
92 explicit ForwardHeapPointersVisitor(ForwardPointersVisitor* pointer_visitor) | |
93 : pointer_visitor_(pointer_visitor) { } | |
94 | |
95 virtual void VisitObject(RawObject* obj) { | |
96 pointer_visitor_->VisitingObject(obj); | |
97 obj->VisitPointers(pointer_visitor_); | |
98 } | |
99 | |
100 private: | |
101 ForwardPointersVisitor* pointer_visitor_; | |
102 | |
103 DISALLOW_COPY_AND_ASSIGN(ForwardHeapPointersVisitor); | |
104 }; | |
105 | |
106 | |
107 class ForwardHeapPointersHandleVisitor : public HandleVisitor { | |
108 public: | |
109 ForwardHeapPointersHandleVisitor() | |
110 : HandleVisitor(Thread::Current()), count_(0) { } | |
111 | |
112 virtual void VisitHandle(uword addr) { | |
113 FinalizablePersistentHandle* handle = | |
114 reinterpret_cast<FinalizablePersistentHandle*>(addr); | |
115 if (IsForwardingObject(handle->raw())) { | |
116 *handle->raw_addr() = GetForwardedObject(handle->raw()); | |
117 count_++; | |
118 } | |
119 } | |
120 | |
121 intptr_t count() const { return count_; } | |
122 | |
123 private: | |
124 int count_; | |
125 | |
126 DISALLOW_COPY_AND_ASSIGN(ForwardHeapPointersHandleVisitor); | |
127 }; | |
128 | |
129 | |
130 #if defined(DEBUG) | |
131 class NoFreeListTargetsVisitor : public ObjectPointerVisitor { | |
132 public: | |
133 explicit NoFreeListTargetsVisitor(Isolate* isolate) | |
134 : ObjectPointerVisitor(isolate) { } | |
135 | |
136 virtual void VisitPointers(RawObject** first, RawObject** last) { | |
137 for (RawObject** p = first; p <= last; p++) { | |
138 RawObject* target = *p; | |
139 if (target->IsHeapObject()) { | |
140 ASSERT(!target->IsFreeListElement()); | |
141 } | |
142 } | |
143 } | |
144 | |
145 private: | |
146 DISALLOW_COPY_AND_ASSIGN(NoFreeListTargetsVisitor); | |
147 }; | |
148 #endif | |
149 | |
150 | |
151 void Become::ElementsForwardIdentity(const Array& before, const Array& after) { | |
Ivan Posva
2016/05/16 20:58:59
I am wondering whether this is the right API for t
Cutch
2016/05/17 18:03:51
Agreed and added a TODO.
| |
152 Thread* thread = Thread::Current(); | |
153 Isolate* isolate = thread->isolate(); | |
154 Heap* heap = isolate->heap(); | |
155 | |
156 { | |
157 // TODO(rmacnak): Investigate why this is necessary. | |
158 heap->CollectGarbage(Heap::kNew); | |
159 } | |
160 | |
161 TIMELINE_FUNCTION_GC_DURATION(thread, "Become::ElementsForwardIdentity"); | |
162 HeapIterationScope his; | |
163 | |
164 #if defined(DEBUG) | |
165 { | |
166 // There should be no pointers to free list elements / forwarding corpses. | |
167 NoFreeListTargetsVisitor visitor(isolate); | |
168 isolate->VisitObjectPointers(&visitor, true); | |
169 heap->VisitObjectPointers(&visitor); | |
170 } | |
171 #endif | |
172 | |
173 // Setup forwarding pointers. | |
174 ASSERT(before.Length() == after.Length()); | |
175 for (intptr_t i = 0; i < before.Length(); i++) { | |
176 RawObject* before_obj = before.At(i); | |
177 RawObject* after_obj = after.At(i); | |
178 | |
179 if (before_obj == after_obj) { | |
180 FATAL("become: Cannot self-forward"); | |
181 } | |
182 if (!before_obj->IsHeapObject()) { | |
183 FATAL("become: Cannot forward immediates"); | |
184 } | |
185 if (!after_obj->IsHeapObject()) { | |
186 FATAL("become: Cannot become an immediates"); | |
187 } | |
188 if (before_obj->IsVMHeapObject()) { | |
189 FATAL("become: Cannot forward VM heap objects"); | |
190 } | |
191 if (before_obj->IsFreeListElement()) { | |
192 FATAL("become: Cannot forward to multiple objects"); | |
193 } | |
194 if (after_obj->IsFreeListElement()) { | |
Ivan Posva
2016/05/16 20:58:59
You should be able to drop this. If you ever get a
Cutch
2016/05/17 18:03:51
Done.
| |
195 // The Smalltalk become does allow this, and for very special cases | |
196 // it is important (shape changes to Class or Mixin), but as these | |
197 // cases do not arise in Dart, better to prohibit it. | |
198 FATAL("become: No indirect chains of forwarding"); | |
199 } | |
200 | |
201 ForwardObjectTo(before_obj, after_obj); | |
202 } | |
203 | |
204 { | |
205 // Follow forwarding pointers. | |
206 | |
207 // C++ pointers | |
208 ForwardPointersVisitor pointer_visitor(isolate); | |
209 isolate->VisitObjectPointers(&pointer_visitor, true); | |
210 | |
211 // Weak persistent handles. | |
212 ForwardHeapPointersHandleVisitor handle_visitor; | |
213 isolate->VisitWeakPersistentHandles(&handle_visitor); | |
214 | |
215 // Heap pointers (may require updating the remembered set) | |
216 ForwardHeapPointersVisitor object_visitor(&pointer_visitor); | |
217 heap->VisitObjects(&object_visitor); | |
218 pointer_visitor.VisitingObject(NULL); | |
219 | |
220 TIR_Print("Performed %" Pd " heap and %" Pd " handle replacements\n", | |
221 pointer_visitor.count(), | |
222 handle_visitor.count()); | |
223 } | |
224 | |
225 #if defined(DEBUG) | |
226 for (intptr_t i = 0; i < before.Length(); i++) { | |
227 ASSERT(before.At(i) == after.At(i)); | |
228 } | |
229 | |
230 { | |
231 // There should be no pointers to forwarding corpses. | |
232 NoFreeListTargetsVisitor visitor(isolate); | |
233 isolate->VisitObjectPointers(&visitor, true); | |
234 heap->VisitObjectPointers(&visitor); | |
235 } | |
236 #endif | |
237 } | |
238 | |
239 } // namespace dart | |
OLD | NEW |