|
1692
|
1 /*
|
|
|
2 * Copyright (c) 1999, 2007, Oracle and/or its affiliates. All rights reserved.
|
|
|
3 * Copyright 2008, 2009 Red Hat, Inc.
|
|
|
4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
|
5 *
|
|
|
6 * This code is free software; you can redistribute it and/or modify it
|
|
|
7 * under the terms of the GNU General Public License version 2 only, as
|
|
|
8 * published by the Free Software Foundation.
|
|
|
9 *
|
|
|
10 * This code is distributed in the hope that it will be useful, but WITHOUT
|
|
|
11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
|
12 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
|
13 * version 2 for more details (a copy is included in the LICENSE file that
|
|
|
14 * accompanied this code).
|
|
|
15 *
|
|
|
16 * You should have received a copy of the GNU General Public License version
|
|
|
17 * 2 along with this work; if not, write to the Free Software Foundation,
|
|
|
18 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
|
19 *
|
|
|
20 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
|
|
|
21 * or visit www.oracle.com if you need additional information or have any
|
|
|
22 * questions.
|
|
|
23 *
|
|
|
24 */
|
|
|
25
|
|
|
26 #include "incls/_precompiled.incl"
|
|
|
27 #include "incls/_sharkCacheDecache.cpp.incl"
|
|
|
28
|
|
|
29 using namespace llvm;
|
|
|
30
|
|
|
31 void SharkDecacher::start_frame() {
|
|
|
32 // Start recording the debug information
|
|
|
33 _pc_offset = code_buffer()->create_unique_offset();
|
|
|
34 _oopmap = new OopMap(
|
|
|
35 oopmap_slot_munge(stack()->oopmap_frame_size()),
|
|
|
36 oopmap_slot_munge(arg_size()));
|
|
|
37 debug_info()->add_safepoint(pc_offset(), oopmap());
|
|
|
38 }
|
|
|
39
|
|
|
40 void SharkDecacher::start_stack(int stack_depth) {
|
|
|
41 // Create the array we'll record our stack slots in
|
|
|
42 _exparray = new GrowableArray<ScopeValue*>(stack_depth);
|
|
|
43
|
|
|
44 // Set the stack pointer
|
|
|
45 stack()->CreateStoreStackPointer(
|
|
|
46 builder()->CreatePtrToInt(
|
|
|
47 stack()->slot_addr(
|
|
|
48 stack()->stack_slots_offset() + max_stack() - stack_depth),
|
|
|
49 SharkType::intptr_type()));
|
|
|
50 }
|
|
|
51
|
|
|
52 void SharkDecacher::process_stack_slot(int index,
|
|
|
53 SharkValue** addr,
|
|
|
54 int offset) {
|
|
|
55 SharkValue *value = *addr;
|
|
|
56
|
|
|
57 // Write the value to the frame if necessary
|
|
|
58 if (stack_slot_needs_write(index, value)) {
|
|
|
59 write_value_to_frame(
|
|
|
60 SharkType::to_stackType(value->basic_type()),
|
|
|
61 value->generic_value(),
|
|
|
62 adjusted_offset(value, offset));
|
|
|
63 }
|
|
|
64
|
|
|
65 // Record the value in the oopmap if necessary
|
|
|
66 if (stack_slot_needs_oopmap(index, value)) {
|
|
|
67 oopmap()->set_oop(slot2reg(offset));
|
|
|
68 }
|
|
|
69
|
|
|
70 // Record the value in the debuginfo if necessary
|
|
|
71 if (stack_slot_needs_debuginfo(index, value)) {
|
|
|
72 exparray()->append(slot2lv(offset, stack_location_type(index, addr)));
|
|
|
73 }
|
|
|
74 }
|
|
|
75
|
|
|
76 void SharkDecacher::start_monitors(int num_monitors) {
|
|
|
77 // Create the array we'll record our monitors in
|
|
|
78 _monarray = new GrowableArray<MonitorValue*>(num_monitors);
|
|
|
79 }
|
|
|
80
|
|
|
81 void SharkDecacher::process_monitor(int index, int box_offset, int obj_offset) {
|
|
|
82 oopmap()->set_oop(slot2reg(obj_offset));
|
|
|
83
|
|
|
84 monarray()->append(new MonitorValue(
|
|
|
85 slot2lv (obj_offset, Location::oop),
|
|
|
86 slot2loc(box_offset, Location::normal)));
|
|
|
87 }
|
|
|
88
|
|
|
89 void SharkDecacher::process_oop_tmp_slot(Value** value, int offset) {
|
|
|
90 // Decache the temporary oop slot
|
|
|
91 if (*value) {
|
|
|
92 write_value_to_frame(
|
|
|
93 SharkType::oop_type(),
|
|
|
94 *value,
|
|
|
95 offset);
|
|
|
96
|
|
|
97 oopmap()->set_oop(slot2reg(offset));
|
|
|
98 }
|
|
|
99 }
|
|
|
100
|
|
|
101 void SharkDecacher::process_method_slot(Value** value, int offset) {
|
|
|
102 // Decache the method pointer
|
|
|
103 write_value_to_frame(
|
|
|
104 SharkType::methodOop_type(),
|
|
|
105 *value,
|
|
|
106 offset);
|
|
|
107
|
|
|
108 oopmap()->set_oop(slot2reg(offset));
|
|
|
109 }
|
|
|
110
|
|
|
111 void SharkDecacher::process_pc_slot(int offset) {
|
|
|
112 // Record the PC
|
|
|
113 builder()->CreateStore(
|
|
|
114 builder()->code_buffer_address(pc_offset()),
|
|
|
115 stack()->slot_addr(offset));
|
|
|
116 }
|
|
|
117
|
|
|
118 void SharkDecacher::start_locals() {
|
|
|
119 // Create the array we'll record our local variables in
|
|
|
120 _locarray = new GrowableArray<ScopeValue*>(max_locals());}
|
|
|
121
|
|
|
122 void SharkDecacher::process_local_slot(int index,
|
|
|
123 SharkValue** addr,
|
|
|
124 int offset) {
|
|
|
125 SharkValue *value = *addr;
|
|
|
126
|
|
|
127 // Write the value to the frame if necessary
|
|
|
128 if (local_slot_needs_write(index, value)) {
|
|
|
129 write_value_to_frame(
|
|
|
130 SharkType::to_stackType(value->basic_type()),
|
|
|
131 value->generic_value(),
|
|
|
132 adjusted_offset(value, offset));
|
|
|
133 }
|
|
|
134
|
|
|
135 // Record the value in the oopmap if necessary
|
|
|
136 if (local_slot_needs_oopmap(index, value)) {
|
|
|
137 oopmap()->set_oop(slot2reg(offset));
|
|
|
138 }
|
|
|
139
|
|
|
140 // Record the value in the debuginfo if necessary
|
|
|
141 if (local_slot_needs_debuginfo(index, value)) {
|
|
|
142 locarray()->append(slot2lv(offset, local_location_type(index, addr)));
|
|
|
143 }
|
|
|
144 }
|
|
|
145
|
|
|
146 void SharkDecacher::end_frame() {
|
|
|
147 // Record the scope
|
|
|
148 debug_info()->describe_scope(
|
|
|
149 pc_offset(),
|
|
|
150 target(),
|
|
|
151 bci(),
|
|
|
152 true,
|
|
|
153 false,
|
|
|
154 false,
|
|
|
155 debug_info()->create_scope_values(locarray()),
|
|
|
156 debug_info()->create_scope_values(exparray()),
|
|
|
157 debug_info()->create_monitor_values(monarray()));
|
|
|
158
|
|
|
159 // Finish recording the debug information
|
|
|
160 debug_info()->end_safepoint(pc_offset());
|
|
|
161 }
|
|
|
162
|
|
|
163 void SharkCacher::process_stack_slot(int index,
|
|
|
164 SharkValue** addr,
|
|
|
165 int offset) {
|
|
|
166 SharkValue *value = *addr;
|
|
|
167
|
|
|
168 // Read the value from the frame if necessary
|
|
|
169 if (stack_slot_needs_read(index, value)) {
|
|
|
170 *addr = SharkValue::create_generic(
|
|
|
171 value->type(),
|
|
|
172 read_value_from_frame(
|
|
|
173 SharkType::to_stackType(value->basic_type()),
|
|
|
174 adjusted_offset(value, offset)),
|
|
|
175 value->zero_checked());
|
|
|
176 }
|
|
|
177 }
|
|
|
178
|
|
|
179 void SharkOSREntryCacher::process_monitor(int index,
|
|
|
180 int box_offset,
|
|
|
181 int obj_offset) {
|
|
|
182 // Copy the monitor from the OSR buffer to the frame
|
|
|
183 int src_offset = max_locals() + index * 2;
|
|
|
184 builder()->CreateStore(
|
|
|
185 builder()->CreateLoad(
|
|
|
186 CreateAddressOfOSRBufEntry(src_offset, SharkType::intptr_type())),
|
|
|
187 stack()->slot_addr(box_offset, SharkType::intptr_type()));
|
|
|
188 builder()->CreateStore(
|
|
|
189 builder()->CreateLoad(
|
|
|
190 CreateAddressOfOSRBufEntry(src_offset + 1, SharkType::oop_type())),
|
|
|
191 stack()->slot_addr(obj_offset, SharkType::oop_type()));
|
|
|
192 }
|
|
|
193
|
|
|
194 void SharkCacher::process_oop_tmp_slot(Value** value, int offset) {
|
|
|
195 // Cache the temporary oop
|
|
|
196 if (*value)
|
|
|
197 *value = read_value_from_frame(SharkType::oop_type(), offset);
|
|
|
198 }
|
|
|
199
|
|
|
200 void SharkCacher::process_method_slot(Value** value, int offset) {
|
|
|
201 // Cache the method pointer
|
|
|
202 *value = read_value_from_frame(SharkType::methodOop_type(), offset);
|
|
|
203 }
|
|
|
204
|
|
|
205 void SharkFunctionEntryCacher::process_method_slot(Value** value, int offset) {
|
|
|
206 // "Cache" the method pointer
|
|
|
207 *value = method();
|
|
|
208 }
|
|
|
209
|
|
|
210 void SharkCacher::process_local_slot(int index,
|
|
|
211 SharkValue** addr,
|
|
|
212 int offset) {
|
|
|
213 SharkValue *value = *addr;
|
|
|
214
|
|
|
215 // Read the value from the frame if necessary
|
|
|
216 if (local_slot_needs_read(index, value)) {
|
|
|
217 *addr = SharkValue::create_generic(
|
|
|
218 value->type(),
|
|
|
219 read_value_from_frame(
|
|
|
220 SharkType::to_stackType(value->basic_type()),
|
|
|
221 adjusted_offset(value, offset)),
|
|
|
222 value->zero_checked());
|
|
|
223 }
|
|
|
224 }
|
|
|
225
|
|
|
226 Value* SharkOSREntryCacher::CreateAddressOfOSRBufEntry(int offset,
|
|
|
227 const Type* type) {
|
|
|
228 Value *result = builder()->CreateStructGEP(osr_buf(), offset);
|
|
|
229 if (type != SharkType::intptr_type())
|
|
|
230 result = builder()->CreateBitCast(result, PointerType::getUnqual(type));
|
|
|
231 return result;
|
|
|
232 }
|
|
|
233
|
|
|
234 void SharkOSREntryCacher::process_local_slot(int index,
|
|
|
235 SharkValue** addr,
|
|
|
236 int offset) {
|
|
|
237 SharkValue *value = *addr;
|
|
|
238
|
|
|
239 // Read the value from the OSR buffer if necessary
|
|
|
240 if (local_slot_needs_read(index, value)) {
|
|
|
241 *addr = SharkValue::create_generic(
|
|
|
242 value->type(),
|
|
|
243 builder()->CreateLoad(
|
|
|
244 CreateAddressOfOSRBufEntry(
|
|
|
245 adjusted_offset(value, max_locals() - 1 - index),
|
|
|
246 SharkType::to_stackType(value->basic_type()))),
|
|
|
247 value->zero_checked());
|
|
|
248 }
|
|
|
249 }
|
|
|
250
|
|
|
251 void SharkDecacher::write_value_to_frame(const Type* type,
|
|
|
252 Value* value,
|
|
|
253 int offset) {
|
|
|
254 builder()->CreateStore(value, stack()->slot_addr(offset, type));
|
|
|
255 }
|
|
|
256
|
|
|
257 Value* SharkCacher::read_value_from_frame(const Type* type, int offset) {
|
|
|
258 return builder()->CreateLoad(stack()->slot_addr(offset, type));
|
|
|
259 }
|
