1 /* TUI windows implemented in Python
3 Copyright (C) 2020-2021 Free Software Foundation, Inc.
5 This file is part of GDB.
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.
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.
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/>. */
22 #include "arch-utils.h"
23 #include "python-internal.h"
27 /* Note that Python's public headers may define HAVE_NCURSES_H, so if
28 we unconditionally include this (outside the #ifdef above), then we
29 can get a compile error when ncurses is not in fact installed. See
30 PR tui/25597; or the upstream Python bug
31 https://bugs.python.org/issue20768. */
32 #include "gdb_curses.h"
34 #include "tui/tui-data.h"
35 #include "tui/tui-io.h"
36 #include "tui/tui-layout.h"
37 #include "tui/tui-wingeneral.h"
38 #include "tui/tui-winsource.h"
42 /* A PyObject representing a TUI window. */
44 struct gdbpy_tui_window
48 /* The TUI window, or nullptr if the window has been deleted. */
49 tui_py_window
*window
;
51 /* Return true if this object is valid. */
52 bool is_valid () const;
55 extern PyTypeObject gdbpy_tui_window_object_type
56 CPYCHECKER_TYPE_OBJECT_FOR_TYPEDEF ("gdbpy_tui_window");
58 /* A TUI window written in Python. */
60 class tui_py_window
: public tui_win_info
64 tui_py_window (const char *name
, gdbpy_ref
<gdbpy_tui_window
> wrapper
)
66 m_wrapper (std::move (wrapper
))
68 m_wrapper
->window
= this;
73 DISABLE_COPY_AND_ASSIGN (tui_py_window
);
75 /* Set the "user window" to the indicated reference. The user
76 window is the object returned the by user-defined window
78 void set_user_window (gdbpy_ref
<> &&user_window
)
80 m_window
= std::move (user_window
);
83 const char *name () const override
85 return m_name
.c_str ();
88 void rerender () override
;
89 void do_scroll_vertical (int num_to_scroll
) override
;
90 void do_scroll_horizontal (int num_to_scroll
) override
;
92 void refresh_window () override
94 tui_win_info::refresh_window ();
95 if (m_inner_window
!= nullptr)
97 touchwin (m_inner_window
.get ());
98 tui_wrefresh (m_inner_window
.get ());
102 /* Erase and re-box the window. */
105 if (is_visible () && m_inner_window
!= nullptr)
107 werase (m_inner_window
.get ());
108 check_and_display_highlight_if_needed ();
112 /* Write STR to the window. */
113 void output (const char *str
);
115 /* A helper function to compute the viewport width. */
116 int viewport_width () const
118 return std::max (0, width
- 2);
121 /* A helper function to compute the viewport height. */
122 int viewport_height () const
124 return std::max (0, height
- 2);
129 /* The name of this window. */
132 /* We make our own inner window, so that it is easy to print without
133 overwriting the border. */
134 std::unique_ptr
<WINDOW
, curses_deleter
> m_inner_window
;
136 /* The underlying Python window object. */
137 gdbpy_ref
<> m_window
;
139 /* The Python wrapper for this object. */
140 gdbpy_ref
<gdbpy_tui_window
> m_wrapper
;
143 /* See gdbpy_tui_window declaration above. */
146 gdbpy_tui_window::is_valid () const
148 return window
!= nullptr && tui_active
;
151 tui_py_window::~tui_py_window ()
153 gdbpy_enter
enter_py (get_current_arch (), current_language
);
155 /* This can be null if the user-provided Python construction
157 if (m_window
!= nullptr
158 && PyObject_HasAttrString (m_window
.get (), "close"))
160 gdbpy_ref
<> result (PyObject_CallMethod (m_window
.get (), "close",
162 if (result
== nullptr)
163 gdbpy_print_stack ();
167 m_wrapper
->window
= nullptr;
168 /* Explicitly free the Python references. We have to do this
169 manually because we need to hold the GIL while doing so. */
170 m_wrapper
.reset (nullptr);
171 m_window
.reset (nullptr);
175 tui_py_window::rerender ()
177 tui_win_info::rerender ();
179 gdbpy_enter
enter_py (get_current_arch (), current_language
);
181 int h
= viewport_height ();
182 int w
= viewport_width ();
183 if (h
== 0 || w
== 0)
185 /* The window would be too small, so just remove the
187 m_inner_window
.reset (nullptr);
190 m_inner_window
.reset (newwin (h
, w
, y
+ 1, x
+ 1));
192 if (PyObject_HasAttrString (m_window
.get (), "render"))
194 gdbpy_ref
<> result (PyObject_CallMethod (m_window
.get (), "render",
196 if (result
== nullptr)
197 gdbpy_print_stack ();
202 tui_py_window::do_scroll_horizontal (int num_to_scroll
)
204 gdbpy_enter
enter_py (get_current_arch (), current_language
);
206 if (PyObject_HasAttrString (m_window
.get (), "hscroll"))
208 gdbpy_ref
<> result (PyObject_CallMethod (m_window
.get(), "hscroll",
209 "i", num_to_scroll
, nullptr));
210 if (result
== nullptr)
211 gdbpy_print_stack ();
216 tui_py_window::do_scroll_vertical (int num_to_scroll
)
218 gdbpy_enter
enter_py (get_current_arch (), current_language
);
220 if (PyObject_HasAttrString (m_window
.get (), "vscroll"))
222 gdbpy_ref
<> result (PyObject_CallMethod (m_window
.get (), "vscroll",
223 "i", num_to_scroll
, nullptr));
224 if (result
== nullptr)
225 gdbpy_print_stack ();
230 tui_py_window::output (const char *text
)
232 if (m_inner_window
!= nullptr)
234 tui_puts (text
, m_inner_window
.get ());
235 tui_wrefresh (m_inner_window
.get ());
241 /* A callable that is used to create a TUI window. It wraps the
242 user-supplied window constructor. */
244 class gdbpy_tui_window_maker
248 explicit gdbpy_tui_window_maker (gdbpy_ref
<> &&constr
)
249 : m_constr (std::move (constr
))
253 ~gdbpy_tui_window_maker ();
255 gdbpy_tui_window_maker (gdbpy_tui_window_maker
&&other
) noexcept
256 : m_constr (std::move (other
.m_constr
))
260 gdbpy_tui_window_maker (const gdbpy_tui_window_maker
&other
)
262 gdbpy_enter
enter_py (get_current_arch (), current_language
);
263 m_constr
= other
.m_constr
;
266 gdbpy_tui_window_maker
&operator= (gdbpy_tui_window_maker
&&other
)
268 m_constr
= std::move (other
.m_constr
);
272 gdbpy_tui_window_maker
&operator= (const gdbpy_tui_window_maker
&other
)
274 gdbpy_enter
enter_py (get_current_arch (), current_language
);
275 m_constr
= other
.m_constr
;
279 tui_win_info
*operator() (const char *name
);
283 /* A constructor that is called to make a TUI window. */
284 gdbpy_ref
<> m_constr
;
287 gdbpy_tui_window_maker::~gdbpy_tui_window_maker ()
289 gdbpy_enter
enter_py (get_current_arch (), current_language
);
290 m_constr
.reset (nullptr);
294 gdbpy_tui_window_maker::operator() (const char *win_name
)
296 gdbpy_enter
enter_py (get_current_arch (), current_language
);
298 gdbpy_ref
<gdbpy_tui_window
> wrapper
299 (PyObject_New (gdbpy_tui_window
, &gdbpy_tui_window_object_type
));
300 if (wrapper
== nullptr)
302 gdbpy_print_stack ();
306 std::unique_ptr
<tui_py_window
> window
307 (new tui_py_window (win_name
, wrapper
));
309 gdbpy_ref
<> user_window
310 (PyObject_CallFunctionObjArgs (m_constr
.get (),
311 (PyObject
*) wrapper
.get (),
313 if (user_window
== nullptr)
315 gdbpy_print_stack ();
319 window
->set_user_window (std::move (user_window
));
320 /* Window is now owned by the TUI. */
321 return window
.release ();
324 /* Implement "gdb.register_window_type". */
327 gdbpy_register_tui_window (PyObject
*self
, PyObject
*args
, PyObject
*kw
)
329 static const char *keywords
[] = { "name", "constructor", nullptr };
334 if (!gdb_PyArg_ParseTupleAndKeywords (args
, kw
, "sO", keywords
,
340 gdbpy_tui_window_maker
constr (gdbpy_ref
<>::new_reference (cons_obj
));
341 tui_register_window (name
, constr
);
343 catch (const gdb_exception
&except
)
345 gdbpy_convert_exception (except
);
354 /* Require that "Window" be a valid window. */
356 #define REQUIRE_WINDOW(Window) \
358 if (!(Window)->is_valid ()) \
359 return PyErr_Format (PyExc_RuntimeError, \
360 _("TUI window is invalid.")); \
363 /* Require that "Window" be a valid window. */
365 #define REQUIRE_WINDOW_FOR_SETTER(Window) \
367 if (!(Window)->is_valid ()) \
369 PyErr_Format (PyExc_RuntimeError, \
370 _("TUI window is invalid.")); \
375 /* Python function which checks the validity of a TUI window
378 gdbpy_tui_is_valid (PyObject
*self
, PyObject
*args
)
380 gdbpy_tui_window
*win
= (gdbpy_tui_window
*) self
;
382 if (win
->is_valid ())
387 /* Python function that erases the TUI window. */
389 gdbpy_tui_erase (PyObject
*self
, PyObject
*args
)
391 gdbpy_tui_window
*win
= (gdbpy_tui_window
*) self
;
393 REQUIRE_WINDOW (win
);
395 win
->window
->erase ();
400 /* Python function that writes some text to a TUI window. */
402 gdbpy_tui_write (PyObject
*self
, PyObject
*args
)
404 gdbpy_tui_window
*win
= (gdbpy_tui_window
*) self
;
407 if (!PyArg_ParseTuple (args
, "s", &text
))
410 REQUIRE_WINDOW (win
);
412 win
->window
->output (text
);
417 /* Return the width of the TUI window. */
419 gdbpy_tui_width (PyObject
*self
, void *closure
)
421 gdbpy_tui_window
*win
= (gdbpy_tui_window
*) self
;
422 REQUIRE_WINDOW (win
);
424 = gdb_py_object_from_longest (win
->window
->viewport_width ());
425 return result
.release ();
428 /* Return the height of the TUI window. */
430 gdbpy_tui_height (PyObject
*self
, void *closure
)
432 gdbpy_tui_window
*win
= (gdbpy_tui_window
*) self
;
433 REQUIRE_WINDOW (win
);
435 = gdb_py_object_from_longest (win
->window
->viewport_height ());
436 return result
.release ();
439 /* Return the title of the TUI window. */
441 gdbpy_tui_title (PyObject
*self
, void *closure
)
443 gdbpy_tui_window
*win
= (gdbpy_tui_window
*) self
;
444 REQUIRE_WINDOW (win
);
445 return host_string_to_python_string (win
->window
->title
.c_str ()).release ();
448 /* Set the title of the TUI window. */
450 gdbpy_tui_set_title (PyObject
*self
, PyObject
*newvalue
, void *closure
)
452 gdbpy_tui_window
*win
= (gdbpy_tui_window
*) self
;
454 REQUIRE_WINDOW_FOR_SETTER (win
);
456 if (newvalue
== nullptr)
458 PyErr_Format (PyExc_TypeError
, _("Cannot delete \"title\" attribute."));
462 gdb::unique_xmalloc_ptr
<char> value
463 = python_string_to_host_string (newvalue
);
464 if (value
== nullptr)
467 win
->window
->title
= value
.get ();
471 static gdb_PyGetSetDef tui_object_getset
[] =
473 { "width", gdbpy_tui_width
, NULL
, "Width of the window.", NULL
},
474 { "height", gdbpy_tui_height
, NULL
, "Height of the window.", NULL
},
475 { "title", gdbpy_tui_title
, gdbpy_tui_set_title
, "Title of the window.",
477 { NULL
} /* Sentinel */
480 static PyMethodDef tui_object_methods
[] =
482 { "is_valid", gdbpy_tui_is_valid
, METH_NOARGS
,
483 "is_valid () -> Boolean\n\
484 Return true if this TUI window is valid, false if not." },
485 { "erase", gdbpy_tui_erase
, METH_NOARGS
,
486 "Erase the TUI window." },
487 { "write", (PyCFunction
) gdbpy_tui_write
, METH_VARARGS
,
488 "Append a string to the TUI window." },
489 { NULL
} /* Sentinel. */
492 PyTypeObject gdbpy_tui_window_object_type
=
494 PyVarObject_HEAD_INIT (NULL
, 0)
495 "gdb.TuiWindow", /*tp_name*/
496 sizeof (gdbpy_tui_window
), /*tp_basicsize*/
505 0, /*tp_as_sequence*/
513 Py_TPFLAGS_DEFAULT
| Py_TPFLAGS_BASETYPE
, /*tp_flags*/
514 "GDB TUI window object", /* tp_doc */
517 0, /* tp_richcompare */
518 0, /* tp_weaklistoffset */
521 tui_object_methods
, /* tp_methods */
523 tui_object_getset
, /* tp_getset */
526 0, /* tp_descr_get */
527 0, /* tp_descr_set */
528 0, /* tp_dictoffset */
535 /* Initialize this module. */
538 gdbpy_initialize_tui ()
541 gdbpy_tui_window_object_type
.tp_new
= PyType_GenericNew
;
542 if (PyType_Ready (&gdbpy_tui_window_object_type
) < 0)