[deliverable/binutils-gdb.git] / gdb / cli / cli-style.c

/* CLI colorizing

   Copyright (C) 2018-2020 Free Software Foundation, Inc.

   This file is part of GDB.

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 3 of the License, or
   (at your option) any later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */

#include "defs.h"
#include "cli/cli-cmds.h"
#include "cli/cli-style.h"
#include "source-cache.h"
#include "observable.h"

/* True if styling is enabled.  */

#if defined (__MSDOS__)
bool cli_styling = false;
#else
bool cli_styling = true;
#endif

/* True if source styling is enabled.  Note that this is only
   consulted when cli_styling is true.  */

bool source_styling = true;

/* Name of colors; must correspond to ui_file_style::basic_color.  */
static const char * const cli_colors[] = {
  "none",
  "black",
  "red",
  "green",
  "yellow",
  "blue",
  "magenta",
  "cyan",
  "white",
  nullptr
};

/* Names of intensities; must correspond to
   ui_file_style::intensity.  */
static const char * const cli_intensities[] = {
  "normal",
  "bold",
  "dim",
  nullptr
};

/* See cli-style.h.  */

cli_style_option file_name_style ("filename", ui_file_style::GREEN);

/* See cli-style.h.  */

cli_style_option function_name_style ("function", ui_file_style::YELLOW);

/* See cli-style.h.  */

cli_style_option variable_name_style ("variable", ui_file_style::CYAN);

/* See cli-style.h.  */

cli_style_option address_style ("address", ui_file_style::BLUE);

/* See cli-style.h.  */

cli_style_option highlight_style ("highlight", ui_file_style::RED);

/* See cli-style.h.  */

cli_style_option title_style ("title", ui_file_style::BOLD);

/* See cli-style.h.  */

cli_style_option tui_border_style ("tui-border", ui_file_style::CYAN);

/* See cli-style.h.  */

cli_style_option tui_active_border_style ("tui-active-border",
					  ui_file_style::CYAN);

/* See cli-style.h.  */

cli_style_option metadata_style ("metadata", ui_file_style::DIM);

/* See cli-style.h.  */

cli_style_option::cli_style_option (const char *name,
				    ui_file_style::basic_color fg)
  : changed (name),
    m_name (name),
    m_foreground (cli_colors[fg - ui_file_style::NONE]),
    m_background (cli_colors[0]),
    m_intensity (cli_intensities[ui_file_style::NORMAL])
{
}

/* See cli-style.h.  */

cli_style_option::cli_style_option (const char *name,
				    ui_file_style::intensity i)
  : changed (name),
    m_name (name),
    m_foreground (cli_colors[0]),
    m_background (cli_colors[0]),
    m_intensity (cli_intensities[i])
{
}

/* Return the color number corresponding to COLOR.  */

static int
color_number (const char *color)
{
  for (int i = 0; i < ARRAY_SIZE (cli_colors); ++i)
    {
      if (color == cli_colors[i])
	return i - 1;
    }
  gdb_assert_not_reached ("color not found");
}

/* See cli-style.h.  */

ui_file_style
cli_style_option::style () const
{
  int fg = color_number (m_foreground);
  int bg = color_number (m_background);
  ui_file_style::intensity intensity = ui_file_style::NORMAL;

  for (int i = 0; i < ARRAY_SIZE (cli_intensities); ++i)
    {
      if (m_intensity == cli_intensities[i])
	{
	  intensity = (ui_file_style::intensity) i;
	  break;
	}
    }

  return ui_file_style (fg, bg, intensity);
}

/* See cli-style.h.  */

void
cli_style_option::do_set_value (const char *ignore, int from_tty,
				struct cmd_list_element *cmd)
{
  cli_style_option *cso = (cli_style_option *) get_cmd_context (cmd);
  cso->changed.notify ();
}

/* Implements the cli_style_option::do_show_* functions.
   WHAT and VALUE are the property and value to show.
   The style for which WHAT is shown is retrieved from CMD context.  */

