1 /* MI Command Set - MI Option Parser. 2 Copyright (C) 2000-2019 Free Software Foundation, Inc. 3 Contributed by Cygnus Solutions (a Red Hat company). 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 "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. */ 25 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; 33 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 } 75 76 if (error_on_unknown) 77 error (_("%s: Unknown option ``%s''"), prefix, arg + 1); 78 else 79 return -1; 80 } 81 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 } 90 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 } 97 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 }; 107 108 if (mi_getopt (prefix, argc, argv, opts, &oind, &oarg) == -1) 109 return 1; 110 else 111 return 0; 112 } 113