gdb/mi/mi-getopt.c - gdb

Functions defined

Source code

  1. /* MI Command Set - MI Option Parser.
  2.    Copyright (C) 2000-2015 Free Software Foundation, Inc.
  3.    Contributed by Cygnus Solutions (a Red Hat company).

  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/>.  */

  20. #include "defs.h"
  21. #include "mi-getopt.h"
  22. /* See comments about mi_getopt and mi_getopt_silent in mi-getopt.h.
  23.    When there is an unknown option, if ERROR_ON_UNKNOWN is true,
  24.    throw an error, otherwise return -1.  */

  26. static int
  27. ‌mi_getopt_1 (const char *prefix, int argc, char **argv,
  28.              const struct mi_opt *opts, int *oind, char **oarg,
  29.              int error_on_unknown)
  30. {
  31.   char *arg;
  32.   const struct mi_opt *opt;

  34.   /* We assume that argv/argc are ok.  */
  35.   if (*oind > argc || *oind < 0)
  36.     internal_error (__FILE__, __LINE__,
  37.                     _("mi_getopt_long: oind out of bounds"));
  38.   if (*oind == argc)
  39.     return -1;
  40.   arg = argv[*oind];
  41.   /* ``--''? */
  42.   if (strcmp (arg, "--") == 0)
  43.     {
  44.       *oind += 1;
  45.       *oarg = NULL;
  46.       return -1;
  47.     }
  48.   /* End of option list.  */
  49.   if (arg[0] != '-')
  50.     {
  51.       *oarg = NULL;
  52.       return -1;
  53.     }
  54.   /* Look the option up.  */
  55.   for (opt = opts; opt->name != NULL; opt++)
  56.     {
  57.       if (strcmp (opt->name, arg + 1) != 0)
  58.         continue;
  59.       if (opt->arg_p)
  60.         {
  61.           /* A non-simple oarg option.  */
  62.           if (argc < *oind + 2)
  63.             error (_("%s: Option %s requires an argument"), prefix, arg);
  64.           *oarg = argv[(*oind) + 1];
  65.           *oind = (*oind) + 2;
  66.           return opt->index;
  67.         }
  68.       else
  69.         {
  70.           *oarg = NULL;
  71.           *oind = (*oind) + 1;
  72.           return opt->index;
  73.         }
  74.     }

  76.   if (error_on_unknown)
  77.     error (_("%s: Unknown option ``%s''"), prefix, arg + 1);
  78.   else
  79.     return -1;
  80. }

  82. int
  83. ‌mi_getopt (const char *prefix,
  84.            int argc, char **argv,
  85.            const struct mi_opt *opts,
  86.            int *oind, char **oarg)
  87. {
  88.   return mi_getopt_1 (prefix, argc, argv, opts, oind, oarg, 1);
  89. }

  91. int
  92. ‌mi_getopt_allow_unknown (const char *prefix, int argc, char **argv,
  93.                          const struct mi_opt *opts, int *oind, char **oarg)
  94. {
  95.   return mi_getopt_1 (prefix, argc, argv, opts, oind, oarg, 0);
  96. }

  98. int
  99. ‌mi_valid_noargs (const char *prefix, int argc, char **argv)
  100. {
  101.   int oind = 0;
  102.   char *oarg;
  103.   static const struct mi_opt opts[] =
  104.     {
  105.       { 0, 0, 0 }
  106.     };

  108.   if (mi_getopt (prefix, argc, argv, opts, &oind, &oarg) == -1)
  109.     return 1;
  110.   else
  111.     return 0;
  112. }