xref: /netbsd-src/external/gpl3/gdb.old/dist/gdb/python/py-threadevent.c (revision bdc22b2e01993381dcefeff2bc9b56ca75a4235c)
1 /* Copyright (C) 2009-2016 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 #include "infrun.h"
21 
22 /* thread events can either be thread specific or process wide.  If gdb is
23    running in non-stop mode then the event is thread specific, otherwise
24    it is process wide.
25    This function returns the currently stopped thread in non-stop mode and
26    Py_None otherwise.  In each case it returns a borrowed reference.  */
27 
28 static PyObject *get_event_thread (void)
29   CPYCHECKER_RETURNS_BORROWED_REF;
30 
31 static PyObject *
32 get_event_thread (void)
33 {
34   PyObject *thread = NULL;
35 
36   if (non_stop)
37     thread = (PyObject *) find_thread_object (inferior_ptid);
38   else
39     thread = Py_None;
40 
41   if (!thread)
42     {
43       PyErr_SetString (PyExc_RuntimeError, "Could not find event thread");
44       return NULL;
45     }
46 
47   return thread;
48 }
49 
50 PyObject *
51 create_thread_event_object (PyTypeObject *py_type)
52 {
53   PyObject *thread = NULL;
54   PyObject *thread_event_obj = NULL;
55 
56   thread_event_obj = create_event_object (py_type);
57   if (!thread_event_obj)
58     goto fail;
59 
60   thread = get_event_thread ();
61   if (!thread)
62     goto fail;
63 
64   if (evpy_add_attribute (thread_event_obj,
65                           "inferior_thread",
66                           thread) < 0)
67     goto fail;
68 
69   return thread_event_obj;
70 
71   fail:
72    Py_XDECREF (thread_event_obj);
73    return NULL;
74 }
75 
76 GDBPY_NEW_EVENT_TYPE (thread,
77                       "gdb.ThreadEvent",
78                       "ThreadEvent",
79                       "GDB thread event object",
80                       event_object_type);
81