/* Output generating routines for GDB.
- Copyright (C) 1999-2014 Free Software Foundation, Inc.
+ Copyright (C) 1999-2019 Free Software Foundation, Inc.
Contributed by Cygnus Solutions.
Written by Fernando Nasser for Cygnus.
along with this program. If not, see <http://www.gnu.org/licenses/>. */
#include "defs.h"
-#include <string.h>
#include "expression.h" /* For language.h */
#include "language.h"
#include "ui-out.h"
-#include "gdb_assert.h"
-/* table header structures */
+#include <vector>
+#include <memory>
+#include <string>
-struct ui_out_hdr
- {
- int colno;
- int width;
- int alignment;
- char *col_name;
- char *colhdr;
- struct ui_out_hdr *next;
- };
+namespace {
-/* Maintain a stack so that the info applicable to the inner most list
- is always available. Stack/nested level 0 is reserved for the
- top-level result. */
+/* A header of a ui_out_table. */
-enum { MAX_UI_OUT_LEVELS = 8 };
+class ui_out_hdr
+{
+ public:
-struct ui_out_level
+ explicit ui_out_hdr (int number, int min_width, ui_align alignment,
+ const std::string &name, const std::string &header)
+ : m_number (number),
+ m_min_width (min_width),
+ m_alignment (alignment),
+ m_name (name),
+ m_header (header)
{
- /* Count each field; the first element is for non-list fields. */
- int field_count;
- /* The type of this level. */
- enum ui_out_type type;
- };
+ }
-/* Define uiout->level vector types and operations. */
-typedef struct ui_out_level *ui_out_level_p;
-DEF_VEC_P (ui_out_level_p);
+ int number () const
+ {
+ return m_number;
+ }
-/* Tables are special. Maintain a separate structure that tracks
- their state. At present an output can only contain a single table
- but that restriction might eventually be lifted. */
+ int min_width () const
+ {
+ return m_min_width;
+ }
-struct ui_out_table
-{
- /* If on, a table is being generated. */
- int flag;
+ ui_align alignment () const
+ {
+ return m_alignment;
+ }
- /* If on, the body of a table is being generated. If off, the table
- header is being generated. */
- int body_flag;
+ const std::string &header () const
+ {
+ return m_header;
+ }
- /* The level at which each entry of the table is to be found. A row
- (a tuple) is made up of entries. Consequently ENTRY_LEVEL is one
- above that of the table. */
- int entry_level;
+ const std::string &name () const
+ {
+ return m_name;
+ }
- /* Number of table columns (as specified in the table_begin call). */
- int columns;
+ private:
- /* String identifying the table (as specified in the table_begin
- call). */
- char *id;
+ /* The number of the table column this header represents, 1-based. */
+ int m_number;
- /* Points to the first table header (if any). */
- struct ui_out_hdr *header_first;
+ /* Minimal column width in characters. May or may not be applicable,
+ depending on the actual implementation of ui_out. */
+ int m_min_width;
- /* Points to the last table header (if any). */
- struct ui_out_hdr *header_last;
+ /* Alignment of the content in the column. May or may not be applicable,
+ depending on the actual implementation of ui_out. */
+ ui_align m_alignment;
- /* Points to header of NEXT column to format. */
- struct ui_out_hdr *header_next;
+ /* Internal column name, used to internally refer to the column. */
+ std::string m_name;
+ /* Printed header text of the column. */
+ std::string m_header;
};
+} // namespace
-/* The ui_out structure */
-/* Any change here requires a corresponding one in the initialization
- of the default uiout, which is statically initialized. */
+/* A level of nesting (either a list or a tuple) in a ui_out output. */
-struct ui_out
+class ui_out_level
+{
+ public:
+
+ explicit ui_out_level (ui_out_type type)
+ : m_type (type),
+ m_field_count (0)
{
- int flags;
- /* Specific implementation of ui-out. */
- const struct ui_out_impl *impl;
- void *data;
+ }
- /* Current level. */
- int level;
+ ui_out_type type () const
+ {
+ return m_type;
+ }
- /* Vector to store and track the ui-out levels. */
- VEC (ui_out_level_p) *levels;
+ int field_count () const
+ {
+ return m_field_count;
+ }
- /* A table, if any. At present only a single table is supported. */
- struct ui_out_table table;
- };
+ void inc_field_count ()
+ {
+ m_field_count++;
+ }
-/* The current (inner most) level. */
-static struct ui_out_level *
-current_level (struct ui_out *uiout)
-{
- return VEC_index (ui_out_level_p, uiout->levels, uiout->level);
-}
+ private:
-/* Create a new level, of TYPE. Return the new level's index. */
-static int
-push_level (struct ui_out *uiout,
- enum ui_out_type type,
- const char *id)
-{
- struct ui_out_level *current;
-
- uiout->level++;
- current = XNEW (struct ui_out_level);
- current->field_count = 0;
- current->type = type;
- VEC_safe_push (ui_out_level_p, uiout->levels, current);
- return uiout->level;
-}
+ /* The type of this level. */
+ ui_out_type m_type;
-/* Discard the current level, return the discarded level's index.
- TYPE is the type of the level being discarded. */
-static int
-pop_level (struct ui_out *uiout,
- enum ui_out_type type)
+ /* Count each field; the first element is for non-list fields. */
+ int m_field_count;
+};
+
+/* Tables are special. Maintain a separate structure that tracks
+ their state. At present an output can only contain a single table
+ but that restriction might eventually be lifted. */
+
+class ui_out_table
{
- struct ui_out_level *current;
+ public:
- /* We had better not underflow the buffer. */
- gdb_assert (uiout->level > 0);
- gdb_assert (current_level (uiout)->type == type);
- current = VEC_pop (ui_out_level_p, uiout->levels);
- xfree (current);
- uiout->level--;
- return uiout->level + 1;
-}
+ /* States (steps) of a table generation. */
+ enum class state
+ {
+ /* We are generating the table headers. */
+ HEADERS,
-/* These are the default implementation functions. */
-
-static void default_table_begin (struct ui_out *uiout, int nbrofcols,
- int nr_rows, const char *tblid);
-static void default_table_body (struct ui_out *uiout);
-static void default_table_end (struct ui_out *uiout);
-static void default_table_header (struct ui_out *uiout, int width,
- enum ui_align alig, const char *col_name,
- const char *colhdr);
-static void default_begin (struct ui_out *uiout,
- enum ui_out_type type,
- int level, const char *id);
-static void default_end (struct ui_out *uiout,
- enum ui_out_type type,
- int level);
-static void default_field_int (struct ui_out *uiout, int fldno, int width,
- enum ui_align alig,
- const char *fldname,
- int value);
-static void default_field_skip (struct ui_out *uiout, int fldno, int width,
- enum ui_align alig,
- const char *fldname);
-static void default_field_string (struct ui_out *uiout, int fldno, int width,
- enum ui_align align,
- const char *fldname,
- const char *string);
-static void default_field_fmt (struct ui_out *uiout, int fldno,
- int width, enum ui_align align,
- const char *fldname,
- const char *format,
- va_list args) ATTRIBUTE_PRINTF (6, 0);
-static void default_spaces (struct ui_out *uiout, int numspaces);
-static void default_text (struct ui_out *uiout, const char *string);
-static void default_message (struct ui_out *uiout, int verbosity,
- const char *format,
- va_list args) ATTRIBUTE_PRINTF (3, 0);
-static void default_wrap_hint (struct ui_out *uiout, char *identstring);
-static void default_flush (struct ui_out *uiout);
-static void default_data_destroy (struct ui_out *uiout);
-
-/* This is the default ui-out implementation functions vector. */
-
-const struct ui_out_impl default_ui_out_impl =
-{
- default_table_begin,
- default_table_body,
- default_table_end,
- default_table_header,
- default_begin,
- default_end,
- default_field_int,
- default_field_skip,
- default_field_string,
- default_field_fmt,
- default_spaces,
- default_text,
- default_message,
- default_wrap_hint,
- default_flush,
- NULL,
- default_data_destroy,
- 0, /* Does not need MI hacks. */
-};
+ /* We are generating the table body. */
+ BODY,
+ };
-/* The default ui_out */
+ explicit ui_out_table (int entry_level, int nr_cols, const std::string &id)
+ : m_state (state::HEADERS),
+ m_entry_level (entry_level),
+ m_nr_cols (nr_cols),
+ m_id (id)
+ {
+ }
-struct ui_out def_uiout =
-{
- 0, /* flags */
- &default_ui_out_impl, /* impl */
-};
+ /* Start building the body of the table. */
-/* Pointer to current ui_out */
-/* FIXME: This should not be a global, but something passed down from main.c
- or top.c. */
-
-struct ui_out *current_uiout = &def_uiout;
-
-/* These are the interfaces to implementation functions. */
-
-static void uo_table_begin (struct ui_out *uiout, int nbrofcols,
- int nr_rows, const char *tblid);
-static void uo_table_body (struct ui_out *uiout);
-static void uo_table_end (struct ui_out *uiout);
-static void uo_table_header (struct ui_out *uiout, int width,
- enum ui_align align, const char *col_name,
- const char *colhdr);
-static void uo_begin (struct ui_out *uiout,
- enum ui_out_type type,
- int level, const char *id);
-static void uo_end (struct ui_out *uiout,
- enum ui_out_type type,
- int level);
-static void uo_field_int (struct ui_out *uiout, int fldno, int width,
- enum ui_align align, const char *fldname, int value);
-static void uo_field_skip (struct ui_out *uiout, int fldno, int width,
- enum ui_align align, const char *fldname);
-static void uo_field_fmt (struct ui_out *uiout, int fldno, int width,
- enum ui_align align, const char *fldname,
- const char *format, va_list args)
- ATTRIBUTE_PRINTF (6, 0);
-static void uo_spaces (struct ui_out *uiout, int numspaces);
-static void uo_text (struct ui_out *uiout, const char *string);
-static void uo_message (struct ui_out *uiout, int verbosity,
- const char *format, va_list args)
- ATTRIBUTE_PRINTF (3, 0);
-static void uo_wrap_hint (struct ui_out *uiout, char *identstring);
-static void uo_flush (struct ui_out *uiout);
-static int uo_redirect (struct ui_out *uiout, struct ui_file *outstream);
-static void uo_data_destroy (struct ui_out *uiout);
-
-/* Prototypes for local functions */
-
-extern void _initialize_ui_out (void);
-static void append_header_to_list (struct ui_out *uiout, int width,
- int alignment, const char *col_name,
- const char *colhdr);
-static int get_next_header (struct ui_out *uiout, int *colno, int *width,
- int *alignment, char **colhdr);
-static void clear_header_list (struct ui_out *uiout);
-static void clear_table (struct ui_out *uiout);
-static void verify_field (struct ui_out *uiout, int *fldno, int *width,
- int *align);
-
-/* exported functions (ui_out API) */
+ void start_body ();
-/* Mark beginning of a table. */
+ /* Add a new header to the table. */
-static void
-ui_out_table_begin (struct ui_out *uiout, int nbrofcols,
- int nr_rows,
- const char *tblid)
-{
- if (uiout->table.flag)
- internal_error (__FILE__, __LINE__,
- _("tables cannot be nested; table_begin found before \
-previous table_end."));
+ void append_header (int width, ui_align alignment,
+ const std::string &col_name, const std::string &col_hdr);
- uiout->table.flag = 1;
- uiout->table.body_flag = 0;
- uiout->table.entry_level = uiout->level + 1;
- uiout->table.columns = nbrofcols;
- if (tblid != NULL)
- uiout->table.id = xstrdup (tblid);
- else
- uiout->table.id = NULL;
- clear_header_list (uiout);
+ void start_row ();
- uo_table_begin (uiout, nbrofcols, nr_rows, uiout->table.id);
-}
+ /* Extract the format information for the next header and advance
+ the header iterator. Return false if there was no next header. */
-void
-ui_out_table_body (struct ui_out *uiout)
-{
- if (!uiout->table.flag)
- internal_error (__FILE__, __LINE__,
- _("table_body outside a table is not valid; it must be \
-after a table_begin and before a table_end."));
- if (uiout->table.body_flag)
- internal_error (__FILE__, __LINE__,
- _("extra table_body call not allowed; there must be \
-only one table_body after a table_begin and before a table_end."));
- if (uiout->table.header_next->colno != uiout->table.columns)
- internal_error (__FILE__, __LINE__,
- _("number of headers differ from number of table \
-columns."));
+ bool get_next_header (int *colno, int *width, ui_align *alignment,
+ const char **col_hdr);
- uiout->table.body_flag = 1;
- uiout->table.header_next = uiout->table.header_first;
+ bool query_field (int colno, int *width, int *alignment,
+ const char **col_name) const;
- uo_table_body (uiout);
-}
+ state current_state () const;
-static void
-ui_out_table_end (struct ui_out *uiout)
-{
- if (!uiout->table.flag)
- internal_error (__FILE__, __LINE__,
- _("misplaced table_end or missing table_begin."));
+ int entry_level () const;
- uiout->table.entry_level = 0;
- uiout->table.body_flag = 0;
- uiout->table.flag = 0;
+ private:
- uo_table_end (uiout);
- clear_table (uiout);
-}
+ state m_state;
-void
-ui_out_table_header (struct ui_out *uiout, int width, enum ui_align alignment,
- const char *col_name,
- const char *colhdr)
-{
- if (!uiout->table.flag || uiout->table.body_flag)
- internal_error (__FILE__, __LINE__,
- _("table header must be specified after table_begin \
-and before table_body."));
+ /* The level at which each entry of the table is to be found. A row
+ (a tuple) is made up of entries. Consequently ENTRY_LEVEL is one
+ above that of the table. */
+ int m_entry_level;
- append_header_to_list (uiout, width, alignment, col_name, colhdr);
+ /* Number of table columns (as specified in the table_begin call). */
+ int m_nr_cols;
- uo_table_header (uiout, width, alignment, col_name, colhdr);
-}
+ /* String identifying the table (as specified in the table_begin
+ call). */
+ std::string m_id;
-static void
-do_cleanup_table_end (void *data)
-{
- struct ui_out *ui_out = data;
+ /* Pointers to the column headers. */
+ std::vector<std::unique_ptr<ui_out_hdr>> m_headers;
- ui_out_table_end (ui_out);
-}
+ /* Iterator over the headers vector, used when printing successive fields. */
+ std::vector<std::unique_ptr<ui_out_hdr>>::const_iterator m_headers_iterator;
+};
-struct cleanup *
-make_cleanup_ui_out_table_begin_end (struct ui_out *ui_out, int nr_cols,
- int nr_rows, const char *tblid)
-{
- ui_out_table_begin (ui_out, nr_cols, nr_rows, tblid);
- return make_cleanup (do_cleanup_table_end, ui_out);
-}
+/* See ui-out.h. */
-void
-ui_out_begin (struct ui_out *uiout,
- enum ui_out_type type,
- const char *id)
+void ui_out_table::start_body ()
{
- int new_level;
+ if (m_state != state::HEADERS)
+ internal_error (__FILE__, __LINE__,
+ _("extra table_body call not allowed; there must be only "
+ "one table_body after a table_begin and before a "
+ "table_end."));
- if (uiout->table.flag && !uiout->table.body_flag)
+ /* Check if the number of defined headers matches the number of expected
+ columns. */
+ if (m_headers.size () != m_nr_cols)
internal_error (__FILE__, __LINE__,
- _("table header or table_body expected; lists must be \
-specified after table_body."));
+ _("number of headers differ from number of table "
+ "columns."));
- /* Be careful to verify the ``field'' before the new tuple/list is
- pushed onto the stack. That way the containing list/table/row is
- verified and not the newly created tuple/list. This verification
- is needed (at least) for the case where a table row entry
- contains either a tuple/list. For that case bookkeeping such as
- updating the column count or advancing to the next heading still
- needs to be performed. */
- {
- int fldno;
- int width;
- int align;
+ m_state = state::BODY;
+ m_headers_iterator = m_headers.begin ();
+}
- verify_field (uiout, &fldno, &width, &align);
- }
+/* See ui-out.h. */
- new_level = push_level (uiout, type, id);
+void ui_out_table::append_header (int width, ui_align alignment,
+ const std::string &col_name,
+ const std::string &col_hdr)
+{
+ if (m_state != state::HEADERS)
+ internal_error (__FILE__, __LINE__,
+ _("table header must be specified after table_begin and "
+ "before table_body."));
- /* If the push puts us at the same level as a table row entry, we've
- got a new table row. Put the header pointer back to the start. */
- if (uiout->table.body_flag
- && uiout->table.entry_level == new_level)
- uiout->table.header_next = uiout->table.header_first;
+ std::unique_ptr<ui_out_hdr> header (new ui_out_hdr (m_headers.size () + 1,
+ width, alignment,
+ col_name, col_hdr));
- uo_begin (uiout, type, new_level, id);
+ m_headers.push_back (std::move (header));
}
-void
-ui_out_end (struct ui_out *uiout,
- enum ui_out_type type)
-{
- int old_level = pop_level (uiout, type);
+/* See ui-out.h. */
- uo_end (uiout, type, old_level);
+void ui_out_table::start_row ()
+{
+ m_headers_iterator = m_headers.begin ();
}
-struct ui_out_end_cleanup_data
-{
- struct ui_out *uiout;
- enum ui_out_type type;
-};
+/* See ui-out.h. */
-static void
-do_cleanup_end (void *data)
+bool ui_out_table::get_next_header (int *colno, int *width, ui_align *alignment,
+ const char **col_hdr)
{
- struct ui_out_end_cleanup_data *end_cleanup_data = data;
+ /* There may be no headers at all or we may have used all columns. */
+ if (m_headers_iterator == m_headers.end ())
+ return false;
- ui_out_end (end_cleanup_data->uiout, end_cleanup_data->type);
- xfree (end_cleanup_data);
-}
+ ui_out_hdr *hdr = m_headers_iterator->get ();
-static struct cleanup *
-make_cleanup_ui_out_end (struct ui_out *uiout,
- enum ui_out_type type)
-{
- struct ui_out_end_cleanup_data *end_cleanup_data;
+ *colno = hdr->number ();
+ *width = hdr->min_width ();
+ *alignment = hdr->alignment ();
+ *col_hdr = hdr->header ().c_str ();
- end_cleanup_data = XNEW (struct ui_out_end_cleanup_data);
- end_cleanup_data->uiout = uiout;
- end_cleanup_data->type = type;
- return make_cleanup (do_cleanup_end, end_cleanup_data);
-}
+ /* Advance the header pointer to the next entry. */
+ m_headers_iterator++;
-struct cleanup *
-make_cleanup_ui_out_tuple_begin_end (struct ui_out *uiout,
- const char *id)
-{
- ui_out_begin (uiout, ui_out_type_tuple, id);
- return make_cleanup_ui_out_end (uiout, ui_out_type_tuple);
+ return true;
}
-struct cleanup *
-make_cleanup_ui_out_list_begin_end (struct ui_out *uiout,
- const char *id)
-{
- ui_out_begin (uiout, ui_out_type_list, id);
- return make_cleanup_ui_out_end (uiout, ui_out_type_list);
-}
+/* See ui-out.h. */
-void
-ui_out_field_int (struct ui_out *uiout,
- const char *fldname,
- int value)
+bool ui_out_table::query_field (int colno, int *width, int *alignment,
+ const char **col_name) const
{
- int fldno;
- int width;
- int align;
-
- verify_field (uiout, &fldno, &width, &align);
+ /* Column numbers are 1-based, so convert to 0-based index. */
+ int index = colno - 1;
- uo_field_int (uiout, fldno, width, align, fldname, value);
-}
+ if (index >= 0 && index < m_headers.size ())
+ {
+ ui_out_hdr *hdr = m_headers[index].get ();
-void
-ui_out_field_fmt_int (struct ui_out *uiout,
- int input_width,
- enum ui_align input_align,
- const char *fldname,
- int value)
-{
- int fldno;
- int width;
- int align;
+ gdb_assert (colno == hdr->number ());
- verify_field (uiout, &fldno, &width, &align);
+ *width = hdr->min_width ();
+ *alignment = hdr->alignment ();
+ *col_name = hdr->name ().c_str ();
- uo_field_int (uiout, fldno, input_width, input_align, fldname, value);
+ return true;
+ }
+ else
+ return false;
}
-/* Documented in ui-out.h. */
+/* See ui-out.h. */
-void
-ui_out_field_core_addr (struct ui_out *uiout,
- const char *fldname,
- struct gdbarch *gdbarch,
- CORE_ADDR address)
+ui_out_table::state ui_out_table::current_state () const
{
- ui_out_field_string (uiout, fldname,
- print_core_address (gdbarch, address));
+ return m_state;
}
-void
-ui_out_field_stream (struct ui_out *uiout,
- const char *fldname,
- struct ui_file *stream)
-{
- long length;
- char *buffer = ui_file_xstrdup (stream, &length);
- struct cleanup *old_cleanup = make_cleanup (xfree, buffer);
+/* See ui-out.h. */
- if (length > 0)
- ui_out_field_string (uiout, fldname, buffer);
- else
- ui_out_field_skip (uiout, fldname);
- ui_file_rewind (stream);
- do_cleanups (old_cleanup);
+int ui_out_table::entry_level () const
+{
+ return m_entry_level;
}
-/* Used to omit a field. */
-
-void
-ui_out_field_skip (struct ui_out *uiout,
- const char *fldname)
+int
+ui_out::level () const
{
- int fldno;
- int width;
- int align;
+ return m_levels.size ();
+}
- verify_field (uiout, &fldno, &width, &align);
+/* The current (inner most) level. */
- uo_field_skip (uiout, fldno, width, align, fldname);
+ui_out_level *
+ui_out::current_level () const
+{
+ return m_levels.back ().get ();
}
+/* Create a new level, of TYPE. */
void
-ui_out_field_string (struct ui_out *uiout,
- const char *fldname,
- const char *string)
+ui_out::push_level (ui_out_type type)
{
- int fldno;
- int width;
- int align;
-
- verify_field (uiout, &fldno, &width, &align);
+ std::unique_ptr<ui_out_level> level (new ui_out_level (type));
- uo_field_string (uiout, fldno, width, align, fldname, string);
+ m_levels.push_back (std::move (level));
}
-/* VARARGS */
+/* Discard the current level. TYPE is the type of the level being
+ discarded. */
void
-ui_out_field_fmt (struct ui_out *uiout,
- const char *fldname,
- const char *format, ...)
+ui_out::pop_level (ui_out_type type)
{
- va_list args;
- int fldno;
- int width;
- int align;
-
- /* Will not align, but has to call anyway. */
- verify_field (uiout, &fldno, &width, &align);
-
- va_start (args, format);
-
- uo_field_fmt (uiout, fldno, width, align, fldname, format, args);
+ /* We had better not underflow the buffer. */
+ gdb_assert (m_levels.size () > 0);
+ gdb_assert (current_level ()->type () == type);
- va_end (args);
+ m_levels.pop_back ();
}
-void
-ui_out_spaces (struct ui_out *uiout, int numspaces)
-{
- uo_spaces (uiout, numspaces);
-}
+/* Mark beginning of a table. */
void
-ui_out_text (struct ui_out *uiout,
- const char *string)
+ui_out::table_begin (int nr_cols, int nr_rows, const std::string &tblid)
{
- uo_text (uiout, string);
-}
+ if (m_table_up != nullptr)
+ internal_error (__FILE__, __LINE__,
+ _("tables cannot be nested; table_begin found before \
+previous table_end."));
-void
-ui_out_message (struct ui_out *uiout, int verbosity,
- const char *format,...)
-{
- va_list args;
+ m_table_up.reset (new ui_out_table (level () + 1, nr_cols, tblid));
- va_start (args, format);
- uo_message (uiout, verbosity, format, args);
- va_end (args);
+ do_table_begin (nr_cols, nr_rows, tblid.c_str ());
}
void
-ui_out_wrap_hint (struct ui_out *uiout, char *identstring)
+ui_out::table_header (int width, ui_align alignment,
+ const std::string &col_name, const std::string &col_hdr)
{
- uo_wrap_hint (uiout, identstring);
-}
+ if (m_table_up == nullptr)
+ internal_error (__FILE__, __LINE__,
+ _("table_header outside a table is not valid; it must be \
+after a table_begin and before a table_body."));
-void
-ui_out_flush (struct ui_out *uiout)
-{
- uo_flush (uiout);
-}
+ m_table_up->append_header (width, alignment, col_name, col_hdr);
-int
-ui_out_redirect (struct ui_out *uiout, struct ui_file *outstream)
-{
- return uo_redirect (uiout, outstream);
+ do_table_header (width, alignment, col_name, col_hdr);
}
-/* Set the flags specified by the mask given. */
-int
-ui_out_set_flags (struct ui_out *uiout, int mask)
+void
+ui_out::table_body ()
{
- int oldflags = uiout->flags;
-
- uiout->flags |= mask;
- return oldflags;
-}
+ if (m_table_up == nullptr)
+ internal_error (__FILE__, __LINE__,
+ _("table_body outside a table is not valid; it must be "
+ "after a table_begin and before a table_end."));
-/* Clear the flags specified by the mask given. */
-int
-ui_out_clear_flags (struct ui_out *uiout, int mask)
-{
- int oldflags = uiout->flags;
+ m_table_up->start_body ();
- uiout->flags &= ~mask;
- return oldflags;
+ do_table_body ();
}
-/* Test the flags against the mask given. */
-int
-ui_out_test_flags (struct ui_out *uiout, int mask)
+void
+ui_out::table_end ()
{
- return (uiout->flags & mask);
-}
+ if (m_table_up == nullptr)
+ internal_error (__FILE__, __LINE__,
+ _("misplaced table_end or missing table_begin."));
-/* Obtain the current verbosity level (as stablished by the
- 'set verbositylevel' command. */
+ do_table_end ();
-int
-ui_out_get_verblvl (struct ui_out *uiout)
-{
- /* FIXME: not implemented yet. */
- return 0;
+ m_table_up = nullptr;
}
-int
-ui_out_is_mi_like_p (struct ui_out *uiout)
+void
+ui_out::begin (ui_out_type type, const char *id)
{
- return uiout->impl->is_mi_like_p;
-}
+ /* Be careful to verify the ``field'' before the new tuple/list is
+ pushed onto the stack. That way the containing list/table/row is
+ verified and not the newly created tuple/list. This verification
+ is needed (at least) for the case where a table row entry
+ contains either a tuple/list. For that case bookkeeping such as
+ updating the column count or advancing to the next heading still
+ needs to be performed. */
+ {
+ int fldno;
+ int width;
+ ui_align align;
-/* Default gdb-out hook functions. */
+ verify_field (&fldno, &width, &align);
+ }
-static void
-default_table_begin (struct ui_out *uiout, int nbrofcols,
- int nr_rows,
- const char *tblid)
-{
-}
+ push_level (type);
-static void
-default_table_body (struct ui_out *uiout)
-{
-}
+ /* If the push puts us at the same level as a table row entry, we've
+ got a new table row. Put the header pointer back to the start. */
+ if (m_table_up != nullptr
+ && m_table_up->current_state () == ui_out_table::state::BODY
+ && m_table_up->entry_level () == level ())
+ m_table_up->start_row ();
-static void
-default_table_end (struct ui_out *uiout)
-{
+ do_begin (type, id);
}
-static void
-default_table_header (struct ui_out *uiout, int width, enum ui_align alignment,
- const char *col_name,
- const char *colhdr)
+void
+ui_out::end (ui_out_type type)
{
-}
+ pop_level (type);
-static void
-default_begin (struct ui_out *uiout,
- enum ui_out_type type,
- int level,
- const char *id)
-{
+ do_end (type);
}
-static void
-default_end (struct ui_out *uiout,
- enum ui_out_type type,
- int level)
+void
+ui_out::field_signed (const char *fldname, LONGEST value)
{
-}
+ int fldno;
+ int width;
+ ui_align align;
-static void
-default_field_int (struct ui_out *uiout, int fldno, int width,
- enum ui_align align,
- const char *fldname, int value)
-{
-}
+ verify_field (&fldno, &width, &align);
-static void
-default_field_skip (struct ui_out *uiout, int fldno, int width,
- enum ui_align align, const char *fldname)
-{
+ do_field_signed (fldno, width, align, fldname, value);
}
-static void
-default_field_string (struct ui_out *uiout,
- int fldno,
- int width,
- enum ui_align align,
- const char *fldname,
- const char *string)
+void
+ui_out::field_fmt_signed (int input_width, ui_align input_align,
+ const char *fldname, LONGEST value)
{
-}
+ int fldno;
+ int width;
+ ui_align align;
-static void
-default_field_fmt (struct ui_out *uiout, int fldno, int width,
- enum ui_align align,
- const char *fldname,
- const char *format,
- va_list args)
-{
-}
+ verify_field (&fldno, &width, &align);
-static void
-default_spaces (struct ui_out *uiout, int numspaces)
-{
+ do_field_signed (fldno, input_width, input_align, fldname, value);
}
-static void
-default_text (struct ui_out *uiout, const char *string)
-{
-}
+/* See ui-out.h. */
-static void
-default_message (struct ui_out *uiout, int verbosity,
- const char *format,
- va_list args)
+void
+ui_out::field_unsigned (const char *fldname, ULONGEST value)
{
-}
+ int fldno;
+ int width;
+ ui_align align;
-static void
-default_wrap_hint (struct ui_out *uiout, char *identstring)
-{
-}
+ verify_field (&fldno, &width, &align);
-static void
-default_flush (struct ui_out *uiout)
-{
+ do_field_unsigned (fldno, width, align, fldname, value);
}
-static void
-default_data_destroy (struct ui_out *uiout)
-{
-}
-
-/* Interface to the implementation functions. */
+/* Documented in ui-out.h. */
void
-uo_table_begin (struct ui_out *uiout, int nbrofcols,
- int nr_rows,
- const char *tblid)
+ui_out::field_core_addr (const char *fldname, struct gdbarch *gdbarch,
+ CORE_ADDR address)
{
- if (!uiout->impl->table_begin)
- return;
- uiout->impl->table_begin (uiout, nbrofcols, nr_rows, tblid);
+ field_string (fldname, print_core_address (gdbarch, address),
+ ui_out_style_kind::ADDRESS);
}
void
-uo_table_body (struct ui_out *uiout)
+ui_out::field_stream (const char *fldname, string_file &stream,
+ ui_out_style_kind style)
{
- if (!uiout->impl->table_body)
- return;
- uiout->impl->table_body (uiout);
+ if (!stream.empty ())
+ field_string (fldname, stream.c_str (), style);
+ else
+ field_skip (fldname);
+ stream.clear ();
}
-void
-uo_table_end (struct ui_out *uiout)
-{
- if (!uiout->impl->table_end)
- return;
- uiout->impl->table_end (uiout);
-}
+/* Used to omit a field. */
void
-uo_table_header (struct ui_out *uiout, int width, enum ui_align align,
- const char *col_name,
- const char *colhdr)
+ui_out::field_skip (const char *fldname)
{
- if (!uiout->impl->table_header)
- return;
- uiout->impl->table_header (uiout, width, align, col_name, colhdr);
-}
+ int fldno;
+ int width;
+ ui_align align;
-/* Clear the table associated with UIOUT. */
+ verify_field (&fldno, &width, &align);
-static void
-clear_table (struct ui_out *uiout)
-{
- xfree (uiout->table.id);
- uiout->table.id = NULL;
- clear_header_list (uiout);
+ do_field_skip (fldno, width, align, fldname);
}
void
-uo_begin (struct ui_out *uiout,
- enum ui_out_type type,
- int level,
- const char *id)
+ui_out::field_string (const char *fldname, const char *string,
+ ui_out_style_kind style)
{
- if (uiout->impl->begin == NULL)
- return;
- uiout->impl->begin (uiout, type, level, id);
-}
+ int fldno;
+ int width;
+ ui_align align;
-void
-uo_end (struct ui_out *uiout,
- enum ui_out_type type,
- int level)
-{
- if (uiout->impl->end == NULL)
- return;
- uiout->impl->end (uiout, type, level);
-}
+ verify_field (&fldno, &width, &align);
-void
-uo_field_int (struct ui_out *uiout, int fldno, int width, enum ui_align align,
- const char *fldname,
- int value)
-{
- if (!uiout->impl->field_int)
- return;
- uiout->impl->field_int (uiout, fldno, width, align, fldname, value);
+ do_field_string (fldno, width, align, fldname, string, style);
}
void
-uo_field_skip (struct ui_out *uiout, int fldno, int width, enum ui_align align,
- const char *fldname)
+ui_out::field_string (const char *fldname, const std::string &string)
{
- if (!uiout->impl->field_skip)
- return;
- uiout->impl->field_skip (uiout, fldno, width, align, fldname);
+ field_string (fldname, string.c_str ());
}
+/* VARARGS */
void
-uo_field_string (struct ui_out *uiout, int fldno, int width,
- enum ui_align align,
- const char *fldname,
- const char *string)
+ui_out::field_fmt (const char *fldname, const char *format, ...)
{
- if (!uiout->impl->field_string)
- return;
- uiout->impl->field_string (uiout, fldno, width, align, fldname, string);
-}
+ va_list args;
+ int fldno;
+ int width;
+ ui_align align;
-void
-uo_field_fmt (struct ui_out *uiout, int fldno, int width, enum ui_align align,
- const char *fldname,
- const char *format,
- va_list args)
-{
- if (!uiout->impl->field_fmt)
- return;
- uiout->impl->field_fmt (uiout, fldno, width, align, fldname, format, args);
-}
+ verify_field (&fldno, &width, &align);
-void
-uo_spaces (struct ui_out *uiout, int numspaces)
-{
- if (!uiout->impl->spaces)
- return;
- uiout->impl->spaces (uiout, numspaces);
-}
+ va_start (args, format);
-void
-uo_text (struct ui_out *uiout,
- const char *string)
-{
- if (!uiout->impl->text)
- return;
- uiout->impl->text (uiout, string);
+ do_field_fmt (fldno, width, align, fldname, format, args);
+
+ va_end (args);
}
void
-uo_message (struct ui_out *uiout, int verbosity,
- const char *format,
- va_list args)
+ui_out::spaces (int numspaces)
{
- if (!uiout->impl->message)
- return;
- uiout->impl->message (uiout, verbosity, format, args);
+ do_spaces (numspaces);
}
void
-uo_wrap_hint (struct ui_out *uiout, char *identstring)
+ui_out::text (const char *string)
{
- if (!uiout->impl->wrap_hint)
- return;
- uiout->impl->wrap_hint (uiout, identstring);
+ do_text (string);
}
void
-uo_flush (struct ui_out *uiout)
+ui_out::message (const char *format, ...)
{
- if (!uiout->impl->flush)
- return;
- uiout->impl->flush (uiout);
+ va_list args;
+
+ va_start (args, format);
+ do_message (format, args);
+ va_end (args);
}
-int
-uo_redirect (struct ui_out *uiout, struct ui_file *outstream)
+void
+ui_out::wrap_hint (const char *identstring)
{
- if (!uiout->impl->redirect)
- return -1;
- uiout->impl->redirect (uiout, outstream);
- return 0;
+ do_wrap_hint (identstring);
}
void
-uo_data_destroy (struct ui_out *uiout)
+ui_out::flush ()
{
- if (!uiout->impl->data_destroy)
- return;
-
- uiout->impl->data_destroy (uiout);
+ do_flush ();
}
-/* local functions */
-
-/* List of column headers manipulation routines. */
-
-static void
-clear_header_list (struct ui_out *uiout)
+void
+ui_out::redirect (ui_file *outstream)
{
- while (uiout->table.header_first != NULL)
- {
- uiout->table.header_next = uiout->table.header_first;
- uiout->table.header_first = uiout->table.header_first->next;
- xfree (uiout->table.header_next->colhdr);
- xfree (uiout->table.header_next->col_name);
- xfree (uiout->table.header_next);
- }
- gdb_assert (uiout->table.header_first == NULL);
- uiout->table.header_last = NULL;
- uiout->table.header_next = NULL;
+ do_redirect (outstream);
}
-static void
-append_header_to_list (struct ui_out *uiout,
- int width,
- int alignment,
- const char *col_name,
- const char *colhdr)
+/* Test the flags against the mask given. */
+ui_out_flags
+ui_out::test_flags (ui_out_flags mask)
{
- struct ui_out_hdr *temphdr;
-
- temphdr = XNEW (struct ui_out_hdr);
- temphdr->width = width;
- temphdr->alignment = alignment;
- /* We have to copy the column title as the original may be an
- automatic. */
- if (colhdr != NULL)
- temphdr->colhdr = xstrdup (colhdr);
- else
- temphdr->colhdr = NULL;
-
- if (col_name != NULL)
- temphdr->col_name = xstrdup (col_name);
- else if (colhdr != NULL)
- temphdr->col_name = xstrdup (colhdr);
- else
- temphdr->col_name = NULL;
-
- temphdr->next = NULL;
- if (uiout->table.header_first == NULL)
- {
- temphdr->colno = 1;
- uiout->table.header_first = temphdr;
- uiout->table.header_last = temphdr;
- }
- else
- {
- temphdr->colno = uiout->table.header_last->colno + 1;
- uiout->table.header_last->next = temphdr;
- uiout->table.header_last = temphdr;
- }
- uiout->table.header_next = uiout->table.header_last;
+ return m_flags & mask;
}
-/* Extract the format information for the NEXT header and advance
- the header pointer. Return 0 if there was no next header. */
-
-static int
-get_next_header (struct ui_out *uiout,
- int *colno,
- int *width,
- int *alignment,
- char **colhdr)
+bool
+ui_out::is_mi_like_p () const
{
- /* There may be no headers at all or we may have used all columns. */
- if (uiout->table.header_next == NULL)
- return 0;
- *colno = uiout->table.header_next->colno;
- *width = uiout->table.header_next->width;
- *alignment = uiout->table.header_next->alignment;
- *colhdr = uiout->table.header_next->colhdr;
- /* Advance the header pointer to the next entry. */
- uiout->table.header_next = uiout->table.header_next->next;
- return 1;
+ return do_is_mi_like_p ();
}
-
/* Verify that the field/tuple/list is correctly positioned. Return
the field number and corresponding alignment (if
available/applicable). */
-static void
-verify_field (struct ui_out *uiout, int *fldno, int *width, int *align)
+void
+ui_out::verify_field (int *fldno, int *width, ui_align *align)
{
- struct ui_out_level *current = current_level (uiout);
- char *text;
+ ui_out_level *current = current_level ();
+ const char *text;
- if (uiout->table.flag)
+ if (m_table_up != nullptr
+ && m_table_up->current_state () != ui_out_table::state::BODY)
{
- if (!uiout->table.body_flag)
- internal_error (__FILE__, __LINE__,
- _("table_body missing; table fields must be \
+ internal_error (__FILE__, __LINE__,
+ _("table_body missing; table fields must be \
specified after table_body and inside a list."));
- /* NOTE: cagney/2001-12-08: There was a check here to ensure
- that this code was only executed when uiout->level was
- greater than zero. That no longer applies - this code is run
- before each table row tuple is started and at that point the
- level is zero. */
}
- current->field_count += 1;
+ current->inc_field_count ();
- if (uiout->table.body_flag
- && uiout->table.entry_level == uiout->level
- && get_next_header (uiout, fldno, width, align, &text))
+ if (m_table_up != nullptr
+ && m_table_up->current_state () == ui_out_table::state::BODY
+ && m_table_up->entry_level () == level ()
+ && m_table_up->get_next_header (fldno, width, align, &text))
{
- if (*fldno != current->field_count)
+ if (*fldno != current->field_count ())
internal_error (__FILE__, __LINE__,
_("ui-out internal error in handling headers."));
}
{
*width = 0;
*align = ui_noalign;
- *fldno = current->field_count;
+ *fldno = current->field_count ();
}
}
-
-/* Access to ui-out members data. */
-
-void *
-ui_out_data (struct ui_out *uiout)
-{
- return uiout->data;
-}
-
/* Access table field parameters. */
-int
-ui_out_query_field (struct ui_out *uiout, int colno,
- int *width, int *alignment, char **col_name)
-{
- struct ui_out_hdr *hdr;
-
- if (!uiout->table.flag)
- return 0;
-
- for (hdr = uiout->table.header_first; hdr; hdr = hdr->next)
- if (hdr->colno == colno)
- {
- *width = hdr->width;
- *alignment = hdr->alignment;
- *col_name = hdr->col_name;
- return 1;
- }
-
- return 0;
-}
-/* Initalize private members at startup. */
-
-struct ui_out *
-ui_out_new (const struct ui_out_impl *impl, void *data,
- int flags)
+bool
+ui_out::query_table_field (int colno, int *width, int *alignment,
+ const char **col_name)
{
- struct ui_out *uiout = XNEW (struct ui_out);
- struct ui_out_level *current = XNEW (struct ui_out_level);
-
- uiout->data = data;
- uiout->impl = impl;
- uiout->flags = flags;
- uiout->table.flag = 0;
- uiout->table.body_flag = 0;
- uiout->level = 0;
- uiout->levels = NULL;
-
- /* Create uiout->level 0, the default level. */
- current->type = ui_out_type_tuple;
- current->field_count = 0;
- VEC_safe_push (ui_out_level_p, uiout->levels, current);
-
- uiout->table.id = NULL;
- uiout->table.header_first = NULL;
- uiout->table.header_last = NULL;
- uiout->table.header_next = NULL;
- return uiout;
+ if (m_table_up == nullptr)
+ return false;
+
+ return m_table_up->query_field (colno, width, alignment, col_name);
}
-/* Free UIOUT and the memory areas it references. */
+/* The constructor. */
-void
-ui_out_destroy (struct ui_out *uiout)
+ui_out::ui_out (ui_out_flags flags)
+: m_flags (flags)
{
- int i;
- struct ui_out_level *current;
-
- /* Make sure that all levels are freed in the case where levels have
- been pushed, but not popped before the ui_out object is
- destroyed. */
- for (i = 0;
- VEC_iterate (ui_out_level_p, uiout->levels, i, current);
- ++i)
- xfree (current);
-
- VEC_free (ui_out_level_p, uiout->levels);
- uo_data_destroy (uiout);
- clear_table (uiout);
- xfree (uiout);
+ /* Create the ui-out level #1, the default level. */
+ push_level (ui_out_type_tuple);
}
-/* Standard gdb initialization hook. */
-
-void
-_initialize_ui_out (void)
+ui_out::~ui_out ()
{
- /* nothing needs to be done */
}