aboutsummaryrefslogtreecommitdiff
path: root/libjava/gnu/gcj
diff options
context:
space:
mode:
authorKeith Seitz <keiths@redhat.com>2006-10-28 18:36:16 +0000
committerKeith Seitz <kseitz@gcc.gnu.org>2006-10-28 18:36:16 +0000
commit67ce74926a1ca6d3711af868d3b48cf4022de498 (patch)
tree85d1c21742147fab25bce911f97f22afe25c6b61 /libjava/gnu/gcj
parent22ba88ef4b11703fc7a0bfacaae08f411570d48f (diff)
downloadgcc-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.java57
-rw-r--r--libjava/gnu/gcj/jvmti/natBreakpoint.cc57
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));
+}