diff options
author | Keith Seitz <keiths@redhat.com> | 2006-10-28 18:36:16 +0000 |
---|---|---|
committer | Keith Seitz <kseitz@gcc.gnu.org> | 2006-10-28 18:36:16 +0000 |
commit | 67ce74926a1ca6d3711af868d3b48cf4022de498 (patch) | |
tree | 85d1c21742147fab25bce911f97f22afe25c6b61 /libjava/gnu/gcj | |
parent | 22ba88ef4b11703fc7a0bfacaae08f411570d48f (diff) | |
download | gcc-67ce74926a1ca6d3711af868d3b48cf4022de498.zip gcc-67ce74926a1ca6d3711af868d3b48cf4022de498.tar.gz gcc-67ce74926a1ca6d3711af868d3b48cf4022de498.tar.bz2 |
Makefile.am (nat_source_files): Add natBreakpoint.cc.
* Makefile.am (nat_source_files): Add natBreakpoint.cc.
* sources.am: Regenerated.
* Makefile.in: Regenerated.
* gnu/gcj/jvmti/Breakpoint.java: New file.
* gnu/gcj/jvmti/natBreakpoint.java: New file.
From-SVN: r118108
Diffstat (limited to 'libjava/gnu/gcj')
-rw-r--r-- | libjava/gnu/gcj/jvmti/Breakpoint.java | 57 | ||||
-rw-r--r-- | libjava/gnu/gcj/jvmti/natBreakpoint.cc | 57 |
2 files changed, 114 insertions, 0 deletions
diff --git a/libjava/gnu/gcj/jvmti/Breakpoint.java b/libjava/gnu/gcj/jvmti/Breakpoint.java new file mode 100644 index 0000000..2d8fe1b --- /dev/null +++ b/libjava/gnu/gcj/jvmti/Breakpoint.java @@ -0,0 +1,57 @@ +// Breakpoint.java - a breakpoint in the interpreter + +/* Copyright (C) 2006 Free Software Foundation + + This file is part of libgcj. + +This software is copyrighted work licensed under the terms of the +Libgcj License. Please consult the file "LIBGCJ_LICENSE" for +details. */ + +package gnu.gcj.jvmti; + +import gnu.gcj.RawDataManaged; + +/** + * Class representing a Breakpoint. + * + * @author Keith Seitz (keiths@redhat.com) + */ +public class Breakpoint +{ + // Location of this breakpoint + private long method; + private long location; + + // The original instruction that this breakpoint replaced + private RawDataManaged data; + + /** + * Constructs a new Breakpoint. SetBreakpoint will verify the + * validity of the arguments. + * + * @param method the method (a jmethodID) + * @param location the jlocation of the breakpoint (a jlocation) + */ + public Breakpoint (long method, long location) + { + this.method = method; + this.location = location; + initialize_native (); + } + + private native void initialize_native (); + + public native void install (); + + public native void remove (); + + /** + * Returns the original instruction at the location where + * this breakpoint was set + */ + public RawDataManaged getInsn () + { + return data; + } +} diff --git a/libjava/gnu/gcj/jvmti/natBreakpoint.cc b/libjava/gnu/gcj/jvmti/natBreakpoint.cc new file mode 100644 index 0000000..ab9de41 --- /dev/null +++ b/libjava/gnu/gcj/jvmti/natBreakpoint.cc @@ -0,0 +1,57 @@ +// natBreakpoint.cc - C++ side of Breakpoint + +/* Copyright (C) 2006 Free Software Foundation + + This file is part of libgcj. + +This software is copyrighted work licensed under the terms of the +Libgcj License. Please consult the file "LIBGCJ_LICENSE" for +details. */ + +#include <config.h> +#include <gcj/cni.h> +#include <gcj/method.h> +#include <java-interp.h> +#include <java-insns.h> +#include <java-assert.h> +#include <jvmti.h> + +#include <gnu/gcj/jvmti/Breakpoint.h> + +static _Jv_InterpMethod * +get_interp_method (jlong method) +{ + jmethodID id = reinterpret_cast<jmethodID> (method); + jclass klass = _Jv_GetMethodDeclaringClass (id); + JvAssert (_Jv_IsInterpretedClass (klass)); + _Jv_MethodBase *base + = _Jv_FindInterpreterMethod (klass, id); + JvAssert (base != NULL); + return reinterpret_cast<_Jv_InterpMethod *> (base); +} + +void +gnu::gcj::jvmti::Breakpoint::initialize_native () +{ + _Jv_InterpMethod *imeth = get_interp_method (method); + + // copy contents of insn at location into data + pc_t code = imeth->get_insn (location); + data = (RawDataManaged *) JvAllocBytes (sizeof (*code)); + memcpy (data, code, sizeof (*code)); + install (); +} + +void +gnu::gcj::jvmti::Breakpoint::install () +{ + _Jv_InterpMethod *imeth = get_interp_method (method); + imeth->install_break (location); +} + +void +gnu::gcj::jvmti::Breakpoint::remove () +{ + _Jv_InterpMethod *imeth = get_interp_method (method); + imeth->set_insn (location, reinterpret_cast<pc_t> (data)); +} |