URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [tags/] [gnu-src/] [gdb-7.2/] [gdb-7.2-or32-1.0rc1/] [gdb/] [python/] [py-function.c] - Rev 341
Compare with Previous | Blame | View Log
/* Convenience functions implemented in Python. Copyright (C) 2008, 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 "value.h" #include "exceptions.h" #include "python-internal.h" #include "charset.h" #include "gdbcmd.h" #include "cli/cli-decode.h" #include "completer.h" #include "expression.h" #include "language.h" static PyTypeObject fnpy_object_type; static PyObject * convert_values_to_python (int argc, struct value **argv) { int i; PyObject *result = PyTuple_New (argc); for (i = 0; i < argc; ++i) { PyObject *elt = value_to_value_object (argv[i]); if (! elt) { Py_DECREF (result); error (_("Could not convert value to Python object.")); } PyTuple_SetItem (result, i, elt); } return result; } /* Call a Python function object's invoke method. */ static struct value * fnpy_call (struct gdbarch *gdbarch, const struct language_defn *language, void *cookie, int argc, struct value **argv) { struct value *value = NULL; PyObject *result, *callable, *args; struct cleanup *cleanup; cleanup = ensure_python_env (gdbarch, language); args = convert_values_to_python (argc, argv); callable = PyObject_GetAttrString ((PyObject *) cookie, "invoke"); if (! callable) { Py_DECREF (args); error (_("No method named 'invoke' in object.")); } result = PyObject_Call (callable, args, NULL); Py_DECREF (callable); Py_DECREF (args); if (!result) { gdbpy_print_stack (); error (_("Error while executing Python code.")); } value = convert_value_from_python (result); if (value == NULL) { Py_DECREF (result); gdbpy_print_stack (); error (_("Error while executing Python code.")); } Py_DECREF (result); do_cleanups (cleanup); return value; } /* Initializer for a Function object. It takes one argument, the name of the function. */ static int fnpy_init (PyObject *self, PyObject *args, PyObject *kwds) { char *name, *docstring = NULL; if (! PyArg_ParseTuple (args, "s", &name)) return -1; Py_INCREF (self); if (PyObject_HasAttrString (self, "__doc__")) { PyObject *ds_obj = PyObject_GetAttrString (self, "__doc__"); if (ds_obj && gdbpy_is_string (ds_obj)) docstring = python_string_to_host_string (ds_obj); } if (! docstring) docstring = xstrdup (_("This function is not documented.")); add_internal_function (name, docstring, fnpy_call, self); return 0; } /* Initialize internal function support. */ void gdbpy_initialize_functions (void) { if (PyType_Ready (&fnpy_object_type) < 0) return; Py_INCREF (&fnpy_object_type); PyModule_AddObject (gdb_module, "Function", (PyObject *) &fnpy_object_type); } static PyTypeObject fnpy_object_type = { PyObject_HEAD_INIT (NULL) 0, /*ob_size*/ "gdb.Function", /*tp_name*/ sizeof (PyObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ 0, /*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_BASETYPE, /*tp_flags*/ "GDB function object", /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ 0, /* tp_iter */ 0, /* tp_iternext */ 0, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ fnpy_init, /* tp_init */ 0, /* tp_alloc */ PyType_GenericNew /* tp_new */ };