diff options
Diffstat (limited to 'gdb/python/py-infevents.c')
-rw-r--r-- | gdb/python/py-infevents.c | 263 |
1 files changed, 263 insertions, 0 deletions
diff --git a/gdb/python/py-infevents.c b/gdb/python/py-infevents.c new file mode 100644 index 0000000..beb0598 --- /dev/null +++ b/gdb/python/py-infevents.c @@ -0,0 +1,263 @@ +/* Python interface to inferior function events. + + Copyright (C) 2013, 2014 Free Software Foundation, Inc. + + This file is part of GDB. + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 3 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program. If not, see <http://www.gnu.org/licenses/>. */ + +#include "defs.h" +#include "py-event.h" + +static PyTypeObject inferior_call_pre_event_object_type + CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF ("event_object"); +static PyTypeObject inferior_call_post_event_object_type + CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF ("event_object"); +static PyTypeObject register_changed_event_object_type + CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF ("event_object"); +static PyTypeObject memory_changed_event_object_type + CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF ("event_object"); + +/* Construct either a gdb.InferiorCallPreEvent or a + gdb.InferiorCallPostEvent. */ + +static PyObject * +create_inferior_call_event_object (inferior_call_kind flag, ptid_t ptid, + CORE_ADDR addr) +{ + int pid; + long tid, lwp; + PyObject *event; + PyObject *ptid_obj = NULL; + PyObject *addr_obj = NULL; + int failed; + struct cleanup *cleanups; + struct cleanup *member_cleanups; + + switch (flag) + { + case INFERIOR_CALL_PRE: + event = create_event_object (&inferior_call_pre_event_object_type); + break; + case INFERIOR_CALL_POST: + event = create_event_object (&inferior_call_post_event_object_type); + break; + default: + return NULL; + } + + cleanups = make_cleanup_py_decref (event); + + ptid_obj = gdbpy_create_ptid_object (ptid); + if (ptid_obj == NULL) + goto fail; + member_cleanups = make_cleanup_py_decref (ptid_obj); + + failed = evpy_add_attribute (event, "ptid", ptid_obj) < 0; + if (failed) + goto fail; + + addr_obj = PyLong_FromLongLong (addr); + if (addr_obj == NULL) + goto fail; + make_cleanup_py_decref (addr_obj); + + failed = evpy_add_attribute (event, "address", addr_obj) < 0; + if (failed) + goto fail; + + do_cleanups (member_cleanups); + discard_cleanups (cleanups); + return event; + + fail: + do_cleanups (cleanups); + return NULL; +} + +/* Construct a gdb.RegisterChangedEvent containing the affected + register number. */ + +static PyObject * +create_register_changed_event_object (struct frame_info *frame, + int regnum) +{ + PyObject *event; + PyObject *frame_obj = NULL; + PyObject *regnum_obj = NULL; + int failed; + struct cleanup *cleanups; + struct cleanup *member_cleanups; + + event = create_event_object (®ister_changed_event_object_type); + if (event == NULL) + return NULL; + + cleanups = make_cleanup_py_decref (event); + + frame_obj = frame_info_to_frame_object (frame); + if (frame_obj == NULL) + goto fail; + member_cleanups = make_cleanup_py_decref (frame_obj); + + failed = evpy_add_attribute (event, "frame", frame_obj) < 0; + if (failed) + goto fail; + + regnum_obj = PyLong_FromLongLong (regnum); + if (regnum_obj == NULL) + goto fail; + make_cleanup_py_decref (regnum_obj); + + failed = evpy_add_attribute (event, "regnum", regnum_obj) < 0; + if (failed) + goto fail; + + do_cleanups (member_cleanups); + discard_cleanups (cleanups); + return event; + + fail: + do_cleanups (cleanups); + return NULL; +} + +/* Construct a gdb.MemoryChangedEvent describing the extent of the + affected memory. */ + +static PyObject * +create_memory_changed_event_object (CORE_ADDR addr, ssize_t len) +{ + PyObject *event; + PyObject *addr_obj = NULL; + PyObject *len_obj = NULL; + int failed; + struct cleanup *cleanups; + struct cleanup *member_cleanups; + + event = create_event_object (&memory_changed_event_object_type); + + if (event == NULL) + return NULL; + cleanups = make_cleanup_py_decref (event); + + addr_obj = PyLong_FromLongLong (addr); + if (addr_obj == NULL) + goto fail; + member_cleanups = make_cleanup_py_decref (addr_obj); + + failed = evpy_add_attribute (event, "address", addr_obj) < 0; + if (failed) + goto fail; + + len_obj = PyLong_FromLong (len); + if (len_obj == NULL) + goto fail; + make_cleanup_py_decref (len_obj); + + failed = evpy_add_attribute (event, "length", len_obj) < 0; + if (failed) + goto fail; + + do_cleanups (member_cleanups); + discard_cleanups (cleanups); + return event; + + fail: + do_cleanups (cleanups); + return NULL; +} + +/* Callback function which notifies observers when an event occurs which + calls a function in the inferior. + This function will create a new Python inferior-call event object. + Return -1 if emit fails. */ + +int +emit_inferior_call_event (inferior_call_kind flag, ptid_t thread, + CORE_ADDR addr) +{ + PyObject *event; + + if (evregpy_no_listeners_p (gdb_py_events.inferior_call)) + return 0; + + event = create_inferior_call_event_object (flag, thread, addr); + if (event != NULL) + return evpy_emit_event (event, gdb_py_events.inferior_call); + return -1; +} + +/* Callback when memory is modified by the user. This function will + create a new Python memory changed event object. */ + +int +emit_memory_changed_event (CORE_ADDR addr, ssize_t len) +{ + PyObject *event; + + if (evregpy_no_listeners_p (gdb_py_events.memory_changed)) + return 0; + + event = create_memory_changed_event_object (addr, len); + if (event != NULL) + return evpy_emit_event (event, gdb_py_events.memory_changed); + return -1; +} + +/* Callback when a register is modified by the user. This function + will create a new Python register changed event object. */ + +int +emit_register_changed_event (struct frame_info* frame, int regnum) +{ + PyObject *event; + + if (evregpy_no_listeners_p (gdb_py_events.register_changed)) + return 0; + + event = create_register_changed_event_object (frame, regnum); + if (event != NULL) + return evpy_emit_event (event, gdb_py_events.register_changed); + return -1; +} + + +GDBPY_NEW_EVENT_TYPE (inferior_call_pre, + "gdb.InferiorCallPreEvent", + "InferiorCallPreEvent", + "GDB inferior function pre-call event object", + event_object_type, + static); + +GDBPY_NEW_EVENT_TYPE (inferior_call_post, + "gdb.InferiorCallPostEvent", + "InferiorCallPostEvent", + "GDB inferior function post-call event object", + event_object_type, + static); + +GDBPY_NEW_EVENT_TYPE (register_changed, + "gdb.RegisterChangedEvent", + "RegisterChangedEvent", + "GDB register change event object", + event_object_type, + static); + +GDBPY_NEW_EVENT_TYPE (memory_changed, + "gdb.MemoryChangedEvent", + "MemoryChangedEvent", + "GDB memory change event object", + event_object_type, + static); |