/*
  File autogenerated by gengetopt 
  generated with the following command:
  ../src/gengetopt --gen-version --input=no_multi_strings_cmd.ggo --func-name=no_multi_strings_cmd_parser --file-name=no_multi_strings_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 "no_multi_strings_cmd.h"

const char *gengetopt_args_info_purpose = "Has multiple options none of which are strings";

const char *gengetopt_args_info_usage = "Usage: no multi strings [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",
  "  -t, --test=A test value  This is a test option  (default=`5')",
  "      --multi=Multivalue   This is a multi option",
    0
};

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

static int
no_multi_strings_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
no_multi_strings_cmd_parser_required2 (struct gengetopt_args_info *args_info, const char *prog_name, const char *additional_error);

struct int_list
{
  int arg;
  char *orig;
  struct int_list * next;
};

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->test_given = 0 ;
  args_info->multi_given = 0 ;
}

static
void clear_args (struct gengetopt_args_info *args_info)
{
  args_info->test_arg = 5;
  args_info->test_orig = NULL;
  args_info->multi_arg = NULL;
  args_info->multi_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->test_help = gengetopt_args_info_help[2] ;
  args_info->multi_help = gengetopt_args_info_help[3] ;
  args_info->multi_min = -1;
  args_info->multi_max = -1;
  
}

void
no_multi_strings_cmd_parser_print_version (void)
{
  printf ("%s %s\n", NO_MULTI_STRINGS_CMD_PARSER_PACKAGE, NO_MULTI_STRINGS_CMD_PARSER_VERSION);
}

void
no_multi_strings_cmd_parser_print_help (void)
{
  int i = 0;
  no_multi_strings_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
no_multi_strings_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
no_multi_strings_cmd_parser_release (struct gengetopt_args_info *args_info)
{
  
  unsigned int i;
  if (args_info->test_orig)
    {
      free (args_info->test_orig); /* free previous argument */
      args_info->test_orig = 0;
    }
  if (args_info->multi_arg)
    {
      for (i = 0; i < args_info->multi_given; ++i)
        {
          if (args_info->multi_orig [i])
            {
              free (args_info->multi_orig [i]); /* free previous argument */
              args_info->multi_orig [i] = 0;
            }
        }
      free (args_info->multi_arg); /* free previous argument */
      args_info->multi_arg = 0;
      free (args_info->multi_orig); /* free previous argument */
      args_info->multi_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
no_multi_strings_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", NO_MULTI_STRINGS_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->test_given) {
    if (args_info->test_orig) {
      fprintf(outfile, "%s=\"%s\"\n", "test", args_info->test_orig);
    } else {
      fprintf(outfile, "%s\n", "test");
    }
  }
  if (args_info->multi_orig)
    {
      for (i = 0; i < args_info->multi_given; ++i)
        {
          if (args_info->multi_orig [i])
            {
              fprintf(outfile, "%s=\"%s\"\n", "multi", args_info->multi_orig [i]);
            }
        }
    }
  
  fclose (outfile);

  i = EXIT_SUCCESS;
  return i;
}

void
no_multi_strings_cmd_parser_free (struct gengetopt_args_info *args_info)
{
  no_multi_strings_cmd_parser_release (args_info);
}


/* 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;
}
int
no_multi_strings_cmd_parser (int argc, char * const *argv, struct gengetopt_args_info *args_info)
{
  return no_multi_strings_cmd_parser2 (argc, argv, args_info, 0, 1, 1);
}

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

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

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

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

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

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

int
no_multi_strings_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->multi_given, args_info->multi_min, args_info->multi_max, "'--multi'"))
     error = 1;
  
  
  /* checks for dependences among options */

  return error;
}

int
no_multi_strings_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 int_list * multi_list = NULL,* multi_new = NULL;
  int error = 0;
  struct gengetopt_args_info local_args_info;

  if (initialize)
    no_multi_strings_cmd_parser_init (args_info);

  no_multi_strings_cmd_parser_init (&local_args_info);

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

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

      static struct option long_options[] = {
        { "help",	0, NULL, 'h' },
        { "version",	0, NULL, 'V' },
        { "test",	1, NULL, 't' },
        { "multi",	1, NULL, 0 },
        { NULL,	0, NULL, 0 }
      };

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

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

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

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

        case 't':	/* This is a test option.  */
          if (local_args_info.test_given)
            {
              fprintf (stderr, "%s: `--test' (`-t') option given more than once%s\n", argv[0], (additional_error ? additional_error : ""));
              goto failure;
            }
          if (args_info->test_given && ! override)
            continue;
          local_args_info.test_given = 1;
          args_info->test_given = 1;
          args_info->test_arg = strtol (optarg, &stop_char, 0);
          if (!(stop_char && *stop_char == '\0')) {
            fprintf(stderr, "%s: invalid numeric value: %s\n", argv[0], optarg);
            goto failure;
          }
          if (args_info->test_orig)
            free (args_info->test_orig); /* free previous string */
          args_info->test_orig = gengetopt_strdup (optarg);
          break;


        case 0:	/* Long option with no short option */
          /* This is a multi option.  */
          if (strcmp (long_options[option_index].name, "multi") == 0)
          {
            local_args_info.multi_given++;
          
            multi_token = get_multiple_arg_token(optarg);
            multi_next = get_multiple_arg_token_next (optarg);
          
            while (1)
              {
                multi_new = (struct int_list *) malloc (sizeof (struct int_list));
                multi_new->next = multi_list;
                multi_list = multi_new;
                multi_new->arg = strtol (multi_token, &stop_char, 0);
                if (!(stop_char && *stop_char == '\0')) {
                  fprintf(stderr, "%s: invalid numeric value: %s\n", argv[0], multi_token);
                  goto failure;
                }
                multi_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.multi_given++;
                  }
                else
                  break;
              }
            break;
          }
          
          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", NO_MULTI_STRINGS_CMD_PARSER_PACKAGE, c, (additional_error ? additional_error : ""));
          abort ();
        } /* switch */
    } /* while */


  if (local_args_info.multi_given && multi_list)
    {
      struct int_list *tmp;
      args_info->multi_arg = (int *) realloc (args_info->multi_arg, (args_info->multi_given + local_args_info.multi_given) * sizeof (int));
      args_info->multi_orig = (char **) realloc (args_info->multi_orig, (args_info->multi_given + local_args_info.multi_given) * sizeof (char *));
      for (i = (local_args_info.multi_given - 1); i >= 0; --i)
        {
          tmp = multi_list;
          args_info->multi_arg [i + args_info->multi_given] = multi_list->arg;
          args_info->multi_orig [i + args_info->multi_given] = multi_list->orig;
          multi_list = multi_list->next;
          free (tmp);
        }
    }
  

  args_info->multi_given += local_args_info.multi_given;
  local_args_info.multi_given = 0;
  
  if (check_required)
    {
      error += no_multi_strings_cmd_parser_required2 (args_info, argv[0], additional_error);
    }

  no_multi_strings_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 (multi_list)
    {
      struct int_list *tmp;
      while (multi_list)
        {
          tmp = multi_list;
          free (multi_list->orig);
          multi_list = multi_list->next;
          free (tmp);
        }
    }
  
  no_multi_strings_cmd_parser_release (&local_args_info);
  return (EXIT_FAILURE);
}