static void
do_show (const char *what, struct ui_file *file,
	 struct cmd_list_element *cmd,
	 const char *value)
{
  cli_style_option *cso = (cli_style_option *) get_cmd_context (cmd);
  fputs_filtered (_("The "), file);
  fprintf_styled (file, cso->style (), _("\"%s\" style"), cso->name ());
  fprintf_filtered (file, _(" %s is: %s\n"), what, value);
}

/* See cli-style.h.  */

void
cli_style_option::do_show_foreground (struct ui_file *file, int from_tty,
				      struct cmd_list_element *cmd,
				      const char *value)
{
  do_show (_("foreground color"), file, cmd, value);
}

/* See cli-style.h.  */

void
cli_style_option::do_show_background (struct ui_file *file, int from_tty,
				      struct cmd_list_element *cmd,
				      const char *value)
{
  do_show (_("background color"), file, cmd, value);
}

/* See cli-style.h.  */

void
cli_style_option::do_show_intensity (struct ui_file *file, int from_tty,
				     struct cmd_list_element *cmd,
				     const char *value)
{
  do_show (_("display intensity"), file, cmd, value);
}

/* See cli-style.h.  */

void
cli_style_option::add_setshow_commands (enum command_class theclass,
					const char *prefix_doc,
					struct cmd_list_element **set_list,
					void (*do_set) (const char *args,
							int from_tty),
					struct cmd_list_element **show_list,
					void (*do_show) (const char *args,
							 int from_tty),
					bool skip_intensity)
{
  m_set_prefix = std::string ("set style ") + m_name + " ";
  m_show_prefix = std::string ("show style ") + m_name + " ";

  add_prefix_cmd (m_name, no_class, do_set, prefix_doc, &m_set_list,
		  m_set_prefix.c_str (), 0, set_list);
  add_prefix_cmd (m_name, no_class, do_show, prefix_doc, &m_show_list,
		  m_show_prefix.c_str (), 0, show_list);

  add_setshow_enum_cmd ("foreground", theclass, cli_colors,
			&m_foreground,
			_("Set the foreground color for this property."),
			_("Show the foreground color for this property."),
			nullptr,
			do_set_value,
			do_show_foreground,
			&m_set_list, &m_show_list, (void *) this);
  add_setshow_enum_cmd ("background", theclass, cli_colors,
			&m_background,
			_("Set the background color for this property."),
			_("Show the background color for this property."),
			nullptr,
			do_set_value,
			do_show_background,
			&m_set_list, &m_show_list, (void *) this);
  if (!skip_intensity)
    add_setshow_enum_cmd ("intensity", theclass, cli_intensities,
			  &m_intensity,
			  _("Set the display intensity for this property."),
			  _("Show the display intensity for this property."),
			  nullptr,
			  do_set_value,
			  do_show_intensity,
			  &m_set_list, &m_show_list, (void *) this);
}

static cmd_list_element *style_set_list;
static cmd_list_element *style_show_list;

static void
set_style (const char *arg, int from_tty)
{
  printf_unfiltered (_("\"set style\" must be followed "
		       "by an appropriate subcommand.\n"));
  help_list (style_set_list, "set style ", all_commands, gdb_stdout);
}

static void
show_style (const char *arg, int from_tty)
{
  cmd_show_list (style_show_list, from_tty, "");
}

static void
set_style_enabled  (const char *args, int from_tty, struct cmd_list_element *c)
{
  g_source_cache.clear ();
  gdb::observers::source_styling_changed.notify ();
}

static void
show_style_enabled (struct ui_file *file, int from_tty,
		    struct cmd_list_element *c, const char *value)
{
  if (cli_styling)
    fprintf_filtered (file, _("CLI output styling is enabled.\n"));
  else
    fprintf_filtered (file, _("CLI output styling is disabled.\n"));
}

static void
show_style_sources (struct ui_file *file, int from_tty,
		    struct cmd_list_element *c, const char *value)
{
  if (source_styling)
    fprintf_filtered (file, _("Source code styling is enabled.\n"));
  else
    fprintf_filtered (file, _("Source code styling is disabled.\n"));
}

/* Builds the "set style NAME " prefix.  */

static std::string
set_style_name (const char *name)
{
  std::string result ("set style ");

  result += name;
  result += " ";
  return result;
}

