/*  OnePAD - author: arcum42(@gmail.com)
 *  Copyright (C) 2009
 *
 *  Based on ZeroPAD, author zerofrog@gmail.com
 *  Copyright (C) 2006-2007
 *
 *  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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA
 */

#include "joystick.h"
#include "onepad.h"
#include "keyboard.h"

#include <string.h>
#include <gtk/gtk.h>
#include "linux.h"
#include <gdk/gdkx.h>

Display *GSdsp;
Window	GSwin;

void SysMessage(const char *fmt, ...)
{
    va_list list;
    char msg[512];

    va_start(list, fmt);
    vsprintf(msg, fmt, list);
    va_end(list);

    if (msg[strlen(msg)-1] == '\n') msg[strlen(msg)-1] = 0;

    GtkWidget *dialog;
    dialog = gtk_message_dialog_new (NULL,
                                     GTK_DIALOG_DESTROY_WITH_PARENT,
                                     GTK_MESSAGE_INFO,
                                     GTK_BUTTONS_OK,
                                     "%s", msg);
    gtk_dialog_run (GTK_DIALOG (dialog));
    gtk_widget_destroy (dialog);
}

EXPORT_C_(void) PADabout()
{
	SysMessage("OnePad is a rewrite of Zerofrog's ZeroPad, done by arcum42.");
}

EXPORT_C_(s32) PADtest()
{
	return 0;
}

s32  _PADopen(void *pDsp)
{
	GSdsp = *(Display**)pDsp;
	GSwin = (Window)*(((u32*)pDsp)+1);

    SetAutoRepeat(false);
	return 0;
}

void _PADclose()
{
	SetAutoRepeat(true);

	vector<JoystickInfo*>::iterator it = s_vjoysticks.begin();

	// Delete everything in the vector vjoysticks.
	while (it != s_vjoysticks.end())
	{
		delete *it;
		it ++;
	}

	s_vjoysticks.clear();
}

static bool used_by_keyboard = false;
EXPORT_C_(void) PADupdate(int pad)
{
	// FIXME joystick directly update the status variable
	// Keyboard does a nice roadtrip (with semaphore in the middle)
	// s_keyRelease (by UpdateKeys) -> status (by _PADupdate -> by _PADpoll)
	// If we need semaphore, joy part must be updated

	// Actually PADupdate is always call with pad == 0. So you need to update both 
	// pads -- Gregory
	for (int cpad = 0; cpad < 2; cpad++) {
		int keyPress = 0, keyRelease = 0;

		// Poll keyboard.
		PollForX11KeyboardInput(cpad, keyPress, keyRelease, used_by_keyboard);

		UpdateKeys(pad, keyPress, keyRelease);

		// joystick info
		SDL_JoystickUpdate();

		int joyid = conf->get_joyid(cpad);

		if (JoystickIdWithinBounds(joyid)) {
			for (int i = 0; i < MAX_KEYS; i++)
			{
				JoystickInfo* pjoy = s_vjoysticks[joyid];

				switch (type_of_joykey(cpad, i))
				{
					case PAD_JOYBUTTONS:
						{

							int value = SDL_JoystickGetButton((pjoy)->GetJoy(), key_to_button(cpad, i));
							if (value)
								clear_bit(status[cpad], i); // released
							else
								set_bit(status[cpad], i); // pressed

							break;
						}
					case PAD_HAT:
						{
							int value = SDL_JoystickGetHat((pjoy)->GetJoy(), key_to_axis(cpad, i));

							if (key_to_hat_dir(cpad, i) == value)
								clear_bit(status[cpad], i);
							else
								set_bit(status[cpad], i);

							break;
						}
					case PAD_AXIS:
						{
							int value = pjoy->GetAxisFromKey(cpad, i);
							bool sign = key_to_axis_sign(cpad, i);
							bool full_axis = key_to_axis_type(cpad, i);

							if (IsAnalogKey(i)) {
								if (abs(value) > (pjoy)->GetDeadzone())
									Analog::ConfigurePad(cpad, i, value);
								else if (! (conf->options & ((PADOPTION_MOUSE_R|PADOPTION_MOUSE_L) << 16 * cpad ))
										&& !(used_by_keyboard) )
									// There is a conflict between keyboard/mouse and joystick configuration.
									// Do nothing when either the mouse or the keyboad is pressed/enabled.
									// It avoid to be stuck in reset mode --Gregory
									Analog::ResetPad(cpad, i);

							} else {
								if (full_axis) {
									value += 0x8000;
									if (value > 2048) {
										clear_bit(status[cpad], i);
										status_pressure[cpad][i] = min(value/256 , 0xFF); // Max pressure is 255
									} else {
										set_bit(status[cpad], i);
										status_pressure[cpad][i] = 0; // no pressure
									}
								} else {
									if (sign && (value < -2048)) {
										clear_bit(status[cpad], i);
										status_pressure[cpad][i] = min(-value /128, 0xFF); // Max pressure is 255
									} else if (!sign && (value > 2048)) {
										clear_bit(status[cpad], i);
										status_pressure[cpad][i] = min(value /128, 0xFF); // Max pressure is 255
									} else {
										set_bit(status[cpad], i);
										status_pressure[cpad][i] = 0; // no pressure
									}
								}
							}
						}
					default: break;
				}
			}
		}
	}
}

EXPORT_C_(void) PADconfigure()
{
	LoadConfig();

	DisplayDialog();
	return;
}