From: Enze Li <lienze2010@hotmail.com>
To: gdb-patches@sourceware.org
Cc: Tom Tromey <tom@tromey.com>
Subject: [PING**2][PATCH v4] gdb: Add new 'print nibbles' feature
Date: Wed, 29 Sep 2021 21:48:05 +0800 [thread overview]
Message-ID: <MEAP282MB02935BB9FF874795B4CC2123DDA99@MEAP282MB0293.AUSP282.PROD.OUTLOOK.COM> (raw)
In-Reply-To: <MEAP282MB029306827D278BCF1FA7D6A7DDD09@MEAP282MB0293.AUSP282.PROD.OUTLOOK.COM>
Ping
Thanks,
Enze
On 9/4/21 8:42 PM, Enze Li via Gdb-patches wrote:
> Make an introduction of a new print setting that can be set by 'set
> print nibbles [on|off]. The default value is OFF, and it would be
> changed by users manually.
>
> And of course, 'show print nibbles' is also included in the patch.
>
> The new feature could display binary values in groups, and each group
> has four bits.
>
> Here's a GDB session before this patch is applied.
> (gdb) print var_a
> $1 = 1230
> (gdb) print/t var_a
> $2 = 10011001110
>
> With this patch applied, we have a new print setting to use.
> (gdb) print var_a
> $1 = 1230
> (gdb) print/t var_a
> $2 = 10011001110
> (gdb) set print nibbles on
> (gdb) print/t a
> $3 = 100 1100 1110
>
> Tested on x86_64-linux(little-endian) and mips-linux(big-endian).
>
> gdb/ChangeLog:
> 2021-09-03 Enze Li <lienze2010@hotmail.com>
>
> * NEWS: Metion new command.
> * printcmd.c (print_scalar_formatted): Add new parameter and pass
> it to print_binary_chars.
> * valprint.c (struct value_print_options) <nibblesprint>:
> New member.
> (show_binary_groups): New function.
> (print_binary_chars): Add new parameter `value_print_option *`
> and use it.
> * valprint.h (struct value_print_options):
> (print_binary_chars): Add new parameter to declaration.
>
> gdb/doc/ChangeLog:
> 2021-09-03 Enze Li <lienze2010@hotmail.com>
>
> * gdb.texinfo (Print Settings): Document 'print nibbles'.
>
> gdb/testsuite/ChangeLog:
> 2021-09-03 Enze Li <lienze2010@hotmail.com>
>
> * gdb.base/printcmds.exp: Update to use new
> 'print nibbles' command.
> * gdb.base/options.exp: Add -nibbles in the print completion list.
> ---
> gdb/NEWS | 5 ++++
> gdb/doc/gdb.texinfo | 35 ++++++++++++++++++++++++----
> gdb/printcmd.c | 2 +-
> gdb/testsuite/gdb.base/options.exp | 1 +
> gdb/testsuite/gdb.base/printcmds.exp | 14 +++++++++++
> gdb/valprint.c | 26 ++++++++++++++++++++-
> gdb/valprint.h | 6 ++++-
> 7 files changed, 82 insertions(+), 7 deletions(-)
>
> diff --git a/gdb/NEWS b/gdb/NEWS
> index ec3058ea118..272b4c5be86 100644
> --- a/gdb/NEWS
> +++ b/gdb/NEWS
> @@ -135,6 +135,11 @@ set debug event-loop
> show debug event-loop
> Control the display of debug output about GDB's event loop.
>
> +set print nibbles [on|off]
> +show print nibbles
> + This controls whether the 'print/t' command will display binary values
> + in groups of four bits, known as "nibbles". The default is 'off'.
> +
> set print memory-tag-violations
> show print memory-tag-violations
> Control whether to display additional information about memory tag violations
> diff --git a/gdb/doc/gdb.texinfo b/gdb/doc/gdb.texinfo
> index 58479ef3ed6..6242dcd08b1 100644
> --- a/gdb/doc/gdb.texinfo
> +++ b/gdb/doc/gdb.texinfo
> @@ -2141,10 +2141,10 @@ on @code{-} after the command name. For example:
>
> @smallexample
> (@value{GDBP}) print -@key{TAB}@key{TAB}
> --address -max-depth -raw-values -union
> --array -null-stop -repeats -vtbl
> --array-indexes -object -static-members
> --elements -pretty -symbol
> +-address -max-depth -pretty -symbol
> +-array -nibbles -raw-values -union
> +-array-indexes -null-stop -repeats -vtbl
> +-elements -object -static-members
> @end smallexample
>
> Completion will in some cases guide you with a suggestion of what kind
> @@ -9977,6 +9977,10 @@ Set limit on string chars or array elements to print. The value
> Set the threshold after which nested structures are replaced with
> ellipsis. Related setting: @ref{set print max-depth}.
>
> +@item -nibbles [@code{on}|@code{off}]
> +Set whether to print binary values in groups of four bits, known
> +as ``nibbles''. @xref{set print nibbles}.
> +
> @item -null-stop [@code{on}|@code{off}]
> Set printing of char arrays to stop at first null char. Related
> setting: @ref{set print null-stop}.
> @@ -11335,6 +11339,29 @@ Stop printing element indexes when displaying arrays.
> Show whether the index of each element is printed when displaying
> arrays.
>
> +@anchor{set print nibbles}
> +@item set print nibbles
> +@itemx set print nibbles on
> +@cindex print binary values in groups of four bits
> +Print binary values in groups of four bits, known as @dfn{nibbles},
> +when using the print command of @value{GDBN} with the option @samp{/t}.
> +For example, this is what it looks like with @code{set print nibbles on}:
> +
> +@smallexample
> +@group
> +(@value{GDBP}) print val_flags
> +$1 = 1230
> +(@value{GDBP}) print/t val_flags
> +$2 = 100 1100 1110
> +@end group
> +@end smallexample
> +
> +@item set print nibbles off
> +Don't printing binary values in groups. This is the default.
> +
> +@item show print nibbles
> +Show whether to print binary values in groups of four bits.
> +
> @anchor{set print elements}
> @item set print elements @var{number-of-elements}
> @itemx set print elements unlimited
> diff --git a/gdb/printcmd.c b/gdb/printcmd.c
> index 2fe3f4b0cc5..62713f1a91f 100644
> --- a/gdb/printcmd.c
> +++ b/gdb/printcmd.c
> @@ -490,7 +490,7 @@ print_scalar_formatted (const gdb_byte *valaddr, struct type *type,
> break;
>
> case 't':
> - print_binary_chars (stream, valaddr, len, byte_order, size > 0);
> + print_binary_chars (stream, valaddr, len, byte_order, size > 0, options);
> break;
> case 'x':
> print_hex_chars (stream, valaddr, len, byte_order, size > 0);
> diff --git a/gdb/testsuite/gdb.base/options.exp b/gdb/testsuite/gdb.base/options.exp
> index 6b48a0f4a4b..1f331b270eb 100644
> --- a/gdb/testsuite/gdb.base/options.exp
> +++ b/gdb/testsuite/gdb.base/options.exp
> @@ -167,6 +167,7 @@ proc_with_prefix test-print {{prefix ""}} {
> "-array-indexes"
> "-elements"
> "-max-depth"
> + "-nibbles"
> "-memory-tag-violations"
> "-null-stop"
> "-object"
> diff --git a/gdb/testsuite/gdb.base/printcmds.exp b/gdb/testsuite/gdb.base/printcmds.exp
> index 8967de3e948..0dbcf92815c 100644
> --- a/gdb/testsuite/gdb.base/printcmds.exp
> +++ b/gdb/testsuite/gdb.base/printcmds.exp
> @@ -690,6 +690,19 @@ proc test_print_char_arrays {} {
> gdb_test_no_output "set print address off" "address off char arrays"
> }
>
> +proc test_print_nibbles {} {
> + gdb_test_no_output "set print nibbles on"
> + gdb_test "p/t 0" " = 0"
> + gdb_test "p/t 0x0" " = 0"
> + gdb_test "p/t 0x30" " = 11 0000"
> + gdb_test "p/t 0xff" " = 1111 1111"
> + gdb_test "p/t 0x0f" " = 1111"
> + gdb_test "p/t 0x01" " = 1"
> + gdb_test "p/t 0xf0f" " = 1111 0000 1111"
> + gdb_test "p/t 0x70f" " = 111 0000 1111"
> + gdb_test_no_output "set print nibbles off"
> +}
> +
> proc test_print_string_constants {} {
> global gdb_prompt
>
> @@ -1068,6 +1081,7 @@ test_print_int_arrays
> test_print_typedef_arrays
> test_artificial_arrays
> test_print_char_arrays
> +test_print_nibbles
> # We used to do the runto main here.
> test_print_string_constants
> test_print_array_constants
> diff --git a/gdb/valprint.c b/gdb/valprint.c
> index 324055da93f..c797d89798a 100644
> --- a/gdb/valprint.c
> +++ b/gdb/valprint.c
> @@ -108,6 +108,7 @@ struct value_print_options user_print_options =
> 0, /* vtblprint */
> 1, /* unionprint */
> 1, /* addressprint */
> + false, /* nibblesprint */
> 0, /* objectprint */
> PRINT_MAX_DEFAULT, /* print_max */
> 10, /* repeat_count_threshold */
> @@ -260,6 +261,15 @@ show_unionprint (struct ui_file *file, int from_tty,
> value);
> }
>
> +static void
> +show_nibbles (struct ui_file *file, int from_tty,
> + struct cmd_list_element *c, const char *value)
> +{
> + fprintf_filtered (file,
> + _("Printing binary values in groups is %s.\n"),
> + value);
> +}
> +
> /* If nonzero, causes machine addresses to be printed in certain contexts. */
>
> static void
> @@ -1367,7 +1377,8 @@ print_floating (const gdb_byte *valaddr, struct type *type,
>
> void
> print_binary_chars (struct ui_file *stream, const gdb_byte *valaddr,
> - unsigned len, enum bfd_endian byte_order, bool zero_pad)
> + unsigned len, enum bfd_endian byte_order, bool zero_pad,
> + const struct value_print_options *options)
> {
> const gdb_byte *p;
> unsigned int i;
> @@ -1390,6 +1401,8 @@ print_binary_chars (struct ui_file *stream, const gdb_byte *valaddr,
>
> for (i = 0; i < (HOST_CHAR_BIT * sizeof (*p)); i++)
> {
> + if (options->nibblesprint && seen_a_one && i % 4 == 0)
> + fputc_filtered (' ', stream);
> if (*p & (mask >> i))
> b = '1';
> else
> @@ -1410,6 +1423,8 @@ print_binary_chars (struct ui_file *stream, const gdb_byte *valaddr,
> {
> for (i = 0; i < (HOST_CHAR_BIT * sizeof (*p)); i++)
> {
> + if (options->nibblesprint && seen_a_one && i % 4 == 0)
> + fputc_filtered (' ', stream);
> if (*p & (mask >> i))
> b = '1';
> else
> @@ -3016,6 +3031,15 @@ static const gdb::option::option_def value_print_option_defs[] = {
> NULL, /* help_doc */
> },
>
> + boolean_option_def {
> + "nibbles",
> + [] (value_print_options *opt) { return &opt->nibblesprint; },
> + show_nibbles, /* show_cmd_cb */
> + N_("Set whether to print binary values in groups of four bits."),
> + N_("Show whether to print binary values in groups of four bits."),
> + NULL, /* help_doc */
> + },
> +
> uinteger_option_def {
> "elements",
> [] (value_print_options *opt) { return &opt->print_max; },
> diff --git a/gdb/valprint.h b/gdb/valprint.h
> index e1dae2cc8fc..bb19c41ab68 100644
> --- a/gdb/valprint.h
> +++ b/gdb/valprint.h
> @@ -44,6 +44,9 @@ struct value_print_options
> /* Controls printing of addresses. */
> bool addressprint;
>
> + /* Controls printing of nibbles. */
> + bool nibblesprint;
> +
> /* Controls looking up an object's derived type using what we find
> in its vtables. */
> bool objectprint;
> @@ -149,7 +152,8 @@ extern void value_print_scalar_formatted
> int size, struct ui_file *stream);
>
> extern void print_binary_chars (struct ui_file *, const gdb_byte *,
> - unsigned int, enum bfd_endian, bool);
> + unsigned int, enum bfd_endian, bool,
> + const struct value_print_options *options);
>
> extern void print_octal_chars (struct ui_file *, const gdb_byte *,
> unsigned int, enum bfd_endian);
next prev parent reply other threads:[~2021-09-29 13:48 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2021-09-04 12:42 [PATCH v4] " Enze Li
2021-09-18 13:18 ` [PING][PATCH v4] gdb: " Enze Li
2021-09-29 13:48 ` Enze Li [this message]
2021-09-30 20:35 ` [PATCH v4] " Bruno Larsen
2021-10-07 12:51 ` Enze Li
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=MEAP282MB02935BB9FF874795B4CC2123DDA99@MEAP282MB0293.AUSP282.PROD.OUTLOOK.COM \
--to=lienze2010@hotmail.com \
--cc=gdb-patches@sourceware.org \
--cc=tom@tromey.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).