/*
  File autogenerated by gengetopt 
  generated with the following command:
  ../src/gengetopt --gen-version --input=test_values_cmd.ggo --func-name=test_values_cmd_parser --file-name=test_values_cmd --unamed-opt --show-required 

  The developers of gengetopt consider the fixed text that goes in all
  gengetopt output files to be in the public domain:
  we make no copyright claims on it.
*/

/* If we use autoconf.  */
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "getopt.h"

#include "test_values_cmd.h"

const char *gengetopt_args_info_purpose = "This is just a test file\nto test options\nwith the list of acceptable values";

const char *gengetopt_args_info_usage = "Usage: test_values [OPTIONS]... [FILES]...";

const char *gengetopt_args_info_description = "";

const char *gengetopt_args_info_help[] = {
  "  -h, --help                    Print help and exit",
  "  -V, --version                 Print version and exit",
  "  -s, --string-values=STRING    string option with values  (possible \n                                  values=\"foo\", \"foa\", \"bar\", \"foobar\", \n                                  \"barfoo\")",
  "      --string-values-def=STRING\n                                string option with values and default  \n                                  (possible values=\"foo\", \"bar\", \n                                  \"foobar\", \"barfoo\" default=`bar')",
  "      --string-values-def-argopt[=STRING]\n                                string option with values and default and \n                                  optional argument  (possible values=\"foo\", \n                                  \"bar\", \"foobar\", \"barfoo\" \n                                  default=`foobar')",
  "      --string-values-no-short=STRING\n                                string option with values no short  (possible \n                                  values=\"foo\", \"bar\", \"foobar\", \n                                  \"barfoo\")",
  "  -S, --multistring-values=STRING\n                                multiple string option with values  (possible \n                                  values=\"foo\", \"bar\")",
  "      --multistring-values-def[=STRING]\n                                multiple string option with values and default  \n                                  (possible values=\"foo\", \"bar\" \n                                  default=`foo')",
  "      --multistring-values-no-short=BAR\n                                multiple string option with values no-short  \n                                  (possible values=\"foo\", \"bar\")",
  "\n Group: group1",
  "      --string-values-group=FOO group string option with values and default  \n                                  (possible values=\"foo\", \"bar\", \n                                  \"foobar\", \"barfoo\" default=`bar')",
    0
};

static
void clear_given (struct gengetopt_args_info *args_info);
static
void clear_args (struct gengetopt_args_info *args_info);

static int
test_values_cmd_parser_internal (int argc, char * const *argv, struct gengetopt_args_info *args_info, int override, int initialize, int check_required, const char *additional_error);

static int
test_values_cmd_parser_required2 (struct gengetopt_args_info *args_info, const char *prog_name, const char *additional_error);

struct string_list
{
  char * arg;
  char *orig;
  struct string_list * next;
};

char *test_values_cmd_parser_string_values_values[] = {"foo", "foa", "bar", "foobar", "barfoo", 0} ;	/* Possible values for string-values.  */
char *test_values_cmd_parser_string_values_def_values[] = {"foo", "bar", "foobar", "barfoo", 0} ;	/* Possible values for string-values-def.  */
char *test_values_cmd_parser_string_values_def_argopt_values[] = {"foo", "bar", "foobar", "barfoo", 0} ;	/* Possible values for string-values-def-argopt.  */
char *test_values_cmd_parser_string_values_no_short_values[] = {"foo", "bar", "foobar", "barfoo", 0} ;	/* Possible values for string-values-no-short.  */
char *test_values_cmd_parser_multistring_values_values[] = {"foo", "bar", 0} ;	/* Possible values for multistring-values.  */
char *test_values_cmd_parser_multistring_values_def_values[] = {"foo", "bar", 0} ;	/* Possible values for multistring-values-def.  */
char *test_values_cmd_parser_multistring_values_no_short_values[] = {"foo", "bar", 0} ;	/* Possible values for multistring-values-no-short.  */
char *test_values_cmd_parser_string_values_group_values[] = {"foo", "bar", "foobar", "barfoo", 0} ;	/* Possible values for string-values-group.  */

static char *
gengetopt_strdup (const char *s);

static
void clear_given (struct gengetopt_args_info *args_info)
{
  args_info->help_given = 0 ;
  args_info->version_given = 0 ;
  args_info->string_values_given = 0 ;
  args_info->string_values_def_given = 0 ;
  args_info->string_values_def_argopt_given = 0 ;
  args_info->string_values_no_short_given = 0 ;
  args_info->multistring_values_given = 0 ;
  args_info->multistring_values_def_given = 0 ;
  args_info->multistring_values_no_short_given = 0 ;
  args_info->string_values_group_given = 0 ;
  args_info->group1_group_counter = 0 ;
}

static
void clear_args (struct gengetopt_args_info *args_info)
{
  args_info->string_values_arg = NULL;
  args_info->string_values_orig = NULL;
  args_info->string_values_def_arg = gengetopt_strdup ("bar");
  args_info->string_values_def_orig = NULL;
  args_info->string_values_def_argopt_arg = gengetopt_strdup ("foobar");
  args_info->string_values_def_argopt_orig = NULL;
  args_info->string_values_no_short_arg = NULL;
  args_info->string_values_no_short_orig = NULL;
  args_info->multistring_values_arg = NULL;
  args_info->multistring_values_orig = NULL;
  args_info->multistring_values_def_arg = NULL;
  args_info->multistring_values_def_orig = NULL;
  args_info->multistring_values_no_short_arg = NULL;
  args_info->multistring_values_no_short_orig = NULL;
  args_info->string_values_group_arg = gengetopt_strdup ("bar");
  args_info->string_values_group_orig = NULL;
  
}