void
_initialize_cli_style ()
{
  add_prefix_cmd ("style", no_class, set_style, _("\
Style-specific settings.\n\
Configure various style-related variables, such as colors"),
		  &style_set_list, "set style ", 0, &setlist);
  add_prefix_cmd ("style", no_class, show_style, _("\
Style-specific settings.\n\
Configure various style-related variables, such as colors"),
		  &style_show_list, "show style ", 0, &showlist);

  add_setshow_boolean_cmd ("enabled", no_class, &cli_styling, _("\
Set whether CLI styling is enabled."), _("\
Show whether CLI is enabled."), _("\
If enabled, output to the terminal is styled."),
			   set_style_enabled, show_style_enabled,
			   &style_set_list, &style_show_list);

  add_setshow_boolean_cmd ("sources", no_class, &source_styling, _("\
Set whether source code styling is enabled."), _("\
Show whether source code styling is enabled."), _("\
If enabled, source code is styled.\n"
#ifdef HAVE_SOURCE_HIGHLIGHT
"Note that source styling only works if styling in general is enabled,\n\
see \"show style enabled\"."
#else
"Source highlighting is disabled in this installation of gdb, because\n\
it was not linked against GNU Source Highlight."
#endif
			   ), set_style_enabled, show_style_sources,
			   &style_set_list, &style_show_list);

#define STYLE_ADD_SETSHOW_COMMANDS(STYLE, PREFIX_DOC, SKIP)		\
  STYLE.add_setshow_commands (no_class, PREFIX_DOC,		\
			      &style_set_list,				\
			      [] (const char *args, int from_tty)	\
			      {						\
				help_list				\
				  (STYLE.set_list (),			\
				   set_style_name (STYLE.name ()).c_str (), \
				   all_commands,			\
				   gdb_stdout);				\
			      },					\
			      &style_show_list,				\
			      [] (const char *args, int from_tty)	\
			      {						\
				cmd_show_list				\
				  (STYLE.show_list (),			\
				   from_tty,				\
				   "");					\
			      }, SKIP)

  STYLE_ADD_SETSHOW_COMMANDS (file_name_style,
			      _("\
Filename display styling.\n\
Configure filename colors and display intensity."), false);

  STYLE_ADD_SETSHOW_COMMANDS (function_name_style,
			      _("\
Function name display styling.\n\
Configure function name colors and display intensity"), false);

  STYLE_ADD_SETSHOW_COMMANDS (variable_name_style,
			      _("\
Variable name display styling.\n\
Configure variable name colors and display intensity"), false);

  STYLE_ADD_SETSHOW_COMMANDS (address_style,
			      _("\
Address display styling.\n\
Configure address colors and display intensity"), false);

  STYLE_ADD_SETSHOW_COMMANDS (title_style,
			      _("\
Title display styling.\n\
Configure title colors and display intensity\n\
Some commands (such as \"apropos -v REGEXP\") use the title style to improve\n\
readability."), false);

  STYLE_ADD_SETSHOW_COMMANDS (highlight_style,
			      _("\
Highlight display styling.\n\
Configure highlight colors and display intensity\n\
Some commands use the highlight style to draw the attention to a part\n\
of their output."), false);

  STYLE_ADD_SETSHOW_COMMANDS (metadata_style,
			      _("\
Metadata display styling.\n\
Configure metadata colors and display intensity\n\
The \"metadata\" style is used when GDB displays information about\n\
your data, for example \"<unavailable>\""), false);

  STYLE_ADD_SETSHOW_COMMANDS (tui_border_style,
			      _("\
TUI border display styling.\n\
Configure TUI border colors\n\
The \"tui-border\" style is used when GDB displays the border of a\n\
TUI window that does not have the focus."), true);

  STYLE_ADD_SETSHOW_COMMANDS (tui_active_border_style,
			      _("\
TUI active border display styling.\n\
Configure TUI active border colors\n\
The \"tui-active-border\" style is used when GDB displays the border of a\n\
TUI window that does have the focus."), true);
}
Commit	Line	Data
cbe56571 TT	1	/* CLI colorizing
cbe56571 TT	2
b811d2c2	3	Copyright (C) 2018-2020 Free Software Foundation, Inc.
cbe56571 TT	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	#include "defs.h"
	21	#include "cli/cli-cmds.h"
	22	#include "cli/cli-style.h"
62f29fda	23	#include "source-cache.h"
6f11e682	24	#include "observable.h"
cbe56571 TT	25
	26	/* True if styling is enabled. */
	27
