#include <stdio.h>
#include <stdlib.h>
#include "foodopts.h"

static struct option *
to_getopt_longopts(const struct foodoption * src)
{
  int l = 0;
  while( src[l].name    != 0
      || src[l].has_arg != 0
      || src[l].flag    != 0
      || src[l].val     != 0) {
    l++;
  }

  struct option * dst = (struct option *)malloc(sizeof(struct option) * (l + 1));
  int i = 0;
  while( src[i].name    != 0
      || src[i].has_arg != 0
      || src[i].flag    != 0
      || src[i].val     != 0) {
    dst[i].name    = src[i].name;
    dst[i].has_arg = src[i].has_arg;
    dst[i].flag    = src[i].flag;
    dst[i].val     = src[i].val;
    i++;
  }
  dst[i].name    = 0;
  dst[i].has_arg = 0;
  dst[i].flag    = 0;
  dst[i].val     = 0;

  return dst;
}

int
get_foodopt(int argc, char *const argv[],
            const char *optstring,
            const struct foodoption *longopts,
            int *longindex)
{
  struct option * o = to_getopt_longopts(longopts);
  int rc = getopt_long(argc, argv, optstring, o, longindex);

  free(o);
  return rc;
}

const char *
get_argument(const char opt,
             const struct foodoption *longopts)
{
  int i = 0;
  while ((longopts[i].name)
         && (longopts[i].val)) {
    if (longopts[i].val == opt)
      return longopts[i].arg;
    i++;
  }
  return NULL;
}

void
foodopt_help(char * argv0,
             const struct foodoption *longopts)
{
  fprintf(stderr, "%s [OPTION ...] FILE ...\n", argv0);
  fprintf(stderr, "\nOPTIONS:\n");


  int i = 0;
  while ((longopts[i].name)
         && (longopts[i].val)) {
    if (longopts[i].category) {
      fprintf(stderr, "\n%s:\n", longopts[i].category);
    }
    fprintf(stderr, "-%c, --%s%s%s: %s\n",
            longopts[i].val,
            longopts[i].name,
            (longopts[i].has_arg == required_argument || longopts[i].has_arg == optional_argument) ? " " : "",
            (longopts[i].has_arg == required_argument || longopts[i].has_arg == optional_argument) ? longopts[i].arg : "",
            longopts[i].help);
    i++;
  }
}