static
void init_args_info(struct gengetopt_args_info *args_info)
{
  args_info->help_help = gengetopt_args_info_help[0] ;
  args_info->version_help = gengetopt_args_info_help[1] ;
  args_info->string_values_help = gengetopt_args_info_help[2] ;
  args_info->string_values_def_help = gengetopt_args_info_help[3] ;
  args_info->string_values_def_argopt_help = gengetopt_args_info_help[4] ;
  args_info->string_values_no_short_help = gengetopt_args_info_help[5] ;
  args_info->multistring_values_help = gengetopt_args_info_help[6] ;
  args_info->multistring_values_min = -1;
  args_info->multistring_values_max = -1;
  args_info->multistring_values_def_help = gengetopt_args_info_help[7] ;
  args_info->multistring_values_def_min = -1;
  args_info->multistring_values_def_max = -1;
  args_info->multistring_values_no_short_help = gengetopt_args_info_help[8] ;
  args_info->multistring_values_no_short_min = -1;
  args_info->multistring_values_no_short_max = -1;
  args_info->string_values_group_help = gengetopt_args_info_help[9] ;
  
}

void
test_values_cmd_parser_print_version (void)
{
  printf ("%s %s\n", TEST_VALUES_CMD_PARSER_PACKAGE, TEST_VALUES_CMD_PARSER_VERSION);
}

void
test_values_cmd_parser_print_help (void)
{
  int i = 0;
  test_values_cmd_parser_print_version ();

  if (strlen(gengetopt_args_info_purpose) > 0)
    printf("\n%s\n", gengetopt_args_info_purpose);

  printf("\n%s\n\n", gengetopt_args_info_usage);

  if (strlen(gengetopt_args_info_description) > 0)
    printf("%s\n", gengetopt_args_info_description);

  while (gengetopt_args_info_help[i])
    printf("%s\n", gengetopt_args_info_help[i++]);
}

void
test_values_cmd_parser_init (struct gengetopt_args_info *args_info)
{
  clear_given (args_info);
  clear_args (args_info);
  init_args_info (args_info);

  args_info->inputs = NULL;
  args_info->inputs_num = 0;
}

static void
test_values_cmd_parser_release (struct gengetopt_args_info *args_info)
{
  
  unsigned int i;
  if (args_info->string_values_arg)
    {
      free (args_info->string_values_arg); /* free previous argument */
      args_info->string_values_arg = 0;
    }
  if (args_info->string_values_orig)
    {
      free (args_info->string_values_orig); /* free previous argument */
      args_info->string_values_orig = 0;
    }
  if (args_info->string_values_def_arg)
    {
      free (args_info->string_values_def_arg); /* free previous argument */
      args_info->string_values_def_arg = 0;
    }
  if (args_info->string_values_def_orig)
    {
      free (args_info->string_values_def_orig); /* free previous argument */
      args_info->string_values_def_orig = 0;
    }
  if (args_info->string_values_def_argopt_arg)
    {
      free (args_info->string_values_def_argopt_arg); /* free previous argument */
      args_info->string_values_def_argopt_arg = 0;
    }
  if (args_info->string_values_def_argopt_orig)
    {
      free (args_info->string_values_def_argopt_orig); /* free previous argument */
      args_info->string_values_def_argopt_orig = 0;
    }
  if (args_info->string_values_no_short_arg)
    {
      free (args_info->string_values_no_short_arg); /* free previous argument */
      args_info->string_values_no_short_arg = 0;
    }
  if (args_info->string_values_no_short_orig)
    {
      free (args_info->string_values_no_short_orig); /* free previous argument */
      args_info->string_values_no_short_orig = 0;
    }
  if (args_info->multistring_values_arg)
    {
      for (i = 0; i < args_info->multistring_values_given; ++i)
        {
          if (args_info->multistring_values_arg [i])
            {
              free (args_info->multistring_values_arg [i]); /* free previous argument */
              args_info->multistring_values_arg [i] = 0;
            }
          if (args_info->multistring_values_orig [i])
            {
              free (args_info->multistring_values_orig [i]); /* free previous argument */
              args_info->multistring_values_orig [i] = 0;
            }
        }
      if (args_info->multistring_values_arg [0])
        free (args_info->multistring_values_arg [0]); /* free default string */
      free (args_info->multistring_values_arg); /* free previous argument */
      args_info->multistring_values_arg = 0;
      free (args_info->multistring_values_orig); /* free previous argument */
      args_info->multistring_values_orig = 0;
    }
  if (args_info->multistring_values_def_arg)
    {
      for (i = 0; i < args_info->multistring_values_def_given; ++i)
        {
          if (args_info->multistring_values_def_arg [i])
            {
              free (args_info->multistring_values_def_arg [i]); /* free previous argument */
              args_info->multistring_values_def_arg [i] = 0;
            }
          if (args_info->multistring_values_def_orig [i])
            {
              free (args_info->multistring_values_def_orig [i]); /* free previous argument */
              args_info->multistring_values_def_orig [i] = 0;
            }
        }
      if (args_info->multistring_values_def_arg [0])
        free (args_info->multistring_values_def_arg [0]); /* free default string */
      free (args_info->multistring_values_def_arg); /* free previous argument */
      args_info->multistring_values_def_arg = 0;
      free (args_info->multistring_values_def_orig); /* free previous argument */
      args_info->multistring_values_def_orig = 0;
    }
  if (args_info->multistring_values_no_short_arg)
    {
      for (i = 0; i < args_info->multistring_values_no_short_given; ++i)
        {
          if (args_info->multistring_values_no_short_arg [i])
            {
              free (args_info->multistring_values_no_short_arg [i]); /* free previous argument */
              args_info->multistring_values_no_short_arg [i] = 0;
            }
          if (args_info->multistring_values_no_short_orig [i])
            {
              free (args_info->multistring_values_no_short_orig [i]); /* free previous argument */
              args_info->multistring_values_no_short_orig [i] = 0;
            }
        }
      if (args_info->multistring_values_no_short_arg [0])
        free (args_info->multistring_values_no_short_arg [0]); /* free default string */
      free (args_info->multistring_values_no_short_arg); /* free previous argument */
      args_info->multistring_values_no_short_arg = 0;
      free (args_info->multistring_values_no_short_orig); /* free previous argument */
      args_info->multistring_values_no_short_orig = 0;
    }
  if (args_info->string_values_group_arg)
    {
      free (args_info->string_values_group_arg); /* free previous argument */
      args_info->string_values_group_arg = 0;
    }
  if (args_info->string_values_group_orig)
    {
      free (args_info->string_values_group_orig); /* free previous argument */
      args_info->string_values_group_orig = 0;
    }
  
  for (i = 0; i < args_info->inputs_num; ++i)
    free (args_info->inputs [i]);
  
  if (args_info->inputs_num)
    free (args_info->inputs);
  
  clear_given (args_info);
}

