/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   ft_select_bad_boy_actions.c                        :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: rbousset <marvin@42.fr>                    +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2020/02/14 17:28:51 by rbousset          #+#    #+#             */
/*   Updated: 2020/02/14 17:28:51 by rbousset         ###   ########lyon.fr   */
/*                                                                            */
/* ************************************************************************** */

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

/*
** bad_boy.act[] - index summary
** -----------------------------
** 0: wait
** 1: walk
** 2: fire
**
** rand() rules
** ------------
** I. player is not in sight
** rand(0-3) | [0-2] wait | [3] walk
** II. player is in sight
** rand(0-7) | [0-1] wait | [2] walk | [3-7] fire
*/

static double
	ft_get_dist(t_sprite sprite, t_cub *cl)
{
	return (sqrt(pow(cl->plist.pos_x - sprite.s_pos_x, 2) +
			pow(cl->plist.pos_y - sprite.s_pos_y, 2)));
}

static int8_t
	ft_set_r_i(void)
{
	int8_t	r;

	if (FT_OS == 2)
		r = random() % 4;
	else
		r = rand() % 4;
	if (r == 3)
		return (1);
	else
		return (0);
	return (0);
}

static int8_t
	ft_set_r_ii(void)
{
	int8_t	r;

	if (FT_OS == 2)
		r = random() % 8;
	else
		r = rand() % 8;
	if (r <= 1)
		return (0);
	else if (r == 2)
		return (1);
	else
		return (2);
	return (0);
}

static void
	ft_bb_act(int8_t r, int8_t i, t_cub *cl)
{
	cl->bad_boy[i].sleep = 1;
	cl->bad_boy[i].act[r](&cl->bad_boy[i],
		&cl->sprites[13][i], &cl->mlist);
}

#include <stdio.h>
int8_t
	ft_can_it_shoot(int8_t id, double d, t_cub *cl)
{
	uint8_t		hit;
	t_win		*wl;
	t_player	*pl;
	double		teta;
	double		a_big;
	double		b_big;
	double		sqx;
	double		sqy;

	wl = &cl->wlist;
	pl = &cl->plist;
	a_big = 0;
	if (cl->sprites[13][id].s_pos_y > cl->plist.pos_y)
	{
		while (a_big < cl->sprites[13][id].s_pos_y - cl->plist.pos_y)
			a_big += 0.001;
	}
	else if (cl->sprites[13][id].s_pos_y < cl->plist.pos_y)
	{
		while (a_big < cl->plist.pos_y - cl->sprites[13][id].s_pos_y)
			a_big += 0.001;
	}
	else
		a_big = d;
	b_big = 0;
	if (cl->sprites[13][id].s_pos_x > cl->plist.pos_x)
	{
		while (b_big < cl->sprites[13][id].s_pos_x - cl->plist.pos_x)
			b_big += 0.0001;
	}
	else if (cl->sprites[13][id].s_pos_x < cl->plist.pos_x)
	{
		while (b_big < cl->plist.pos_x - cl->sprites[13][id].s_pos_x)
			b_big += 0.0001;
	}
	if (a_big > b_big)
		teta = acos(a_big / d);
	else
		teta = asin(b_big / d);
	cl->rlist.y_ray_dir = 1 * cos(teta);
	cl->rlist.x_ray_dir = 1 * sin(teta);
	if (cl->plist.pos_y > cl->sprites[13][id].s_pos_y)
		cl->rlist.y_ray_dir = -cl->rlist.y_ray_dir;
	if (cl->plist.pos_x > cl->sprites[13][id].s_pos_x)
		cl->rlist.x_ray_dir = -cl->rlist.x_ray_dir;
	hit = 0;
	cl->rlist.y_ray_pos = cl->plist.pos_y;
	cl->rlist.x_ray_pos = cl->plist.pos_x;
	sqy = cl->rlist.y_ray_pos;
	sqx = cl->rlist.x_ray_pos;
	ft_detection_init_x(cl);
	ft_detection_init_y(cl);
	while (hit == 0)
	{
		if (cl->rlist.x_side_dist < cl->rlist.y_side_dist)
		{
			cl->rlist.x_side_dist += cl->rlist.x_delta_dist;
			sqy += cl->mlist.x_step * 0.01;
		}
		else
		{
			cl->rlist.y_side_dist += cl->rlist.y_delta_dist;
			sqx += cl->mlist.y_step * 0.01;
		}
		if ((sqy >= cl->sprites[13][id].s_pos_y - 0.15 &&
			sqy <= cl->sprites[13][id].s_pos_y + 0.15) &&
			(sqx >= cl->sprites[13][id].s_pos_x - 0.15 &&
			sqx <= cl->sprites[13][id].s_pos_x + 0.15))
			break ;
		if (cl->mlist.map[(uint64_t)(sqy + 0.5)][(uint64_t)(sqx + 0.5)] == '1')
  	 		hit = 1;
	}
	return ((hit == 1) ? (0) : (1));
}

void
	ft_select_action(int8_t i, double d, t_cub *cl)
{
	int8_t	can_shoot;
	int8_t	r;

	if (cl->bad_boy[i].life <= 0)
		cl->bad_boy[i].does = 3;
	else
		can_shoot = ft_can_it_shoot(i, d, cl);
	if (cl->bad_boy[i].sleep == 0 && cl->bad_boy[i].life > 0 &&
		(d <= FT_ENMY_SIGHT_RANGE &&
		can_shoot == 1))
	{
		r = ft_set_r_ii();
		ft_bb_act(r, i, cl);
	}
	else if (cl->bad_boy[i].sleep == 0 && cl->bad_boy[i].life > 0)
	{
		r = ft_set_r_i();
		ft_bb_act(r, i, cl);
	}
}

void
	ft_select_bad_boy_action(t_cub *cl)
{
	int8_t	i;
	double	d;

	i = 0;
	while (i < cl->mlist.sprite_nbr[13])
	{
		if ((d = ft_get_dist(cl->sprites[13][i], cl))
			<= 3 * FT_ENMY_SIGHT_RANGE && cl->bad_boy[i].sleep == 0)
		{
			ft_select_action(i, d, cl);
		}
		i++;
	}
}