/*  $Id: input_device_sdljoystick.cpp,v 1.7 2004/04/14 20:46:57 sphair Exp $
**
**  ClanLib Game SDK
**  Copyright (C) 2003  The ClanLib Team
**  For a total list of contributers see the file CREDITS.
**
**  This library is free software; you can redistribute it and/or
**  modify it under the terms of the GNU Lesser General Public
**  License as published by the Free Software Foundation; either
**  version 2.1 of the License, or (at your option) any later version.
**
**  This library 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
**  Lesser General Public License for more details.
**
**  You should have received a copy of the GNU Lesser General Public
**  License along with this library; if not, write to the Free Software
**  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307  USA
*/

#include "API/Display/input_device.h"
#include "API/Display/input_event.h"
#include "input_device_sdljoystick.h"
#include "API/Core/System/error.h"
#include "API/Core/System/log.h"

#include "display_window_sdl.h"

#include <SDL/SDL.h>

/////////////////////////////////////////////////////////////////////////////
// CL_InputDevice_SDLJoystick construction:

CL_InputDevice_SDLJoystick::CL_InputDevice_SDLJoystick(CL_DisplayWindow_SDL *owner, int joystick_num) :
	owner(owner), joystick(0), my_joystick(-1), last_x(0), last_y(0)
{
	type = CL_InputDevice::joystick;

	joystick = SDL_JoystickOpen(joystick_num);
	if (joystick == 0)
	{
		throw CL_Error(SDL_GetError());
	}
	else
	{
		my_joystick = joystick_num;
		slot_sdlevent = owner->sig_sdl_joystick_event.connect(this, &CL_InputDevice_SDLJoystick::handle_joystick_event);
	}
}

CL_InputDevice_SDLJoystick::~CL_InputDevice_SDLJoystick()
{	
	if (joystick != 0)
	{
		SDL_JoystickClose(joystick);
		joystick = 0;
	}
}

/////////////////////////////////////////////////////////////////////////////
// CL_InputDevice_SDLJoystick attributes:

int CL_InputDevice_SDLJoystick::get_x() const
{
	return 0;
}

int CL_InputDevice_SDLJoystick::get_y() const
{
	return 0;
}

bool CL_InputDevice_SDLJoystick::get_keycode(int keycode) const
{
	return (SDL_JoystickGetButton(joystick,keycode) == 1);
}

float CL_InputDevice_SDLJoystick::get_axis(int index) const
{
	switch (index)
	{
	case 0:
		return last_x / 32768.0f;

	case 1:
		return last_y / 32768.0f;
	}

	return 0.0f;
}

std::string CL_InputDevice_SDLJoystick::get_name() const
{
	return "Joystick";
}

int CL_InputDevice_SDLJoystick::get_axis_count() const
{
	return 2;
}

int CL_InputDevice_SDLJoystick::get_button_count() const
{
	return -1;
}

/////////////////////////////////////////////////////////////////////////////
// CL_InputDevice_SDLJoystick operations:

std::string CL_InputDevice_SDLJoystick::get_key_name(int id) const
{
	return CL_String::format("Joystick button %1", id);
}

/////////////////////////////////////////////////////////////////////////////
// CL_InputDevice_SDLJoystick implementation:

void CL_InputDevice_SDLJoystick::handle_joystick_axis_move(SDL_Event& event)
{
	CL_InputEvent cl_event;
	cl_event.device = CL_InputDevice(this);
	cl_event.type = CL_InputEvent::axis_moved;
	cl_event.id = event.jaxis.axis;
	cl_event.axis_pos = event.jaxis.value / 32768.0f;
	if(event.jaxis.axis == 0) 
	{
		last_x = event.jaxis.value;
	}
	else if(event.jaxis.axis == 1) 
	{
		last_y = event.jaxis.value;
	}
	
	cl_event.device.sig_axis_move().call(cl_event);
}

void CL_InputDevice_SDLJoystick::handle_joystick_hat_move(SDL_Event&)
{
	// todo : Implement hat move
}

void CL_InputDevice_SDLJoystick::handle_joystick_ball_move(SDL_Event&)
{
	// todo : Implement ball move
}

void CL_InputDevice_SDLJoystick::handle_joystick_button(SDL_Event& event)
{
	CL_InputEvent cl_event;
	cl_event.device = CL_InputDevice(this);
	if(event.jbutton.state == SDL_PRESSED) cl_event.type = CL_InputEvent::pressed;
	if(event.jbutton.state == SDL_RELEASED) cl_event.type = CL_InputEvent::released;
	cl_event.id = event.jbutton.button;

	// not sure that this is something the user needs to know
	SDLMod mod = SDL_GetModState();
	cl_event.left_alt = (mod & KMOD_LALT) ? true : false;
	cl_event.right_alt = (mod & KMOD_RALT) ? true : false;
	cl_event.left_shift = (mod & KMOD_LSHIFT) ? true : false;
	cl_event.right_shift = (mod & KMOD_RSHIFT) ? true : false;
	cl_event.left_ctrl = (mod & KMOD_LCTRL) ? true : false;
	cl_event.right_ctrl = (mod & KMOD_RCTRL) ? true : false;

	if (cl_event.type == CL_InputEvent::pressed)
		cl_event.device.sig_key_down().call(cl_event);
	if (cl_event.type == CL_InputEvent::released)
		cl_event.device.sig_key_up().call(cl_event);
}

void CL_InputDevice_SDLJoystick::handle_joystick_event(SDL_Event& event)
{
	switch(event.type)
	{
	case SDL_JOYAXISMOTION:
		if(event.jaxis.which == my_joystick) handle_joystick_axis_move(event);
		break;

	case SDL_JOYBUTTONDOWN:
	case SDL_JOYBUTTONUP:
		if(event.jbutton.which == my_joystick) handle_joystick_button(event);
		break;

	case SDL_JOYBALLMOTION:
		if(event.jball.which == my_joystick) handle_joystick_ball_move(event);
		break;

	case SDL_JOYHATMOTION:
		if(event.jhat.which == my_joystick) handle_joystick_hat_move(event);
		break;
	}	
}
