gdb/python/py-infthread.c

   1 /* Python interface to inferior threads.
   2
   3    Copyright (C) 2009, 2010, 2011 Free Software Foundation, Inc.
   4
   5    This file is part of GDB.
   6
   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.
  11
  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.
  16
  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/>.  */
  19
  20 #include "defs.h"
  21 #include "exceptions.h"
  22 #include "gdbthread.h"
  23 #include "inferior.h"
  24 #include "python-internal.h"
  25
  26 static PyTypeObject thread_object_type;
  27
  28 /* Require that INFERIOR be a valid inferior ID.  */
  29 #define THPY_REQUIRE_VALID(Thread)                              \
  30   do {                                                          \
  31     if (!Thread->thread)                                        \
  32       {                                                         \
  33         PyErr_SetString (PyExc_RuntimeError,                    \
  34                          _("Thread no longer exists."));        \
  35         return NULL;                                            \
  36       }                                                         \
  37   } while (0)
  38
  39
  40
  41 thread_object *
  42 create_thread_object (struct thread_info *tp)
  43 {
  44   thread_object *thread_obj;
  45
  46   thread_obj = PyObject_New (thread_object, &thread_object_type);
  47   if (!thread_obj)
  48     return NULL;
  49
  50   thread_obj->thread = tp;
  51   thread_obj->inf_obj = find_inferior_object (PIDGET (tp->ptid));
  52   Py_INCREF (thread_obj->inf_obj);
  53
  54   return thread_obj;
  55 }
  56
  57
  58
  59 static void
  60 thpy_dealloc (PyObject *self)
  61 {
  62   Py_DECREF (((thread_object *) self)->inf_obj);
  63   self->ob_type->tp_free (self);
  64 }
  65
  66 static PyObject *
  67 thpy_get_name (PyObject *self, void *ignore)
  68 {
  69   thread_object *thread_obj = (thread_object *) self;
  70   char *name;
  71
  72   THPY_REQUIRE_VALID (thread_obj);
  73
  74   name = thread_obj->thread->name;
  75   if (name == NULL)
  76     name = target_thread_name (thread_obj->thread);
  77
  78   if (name == NULL)
  79     Py_RETURN_NONE;
  80
  81   return PyString_FromString (name);
  82 }
  83
  84 static int
  85 thpy_set_name (PyObject *self, PyObject *newvalue, void *ignore)
  86 {
  87   thread_object *thread_obj = (thread_object *) self;
  88   char *name;
  89
  90   if (! thread_obj->thread)
  91     {
  92       PyErr_SetString (PyExc_RuntimeError, _("Thread no longer exists."));
  93       return -1;
  94     }
  95
  96   if (newvalue == NULL)
  97     {
  98       PyErr_SetString (PyExc_TypeError,
  99                        _("Cannot delete `name' attribute."));
 100       return -1;
 101     }
 102   else if (newvalue == Py_None)
 103     name = NULL;
 104   else if (! gdbpy_is_string (newvalue))
 105     {
 106       PyErr_SetString (PyExc_TypeError,
 107                        _("The value of `name' must be a string."));
 108       return -1;
 109     }
 110   else
 111     {
 112       name = python_string_to_host_string (newvalue);
 113       if (! name)
 114         return -1;
 115     }
 116
 117   xfree (thread_obj->thread->name);
 118   thread_obj->thread->name = name;
 119
 120   return 0;
 121 }
 122
 123 static PyObject *
 124 thpy_get_num (PyObject *self, void *closure)
 125 {
 126   thread_object *thread_obj = (thread_object *) self;
 127
 128   THPY_REQUIRE_VALID (thread_obj);
 129
 130   return PyLong_FromLong (thread_obj->thread->num);
 131 }
 132
 133 /* Getter for InferiorThread.ptid  -> (pid, lwp, tid).
 134    Returns a tuple with the thread's ptid components.  */
 135 static PyObject *
 136 thpy_get_ptid (PyObject *self, void *closure)
 137 {
 138   int pid;
 139   long tid, lwp;
 140   thread_object *thread_obj = (thread_object *) self;
 141   PyObject *ret;
 142
 143   THPY_REQUIRE_VALID (thread_obj);
 144
 145   ret = PyTuple_New (3);
 146   if (!ret)
 147     return NULL;
 148
 149   pid = ptid_get_pid (thread_obj->thread->ptid);
 150   lwp = ptid_get_lwp (thread_obj->thread->ptid);
 151   tid = ptid_get_tid (thread_obj->thread->ptid);
 152
 153   PyTuple_SET_ITEM (ret, 0, PyInt_FromLong (pid));
 154   PyTuple_SET_ITEM (ret, 1, PyInt_FromLong (lwp));
 155   PyTuple_SET_ITEM (ret, 2, PyInt_FromLong (tid));
 156
 157   return ret;
 158 }
 159
 160 /* Implementation of InferiorThread.switch ().
 161    Makes this the GDB selected thread.  */
 162 static PyObject *
 163 thpy_switch (PyObject *self, PyObject *args)
 164 {
 165   thread_object *thread_obj = (thread_object *) self;
 166   struct cleanup *cleanup;
 167   volatile struct gdb_exception except;
 168
 169   THPY_REQUIRE_VALID (thread_obj);
 170
 171   TRY_CATCH (except, RETURN_MASK_ALL)
 172     {
 173       switch_to_thread (thread_obj->thread->ptid);
 174     }
 175   GDB_PY_HANDLE_EXCEPTION (except);
 176
 177   Py_RETURN_NONE;
 178 }
 179
 180 /* Implementation of InferiorThread.is_stopped () -> Boolean.
 181    Return whether the thread is stopped.  */
 182 static PyObject *
 183 thpy_is_stopped (PyObject *self, PyObject *args)
 184 {
 185   thread_object *thread_obj = (thread_object *) self;
 186
 187   THPY_REQUIRE_VALID (thread_obj);
 188
 189   if (is_stopped (thread_obj->thread->ptid))
 190     Py_RETURN_TRUE;
 191
 192   Py_RETURN_FALSE;
 193 }
 194
 195 /* Implementation of InferiorThread.is_running () -> Boolean.
 196    Return whether the thread is running.  */
 197 static PyObject *
 198 thpy_is_running (PyObject *self, PyObject *args)
 199 {
 200   thread_object *thread_obj = (thread_object *) self;
 201
 202   THPY_REQUIRE_VALID (thread_obj);
 203
 204   if (is_running (thread_obj->thread->ptid))
 205     Py_RETURN_TRUE;
 206
 207   Py_RETURN_FALSE;
 208 }
 209
 210 /* Implementation of InferiorThread.is_exited () -> Boolean.
 211    Return whether the thread is exited.  */
 212 static PyObject *
 213 thpy_is_exited (PyObject *self, PyObject *args)
 214 {
 215   thread_object *thread_obj = (thread_object *) self;
 216
 217   THPY_REQUIRE_VALID (thread_obj);
 218
 219   if (is_exited (thread_obj->thread->ptid))
 220     Py_RETURN_TRUE;
 221
 222   Py_RETURN_FALSE;
 223 }
 224
 225
 226
 227 /* Implementation of gdb.selected_thread () -> gdb.InferiorThread.
 228    Returns the selected thread object.  */
 229 PyObject *
 230 gdbpy_selected_thread (PyObject *self, PyObject *args)
 231 {
 232   PyObject *thread_obj;
 233
 234   thread_obj = (PyObject *) find_thread_object (inferior_ptid);
 235   if (thread_obj)
 236     {
 237       Py_INCREF (thread_obj);
 238       return thread_obj;
 239     }
 240
 241   Py_RETURN_NONE;
 242 }
 243
 244
 245
 246 void
 247 gdbpy_initialize_thread (void)
 248 {
 249   if (PyType_Ready (&thread_object_type) < 0)
 250     return;
 251
 252   Py_INCREF (&thread_object_type);
 253   PyModule_AddObject (gdb_module, "InferiorThread",
 254                       (PyObject *) &thread_object_type);
 255 }
 256
 257
 258
 259 static PyGetSetDef thread_object_getset[] =
 260 {
 261   { "name", thpy_get_name, thpy_set_name,
 262     "The name of the thread, as set by the user or the OS.", NULL },
 263   { "num", thpy_get_num, NULL, "ID of the thread, as assigned by GDB.", NULL },
 264   { "ptid", thpy_get_ptid, NULL, "ID of the thread, as assigned by the OS.",
 265     NULL },
 266
 267   { NULL }
 268 };
 269
 270 static PyMethodDef thread_object_methods[] =
 271 {
 272   { "switch", thpy_switch, METH_NOARGS,
 273     "switch ()\n\
 274 Makes this the GDB selected thread." },
 275   { "is_stopped", thpy_is_stopped, METH_NOARGS,
 276     "is_stopped () -> Boolean\n\
 277 Return whether the thread is stopped." },
 278   { "is_running", thpy_is_running, METH_NOARGS,
 279     "is_running () -> Boolean\n\
 280 Return whether the thread is running." },
 281   { "is_exited", thpy_is_exited, METH_NOARGS,
 282     "is_exited () -> Boolean\n\
 283 Return whether the thread is exited." },
 284
 285   { NULL }
 286 };
 287
 288 static PyTypeObject thread_object_type =
 289 {
 290   PyObject_HEAD_INIT (NULL)
 291   0,                              /*ob_size*/
 292   "gdb.InferiorThread",           /*tp_name*/
 293   sizeof (thread_object),         /*tp_basicsize*/
 294   0,                              /*tp_itemsize*/
 295   thpy_dealloc,                   /*tp_dealloc*/
 296   0,                              /*tp_print*/
 297   0,                              /*tp_getattr*/
 298   0,                              /*tp_setattr*/
 299   0,                              /*tp_compare*/
 300   0,                              /*tp_repr*/
 301   0,                              /*tp_as_number*/
 302   0,                              /*tp_as_sequence*/
 303   0,                              /*tp_as_mapping*/
 304   0,                              /*tp_hash */
 305   0,                              /*tp_call*/
 306   0,                              /*tp_str*/
 307   0,                              /*tp_getattro*/
 308   0,                              /*tp_setattro*/
 309   0,                              /*tp_as_buffer*/
 310   Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_ITER,  /*tp_flags*/
 311   "GDB thread object",            /* tp_doc */
 312   0,                              /* tp_traverse */
 313   0,                              /* tp_clear */
 314   0,                              /* tp_richcompare */
 315   0,                              /* tp_weaklistoffset */
 316   0,                              /* tp_iter */
 317   0,                              /* tp_iternext */
 318   thread_object_methods,          /* tp_methods */
 319   0,                              /* tp_members */
 320   thread_object_getset,           /* tp_getset */
 321   0,                              /* tp_base */
 322   0,                              /* tp_dict */
 323   0,                              /* tp_descr_get */
 324   0,                              /* tp_descr_set */
 325   0,                              /* tp_dictoffset */
 326   0,                              /* tp_init */
 327   0                               /* tp_alloc */
 328 };