/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   ft_draw_sprite.c                                   :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: rbousset <marvin@42.fr>                    +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2020/02/24 20:22:45 by rbousset          #+#    #+#             */
/*   Updated: 2020/03/09 18:56:01 by rbousset         ###   ########lyon.fr   */
/*                                                                            */
/* ************************************************************************** */

#include <libft.h>
#include <cub3d.h>
#include <stdint.h>
#include <stdlib.h>
#include <math.h>

static float
	**ft_alloc_dist_tab(void)
{
	uint16_t	i;
	float		**dist_tab;

	if (!(dist_tab = (float **)ft_calloc((FT_TOTAL_SPRT + 1), sizeof(float*))))
		return (NULL);
	i = 0;
	while (i < FT_TOTAL_SPRT + 1)
	{
		if (!(dist_tab[i] = (float *)ft_calloc(4096, sizeof(float))))
			return (NULL);
		i++;
	}
	return (dist_tab);
}

void
	ft_sort_sprites(t_cub *cl, int16_t it, int16_t jt)
{
	float	**dist_tab;

	if (!(dist_tab = ft_alloc_dist_tab()))
		ft_alloc_error(cl);
	while (++jt < FT_TOTAL_SPRT)
	{
		if (cl->mlist.sprite_nbr[jt] == 0)
			dist_tab[jt][0] = 0;
		else
		{
			while (++it < cl->mlist.sprite_nbr[jt])
			{
				dist_tab[jt][it] =
					((cl->plist.pos_x - cl->sprites[jt][it].s_pos_x) *
					(cl->plist.pos_x - cl->sprites[jt][it].s_pos_x) +
					(cl->plist.pos_y - cl->sprites[jt][it].s_pos_y) *
					(cl->plist.pos_y - cl->sprites[jt][it].s_pos_y));
			}
			it = -1;
		}
	}
	ft_sort_s_t(cl, dist_tab);
}

static void
	ft_put_sprite(t_sprite *sprite, t_cub *cl)
{
	double		dist;
	t_rgb		rgb;

	if ((dist = sqrt(pow(cl->plist.pos_x - sprite->s_pos_x, 2)
		+ pow(cl->plist.pos_y - sprite->s_pos_y, 2))) <= 0)
		dist = 0.0001;
	rgb.r = (uint8_t)cl->tlist[sprite->current_sprite].ptr[sprite->tex_x
		* 4 + 4 * cl->tlist[sprite->current_sprite].img_w * sprite->tex_y + 2];
	rgb.g = (uint8_t)cl->tlist[sprite->current_sprite].ptr[sprite->tex_x
		* 4 + 4 * cl->tlist[sprite->current_sprite].img_w * sprite->tex_y + 1];
	rgb.b = (uint8_t)cl->tlist[sprite->current_sprite].ptr[sprite->tex_x
		* 4 + 4 * cl->tlist[sprite->current_sprite].img_w * sprite->tex_y];
	*(int*)(cl->img.ptr + ((uint16_t)sprite->x * 4 +
		(sprite->y * cl->img.sizeline))) = ft_rgb_to_hex(dist, rgb, cl);
}

void
	ft_draw_sprite(t_cub *cl, t_sprite *sprite)
{
	int32_t	d;

	sprite->x = sprite->drawstartx;
	while (sprite->x < sprite->drawendx)
	{
		sprite->tex_x = (int32_t)((sprite->x - (-sprite->spritewidth / 2 +
			sprite->spritescreenx))
			* cl->tlist[sprite->current_sprite].img_w / sprite->spritewidth);
		sprite->y = sprite->drawstarty;
		while (sprite->y < sprite->drawendy)
		{
			d = sprite->y * 256 - cl->wlist.y_size * 128 +
				sprite->spriteheight * 128;
			sprite->tex_y = ((d * cl->tlist[sprite->current_sprite].img_h / 2) /
				sprite->spriteheight) / 128;
			if (sprite->transformy > 0 &&
				cl->tlist[sprite->current_sprite].ptr[sprite->tex_x * 4 + 4 *
					cl->tlist[sprite->current_sprite].img_w * sprite->tex_y]
				&& cl->rlist.wall_dist_tab[sprite->x] > sprite->transformy)
				ft_put_sprite(sprite, cl);
			sprite->y++;
		}
		sprite->x++;
	}
}