summaryrefslogtreecommitdiff
path: root/gdb/mi/mi-getopt.c
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/mi/mi-getopt.c')
-rw-r--r--gdb/mi/mi-getopt.c76
1 files changed, 0 insertions, 76 deletions
diff --git a/gdb/mi/mi-getopt.c b/gdb/mi/mi-getopt.c
deleted file mode 100644
index 59ccdf3efd0..00000000000
--- a/gdb/mi/mi-getopt.c
+++ /dev/null
@@ -1,76 +0,0 @@
-/* MI Command Set - MI Option Parser.
- Copyright 2000, 2001 Free Software Foundation, Inc.
- Contributed by Cygnus Solutions (a Red Hat company).
-
- 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 2 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, write to the Free Software
- Foundation, Inc., 59 Temple Place - Suite 330,
- Boston, MA 02111-1307, USA. */
-
-#include "defs.h"
-#include "mi-getopt.h"
-#include "gdb_string.h"
-
-int
-mi_getopt (const char *prefix,
- int argc, char **argv,
- struct mi_opt *opts,
- int *optind, char **optarg)
-{
- char *arg;
- struct mi_opt *opt;
- /* We assume that argv/argc are ok. */
- if (*optind > argc || *optind < 0)
- internal_error (__FILE__, __LINE__,
- "mi_getopt_long: optind out of bounds");
- if (*optind == argc)
- return -1;
- arg = argv[*optind];
- /* ``--''? */
- if (strcmp (arg, "--") == 0)
- {
- *optind += 1;
- *optarg = NULL;
- return -1;
- }
- /* End of option list. */
- if (arg[0] != '-')
- {
- *optarg = NULL;
- return -1;
- }
- /* Look the option up. */
- for (opt = opts; opt->name != NULL; opt++)
- {
- if (strcmp (opt->name, arg + 1) != 0)
- continue;
- if (opt->arg_p)
- {
- /* A non-simple optarg option. */
- if (argc < *optind + 2)
- error ("%s: Option %s requires an argument", prefix, arg);
- *optarg = argv[(*optind) + 1];
- *optind = (*optind) + 2;
- return opt->index;
- }
- else
- {
- *optarg = NULL;
- *optind = (*optind) + 1;
- return opt->index;
- }
- }
- error ("%s: Unknown option ``%s''", prefix, arg + 1);
-}