06a6207a	28	#if defined (__MSDOS__)
491144b5	29	bool cli_styling = false;
cbe56571	30	#else
491144b5	31	bool cli_styling = true;
cbe56571 TT	32	#endif
cbe56571 TT	33
d085f989 TT	34	/* True if source styling is enabled. Note that this is only
	35	consulted when cli_styling is true. */
	36
491144b5	37	bool source_styling = true;
d085f989	38
cbe56571 TT	39	/* Name of colors; must correspond to ui_file_style::basic_color. */
	40	static const char * const cli_colors[] = {
	41	"none",
	42	"black",
	43	"red",
	44	"green",
	45	"yellow",
	46	"blue",
	47	"magenta",
	48	"cyan",
	49	"white",
	50	nullptr
	51	};
	52
	53	/* Names of intensities; must correspond to
	54	ui_file_style::intensity. */
	55	static const char * const cli_intensities[] = {
	56	"normal",
	57	"bold",
	58	"dim",
	59	nullptr
	60	};
	61
	62	/* See cli-style.h. */
	63
9303eb2f	64	cli_style_option file_name_style ("filename", ui_file_style::GREEN);
cbe56571 TT	65
	66	/* See cli-style.h. */
	67
9303eb2f	68	cli_style_option function_name_style ("function", ui_file_style::YELLOW);
cbe56571 TT	69
	70	/* See cli-style.h. */
	71
9303eb2f	72	cli_style_option variable_name_style ("variable", ui_file_style::CYAN);
80ae2043 TT	73
	74	/* See cli-style.h. */
	75
9303eb2f	76	cli_style_option address_style ("address", ui_file_style::BLUE);
35fb8261 TT	77
	78	/* See cli-style.h. */
	79
9303eb2f PW	80	cli_style_option highlight_style ("highlight", ui_file_style::RED);
	81
	82	/* See cli-style.h. */
	83
	84	cli_style_option title_style ("title", ui_file_style::BOLD);
	85
	86	/* See cli-style.h. */
	87
a2a7af0c TT	88	cli_style_option tui_border_style ("tui-border", ui_file_style::CYAN);
	89
	90	/* See cli-style.h. */
	91
	92	cli_style_option tui_active_border_style ("tui-active-border",
	93	ui_file_style::CYAN);
	94
	95	/* See cli-style.h. */
	96
7f6aba03 TT	97	cli_style_option metadata_style ("metadata", ui_file_style::DIM);
	98
	99	/* See cli-style.h. */
	100
9303eb2f PW	101	cli_style_option::cli_style_option (const char *name,
9303eb2f PW	102	ui_file_style::basic_color fg)
a2a7af0c TT	103	: changed (name),
a2a7af0c TT	104	m_name (name),
9303eb2f	105	m_foreground (cli_colors[fg - ui_file_style::NONE]),
cbe56571 TT	106	m_background (cli_colors[0]),
	107	m_intensity (cli_intensities[ui_file_style::NORMAL])
	108	{
	109	}
	110
9303eb2f PW	111	/* See cli-style.h. */
	112
	113	cli_style_option::cli_style_option (const char *name,
	114	ui_file_style::intensity i)
a2a7af0c TT	115	: changed (name),
a2a7af0c TT	116	m_name (name),
9303eb2f PW	117	m_foreground (cli_colors[0]),
	118	m_background (cli_colors[0]),
	119	m_intensity (cli_intensities[i])
	120	{
	121	}
	122
cbe56571 TT	123	/* Return the color number corresponding to COLOR. */
	124
	125	static int
	126	color_number (const char *color)
	127	{
	128	for (int i = 0; i < ARRAY_SIZE (cli_colors); ++i)
	129	{
	130	if (color == cli_colors[i])
	131	return i - 1;
	132	}
	133	gdb_assert_not_reached ("color not found");
	134	}
	135
	136	/* See cli-style.h. */
	137
	138	ui_file_style
	139	cli_style_option::style () const
	140	{
	141	int fg = color_number (m_foreground);
	142	int bg = color_number (m_background);
	143	ui_file_style::intensity intensity = ui_file_style::NORMAL;
	144
	145	for (int i = 0; i < ARRAY_SIZE (cli_intensities); ++i)
	146	{
	147	if (m_intensity == cli_intensities[i])
	148	{
	149	intensity = (ui_file_style::intensity) i;
	150	break;
	151	}
	152	}
	153
	154	return ui_file_style (fg, bg, intensity);
	155	}
	156
