1 /* Gdb/Python header for private use by Python module.
2 
3    Copyright (C) 2008-2012 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 <stdio.h>
24 
25 /* Python 2.4 doesn't include stdint.h soon enough to get {u,}intptr_t
26    needed by pyport.h.  */
27 #include <stdint.h>
28 
29 /* /usr/include/features.h on linux systems will define _POSIX_C_SOURCE
30    if it sees _GNU_SOURCE (which config.h will define).
31    pyconfig.h defines _POSIX_C_SOURCE to a different value than
32    /usr/include/features.h does causing compilation to fail.
33    To work around this, undef _POSIX_C_SOURCE before we include Python.h.
34 
35    Same problem with _XOPEN_SOURCE.  */
36 #undef _POSIX_C_SOURCE
37 #undef _XOPEN_SOURCE
38 
39 /* On sparc-solaris, /usr/include/sys/feature_tests.h defines
40    _FILE_OFFSET_BITS, which pyconfig.h also defines.  Same work
41    around technique as above.  */
42 #undef _FILE_OFFSET_BITS
43 
44 /* Request clean size types from Python.  */
45 #define PY_SSIZE_T_CLEAN
46 
47 /* Include the Python header files using angle brackets rather than
48    double quotes.  On case-insensitive filesystems, this prevents us
49    from including our python/python.h header file.  */
50 #include <Python.h>
51 #include <frameobject.h>
52 #if HAVE_LIBPYTHON2_4
53 /* Py_ssize_t is not defined until 2.5.
54    Logical type for Py_ssize_t is Py_intptr_t, but that fails in 64-bit
55    compilation due to several apparent mistakes in python2.4 API, so we
56    use 'int' instead.  */
57 typedef int Py_ssize_t;
58 #endif
59 
60 /* If Python.h does not define WITH_THREAD, then the various
61    GIL-related functions will not be defined.  However,
62    PyGILState_STATE will be.  */
63 #ifndef WITH_THREAD
64 #define PyGILState_Ensure() ((PyGILState_STATE) 0)
65 #define PyGILState_Release(ARG) ((void)(ARG))
66 #define PyEval_InitThreads()
67 #define PyThreadState_Swap(ARG) ((void)(ARG))
68 #define PyEval_ReleaseLock()
69 #endif
70 
71 /* Python supplies HAVE_LONG_LONG and some `long long' support when it
72    is available.  These defines let us handle the differences more
73    cleanly.  */
74 #ifdef HAVE_LONG_LONG
75 
76 #define GDB_PY_LL_ARG "L"
77 #define GDB_PY_LLU_ARG "K"
78 typedef PY_LONG_LONG gdb_py_longest;
79 typedef unsigned PY_LONG_LONG gdb_py_ulongest;
80 #define gdb_py_long_from_longest PyLong_FromLongLong
81 #define gdb_py_long_from_ulongest PyLong_FromUnsignedLongLong
82 #define gdb_py_long_as_ulongest PyLong_AsUnsignedLongLong
83 
84 #else /* HAVE_LONG_LONG */
85 
86 #define GDB_PY_LL_ARG "L"
87 #define GDB_PY_LLU_ARG "K"
88 typedef long gdb_py_longest;
89 typedef unsigned long gdb_py_ulongest;
90 #define gdb_py_long_from_longest PyLong_FromLong
91 #define gdb_py_long_from_ulongest PyLong_FromUnsignedLong
92 #define gdb_py_long_as_ulongest PyLong_AsUnsignedLong
93 
94 #endif /* HAVE_LONG_LONG */
95 
96 
97 /* In order to be able to parse symtab_and_line_to_sal_object function
98    a real symtab_and_line structure is needed.  */
99 #include "symtab.h"
100 
101 /* Also needed to parse enum var_types. */
102 #include "command.h"
103 #include "breakpoint.h"
104 
105 #include "exceptions.h"
106 
107 enum gdbpy_iter_kind { iter_keys, iter_values, iter_items };
108 
109 struct block;
110 struct value;
111 struct language_defn;
112 struct program_space;
113 struct bpstats;
114 struct inferior;
115 
116 extern PyObject *gdb_module;
117 extern PyTypeObject value_object_type;
118 extern PyTypeObject block_object_type;
119 extern PyTypeObject symbol_object_type;
120 extern PyTypeObject event_object_type;
121 extern PyTypeObject events_object_type;
122 extern PyTypeObject stop_event_object_type;
123 extern PyTypeObject breakpoint_object_type;
124 
125 typedef struct breakpoint_object
126 {
127   PyObject_HEAD
128 
129   /* The breakpoint number according to gdb.  */
130   int number;
131 
132   /* The gdb breakpoint object, or NULL if the breakpoint has been
133      deleted.  */
134   struct breakpoint *bp;
135 
136   /* 1 is this is a FinishBreakpoint object, 0 otherwise.  */
137   int is_finish_bp;
138 } breakpoint_object;
139 
140 /* Require that BREAKPOINT be a valid breakpoint ID; throw a Python
141    exception if it is invalid.  */
142 #define BPPY_REQUIRE_VALID(Breakpoint)                                  \
143     do {                                                                \
144       if ((Breakpoint)->bp == NULL)                                     \
145         return PyErr_Format (PyExc_RuntimeError,                        \
146                              _("Breakpoint %d is invalid."),            \
147                              (Breakpoint)->number);                     \
148     } while (0)
149 
150 /* Require that BREAKPOINT be a valid breakpoint ID; throw a Python
151    exception if it is invalid.  This macro is for use in setter functions.  */
152 #define BPPY_SET_REQUIRE_VALID(Breakpoint)                              \
153     do {                                                                \
154       if ((Breakpoint)->bp == NULL)                                     \
155         {                                                               \
156           PyErr_Format (PyExc_RuntimeError, _("Breakpoint %d is invalid."), \
157                         (Breakpoint)->number);                          \
158           return -1;                                                    \
159         }                                                               \
160     } while (0)
161 
162 
163 /* Variables used to pass information between the Breakpoint
164    constructor and the breakpoint-created hook function.  */
165 extern breakpoint_object *bppy_pending_object;
166 
167 
168 typedef struct
169 {
170   PyObject_HEAD
171 
172   /* The thread we represent.  */
173   struct thread_info *thread;
174 
175   /* The Inferior object to which this thread belongs.  */
176   PyObject *inf_obj;
177 } thread_object;
178 
179 extern struct cmd_list_element *set_python_list;
180 extern struct cmd_list_element *show_python_list;
181 
182 PyObject *gdbpy_history (PyObject *self, PyObject *args);
183 PyObject *gdbpy_breakpoints (PyObject *, PyObject *);
184 PyObject *gdbpy_frame_stop_reason_string (PyObject *, PyObject *);
185 PyObject *gdbpy_lookup_symbol (PyObject *self, PyObject *args, PyObject *kw);
186 PyObject *gdbpy_lookup_global_symbol (PyObject *self, PyObject *args,
187 				      PyObject *kw);
188 PyObject *gdbpy_newest_frame (PyObject *self, PyObject *args);
189 PyObject *gdbpy_selected_frame (PyObject *self, PyObject *args);
190 PyObject *gdbpy_block_for_pc (PyObject *self, PyObject *args);
191 PyObject *gdbpy_lookup_type (PyObject *self, PyObject *args, PyObject *kw);
192 PyObject *gdbpy_create_lazy_string_object (CORE_ADDR address, long length,
193 					   const char *encoding,
194 					   struct type *type);
195 PyObject *gdbpy_inferiors (PyObject *unused, PyObject *unused2);
196 PyObject *gdbpy_selected_thread (PyObject *self, PyObject *args);
197 PyObject *gdbpy_selected_inferior (PyObject *self, PyObject *args);
198 PyObject *gdbpy_string_to_argv (PyObject *self, PyObject *args);
199 PyObject *gdbpy_parameter (PyObject *self, PyObject *args);
200 PyObject *gdbpy_parameter_value (enum var_types type, void *var);
201 char *gdbpy_parse_command_name (const char *name,
202 				struct cmd_list_element ***base_list,
203 				struct cmd_list_element **start_list);
204 
205 PyObject *symtab_and_line_to_sal_object (struct symtab_and_line sal);
206 PyObject *symtab_to_symtab_object (struct symtab *symtab);
207 PyObject *symbol_to_symbol_object (struct symbol *sym);
208 PyObject *block_to_block_object (const struct block *block,
209 				 struct objfile *objfile);
210 PyObject *value_to_value_object (struct value *v);
211 PyObject *type_to_type_object (struct type *);
212 PyObject *frame_info_to_frame_object (struct frame_info *frame);
213 
214 PyObject *pspace_to_pspace_object (struct program_space *);
215 PyObject *pspy_get_printers (PyObject *, void *);
216 
217 PyObject *objfile_to_objfile_object (struct objfile *);
218 PyObject *objfpy_get_printers (PyObject *, void *);
219 
220 thread_object *create_thread_object (struct thread_info *tp);
221 thread_object *find_thread_object (ptid_t ptid);
222 PyObject *find_inferior_object (int pid);
223 PyObject *inferior_to_inferior_object (struct inferior *inferior);
224 
225 const struct block *block_object_to_block (PyObject *obj);
226 struct symbol *symbol_object_to_symbol (PyObject *obj);
227 struct value *value_object_to_value (PyObject *self);
228 struct value *convert_value_from_python (PyObject *obj);
229 struct type *type_object_to_type (PyObject *obj);
230 struct symtab *symtab_object_to_symtab (PyObject *obj);
231 struct symtab_and_line *sal_object_to_symtab_and_line (PyObject *obj);
232 struct frame_info *frame_object_to_frame_info (PyObject *frame_obj);
233 
234 void gdbpy_initialize_auto_load (void);
235 void gdbpy_initialize_values (void);
236 void gdbpy_initialize_frames (void);
237 void gdbpy_initialize_symtabs (void);
238 void gdbpy_initialize_commands (void);
239 void gdbpy_initialize_symbols (void);
240 void gdbpy_initialize_symtabs (void);
241 void gdbpy_initialize_blocks (void);
242 void gdbpy_initialize_types (void);
243 void gdbpy_initialize_functions (void);
244 void gdbpy_initialize_pspace (void);
245 void gdbpy_initialize_objfile (void);
246 void gdbpy_initialize_breakpoints (void);
247 void gdbpy_initialize_finishbreakpoints (void);
248 void gdbpy_initialize_lazy_string (void);
249 void gdbpy_initialize_parameters (void);
250 void gdbpy_initialize_thread (void);
251 void gdbpy_initialize_inferior (void);
252 void gdbpy_initialize_eventregistry (void);
253 void gdbpy_initialize_event (void);
254 void gdbpy_initialize_py_events (void);
255 void gdbpy_initialize_stop_event (void);
256 void gdbpy_initialize_signal_event (void);
257 void gdbpy_initialize_breakpoint_event (void);
258 void gdbpy_initialize_continue_event (void);
259 void gdbpy_initialize_exited_event (void);
260 void gdbpy_initialize_thread_event (void);
261 void gdbpy_initialize_new_objfile_event (void);
262 
263 struct cleanup *make_cleanup_py_decref (PyObject *py);
264 
265 struct cleanup *ensure_python_env (struct gdbarch *gdbarch,
266 				   const struct language_defn *language);
267 
268 extern struct gdbarch *python_gdbarch;
269 extern const struct language_defn *python_language;
270 
271 /* Use this after a TRY_EXCEPT to throw the appropriate Python
272    exception.  */
273 #define GDB_PY_HANDLE_EXCEPTION(Exception)				\
274     do {								\
275       if (Exception.reason < 0)						\
276 	return gdbpy_convert_exception (Exception);			\
277     } while (0)
278 
279 /* Use this after a TRY_EXCEPT to throw the appropriate Python
280    exception.  This macro is for use inside setter functions.  */
281 #define GDB_PY_SET_HANDLE_EXCEPTION(Exception)				\
282     do {								\
283       if (Exception.reason < 0)						\
284         {								\
285 	  gdbpy_convert_exception (Exception);				\
286 	  return -1;							\
287 	}								\
288     } while (0)
289 
290 void gdbpy_print_stack (void);
291 
292 void source_python_script_for_objfile (struct objfile *objfile,
293 				       const char *file);
294 
295 PyObject *python_string_to_unicode (PyObject *obj);
296 char *unicode_to_target_string (PyObject *unicode_str);
297 char *python_string_to_target_string (PyObject *obj);
298 PyObject *python_string_to_target_python_string (PyObject *obj);
299 char *python_string_to_host_string (PyObject *obj);
300 PyObject *target_string_to_unicode (const gdb_byte *str, int length);
301 int gdbpy_is_string (PyObject *obj);
302 char *gdbpy_obj_to_string (PyObject *obj);
303 char *gdbpy_exception_to_string (PyObject *ptype, PyObject *pvalue);
304 
305 int gdbpy_is_lazy_string (PyObject *result);
306 void gdbpy_extract_lazy_string (PyObject *string, CORE_ADDR *addr,
307 				struct type **str_type,
308 				long *length, char **encoding);
309 
310 int gdbpy_is_value_object (PyObject *obj);
311 
312 /* Note that these are declared here, and not in python.h with the
313    other pretty-printer functions, because they refer to PyObject.  */
314 PyObject *apply_varobj_pretty_printer (PyObject *print_obj,
315 				       struct value **replacement,
316 				       struct ui_file *stream);
317 PyObject *gdbpy_get_varobj_pretty_printer (struct value *value);
318 char *gdbpy_get_display_hint (PyObject *printer);
319 PyObject *gdbpy_default_visualizer (PyObject *self, PyObject *args);
320 
321 void bpfinishpy_pre_stop_hook (struct breakpoint_object *bp_obj);
322 void bpfinishpy_post_stop_hook (struct breakpoint_object *bp_obj);
323 
324 extern PyObject *gdbpy_doc_cst;
325 extern PyObject *gdbpy_children_cst;
326 extern PyObject *gdbpy_to_string_cst;
327 extern PyObject *gdbpy_display_hint_cst;
328 extern PyObject *gdbpy_enabled_cst;
329 extern PyObject *gdbpy_value_cst;
330 
331 /* Exception types.  */
332 extern PyObject *gdbpy_gdb_error;
333 extern PyObject *gdbpy_gdb_memory_error;
334 extern PyObject *gdbpy_gdberror_exc;
335 
336 extern PyObject *gdbpy_convert_exception (struct gdb_exception);
337 
338 int get_addr_from_python (PyObject *obj, CORE_ADDR *addr);
339 
340 PyObject *gdb_py_object_from_longest (LONGEST l);
341 PyObject *gdb_py_object_from_ulongest (ULONGEST l);
342 int gdb_py_int_as_long (PyObject *, long *);
343 
344 #endif /* GDB_PYTHON_INTERNAL_H */
345