260 lines
8.4 KiB
C++
260 lines
8.4 KiB
C++
|
/*
|
||
|
* Copyright (c) 1999, 2007, Oracle and/or its affiliates. All rights reserved.
|
||
|
* Copyright 2008, 2009 Red Hat, Inc.
|
||
|
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
||
|
*
|
||
|
* This code is free software; you can redistribute it and/or modify it
|
||
|
* under the terms of the GNU General Public License version 2 only, as
|
||
|
* published by the Free Software Foundation.
|
||
|
*
|
||
|
* This code is distributed in the hope that it will be useful, but WITHOUT
|
||
|
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
||
|
* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
||
|
* version 2 for more details (a copy is included in the LICENSE file that
|
||
|
* accompanied this code).
|
||
|
*
|
||
|
* You should have received a copy of the GNU General Public License version
|
||
|
* 2 along with this work; if not, write to the Free Software Foundation,
|
||
|
* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
|
||
|
*
|
||
|
* Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
|
||
|
* or visit www.oracle.com if you need additional information or have any
|
||
|
* questions.
|
||
|
*
|
||
|
*/
|
||
|
|
||
|
#include "incls/_precompiled.incl"
|
||
|
#include "incls/_sharkCacheDecache.cpp.incl"
|
||
|
|
||
|
using namespace llvm;
|
||
|
|
||
|
void SharkDecacher::start_frame() {
|
||
|
// Start recording the debug information
|
||
|
_pc_offset = code_buffer()->create_unique_offset();
|
||
|
_oopmap = new OopMap(
|
||
|
oopmap_slot_munge(stack()->oopmap_frame_size()),
|
||
|
oopmap_slot_munge(arg_size()));
|
||
|
debug_info()->add_safepoint(pc_offset(), oopmap());
|
||
|
}
|
||
|
|
||
|
void SharkDecacher::start_stack(int stack_depth) {
|
||
|
// Create the array we'll record our stack slots in
|
||
|
_exparray = new GrowableArray<ScopeValue*>(stack_depth);
|
||
|
|
||
|
// Set the stack pointer
|
||
|
stack()->CreateStoreStackPointer(
|
||
|
builder()->CreatePtrToInt(
|
||
|
stack()->slot_addr(
|
||
|
stack()->stack_slots_offset() + max_stack() - stack_depth),
|
||
|
SharkType::intptr_type()));
|
||
|
}
|
||
|
|
||
|
void SharkDecacher::process_stack_slot(int index,
|
||
|
SharkValue** addr,
|
||
|
int offset) {
|
||
|
SharkValue *value = *addr;
|
||
|
|
||
|
// Write the value to the frame if necessary
|
||
|
if (stack_slot_needs_write(index, value)) {
|
||
|
write_value_to_frame(
|
||
|
SharkType::to_stackType(value->basic_type()),
|
||
|
value->generic_value(),
|
||
|
adjusted_offset(value, offset));
|
||
|
}
|
||
|
|
||
|
// Record the value in the oopmap if necessary
|
||
|
if (stack_slot_needs_oopmap(index, value)) {
|
||
|
oopmap()->set_oop(slot2reg(offset));
|
||
|
}
|
||
|
|
||
|
// Record the value in the debuginfo if necessary
|
||
|
if (stack_slot_needs_debuginfo(index, value)) {
|
||
|
exparray()->append(slot2lv(offset, stack_location_type(index, addr)));
|
||
|
}
|
||
|
}
|
||
|
|
||
|
void SharkDecacher::start_monitors(int num_monitors) {
|
||
|
// Create the array we'll record our monitors in
|
||
|
_monarray = new GrowableArray<MonitorValue*>(num_monitors);
|
||
|
}
|
||
|
|
||
|
void SharkDecacher::process_monitor(int index, int box_offset, int obj_offset) {
|
||
|
oopmap()->set_oop(slot2reg(obj_offset));
|
||
|
|
||
|
monarray()->append(new MonitorValue(
|
||
|
slot2lv (obj_offset, Location::oop),
|
||
|
slot2loc(box_offset, Location::normal)));
|
||
|
}
|
||
|
|
||
|
void SharkDecacher::process_oop_tmp_slot(Value** value, int offset) {
|
||
|
// Decache the temporary oop slot
|
||
|
if (*value) {
|
||
|
write_value_to_frame(
|
||
|
SharkType::oop_type(),
|
||
|
*value,
|
||
|
offset);
|
||
|
|
||
|
oopmap()->set_oop(slot2reg(offset));
|
||
|
}
|
||
|
}
|
||
|
|
||
|
void SharkDecacher::process_method_slot(Value** value, int offset) {
|
||
|
// Decache the method pointer
|
||
|
write_value_to_frame(
|
||
|
SharkType::methodOop_type(),
|
||
|
*value,
|
||
|
offset);
|
||
|
|
||
|
oopmap()->set_oop(slot2reg(offset));
|
||
|
}
|
||
|
|
||
|
void SharkDecacher::process_pc_slot(int offset) {
|
||
|
// Record the PC
|
||
|
builder()->CreateStore(
|
||
|
builder()->code_buffer_address(pc_offset()),
|
||
|
stack()->slot_addr(offset));
|
||
|
}
|
||
|
|
||
|
void SharkDecacher::start_locals() {
|
||
|
// Create the array we'll record our local variables in
|
||
|
_locarray = new GrowableArray<ScopeValue*>(max_locals());}
|
||
|
|
||
|
void SharkDecacher::process_local_slot(int index,
|
||
|
SharkValue** addr,
|
||
|
int offset) {
|
||
|
SharkValue *value = *addr;
|
||
|
|
||
|
// Write the value to the frame if necessary
|
||
|
if (local_slot_needs_write(index, value)) {
|
||
|
write_value_to_frame(
|
||
|
SharkType::to_stackType(value->basic_type()),
|
||
|
value->generic_value(),
|
||
|
adjusted_offset(value, offset));
|
||
|
}
|
||
|
|
||
|
// Record the value in the oopmap if necessary
|
||
|
if (local_slot_needs_oopmap(index, value)) {
|
||
|
oopmap()->set_oop(slot2reg(offset));
|
||
|
}
|
||
|
|
||
|
// Record the value in the debuginfo if necessary
|
||
|
if (local_slot_needs_debuginfo(index, value)) {
|
||
|
locarray()->append(slot2lv(offset, local_location_type(index, addr)));
|
||
|
}
|
||
|
}
|
||
|
|
||
|
void SharkDecacher::end_frame() {
|
||
|
// Record the scope
|
||
|
debug_info()->describe_scope(
|
||
|
pc_offset(),
|
||
|
target(),
|
||
|
bci(),
|
||
|
true,
|
||
|
false,
|
||
|
false,
|
||
|
debug_info()->create_scope_values(locarray()),
|
||
|
debug_info()->create_scope_values(exparray()),
|
||
|
debug_info()->create_monitor_values(monarray()));
|
||
|
|
||
|
// Finish recording the debug information
|
||
|
debug_info()->end_safepoint(pc_offset());
|
||
|
}
|
||
|
|
||
|
void SharkCacher::process_stack_slot(int index,
|
||
|
SharkValue** addr,
|
||
|
int offset) {
|
||
|
SharkValue *value = *addr;
|
||
|
|
||
|
// Read the value from the frame if necessary
|
||
|
if (stack_slot_needs_read(index, value)) {
|
||
|
*addr = SharkValue::create_generic(
|
||
|
value->type(),
|
||
|
read_value_from_frame(
|
||
|
SharkType::to_stackType(value->basic_type()),
|
||
|
adjusted_offset(value, offset)),
|
||
|
value->zero_checked());
|
||
|
}
|
||
|
}
|
||
|
|
||
|
void SharkOSREntryCacher::process_monitor(int index,
|
||
|
int box_offset,
|
||
|
int obj_offset) {
|
||
|
// Copy the monitor from the OSR buffer to the frame
|
||
|
int src_offset = max_locals() + index * 2;
|
||
|
builder()->CreateStore(
|
||
|
builder()->CreateLoad(
|
||
|
CreateAddressOfOSRBufEntry(src_offset, SharkType::intptr_type())),
|
||
|
stack()->slot_addr(box_offset, SharkType::intptr_type()));
|
||
|
builder()->CreateStore(
|
||
|
builder()->CreateLoad(
|
||
|
CreateAddressOfOSRBufEntry(src_offset + 1, SharkType::oop_type())),
|
||
|
stack()->slot_addr(obj_offset, SharkType::oop_type()));
|
||
|
}
|
||
|
|
||
|
void SharkCacher::process_oop_tmp_slot(Value** value, int offset) {
|
||
|
// Cache the temporary oop
|
||
|
if (*value)
|
||
|
*value = read_value_from_frame(SharkType::oop_type(), offset);
|
||
|
}
|
||
|
|
||
|
void SharkCacher::process_method_slot(Value** value, int offset) {
|
||
|
// Cache the method pointer
|
||
|
*value = read_value_from_frame(SharkType::methodOop_type(), offset);
|
||
|
}
|
||
|
|
||
|
void SharkFunctionEntryCacher::process_method_slot(Value** value, int offset) {
|
||
|
// "Cache" the method pointer
|
||
|
*value = method();
|
||
|
}
|
||
|
|
||
|
void SharkCacher::process_local_slot(int index,
|
||
|
SharkValue** addr,
|
||
|
int offset) {
|
||
|
SharkValue *value = *addr;
|
||
|
|
||
|
// Read the value from the frame if necessary
|
||
|
if (local_slot_needs_read(index, value)) {
|
||
|
*addr = SharkValue::create_generic(
|
||
|
value->type(),
|
||
|
read_value_from_frame(
|
||
|
SharkType::to_stackType(value->basic_type()),
|
||
|
adjusted_offset(value, offset)),
|
||
|
value->zero_checked());
|
||
|
}
|
||
|
}
|
||
|
|
||
|
Value* SharkOSREntryCacher::CreateAddressOfOSRBufEntry(int offset,
|
||
|
const Type* type) {
|
||
|
Value *result = builder()->CreateStructGEP(osr_buf(), offset);
|
||
|
if (type != SharkType::intptr_type())
|
||
|
result = builder()->CreateBitCast(result, PointerType::getUnqual(type));
|
||
|
return result;
|
||
|
}
|
||
|
|
||
|
void SharkOSREntryCacher::process_local_slot(int index,
|
||
|
SharkValue** addr,
|
||
|
int offset) {
|
||
|
SharkValue *value = *addr;
|
||
|
|
||
|
// Read the value from the OSR buffer if necessary
|
||
|
if (local_slot_needs_read(index, value)) {
|
||
|
*addr = SharkValue::create_generic(
|
||
|
value->type(),
|
||
|
builder()->CreateLoad(
|
||
|
CreateAddressOfOSRBufEntry(
|
||
|
adjusted_offset(value, max_locals() - 1 - index),
|
||
|
SharkType::to_stackType(value->basic_type()))),
|
||
|
value->zero_checked());
|
||
|
}
|
||
|
}
|
||
|
|
||
|
void SharkDecacher::write_value_to_frame(const Type* type,
|
||
|
Value* value,
|
||
|
int offset) {
|
||
|
builder()->CreateStore(value, stack()->slot_addr(offset, type));
|
||
|
}
|
||
|
|
||
|
Value* SharkCacher::read_value_from_frame(const Type* type, int offset) {
|
||
|
return builder()->CreateLoad(stack()->slot_addr(offset, type));
|
||
|
}
|