a2a7af0c TT	157	/* See cli-style.h. */
	158
	159	void
	160	cli_style_option::do_set_value (const char *ignore, int from_tty,
	161	struct cmd_list_element *cmd)
	162	{
	163	cli_style_option cso = (cli_style_option ) get_cmd_context (cmd);
	164	cso->changed.notify ();
	165	}
	166
9303eb2f PW	167	/* Implements the cli_style_option::do_show_* functions.
	168	WHAT and VALUE are the property and value to show.
	169	The style for which WHAT is shown is retrieved from CMD context. */
	170
	171	static void
	172	do_show (const char what, struct ui_file file,
	173	struct cmd_list_element *cmd,
	174	const char *value)
	175	{
	176	cli_style_option cso = (cli_style_option ) get_cmd_context (cmd);
	177	fputs_filtered (_("The "), file);
	178	fprintf_styled (file, cso->style (), _("\"%s\" style"), cso->name ());
	179	fprintf_filtered (file, _(" %s is: %s\n"), what, value);
	180	}
	181
cbe56571 TT	182	/* See cli-style.h. */
cbe56571 TT	183
cbe56571 TT	184	void
	185	cli_style_option::do_show_foreground (struct ui_file *file, int from_tty,
	186	struct cmd_list_element *cmd,
	187	const char *value)
	188	{
9303eb2f	189	do_show (_("foreground color"), file, cmd, value);
cbe56571 TT	190	}
	191
	192	/* See cli-style.h. */
	193
	194	void
	195	cli_style_option::do_show_background (struct ui_file *file, int from_tty,
	196	struct cmd_list_element *cmd,
	197	const char *value)
	198	{
9303eb2f	199	do_show (_("background color"), file, cmd, value);
cbe56571 TT	200	}
	201
	202	/* See cli-style.h. */
	203
	204	void
	205	cli_style_option::do_show_intensity (struct ui_file *file, int from_tty,
	206	struct cmd_list_element *cmd,
	207	const char *value)
	208	{
9303eb2f	209	do_show (_("display intensity"), file, cmd, value);
cbe56571 TT	210	}
	211
	212	/* See cli-style.h. */
	213
	214	void
9303eb2f	215	cli_style_option::add_setshow_commands (enum command_class theclass,
cbe56571	216	const char *prefix_doc,
cbe56571	217	struct cmd_list_element **set_list,
d73cff18 PW	218	void (do_set) (const char args,
	219	int from_tty),
	220	struct cmd_list_element **show_list,
	221	void (do_show) (const char args,
a2a7af0c TT	222	int from_tty),
a2a7af0c TT	223	bool skip_intensity)
cbe56571	224	{
9303eb2f PW	225	m_set_prefix = std::string ("set style ") + m_name + " ";
9303eb2f PW	226	m_show_prefix = std::string ("show style ") + m_name + " ";
cbe56571	227
9303eb2f	228	add_prefix_cmd (m_name, no_class, do_set, prefix_doc, &m_set_list,
ecad3b21	229	m_set_prefix.c_str (), 0, set_list);
9303eb2f	230	add_prefix_cmd (m_name, no_class, do_show, prefix_doc, &m_show_list,
ecad3b21	231	m_show_prefix.c_str (), 0, show_list);
cbe56571 TT	232
	233	add_setshow_enum_cmd ("foreground", theclass, cli_colors,
	234	&m_foreground,
590042fc PW	235	_("Set the foreground color for this property."),
590042fc PW	236	_("Show the foreground color for this property."),
cbe56571	237	nullptr,
a2a7af0c	238	do_set_value,
cbe56571	239	do_show_foreground,
9303eb2f	240	&m_set_list, &m_show_list, (void *) this);
cbe56571 TT	241	add_setshow_enum_cmd ("background", theclass, cli_colors,
cbe56571 TT	242	&m_background,
590042fc PW	243	_("Set the background color for this property."),
590042fc PW	244	_("Show the background color for this property."),
cbe56571	245	nullptr,
a2a7af0c	246	do_set_value,
cbe56571	247	do_show_background,
9303eb2f	248	&m_set_list, &m_show_list, (void *) this);
a2a7af0c TT	249	if (!skip_intensity)
	250	add_setshow_enum_cmd ("intensity", theclass, cli_intensities,
	251	&m_intensity,
	252	_("Set the display intensity for this property."),
	253	_("Show the display intensity for this property."),
	254	nullptr,
	255	do_set_value,
	256	do_show_intensity,
	257	&m_set_list, &m_show_list, (void *) this);
cbe56571 TT	258	}
cbe56571 TT	259
d73cff18 PW	260	static cmd_list_element *style_set_list;
	261	static cmd_list_element *style_show_list;
	262
