/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   part1.c                                            :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: tomoron <tomoron@student.42.fr>            +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2024/07/17 23:03:36 by tomoron           #+#    #+#             */
/*   Updated: 2024/12/11 22:19:45 by tomoron          ###   ########.fr       */
/*                                                                            */
/* ************************************************************************** */

#include <stdio.h>
#include <stdlib.h>
#include "libft/libft.h"

typedef struct s_pebble
{
	long int value;
	struct s_pebble *next;
}	t_pebble;

static t_pebble *get_input(char *input)
{
	t_pebble *res;
	t_pebble *prev;
	t_pebble *cur;

	prev = 0;
	while(*input && (ft_isdigit(*input) || *input == ' '))
	{
		cur = malloc(sizeof(t_pebble));
		cur->next = 0;
		cur->value = atol(input);
		if(prev)
			prev->next = cur;
		else
			res = cur;
		prev = cur;
		while(ft_isdigit(*input))
			input++;
		while(*input == ' ')
			input++;
	}
	return(res);
}

static int count_digits(long int nb)
{
	int res;

	res = 1;
	while(nb > 9)
	{
		nb /= 10;
		res++;
	}
	return(res);
}

static void split_pebble(long int *l, long int *r)
{
	int len;
	long exp;
	int i;

	len = count_digits(*l) / 2;
	*r = 0;
	i = 0;
	exp = 1;
	while(i < len)
	{
		*r += (*l % 10) * exp;
		*l /= 10;
		exp *= 10;
		i++;
	}
}

static long int get_nb(long int nb, int depth)
{
	long int res;
	long int tmp;

	if(depth == 25)
		return(1);
	if(nb == 0)
		return(get_nb(1, depth + 1));
	else if(count_digits(nb) % 2 == 0)
	{
		split_pebble(&nb, &tmp);
		res = get_nb(nb, depth + 1);
		return(res + get_nb(tmp, depth + 1));
	}
	else
		return(get_nb(nb * 2024, depth + 1));
}

long int resolve_part1(char *input, char **split)
{
	(void)split;
	(void)input;
	t_pebble *pebble;
	pebble = get_input(input);
	long int res;
	(void)get_input;

	res = 0;
	while(pebble)
	{
		res += get_nb(pebble->value, 0);
		pebble = pebble->next;
	}
	return(res);
}