/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   parsing.c                                          :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: tomoron <tomoron@student.42angouleme.fr>   +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2025/04/26 17:01:53 by tomoron           #+#    #+#             */
/*   Updated: 2025/04/30 00:17:50 by tomoron          ###   ########.fr       */
/*                                                                            */
/* ************************************************************************** */
#include "includes/ft_ping.h"

char *get_value_in_arg(char *arg, int end)
{
	char *res;

	res = strstr(arg, "=");
	if(res - arg != end)
		return (0);
	if (!res)
		return (0);
	res++;
	return(res);
}

char *get_setting(int *i, int argc, char **argv, int end, t_settings *set)
{
	char *value;

	value = 0;
	if(argv[*i][0] == '-' && argv[*i][1] == '-')
		value = get_value_in_arg(argv[*i], end);
	else if((*i) + 1 < argc)
		value = argv[++(*i)];
	if(!value)
	{
		fprintf(stderr, "%s: option '%s' requires an option\n", argv[0], argv[*i]);
		set->err = 1;
		return(0);
	}
	return(value);
}

int get_set_int(int *i, int argc, char **argv, int end, t_settings *set)
{
	char *value;
	char *tmp;

	value = get_setting(i, argc, argv, end, set);
	if(!value)
		return(0);
	tmp = value;
	while(*tmp)
	{
		if(!isdigit(*tmp))
		{
			fprintf(stderr, "%s: invalid value (`%s' near `%s')\n", argv[0], value, tmp);
			set->err = 1;
			return(0);
		}
		tmp++;
	}
	return(atoi(value));
}

double get_set_float(int *i, int argc, char **argv, int end, t_settings *set)
{
	char *value;
	char *tmp;
	int point;

	value = get_setting(i, argc, argv, end, set);
	if(!value)
		return(0);
	tmp = value;
	point = 0;
	while(*tmp)
	{
		if((!isdigit(*tmp) && *tmp != '.') || (*tmp == '.' && point))
		{
			fprintf(stderr, "%s: invalid value (`%s' near `%s')\n", argv[0], value, tmp);
			set->err = 1;
			return(0);
		}
		if(*tmp == '.')
			point = 1;
		tmp++;
	}
	return(atof(value));
}

void parse_opt(int *i, t_settings *set, int argc, char **argv)
{
	if(!strcmp(argv[*i], "-?") || !strcmp(argv[*i], "--help"))
		show_help(set, *argv);
	else if(!strcmp(argv[*i], "-c") || !strncmp(argv[*i], "--count", 7))
		set->count = get_set_int(i, argc, argv, 7, set);
	else if(!strcmp(argv[*i], "-w") || !strncmp(argv[*i], "--timeout", 9))
		set->timeout = get_set_int(i, argc, argv, 9, set);
	else if(!strcmp(argv[*i], "-W") || !strncmp(argv[*i], "--linger", 8))
		set->timeout = get_set_int(i, argc, argv, 8, set);
	else if(!strcmp(argv[*i], "-i") || !strncmp(argv[*i], "--interval", 10))
		set->interval = get_set_float(i, argc, argv, 10, set);
	else if(!strncmp(argv[*i], "--ttl", 5))
	{
		set->ttl = get_set_int(i, argc, argv, 5, set);
		set->setTtl = 1;
	}
	else
	{
		fprintf(stderr, "%s: unrecognized option '%s'\n", argv[0], argv[*i]);
		set->err = 1;
	}
}

int check_values(t_settings *set, char *name)
{
	if(set->setTtl)
	{
		if(set->ttl == 0)
		{
			fprintf(stderr, "%s: option value too small: %d\n", name, set->ttl);
			return(0);
		}
		else if (set->ttl >= 256)
		{
			fprintf(stderr, "%s: option value too big: %d\n", name, set->ttl);
			return(0);
		}
	}
	if(set->interval < 0.2)
	{
		fprintf(stderr, "%s: option value is too small: %g\n", name, set->interval);
		return(0);
	}
	return(1);
}

t_settings parse_args(int argc, char **argv)
{
	int i;
	t_settings res;

	i = 1;
	bzero(&res, sizeof(t_settings));
	res.count = -1;
	res.timeout = -1;
	res.interval = 1;
	while(i < argc)
	{
		if(*argv[i] == '-')
			parse_opt(&i, &res, argc, argv);
		else
		{
			if(!add_host(&res, argv[i]))
			{
				res.err = 1;
				return(res);
			}
		}
		i++;
	}
	if(!res.err)
		res.err = !check_values(&res, argv[0]);
	return(res);
}