cbe56571 TT	263	static void
	264	set_style (const char *arg, int from_tty)
	265	{
d73cff18 PW	266	printf_unfiltered (_("\"set style\" must be followed "
	267	"by an appropriate subcommand.\n"));
	268	help_list (style_set_list, "set style ", all_commands, gdb_stdout);
cbe56571 TT	269	}
	270
	271	static void
	272	show_style (const char *arg, int from_tty)
	273	{
d73cff18	274	cmd_show_list (style_show_list, from_tty, "");
cbe56571 TT	275	}
cbe56571 TT	276
62f29fda TT	277	static void
	278	set_style_enabled (const char args, int from_tty, struct cmd_list_element c)
	279	{
	280	g_source_cache.clear ();
6f11e682	281	gdb::observers::source_styling_changed.notify ();
62f29fda TT	282	}
62f29fda TT	283
cbe56571 TT	284	static void
	285	show_style_enabled (struct ui_file *file, int from_tty,
	286	struct cmd_list_element c, const char value)
	287	{
	288	if (cli_styling)
	289	fprintf_filtered (file, _("CLI output styling is enabled.\n"));
	290	else
	291	fprintf_filtered (file, _("CLI output styling is disabled.\n"));
	292	}
	293
d085f989 TT	294	static void
	295	show_style_sources (struct ui_file *file, int from_tty,
	296	struct cmd_list_element c, const char value)
	297	{
	298	if (source_styling)
	299	fprintf_filtered (file, _("Source code styling is enabled.\n"));
	300	else
	301	fprintf_filtered (file, _("Source code styling is disabled.\n"));
	302	}
	303
9303eb2f PW	304	/* Builds the "set style NAME " prefix. */
	305
	306	static std::string
	307	set_style_name (const char *name)
	308	{
	309	std::string result ("set style ");
	310
	311	result += name;
	312	result += " ";
	313	return result;
	314	}
	315
