1 /* Python interface to inferior events.
3 Copyright (C) 2009-2013 Free Software Foundation, Inc.
5 This file is part of GDB.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>. */
24 evpy_dealloc (PyObject *self)
26 Py_XDECREF (((event_object *) self)->dict);
27 Py_TYPE (self)->tp_free (self);
31 create_event_object (PyTypeObject *py_type)
33 event_object *event_obj;
35 event_obj = PyObject_New (event_object, py_type);
39 event_obj->dict = PyDict_New ();
43 return (PyObject*) event_obj;
46 Py_XDECREF (event_obj);
50 /* Add the attribute ATTR to the event object EVENT. In
51 python this attribute will be accessible by the name NAME.
52 returns 0 if the operation succeeds and -1 otherwise. This
53 function acquires a new reference to ATTR. */
56 evpy_add_attribute (PyObject *event, char *name, PyObject *attr)
58 return PyObject_SetAttrString (event, name, attr);
61 /* Initialize the Python event code. */
64 gdbpy_initialize_event (void)
66 gdbpy_initialize_event_generic (&event_object_type,
70 /* Initialize the given event type. If BASE is not NULL it will
71 be set as the types base.
72 Returns 0 if initialization was successful -1 otherwise. */
75 gdbpy_initialize_event_generic (PyTypeObject *type,
78 if (PyType_Ready (type) < 0)
82 if (PyModule_AddObject (gdb_module, name, (PyObject *) type) < 0)
93 /* Notify the list of listens that the given EVENT has occurred.
94 returns 0 if emit is successful -1 otherwise. */
97 evpy_emit_event (PyObject *event,
98 eventregistry_object *registry)
100 PyObject *callback_list_copy = NULL;
103 /* Create a copy of call back list and use that for
104 notifying listeners to avoid skipping callbacks
105 in the case of a callback being disconnected during
107 callback_list_copy = PySequence_List (registry->callbacks);
108 if (!callback_list_copy)
111 for (i = 0; i < PyList_Size (callback_list_copy); i++)
113 PyObject *func = PyList_GetItem (callback_list_copy, i);
114 PyObject *func_result;
119 func_result = PyObject_CallFunctionObjArgs (func, event, NULL);
121 if (func_result == NULL)
123 /* Print the trace here, but keep going -- we want to try to
124 call all of the callbacks even if one is broken. */
125 gdbpy_print_stack ();
129 Py_DECREF (func_result);
133 Py_XDECREF (callback_list_copy);
138 gdbpy_print_stack ();
139 Py_XDECREF (callback_list_copy);
144 static PyGetSetDef event_object_getset[] =
146 { "__dict__", gdb_py_generic_dict, NULL,
147 "The __dict__ for this event.", &event_object_type },
151 PyTypeObject event_object_type =
153 PyVarObject_HEAD_INIT (NULL, 0)
154 "gdb.Event", /* tp_name */
155 sizeof (event_object), /* tp_basicsize */
157 evpy_dealloc, /* tp_dealloc */
163 0, /* tp_as_number */
164 0, /* tp_as_sequence */
165 0, /* tp_as_mapping */
171 0, /* tp_as_buffer */
172 Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE, /* tp_flags */
173 "GDB event object", /* tp_doc */
176 0, /* tp_richcompare */
177 0, /* tp_weaklistoffset */
182 event_object_getset, /* tp_getset */
185 0, /* tp_descr_get */
186 0, /* tp_descr_set */
187 offsetof (event_object, dict), /* tp_dictoffset */