int
test_values_cmd_parser_file_save(const char *filename, struct gengetopt_args_info *args_info)
{
  FILE *outfile;
  int i = 0;

  outfile = fopen(filename, "w");

  if (!outfile)
    {
      fprintf (stderr, "%s: cannot open file for writing: %s\n", TEST_VALUES_CMD_PARSER_PACKAGE, filename);
      return EXIT_FAILURE;
    }

  if (args_info->help_given) {
    fprintf(outfile, "%s\n", "help");
  }
  if (args_info->version_given) {
    fprintf(outfile, "%s\n", "version");
  }
  if (args_info->string_values_given) {
    if (args_info->string_values_orig) {
      fprintf(outfile, "%s=\"%s\"\n", "string-values", args_info->string_values_orig);
    } else {
      fprintf(outfile, "%s\n", "string-values");
    }
  }
  if (args_info->string_values_def_given) {
    if (args_info->string_values_def_orig) {
      fprintf(outfile, "%s=\"%s\"\n", "string-values-def", args_info->string_values_def_orig);
    } else {
      fprintf(outfile, "%s\n", "string-values-def");
    }
  }
  if (args_info->string_values_def_argopt_given) {
    if (args_info->string_values_def_argopt_orig) {
      fprintf(outfile, "%s=\"%s\"\n", "string-values-def-argopt", args_info->string_values_def_argopt_orig);
    } else {
      fprintf(outfile, "%s\n", "string-values-def-argopt");
    }
  }
  if (args_info->string_values_no_short_given) {
    if (args_info->string_values_no_short_orig) {
      fprintf(outfile, "%s=\"%s\"\n", "string-values-no-short", args_info->string_values_no_short_orig);
    } else {
      fprintf(outfile, "%s\n", "string-values-no-short");
    }
  }
  if (args_info->multistring_values_orig)
    {
      for (i = 0; i < args_info->multistring_values_given; ++i)
        {
          if (args_info->multistring_values_orig [i])
            {
              fprintf(outfile, "%s=\"%s\"\n", "multistring-values", args_info->multistring_values_orig [i]);
            }
        }
    }
  if (args_info->multistring_values_def_orig)
    {
      for (i = 0; i < args_info->multistring_values_def_given; ++i)
        {
          if (args_info->multistring_values_def_orig [i])
            {
              fprintf(outfile, "%s=\"%s\"\n", "multistring-values-def", args_info->multistring_values_def_orig [i]);
            }
        }
    }
  if (args_info->multistring_values_no_short_orig)
    {
      for (i = 0; i < args_info->multistring_values_no_short_given; ++i)
        {
          if (args_info->multistring_values_no_short_orig [i])
            {
              fprintf(outfile, "%s=\"%s\"\n", "multistring-values-no-short", args_info->multistring_values_no_short_orig [i]);
            }
        }
    }
  if (args_info->string_values_group_given) {
    if (args_info->string_values_group_orig) {
      fprintf(outfile, "%s=\"%s\"\n", "string-values-group", args_info->string_values_group_orig);
    } else {
      fprintf(outfile, "%s\n", "string-values-group");
    }
  }
  
  fclose (outfile);

  i = EXIT_SUCCESS;
  return i;
}

