/*
   orxonox - the future of 3D-vertical-scrollers

   Copyright (C) 2004 orx

   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, or (at your option)
   any later version.

   ### File Specific:
   main-programmer: Benjamin Grauer
   co-programmer: ...
*/

#define DEBUG_SPECIAL_MODULE DEBUG_MODULE_IMPORTER

#include "vertex_array_model.h"

#include "stdlibincl.h"
#include <stdarg.h>

using namespace std;

/////////////
/// MODEL ///
/////////////
/**
 * @brief Creates a 3D-VertexArrayModel.
 *
 * assigns it a Name and a Type
 */
VertexArrayModel::VertexArrayModel()
{
  this->setClassID(CL_MODEL, "VertexArrayModel");

  this->bFinalized = false;
  this->newStripe();
}


/**
 * @brief deletes an VertexArrayModel.
 *
 * Looks if any from model allocated space is still in use, and if so deleted it.
 */
VertexArrayModel::~VertexArrayModel()
{
  PRINTF(4)("Deleting VertexArrayModel ");
  if (this->getName())
  {
    PRINT(4)("%s\n", this->getName());
  }
  else
  {
    PRINT(4)("\n");
  }
}


/**
 * @brief Draws the VertexArrayModels of all Groups.
 *
 * It does this by just calling the Lists that must have been created earlier.
 */
void VertexArrayModel::draw() const
{
  PRINTF(4)("drawing the 3D-VertexArrayModels\n");
  glDisable(GL_LIGHTING);

  glEnableClientState(GL_VERTEX_ARRAY );
  glEnableClientState(GL_TEXTURE_COORD_ARRAY );
  glEnableClientState(GL_NORMAL_ARRAY );
  glEnableClientState(GL_COLOR_ARRAY );


  glVertexPointer(3, GL_FLOAT, 0, &this->vertices[0]);
  glNormalPointer(GL_FLOAT, 0, &this->normals[0]);
  glTexCoordPointer(2, GL_FLOAT, 0, &this->texCoords[0]);
  glColorPointer(3, GL_FLOAT, 0, &this->colors[0]);

  for (GLuint i = 1; ++i < this->stripes.size(); ++i)
    {
      glDrawElements( GL_TRIANGLES,
                      this->stripes[i] - this->stripes[i-1],
                      GL_UNSIGNED_BYTE,
                      &this->indices[this->stripes[i-1]] );
    }
    glEnable(GL_LIGHTING);
}


//////////
// MESH //
//////////
/**
 * @brief generates a new Stripe in this Model
 */
void VertexArrayModel::newStripe()
{
  // no stripes of size 0
  if (this->stripes.empty() || this->indices.size() != this->stripes.back())
    this->stripes.push_back(this->indices.size());
}


/**
 * @brief parses a vertex-String
 * @param x the X-coordinate of the Vertex to add.
 * @param y the Y-coordinate of the Vertex to add.
 * @param z the Z-coordinate of the Vertex to add.
 */
void VertexArrayModel::addVertex(float x, float y, float z)
{
  this->vertices.push_back(x);
  this->vertices.push_back(y);
  this->vertices.push_back(z);
  this->pModelInfo.numVertices++;
}


/**
 * @brief adds a VertexNormal.
 * @param x The x coordinate of the Normal.
 * @param y The y coordinate of the Normal.
 * @param z The z coordinate of the Normal.
 *
 * If a vertexNormal line is found this function will inject it into the vertexNormal-Array
 */
void VertexArrayModel::addNormal(float x, float y, float z)
{
  this->normals.push_back(x);
  this->normals.push_back(y);
  this->normals.push_back(z);
  this->pModelInfo.numNormals++;
}


/**
 * @brief adds a Texture Coordinate
 * @param u The u coordinate of the TextureCoordinate.
 * @param v The y coordinate of the TextureCoordinate.
 *
 *  If a TextureCoordinate line is found this function will inject it into the TextureCoordinate-Array
 */
void VertexArrayModel::addTexCoor(float u, float v)
{
  this->texCoords.push_back(u);
  this->texCoords.push_back(v);
  this->pModelInfo.numTexCoor++;
}

/**
 * @brief adds a new Color
 * @param r the Red Component of the VertexColor to add.
 * @param g the Green Component of the VertexColor to add.
 * @param b the Blue of the VertexColor to add.
 */
void VertexArrayModel::addColor(float r, float g, float b)
{
  this->colors.push_back(r);
  this->colors.push_back(g);
  this->colors.push_back(b);
  // FIXME
}


/**
 *  adds a new Face
 * @param faceElemCount the number of Vertices to add to the Face.
 * @param type The information Passed with each Vertex
*/
void VertexArrayModel::addIndice(GLubyte indice)
{
  this->indices.push_back(indice);
}


