From e81e7f5e38bf0da52d9e88a94e4df9aeecd80357 Mon Sep 17 00:00:00 2001 From: Siva Chandra Date: Tue, 20 May 2014 06:30:29 -0700 Subject: Add xmethod interface to the extension language API. * defs.h (enum lval_type): New enumerator "lval_xcallable". * extension-priv.h (struct extension_language_ops): Add the xmethod interface. * extension.c (new_xmethod_worker, clone_xmethod_worker, get_matching_xmethod_workers, get_xmethod_argtypes, invoke_xmethod, free_xmethod_worker, free_xmethod_worker_vec): New functions. * extension.h: #include "common/vec.h". New function declarations. (struct xmethod_worker): New struct. (VEC (xmethod_worker_ptr)): New vector type. (xmethod_worker_ptr): New typedef. (xmethod_worker_vec): Likewise. * gdbtypes.c (gdbtypes_post_init): Initialize "xmethod" field of builtin_type. * gdbtypes.h (enum type_code): New enumerator TYPE_CODE_XMETHOD. (struct builtin_type): New field "xmethod". * valarith.c (value_ptradd): Assert that the value argument is not lval_xcallable. * valops.c (value_must_coerce_to_target): Return 0 for lval_xcallable values. * value.c (struct value): New field XM_WORKER in the field LOCATION. (value_address, value_raw_address): Return 0 for lval_xcallable values. (set_value_address): Assert that the value is not an lval_xcallable. (value_free): Free the associated xmethod worker when freeing lval_xcallable values. (set_value_component_location): Assert that the WHOLE value is not lval_xcallable. (value_of_xmethod, call_xmethod): New functions. * value.h: Declare "struct xmethod_worker". Declare new functions value_of_xmethod, call_xmethod. --- gdb/extension.h | 39 +++++++++++++++++++++++++++++++++++++++ 1 file changed, 39 insertions(+) (limited to 'gdb/extension.h') diff --git a/gdb/extension.h b/gdb/extension.h index 61dc81b551c..c08d98dadbc 100644 --- a/gdb/extension.h +++ b/gdb/extension.h @@ -21,6 +21,7 @@ #define EXTENSION_H #include "mi/mi-cmds.h" /* For PRINT_NO_VALUES, etc. */ +#include "common/vec.h" struct breakpoint; struct command_line; @@ -138,6 +139,26 @@ struct ext_lang_type_printers /* Type-printers from Python. */ void *py_type_printers; }; + +/* A type which holds its extension language specific xmethod worker data. */ + +struct xmethod_worker +{ + /* The language the xmethod worker is implemented in. */ + const struct extension_language_defn *extlang; + + /* The extension language specific data for this xmethod worker. */ + void *data; + + /* The TYPE_CODE_XMETHOD value corresponding to this worker. + Always use value_of_xmethod to access it. */ + struct value *value; +}; + +typedef struct xmethod_worker *xmethod_worker_ptr; +DEF_VEC_P (xmethod_worker_ptr); +typedef VEC (xmethod_worker_ptr) xmethod_worker_vec; + /* The interface for gdb's own extension(/scripting) language. */ extern const struct extension_language_defn extension_language_gdb; @@ -212,4 +233,22 @@ extern const struct extension_language_defn *get_breakpoint_cond_ext_lang extern int breakpoint_ext_lang_cond_says_stop (struct breakpoint *); +extern struct value *invoke_xmethod (struct xmethod_worker *, + struct value *, + struct value **, int nargs); + +extern struct xmethod_worker *clone_xmethod_worker (struct xmethod_worker *); + +extern struct xmethod_worker *new_xmethod_worker + (const struct extension_language_defn *extlang, void *data); + +extern void free_xmethod_worker (struct xmethod_worker *); + +extern void free_xmethod_worker_vec (void *vec); + +extern xmethod_worker_vec *get_matching_xmethod_workers + (struct type *, const char *); + +extern struct type **get_xmethod_arg_types (struct xmethod_worker *, int *); + #endif /* EXTENSION_H */ -- cgit v1.2.1