jboolean StepModifier::find_frame(address starting_fp, JavaFrame *frame)
{
JavaFrame caller(*frame);
caller.caller_is(caller);
while (true) {
if (caller.is_entry_frame()) {
EntryFrame e = caller.as_EntryFrame();
if (e.is_first_frame()) {
// did not find the frame
return false;
}
e.caller_is(caller);
} else if (caller.is_java_frame()) {
JavaFrame jf = caller.as_JavaFrame();
if (starting_fp == jf.fp()) {
// found the frame
return true;
}
jf.caller_is(caller);
}
}
}
ReturnOop VMEventModifier::new_modifier(PacketInputStream *in,
PacketOutputStream *out, bool& error) {
UsingFastOops fast_oops;
jbyte mod_kind = in->read_byte();
VMEventModifier::Fast newMod;
Thread::Fast thread;
newMod = allocate_modifier();
if (newMod.is_null()) {
error = true;
out->set_error(JDWP_Error_OUT_OF_MEMORY);
return NULL;
}
newMod().set_mod_kind(mod_kind);
#ifdef AZZERT
if (TraceDebugger) {
tty->print_cr("Modifier: modkind = %d", mod_kind);
}
#endif
switch(mod_kind) {
case JDWP_EventRequest_Set_Out_modifiers_Modifier_FieldOnly:
// unsupported
in->read_class_id();
in->read_class_id();
in->read_int();
return NULL;
case JDWP_EventRequest_Set_Out_modifiers_Modifier_Conditional:
// unsupported
in->read_int();
return NULL;
case JDWP_EventRequest_Set_Out_modifiers_Modifier_ClassExclude:
// unsupported
in->read_string();
return NULL;
case JDWP_EventRequest_Set_Out_modifiers_Modifier_ThreadOnly:
newMod().set_thread_id(in->read_thread_id());
return newMod;
case JDWP_EventRequest_Set_Out_modifiers_Modifier_Count:
newMod().set_count(in->read_int());
return newMod;
case JDWP_EventRequest_Set_Out_modifiers_Modifier_ClassOnly:
{
newMod().set_clazz_id(in->read_class_id());
#ifdef AZZERT
if (TraceDebugger) {
tty->print_cr("Modifier: class_id = %d", newMod().clazz_id());
}
#endif
return newMod;
}
case JDWP_EventRequest_Set_Out_modifiers_Modifier_ClassMatch:
{
UsingFastOops fast_oops_2;
int length;
SETUP_ERROR_CHECKER_ARG;
TypeArray::Fast ta = in->read_raw_string(length JVM_NO_CHECK);
if (ta.is_null()) {
// Out of memory?? Things will fall apart soon enough,
// We just punt on this modifier
return newMod;
}
for (int i = length - 1; i >= 0; i--) {
if (ta().byte_at(i) == '.') {
ta().byte_at_put(i, '/');
}
}
Symbol::Fast tmpName = Universe::new_symbol(&ta,
(utf8)(ta().base_address()), length JVM_NO_CHECK);
if (tmpName.is_null()) {
error = true;
out->set_error(JDWP_Error_OUT_OF_MEMORY);
return NULL;
}
#ifdef AZZERT
if (TraceDebugger) {
tty->print("Modifier: class match = ");
tmpName().print_symbol_on(tty);
tty->cr();
}
#endif
ClassMatchModifier::Fast class_match_modifier = newMod().obj();
class_match_modifier().set_class_match_name(&tmpName);
return newMod;
}
case JDWP_EventRequest_Set_Out_modifiers_Modifier_LocationOnly:
{
UsingFastOops fast_oops_3;
jbyte tag = in->read_byte(); (void)tag;
LocationModifier::Fast lmod = newMod.obj();
lmod().set_clazz_id(in->read_class_id());
if (lmod().clazz_id() == 0) {
return NULL; /* Class ID == 0 is invalid */
}
lmod().set_method_id(in->read_method_id());
lmod().set_offset(in->read_long());
#ifdef AZZERT
if (TraceDebugger) {
tty->print_cr("Loc: class: 0x%x, method: 0x%x, off: 0x%x",
lmod().clazz_id(),
(int)(lmod().method_id() & 0xFFFFFFFF),
lmod().offset());
}
#endif
return lmod;
}
case JDWP_EventRequest_Set_Out_modifiers_Modifier_ExceptionOnly:
{
UsingFastOops fast_oops_4;
ExceptionModifier::Fast emod = newMod.obj();
emod().set_clazz_id(in->read_class_id());
emod().set_sig_caught(in->read_boolean());
emod().set_sig_uncaught(in->read_boolean());
return emod;
}
case JDWP_EventRequest_Set_Out_modifiers_Modifier_Step:
{
UsingFastOops fast_oops_5;
int thread_id = in->read_thread_id();
thread = JavaDebugger::get_thread_by_id(thread_id);
if (!JavaDebugger::is_valid_thread(&thread) ||
!thread().last_java_frame_exists()) {
error = true;
out->set_error(JDWP_Error_INVALID_THREAD);
return NULL;
}
Frame fr(&thread);
GUARANTEE(fr.is_java_frame(), "Single step must start at JavaFrame");
JavaFrame jf = fr.as_JavaFrame();
LocationModifier::Fast loc = LocationModifier::new_location(&jf);
if (loc.is_null()) {
error = true;
out->set_error(JDWP_Error_OUT_OF_MEMORY);
return NULL;
}
#ifdef AZZERT
if (TraceDebugger) {
tty->print_cr("StepLoc: thread: 0x%x, class: 0x%x, method: 0x%x, off: 0x%x",
thread_id, loc().clazz_id(),
(int)(loc().method_id() & 0xFFFFFFFF),
loc().offset());
}
#endif
loc().set_mod_kind(mod_kind);
StepModifier::Fast smod = loc.obj();
smod().set_thread_id(thread_id);
if (thread.is_null() /* || (thread.state() & THREAD_DEAD) */) {
/*
* If you try to single step after suspending because
* of an uncaught exception event we'll get sent the
* thread id of the thread that had the exception.
* That thread is dead though.
*/
error = true;
out->set_error(JDWP_Error_INVALID_THREAD);
return NULL;
}
smod().set_step_size(in->read_int());
smod().set_step_depth(in->read_int());
/* query the _proxy_ for next line location */
{
UsingFastOops fast_oops_6;
DebuggerEvent d_event;
d_event.set_event_kind((jbyte)VM_STEPINFO_EVENT);
VMEvent::stepping_info_request(&d_event, in->transport(),
&smod);
/*
* At this point, the proxy has made sure no more commands
* from the debugger get sent until we get our line number
* info from the proxy
*/
JavaDebugger::set_loop_count(1);
JavaDebugger::process_command_loop();
/*
* Once we get back here, then we know we've gotten the
* command from the proxy with the line number info put into
* the StepModifier object in the step_info_event above.
*/
/* setup the relevant info */
thread().set_is_stepping(true);
// set the _debugger_active flag for the interpreter loop
JavaDebugger::set_stepping(true);
// smod = step_info_event().mods();
// smod().set_step_target_offset(stepData().step_target_offset());
smod().unlink_method();
if (smod().step_depth() == JDWP_StepDepth_OUT) {
// if stepping out to the caller, we really should unlink any
// compiled code from here to the caller frame, for now assume
// one frame up. It could be re-compiled but we may luck out.
Method::Fast m;
Frame caller(jf);
jf.caller_is(caller);
if (!caller.is_entry_frame()) {
m = caller.as_JavaFrame().method();
#if ENABLE_COMPILER
if (m().has_compiled_code()) {
m().unlink_compiled_code();
}
#endif
}
}
smod().set_step_starting_fp(DISTANCE(thread().stack_base(), jf.fp()));
smod().set_step_starting_offset(jf.bci());
// smod().set_dup_current_line_offset(stepData().dup_current_line_offset());
// smod().set_post_dup_line_offset(stepData().post_dup_line_offset());
thread().set_step_info(&smod);
}
return smod;
}
}
error = true;
out->set_error(JDWP_Error_NOT_IMPLEMENTED);
return NULL;
}