URL
https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk
Subversion Repositories openrisc_2011-10-31
[/] [openrisc/] [trunk/] [gnu-src/] [gdb-7.2/] [gdb/] [python/] [py-infthread.c] - Rev 447
Go to most recent revision | Compare with Previous | Blame | View Log
/* Python interface to inferior threads. Copyright (C) 2009, 2010 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 "exceptions.h" #include "gdbthread.h" #include "inferior.h" #include "python-internal.h" static PyTypeObject thread_object_type; /* Require that INFERIOR be a valid inferior ID. */ #define THPY_REQUIRE_VALID(Thread) \ do { \ if (!Thread->thread) \ { \ PyErr_SetString (PyExc_RuntimeError, \ _("Thread no longer exists.")); \ return NULL; \ } \ } while (0) thread_object * create_thread_object (struct thread_info *tp) { thread_object *thread_obj; thread_obj = PyObject_New (thread_object, &thread_object_type); if (!thread_obj) return NULL; thread_obj->thread = tp; thread_obj->inf_obj = find_inferior_object (PIDGET (tp->ptid)); Py_INCREF (thread_obj->inf_obj); return thread_obj; } static void thpy_dealloc (PyObject *self) { Py_DECREF (((thread_object *) self)->inf_obj); self->ob_type->tp_free (self); } static PyObject * thpy_get_num (PyObject *self, void *closure) { thread_object *thread_obj = (thread_object *) self; THPY_REQUIRE_VALID (thread_obj); return PyLong_FromLong (thread_obj->thread->num); } /* Getter for InferiorThread.ptid -> (pid, lwp, tid). Returns a tuple with the thread's ptid components. */ static PyObject * thpy_get_ptid (PyObject *self, void *closure) { int pid; long tid, lwp; thread_object *thread_obj = (thread_object *) self; PyObject *ret; THPY_REQUIRE_VALID (thread_obj); ret = PyTuple_New (3); if (!ret) return NULL; pid = ptid_get_pid (thread_obj->thread->ptid); lwp = ptid_get_lwp (thread_obj->thread->ptid); tid = ptid_get_tid (thread_obj->thread->ptid); PyTuple_SET_ITEM (ret, 0, PyInt_FromLong (pid)); PyTuple_SET_ITEM (ret, 1, PyInt_FromLong (lwp)); PyTuple_SET_ITEM (ret, 2, PyInt_FromLong (tid)); return ret; } /* Implementation of InferiorThread.switch (). Makes this the GDB selected thread. */ static PyObject * thpy_switch (PyObject *self, PyObject *args) { thread_object *thread_obj = (thread_object *) self; struct cleanup *cleanup; volatile struct gdb_exception except; THPY_REQUIRE_VALID (thread_obj); TRY_CATCH (except, RETURN_MASK_ALL) { switch_to_thread (thread_obj->thread->ptid); } GDB_PY_HANDLE_EXCEPTION (except); Py_RETURN_NONE; } /* Implementation of InferiorThread.is_stopped () -> Boolean. Return whether the thread is stopped. */ static PyObject * thpy_is_stopped (PyObject *self, PyObject *args) { thread_object *thread_obj = (thread_object *) self; THPY_REQUIRE_VALID (thread_obj); if (is_stopped (thread_obj->thread->ptid)) Py_RETURN_TRUE; Py_RETURN_FALSE; } /* Implementation of InferiorThread.is_running () -> Boolean. Return whether the thread is running. */ static PyObject * thpy_is_running (PyObject *self, PyObject *args) { thread_object *thread_obj = (thread_object *) self; THPY_REQUIRE_VALID (thread_obj); if (is_running (thread_obj->thread->ptid)) Py_RETURN_TRUE; Py_RETURN_FALSE; } /* Implementation of InferiorThread.is_exited () -> Boolean. Return whether the thread is exited. */ static PyObject * thpy_is_exited (PyObject *self, PyObject *args) { thread_object *thread_obj = (thread_object *) self; THPY_REQUIRE_VALID (thread_obj); if (is_exited (thread_obj->thread->ptid)) Py_RETURN_TRUE; Py_RETURN_FALSE; } /* Implementation of gdb.selected_thread () -> gdb.InferiorThread. Returns the selected thread object. */ PyObject * gdbpy_selected_thread (PyObject *self, PyObject *args) { PyObject *thread_obj; thread_obj = (PyObject *) find_thread_object (inferior_ptid); if (thread_obj) { Py_INCREF (thread_obj); return thread_obj; } Py_RETURN_NONE; } void gdbpy_initialize_thread (void) { if (PyType_Ready (&thread_object_type) < 0) return; Py_INCREF (&thread_object_type); PyModule_AddObject (gdb_module, "InferiorThread", (PyObject *) &thread_object_type); } static PyGetSetDef thread_object_getset[] = { { "num", thpy_get_num, NULL, "ID of the thread, as assigned by GDB.", NULL }, { "ptid", thpy_get_ptid, NULL, "ID of the thread, as assigned by the OS.", NULL }, { NULL } }; static PyMethodDef thread_object_methods[] = { { "switch", thpy_switch, METH_NOARGS, "switch ()\n\ Makes this the GDB selected thread." }, { "is_stopped", thpy_is_stopped, METH_NOARGS, "is_stopped () -> Boolean\n\ Return whether the thread is stopped." }, { "is_running", thpy_is_running, METH_NOARGS, "is_running () -> Boolean\n\ Return whether the thread is running." }, { "is_exited", thpy_is_exited, METH_NOARGS, "is_exited () -> Boolean\n\ Return whether the thread is exited." }, { NULL } }; static PyTypeObject thread_object_type = { PyObject_HEAD_INIT (NULL) 0, /*ob_size*/ "gdb.InferiorThread", /*tp_name*/ sizeof (thread_object), /*tp_basicsize*/ 0, /*tp_itemsize*/ thpy_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 | Py_TPFLAGS_HAVE_ITER, /*tp_flags*/ "GDB thread object", /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ 0, /* tp_iter */ 0, /* tp_iternext */ thread_object_methods, /* tp_methods */ 0, /* tp_members */ thread_object_getset, /* 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 */ };
Go to most recent revision | Compare with Previous | Blame | View Log