X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?a=blobdiff_plain;f=utilities%2Fgengetopt%2Fskels%2Fcustom_getopt_gen.cc;fp=utilities%2Fgengetopt%2Fskels%2Fcustom_getopt_gen.cc;h=d0ff3ffc368fc3004ed94803bdd989d6333fbb67;hb=79381bc54b9e0c85156460daa211fe5ac83da0a7;hp=0000000000000000000000000000000000000000;hpb=4454c06e212fb6af58d206f2d6f9b76778858967;p=clitk.git diff --git a/utilities/gengetopt/skels/custom_getopt_gen.cc b/utilities/gengetopt/skels/custom_getopt_gen.cc new file mode 100644 index 0000000..d0ff3ff --- /dev/null +++ b/utilities/gengetopt/skels/custom_getopt_gen.cc @@ -0,0 +1,1750 @@ +/* + * File automatically generated by + * gengen 1.4.1 by Lorenzo Bettini + * http://www.gnu.org/software/gengen + */ + +#include "custom_getopt_gen.h" + +void +custom_getopt_gen_gen_class::generate_custom_getopt_gen(ostream &stream, unsigned int indent) +{ + string indent_str (indent, ' '); + indent = 0; + + stream << "/*"; + stream << "\n"; + stream << indent_str; + stream << " * Extracted from the glibc source tree, version 2.3.6"; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * Licensed under the GPL as per the whole glibc source tree."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * This file was modified so that getopt_long can be called"; + stream << "\n"; + stream << indent_str; + stream << " * many times without risking previous memory to be spoiled."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * Modified by Andre Noll and Lorenzo Bettini for use in"; + stream << "\n"; + stream << indent_str; + stream << " * GNU gengetopt generated files."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "/* "; + stream << "\n"; + stream << indent_str; + stream << " * we must include anything we need since this file is not thought to be"; + stream << "\n"; + stream << indent_str; + stream << " * inserted in a file already using getopt.h"; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * Lorenzo"; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "struct option"; + stream << "\n"; + stream << indent_str; + stream << "{"; + stream << "\n"; + stream << indent_str; + stream << " const char *name;"; + stream << "\n"; + stream << indent_str; + stream << " /* has_arg can't be an enum because some compilers complain about"; + stream << "\n"; + stream << indent_str; + stream << " type mismatches in all the code that assumes it is an int. */"; + stream << "\n"; + stream << indent_str; + stream << " int has_arg;"; + stream << "\n"; + stream << indent_str; + stream << " int *flag;"; + stream << "\n"; + stream << indent_str; + stream << " int val;"; + stream << "\n"; + stream << indent_str; + stream << "};"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "/* This version of `getopt' appears to the caller like standard Unix `getopt'"; + stream << "\n"; + stream << indent_str; + stream << " but it behaves differently for the user, since it allows the user"; + stream << "\n"; + stream << indent_str; + stream << " to intersperse the options with the other arguments."; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " As `getopt' works, it permutes the elements of ARGV so that,"; + stream << "\n"; + stream << indent_str; + stream << " when it is done, all the options precede everything else. Thus"; + stream << "\n"; + stream << indent_str; + stream << " all application programs are extended to handle flexible argument order."; + stream << "\n"; + stream << indent_str; + stream << "*/"; + stream << "\n"; + stream << indent_str; + stream << "/*"; + stream << "\n"; + stream << indent_str; + stream << " If the field `flag' is not NULL, it points to a variable that is set"; + stream << "\n"; + stream << indent_str; + stream << " to the value given in the field `val' when the option is found, but"; + stream << "\n"; + stream << indent_str; + stream << " left unchanged if the option is not found."; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " To have a long-named option do something other than set an `int' to"; + stream << "\n"; + stream << indent_str; + stream << " a compiled-in constant, such as set a value from `custom_optarg', set the"; + stream << "\n"; + stream << indent_str; + stream << " option's `flag' field to zero and its `val' field to a nonzero"; + stream << "\n"; + stream << indent_str; + stream << " value (the equivalent single-letter option character, if there is"; + stream << "\n"; + stream << indent_str; + stream << " one). For long options that have a zero `flag' field, `getopt'"; + stream << "\n"; + stream << indent_str; + stream << " returns the contents of the `val' field. */"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "/* Names for the values of the `has_arg' field of `struct option'. */"; + stream << "\n"; + stream << indent_str; + stream << "#ifndef no_argument"; + stream << "\n"; + stream << indent_str; + stream << "#define no_argument 0"; + stream << "\n"; + stream << indent_str; + stream << "#endif"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "#ifndef required_argument"; + stream << "\n"; + stream << indent_str; + stream << "#define required_argument 1"; + stream << "\n"; + stream << indent_str; + stream << "#endif"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "#ifndef optional_argument"; + stream << "\n"; + stream << indent_str; + stream << "#define optional_argument 2"; + stream << "\n"; + stream << indent_str; + stream << "#endif"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "struct custom_getopt_data {"; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * These have exactly the same meaning as the corresponding global variables,"; + stream << "\n"; + stream << indent_str; + stream << " * except that they are used for the reentrant versions of getopt."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " int custom_optind;"; + stream << "\n"; + stream << indent_str; + stream << " int custom_opterr;"; + stream << "\n"; + stream << indent_str; + stream << " int custom_optopt;"; + stream << "\n"; + stream << indent_str; + stream << " char *custom_optarg;"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " /* True if the internal members have been initialized. */"; + stream << "\n"; + stream << indent_str; + stream << " int initialized;"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * The next char to be scanned in the option-element in which the last option"; + stream << "\n"; + stream << indent_str; + stream << " * character we returned was found. This allows us to pick up the scan where"; + stream << "\n"; + stream << indent_str; + stream << " * we left off. If this is zero, or a null string, it means resume the scan by"; + stream << "\n"; + stream << indent_str; + stream << " * advancing to the next ARGV-element."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " char *nextchar;"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * Describe the part of ARGV that contains non-options that have been skipped."; + stream << "\n"; + stream << indent_str; + stream << " * `first_nonopt' is the index in ARGV of the first of them; `last_nonopt' is"; + stream << "\n"; + stream << indent_str; + stream << " * the index after the last of them."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " int first_nonopt;"; + stream << "\n"; + stream << indent_str; + stream << " int last_nonopt;"; + stream << "\n"; + stream << indent_str; + stream << "};"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "/*"; + stream << "\n"; + stream << indent_str; + stream << " * the variables optarg, optind, opterr and optopt are renamed with"; + stream << "\n"; + stream << indent_str; + stream << " * the custom_ prefix so that they don't interfere with getopt ones."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * Moreover they're static so they are visible only from within the"; + stream << "\n"; + stream << indent_str; + stream << " * file where this very file will be included."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "/*"; + stream << "\n"; + stream << indent_str; + stream << " * For communication from `custom_getopt' to the caller. When `custom_getopt' finds an"; + stream << "\n"; + stream << indent_str; + stream << " * option that takes an argument, the argument value is returned here."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << "static char *custom_optarg;"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "/*"; + stream << "\n"; + stream << indent_str; + stream << " * Index in ARGV of the next element to be scanned. This is used for"; + stream << "\n"; + stream << indent_str; + stream << " * communication to and from the caller and for communication between"; + stream << "\n"; + stream << indent_str; + stream << " * successive calls to `custom_getopt'."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * On entry to `custom_getopt', 1 means this is the first call; initialize."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * When `custom_getopt' returns -1, this is the index of the first of the non-option"; + stream << "\n"; + stream << indent_str; + stream << " * elements that the caller should itself scan."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * Otherwise, `custom_optind' communicates from one call to the next how much of ARGV"; + stream << "\n"; + stream << indent_str; + stream << " * has been scanned so far."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * 1003.2 says this must be 1 before any call."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << "static int custom_optind = 1;"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "/*"; + stream << "\n"; + stream << indent_str; + stream << " * Callers store zero here to inhibit the error message for unrecognized"; + stream << "\n"; + stream << indent_str; + stream << " * options."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << "static int custom_opterr = 1;"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "/*"; + stream << "\n"; + stream << indent_str; + stream << " * Set to an option character which was unrecognized. This must be initialized"; + stream << "\n"; + stream << indent_str; + stream << " * on some systems to avoid linking in the system's own getopt implementation."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << "static int custom_optopt = '?';"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "/*"; + stream << "\n"; + stream << indent_str; + stream << " * Exchange two adjacent subsequences of ARGV. One subsequence is elements"; + stream << "\n"; + stream << indent_str; + stream << " * [first_nonopt,last_nonopt) which contains all the non-options that have been"; + stream << "\n"; + stream << indent_str; + stream << " * skipped so far. The other is elements [last_nonopt,custom_optind), which contains"; + stream << "\n"; + stream << indent_str; + stream << " * all the options processed since those non-options were skipped."; + stream << "\n"; + stream << indent_str; + stream << " * `first_nonopt' and `last_nonopt' are relocated so that they describe the new"; + stream << "\n"; + stream << indent_str; + stream << " * indices of the non-options in ARGV after they are moved."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << "static void exchange(char **argv, struct custom_getopt_data *d)"; + stream << "\n"; + stream << indent_str; + stream << "{"; + stream << "\n"; + stream << indent_str; + stream << " int bottom = d->first_nonopt;"; + stream << "\n"; + stream << indent_str; + stream << " int middle = d->last_nonopt;"; + stream << "\n"; + stream << indent_str; + stream << " int top = d->custom_optind;"; + stream << "\n"; + stream << indent_str; + stream << " char *tem;"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * Exchange the shorter segment with the far end of the longer segment."; + stream << "\n"; + stream << indent_str; + stream << " * That puts the shorter segment into the right place. It leaves the"; + stream << "\n"; + stream << indent_str; + stream << " * longer segment in the right place overall, but it consists of two"; + stream << "\n"; + stream << indent_str; + stream << " * parts that need to be swapped next."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " while (top > middle && middle > bottom) {"; + stream << "\n"; + stream << indent_str; + stream << " if (top - middle > middle - bottom) {"; + stream << "\n"; + stream << indent_str; + stream << " /* Bottom segment is the short one. */"; + stream << "\n"; + stream << indent_str; + stream << " int len = middle - bottom;"; + stream << "\n"; + stream << indent_str; + stream << " int i;"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " /* Swap it with the top part of the top segment. */"; + stream << "\n"; + stream << indent_str; + stream << " for (i = 0; i < len; i++) {"; + stream << "\n"; + stream << indent_str; + stream << " tem = argv[bottom + i];"; + stream << "\n"; + stream << indent_str; + stream << " argv[bottom + i] ="; + stream << "\n"; + stream << indent_str; + stream << " argv[top - (middle - bottom) + i];"; + stream << "\n"; + stream << indent_str; + stream << " argv[top - (middle - bottom) + i] = tem;"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " /* Exclude the moved bottom segment from further swapping. */"; + stream << "\n"; + stream << indent_str; + stream << " top -= len;"; + stream << "\n"; + stream << indent_str; + stream << " } else {"; + stream << "\n"; + stream << indent_str; + stream << " /* Top segment is the short one. */"; + stream << "\n"; + stream << indent_str; + stream << " int len = top - middle;"; + stream << "\n"; + stream << indent_str; + stream << " int i;"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " /* Swap it with the bottom part of the bottom segment. */"; + stream << "\n"; + stream << indent_str; + stream << " for (i = 0; i < len; i++) {"; + stream << "\n"; + stream << indent_str; + stream << " tem = argv[bottom + i];"; + stream << "\n"; + stream << indent_str; + stream << " argv[bottom + i] = argv[middle + i];"; + stream << "\n"; + stream << indent_str; + stream << " argv[middle + i] = tem;"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " /* Exclude the moved top segment from further swapping. */"; + stream << "\n"; + stream << indent_str; + stream << " bottom += len;"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " /* Update records for the slots the non-options now occupy. */"; + stream << "\n"; + stream << indent_str; + stream << " d->first_nonopt += (d->custom_optind - d->last_nonopt);"; + stream << "\n"; + stream << indent_str; + stream << " d->last_nonopt = d->custom_optind;"; + stream << "\n"; + stream << indent_str; + stream << "}"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "/* Initialize the internal data when the first call is made. */"; + stream << "\n"; + stream << indent_str; + stream << "static void custom_getopt_initialize(struct custom_getopt_data *d)"; + stream << "\n"; + stream << indent_str; + stream << "{"; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * Start processing options with ARGV-element 1 (since ARGV-element 0"; + stream << "\n"; + stream << indent_str; + stream << " * is the program name); the sequence of previously skipped non-option"; + stream << "\n"; + stream << indent_str; + stream << " * ARGV-elements is empty."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " d->first_nonopt = d->last_nonopt = d->custom_optind;"; + stream << "\n"; + stream << indent_str; + stream << " d->nextchar = NULL;"; + stream << "\n"; + stream << indent_str; + stream << " d->initialized = 1;"; + stream << "\n"; + stream << indent_str; + stream << "}"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "#define NONOPTION_P (argv[d->custom_optind][0] != '-' || argv[d->custom_optind][1] == '\\0')"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "/* return: zero: continue, nonzero: return given value to user */"; + stream << "\n"; + stream << indent_str; + stream << "static int shuffle_argv(int argc, char *const *argv,const struct option *longopts,"; + stream << "\n"; + stream << indent_str; + stream << " struct custom_getopt_data *d)"; + stream << "\n"; + stream << indent_str; + stream << "{"; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * Give FIRST_NONOPT & LAST_NONOPT rational values if CUSTOM_OPTIND has been"; + stream << "\n"; + stream << indent_str; + stream << " * moved back by the user (who may also have changed the arguments)."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " if (d->last_nonopt > d->custom_optind)"; + stream << "\n"; + stream << indent_str; + stream << " d->last_nonopt = d->custom_optind;"; + stream << "\n"; + stream << indent_str; + stream << " if (d->first_nonopt > d->custom_optind)"; + stream << "\n"; + stream << indent_str; + stream << " d->first_nonopt = d->custom_optind;"; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * If we have just processed some options following some"; + stream << "\n"; + stream << indent_str; + stream << " * non-options, exchange them so that the options come first."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " if (d->first_nonopt != d->last_nonopt &&"; + stream << "\n"; + stream << indent_str; + stream << " d->last_nonopt != d->custom_optind)"; + stream << "\n"; + stream << indent_str; + stream << " exchange((char **) argv, d);"; + stream << "\n"; + stream << indent_str; + stream << " else if (d->last_nonopt != d->custom_optind)"; + stream << "\n"; + stream << indent_str; + stream << " d->first_nonopt = d->custom_optind;"; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * Skip any additional non-options and extend the range of"; + stream << "\n"; + stream << indent_str; + stream << " * non-options previously skipped."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " while (d->custom_optind < argc && NONOPTION_P)"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optind++;"; + stream << "\n"; + stream << indent_str; + stream << " d->last_nonopt = d->custom_optind;"; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * The special ARGV-element `--' means premature end of options. Skip"; + stream << "\n"; + stream << indent_str; + stream << " * it like a null option, then exchange with previous non-options as if"; + stream << "\n"; + stream << indent_str; + stream << " * it were an option, then skip everything else like a non-option."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " if (d->custom_optind != argc && !strcmp(argv[d->custom_optind], \"--\")) {"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optind++;"; + stream << "\n"; + stream << indent_str; + stream << " if (d->first_nonopt != d->last_nonopt"; + stream << "\n"; + stream << indent_str; + stream << " && d->last_nonopt != d->custom_optind)"; + stream << "\n"; + stream << indent_str; + stream << " exchange((char **) argv, d);"; + stream << "\n"; + stream << indent_str; + stream << " else if (d->first_nonopt == d->last_nonopt)"; + stream << "\n"; + stream << indent_str; + stream << " d->first_nonopt = d->custom_optind;"; + stream << "\n"; + stream << indent_str; + stream << " d->last_nonopt = argc;"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optind = argc;"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * If we have done all the ARGV-elements, stop the scan and back over"; + stream << "\n"; + stream << indent_str; + stream << " * any non-options that we skipped and permuted."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " if (d->custom_optind == argc) {"; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * Set the next-arg-index to point at the non-options that we"; + stream << "\n"; + stream << indent_str; + stream << " * previously skipped, so the caller will digest them."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " if (d->first_nonopt != d->last_nonopt)"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optind = d->first_nonopt;"; + stream << "\n"; + stream << indent_str; + stream << " return -1;"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * If we have come to a non-option and did not permute it, either stop"; + stream << "\n"; + stream << indent_str; + stream << " * the scan or describe it to the caller and pass it by."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " if (NONOPTION_P) {"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optarg = argv[d->custom_optind++];"; + stream << "\n"; + stream << indent_str; + stream << " return 1;"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * We have found another option-ARGV-element. Skip the initial"; + stream << "\n"; + stream << indent_str; + stream << " * punctuation."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " d->nextchar = (argv[d->custom_optind] + 1 + (longopts != NULL && argv[d->custom_optind][1] == '-'));"; + stream << "\n"; + stream << indent_str; + stream << " return 0;"; + stream << "\n"; + stream << indent_str; + stream << "}"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "/*"; + stream << "\n"; + stream << indent_str; + stream << " * Check whether the ARGV-element is a long option."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * If there's a long option \"fubar\" and the ARGV-element is \"-fu\", consider"; + stream << "\n"; + stream << indent_str; + stream << " * that an abbreviation of the long option, just like \"--fu\", and not \"-f\" with"; + stream << "\n"; + stream << indent_str; + stream << " * arg \"u\"."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * This distinction seems to be the most useful approach."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << "static int check_long_opt(int argc, char *const *argv, const char *optstring,"; + stream << "\n"; + stream << indent_str; + stream << " const struct option *longopts, int *longind,"; + stream << "\n"; + stream << indent_str; + stream << " int print_errors, struct custom_getopt_data *d)"; + stream << "\n"; + stream << indent_str; + stream << "{"; + stream << "\n"; + stream << indent_str; + stream << " char *nameend;"; + stream << "\n"; + stream << indent_str; + stream << " const struct option *p;"; + stream << "\n"; + stream << indent_str; + stream << " const struct option *pfound = NULL;"; + stream << "\n"; + stream << indent_str; + stream << " int exact = 0;"; + stream << "\n"; + stream << indent_str; + stream << " int ambig = 0;"; + stream << "\n"; + stream << indent_str; + stream << " int indfound = -1;"; + stream << "\n"; + stream << indent_str; + stream << " int option_index;"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " for (nameend = d->nextchar; *nameend && *nameend != '='; nameend++)"; + stream << "\n"; + stream << indent_str; + stream << " /* Do nothing. */ ;"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " /* Test all long options for either exact match or abbreviated matches */"; + stream << "\n"; + stream << indent_str; + stream << " for (p = longopts, option_index = 0; p->name; p++, option_index++)"; + stream << "\n"; + stream << indent_str; + stream << " if (!strncmp(p->name, d->nextchar, nameend - d->nextchar)) {"; + stream << "\n"; + stream << indent_str; + stream << " if ((unsigned int) (nameend - d->nextchar)"; + stream << "\n"; + stream << indent_str; + stream << " == (unsigned int) strlen(p->name)) {"; + stream << "\n"; + stream << indent_str; + stream << " /* Exact match found. */"; + stream << "\n"; + stream << indent_str; + stream << " pfound = p;"; + stream << "\n"; + stream << indent_str; + stream << " indfound = option_index;"; + stream << "\n"; + stream << indent_str; + stream << " exact = 1;"; + stream << "\n"; + stream << indent_str; + stream << " break;"; + stream << "\n"; + stream << indent_str; + stream << " } else if (pfound == NULL) {"; + stream << "\n"; + stream << indent_str; + stream << " /* First nonexact match found. */"; + stream << "\n"; + stream << indent_str; + stream << " pfound = p;"; + stream << "\n"; + stream << indent_str; + stream << " indfound = option_index;"; + stream << "\n"; + stream << indent_str; + stream << " } else if (pfound->has_arg != p->has_arg"; + stream << "\n"; + stream << indent_str; + stream << " || pfound->flag != p->flag"; + stream << "\n"; + stream << indent_str; + stream << " || pfound->val != p->val)"; + stream << "\n"; + stream << indent_str; + stream << " /* Second or later nonexact match found. */"; + stream << "\n"; + stream << indent_str; + stream << " ambig = 1;"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " if (ambig && !exact) {"; + stream << "\n"; + stream << indent_str; + stream << " if (print_errors) {"; + stream << "\n"; + stream << indent_str; + stream << " fprintf(stderr,"; + stream << "\n"; + stream << indent_str; + stream << " \"%s: option `%s' is ambiguous\\n\","; + stream << "\n"; + stream << indent_str; + stream << " argv[0], argv[d->custom_optind]);"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " d->nextchar += strlen(d->nextchar);"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optind++;"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optopt = 0;"; + stream << "\n"; + stream << indent_str; + stream << " return '?';"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " if (pfound) {"; + stream << "\n"; + stream << indent_str; + stream << " option_index = indfound;"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optind++;"; + stream << "\n"; + stream << indent_str; + stream << " if (*nameend) {"; + stream << "\n"; + stream << indent_str; + stream << " if (pfound->has_arg != no_argument)"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optarg = nameend + 1;"; + stream << "\n"; + stream << indent_str; + stream << " else {"; + stream << "\n"; + stream << indent_str; + stream << " if (print_errors) {"; + stream << "\n"; + stream << indent_str; + stream << " if (argv[d->custom_optind - 1][1] == '-') {"; + stream << "\n"; + stream << indent_str; + stream << " /* --option */"; + stream << "\n"; + stream << indent_str; + stream << " fprintf(stderr, \"%s: option `--%s' doesn't allow an argument\\n\","; + stream << "\n"; + stream << indent_str; + stream << " argv[0], pfound->name);"; + stream << "\n"; + stream << indent_str; + stream << " } else {"; + stream << "\n"; + stream << indent_str; + stream << " /* +option or -option */"; + stream << "\n"; + stream << indent_str; + stream << " fprintf(stderr, \"%s: option `%c%s' doesn't allow an argument\\n\","; + stream << "\n"; + stream << indent_str; + stream << " argv[0], argv[d->custom_optind - 1][0], pfound->name);"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " d->nextchar += strlen(d->nextchar);"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optopt = pfound->val;"; + stream << "\n"; + stream << indent_str; + stream << " return '?';"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " } else if (pfound->has_arg == required_argument) {"; + stream << "\n"; + stream << indent_str; + stream << " if (d->custom_optind < argc)"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optarg = argv[d->custom_optind++];"; + stream << "\n"; + stream << indent_str; + stream << " else {"; + stream << "\n"; + stream << indent_str; + stream << " if (print_errors) {"; + stream << "\n"; + stream << indent_str; + stream << " fprintf(stderr,"; + stream << "\n"; + stream << indent_str; + stream << " \"%s: option `%s' requires an argument\\n\","; + stream << "\n"; + stream << indent_str; + stream << " argv[0],"; + stream << "\n"; + stream << indent_str; + stream << " argv[d->custom_optind - 1]);"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " d->nextchar += strlen(d->nextchar);"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optopt = pfound->val;"; + stream << "\n"; + stream << indent_str; + stream << " return optstring[0] == ':' ? ':' : '?';"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " d->nextchar += strlen(d->nextchar);"; + stream << "\n"; + stream << indent_str; + stream << " if (longind != NULL)"; + stream << "\n"; + stream << indent_str; + stream << " *longind = option_index;"; + stream << "\n"; + stream << indent_str; + stream << " if (pfound->flag) {"; + stream << "\n"; + stream << indent_str; + stream << " *(pfound->flag) = pfound->val;"; + stream << "\n"; + stream << indent_str; + stream << " return 0;"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " return pfound->val;"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * Can't find it as a long option. If this is not getopt_long_only, or"; + stream << "\n"; + stream << indent_str; + stream << " * the option starts with '--' or is not a valid short option, then"; + stream << "\n"; + stream << indent_str; + stream << " * it's an error. Otherwise interpret it as a short option."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " if (print_errors) {"; + stream << "\n"; + stream << indent_str; + stream << " if (argv[d->custom_optind][1] == '-') {"; + stream << "\n"; + stream << indent_str; + stream << " /* --option */"; + stream << "\n"; + stream << indent_str; + stream << " fprintf(stderr,"; + stream << "\n"; + stream << indent_str; + stream << " \"%s: unrecognized option `--%s'\\n\","; + stream << "\n"; + stream << indent_str; + stream << " argv[0], d->nextchar);"; + stream << "\n"; + stream << indent_str; + stream << " } else {"; + stream << "\n"; + stream << indent_str; + stream << " /* +option or -option */"; + stream << "\n"; + stream << indent_str; + stream << " fprintf(stderr,"; + stream << "\n"; + stream << indent_str; + stream << " \"%s: unrecognized option `%c%s'\\n\","; + stream << "\n"; + stream << indent_str; + stream << " argv[0], argv[d->custom_optind][0],"; + stream << "\n"; + stream << indent_str; + stream << " d->nextchar);"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " d->nextchar = (char *) \"\";"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optind++;"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optopt = 0;"; + stream << "\n"; + stream << indent_str; + stream << " return '?';"; + stream << "\n"; + stream << indent_str; + stream << "}"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "static int check_short_opt(int argc, char *const *argv, const char *optstring,"; + stream << "\n"; + stream << indent_str; + stream << " int print_errors, struct custom_getopt_data *d)"; + stream << "\n"; + stream << indent_str; + stream << "{"; + stream << "\n"; + stream << indent_str; + stream << " char c = *d->nextchar++;"; + stream << "\n"; + stream << indent_str; + stream << " const char *temp = strchr(optstring, c);"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " /* Increment `custom_optind' when we start to process its last character. */"; + stream << "\n"; + stream << indent_str; + stream << " if (*d->nextchar == '\\0')"; + stream << "\n"; + stream << indent_str; + stream << " ++d->custom_optind;"; + stream << "\n"; + stream << indent_str; + stream << " if (!temp || c == ':') {"; + stream << "\n"; + stream << indent_str; + stream << " if (print_errors)"; + stream << "\n"; + stream << indent_str; + stream << " fprintf(stderr, \"%s: invalid option -- %c\\n\", argv[0], c);"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optopt = c;"; + stream << "\n"; + stream << indent_str; + stream << " return '?';"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " if (temp[1] == ':') {"; + stream << "\n"; + stream << indent_str; + stream << " if (temp[2] == ':') {"; + stream << "\n"; + stream << indent_str; + stream << " /* This is an option that accepts an argument optionally. */"; + stream << "\n"; + stream << indent_str; + stream << " if (*d->nextchar != '\\0') {"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optarg = d->nextchar;"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optind++;"; + stream << "\n"; + stream << indent_str; + stream << " } else"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optarg = NULL;"; + stream << "\n"; + stream << indent_str; + stream << " d->nextchar = NULL;"; + stream << "\n"; + stream << indent_str; + stream << " } else {"; + stream << "\n"; + stream << indent_str; + stream << " /* This is an option that requires an argument. */"; + stream << "\n"; + stream << indent_str; + stream << " if (*d->nextchar != '\\0') {"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optarg = d->nextchar;"; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * If we end this ARGV-element by taking the"; + stream << "\n"; + stream << indent_str; + stream << " * rest as an arg, we must advance to the next"; + stream << "\n"; + stream << indent_str; + stream << " * element now."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optind++;"; + stream << "\n"; + stream << indent_str; + stream << " } else if (d->custom_optind == argc) {"; + stream << "\n"; + stream << indent_str; + stream << " if (print_errors) {"; + stream << "\n"; + stream << indent_str; + stream << " fprintf(stderr,"; + stream << "\n"; + stream << indent_str; + stream << " \"%s: option requires an argument -- %c\\n\","; + stream << "\n"; + stream << indent_str; + stream << " argv[0], c);"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optopt = c;"; + stream << "\n"; + stream << indent_str; + stream << " if (optstring[0] == ':')"; + stream << "\n"; + stream << indent_str; + stream << " c = ':';"; + stream << "\n"; + stream << indent_str; + stream << " else"; + stream << "\n"; + stream << indent_str; + stream << " c = '?';"; + stream << "\n"; + stream << indent_str; + stream << " } else"; + stream << "\n"; + stream << indent_str; + stream << " /*"; + stream << "\n"; + stream << indent_str; + stream << " * We already incremented `custom_optind' once;"; + stream << "\n"; + stream << indent_str; + stream << " * increment it again when taking next ARGV-elt"; + stream << "\n"; + stream << indent_str; + stream << " * as argument."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optarg = argv[d->custom_optind++];"; + stream << "\n"; + stream << indent_str; + stream << " d->nextchar = NULL;"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " return c;"; + stream << "\n"; + stream << indent_str; + stream << "}"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "/*"; + stream << "\n"; + stream << indent_str; + stream << " * Scan elements of ARGV for option characters given in OPTSTRING."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * If an element of ARGV starts with '-', and is not exactly \"-\" or \"--\","; + stream << "\n"; + stream << indent_str; + stream << " * then it is an option element. The characters of this element"; + stream << "\n"; + stream << indent_str; + stream << " * (aside from the initial '-') are option characters. If `getopt'"; + stream << "\n"; + stream << indent_str; + stream << " * is called repeatedly, it returns successively each of the option characters"; + stream << "\n"; + stream << indent_str; + stream << " * from each of the option elements."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * If `getopt' finds another option character, it returns that character,"; + stream << "\n"; + stream << indent_str; + stream << " * updating `custom_optind' and `nextchar' so that the next call to `getopt' can"; + stream << "\n"; + stream << indent_str; + stream << " * resume the scan with the following option character or ARGV-element."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * If there are no more option characters, `getopt' returns -1."; + stream << "\n"; + stream << indent_str; + stream << " * Then `custom_optind' is the index in ARGV of the first ARGV-element"; + stream << "\n"; + stream << indent_str; + stream << " * that is not an option. (The ARGV-elements have been permuted"; + stream << "\n"; + stream << indent_str; + stream << " * so that those that are not options now come last.)"; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * OPTSTRING is a string containing the legitimate option characters."; + stream << "\n"; + stream << indent_str; + stream << " * If an option character is seen that is not listed in OPTSTRING,"; + stream << "\n"; + stream << indent_str; + stream << " * return '?' after printing an error message. If you set `custom_opterr' to"; + stream << "\n"; + stream << indent_str; + stream << " * zero, the error message is suppressed but we still return '?'."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * If a char in OPTSTRING is followed by a colon, that means it wants an arg,"; + stream << "\n"; + stream << indent_str; + stream << " * so the following text in the same ARGV-element, or the text of the following"; + stream << "\n"; + stream << indent_str; + stream << " * ARGV-element, is returned in `custom_optarg'. Two colons mean an option that"; + stream << "\n"; + stream << indent_str; + stream << " * wants an optional arg; if there is text in the current ARGV-element,"; + stream << "\n"; + stream << indent_str; + stream << " * it is returned in `custom_optarg', otherwise `custom_optarg' is set to zero."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * If OPTSTRING starts with `-' or `+', it requests different methods of"; + stream << "\n"; + stream << indent_str; + stream << " * handling the non-option ARGV-elements."; + stream << "\n"; + stream << indent_str; + stream << " * See the comments about RETURN_IN_ORDER and REQUIRE_ORDER, above."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * Long-named options begin with `--' instead of `-'."; + stream << "\n"; + stream << indent_str; + stream << " * Their names may be abbreviated as long as the abbreviation is unique"; + stream << "\n"; + stream << indent_str; + stream << " * or is an exact match for some defined option. If they have an"; + stream << "\n"; + stream << indent_str; + stream << " * argument, it follows the option name in the same ARGV-element, separated"; + stream << "\n"; + stream << indent_str; + stream << " * from the option name by a `=', or else the in next ARGV-element."; + stream << "\n"; + stream << indent_str; + stream << " * When `getopt' finds a long-named option, it returns 0 if that option's"; + stream << "\n"; + stream << indent_str; + stream << " * `flag' field is nonzero, the value of the option's `val' field"; + stream << "\n"; + stream << indent_str; + stream << " * if the `flag' field is zero."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * The elements of ARGV aren't really const, because we permute them."; + stream << "\n"; + stream << indent_str; + stream << " * But we pretend they're const in the prototype to be compatible"; + stream << "\n"; + stream << indent_str; + stream << " * with other systems."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * LONGOPTS is a vector of `struct option' terminated by an"; + stream << "\n"; + stream << indent_str; + stream << " * element containing a name which is zero."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * LONGIND returns the index in LONGOPT of the long-named option found."; + stream << "\n"; + stream << indent_str; + stream << " * It is only valid when a long-named option has been found by the most"; + stream << "\n"; + stream << indent_str; + stream << " * recent call."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * Return the option character from OPTS just read. Return -1 when there are"; + stream << "\n"; + stream << indent_str; + stream << " * no more options. For unrecognized options, or options missing arguments,"; + stream << "\n"; + stream << indent_str; + stream << " * `custom_optopt' is set to the option letter, and '?' is returned."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * The OPTS string is a list of characters which are recognized option letters,"; + stream << "\n"; + stream << indent_str; + stream << " * optionally followed by colons, specifying that that letter takes an"; + stream << "\n"; + stream << indent_str; + stream << " * argument, to be placed in `custom_optarg'."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * If a letter in OPTS is followed by two colons, its argument is optional."; + stream << "\n"; + stream << indent_str; + stream << " * This behavior is specific to the GNU `getopt'."; + stream << "\n"; + stream << indent_str; + stream << " *"; + stream << "\n"; + stream << indent_str; + stream << " * The argument `--' causes premature termination of argument scanning,"; + stream << "\n"; + stream << indent_str; + stream << " * explicitly telling `getopt' that there are no more options. If OPTS begins"; + stream << "\n"; + stream << indent_str; + stream << " * with `--', then non-option arguments are treated as arguments to the option"; + stream << "\n"; + stream << indent_str; + stream << " * '\\0'. This behavior is specific to the GNU `getopt'."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "static int getopt_internal_r(int argc, char *const *argv, const char *optstring,"; + stream << "\n"; + stream << indent_str; + stream << " const struct option *longopts, int *longind,"; + stream << "\n"; + stream << indent_str; + stream << " struct custom_getopt_data *d)"; + stream << "\n"; + stream << indent_str; + stream << "{"; + stream << "\n"; + stream << indent_str; + stream << " int ret, print_errors = d->custom_opterr;"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " if (optstring[0] == ':')"; + stream << "\n"; + stream << indent_str; + stream << " print_errors = 0;"; + stream << "\n"; + stream << indent_str; + stream << " if (argc < 1)"; + stream << "\n"; + stream << indent_str; + stream << " return -1;"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optarg = NULL;"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " /* "; + stream << "\n"; + stream << indent_str; + stream << " * This is a big difference with GNU getopt, since optind == 0"; + stream << "\n"; + stream << indent_str; + stream << " * means initialization while here 1 means first call."; + stream << "\n"; + stream << indent_str; + stream << " */"; + stream << "\n"; + stream << indent_str; + stream << " if (d->custom_optind == 0 || !d->initialized) {"; + stream << "\n"; + stream << indent_str; + stream << " if (d->custom_optind == 0)"; + stream << "\n"; + stream << indent_str; + stream << " d->custom_optind = 1; /* Don't scan ARGV[0], the program name. */"; + stream << "\n"; + stream << indent_str; + stream << " custom_getopt_initialize(d);"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " if (d->nextchar == NULL || *d->nextchar == '\\0') {"; + stream << "\n"; + stream << indent_str; + stream << " ret = shuffle_argv(argc, argv, longopts, d);"; + stream << "\n"; + stream << indent_str; + stream << " if (ret)"; + stream << "\n"; + stream << indent_str; + stream << " return ret;"; + stream << "\n"; + stream << indent_str; + stream << " }"; + stream << "\n"; + stream << indent_str; + stream << " if (longopts && (argv[d->custom_optind][1] == '-' ))"; + stream << "\n"; + stream << indent_str; + stream << " return check_long_opt(argc, argv, optstring, longopts,"; + stream << "\n"; + stream << indent_str; + stream << " longind, print_errors, d);"; + stream << "\n"; + stream << indent_str; + stream << " return check_short_opt(argc, argv, optstring, print_errors, d);"; + stream << "\n"; + stream << indent_str; + stream << "}"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "static int custom_getopt_internal(int argc, char *const *argv, const char *optstring,"; + stream << "\n"; + stream << indent_str; + stream << " const struct option *longopts, int *longind)"; + stream << "\n"; + stream << indent_str; + stream << "{"; + stream << "\n"; + stream << indent_str; + stream << " int result;"; + stream << "\n"; + stream << indent_str; + stream << " /* Keep a global copy of all internal members of d */"; + stream << "\n"; + stream << indent_str; + stream << " static struct custom_getopt_data d;"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << " d.custom_optind = custom_optind;"; + stream << "\n"; + stream << indent_str; + stream << " d.custom_opterr = custom_opterr;"; + stream << "\n"; + stream << indent_str; + stream << " result = getopt_internal_r(argc, argv, optstring, longopts,"; + stream << "\n"; + stream << indent_str; + stream << " longind, &d);"; + stream << "\n"; + stream << indent_str; + stream << " custom_optind = d.custom_optind;"; + stream << "\n"; + stream << indent_str; + stream << " custom_optarg = d.custom_optarg;"; + stream << "\n"; + stream << indent_str; + stream << " custom_optopt = d.custom_optopt;"; + stream << "\n"; + stream << indent_str; + stream << " return result;"; + stream << "\n"; + stream << indent_str; + stream << "}"; + stream << "\n"; + stream << indent_str; + stream << "\n"; + stream << indent_str; + stream << "static int custom_getopt_long (int argc, char *const *argv, const char *options,"; + stream << "\n"; + stream << indent_str; + stream << " const struct option *long_options, int *opt_index)"; + stream << "\n"; + stream << indent_str; + stream << "{"; + stream << "\n"; + stream << indent_str; + stream << " return custom_getopt_internal(argc, argv, options, long_options,"; + stream << "\n"; + stream << indent_str; + stream << " opt_index);"; + stream << "\n"; + stream << indent_str; + stream << "}"; + stream << "\n"; + stream << indent_str; +}