diff options
Diffstat (limited to 'gdb/cli')
| -rw-r--r-- | gdb/cli/cli-utils.c | 134 | ||||
| -rw-r--r-- | gdb/cli/cli-utils.h | 38 |
2 files changed, 59 insertions, 113 deletions
diff --git a/gdb/cli/cli-utils.c b/gdb/cli/cli-utils.c index 333a86a81b9..cd3dfe65a2b 100644 --- a/gdb/cli/cli-utils.c +++ b/gdb/cli/cli-utils.c @@ -23,8 +23,6 @@ #include <ctype.h> -static std::string extract_arg_maybe_quoted (const char **arg); - /* See documentation in cli-utils.h. */ ULONGEST @@ -182,38 +180,6 @@ get_number (char **pp) /* See documentation in cli-utils.h. */ -bool -extract_info_print_args (const char **args, - bool *quiet, - std::string *regexp, - std::string *t_regexp) -{ - /* Check for NAMEREGEXP or -- NAMEREGEXP. */ - if (**args != '-' || check_for_argument (args, "--", 2)) - { - *regexp = *args; - *args = NULL; - return true; - } - - if (check_for_argument (args, "-t", 2)) - { - *t_regexp = extract_arg_maybe_quoted (args); - *args = skip_spaces (*args); - return true; - } - - if (check_for_argument (args, "-q", 2)) - { - *quiet = true; - return true; - } - - return false; -} - -/* See documentation in cli-utils.h. */ - void report_unrecognized_option_error (const char *command, const char *args) { @@ -407,69 +373,6 @@ remove_trailing_whitespace (const char *start, const char *s) return s; } -/* A helper function to extract an argument from *ARG. An argument is - delimited by whitespace, but it can also be optionally quoted. - The quoting and special characters are handled similarly to - the parsing done by gdb_argv. - The return value is empty if no argument was found. */ - -static std::string -extract_arg_maybe_quoted (const char **arg) -{ - bool squote = false; - bool dquote = false; - bool bsquote = false; - std::string result; - const char *p = *arg; - - /* Find the start of the argument. */ - p = skip_spaces (p); - - /* Parse p similarly to gdb_argv buildargv function. */ - while (*p != '\0') - { - if (isspace (*p) && !squote && !dquote && !bsquote) - break; - else - { - if (bsquote) - { - bsquote = false; - result += *p; - } - else if (*p == '\\') - bsquote = true; - else if (squote) - { - if (*p == '\'') - squote = false; - else - result += *p; - } - else if (dquote) - { - if (*p == '"') - dquote = false; - else - result += *p; - } - else - { - if (*p == '\'') - squote = true; - else if (*p == '"') - dquote = true; - else - result += *p; - } - p++; - } - } - - *arg = p; - return result; -} - /* See documentation in cli-utils.h. */ std::string @@ -532,4 +435,41 @@ validate_flags_qcs (const char *which_command, qcs_flags *flags) error (_("%s: -c and -s are mutually exclusive"), which_command); } +/* The options used by the 'info variables' commands and similar. */ + +static const gdb::option::option_def info_print_options_defs[] = { + gdb::option::boolean_option_def<info_print_options> { + "q", + [] (info_print_options *opt) { return &opt->quiet; }, + nullptr, /* show_cmd_cb */ + nullptr /* set_doc */ + }, + + gdb::option::string_option_def<info_print_options> { + "t", + [] (info_print_options *opt) { return &opt->type_regexp; }, + nullptr, /* show_cmd_cb */ + nullptr /* set_doc */ + } +}; + +/* Returns the option group used by 'info variables' and similar. */ + +static gdb::option::option_def_group +make_info_print_options_def_group (info_print_options *opts) +{ + return {{info_print_options_defs}, opts}; +} + /* See documentation in cli-utils.h. */ + +void +extract_info_print_options (info_print_options *opts, + const char **args) +{ + auto grp = make_info_print_options_def_group (opts); + gdb::option::process_options + (args, gdb::option::PROCESS_OPTIONS_UNKNOWN_IS_OPERAND, grp); + if (*args != nullptr && **args == '\0') + *args = nullptr; +} diff --git a/gdb/cli/cli-utils.h b/gdb/cli/cli-utils.h index c2a0f374a6e..a3826be6824 100644 --- a/gdb/cli/cli-utils.h +++ b/gdb/cli/cli-utils.h @@ -43,22 +43,28 @@ extern int get_number (char **); error instead of returning 0. */ extern ULONGEST get_ulongest (const char **pp, int trailer = '\0'); -/* Extract from ARGS the arguments [-q] [-t TYPEREGEXP] [--] NAMEREGEXP. - - The caller is responsible to initialize *QUIET to false, *REGEXP - and *T_REGEXP to "". - extract_info_print_args can then be called iteratively to search - for valid arguments, as part of a 'main parsing loop' searching for - -q/-t/-- arguments together with other flags and options. - - Returns true and updates *ARGS + one of *QUIET, *REGEXP, *T_REGEXP if - it finds a valid argument. - Returns false if no valid argument is found at the beginning of ARGS. */ - -extern bool extract_info_print_args (const char **args, - bool *quiet, - std::string *regexp, - std::string *t_regexp); +/* Structure to hold the values of the options used by the 'info + variables' command and other similar commands. These correspond to the + -q and -t options. */ + +struct info_print_options +{ + int quiet = false; + char *type_regexp = nullptr; + + ~info_print_options () + { + xfree (type_regexp); + } +}; + +/* Extract options from ARGS for commands like 'info variables', placing + the options into OPTS. ARGS is updated to point to the first character + after the options, or, if there is nothing after the options, then ARGS + is set to nullptr. */ + +extern void extract_info_print_options (info_print_options *opts, + const char **args); /* Throws an error telling the user that ARGS starts with an option unrecognized by COMMAND. */ |