void
test_values_cmd_parser_free (struct gengetopt_args_info *args_info)
{
  test_values_cmd_parser_release (args_info);
}

/*
 * Returns:
 * - the index of the matched value
 * - -1 if no argument has been specified
 * - -2 if more than one value has matched
 */
static int
check_possible_values(const char *val, char *values[])
{
  int i, found, last;
  size_t len;

  if (!val)   /* otherwise strlen() crashes below */
    return -1; /* -1 means no argument for the option */

  found = last = 0;

  for (i = 0, len = strlen(val); values[i]; ++i)
    {
      if (strncmp(val, values[i], len) == 0)
        {
          ++found;
          last = i;
          if (strlen(values[i]) == len)
            return i; /* exact macth no need to check more */
        }
    }

  if (found == 1) /* one match: OK */
    return last;

  return (found ? -2 : -1); /* return many values are matched */
}


/* gengetopt_strdup() */
/* strdup.c replacement of strdup, which is not standard */
char *
gengetopt_strdup (const char *s)
{
  char *result = NULL;
  if (!s)
    return result;

  result = (char*)malloc(strlen(s) + 1);
  if (result == (char*)0)
    return (char*)0;
  strcpy(result, s);
  return result;
}

static char *
get_multiple_arg_token(const char *arg)
{
  char *tok, *ret;
  size_t len, num_of_escape;
  int i, j;

  if (!arg)
    return NULL;

  tok = strchr (arg, ',');
  num_of_escape = 0;

  /* make sure it is not escaped */
  while (tok)
    {
      if (*(tok-1) == '\\')
        {
          /* find the next one */
          tok = strchr (tok+1, ',');
          ++num_of_escape;
        }
      else
        break;
    }

  if (tok)
    len = (size_t)(tok - arg + 1);
  else
    len = strlen (arg) + 1;

  len -= num_of_escape;

  ret = (char *) malloc (len);

  i = 0;
  j = 0;
  while (arg[i] && (j < len-1))
    {
      if (arg[i] == '\\')
        ++i;

      ret[j++] = arg[i++];
    }

  ret[len-1] = '\0';

  return ret;
}

static char *
get_multiple_arg_token_next(const char *arg)
{
  char *tok;

  if (!arg)
    return NULL;

  tok = strchr (arg, ',');

  /* make sure it is not escaped */
  while (tok)
    {
      if (*(tok-1) == '\\')
        {
          /* find the next one */
          tok = strchr (tok+1, ',');
        }
      else
        break;
    }

  if (! tok || strlen(tok) == 1)
    return 0;

  return tok+1;
}

static int
check_multiple_option_occurrences(const char *prog_name, unsigned int option_given, int min, int max, const char *option_desc);

int
check_multiple_option_occurrences(const char *prog_name, unsigned int option_given, int min, int max, const char *option_desc)
{
  int error = 0;

  if (option_given && ! (min < 0 && max < 0))
    {
      if (min >= 0 && max >= 0)
        {
          if (min == max)
            {
              /* specific occurrences */
              if (option_given != min)
                {
                  fprintf (stderr, "%s: %s option occurrences must be %d\n",
                    prog_name, option_desc, min);
                  error = 1;
                }
            }
          else if (option_given < min
              || option_given > max)
            {
              /* range occurrences */
              fprintf (stderr, "%s: %s option occurrences must be between %d and %d\n",
                prog_name, option_desc, min, max);
              error = 1;
            }
        }
      else if (min >= 0)
        {
          /* at least check */
          if (option_given < min)
            {
              fprintf (stderr, "%s: %s option occurrences must be at least %d\n",
                prog_name, option_desc, min);
              error = 1;
            }
        }
      else if (max >= 0)
        {
          /* at most check */
          if (option_given > max)
            {
              fprintf (stderr, "%s: %s option occurrences must be at most %d\n",
                prog_name, option_desc, max);
              error = 1;
            }
        }
    }
    
  return error;
}
static void
reset_group_group1(struct gengetopt_args_info *args_info);

static void
reset_group_group1(struct gengetopt_args_info *args_info)
{
  if (! args_info->group1_group_counter)
    return;
  
  args_info->string_values_group_given = 0 ;
  if (args_info->string_values_group_arg)
    {
      free (args_info->string_values_group_arg); /* free previous argument */
      args_info->string_values_group_arg = 0;
    }
  if (args_info->string_values_group_orig)
    {
      free (args_info->string_values_group_orig); /* free previous argument */
      args_info->string_values_group_orig = 0;
    }

  args_info->group1_group_counter = 0;
}

int
test_values_cmd_parser (int argc, char * const *argv, struct gengetopt_args_info *args_info)
{
  return test_values_cmd_parser2 (argc, argv, args_info, 0, 1, 1);
}

int
test_values_cmd_parser2 (int argc, char * const *argv, struct gengetopt_args_info *args_info, int override, int initialize, int check_required)
{
  int result;

  result = test_values_cmd_parser_internal (argc, argv, args_info, override, initialize, check_required, NULL);

  if (result == EXIT_FAILURE)
    {
      test_values_cmd_parser_free (args_info);
      exit (EXIT_FAILURE);
    }
  
  return result;
}

