Toolchain/binutils-gdb
1
0
Fork 0
forked from Imagelibrary/binutils-gdb
Code Pull Requests Activity

gdb: Add the $_poke utility function

Browse Source 
Add the $_poke utility function so it is possible to use poke in
breakpoint condition for example.

The expression must return a poke boolean.
This commit is contained in:
Lancelot SIX
2023-02-06 10:34:52 +00:00
parent d734c63af7
commit 38d015075b
1 changed files with 42 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

42
gdb/poke.c
View File

@@ -864,6 +864,45 @@ poke_command (const char *args, int from_tty)
poke_handle_exception (exit_exception);
}
static struct value *
poke_internal_fn (struct gdbarch *gdbarch,
const struct language_defn *language,
void *cookie, int argc, struct value **argv)
{
if (argc != 1)
error ("_poke_poc requires only one argument");
struct type *type = value_type (argv[0]);
if (type->code () != TYPE_CODE_ARRAY
|| TYPE_TARGET_TYPE (type) != builtin_type (gdbarch)->builtin_char)
error ("_poke_poc's first argument must have type 'const char *'");
gdb::array_view<const gdb_byte> content = value_contents (argv[0]);
const char *poke_expr = reinterpret_cast<const char *> (content.begin ());
const char *poke_end = reinterpret_cast<const char *> (content.end () - 1);
gdb_assert (*poke_end) == '\0');
pk_val val;
pk_val exit_exception = PK_NULL;
if (pk_compile_statement (poke_compiler, poke_cmd, &poke_end,
&val, &exit_exception) != PK_OK
|| exit_exception != PK_NULL)
{
poke_handle_exception (exit_exception);
error ("Error compiling poke call");
}
/* Do the best we can to convert a poke value to a GDB value. */
switch (pk_val_kind (val))
{
case PK_VAL_INT:
case PK_VAL_UINT:
default:
error ("Poke");
}
return value_from_longest (builtin_type (gdbarch)->builtin_int, 0);
}
/* Initialize the poke GDB subsystem. */
void _initialize_poke (void);
@@ -886,5 +925,8 @@ Usage: poke-dump-types\n"));
Execute a Poke statement or declaration.\n\
Usage: poke [STMT]\n"));
add_internal_function ("_poke", _("\
Run the expression in poke", poke_internal_fn, nullptr);
make_final_cleanup (poke_finalize, nullptr);
}