cbe56571 TT	316	void
	317	_initialize_cli_style ()
	318	{
cbe56571	319	add_prefix_cmd ("style", no_class, set_style, _("\
590042fc	320	Style-specific settings.\n\
cbe56571 TT	321	Configure various style-related variables, such as colors"),
	322	&style_set_list, "set style ", 0, &setlist);
	323	add_prefix_cmd ("style", no_class, show_style, _("\
590042fc	324	Style-specific settings.\n\
cbe56571 TT	325	Configure various style-related variables, such as colors"),
	326	&style_show_list, "show style ", 0, &showlist);
	327
	328	add_setshow_boolean_cmd ("enabled", no_class, &cli_styling, _("\
	329	Set whether CLI styling is enabled."), _("\
	330	Show whether CLI is enabled."), _("\
	331	If enabled, output to the terminal is styled."),
62f29fda	332	set_style_enabled, show_style_enabled,
cbe56571 TT	333	&style_set_list, &style_show_list);
cbe56571 TT	334
d085f989 TT	335	add_setshow_boolean_cmd ("sources", no_class, &source_styling, _("\
	336	Set whether source code styling is enabled."), _("\
	337	Show whether source code styling is enabled."), _("\
	338	If enabled, source code is styled.\n"
	339	#ifdef HAVE_SOURCE_HIGHLIGHT
	340	"Note that source styling only works if styling in general is enabled,\n\
	341	see \"show style enabled\"."
	342	#else
	343	"Source highlighting is disabled in this installation of gdb, because\n\
	344	it was not linked against GNU Source Highlight."
	345	#endif
	346	), set_style_enabled, show_style_sources,
	347	&style_set_list, &style_show_list);
	348
a2a7af0c	349	#define STYLE_ADD_SETSHOW_COMMANDS(STYLE, PREFIX_DOC, SKIP) \
9303eb2f	350	STYLE.add_setshow_commands (no_class, PREFIX_DOC, \
d73cff18 PW	351	&style_set_list, \
	352	[] (const char *args, int from_tty) \
	353	{ \
	354	help_list \
	355	(STYLE.set_list (), \
9303eb2f	356	set_style_name (STYLE.name ()).c_str (), \
d73cff18 PW	357	all_commands, \
	358	gdb_stdout); \
	359	}, \
	360	&style_show_list, \
	361	[] (const char *args, int from_tty) \
	362	{ \
	363	cmd_show_list \
	364	(STYLE.show_list (), \
	365	from_tty, \
	366	""); \
a2a7af0c	367	}, SKIP)
d73cff18	368
9303eb2f	369	STYLE_ADD_SETSHOW_COMMANDS (file_name_style,
d73cff18	370	_("\
590042fc	371	Filename display styling.\n\
a2a7af0c	372	Configure filename colors and display intensity."), false);
d73cff18	373
9303eb2f	374	STYLE_ADD_SETSHOW_COMMANDS (function_name_style,
d73cff18	375	_("\
590042fc	376	Function name display styling.\n\
a2a7af0c	377	Configure function name colors and display intensity"), false);
d73cff18	378
9303eb2f	379	STYLE_ADD_SETSHOW_COMMANDS (variable_name_style,
d73cff18	380	_("\
590042fc	381	Variable name display styling.\n\
a2a7af0c	382	Configure variable name colors and display intensity"), false);
d73cff18	383
9303eb2f	384	STYLE_ADD_SETSHOW_COMMANDS (address_style,
d73cff18	385	_("\
590042fc	386	Address display styling.\n\
a2a7af0c	387	Configure address colors and display intensity"), false);
9303eb2f PW	388
	389	STYLE_ADD_SETSHOW_COMMANDS (title_style,
	390	_("\
590042fc	391	Title display styling.\n\
9303eb2f PW	392	Configure title colors and display intensity\n\
9303eb2f PW	393	Some commands (such as \"apropos -v REGEXP\") use the title style to improve\n\
a2a7af0c	394	readability."), false);
9303eb2f PW	395
	396	STYLE_ADD_SETSHOW_COMMANDS (highlight_style,
	397	_("\
590042fc	398	Highlight display styling.\n\
9303eb2f PW	399	Configure highlight colors and display intensity\n\
9303eb2f PW	400	Some commands use the highlight style to draw the attention to a part\n\
a2a7af0c	401	of their output."), false);
7f6aba03 TT	402
	403	STYLE_ADD_SETSHOW_COMMANDS (metadata_style,
	404	_("\
4d825eab	405	Metadata display styling.\n\
7f6aba03 TT	406	Configure metadata colors and display intensity\n\
7f6aba03 TT	407	The \"metadata\" style is used when GDB displays information about\n\
a2a7af0c TT	408	your data, for example \"<unavailable>\""), false);
	409
	410	STYLE_ADD_SETSHOW_COMMANDS (tui_border_style,
	411	_("\
	412	TUI border display styling.\n\
	413	Configure TUI border colors\n\
	414	The \"tui-border\" style is used when GDB displays the border of a\n\
	415	TUI window that does not have the focus."), true);
	416
	417	STYLE_ADD_SETSHOW_COMMANDS (tui_active_border_style,
	418	_("\
	419	TUI active border display styling.\n\
	420	Configure TUI active border colors\n\
	421	The \"tui-active-border\" style is used when GDB displays the border of a\n\
	422	TUI window that does have the focus."), true);
cbe56571	423	}