1 /* Copyright (C) 2009-2013 Free Software Foundation, Inc. 2 3 This file is part of GDB. 4 5 This program is free software; you can redistribute it and/or modify 6 it under the terms of the GNU General Public License as published by 7 the Free Software Foundation; either version 3 of the License, or 8 (at your option) any later version. 9 10 This program is distributed in the hope that it will be useful, 11 but WITHOUT ANY WARRANTY; without even the implied warranty of 12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13 GNU General Public License for more details. 14 15 You should have received a copy of the GNU General Public License 16 along with this program. If not, see <http://www.gnu.org/licenses/>. */ 17 18 #include "defs.h" 19 #include "py-event.h" 20 21 /* thread events can either be thread specific or process wide. If gdb is 22 running in non-stop mode then the event is thread specific, otherwise 23 it is process wide. 24 This function returns the currently stopped thread in non-stop mode and 25 Py_None otherwise. In each case it returns a borrowed reference. */ 26 27 static PyObject * 28 get_event_thread (void) 29 { 30 PyObject *thread = NULL; 31 32 if (non_stop) 33 thread = (PyObject *) find_thread_object (inferior_ptid); 34 else 35 thread = Py_None; 36 37 if (!thread) 38 { 39 PyErr_SetString (PyExc_RuntimeError, "Could not find event thread"); 40 return NULL; 41 } 42 43 return thread; 44 } 45 46 PyObject * 47 create_thread_event_object (PyTypeObject *py_type) 48 { 49 PyObject *thread = NULL; 50 PyObject *thread_event_obj = NULL; 51 52 thread_event_obj = create_event_object (py_type); 53 if (!thread_event_obj) 54 goto fail; 55 56 thread = get_event_thread (); 57 if (!thread) 58 goto fail; 59 60 if (evpy_add_attribute (thread_event_obj, 61 "inferior_thread", 62 thread) < 0) 63 goto fail; 64 65 return thread_event_obj; 66 67 fail: 68 Py_XDECREF (thread_event_obj); 69 return NULL; 70 } 71 72 GDBPY_NEW_EVENT_TYPE (thread, 73 "gdb.ThreadEvent", 74 "ThreadEvent", 75 "GDB thread event object", 76 event_object_type, 77 /*no qual*/); 78