/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   main.c                                             :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: rparodi <rparodi@student.42.fr>            +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2024/03/28 14:40:38 by rparodi           #+#    #+#             */
/*   Updated: 2024/10/14 13:57:51 by maiboyer         ###   ########.fr       */
/*                                                                            */
/* ************************************************************************** */

#include "app/colors.h"
#include "app/env.h"
#include "app/signal_handler.h"
#include "app/state.h"
#include "ast/ast.h"
#include "exec/_run_ast.h"
#include "line/line.h"
#include "me/hashmap/hashmap_env.h"
#include "me/mem/mem.h"
#include "me/str/str.h"
#include "me/string/string.h"
#include "me/types.h"
#include "me/vec/vec_str.h"
#include "me/vec/vec_token.h"
#include "parser/passes.h"
#include "parser/token.h"
#include <errno.h>
#include <sys/types.h>
#include "me/convert/str_to_numbers.h"
#include "me/convert/numbers_to_str.h"

t_error	get_user_input(t_state *state);
void	ast_print_node(t_ast_node self);
void	ft_exit(t_state *maiboyerlpb, t_u8 exit_status);
void	exec_shcat(t_state *state);
void	ft_take_args(t_state *state);

#define DFT_PATH "/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin"

// Foutre envp dans env
// Chaque elemenet d'envp split au premier =
// cle avant le =
// data apres le =

void	ast_free(t_ast_node node);

t_error	split_str_first(t_const_str s, char splitter, t_str *before,
		t_str *after)
{
	t_usize	i;

	if (s == NULL || before == NULL || after == NULL || splitter == '\0')
		return (ERROR);
	i = 0;
	while (s[i] != '\0' && s[i] != splitter)
		i++;
	if (s[i] == '\0')
		return (ERROR);
	if (i == 0)
		i = 1;
	*before = str_substring(s, 0, i);
	*after = str_substring(s, i + 1, ~(t_usize)0);
	return (NO_ERROR);
}

void append_default_env(t_hashmap_env *env)
{
	t_str *tmp;
	t_str key;
	t_str tmp2;
	t_u64 shlvl;
	
	key = "SHLVL";
	shlvl = 0;
	tmp = hmap_env_get(env, &key);
	(void)(tmp != NULL && str_to_u64(*tmp, 10, &shlvl));
	(void)((tmp != NULL) && (str_free(*tmp), 1));
	if (u64_to_str(shlvl + 1, &tmp2))
		me_abort("Failed to set SHLVL");
	hmap_env_insert(env, str_clone(key), str_clone(tmp2));
	key = "PATH";
	tmp = hmap_env_get(env, &key);
	if (tmp == NULL)
		hmap_env_insert(env, str_clone(key), str_clone(DFT_PATH));
	
}

t_error	populate_env(t_hashmap_env *env, t_str envp[])
{
	t_usize	i;
	t_str	temp[2];

	i = 0;
	if (envp == NULL || env == NULL)
		return (ERROR);
	while (envp[i] != NULL)
	{
		if (split_str_first(envp[i], '=', &temp[0], &temp[1]))
			return (ERROR);
		if (temp[0] == NULL || temp[1] == NULL)
			return (ERROR);
		(hmap_env_insert(env, temp[0], temp[1]));
		i++;
	}
	append_default_env(env);
	return (NO_ERROR);
}

t_error	yard(t_vec_token ts, t_vec_ast *output);

t_error	parse_str(t_state *state)
{
	t_vec_token	tokens;
	t_vec_ast	ast;

	if (tokenize(state->str_input, &tokens))
		return (ERROR);
	if (ts_apply_passes(tokens, &tokens))
		return (ERROR);
	if (yard(tokens, &ast))
		return (ERROR);
	if (ast.len != 1)
		return (ERROR);
	vec_ast_pop(&ast, &state->ast);
	vec_ast_free(ast);
	return (NO_ERROR);
}

t_i32	main(t_i32 argc, t_str argv[], t_str envp[])
{
	t_state	state;

	(void)argc;
	(void)argv;
	if (install_signal())
		me_abort("Unable to install signals");
	state = (t_state){};
	state.env = create_env_map();
	state.tmp_var = create_env_map();
	if (populate_env(state.env, envp))
		me_abort("Unable to build env hashmap");
	state.prompt = COLB_YELLOW "42sh" COL_GREEN ">" COL_WHITE "$ " RESET;
	ft_take_args(&state);
}