/**
 * @file cl_radar.c
 * @brief Radars / sensor stuff, to detect and track ufos
 */

/*
Copyright (C) 2002-2007 UFO: Alien Invasion team.

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.

See the GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/

#include "client.h"
#include "cl_global.h"

#define RADAR_DRAW_POINTS	60
/**
 * @brief Show Radar coverage
 */
extern void RADAR_DrawCoverage (const menuNode_t* node, const radar_t* radar, vec2_t pos, qboolean globe)
{
	int i, xCircle, yCircle, zCircle;
	int pts[RADAR_DRAW_POINTS * 2 + 2];
	int pts2[RADAR_DRAW_POINTS * 2 + 2];
	vec2_t posCircle;
	float cosinus, sinus, rangeTracking;

	const vec4_t color = {0, 1, 0, 1};
	/* Set color */
	re.DrawColor(color);

	rangeTracking = radar->range + radar->range / 10.0f;
	for (i = 0 ; i <= RADAR_DRAW_POINTS ; i++) {
		cosinus = cos(i * M_TWOPI / RADAR_DRAW_POINTS);
		sinus = sin(i * M_TWOPI / RADAR_DRAW_POINTS);
		posCircle[0] = pos[0] + cosinus * radar->range;
		posCircle[1] = pos[1] + sinus * radar->range;
		if (!globe)
			MAP_MapToScreen(node, posCircle, &xCircle, &yCircle);
		else
			MAP_3DMapToScreen(node, posCircle, &xCircle, &yCircle, &zCircle);
		pts[i * 2] = xCircle;
		pts[i * 2 + 1] = yCircle;
		posCircle[0] = pos[0] + cosinus * rangeTracking;
		posCircle[1] = pos[1] + sinus * rangeTracking;
		if (!globe)
			MAP_MapToScreen(node, posCircle, &xCircle, &yCircle);
		else
			MAP_3DMapToScreen(node, posCircle, &xCircle, &yCircle, &zCircle);
		pts2[i * 2] = xCircle;
		pts2[i * 2 + 1] = yCircle;
	}
	/* FIXME for globe */
	re.DrawLineStrip(RADAR_DRAW_POINTS + 1, pts);
	re.DrawLineStrip(RADAR_DRAW_POINTS + 1, pts2);
	re.DrawColor(NULL);
}

/**
 * @brief Display radar in geoscape
 */
extern void RADAR_DrawInMap (const menuNode_t* node, const radar_t* radar, int x, int y, vec2_t pos, qboolean globe)
{
	int i, z;
	const vec4_t color = {0, 1, 0, 1};
	int pts[4];

	if (radar->numUfos==0)
		return;

	/* Show radar range zones */
	RADAR_DrawCoverage(node,radar,pos, globe);

	/* Set color */
	re.DrawColor(color);

	/* Draw lines from radar to ufos sensored */
	Vector2Set(pts, x, y);
	for (i = radar->numUfos - 1 ; i >= 0 ; i--)
		if (!globe && MAP_MapToScreen(node, (gd.ufos + radar->ufos[i])->pos, &x, &y)) {
			Vector2Set(pts + 2, x, y);
			re.DrawLineStrip(2, pts);
		} else if (globe && MAP_3DMapToScreen(node, (gd.ufos + radar->ufos[i])->pos, &x, &y, &z)) {
			Vector2Set(pts + 2, x, y);
			re.DrawLineStrip(2, pts); /* FIXME */
		}

	re.DrawColor(NULL);
}

/**
 * @brief Add an ufo in the list of sensored ufo
 */
static qboolean RADAR_AddUfo (radar_t* radar, int numUfo)
{
	if (radar->numUfos >= MAX_UFOONGEOSCAPE)
		return qfalse;

	radar->ufos[radar->numUfos] = numUfo;
	radar->numUfos++;
	return qtrue;
}

/**
 * @brief Check if ufo is sensored list, and return its position in list (-1 if not)
 */
static int RADAR_IsUfoSensored (const radar_t* radar, int numUfo)
{
	int i;

	for (i = 0 ; i < radar->numUfos ; i++)
		if (radar->ufos[i] == numUfo)
			return i;

	return -1;
}

/**
 * @brief Ufo will no more be referenced by radar
 */
extern void RADAR_RemoveUfo (radar_t* radar, const aircraft_t* ufo)
{
	int i, numUfo = ufo - gd.ufos;

	for (i = 0 ; i < radar->numUfos ; i++)
		if (radar->ufos[i] == numUfo) {
			radar->numUfos--;
			radar->ufos[i] = radar->ufos[radar->numUfos];
			return;
		}
}

/**
 * @brief Notify that the specified ufo has been removed from geoscape
 **/
extern void Radar_NotifyUfoRemoved (radar_t* radar, const aircraft_t* ufo)
{
	int i, numUfo = ufo - gd.ufos;

	for (i = 0 ; i < radar->numUfos ; i++)
		if (radar->ufos[i] == numUfo) {
			radar->numUfos--;
			radar->ufos[i] = radar->ufos[radar->numUfos];
			i--;	/* Allow the moved value to be checked */
		} else if (radar->ufos[i] > numUfo)
			radar->ufos[i]--;
}

/**
 * @brief Change to radar range
 */
extern void RADAR_ChangeRange (radar_t* radar, int change)
{
	radar->range += change;
	if (radar->range < 0)
		radar->range = 0;
}

/**
 * @brief Initialise radar
 */
extern void Radar_Initialise (radar_t* radar, int range)
{
	radar->range = range;
	radar->numUfos = 0;
}

/**
 * @brief Check if the specified ufo is inside the sensor range of base
 * Return true if the aircraft is inside sensor
 */
extern qboolean RADAR_CheckUfoSensored (radar_t* radar, vec2_t posRadar,
	const aircraft_t* ufo, qboolean wasUfoSensored)
{
	int dist;
	int num;
	int numAircraftSensored;

	/* Get num of ufo in gd.ufos */
	num = ufo - gd.ufos;
	if (num < 0 || num >= gd.numUfos)
		return qfalse;

	numAircraftSensored = RADAR_IsUfoSensored(radar, num);	/* indice of ufo in radar list */
	dist = CP_GetDistance(posRadar, ufo->pos);	/* Distance from radar to ufo */

	if (radar->range + (wasUfoSensored ? radar->range / 10 : 0) > dist) {
		/* Ufo is inside the radar range */
		if (numAircraftSensored < 0) {
			/* Ufo was not sensored by the radar */
			RADAR_AddUfo(radar, num);
		}
		return qtrue;
	}

	/* Ufo is not in the sensor range */
	if (numAircraftSensored >= 0) {
		/* Ufo was sensored by the radar */
		RADAR_RemoveUfo(radar, ufo);
	}
	return qfalse;
}