gdb/python/python-internal.h

   1 /* Gdb/Python header for private use by Python module.
   2
   3    Copyright (C) 2008-2014 Free Software Foundation, Inc.
   4
   5    This file is part of GDB.
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 3 of the License, or
  10    (at your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  19
  20 #ifndef GDB_PYTHON_INTERNAL_H
  21 #define GDB_PYTHON_INTERNAL_H
  22
  23 #include "extension.h"
  24
  25 /* These WITH_* macros are defined by the CPython API checker that
  26    comes with the Python plugin for GCC.  See:
  27    https://gcc-python-plugin.readthedocs.org/en/latest/cpychecker.html
  28    The checker defines a WITH_ macro for each attribute it
  29    exposes.  */
  30
  31 #ifdef WITH_CPYCHECKER_RETURNS_BORROWED_REF_ATTRIBUTE
  32 #define CPYCHECKER_RETURNS_BORROWED_REF                 \
  33   __attribute__ ((cpychecker_returns_borrowed_ref))
  34 #else
  35 #define CPYCHECKER_RETURNS_BORROWED_REF
  36 #endif
  37
  38 #ifdef WITH_CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF_ATTRIBUTE
  39 #define CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF(ARG)         \
  40   __attribute__ ((cpychecker_type_object_for_typedef (ARG)))
  41 #else
  42 #define CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF(ARG)
  43 #endif
  44
  45 #ifdef WITH_CPYCHECKER_STEALS_REFERENCE_TO_ARG_ATTRIBUTE
  46 #define CPYCHECKER_STEALS_REFERENCE_TO_ARG(n) \
  47    __attribute__ ((cpychecker_steals_reference_to_arg (n)))
  48 #else
  49 #define CPYCHECKER_STEALS_REFERENCE_TO_ARG(n)
  50 #endif
  51
  52 #ifdef WITH_CPYCHECKER_SETS_EXCEPTION_ATTRIBUTE
  53 #define CPYCHECKER_SETS_EXCEPTION __attribute__ ((cpychecker_sets_exception))
  54 #else
  55 #define CPYCHECKER_SETS_EXCEPTION
  56 #endif
  57
  58 #ifdef WITH_CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION_ATTRIBUTE
  59 #define CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION               \
  60   __attribute__ ((cpychecker_negative_result_sets_exception))
  61 #else
  62 #define CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION
  63 #endif
  64
  65 #include <stdio.h>
  66
  67 /* Python 2.4 doesn't include stdint.h soon enough to get {u,}intptr_t
  68    needed by pyport.h.  */
  69 #include <stdint.h>
  70
  71 /* /usr/include/features.h on linux systems will define _POSIX_C_SOURCE
  72    if it sees _GNU_SOURCE (which config.h will define).
  73    pyconfig.h defines _POSIX_C_SOURCE to a different value than
  74    /usr/include/features.h does causing compilation to fail.
  75    To work around this, undef _POSIX_C_SOURCE before we include Python.h.
  76
  77    Same problem with _XOPEN_SOURCE.  */
  78 #undef _POSIX_C_SOURCE
  79 #undef _XOPEN_SOURCE
  80
  81 /* On sparc-solaris, /usr/include/sys/feature_tests.h defines
  82    _FILE_OFFSET_BITS, which pyconfig.h also defines.  Same work
  83    around technique as above.  */
  84 #undef _FILE_OFFSET_BITS
  85
  86 /* A kludge to avoid redefinition of snprintf on Windows by pyerrors.h.  */
  87 #if defined(_WIN32) && defined(HAVE_DECL_SNPRINTF)
  88 #define HAVE_SNPRINTF 1
  89 #endif
  90
  91 /* Request clean size types from Python.  */
  92 #define PY_SSIZE_T_CLEAN
  93
  94 /* Include the Python header files using angle brackets rather than
  95    double quotes.  On case-insensitive filesystems, this prevents us
  96    from including our python/python.h header file.  */
  97 #include <Python.h>
  98 #include <frameobject.h>
  99
 100 #if PY_MAJOR_VERSION >= 3
 101 #define IS_PY3K 1
 102 #endif
 103
 104 #ifdef IS_PY3K
 105 #define Py_TPFLAGS_HAVE_ITER 0
 106 #define Py_TPFLAGS_CHECKTYPES 0
 107
 108 #define PyInt_Check PyLong_Check
 109 #define PyInt_FromLong PyLong_FromLong
 110 #define PyInt_AsLong PyLong_AsLong
 111
 112 #define PyString_FromString PyUnicode_FromString
 113 #define PyString_Decode PyUnicode_Decode
 114 #define PyString_FromFormat PyUnicode_FromFormat
 115 #define PyString_Check PyUnicode_Check
 116 #endif
 117
 118 #if HAVE_LIBPYTHON2_4
 119 /* Py_ssize_t is not defined until 2.5.
 120    Logical type for Py_ssize_t is Py_intptr_t, but that fails in 64-bit
 121    compilation due to several apparent mistakes in python2.4 API, so we
 122    use 'int' instead.  */
 123 typedef int Py_ssize_t;
 124 #endif
 125
 126 #ifndef PyVarObject_HEAD_INIT
 127 /* Python 2.4 does not define PyVarObject_HEAD_INIT.  */
 128 #define PyVarObject_HEAD_INIT(type, size)       \
 129     PyObject_HEAD_INIT(type) size,
 130
 131 #endif
 132
 133 #ifndef Py_TYPE
 134 /* Python 2.4 does not define Py_TYPE.  */
 135 #define Py_TYPE(ob)             (((PyObject*)(ob))->ob_type)
 136 #endif
 137
 138 /* If Python.h does not define WITH_THREAD, then the various
 139    GIL-related functions will not be defined.  However,
 140    PyGILState_STATE will be.  */
 141 #ifndef WITH_THREAD
 142 #define PyGILState_Ensure() ((PyGILState_STATE) 0)
 143 #define PyGILState_Release(ARG) ((void)(ARG))
 144 #define PyEval_InitThreads()
 145 #define PyThreadState_Swap(ARG) ((void)(ARG))
 146 #define PyEval_ReleaseLock()
 147 #endif
 148
 149 /* Python supplies HAVE_LONG_LONG and some `long long' support when it
 150    is available.  These defines let us handle the differences more
 151    cleanly.  */
 152 #ifdef HAVE_LONG_LONG
 153
 154 #define GDB_PY_LL_ARG "L"
 155 #define GDB_PY_LLU_ARG "K"
 156 typedef PY_LONG_LONG gdb_py_longest;
 157 typedef unsigned PY_LONG_LONG gdb_py_ulongest;
 158 #define gdb_py_long_from_longest PyLong_FromLongLong
 159 #define gdb_py_long_from_ulongest PyLong_FromUnsignedLongLong
 160 #define gdb_py_long_as_ulongest PyLong_AsUnsignedLongLong
 161
 162 #else /* HAVE_LONG_LONG */
 163
 164 #define GDB_PY_LL_ARG "L"
 165 #define GDB_PY_LLU_ARG "K"
 166 typedef long gdb_py_longest;
 167 typedef unsigned long gdb_py_ulongest;
 168 #define gdb_py_long_from_longest PyLong_FromLong
 169 #define gdb_py_long_from_ulongest PyLong_FromUnsignedLong
 170 #define gdb_py_long_as_ulongest PyLong_AsUnsignedLong
 171
 172 #endif /* HAVE_LONG_LONG */
 173
 174 /* Python 2.6 did not wrap Py_DECREF in 'do {...} while (0)', leading
 175    to 'suggest explicit braces to avoid ambiguous ‘else’' gcc errors.
 176    Wrap it ourselves, so that callers don't need to care.  */
 177
 178 static inline void
 179 gdb_Py_DECREF (void *op) /* ARI: editCase function */
 180 {
 181   /* ... and Python 2.4 didn't cast OP to PyObject pointer on the
 182      '(op)->ob_refcnt' references within the macro.  Cast it ourselves
 183      too.  */
 184   Py_DECREF ((PyObject *) op);
 185 }
 186
 187 #undef Py_DECREF
 188 #define Py_DECREF(op) gdb_Py_DECREF (op)
 189
 190 /* The second argument to PyObject_GetAttrString was missing the 'const'
 191    qualifier in Python-2.4.  Hence, we wrap it in a function to avoid errors
 192    when compiled with -Werror.  */
 193
 194 static inline PyObject *
 195 gdb_PyObject_GetAttrString (PyObject *obj,
 196                             const char *attr) /* ARI: editCase function */
 197 {
 198   return PyObject_GetAttrString (obj, (char *) attr);
 199 }
 200
 201 #define PyObject_GetAttrString(obj, attr) gdb_PyObject_GetAttrString (obj, attr)
 202
 203 /* The second argument to PyObject_HasAttrString was also missing the 'const'
 204    qualifier in Python-2.4.  Hence, we wrap it also in a function to avoid
 205    errors when compiled with -Werror.  */
 206
 207 static inline int
 208 gdb_PyObject_HasAttrString (PyObject *obj,
 209                             const char *attr)  /* ARI: editCase function */
 210 {
 211   return PyObject_HasAttrString (obj, (char *) attr);
 212 }
 213
 214 #define PyObject_HasAttrString(obj, attr) gdb_PyObject_HasAttrString (obj, attr)
 215
 216 /* In order to be able to parse symtab_and_line_to_sal_object function
 217    a real symtab_and_line structure is needed.  */
 218 #include "symtab.h"
 219
 220 /* Also needed to parse enum var_types. */
 221 #include "command.h"
 222 #include "breakpoint.h"
 223
 224 #include "exceptions.h"
 225
 226 enum gdbpy_iter_kind { iter_keys, iter_values, iter_items };
 227
 228 struct block;
 229 struct value;
 230 struct language_defn;
 231 struct program_space;
 232 struct bpstats;
 233 struct inferior;
 234
 235 extern int gdb_python_initialized;
 236
 237 extern PyObject *gdb_module;
 238 extern PyObject *gdb_python_module;
 239 extern PyTypeObject value_object_type
 240     CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF ("value_object");
 241 extern PyTypeObject block_object_type
 242     CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF("block_object");
 243 extern PyTypeObject symbol_object_type
 244     CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF ("symbol_object");
 245 extern PyTypeObject event_object_type
 246     CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF ("event_object");
 247 extern PyTypeObject stop_event_object_type
 248     CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF ("event_object");
 249 extern PyTypeObject breakpoint_object_type
 250     CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF ("breakpoint_object");
 251 extern PyTypeObject frame_object_type
 252     CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF ("frame_object");
 253
 254 typedef struct gdbpy_breakpoint_object
 255 {
 256   PyObject_HEAD
 257
 258   /* The breakpoint number according to gdb.  */
 259   int number;
 260
 261   /* The gdb breakpoint object, or NULL if the breakpoint has been
 262      deleted.  */
 263   struct breakpoint *bp;
 264
 265   /* 1 is this is a FinishBreakpoint object, 0 otherwise.  */
 266   int is_finish_bp;
 267 } gdbpy_breakpoint_object;
 268
 269 /* Require that BREAKPOINT be a valid breakpoint ID; throw a Python
 270    exception if it is invalid.  */
 271 #define BPPY_REQUIRE_VALID(Breakpoint)                                  \
 272     do {                                                                \
 273       if ((Breakpoint)->bp == NULL)                                     \
 274         return PyErr_Format (PyExc_RuntimeError,                        \
 275                              _("Breakpoint %d is invalid."),            \
 276                              (Breakpoint)->number);                     \
 277     } while (0)
 278
 279 /* Require that BREAKPOINT be a valid breakpoint ID; throw a Python
 280    exception if it is invalid.  This macro is for use in setter functions.  */
 281 #define BPPY_SET_REQUIRE_VALID(Breakpoint)                              \
 282     do {                                                                \
 283       if ((Breakpoint)->bp == NULL)                                     \
 284         {                                                               \
 285           PyErr_Format (PyExc_RuntimeError, _("Breakpoint %d is invalid."), \
 286                         (Breakpoint)->number);                          \
 287           return -1;                                                    \
 288         }                                                               \
 289     } while (0)
 290
 291
 292 /* Variables used to pass information between the Breakpoint
 293    constructor and the breakpoint-created hook function.  */
 294 extern gdbpy_breakpoint_object *bppy_pending_object;
 295
 296
 297 typedef struct
 298 {
 299   PyObject_HEAD
 300
 301   /* The thread we represent.  */
 302   struct thread_info *thread;
 303
 304   /* The Inferior object to which this thread belongs.  */
 305   PyObject *inf_obj;
 306 } thread_object;
 307
 308 extern struct cmd_list_element *set_python_list;
 309 extern struct cmd_list_element *show_python_list;
 310 \f
 311 /* extension_language_script_ops "methods".  */
 312
 313 extern int gdbpy_auto_load_enabled (const struct extension_language_defn *);
 314
 315 /* extension_language_ops "methods".  */
 316
 317 extern enum ext_lang_rc gdbpy_apply_val_pretty_printer
 318   (const struct extension_language_defn *,
 319    struct type *type, const gdb_byte *valaddr,
 320    int embedded_offset, CORE_ADDR address,
 321    struct ui_file *stream, int recurse,
 322    const struct value *val,
 323    const struct value_print_options *options,
 324    const struct language_defn *language);
 325 extern enum ext_lang_bt_status gdbpy_apply_frame_filter
 326   (const struct extension_language_defn *,
 327    struct frame_info *frame, int flags, enum ext_lang_frame_args args_type,
 328    struct ui_out *out, int frame_low, int frame_high);
 329 extern void gdbpy_preserve_values (const struct extension_language_defn *,
 330                                    struct objfile *objfile,
 331                                    htab_t copied_types);
 332 extern enum ext_lang_bp_stop gdbpy_breakpoint_cond_says_stop
 333   (const struct extension_language_defn *, struct breakpoint *);
 334 extern int gdbpy_breakpoint_has_cond (const struct extension_language_defn *,
 335                                       struct breakpoint *b);
 336
 337 extern void *gdbpy_clone_xmethod_worker_data
 338   (const struct extension_language_defn *extlang, void *data);
 339 extern void gdbpy_free_xmethod_worker_data
 340   (const struct extension_language_defn *extlang, void *data);
 341 extern enum ext_lang_rc gdbpy_get_matching_xmethod_workers
 342   (const struct extension_language_defn *extlang,
 343    struct type *obj_type, const char *method_name,
 344    xmethod_worker_vec **dm_vec);
 345 extern enum ext_lang_rc gdbpy_get_xmethod_arg_types
 346   (const struct extension_language_defn *extlang,
 347    struct xmethod_worker *worker,
 348    int *nargs,
 349    struct type ***arg_types);
 350 extern struct value *gdbpy_invoke_xmethod
 351   (const struct extension_language_defn *extlang,
 352    struct xmethod_worker *worker,
 353    struct value *obj, struct value **args, int nargs);
 354 \f
 355 PyObject *gdbpy_history (PyObject *self, PyObject *args);
 356 PyObject *gdbpy_breakpoints (PyObject *, PyObject *);
 357 PyObject *gdbpy_frame_stop_reason_string (PyObject *, PyObject *);
 358 PyObject *gdbpy_lookup_symbol (PyObject *self, PyObject *args, PyObject *kw);
 359 PyObject *gdbpy_lookup_global_symbol (PyObject *self, PyObject *args,
 360                                       PyObject *kw);
 361 PyObject *gdbpy_newest_frame (PyObject *self, PyObject *args);
 362 PyObject *gdbpy_selected_frame (PyObject *self, PyObject *args);
 363 PyObject *gdbpy_block_for_pc (PyObject *self, PyObject *args);
 364 PyObject *gdbpy_lookup_type (PyObject *self, PyObject *args, PyObject *kw);
 365 int gdbpy_is_field (PyObject *obj);
 366 PyObject *gdbpy_create_lazy_string_object (CORE_ADDR address, long length,
 367                                            const char *encoding,
 368                                            struct type *type);
 369 PyObject *gdbpy_inferiors (PyObject *unused, PyObject *unused2);
 370 PyObject *gdbpy_selected_thread (PyObject *self, PyObject *args);
 371 PyObject *gdbpy_selected_inferior (PyObject *self, PyObject *args);
 372 PyObject *gdbpy_string_to_argv (PyObject *self, PyObject *args);
 373 PyObject *gdbpy_parameter (PyObject *self, PyObject *args);
 374 PyObject *gdbpy_parameter_value (enum var_types type, void *var);
 375 char *gdbpy_parse_command_name (const char *name,
 376                                 struct cmd_list_element ***base_list,
 377                                 struct cmd_list_element **start_list);
 378
 379 PyObject *symtab_and_line_to_sal_object (struct symtab_and_line sal);
 380 PyObject *symtab_to_symtab_object (struct symtab *symtab);
 381 PyObject *symbol_to_symbol_object (struct symbol *sym);
 382 PyObject *block_to_block_object (const struct block *block,
 383                                  struct objfile *objfile);
 384 PyObject *value_to_value_object (struct value *v);
 385 PyObject *type_to_type_object (struct type *);
 386 PyObject *frame_info_to_frame_object (struct frame_info *frame);
 387 PyObject *symtab_to_linetable_object (PyObject *symtab);
 388 PyObject *pspace_to_pspace_object (struct program_space *)
 389     CPYCHECKER_RETURNS_BORROWED_REF;
 390 PyObject *pspy_get_printers (PyObject *, void *);
 391 PyObject *pspy_get_frame_filters (PyObject *, void *);
 392 PyObject *pspy_get_xmethods (PyObject *, void *);
 393
 394 PyObject *objfile_to_objfile_object (struct objfile *)
 395     CPYCHECKER_RETURNS_BORROWED_REF;
 396 PyObject *objfpy_get_printers (PyObject *, void *);
 397 PyObject *objfpy_get_frame_filters (PyObject *, void *);
 398 PyObject *objfpy_get_xmethods (PyObject *, void *);
 399
 400 PyObject *gdbarch_to_arch_object (struct gdbarch *gdbarch);
 401
 402 thread_object *create_thread_object (struct thread_info *tp);
 403 thread_object *find_thread_object (ptid_t ptid)
 404     CPYCHECKER_RETURNS_BORROWED_REF;
 405 PyObject *find_inferior_object (int pid);
 406 PyObject *inferior_to_inferior_object (struct inferior *inferior);
 407
 408 const struct block *block_object_to_block (PyObject *obj);
 409 struct symbol *symbol_object_to_symbol (PyObject *obj);
 410 struct value *value_object_to_value (PyObject *self);
 411 struct value *convert_value_from_python (PyObject *obj);
 412 struct type *type_object_to_type (PyObject *obj);
 413 struct symtab *symtab_object_to_symtab (PyObject *obj);
 414 struct symtab_and_line *sal_object_to_symtab_and_line (PyObject *obj);
 415 struct frame_info *frame_object_to_frame_info (PyObject *frame_obj);
 416 struct gdbarch *arch_object_to_gdbarch (PyObject *obj);
 417
 418 void gdbpy_initialize_gdb_readline (void);
 419 int gdbpy_initialize_auto_load (void)
 420   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 421 int gdbpy_initialize_values (void)
 422   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 423 int gdbpy_initialize_frames (void)
 424   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 425 int gdbpy_initialize_symtabs (void)
 426   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 427 int gdbpy_initialize_commands (void)
 428   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 429 int gdbpy_initialize_symbols (void)
 430   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 431 int gdbpy_initialize_symtabs (void)
 432   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 433 int gdbpy_initialize_blocks (void)
 434   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 435 int gdbpy_initialize_types (void)
 436   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 437 int gdbpy_initialize_functions (void)
 438   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 439 int gdbpy_initialize_pspace (void)
 440   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 441 int gdbpy_initialize_objfile (void)
 442   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 443 int gdbpy_initialize_breakpoints (void)
 444   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 445 int gdbpy_initialize_finishbreakpoints (void)
 446   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 447 int gdbpy_initialize_lazy_string (void)
 448   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 449 int gdbpy_initialize_linetable (void)
 450   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 451 int gdbpy_initialize_parameters (void)
 452   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 453 int gdbpy_initialize_thread (void)
 454   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 455 int gdbpy_initialize_inferior (void)
 456   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 457 int gdbpy_initialize_eventregistry (void)
 458   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 459 int gdbpy_initialize_event (void)
 460   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 461 int gdbpy_initialize_py_events (void)
 462   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 463 int gdbpy_initialize_stop_event (void)
 464   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 465 int gdbpy_initialize_signal_event (void)
 466   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 467 int gdbpy_initialize_breakpoint_event (void)
 468   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 469 int gdbpy_initialize_continue_event (void)
 470   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 471 int gdbpy_initialize_exited_event (void)
 472   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 473 int gdbpy_initialize_thread_event (void)
 474   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 475 int gdbpy_initialize_new_objfile_event (void)
 476   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 477 int gdbpy_initialize_arch (void)
 478   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 479 int gdbpy_initialize_xmethods (void)
 480   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 481
 482 struct cleanup *make_cleanup_py_decref (PyObject *py);
 483 struct cleanup *make_cleanup_py_xdecref (PyObject *py);
 484
 485 struct cleanup *ensure_python_env (struct gdbarch *gdbarch,
 486                                    const struct language_defn *language);
 487
 488 extern struct gdbarch *python_gdbarch;
 489 extern const struct language_defn *python_language;
 490
 491 /* Use this after a TRY_EXCEPT to throw the appropriate Python
 492    exception.  */
 493 #define GDB_PY_HANDLE_EXCEPTION(Exception)      \
 494   do {                                          \
 495     if (Exception.reason < 0)                   \
 496       {                                         \
 497         gdbpy_convert_exception (Exception);    \
 498         return NULL;                            \
 499       }                                         \
 500   } while (0)
 501
 502 /* Use this after a TRY_EXCEPT to throw the appropriate Python
 503    exception.  This macro is for use inside setter functions.  */
 504 #define GDB_PY_SET_HANDLE_EXCEPTION(Exception)                          \
 505     do {                                                                \
 506       if (Exception.reason < 0)                                         \
 507         {                                                               \
 508           gdbpy_convert_exception (Exception);                          \
 509           return -1;                                                    \
 510         }                                                               \
 511     } while (0)
 512
 513 void gdbpy_print_stack (void);
 514
 515 PyObject *python_string_to_unicode (PyObject *obj);
 516 char *unicode_to_target_string (PyObject *unicode_str);
 517 char *python_string_to_target_string (PyObject *obj);
 518 PyObject *python_string_to_target_python_string (PyObject *obj);
 519 char *python_string_to_host_string (PyObject *obj);
 520 int gdbpy_is_string (PyObject *obj);
 521 char *gdbpy_obj_to_string (PyObject *obj);
 522 char *gdbpy_exception_to_string (PyObject *ptype, PyObject *pvalue);
 523
 524 int gdbpy_is_lazy_string (PyObject *result);
 525 void gdbpy_extract_lazy_string (PyObject *string, CORE_ADDR *addr,
 526                                 struct type **str_type,
 527                                 long *length, char **encoding);
 528
 529 int gdbpy_is_value_object (PyObject *obj);
 530
 531 /* Note that these are declared here, and not in python.h with the
 532    other pretty-printer functions, because they refer to PyObject.  */
 533 PyObject *apply_varobj_pretty_printer (PyObject *print_obj,
 534                                        struct value **replacement,
 535                                        struct ui_file *stream);
 536 PyObject *gdbpy_get_varobj_pretty_printer (struct value *value);
 537 char *gdbpy_get_display_hint (PyObject *printer);
 538 PyObject *gdbpy_default_visualizer (PyObject *self, PyObject *args);
 539
 540 void bpfinishpy_pre_stop_hook (struct gdbpy_breakpoint_object *bp_obj);
 541 void bpfinishpy_post_stop_hook (struct gdbpy_breakpoint_object *bp_obj);
 542
 543 extern PyObject *gdbpy_doc_cst;
 544 extern PyObject *gdbpy_children_cst;
 545 extern PyObject *gdbpy_to_string_cst;
 546 extern PyObject *gdbpy_display_hint_cst;
 547 extern PyObject *gdbpy_enabled_cst;
 548 extern PyObject *gdbpy_value_cst;
 549
 550 /* Exception types.  */
 551 extern PyObject *gdbpy_gdb_error;
 552 extern PyObject *gdbpy_gdb_memory_error;
 553 extern PyObject *gdbpy_gdberror_exc;
 554
 555 extern void gdbpy_convert_exception (struct gdb_exception)
 556     CPYCHECKER_SETS_EXCEPTION;
 557
 558 int get_addr_from_python (PyObject *obj, CORE_ADDR *addr)
 559     CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 560
 561 PyObject *gdb_py_object_from_longest (LONGEST l);
 562 PyObject *gdb_py_object_from_ulongest (ULONGEST l);
 563 int gdb_py_int_as_long (PyObject *, long *);
 564
 565 PyObject *gdb_py_generic_dict (PyObject *self, void *closure);
 566
 567 int gdb_pymodule_addobject (PyObject *module, const char *name,
 568                             PyObject *object)
 569   CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION;
 570
 571 #endif /* GDB_PYTHON_INTERNAL_H */