/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   ft_warp_level.c                                    :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: rbousset <marvin@42.fr>                    +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2020/02/28 20:54:28 by rbousset          #+#    #+#             */
/*   Updated: 2020/02/28 20:54:29 by rbousset         ###   ########lyon.fr   */
/*                                                                            */
/* ************************************************************************** */

#include <libft.h>
#include <cub3d.h>
#include <mlx.h>
#include <stddef.h>
#include <stdlib.h>
#include <stdint.h>
#include <unistd.h>
#include <signal.h>
#include <pthread.h>

static void
	ft_del_map(t_map *ml)
{
	ft_memdel((void*)&ml->filename);
	ft_memdel((void*)&ml->no_tex_path);
	ft_memdel((void*)&ml->so_tex_path);
	ft_memdel((void*)&ml->ea_tex_path);
	ft_memdel((void*)&ml->we_tex_path);
	ft_memdel((void*)&ml->nl_tex_path);
	ft_memdel((void*)&ml->fl_tex_path);
	ft_memdel((void*)&ml->ce_tex_path);
	ft_memdel((void*)&ml->nlevel_path);
	ft_memdel((void*)&ml->skybox_path);
	ft_memdel((void*)&ml->traps_path);
	ft_memdel((void*)&ml->music_path);
	ft_memdel((void*)&ml->music_cmd);
	ft_memdel((void*)&ml->mapl);
	ft_free_sprites(ml->sprite_path);
	ft_free_words(ml->map);
}

static void
	ft_player_keepings(t_cub *cl)
{
	int8_t	tmp_life;
	uint8_t	tmp_has[2];
	int8_t	tmp_handles;

	tmp_life = cl->plist.life;
	tmp_has[0] = cl->plist.has_weapon[0];
	tmp_has[1] = cl->plist.has_weapon[1];
	tmp_handles = cl->plist.handles_weapon;
	cl->plist = ft_init_player();
	if (!cl->isdead)
		cl->plist.life = tmp_life;
	else
		cl->isdead = 0;
	cl->plist.has_weapon[0] = tmp_has[0];
	cl->plist.has_weapon[1] = tmp_has[1];
	cl->plist.handles_weapon = tmp_handles;
}

static void
	ft_del_some(t_cub *cl)
{
	int8_t	i;

	ft_player_keepings(cl);
	cl->f_rgb = ft_init_rgb();
	cl->c_rgb = ft_init_rgb();
	cl->rlist = ft_init_s_ray();
	i = -1;
	while (++i < 5)
		mlx_destroy_image(cl->wlist.wlx, cl->tlist[i].img);
	if (cl->mlist.isnlvl && cl->tlist[5].img)
		mlx_destroy_image(cl->wlist.wlx, cl->tlist[5].img);
	if (cl->mlist.isftex && cl->tlist[6].img)
		mlx_destroy_image(cl->wlist.wlx, cl->tlist[6].img);
	if (cl->mlist.isctex && cl->tlist[7].img)
		mlx_destroy_image(cl->wlist.wlx, cl->tlist[7].img);
	if (cl->mlist.istraps && cl->tlist[15].img)
		mlx_destroy_image(cl->wlist.wlx, cl->tlist[15].img);
	if (cl->tlist[16].img)
		mlx_destroy_image(cl->wlist.wlx, cl->tlist[16].img);
	if (cl->mlist.isheals && cl->tlist[17].img)
		mlx_destroy_image(cl->wlist.wlx, cl->tlist[17].img);
	if (cl->mlist.isweapon[0] && cl->tlist[18].img)
		mlx_destroy_image(cl->wlist.wlx, cl->tlist[18].img);
	if (cl->mlist.isweapon[1] && cl->tlist[19].img)
		mlx_destroy_image(cl->wlist.wlx, cl->tlist[19].img);
	if (cl->tweap[0].img)
		mlx_destroy_image(cl->wlist.wlx, cl->tweap[0].img);
	if (cl->tweap[1].img)
		mlx_destroy_image(cl->wlist.wlx, cl->tweap[1].img);
	if (cl->tweap[2].img)
		mlx_destroy_image(cl->wlist.wlx, cl->tweap[2].img);
	if (cl->tweap[3].img)
		mlx_destroy_image(cl->wlist.wlx, cl->tweap[3].img);
	ft_del_extra_sprites(cl);
	i = -1;
	while (++i < 8)
		ft_memdel((void*)&cl->sprites[i]);
	ft_memdel((void*)&cl->sprites);
}

static void
	ft_treat_music(uint8_t isoldmus, char *tmp_mup, t_cub *cl)
{
	if (isoldmus && !cl->mlist.ismusic)
	{
		pthread_cancel(cl->mtid);
		pthread_join(cl->mtid, NULL);
		cl->isoldmus = 0;
	}
	else if (isoldmus && cl->mlist.ismusic
		&& ft_strncmp(tmp_mup, cl->mlist.music_path, ft_strlen(tmp_mup) + 1))
	{
		pthread_cancel(cl->mtid);
		pthread_join(cl->mtid, NULL);
		ft_enable_music(cl);
	}
	else if (isoldmus && cl->mlist.ismusic
		&& !ft_strncmp(tmp_mup, cl->mlist.music_path, ft_strlen(tmp_mup) + 1))
		return ;
}

int8_t
	ft_warp_level(char *path, t_cub *cl)
{
	char	*next_path;
	char	*tmp_mup;
	uint8_t	isoldmus;

	if (!(next_path = (char *)malloc((ft_strlen(path) + 1) * sizeof(char))))
		return (-1);
	ft_sprintf(next_path, "%s", path);
	if ((isoldmus = cl->mlist.ismusic))
		tmp_mup = ft_strdup(cl->mlist.music_path);
	ft_del_some(cl);
	ft_del_map(&cl->mlist);
	if (ft_init_sprites(&cl->sprites) < 0)
		return (-1);
	if (ft_init_map(&cl->mlist) < 0)
		return (-1);
	ft_parse_map(next_path, cl);
	ft_treat_music(isoldmus, tmp_mup, cl);
	if (isoldmus)
		ft_memdel((void*)&tmp_mup);
	ft_wall_tex_init(cl);
	ft_weap_tex_init(cl);
	ft_memdel((void*)&next_path);
	return (0);
}