int
test_values_cmd_parser_required (struct gengetopt_args_info *args_info, const char *prog_name)
{
  int result = EXIT_SUCCESS;

  if (test_values_cmd_parser_required2(args_info, prog_name, NULL) > 0)
    result = EXIT_FAILURE;

  if (result == EXIT_FAILURE)
    {
      test_values_cmd_parser_free (args_info);
      exit (EXIT_FAILURE);
    }
  
  return result;
}

int
test_values_cmd_parser_required2 (struct gengetopt_args_info *args_info, const char *prog_name, const char *additional_error)
{
  int error = 0;

  /* checks for required options */
  if (check_multiple_option_occurrences(prog_name, args_info->multistring_values_given, args_info->multistring_values_min, args_info->multistring_values_max, "'--multistring-values' ('-S')"))
     error = 1;
  
  if (check_multiple_option_occurrences(prog_name, args_info->multistring_values_def_given, args_info->multistring_values_def_min, args_info->multistring_values_def_max, "'--multistring-values-def'"))
     error = 1;
  
  if (check_multiple_option_occurrences(prog_name, args_info->multistring_values_no_short_given, args_info->multistring_values_no_short_min, args_info->multistring_values_no_short_max, "'--multistring-values-no-short'"))
     error = 1;
  
  
  /* checks for dependences among options */

  return error;
}

