|  | /* Python interface to inferior thread event registries. | 
|  |  | 
|  | Copyright (C) 2009-2023 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 "command.h" | 
|  | #include "py-events.h" | 
|  |  | 
|  | events_object gdb_py_events; | 
|  |  | 
|  | extern PyTypeObject eventregistry_object_type | 
|  | CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF ("eventregistry_object"); | 
|  |  | 
|  | /* Implementation of EventRegistry.connect () -> NULL. | 
|  | Add FUNCTION to the list of listeners.  */ | 
|  |  | 
|  | static PyObject * | 
|  | evregpy_connect (PyObject *self, PyObject *function) | 
|  | { | 
|  | PyObject *func; | 
|  | PyObject *callback_list = (((eventregistry_object *) self)->callbacks); | 
|  |  | 
|  | if (!PyArg_ParseTuple (function, "O", &func)) | 
|  | return NULL; | 
|  |  | 
|  | if (!PyCallable_Check (func)) | 
|  | { | 
|  | PyErr_SetString (PyExc_RuntimeError, "Function is not callable"); | 
|  | return NULL; | 
|  | } | 
|  |  | 
|  | if (PyList_Append (callback_list, func) < 0) | 
|  | return NULL; | 
|  |  | 
|  | Py_RETURN_NONE; | 
|  | } | 
|  |  | 
|  | /* Implementation of EventRegistry.disconnect () -> NULL. | 
|  | Remove FUNCTION from the list of listeners.  */ | 
|  |  | 
|  | static PyObject * | 
|  | evregpy_disconnect (PyObject *self, PyObject *function) | 
|  | { | 
|  | PyObject *func; | 
|  | int index; | 
|  | PyObject *callback_list = (((eventregistry_object *) self)->callbacks); | 
|  |  | 
|  | if (!PyArg_ParseTuple (function, "O", &func)) | 
|  | return NULL; | 
|  |  | 
|  | index = PySequence_Index (callback_list, func); | 
|  | if (index < 0) | 
|  | Py_RETURN_NONE; | 
|  |  | 
|  | if (PySequence_DelItem (callback_list, index) < 0) | 
|  | return NULL; | 
|  |  | 
|  | Py_RETURN_NONE; | 
|  | } | 
|  |  | 
|  | /* Create a new event registry.  This function uses PyObject_New | 
|  | and therefore returns a new reference that callers must handle.  */ | 
|  |  | 
|  | eventregistry_object * | 
|  | create_eventregistry_object (void) | 
|  | { | 
|  | gdbpy_ref<eventregistry_object> | 
|  | eventregistry_obj (PyObject_New (eventregistry_object, | 
|  | &eventregistry_object_type)); | 
|  |  | 
|  | if (eventregistry_obj == NULL) | 
|  | return NULL; | 
|  |  | 
|  | eventregistry_obj->callbacks = PyList_New (0); | 
|  | if (!eventregistry_obj->callbacks) | 
|  | return NULL; | 
|  |  | 
|  | return eventregistry_obj.release (); | 
|  | } | 
|  |  | 
|  | static void | 
|  | evregpy_dealloc (PyObject *self) | 
|  | { | 
|  | Py_XDECREF (((eventregistry_object *) self)->callbacks); | 
|  | Py_TYPE (self)->tp_free (self); | 
|  | } | 
|  |  | 
|  | /* Initialize the Python event registry code.  */ | 
|  |  | 
|  | static int CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION | 
|  | gdbpy_initialize_eventregistry (void) | 
|  | { | 
|  | if (PyType_Ready (&eventregistry_object_type) < 0) | 
|  | return -1; | 
|  |  | 
|  | return gdb_pymodule_addobject (gdb_module, "EventRegistry", | 
|  | (PyObject *) &eventregistry_object_type); | 
|  | } | 
|  |  | 
|  | /* Return the number of listeners currently connected to this | 
|  | registry.  */ | 
|  |  | 
|  | bool | 
|  | evregpy_no_listeners_p (eventregistry_object *registry) | 
|  | { | 
|  | /* REGISTRY can be nullptr if gdb failed to find the data directory | 
|  | at startup.  */ | 
|  | return registry == nullptr || PyList_Size (registry->callbacks) == 0; | 
|  | } | 
|  |  | 
|  | GDBPY_INITIALIZE_FILE (gdbpy_initialize_eventregistry); | 
|  |  | 
|  | static PyMethodDef eventregistry_object_methods[] = | 
|  | { | 
|  | { "connect", evregpy_connect, METH_VARARGS, "Add function" }, | 
|  | { "disconnect", evregpy_disconnect, METH_VARARGS, "Remove function" }, | 
|  | { NULL } /* Sentinel.  */ | 
|  | }; | 
|  |  | 
|  | PyTypeObject eventregistry_object_type = | 
|  | { | 
|  | PyVarObject_HEAD_INIT (NULL, 0) | 
|  | "gdb.EventRegistry",                        /* tp_name */ | 
|  | sizeof (eventregistry_object),              /* tp_basicsize */ | 
|  | 0,                                          /* tp_itemsize */ | 
|  | evregpy_dealloc,                            /* tp_dealloc */ | 
|  | 0,                                          /* tp_print */ | 
|  | 0,                                          /* tp_getattr */ | 
|  | 0,                                          /* tp_setattr */ | 
|  | 0,                                          /* tp_compare */ | 
|  | 0,                                          /* tp_repr */ | 
|  | 0,                                          /* tp_as_number */ | 
|  | 0,                                          /* tp_as_sequence */ | 
|  | 0,                                          /* tp_as_mapping */ | 
|  | 0,                                          /* tp_hash  */ | 
|  | 0,                                          /* tp_call */ | 
|  | 0,                                          /* tp_str */ | 
|  | 0,                                          /* tp_getattro */ | 
|  | 0,                                          /* tp_setattro */ | 
|  | 0,                                          /* tp_as_buffer */ | 
|  | Py_TPFLAGS_DEFAULT,                         /* tp_flags */ | 
|  | "GDB event registry object",                /* tp_doc */ | 
|  | 0,                                          /* tp_traverse */ | 
|  | 0,                                          /* tp_clear */ | 
|  | 0,                                          /* tp_richcompare */ | 
|  | 0,                                          /* tp_weaklistoffset */ | 
|  | 0,                                          /* tp_iter */ | 
|  | 0,                                          /* tp_iternext */ | 
|  | eventregistry_object_methods,               /* tp_methods */ | 
|  | 0,                                          /* tp_members */ | 
|  | 0,                                          /* tp_getset */ | 
|  | 0,                                          /* tp_base */ | 
|  | 0,                                          /* tp_dict */ | 
|  | 0,                                          /* tp_descr_get */ | 
|  | 0,                                          /* tp_descr_set */ | 
|  | 0,                                          /* tp_dictoffset */ | 
|  | 0,                                          /* tp_init */ | 
|  | 0                                           /* tp_alloc */ | 
|  | }; |