* 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.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@118108 138bc75d-0d04-0410-961f-82ee72b054a4

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 00000000000..2d8fe1b249a
--- /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 00000000000..ab9de417bb8
--- /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));
+}