/* Python interface to stack frames
|
/* Python interface to stack frames
|
|
|
Copyright (C) 2008, 2009, 2010 Free Software Foundation, Inc.
|
Copyright (C) 2008, 2009, 2010 Free Software Foundation, Inc.
|
|
|
This file is part of GDB.
|
This file is part of GDB.
|
|
|
This program is free software; you can redistribute it and/or modify
|
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
|
it under the terms of the GNU General Public License as published by
|
the Free Software Foundation; either version 3 of the License, or
|
the Free Software Foundation; either version 3 of the License, or
|
(at your option) any later version.
|
(at your option) any later version.
|
|
|
This program is distributed in the hope that it will be useful,
|
This program is distributed in the hope that it will be useful,
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
GNU General Public License for more details.
|
GNU General Public License for more details.
|
|
|
You should have received a copy of the GNU General Public License
|
You should have received a copy of the GNU General Public License
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
|
|
#include "defs.h"
|
#include "defs.h"
|
#include "charset.h"
|
#include "charset.h"
|
#include "block.h"
|
#include "block.h"
|
#include "frame.h"
|
#include "frame.h"
|
#include "exceptions.h"
|
#include "exceptions.h"
|
#include "symtab.h"
|
#include "symtab.h"
|
#include "stack.h"
|
#include "stack.h"
|
#include "value.h"
|
#include "value.h"
|
#include "python-internal.h"
|
#include "python-internal.h"
|
|
|
typedef struct {
|
typedef struct {
|
PyObject_HEAD
|
PyObject_HEAD
|
struct frame_id frame_id;
|
struct frame_id frame_id;
|
struct gdbarch *gdbarch;
|
struct gdbarch *gdbarch;
|
|
|
/* Marks that the FRAME_ID member actually holds the ID of the frame next
|
/* Marks that the FRAME_ID member actually holds the ID of the frame next
|
to this, and not this frames' ID itself. This is a hack to permit Python
|
to this, and not this frames' ID itself. This is a hack to permit Python
|
frame objects which represent invalid frames (i.e., the last frame_info
|
frame objects which represent invalid frames (i.e., the last frame_info
|
in a corrupt stack). The problem arises from the fact that this code
|
in a corrupt stack). The problem arises from the fact that this code
|
relies on FRAME_ID to uniquely identify a frame, which is not always true
|
relies on FRAME_ID to uniquely identify a frame, which is not always true
|
for the last "frame" in a corrupt stack (it can have a null ID, or the same
|
for the last "frame" in a corrupt stack (it can have a null ID, or the same
|
ID as the previous frame). Whenever get_prev_frame returns NULL, we
|
ID as the previous frame). Whenever get_prev_frame returns NULL, we
|
record the frame_id of the next frame and set FRAME_ID_IS_NEXT to 1. */
|
record the frame_id of the next frame and set FRAME_ID_IS_NEXT to 1. */
|
int frame_id_is_next;
|
int frame_id_is_next;
|
} frame_object;
|
} frame_object;
|
|
|
/* Require a valid frame. This must be called inside a TRY_CATCH, or
|
/* Require a valid frame. This must be called inside a TRY_CATCH, or
|
another context in which a gdb exception is allowed. */
|
another context in which a gdb exception is allowed. */
|
#define FRAPY_REQUIRE_VALID(frame_obj, frame) \
|
#define FRAPY_REQUIRE_VALID(frame_obj, frame) \
|
do { \
|
do { \
|
frame = frame_object_to_frame_info (frame_obj); \
|
frame = frame_object_to_frame_info (frame_obj); \
|
if (frame == NULL) \
|
if (frame == NULL) \
|
error ("Frame is invalid."); \
|
error ("Frame is invalid."); \
|
} while (0)
|
} while (0)
|
|
|
static PyTypeObject frame_object_type;
|
static PyTypeObject frame_object_type;
|
|
|
/* Returns the frame_info object corresponding to the given Python Frame
|
/* Returns the frame_info object corresponding to the given Python Frame
|
object. If the frame doesn't exist anymore (the frame id doesn't
|
object. If the frame doesn't exist anymore (the frame id doesn't
|
correspond to any frame in the inferior), returns NULL. */
|
correspond to any frame in the inferior), returns NULL. */
|
|
|
static struct frame_info *
|
static struct frame_info *
|
frame_object_to_frame_info (frame_object *frame_obj)
|
frame_object_to_frame_info (frame_object *frame_obj)
|
{
|
{
|
struct frame_info *frame;
|
struct frame_info *frame;
|
|
|
frame = frame_find_by_id (frame_obj->frame_id);
|
frame = frame_find_by_id (frame_obj->frame_id);
|
if (frame == NULL)
|
if (frame == NULL)
|
return NULL;
|
return NULL;
|
|
|
if (frame_obj->frame_id_is_next)
|
if (frame_obj->frame_id_is_next)
|
frame = get_prev_frame (frame);
|
frame = get_prev_frame (frame);
|
|
|
return frame;
|
return frame;
|
}
|
}
|
|
|
/* Called by the Python interpreter to obtain string representation
|
/* Called by the Python interpreter to obtain string representation
|
of the object. */
|
of the object. */
|
|
|
static PyObject *
|
static PyObject *
|
frapy_str (PyObject *self)
|
frapy_str (PyObject *self)
|
{
|
{
|
char *s;
|
char *s;
|
PyObject *result;
|
PyObject *result;
|
struct ui_file *strfile;
|
struct ui_file *strfile;
|
|
|
strfile = mem_fileopen ();
|
strfile = mem_fileopen ();
|
fprint_frame_id (strfile, ((frame_object *) self)->frame_id);
|
fprint_frame_id (strfile, ((frame_object *) self)->frame_id);
|
s = ui_file_xstrdup (strfile, NULL);
|
s = ui_file_xstrdup (strfile, NULL);
|
result = PyString_FromString (s);
|
result = PyString_FromString (s);
|
xfree (s);
|
xfree (s);
|
|
|
return result;
|
return result;
|
}
|
}
|
|
|
/* Implementation of gdb.Frame.is_valid (self) -> Boolean.
|
/* Implementation of gdb.Frame.is_valid (self) -> Boolean.
|
Returns True if the frame corresponding to the frame_id of this
|
Returns True if the frame corresponding to the frame_id of this
|
object still exists in the inferior. */
|
object still exists in the inferior. */
|
|
|
static PyObject *
|
static PyObject *
|
frapy_is_valid (PyObject *self, PyObject *args)
|
frapy_is_valid (PyObject *self, PyObject *args)
|
{
|
{
|
struct frame_info *frame;
|
struct frame_info *frame;
|
|
|
frame = frame_object_to_frame_info ((frame_object *) self);
|
frame = frame_object_to_frame_info ((frame_object *) self);
|
if (frame == NULL)
|
if (frame == NULL)
|
Py_RETURN_FALSE;
|
Py_RETURN_FALSE;
|
|
|
Py_RETURN_TRUE;
|
Py_RETURN_TRUE;
|
}
|
}
|
|
|
/* Implementation of gdb.Frame.name (self) -> String.
|
/* Implementation of gdb.Frame.name (self) -> String.
|
Returns the name of the function corresponding to this frame. */
|
Returns the name of the function corresponding to this frame. */
|
|
|
static PyObject *
|
static PyObject *
|
frapy_name (PyObject *self, PyObject *args)
|
frapy_name (PyObject *self, PyObject *args)
|
{
|
{
|
struct frame_info *frame;
|
struct frame_info *frame;
|
char *name;
|
char *name;
|
enum language lang;
|
enum language lang;
|
PyObject *result;
|
PyObject *result;
|
volatile struct gdb_exception except;
|
volatile struct gdb_exception except;
|
|
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
{
|
{
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
|
|
find_frame_funname (frame, &name, &lang);
|
find_frame_funname (frame, &name, &lang);
|
}
|
}
|
GDB_PY_HANDLE_EXCEPTION (except);
|
GDB_PY_HANDLE_EXCEPTION (except);
|
|
|
if (name)
|
if (name)
|
result = PyUnicode_Decode (name, strlen (name), host_charset (), NULL);
|
result = PyUnicode_Decode (name, strlen (name), host_charset (), NULL);
|
else
|
else
|
{
|
{
|
result = Py_None;
|
result = Py_None;
|
Py_INCREF (Py_None);
|
Py_INCREF (Py_None);
|
}
|
}
|
|
|
return result;
|
return result;
|
}
|
}
|
|
|
/* Implementation of gdb.Frame.type (self) -> Integer.
|
/* Implementation of gdb.Frame.type (self) -> Integer.
|
Returns the frame type, namely one of the gdb.*_FRAME constants. */
|
Returns the frame type, namely one of the gdb.*_FRAME constants. */
|
|
|
static PyObject *
|
static PyObject *
|
frapy_type (PyObject *self, PyObject *args)
|
frapy_type (PyObject *self, PyObject *args)
|
{
|
{
|
struct frame_info *frame;
|
struct frame_info *frame;
|
enum frame_type type = NORMAL_FRAME;/* Initialize to appease gcc warning. */
|
enum frame_type type = NORMAL_FRAME;/* Initialize to appease gcc warning. */
|
volatile struct gdb_exception except;
|
volatile struct gdb_exception except;
|
|
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
{
|
{
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
|
|
type = get_frame_type (frame);
|
type = get_frame_type (frame);
|
}
|
}
|
GDB_PY_HANDLE_EXCEPTION (except);
|
GDB_PY_HANDLE_EXCEPTION (except);
|
|
|
return PyInt_FromLong (type);
|
return PyInt_FromLong (type);
|
}
|
}
|
|
|
/* Implementation of gdb.Frame.unwind_stop_reason (self) -> Integer.
|
/* Implementation of gdb.Frame.unwind_stop_reason (self) -> Integer.
|
Returns one of the gdb.FRAME_UNWIND_* constants. */
|
Returns one of the gdb.FRAME_UNWIND_* constants. */
|
|
|
static PyObject *
|
static PyObject *
|
frapy_unwind_stop_reason (PyObject *self, PyObject *args)
|
frapy_unwind_stop_reason (PyObject *self, PyObject *args)
|
{
|
{
|
struct frame_info *frame = NULL; /* Initialize to appease gcc warning. */
|
struct frame_info *frame = NULL; /* Initialize to appease gcc warning. */
|
volatile struct gdb_exception except;
|
volatile struct gdb_exception except;
|
enum unwind_stop_reason stop_reason;
|
enum unwind_stop_reason stop_reason;
|
|
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
{
|
{
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
}
|
}
|
GDB_PY_HANDLE_EXCEPTION (except);
|
GDB_PY_HANDLE_EXCEPTION (except);
|
|
|
stop_reason = get_frame_unwind_stop_reason (frame);
|
stop_reason = get_frame_unwind_stop_reason (frame);
|
|
|
return PyInt_FromLong (stop_reason);
|
return PyInt_FromLong (stop_reason);
|
}
|
}
|
|
|
/* Implementation of gdb.Frame.pc (self) -> Long.
|
/* Implementation of gdb.Frame.pc (self) -> Long.
|
Returns the frame's resume address. */
|
Returns the frame's resume address. */
|
|
|
static PyObject *
|
static PyObject *
|
frapy_pc (PyObject *self, PyObject *args)
|
frapy_pc (PyObject *self, PyObject *args)
|
{
|
{
|
CORE_ADDR pc = 0; /* Initialize to appease gcc warning. */
|
CORE_ADDR pc = 0; /* Initialize to appease gcc warning. */
|
struct frame_info *frame;
|
struct frame_info *frame;
|
volatile struct gdb_exception except;
|
volatile struct gdb_exception except;
|
|
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
{
|
{
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
|
|
pc = get_frame_pc (frame);
|
pc = get_frame_pc (frame);
|
}
|
}
|
GDB_PY_HANDLE_EXCEPTION (except);
|
GDB_PY_HANDLE_EXCEPTION (except);
|
|
|
return PyLong_FromUnsignedLongLong (pc);
|
return PyLong_FromUnsignedLongLong (pc);
|
}
|
}
|
|
|
/* Convert a frame_info struct to a Python Frame object.
|
/* Convert a frame_info struct to a Python Frame object.
|
Sets a Python exception and returns NULL on error. */
|
Sets a Python exception and returns NULL on error. */
|
|
|
static frame_object *
|
static frame_object *
|
frame_info_to_frame_object (struct frame_info *frame)
|
frame_info_to_frame_object (struct frame_info *frame)
|
{
|
{
|
frame_object *frame_obj;
|
frame_object *frame_obj;
|
|
|
frame_obj = PyObject_New (frame_object, &frame_object_type);
|
frame_obj = PyObject_New (frame_object, &frame_object_type);
|
if (frame_obj == NULL)
|
if (frame_obj == NULL)
|
{
|
{
|
PyErr_SetString (PyExc_MemoryError, "Could not allocate frame object.");
|
PyErr_SetString (PyExc_MemoryError, "Could not allocate frame object.");
|
return NULL;
|
return NULL;
|
}
|
}
|
|
|
/* Try to get the previous frame, to determine if this is the last frame
|
/* Try to get the previous frame, to determine if this is the last frame
|
in a corrupt stack. If so, we need to store the frame_id of the next
|
in a corrupt stack. If so, we need to store the frame_id of the next
|
frame and not of this one (which is possibly invalid). */
|
frame and not of this one (which is possibly invalid). */
|
if (get_prev_frame (frame) == NULL
|
if (get_prev_frame (frame) == NULL
|
&& get_frame_unwind_stop_reason (frame) != UNWIND_NO_REASON
|
&& get_frame_unwind_stop_reason (frame) != UNWIND_NO_REASON
|
&& get_next_frame (frame) != NULL)
|
&& get_next_frame (frame) != NULL)
|
{
|
{
|
frame_obj->frame_id = get_frame_id (get_next_frame (frame));
|
frame_obj->frame_id = get_frame_id (get_next_frame (frame));
|
frame_obj->frame_id_is_next = 1;
|
frame_obj->frame_id_is_next = 1;
|
}
|
}
|
else
|
else
|
{
|
{
|
frame_obj->frame_id = get_frame_id (frame);
|
frame_obj->frame_id = get_frame_id (frame);
|
frame_obj->frame_id_is_next = 0;
|
frame_obj->frame_id_is_next = 0;
|
}
|
}
|
|
|
frame_obj->gdbarch = get_frame_arch (frame);
|
frame_obj->gdbarch = get_frame_arch (frame);
|
|
|
return frame_obj;
|
return frame_obj;
|
}
|
}
|
|
|
/* Implementation of gdb.Frame.older (self) -> gdb.Frame.
|
/* Implementation of gdb.Frame.older (self) -> gdb.Frame.
|
Returns the frame immediately older (outer) to this frame, or None if
|
Returns the frame immediately older (outer) to this frame, or None if
|
there isn't one. */
|
there isn't one. */
|
|
|
static PyObject *
|
static PyObject *
|
frapy_older (PyObject *self, PyObject *args)
|
frapy_older (PyObject *self, PyObject *args)
|
{
|
{
|
struct frame_info *frame, *prev;
|
struct frame_info *frame, *prev;
|
volatile struct gdb_exception except;
|
volatile struct gdb_exception except;
|
PyObject *prev_obj = NULL; /* Initialize to appease gcc warning. */
|
PyObject *prev_obj = NULL; /* Initialize to appease gcc warning. */
|
|
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
{
|
{
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
|
|
prev = get_prev_frame (frame);
|
prev = get_prev_frame (frame);
|
if (prev)
|
if (prev)
|
prev_obj = (PyObject *) frame_info_to_frame_object (prev);
|
prev_obj = (PyObject *) frame_info_to_frame_object (prev);
|
else
|
else
|
{
|
{
|
Py_INCREF (Py_None);
|
Py_INCREF (Py_None);
|
prev_obj = Py_None;
|
prev_obj = Py_None;
|
}
|
}
|
}
|
}
|
GDB_PY_HANDLE_EXCEPTION (except);
|
GDB_PY_HANDLE_EXCEPTION (except);
|
|
|
return prev_obj;
|
return prev_obj;
|
}
|
}
|
|
|
/* Implementation of gdb.Frame.newer (self) -> gdb.Frame.
|
/* Implementation of gdb.Frame.newer (self) -> gdb.Frame.
|
Returns the frame immediately newer (inner) to this frame, or None if
|
Returns the frame immediately newer (inner) to this frame, or None if
|
there isn't one. */
|
there isn't one. */
|
|
|
static PyObject *
|
static PyObject *
|
frapy_newer (PyObject *self, PyObject *args)
|
frapy_newer (PyObject *self, PyObject *args)
|
{
|
{
|
struct frame_info *frame, *next;
|
struct frame_info *frame, *next;
|
volatile struct gdb_exception except;
|
volatile struct gdb_exception except;
|
PyObject *next_obj = NULL; /* Initialize to appease gcc warning. */
|
PyObject *next_obj = NULL; /* Initialize to appease gcc warning. */
|
|
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
{
|
{
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
|
|
next = get_next_frame (frame);
|
next = get_next_frame (frame);
|
if (next)
|
if (next)
|
next_obj = (PyObject *) frame_info_to_frame_object (next);
|
next_obj = (PyObject *) frame_info_to_frame_object (next);
|
else
|
else
|
{
|
{
|
Py_INCREF (Py_None);
|
Py_INCREF (Py_None);
|
next_obj = Py_None;
|
next_obj = Py_None;
|
}
|
}
|
}
|
}
|
GDB_PY_HANDLE_EXCEPTION (except);
|
GDB_PY_HANDLE_EXCEPTION (except);
|
|
|
return next_obj;
|
return next_obj;
|
}
|
}
|
|
|
/* Implementation of gdb.Frame.read_var_value (self, variable) -> gdb.Value.
|
/* Implementation of gdb.Frame.read_var_value (self, variable) -> gdb.Value.
|
Returns the value of the given variable in this frame. The argument must be
|
Returns the value of the given variable in this frame. The argument must be
|
a string. Returns None if GDB can't find the specified variable. */
|
a string. Returns None if GDB can't find the specified variable. */
|
|
|
static PyObject *
|
static PyObject *
|
frapy_read_var (PyObject *self, PyObject *args)
|
frapy_read_var (PyObject *self, PyObject *args)
|
{
|
{
|
struct frame_info *frame;
|
struct frame_info *frame;
|
PyObject *sym_obj;
|
PyObject *sym_obj;
|
struct symbol *var = NULL; /* gcc-4.3.2 false warning. */
|
struct symbol *var = NULL; /* gcc-4.3.2 false warning. */
|
struct value *val = NULL;
|
struct value *val = NULL;
|
volatile struct gdb_exception except;
|
volatile struct gdb_exception except;
|
|
|
if (!PyArg_ParseTuple (args, "O", &sym_obj))
|
if (!PyArg_ParseTuple (args, "O", &sym_obj))
|
return NULL;
|
return NULL;
|
|
|
if (gdbpy_is_string (sym_obj))
|
if (gdbpy_is_string (sym_obj))
|
{
|
{
|
char *var_name;
|
char *var_name;
|
struct block *block = NULL;
|
struct block *block = NULL;
|
struct cleanup *cleanup;
|
struct cleanup *cleanup;
|
volatile struct gdb_exception except;
|
volatile struct gdb_exception except;
|
|
|
var_name = python_string_to_target_string (sym_obj);
|
var_name = python_string_to_target_string (sym_obj);
|
if (!var_name)
|
if (!var_name)
|
return NULL;
|
return NULL;
|
cleanup = make_cleanup (xfree, var_name);
|
cleanup = make_cleanup (xfree, var_name);
|
|
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
{
|
{
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
|
|
block = block_for_pc (get_frame_address_in_block (frame));
|
block = block_for_pc (get_frame_address_in_block (frame));
|
var = lookup_symbol (var_name, block, VAR_DOMAIN, NULL);
|
var = lookup_symbol (var_name, block, VAR_DOMAIN, NULL);
|
}
|
}
|
GDB_PY_HANDLE_EXCEPTION (except);
|
GDB_PY_HANDLE_EXCEPTION (except);
|
|
|
if (!var)
|
if (!var)
|
{
|
{
|
PyErr_Format (PyExc_ValueError,
|
PyErr_Format (PyExc_ValueError,
|
_("variable '%s' not found"), var_name);
|
_("variable '%s' not found"), var_name);
|
do_cleanups (cleanup);
|
do_cleanups (cleanup);
|
|
|
return NULL;
|
return NULL;
|
}
|
}
|
|
|
do_cleanups (cleanup);
|
do_cleanups (cleanup);
|
}
|
}
|
else
|
else
|
{
|
{
|
PyErr_SetString (PyExc_TypeError,
|
PyErr_SetString (PyExc_TypeError,
|
_("argument must be a symbol or string"));
|
_("argument must be a symbol or string"));
|
return NULL;
|
return NULL;
|
}
|
}
|
|
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
{
|
{
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
FRAPY_REQUIRE_VALID ((frame_object *) self, frame);
|
|
|
val = read_var_value (var, frame);
|
val = read_var_value (var, frame);
|
}
|
}
|
GDB_PY_HANDLE_EXCEPTION (except);
|
GDB_PY_HANDLE_EXCEPTION (except);
|
|
|
if (val)
|
if (val)
|
return value_to_value_object (val);
|
return value_to_value_object (val);
|
|
|
Py_RETURN_NONE;
|
Py_RETURN_NONE;
|
}
|
}
|
|
|
/* Implementation of gdb.selected_frame () -> gdb.Frame.
|
/* Implementation of gdb.selected_frame () -> gdb.Frame.
|
Returns the selected frame object. */
|
Returns the selected frame object. */
|
|
|
PyObject *
|
PyObject *
|
gdbpy_selected_frame (PyObject *self, PyObject *args)
|
gdbpy_selected_frame (PyObject *self, PyObject *args)
|
{
|
{
|
struct frame_info *frame;
|
struct frame_info *frame;
|
frame_object *frame_obj = NULL; /* Initialize to appease gcc warning. */
|
frame_object *frame_obj = NULL; /* Initialize to appease gcc warning. */
|
volatile struct gdb_exception except;
|
volatile struct gdb_exception except;
|
|
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
TRY_CATCH (except, RETURN_MASK_ALL)
|
{
|
{
|
frame = get_selected_frame ("No frame is currently selected.");
|
frame = get_selected_frame ("No frame is currently selected.");
|
frame_obj = frame_info_to_frame_object (frame);
|
frame_obj = frame_info_to_frame_object (frame);
|
}
|
}
|
GDB_PY_HANDLE_EXCEPTION (except);
|
GDB_PY_HANDLE_EXCEPTION (except);
|
|
|
return (PyObject *) frame_obj;
|
return (PyObject *) frame_obj;
|
}
|
}
|
|
|
/* Implementation of gdb.stop_reason_string (Integer) -> String.
|
/* Implementation of gdb.stop_reason_string (Integer) -> String.
|
Return a string explaining the unwind stop reason. */
|
Return a string explaining the unwind stop reason. */
|
|
|
PyObject *
|
PyObject *
|
gdbpy_frame_stop_reason_string (PyObject *self, PyObject *args)
|
gdbpy_frame_stop_reason_string (PyObject *self, PyObject *args)
|
{
|
{
|
int reason;
|
int reason;
|
const char *str;
|
const char *str;
|
|
|
if (!PyArg_ParseTuple (args, "i", &reason))
|
if (!PyArg_ParseTuple (args, "i", &reason))
|
return NULL;
|
return NULL;
|
|
|
if (reason < 0 || reason > UNWIND_NO_SAVED_PC)
|
if (reason < 0 || reason > UNWIND_NO_SAVED_PC)
|
{
|
{
|
PyErr_SetString (PyExc_ValueError, "Invalid frame stop reason.");
|
PyErr_SetString (PyExc_ValueError, "Invalid frame stop reason.");
|
return NULL;
|
return NULL;
|
}
|
}
|
|
|
str = frame_stop_reason_string (reason);
|
str = frame_stop_reason_string (reason);
|
return PyUnicode_Decode (str, strlen (str), host_charset (), NULL);
|
return PyUnicode_Decode (str, strlen (str), host_charset (), NULL);
|
}
|
}
|
|
|
/* Implements the equality comparison for Frame objects.
|
/* Implements the equality comparison for Frame objects.
|
All other comparison operators will throw a TypeError Python exception,
|
All other comparison operators will throw a TypeError Python exception,
|
as they aren't valid for frames. */
|
as they aren't valid for frames. */
|
|
|
static PyObject *
|
static PyObject *
|
frapy_richcompare (PyObject *self, PyObject *other, int op)
|
frapy_richcompare (PyObject *self, PyObject *other, int op)
|
{
|
{
|
int result;
|
int result;
|
|
|
if (!PyObject_TypeCheck (other, &frame_object_type)
|
if (!PyObject_TypeCheck (other, &frame_object_type)
|
|| (op != Py_EQ && op != Py_NE))
|
|| (op != Py_EQ && op != Py_NE))
|
{
|
{
|
Py_INCREF (Py_NotImplemented);
|
Py_INCREF (Py_NotImplemented);
|
return Py_NotImplemented;
|
return Py_NotImplemented;
|
}
|
}
|
|
|
if (frame_id_eq (((frame_object *) self)->frame_id,
|
if (frame_id_eq (((frame_object *) self)->frame_id,
|
((frame_object *) other)->frame_id))
|
((frame_object *) other)->frame_id))
|
result = Py_EQ;
|
result = Py_EQ;
|
else
|
else
|
result = Py_NE;
|
result = Py_NE;
|
|
|
if (op == result)
|
if (op == result)
|
Py_RETURN_TRUE;
|
Py_RETURN_TRUE;
|
Py_RETURN_FALSE;
|
Py_RETURN_FALSE;
|
}
|
}
|
|
|
/* Sets up the Frame API in the gdb module. */
|
/* Sets up the Frame API in the gdb module. */
|
|
|
void
|
void
|
gdbpy_initialize_frames (void)
|
gdbpy_initialize_frames (void)
|
{
|
{
|
if (PyType_Ready (&frame_object_type) < 0)
|
if (PyType_Ready (&frame_object_type) < 0)
|
return;
|
return;
|
|
|
/* Note: These would probably be best exposed as class attributes of Frame,
|
/* Note: These would probably be best exposed as class attributes of Frame,
|
but I don't know how to do it except by messing with the type's dictionary.
|
but I don't know how to do it except by messing with the type's dictionary.
|
That seems too messy. */
|
That seems too messy. */
|
PyModule_AddIntConstant (gdb_module, "NORMAL_FRAME", NORMAL_FRAME);
|
PyModule_AddIntConstant (gdb_module, "NORMAL_FRAME", NORMAL_FRAME);
|
PyModule_AddIntConstant (gdb_module, "DUMMY_FRAME", DUMMY_FRAME);
|
PyModule_AddIntConstant (gdb_module, "DUMMY_FRAME", DUMMY_FRAME);
|
PyModule_AddIntConstant (gdb_module, "SIGTRAMP_FRAME", SIGTRAMP_FRAME);
|
PyModule_AddIntConstant (gdb_module, "SIGTRAMP_FRAME", SIGTRAMP_FRAME);
|
PyModule_AddIntConstant (gdb_module, "SENTINEL_FRAME", SENTINEL_FRAME);
|
PyModule_AddIntConstant (gdb_module, "SENTINEL_FRAME", SENTINEL_FRAME);
|
PyModule_AddIntConstant (gdb_module,
|
PyModule_AddIntConstant (gdb_module,
|
"FRAME_UNWIND_NO_REASON", UNWIND_NO_REASON);
|
"FRAME_UNWIND_NO_REASON", UNWIND_NO_REASON);
|
PyModule_AddIntConstant (gdb_module,
|
PyModule_AddIntConstant (gdb_module,
|
"FRAME_UNWIND_NULL_ID", UNWIND_NULL_ID);
|
"FRAME_UNWIND_NULL_ID", UNWIND_NULL_ID);
|
PyModule_AddIntConstant (gdb_module,
|
PyModule_AddIntConstant (gdb_module,
|
"FRAME_UNWIND_FIRST_ERROR", UNWIND_FIRST_ERROR);
|
"FRAME_UNWIND_FIRST_ERROR", UNWIND_FIRST_ERROR);
|
PyModule_AddIntConstant (gdb_module,
|
PyModule_AddIntConstant (gdb_module,
|
"FRAME_UNWIND_INNER_ID", UNWIND_INNER_ID);
|
"FRAME_UNWIND_INNER_ID", UNWIND_INNER_ID);
|
PyModule_AddIntConstant (gdb_module,
|
PyModule_AddIntConstant (gdb_module,
|
"FRAME_UNWIND_SAME_ID", UNWIND_SAME_ID);
|
"FRAME_UNWIND_SAME_ID", UNWIND_SAME_ID);
|
PyModule_AddIntConstant (gdb_module,
|
PyModule_AddIntConstant (gdb_module,
|
"FRAME_UNWIND_NO_SAVED_PC", UNWIND_NO_SAVED_PC);
|
"FRAME_UNWIND_NO_SAVED_PC", UNWIND_NO_SAVED_PC);
|
|
|
Py_INCREF (&frame_object_type);
|
Py_INCREF (&frame_object_type);
|
PyModule_AddObject (gdb_module, "Frame", (PyObject *) &frame_object_type);
|
PyModule_AddObject (gdb_module, "Frame", (PyObject *) &frame_object_type);
|
}
|
}
|
|
|
|
|
|
|
static PyMethodDef frame_object_methods[] = {
|
static PyMethodDef frame_object_methods[] = {
|
{ "is_valid", frapy_is_valid, METH_NOARGS,
|
{ "is_valid", frapy_is_valid, METH_NOARGS,
|
"is_valid () -> Boolean.\n\
|
"is_valid () -> Boolean.\n\
|
Return true if this frame is valid, false if not." },
|
Return true if this frame is valid, false if not." },
|
{ "name", frapy_name, METH_NOARGS,
|
{ "name", frapy_name, METH_NOARGS,
|
"name () -> String.\n\
|
"name () -> String.\n\
|
Return the function name of the frame, or None if it can't be determined." },
|
Return the function name of the frame, or None if it can't be determined." },
|
{ "type", frapy_type, METH_NOARGS,
|
{ "type", frapy_type, METH_NOARGS,
|
"type () -> Integer.\n\
|
"type () -> Integer.\n\
|
Return the type of the frame." },
|
Return the type of the frame." },
|
{ "unwind_stop_reason", frapy_unwind_stop_reason, METH_NOARGS,
|
{ "unwind_stop_reason", frapy_unwind_stop_reason, METH_NOARGS,
|
"unwind_stop_reason () -> Integer.\n\
|
"unwind_stop_reason () -> Integer.\n\
|
Return the reason why it's not possible to find frames older than this." },
|
Return the reason why it's not possible to find frames older than this." },
|
{ "pc", frapy_pc, METH_NOARGS,
|
{ "pc", frapy_pc, METH_NOARGS,
|
"pc () -> Long.\n\
|
"pc () -> Long.\n\
|
Return the frame's resume address." },
|
Return the frame's resume address." },
|
{ "older", frapy_older, METH_NOARGS,
|
{ "older", frapy_older, METH_NOARGS,
|
"older () -> gdb.Frame.\n\
|
"older () -> gdb.Frame.\n\
|
Return the frame that called this frame." },
|
Return the frame that called this frame." },
|
{ "newer", frapy_newer, METH_NOARGS,
|
{ "newer", frapy_newer, METH_NOARGS,
|
"newer () -> gdb.Frame.\n\
|
"newer () -> gdb.Frame.\n\
|
Return the frame called by this frame." },
|
Return the frame called by this frame." },
|
{ "read_var", frapy_read_var, METH_VARARGS,
|
{ "read_var", frapy_read_var, METH_VARARGS,
|
"read_var (variable) -> gdb.Value.\n\
|
"read_var (variable) -> gdb.Value.\n\
|
Return the value of the variable in this frame." },
|
Return the value of the variable in this frame." },
|
{NULL} /* Sentinel */
|
{NULL} /* Sentinel */
|
};
|
};
|
|
|
static PyTypeObject frame_object_type = {
|
static PyTypeObject frame_object_type = {
|
PyObject_HEAD_INIT (NULL)
|
PyObject_HEAD_INIT (NULL)
|
0, /* ob_size */
|
0, /* ob_size */
|
"gdb.Frame", /* tp_name */
|
"gdb.Frame", /* tp_name */
|
sizeof (frame_object), /* tp_basicsize */
|
sizeof (frame_object), /* tp_basicsize */
|
0, /* tp_itemsize */
|
0, /* tp_itemsize */
|
0, /* tp_dealloc */
|
0, /* tp_dealloc */
|
0, /* tp_print */
|
0, /* tp_print */
|
0, /* tp_getattr */
|
0, /* tp_getattr */
|
0, /* tp_setattr */
|
0, /* tp_setattr */
|
0, /* tp_compare */
|
0, /* tp_compare */
|
0, /* tp_repr */
|
0, /* tp_repr */
|
0, /* tp_as_number */
|
0, /* tp_as_number */
|
0, /* tp_as_sequence */
|
0, /* tp_as_sequence */
|
0, /* tp_as_mapping */
|
0, /* tp_as_mapping */
|
0, /* tp_hash */
|
0, /* tp_hash */
|
0, /* tp_call */
|
0, /* tp_call */
|
frapy_str, /* tp_str */
|
frapy_str, /* tp_str */
|
0, /* tp_getattro */
|
0, /* tp_getattro */
|
0, /* tp_setattro */
|
0, /* tp_setattro */
|
0, /* tp_as_buffer */
|
0, /* tp_as_buffer */
|
Py_TPFLAGS_DEFAULT, /* tp_flags */
|
Py_TPFLAGS_DEFAULT, /* tp_flags */
|
"GDB frame object", /* tp_doc */
|
"GDB frame object", /* tp_doc */
|
0, /* tp_traverse */
|
0, /* tp_traverse */
|
0, /* tp_clear */
|
0, /* tp_clear */
|
frapy_richcompare, /* tp_richcompare */
|
frapy_richcompare, /* tp_richcompare */
|
0, /* tp_weaklistoffset */
|
0, /* tp_weaklistoffset */
|
0, /* tp_iter */
|
0, /* tp_iter */
|
0, /* tp_iternext */
|
0, /* tp_iternext */
|
frame_object_methods, /* tp_methods */
|
frame_object_methods, /* tp_methods */
|
0, /* tp_members */
|
0, /* tp_members */
|
0, /* tp_getset */
|
0, /* tp_getset */
|
0, /* tp_base */
|
0, /* tp_base */
|
0, /* tp_dict */
|
0, /* tp_dict */
|
0, /* tp_descr_get */
|
0, /* tp_descr_get */
|
0, /* tp_descr_set */
|
0, /* tp_descr_set */
|
0, /* tp_dictoffset */
|
0, /* tp_dictoffset */
|
0, /* tp_init */
|
0, /* tp_init */
|
0, /* tp_alloc */
|
0, /* tp_alloc */
|
PyType_GenericNew /* tp_new */
|
PyType_GenericNew /* tp_new */
|
};
|
};
|
|
|
