/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   cliopts_get.c                                      :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: jhalford <jack@crans.org>                  +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2017/03/14 20:04:04 by jhalford          #+#    #+#             */
/*   Updated: 2017/03/20 15:50:08 by jhalford         ###   ########.fr       */
/*                                                                            */
/* ************************************************************************** */

/*
**	void *data must be a structure starting with `int flag`
**	to do polymorphism with t_data_template !
*/

#include "cliopts.h"

static t_cliopts	*get_map_long(t_cliopts opt_map[], char *arg)
{
	int		i;

	i = -1;
	while (opt_map[++i].c)
		if (ft_strcmp(opt_map[i].str, arg) == 0)
			return (&opt_map[i]);
	return (NULL);
}

static t_cliopts	*get_map_short(t_cliopts opt_map[], char arg)
{
	int		i;

	i = -1;
	while (opt_map[++i].c)
		if (opt_map[i].c == arg)
			return (&opt_map[i]);
	return (NULL);
}

static int			cliopts_parse_short(
		char ***av, t_cliopts opt_map[], void *data)
{
	t_cliopts	*map;
	char		*arg;
	int			i;

	arg = **av + 1;
	i = 0;
	while (arg[i])
	{
		if (!(map = get_map_short(opt_map, arg[i])))
			return (ERR_SET(E_CO_INV, arg[i]));
		if (map->get)
		{
			if (!(arg[i - 1] == '-' && arg[i + 1] == 0))
				return (ERR_SET(E_CO_MULT, *arg));
			++(*av);
			if ((map->get)(av, data))
				return (ERR_SET(E_CO_MISS, *arg));
		}
		((t_data_template*)data)->flag |= map->flag_on;
		((t_data_template*)data)->flag &= ~map->flag_off;
		i++;
	}
	++(*av);
	return (0);
}

static int			cliopts_parse_long(
		char ***av, t_cliopts opt_map[], void *data)
{
	t_cliopts	*map;
	char		*arg;

	arg = **av + 2;
	if (!(map = get_map_long(opt_map, arg)))
		return (ERR_SET(E_CO_INVL, arg));
	((t_data_template*)data)->flag |= map->flag_on;
	((t_data_template*)data)->flag &= ~map->flag_off;
	if (map->get)
	{
		++(*av);
		if ((map->get)(av, data))
			return (ERR_SET(E_CO_MISSL, arg));
	}
	++(*av);
	return (0);
}

int					cliopts_get(char **av, t_cliopts opt_map[], void *data)
{
	if (!av)
		return (1);
	av++;
	while (av && *av)
	{
		if (ft_strcmp(*av, "--") == 0)
			return (0);
		else if ((*av)[0] == '-' && (*av)[1] == '-')
		{
			if (cliopts_parse_long(&av, opt_map, data))
				return (1);
		}
		else if ((*av)[0] == '-')
		{
			if (cliopts_parse_short(&av, opt_map, data))
				return (1);
		}
		else
			break ;
	}
	((t_data_template*)data)->av_data = av;
	return (0);
}