int
test_values_cmd_parser_internal (int argc, char * const *argv, struct gengetopt_args_info *args_info, int override, int initialize, int check_required, const char *additional_error)
{
  int c;	/* Character of the parsed option.  */
  char *multi_token, *multi_next; /* for multiple options */

  int i;        /* Counter */

  struct string_list * multistring_values_list = NULL,* multistring_values_new = NULL;
  struct string_list * multistring_values_def_list = NULL,* multistring_values_def_new = NULL;
  struct string_list * multistring_values_no_short_list = NULL,* multistring_values_no_short_new = NULL;
  int error = 0;
  struct gengetopt_args_info local_args_info;

  if (initialize)
    test_values_cmd_parser_init (args_info);

  test_values_cmd_parser_init (&local_args_info);

  optarg = 0;
  optind = 0;
  opterr = 1;
  optopt = '?';

  while (1)
    {
      int found = 0;
      int option_index = 0;
      char *stop_char;

      static struct option long_options[] = {
        { "help",	0, NULL, 'h' },
        { "version",	0, NULL, 'V' },
        { "string-values",	1, NULL, 's' },
        { "string-values-def",	1, NULL, 0 },
        { "string-values-def-argopt",	2, NULL, 0 },
        { "string-values-no-short",	1, NULL, 0 },
        { "multistring-values",	1, NULL, 'S' },
        { "multistring-values-def",	2, NULL, 0 },
        { "multistring-values-no-short",	1, NULL, 0 },
        { "string-values-group",	1, NULL, 0 },
        { NULL,	0, NULL, 0 }
      };

      stop_char = 0;
      c = getopt_long (argc, argv, "hVs:S:", long_options, &option_index);

      if (c == -1) break;	/* Exit from `while (1)' loop.  */

      switch (c)
        {
        case 'h':	/* Print help and exit.  */
          test_values_cmd_parser_print_help ();
          test_values_cmd_parser_free (&local_args_info);
          exit (EXIT_SUCCESS);

        case 'V':	/* Print version and exit.  */
          test_values_cmd_parser_print_version ();
          test_values_cmd_parser_free (&local_args_info);
          exit (EXIT_SUCCESS);

        case 's':	/* string option with values.  */
          if (local_args_info.string_values_given)
            {
              fprintf (stderr, "%s: `--string-values' (`-s') option given more than once%s\n", argv[0], (additional_error ? additional_error : ""));
              goto failure;
            }
          if ((found = check_possible_values((optarg ? optarg : 0 ), test_values_cmd_parser_string_values_values)) < 0)
            {
              fprintf (stderr, "%s: %s argument, \"%s\", for option `--string-values' (`-s')%s\n", argv[0], (found == -2) ? "ambiguous" : "invalid", optarg, (additional_error ? additional_error : ""));
              goto failure;
            }
          if (args_info->string_values_given && ! override)
            continue;
          local_args_info.string_values_given = 1;
          args_info->string_values_given = 1;
          if (args_info->string_values_arg)
            free (args_info->string_values_arg); /* free previous string */
          args_info->string_values_arg = gengetopt_strdup (test_values_cmd_parser_string_values_values[found]);
          if (args_info->string_values_orig)
            free (args_info->string_values_orig); /* free previous string */
          args_info->string_values_orig = gengetopt_strdup (optarg);
          break;

        case 'S':	/* multiple string option with values.  */
          local_args_info.multistring_values_given++;
        
          multi_token = get_multiple_arg_token(optarg);
          multi_next = get_multiple_arg_token_next (optarg);
        
          while (1)
            {
              if ((found = check_possible_values((multi_token ? multi_token : 0 ), test_values_cmd_parser_multistring_values_values)) < 0)
                {
                  fprintf (stderr, "%s: %s argument, \"%s\", for option `--multistring-values' (`-S')%s\n", argv[0], (found == -2) ? "ambiguous" : "invalid", multi_token, (additional_error ? additional_error : ""));
                  free (multi_token);
                  goto failure;
                }
        
              multistring_values_new = (struct string_list *) malloc (sizeof (struct string_list));
              multistring_values_new->next = multistring_values_list;
              multistring_values_list = multistring_values_new;
              multistring_values_new->arg = gengetopt_strdup (test_values_cmd_parser_multistring_values_values[found]);
              multistring_values_new->orig = multi_token;
        
              if (multi_next)
                {
                  multi_token = get_multiple_arg_token(multi_next);
                  multi_next = get_multiple_arg_token_next (multi_next);
                  local_args_info.multistring_values_given++;
                }
              else
                break;
            }
          break;


        case 0:	/* Long option with no short option */
          /* string option with values and default.  */
          if (strcmp (long_options[option_index].name, "string-values-def") == 0)
          {
            if (local_args_info.string_values_def_given)
              {
                fprintf (stderr, "%s: `--string-values-def' option given more than once%s\n", argv[0], (additional_error ? additional_error : ""));
                goto failure;
              }
            if ((found = check_possible_values((optarg ? optarg : 0 ), test_values_cmd_parser_string_values_def_values)) < 0)
              {
                fprintf (stderr, "%s: %s argument, \"%s\", for option `--string-values-def'%s\n", argv[0], (found == -2) ? "ambiguous" : "invalid", optarg, (additional_error ? additional_error : ""));
                goto failure;
              }
            if (args_info->string_values_def_given && ! override)
              continue;
            local_args_info.string_values_def_given = 1;
            args_info->string_values_def_given = 1;
            if (args_info->string_values_def_arg)
              free (args_info->string_values_def_arg); /* free previous string */
            args_info->string_values_def_arg = gengetopt_strdup (test_values_cmd_parser_string_values_def_values[found]);
            if (args_info->string_values_def_orig)
              free (args_info->string_values_def_orig); /* free previous string */
            args_info->string_values_def_orig = gengetopt_strdup (optarg);
          }
          /* string option with values and default and optional argument.  */
          else if (strcmp (long_options[option_index].name, "string-values-def-argopt") == 0)
          {
            if (local_args_info.string_values_def_argopt_given)
              {
                fprintf (stderr, "%s: `--string-values-def-argopt' option given more than once%s\n", argv[0], (additional_error ? additional_error : ""));
                goto failure;
              }
            if ((found = check_possible_values((optarg ? optarg : "foobar" ), test_values_cmd_parser_string_values_def_argopt_values)) < 0)
              {
                fprintf (stderr, "%s: %s argument, \"%s\", for option `--string-values-def-argopt'%s\n", argv[0], (found == -2) ? "ambiguous" : "invalid", optarg, (additional_error ? additional_error : ""));
                goto failure;
              }
            if (args_info->string_values_def_argopt_given && ! override)
              continue;
            local_args_info.string_values_def_argopt_given = 1;
            args_info->string_values_def_argopt_given = 1;
            if (test_values_cmd_parser_string_values_def_argopt_values[found])
              {
                if (args_info->string_values_def_argopt_arg)
                  free (args_info->string_values_def_argopt_arg); /* free previous string */
                args_info->string_values_def_argopt_arg = gengetopt_strdup (test_values_cmd_parser_string_values_def_argopt_values[found]);
                if (args_info->string_values_def_argopt_orig)
                  free (args_info->string_values_def_argopt_orig); /* free previous string */
                args_info->string_values_def_argopt_orig = gengetopt_strdup (optarg);
              }
          }
          /* string option with values no short.  */
          else if (strcmp (long_options[option_index].name, "string-values-no-short") == 0)
          {
            if (local_args_info.string_values_no_short_given)
              {
                fprintf (stderr, "%s: `--string-values-no-short' option given more than once%s\n", argv[0], (additional_error ? additional_error : ""));
                goto failure;
              }
            if ((found = check_possible_values((optarg ? optarg : 0 ), test_values_cmd_parser_string_values_no_short_values)) < 0)
              {
                fprintf (stderr, "%s: %s argument, \"%s\", for option `--string-values-no-short'%s\n", argv[0], (found == -2) ? "ambiguous" : "invalid", optarg, (additional_error ? additional_error : ""));
                goto failure;
              }
            if (args_info->string_values_no_short_given && ! override)
              continue;
            local_args_info.string_values_no_short_given = 1;
            args_info->string_values_no_short_given = 1;
            if (args_info->string_values_no_short_arg)
              free (args_info->string_values_no_short_arg); /* free previous string */
            args_info->string_values_no_short_arg = gengetopt_strdup (test_values_cmd_parser_string_values_no_short_values[found]);
            if (args_info->string_values_no_short_orig)
              free (args_info->string_values_no_short_orig); /* free previous string */
            args_info->string_values_no_short_orig = gengetopt_strdup (optarg);
          }
          /* multiple string option with values and default.  */
          else if (strcmp (long_options[option_index].name, "multistring-values-def") == 0)
          {
            local_args_info.multistring_values_def_given++;
          
            multi_token = get_multiple_arg_token(optarg);
            multi_next = get_multiple_arg_token_next (optarg);
          
            while (1)
              {
                if ((found = check_possible_values((multi_token ? multi_token : "foo" ), test_values_cmd_parser_multistring_values_def_values)) < 0)
                  {
                    fprintf (stderr, "%s: %s argument, \"%s\", for option `--multistring-values-def'%s\n", argv[0], (found == -2) ? "ambiguous" : "invalid", multi_token, (additional_error ? additional_error : ""));
                    free (multi_token);
                    goto failure;
                  }
          
                multistring_values_def_new = (struct string_list *) malloc (sizeof (struct string_list));
                multistring_values_def_new->next = multistring_values_def_list;
                multistring_values_def_list = multistring_values_def_new;
                multistring_values_def_new->arg = gengetopt_strdup (NULL);
                multistring_values_def_new->orig = NULL;
                if (test_values_cmd_parser_multistring_values_def_values[found])
                  {
                    multistring_values_def_new->arg = gengetopt_strdup (test_values_cmd_parser_multistring_values_def_values[found]);
                    multistring_values_def_new->orig = multi_token;
                  }
          
                if (multi_next)
                  {
                    multi_token = get_multiple_arg_token(multi_next);
                    multi_next = get_multiple_arg_token_next (multi_next);
                    local_args_info.multistring_values_def_given++;
                  }
                else
                  break;
              }
            break;
          }
          /* multiple string option with values no-short.  */
          else if (strcmp (long_options[option_index].name, "multistring-values-no-short") == 0)
          {
            local_args_info.multistring_values_no_short_given++;
          
            multi_token = get_multiple_arg_token(optarg);
            multi_next = get_multiple_arg_token_next (optarg);
          
            while (1)
              {
                if ((found = check_possible_values((multi_token ? multi_token : 0 ), test_values_cmd_parser_multistring_values_no_short_values)) < 0)
                  {
                    fprintf (stderr, "%s: %s argument, \"%s\", for option `--multistring-values-no-short'%s\n", argv[0], (found == -2) ? "ambiguous" : "invalid", multi_token, (additional_error ? additional_error : ""));
                    free (multi_token);
                    goto failure;
                  }
          
                multistring_values_no_short_new = (struct string_list *) malloc (sizeof (struct string_list));
                multistring_values_no_short_new->next = multistring_values_no_short_list;
                multistring_values_no_short_list = multistring_values_no_short_new;
                multistring_values_no_short_new->arg = gengetopt_strdup (test_values_cmd_parser_multistring_values_no_short_values[found]);
                multistring_values_no_short_new->orig = multi_token;
          
                if (multi_next)
                  {
                    multi_token = get_multiple_arg_token(multi_next);
                    multi_next = get_multiple_arg_token_next (multi_next);
                    local_args_info.multistring_values_no_short_given++;
                  }
                else
                  break;
              }
            break;
          }
          /* group string option with values and default.  */
          else if (strcmp (long_options[option_index].name, "string-values-group") == 0)
          {
            if (local_args_info.string_values_group_given)
              {
                fprintf (stderr, "%s: `--string-values-group' option given more than once%s\n", argv[0], (additional_error ? additional_error : ""));
                goto failure;
              }
            if ((found = check_possible_values((optarg ? optarg : 0 ), test_values_cmd_parser_string_values_group_values)) < 0)
              {
                fprintf (stderr, "%s: %s argument, \"%s\", for option `--string-values-group'%s\n", argv[0], (found == -2) ? "ambiguous" : "invalid", optarg, (additional_error ? additional_error : ""));
                goto failure;
              }
            if (args_info->string_values_group_given && ! override)
              continue;
            local_args_info.string_values_group_given = 1;
            args_info->string_values_group_given = 1;
            if (args_info->group1_group_counter && override)
              reset_group_group1 (args_info);
            args_info->group1_group_counter += 1;
            if (args_info->string_values_group_arg)
              free (args_info->string_values_group_arg); /* free previous string */
            args_info->string_values_group_arg = gengetopt_strdup (test_values_cmd_parser_string_values_group_values[found]);
            if (args_info->string_values_group_orig)
              free (args_info->string_values_group_orig); /* free previous string */
            args_info->string_values_group_orig = gengetopt_strdup (optarg);
          }
          
          break;
        case '?':	/* Invalid option.  */
          /* `getopt_long' already printed an error message.  */
          goto failure;

        default:	/* bug: option not considered.  */
          fprintf (stderr, "%s: option unknown: %c%s\n", TEST_VALUES_CMD_PARSER_PACKAGE, c, (additional_error ? additional_error : ""));
          abort ();
        } /* switch */
    } /* while */

  if (args_info->group1_group_counter > 1)
    {
      fprintf (stderr, "%s: %d options of group group1 were given. At most one is required.%s\n", argv[0], args_info->group1_group_counter, (additional_error ? additional_error : ""));
      error = 1;
    }
  

  if (local_args_info.multistring_values_given && multistring_values_list)
    {
      struct string_list *tmp;
      args_info->multistring_values_arg = (char * *) realloc (args_info->multistring_values_arg, (args_info->multistring_values_given + local_args_info.multistring_values_given) * sizeof (char *));
      args_info->multistring_values_orig = (char **) realloc (args_info->multistring_values_orig, (args_info->multistring_values_given + local_args_info.multistring_values_given) * sizeof (char *));
      for (i = (local_args_info.multistring_values_given - 1); i >= 0; --i)
        {
          tmp = multistring_values_list;
          args_info->multistring_values_arg [i + args_info->multistring_values_given] = multistring_values_list->arg;
          args_info->multistring_values_orig [i + args_info->multistring_values_given] = multistring_values_list->orig;
          multistring_values_list = multistring_values_list->next;
          free (tmp);
        }
    }
  
  if (local_args_info.multistring_values_def_given && multistring_values_def_list)
    {
      struct string_list *tmp;
      args_info->multistring_values_def_arg = (char * *) realloc (args_info->multistring_values_def_arg, (args_info->multistring_values_def_given + local_args_info.multistring_values_def_given) * sizeof (char *));
      args_info->multistring_values_def_orig = (char **) realloc (args_info->multistring_values_def_orig, (args_info->multistring_values_def_given + local_args_info.multistring_values_def_given) * sizeof (char *));
      for (i = (local_args_info.multistring_values_def_given - 1); i >= 0; --i)
        {
          tmp = multistring_values_def_list;
          args_info->multistring_values_def_arg [i + args_info->multistring_values_def_given] = multistring_values_def_list->arg;
          args_info->multistring_values_def_orig [i + args_info->multistring_values_def_given] = multistring_values_def_list->orig;
          multistring_values_def_list = multistring_values_def_list->next;
          free (tmp);
        }
    }
  else /* set the default value */
    {
      if (! args_info->multistring_values_def_arg && ! args_info->multistring_values_def_given)
        {
          args_info->multistring_values_def_arg = (char * *) malloc (sizeof (char *));
          args_info->multistring_values_def_arg [0] = gengetopt_strdup("foo");
          args_info->multistring_values_def_orig = (char **) malloc (sizeof (char *));
          args_info->multistring_values_def_orig [0] = NULL;
        }
    }
  
  if (local_args_info.multistring_values_no_short_given && multistring_values_no_short_list)
    {
      struct string_list *tmp;
      args_info->multistring_values_no_short_arg = (char * *) realloc (args_info->multistring_values_no_short_arg, (args_info->multistring_values_no_short_given + local_args_info.multistring_values_no_short_given) * sizeof (char *));
      args_info->multistring_values_no_short_orig = (char **) realloc (args_info->multistring_values_no_short_orig, (args_info->multistring_values_no_short_given + local_args_info.multistring_values_no_short_given) * sizeof (char *));
      for (i = (local_args_info.multistring_values_no_short_given - 1); i >= 0; --i)
        {
          tmp = multistring_values_no_short_list;
          args_info->multistring_values_no_short_arg [i + args_info->multistring_values_no_short_given] = multistring_values_no_short_list->arg;
          args_info->multistring_values_no_short_orig [i + args_info->multistring_values_no_short_given] = multistring_values_no_short_list->orig;
          multistring_values_no_short_list = multistring_values_no_short_list->next;
          free (tmp);
        }
    }
  

  args_info->multistring_values_given += local_args_info.multistring_values_given;
  local_args_info.multistring_values_given = 0;
  args_info->multistring_values_def_given += local_args_info.multistring_values_def_given;
  local_args_info.multistring_values_def_given = 0;
  args_info->multistring_values_no_short_given += local_args_info.multistring_values_no_short_given;
  local_args_info.multistring_values_no_short_given = 0;
  
  if (check_required)
    {
      error += test_values_cmd_parser_required2 (args_info, argv[0], additional_error);
    }

  test_values_cmd_parser_release (&local_args_info);

  if ( error )
    return (EXIT_FAILURE);

  if (optind < argc)
    {
      int i = 0 ;
      int found_prog_name = 0;
      /* whether program name, i.e., argv[0], is in the remaining args
         (this may happen with some implementations of getopt,
          but surely not with the one included by gengetopt) */

      i = optind;
      while (i < argc)
        if (argv[i++] == argv[0]) {
          found_prog_name = 1;
          break;
        }
      i = 0;

      args_info->inputs_num = argc - optind - found_prog_name;
      args_info->inputs =
        (char **)(malloc ((args_info->inputs_num)*sizeof(char *))) ;
      while (optind < argc)
        if (argv[optind++] != argv[0])
          args_info->inputs[ i++ ] = gengetopt_strdup (argv[optind-1]) ;
    }

  return 0;

failure:
  if (multistring_values_list)
    {
      struct string_list *tmp;
      while (multistring_values_list)
        {
          tmp = multistring_values_list;
          free (multistring_values_list->arg);
          free (multistring_values_list->orig);
          multistring_values_list = multistring_values_list->next;
          free (tmp);
        }
    }
  if (multistring_values_def_list)
    {
      struct string_list *tmp;
      while (multistring_values_def_list)
        {
          tmp = multistring_values_def_list;
          free (multistring_values_def_list->arg);
          free (multistring_values_def_list->orig);
          multistring_values_def_list = multistring_values_def_list->next;
          free (tmp);
        }
    }
  if (multistring_values_no_short_list)
    {
      struct string_list *tmp;
      while (multistring_values_no_short_list)
        {
          tmp = multistring_values_no_short_list;
          free (multistring_values_no_short_list->arg);
          free (multistring_values_no_short_list->orig);
          multistring_values_no_short_list = multistring_values_no_short_list->next;
          free (tmp);
        }
    }
  
  test_values_cmd_parser_release (&local_args_info);
  return (EXIT_FAILURE);
}