summaryrefslogtreecommitdiffstats
path: root/libjava/gnu/gcj/jvmti/natBreakpoint.cc
blob: ab9de417bb8c1c3705af0176d5f61c438f9dbf24 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
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));
}
OpenPOWER on IntegriCloud