/**
 * @brief Finalizes an Object. This can be done outside of the Class.
 */
void VertexArrayModel::finalize()
{
  // finalize the Arrays
  this->newStripe();

  /*
    glEnableClientState(GL_VERTEX_ARRAY |
    GL_TEXTURE_COORD_ARRAY |
    GL_NORMAL_ARRAY);
  */

  this->bFinalized = true;
}



/////////////
// TESTING //
/////////////
/**
* @brief Includes a default model
*
* This will inject a Cube, because this is the most basic model.
*/
void VertexArrayModel::planeModel()
{
  unsigned int sizeX = 20, sizeY = 20;

  unsigned int i, j;
  for (i = 0; i < sizeY; i++)
    {
      for (j = 0; j < sizeX; j++)
        {
          this->addVertex((float)i - (float)sizeY/2.0, sin((float)i/(float)sizeY*5.0)*cos((float)j/(float)sizeX*5.0)*5.0, (float)j - (float)sizeX/2.0);
          this->addNormal(0.0, 1, 0.0);
          this->addTexCoor((float)i/(float)sizeY, (float)j/(float)sizeY);
          this->addColor((float)i/20.0, 0.0, (float)j/20.0);
        }
    }

  for (i = 0; i < sizeY-1; i++)
  {
    for (j = 0; j < sizeX; j++)
    {
      this->addIndice( sizeY*i + j );
      this->addIndice( sizeY*(i+1) + j );
    }
    this->newStripe();
    this->debug();
  }
}

#include <cmath>

void VertexArrayModel::spiralSphere(const float radius, const unsigned int loops, const unsigned int segmentsPerLoop)
{
  for (unsigned int loopSegmentNumber = 0; loopSegmentNumber < segmentsPerLoop; ++loopSegmentNumber)
  {
    float theta = 0;
    float phi = loopSegmentNumber * 2 * PI / segmentsPerLoop;
    float sinTheta = std::sin(theta);
    float sinPhi = std::sin(phi);
    float cosTheta = std::cos(theta);
    float cosPhi = std::cos(phi);
    this->addVertex(radius * cosPhi * sinTheta, radius * sinPhi * sinTheta, radius * cosTheta);
    this->addNormal(1,1,1);
    this->addTexCoor(0,0);
    this->addColor(.125,.436,.246);
  }
  for (unsigned int loopNumber = 0; loopNumber <= loops; ++loopNumber)
  {
    for (unsigned int loopSegmentNumber = 0; loopSegmentNumber < segmentsPerLoop; ++loopSegmentNumber)
    {
      float theta = (loopNumber * PI / loops) + ((PI * loopSegmentNumber) / (segmentsPerLoop * loops));
      if (loopNumber == loops)
      {
        theta = PI;
      }
      float phi = loopSegmentNumber * 2 * PI / segmentsPerLoop;
      float sinTheta = std::sin(theta);
      float sinPhi = std::sin(phi);
      float cosTheta = std::cos(theta);
      float cosPhi = std::cos(phi);
      this->addVertex(radius * cosPhi * sinTheta, radius * sinPhi * sinTheta, radius * cosTheta);
      this->addNormal(1,1,1);
      this->addTexCoor(0,0);
      this->addColor(.125,.436,.246);

    }
  }
  for (unsigned int loopSegmentNumber = 0; loopSegmentNumber < segmentsPerLoop; ++loopSegmentNumber)
  {
    this->addIndice(loopSegmentNumber);
    this->addIndice(segmentsPerLoop + loopSegmentNumber);
  }
  for (unsigned int loopNumber = 0; loopNumber < loops; ++loopNumber)
  {
    for (unsigned int loopSegmentNumber = 0; loopSegmentNumber < segmentsPerLoop; ++loopSegmentNumber)
    {
      this->addIndice( ((loopNumber + 1) * segmentsPerLoop) + loopSegmentNumber);
      this->addIndice( ((loopNumber + 2) * segmentsPerLoop) + loopSegmentNumber);
    }
  }
}



void VertexArrayModel::debug() const
{
  PRINT(0)("VertexArrayModel (%s): debug\n", this->getName());
  PRINT(0)("Stripes: %d; Indices: %d; Vertices: %d; Normals %d; TextCoords %d; Colors %d\n",
            this->stripes.size(),
            this->indices.size(),
            this->vertices.size()/3,
            this->normals.size()/3,
            this->texCoords.size()/2,
            this->colors.size() )/3;
  for (GLuint i = 1; i < this->stripes.size(); ++i)
  {
    PRINT(0)("Stripe-%d ::", i);
    for (GLuint j = this->stripes[i-1] ; j < this->stripes[i]; j++)
    {
      PRINT(0)("%d->", this->indices[j]);
    }
    PRINT(0)("\n");
  }
}