/*
 * Copyright © 2008, Tom Arnold
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without modification, 
 * are permitted provided that the following conditions are met:
 *
 * 1. Redistributions of source code must retain the above copyright notice, this list 
 *     of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright notice, this 
 *     list of conditions and the following disclaimer in the documentation and/or other 
 *     materials provided with the distribution.
 * 3. Neither the name of the Dagger3d! Engine nor the names of its contributors 
 *     may be used to endorse or promote products derived from this software without 
 *     specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 
 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 
 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 
 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR 
 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 
 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 
 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; 
 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 
 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR 
 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF 
 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */
#include <stdlib.h>
#include <stdio.h>
#include <dagger.h>

game_ent_t* domo = NULL;
camera_t* c = NULL;

void update_scene(void)
{
	// Move the ship based upon it's speed & heading.
	phys_vel_update_pos(domo->phys_info.loc, domo->phys_info.dir, -domo->phys_info.speed, 0.001);
}

void keyboard_func(uchar* state)
{
	if (state[_KEY_ESC])
	{
		exit(0);
	}

	if (state[_KEY_W_LC])
	{
		// Toggle wireframe mode.
		wireframe_enabled = !wireframe_enabled;
	}

	if (state[_KEY_RIGHT])
	{
		matrix_t* rot = NULL;
		float yt;
		
		// Rotate the ship's heading.
		rot = matrix_vector_rotate(domo->phys_info.dir, -5.0f, _Y_AXIS);
		matrix_destr(domo->phys_info.dir);
		matrix_vector_normalize(rot);
		domo->phys_info.dir = rot;

		// Rotate the actual mesh.
		yt = point2d_get_rotation(matrix_get(domo->phys_info.dir, 0, 2), 
					  matrix_get(domo->phys_info.dir, 0, 0));
		matrix_set(domo->phys_info.rot, 0, 1, yt);
	}
	
	else if (state[_KEY_LEFT])
	{
		matrix_t* rot = NULL;
		float yt;
		
		// Rotate the ship's heading.
		rot = matrix_vector_rotate(domo->phys_info.dir, 5.0f, _Y_AXIS);
		matrix_destr(domo->phys_info.dir);
		matrix_vector_normalize(rot);
		domo->phys_info.dir = rot;

		// Rotate the actual mesh.
		yt = point2d_get_rotation(matrix_get(domo->phys_info.dir, 0, 2), 
					  matrix_get(domo->phys_info.dir, 0, 0));
		matrix_set(domo->phys_info.rot, 0, 1, yt);
	}

	else if (state[_KEY_UP])
	{
		matrix_t* rot = NULL;
		float xt;

		// Rotate the ship's heading.
		rot = matrix_vector_rotate(domo->phys_info.dir, -5.0f, _X_AXIS);
		matrix_destr(domo->phys_info.dir);
		matrix_vector_normalize(rot);
		domo->phys_info.dir = rot;

		// Rotate the actual mesh.
		xt = point2d_get_rotation(matrix_get(domo->phys_info.dir, 0, 1), 
					  matrix_get(domo->phys_info.dir, 0, 2));
		matrix_set(domo->phys_info.rot, 0, 0, xt);
	}

	else if (state[_KEY_DOWN])
	{
		matrix_t* rot = NULL;
		float xt;
		
		// Rotate the ship's heading.
		rot = matrix_vector_rotate(domo->phys_info.dir, 5.0f, _X_AXIS);
		matrix_destr(domo->phys_info.dir);
		matrix_vector_normalize(rot);
		domo->phys_info.dir = rot;

		// Rotate the actual mesh.
		xt = point2d_get_rotation(matrix_get(domo->phys_info.dir, 0, 1), 
					  matrix_get(domo->phys_info.dir, 0, 2));
		matrix_set(domo->phys_info.rot, 0, 0, xt);
	}
}

int main(int argc, char** argv)
{
	// This must be called right off the bat, for obvious reasons.
	game_engine_init(argc, argv);

	// Set up and add the mesh+entity to the scene.
	{
		dmf_mesh_t* m;
		
		// Load the entity from a file, and set some attributes.
		domo = game_entity_create("data/sabre.xml");
		domo->phys_info.speed = 10.0f;
		matrix_set(domo->phys_info.loc, 0, 2, -5.0f);
		matrix_set(domo->phys_info.loc, 0, 1, -0.25f);
		matrix_set(domo->phys_info.dir, 0, 0, 0.0f);
		matrix_set(domo->phys_info.dir, 0, 1, 0.0f);
		matrix_set(domo->phys_info.dir, 0, 2, 1.0f);
		
		// Load the mesh from a file.
		m = dmf_load_mesh("data/sabre_def.xml");

		// Add both to the world.
		dmf_queue_add(m);
		game_world_add_ent(domo);
	}
	
	// Set up and add the camera.
	{
		c = camera_create();
		camera_add(c );
		camera_set_active(0);

		matrix_set(c->dir, 0, 0, 90.0f);
		matrix_set(c->dir, 0, 1, 180.0f);
	}
	
	// Bind our keyboard and update functions.
	keyb_set_func(&keyboard_func);
	scene_set_update_func(&update_scene);

	// Start rendering.
	graphics_start();

	return EXIT_SUCCESS;
}