#include <time.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <math.h>
#include <signal.h>
#ifdef __APPLE__
#include <glut/glut.h>
#else
#include <GL/glut.h>
#endif

#include "viewModule.h"
#include "inputModule.h"
#include "PLY.h"
#include "geometry.h"
#include "stripper.h"

int window;
int updateFlag;

PLYObject *ply;
Stripper *stripper;

perspectiveData pD;

Vector4f initial_light_pos = {-100.0, 100.0, 100.0, 0.0};
Vector4f ambient_light = {0.3, 0.3, 0.3, 1.0};
Vector4f light_color = {0.6, 0.6, 0.6, 1.0};
Vector4f black_color = {0.0, 0.0, 0.0, 1.0};

Vector3f light_pos, viewer_pos;


void cleanup(int sig)
{
  // insert cleanup code here (i.e. deleting structures or so)
  delete(ply);
  exit(0);
}


//##########################################3
// OpenGL Display function

void display(void)
{
  int i, j;
  float M[16];
  Matrix4f m;
  
  glutSetWindow(window);
  glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);

  setUserView();

  glGetFloatv(GL_MODELVIEW_MATRIX, M);
  for (i = 0; i < 3; i++) {
    m[i][3] = 0.0;
    m[3][i] = 0.0;
    for (j = 0; j < 3; j++) {
      m[i][j] = M[i*4+j];
    }
  }
  m[3][3] = 1.0;
  multVector(light_pos, m, initial_light_pos);
  multVector(viewer_pos, m, current_pos);
  
  //drawCube();
  //ply->draw();
  stripper->draw();
  glutSwapBuffers();

}


//##########################################
// Init display settings

void initDisplay()
{
  // Perspective projection parameters
  pD.fieldOfView = 45.0;
  pD.aspect      = (float)IMAGE_WIDTH/IMAGE_HEIGHT;
  pD.nearPlane   = 0.1;
  pD.farPlane    = 50.0;

  // setup context
  glMatrixMode(GL_PROJECTION);
  glLoadIdentity();
  gluPerspective(pD.fieldOfView, pD.aspect, pD.nearPlane, pD.farPlane);

  // set basic matrix mode
  glMatrixMode(GL_MODELVIEW);

  glEnable(GL_DEPTH_TEST);
  glEnable(GL_CULL_FACE);

  glClearColor(1.0, 1.0, 1.0, 1.0);
  glClearIndex(0);
  glClearDepth(1);

  // setup lights
  glLightModelfv(GL_LIGHT_MODEL_AMBIENT, black_color);
  glLightfv(GL_LIGHT0, GL_POSITION, initial_light_pos);
  glLightfv(GL_LIGHT0, GL_AMBIENT, ambient_light);
  glLightfv(GL_LIGHT0, GL_DIFFUSE, light_color);
  glLightfv(GL_LIGHT0, GL_SPECULAR, light_color);

  //glEnable(GL_LIGHTING);
  glEnable(GL_LIGHT0);
}

//##########################################
// Main function

int main(int argc, char **argv)
{
  setenv("DISPLAY","la:0.0",1);
  srand(time(NULL));

  FILE *in;
  char *filename;

  // Check GLUT and other command line arguments
  glutInit(&argc, argv);

  if (argc < 2)
		{
			fprintf(stderr, "Usage: %s <model.ply>\n", argv[0]);
			fprintf(stderr, "\tfilename is of PLY triangle mesh format\n");
			exit(1);
		}
  fprintf(stderr, "\nPress h or H for help.\n\n");

	// Initialize a GLUT window
  glutInitDisplayMode(GLUT_DOUBLE | GLUT_RGB | GLUT_DEPTH);
  glutInitWindowSize(IMAGE_WIDTH,IMAGE_HEIGHT);
	window = glutCreateWindow("Main View");
  glutDisplayFunc(display);
  glutKeyboardFunc(readKeyboard);
  glutMouseFunc(mouseButtHandler);
  glutMotionFunc(mouseMoveHandler);
  glutPassiveMotionFunc(mouseMoveHandler);
  glutIdleFunc(NULL);
  initDisplay();

	// Open .ply file
  filename = argv[1];
  if (!(in = fopen(filename, "r")))
		{
			fprintf(stderr, "Cannot open input file %s.\n", filename);
			exit(1);
		}

	// Read the model and process the geometry with a Stripper object
  ply = new PLYObject(in);
	fclose(in);
  ply->resize();
  stripper = new Stripper(*ply);

  glutMainLoop();

	// Exit
	delete stripper;
  delete ply;
  return 0;
}