/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   ft_draw_verline.c                                  :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: rbousset <marvin@42.fr>                    +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2020/02/14 17:22:23 by rbousset          #+#    #+#             */
/*   Updated: 2020/02/14 17:23:42 by rbousset         ###   ########lyon.fr   */
/*                                                                            */
/* ************************************************************************** */

#include <cub3d.h>
#include <stdint.h>

static void
	ft_draw_floor_tex(t_cub *cl, int32_t y, int32_t x, int32_t tex_y)
{
	cl->img.ptr[x * 4 + (cl->img.sizeline * y)] =
		(uint8_t)cl->tlist[6].ptr[cl->tlist[6].tex_x * 4 + 4 *
		cl->tlist[6].img_h * tex_y];
	cl->img.ptr[x * 4 + (cl->img.sizeline * y) + 1] =
		(uint8_t)cl->tlist[6].ptr[cl->tlist[6].tex_x * 4 + 4 *
		cl->tlist[6].img_h * tex_y + 1];
	cl->img.ptr[x * 4 + (cl->img.sizeline * y) + 2] =
		(uint8_t)cl->tlist[6].ptr[cl->tlist[6].tex_x * 4 + 4 *
		cl->tlist[6].img_h * tex_y + 2];
	cl->img.ptr[x * 4 + cl->wlist.x_size * y + 3] = (int8_t)0;
}

#include <stdio.h>
static void
	ft_draw_floor(t_cub *cl, int32_t y, int32_t x)
{
	float	dist_player;
	float	curr_dist;
	float	weight;
	float	curr_floor_x;
	float	curr_floor_y;

	dist_player = 0.0;
	while ((uint32_t)y < cl->wlist.y_size)
	{
		curr_dist = cl->wlist.y_size / (2.0 * y - cl->wlist.y_size);
		weight = (curr_dist - dist_player)
				/ (cl->rlist.wall_dist - dist_player);
		curr_floor_x = weight * cl->rlist.floor_x_wall
							+ (1.0 - weight) * cl->plist.pos_x;
		curr_floor_y = weight * cl->rlist.floor_y_wall
							+ (1.0 - weight) * cl->plist.pos_y;
		cl->tlist[6].tex_x = (int32_t)(curr_floor_x * cl->tlist[6].img_w)
										% cl->tlist[6].img_w;
		cl->tlist[6].tex_y = (int32_t)(curr_floor_y * cl->tlist[6].img_h)
										% cl->tlist[6].img_h;
		/* cl->tlist[6].tex_x = (cl->tlist[6].tex_x > 0) */
		/* 	? (cl->tlist[6].tex_x) : (-cl->tlist[6].tex_x); */
		/* cl->tlist[6].tex_y = (cl->tlist[6].tex_y > 0) */
		/* 	? (cl->tlist[6].tex_y) : (-cl->tlist[6].tex_y); */
		ft_draw_floor_tex(cl, y, x, cl->tlist[6].tex_y);
		/* *(int*)(cl->img.ptr + */
		/* 		(x * 4 + (y * cl->img.sizeline))) */
		/* 		= ft_darken_floor(cl->f_rgb, weight, cl); */
		y++;
	}
}

static void
	ft_draw_ceil(t_cub *cl, int32_t y, int32_t x)
{
	int16_t	i;

	i = 0;
	while (i <= y)
	{
		*(int*)(cl->img.ptr +
			(x * 4 + (i * cl->img.sizeline)))
			= ft_darken_ceil(cl->c_rgb, i, cl);
		i++;
	}
}

int8_t
	ft_draw_verline(t_cub *cl, int32_t x, int32_t y, int32_t y2)
{
	int32_t	d;
	int32_t tex_y;

	(y < 0) ? (y = 0) : 0;
	(y2 < 0) ? (y2 = 0) : 0;
	ft_draw_ceil(cl, y, x);
	(cl->rlist.line_h <= 0) ? (cl->rlist.line_h = 1) : 0;
	while (y < y2)
	{
		d = y * 256 - cl->wlist.y_size * 128 + cl->rlist.line_h * 128;
		d = (d <= 0) ? (-d) : (d);
		tex_y = ((d * cl->tlist[cl->w_side].img_h) / cl->rlist.line_h) / 256;
		(tex_y <= 0) ? (tex_y = 1) : 0;
		ft_draw_texture(cl, x, y, tex_y);
		y++;
	}
	ft_draw_floor(cl, y, x);
	return (0);
}