/****************************************************************************
 Copyright (c) 2011      cocos2d-x.org   http://cocos2d-x.org
 Copyright (c) 2012      Rocco Loscalzo (Wartortle)
 
 Permission is hereby granted, free of charge, to any person obtaining a copy
 of this software and associated documentation files (the "Software"), to deal
 in the Software without restriction, including without limitation the rights
 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 copies of the Software, and to permit persons to whom the Software is
 furnished to do so, subject to the following conditions:
 
 The above copyright notice and this permission notice shall be included in
 all copies or substantial portions of the Software.
 
 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 THE SOFTWARE.
 ****************************************************************************/

#include "CCAccelerometer_win32.h"
#include "CCEGLView_win32.h"
#include "CCDirector.h"
#include "ccMacros.h"

namespace
{

	double			g_accelX=0.0;
	double			g_accelY=0.0;
	double			g_accelZ=0.0;
	const double	g_accelerationStep=0.2f;
	const double	g_minAcceleration=-1.0f;
	const double	g_maxAcceleration=1.0f;

	template <class T>
	T CLAMP( const T val,const T minVal,const T maxVal )
	{
		CC_ASSERT( minVal<=maxVal );
		T	result=val;
		if ( result<minVal )
			result=minVal;
		else if ( result>maxVal )
			result=maxVal;

		CC_ASSERT( minVal<=result && result<=maxVal );
		return result;
	}

	bool handleKeyDown( WPARAM wParam )
	{
		bool	sendUpdate=false;
		switch( wParam )
		{
		case VK_LEFT:
			sendUpdate=true;
			g_accelX=CLAMP( g_accelX-g_accelerationStep,g_minAcceleration,g_maxAcceleration );
			break;
		case VK_RIGHT:
			sendUpdate=true;
			g_accelX=CLAMP( g_accelX+g_accelerationStep,g_minAcceleration,g_maxAcceleration );
			break;
		case VK_UP:
			sendUpdate=true;
			g_accelY=CLAMP( g_accelY+g_accelerationStep,g_minAcceleration,g_maxAcceleration );
			break;
		case VK_DOWN:
			sendUpdate=true;
			g_accelY=CLAMP( g_accelY-g_accelerationStep,g_minAcceleration,g_maxAcceleration );
			break;
		case VK_OEM_COMMA:
			sendUpdate=true;
			g_accelZ=CLAMP( g_accelZ+g_accelerationStep,g_minAcceleration,g_maxAcceleration );
			break;
		case VK_OEM_PERIOD:
			sendUpdate=true;
			g_accelZ=CLAMP( g_accelZ-g_accelerationStep,g_minAcceleration,g_maxAcceleration );
			break;
		}
		return sendUpdate;
	}

	bool handleKeyUp( WPARAM wParam )
	{
		bool	sendUpdate=false;
		switch( wParam )
		{
		case VK_LEFT:
		case VK_RIGHT:
			sendUpdate=true;
			g_accelX=0.0;
			break;
		case VK_UP:
		case VK_DOWN:
			sendUpdate=true;
			g_accelY=0.0;
			break;
		case VK_OEM_COMMA:
		case VK_OEM_PERIOD:
			sendUpdate=true;
			g_accelZ=0.0;
			break;
		}
		return sendUpdate;
	}

	void myAccelerometerKeyHook( UINT message,WPARAM wParam,LPARAM lParam )
	{
		cocos2d::CCAccelerometer	*pAccelerometer = cocos2d::CCDirector::sharedDirector()->getAccelerometer();
		bool						sendUpdate=false;
		switch( message )
		{
		case WM_KEYDOWN:
			sendUpdate=handleKeyDown( wParam );
			break;
		case WM_KEYUP:
			sendUpdate=handleKeyUp( wParam );
			break;
		case WM_CHAR:
			// Deliberately empty - all handled through key up and down events
			break;
		default:
			// Not expected to get here!!
			CC_ASSERT( false );
			break;
		}

		if ( sendUpdate )
		{
			const time_t	theTime=time(NULL);
			const double	timestamp=(double)theTime / 100.0;
			pAccelerometer->update( g_accelX,g_accelY,g_accelZ,timestamp );
		}
	}

	void resetAccelerometer()
	{
		g_accelX=0.0;
		g_accelY=0.0;
		g_accelZ=0.0;
	}

}

namespace cocos2d
{

CCAccelerometer::CCAccelerometer() : 
	m_pAccelDelegate(NULL)
{
    memset(&m_obAccelerationValue, 0, sizeof(m_obAccelerationValue));
}

CCAccelerometer::~CCAccelerometer() 
{

}

void CCAccelerometer::setDelegate(CCAccelerometerDelegate* pDelegate) 
{
	m_pAccelDelegate = pDelegate;

	// Enable/disable the accelerometer.
	// Well, there isn't one on Win32 so we don't do anything other than register
	// and deregister ourselves from the Windows Key handler.
	if (pDelegate)
	{
		// Register our handler
		CCEGLView::sharedOpenGLView().setAccelerometerKeyHook( &myAccelerometerKeyHook );
	}
	else
	{
		// De-register our handler
		CCEGLView::sharedOpenGLView().setAccelerometerKeyHook( NULL );
		resetAccelerometer();
	}
}

void CCAccelerometer::update( double x,double y,double z,double timestamp ) 
{
	if (m_pAccelDelegate)
	{
		m_obAccelerationValue.x			= x;
		m_obAccelerationValue.y			= y;
		m_obAccelerationValue.z			= z;
		m_obAccelerationValue.timestamp = timestamp;

		// Handle orientation changes
		CCDirector					*pDirector=CCDirector::sharedDirector();
		const ccDeviceOrientation	orientation=pDirector->getDeviceOrientation();
		const double				tmp=m_obAccelerationValue.x;
		switch ( orientation ) 
		{
		case kCCDeviceOrientationLandscapeRight:
			m_obAccelerationValue.x = -m_obAccelerationValue.y;
			m_obAccelerationValue.y = tmp;
			break;

		case kCCDeviceOrientationLandscapeLeft:
			m_obAccelerationValue.x = m_obAccelerationValue.y;
			m_obAccelerationValue.y = -tmp;
			break;

		case kCCDeviceOrientationPortraitUpsideDown:
			m_obAccelerationValue.x = -m_obAccelerationValue.y;
			m_obAccelerationValue.y = -tmp;
			break;

		case kCCDeviceOrientationPortrait:
			break;
		}

		// Delegate
		m_pAccelDelegate->didAccelerate(&m_obAccelerationValue);
	}	
}

} // end of namespace cococs2d