/* Auteur: Nicolas JANEY          */
/* nicolas.janey@univ-fcomte.fr   */
/* Avril 2003                     */
/* Un carre constitue de spheres  */

#include <GL/glut.h>
#include <GL/gl.h>
#include <GL/glu.h>

#include <math.h>
#include <stdio.h>
#include <stdlib.h>

#include "ModuleManipulateur.h"
#include "ModuleMenus.h"
#include "ModuleReshape.h"

static int n = 5;
static float c = 12.0F;
static float coul[3][4] = { { 1.0F,1.0F,0.0F,1.0F },
                            { 0.0F,0.0F,1.0F,1.0F },
                            { 0.0F,1.0F,0.0F,1.0F } };
static float init = 0.0F;
static float d = 0.05F;
  
void myinit(void) { 
  glClearColor(0.8F,0.8F,0.8F,0.0);
  glEnable(GL_DEPTH_TEST); 
  glEnable(GL_LIGHTING); 
  glEnable(GL_LIGHT0); 
  glDepthFunc(GL_LESS); 
  glShadeModel(GL_SMOOTH); 
  glEnable(GL_AUTO_NORMAL);
  glEnable(GL_NORMALIZE);
} 

void scene(int n,float c) {
  float depl = (4*c)/(n*3);
  glPushMatrix();
  glTranslatef(-c/2,c/2,0.0F);
  float dist = init;
  while ( dist > c ) {
    glTranslatef(c,0.0F,0.0F);
    glRotatef(-90.0F,0.0F,0.0F,1.0F);
    dist -= c; }
  glTranslatef(dist,0.0F,0.0F);
  for ( int i = 0 ; i < n*3 ; i++ ) {
    glMaterialfv(GL_FRONT,GL_AMBIENT_AND_DIFFUSE,coul[i%3]);
    glutSolidSphere(1.0,36,36);
    dist += depl;
    if ( dist > c ) {
      glTranslatef(depl-dist+c,0.0F,0.0F);
      glRotatef(-90.0F,0.0F,0.0F,1.0F);
      dist -= c ;
      glTranslatef(dist,0.0F,0.0F); }
    else      
    glTranslatef(depl,0.0F,0.0F); }
  glPopMatrix();
}

void display(void) { 
  glClear(GL_COLOR_BUFFER_BIT|GL_DEPTH_BUFFER_BIT); 
  glPushMatrix();
  manipulateurSouris();
  manipulateurClavier();
  glBegin(GL_LINE_LOOP);
  glVertex2f(-c/2,-c/2);
  glVertex2f(c/2,-c/2);
  glVertex2f(c/2,c/2);
  glVertex2f(-c/2,c/2);
  glEnd();
  scene(n,c);
  glPopMatrix();
  glFlush(); 
  glutSwapBuffers();
} 
  
void idle(void) {
  init += d;
  glutPostRedisplay();
}

void key(unsigned char key,int x,int y) {
  if ( keyManipulateur(key,x,y) )
    glutPostRedisplay();
    else
    switch ( key ) {
      case 'c'    : c *= 1.01F;
                    glutPostRedisplay();
                    break;
      case 'C'    : c /= 1.01F;
                    glutPostRedisplay();
                    break;
      case 'd'    : d *= 1.01F;
                    glutPostRedisplay();
                    break;
      case 'D'    : d /= 1.01F;
                    glutPostRedisplay();
                    break;
      case  45    : n--;
                    if ( n < 1 )
                      n = 1;
                    glutPostRedisplay();
                    break;
      case  43    : n++;
                    glutPostRedisplay();
                    break; }
}

int main(int argc,char **argv) {
  glutInit(&argc,argv);
  glutInitDisplayMode(GLUT_RGBA|GLUT_DEPTH|GLUT_DOUBLE);
  glutInitWindowSize(300,250); 
  glutInitWindowPosition(50,50); 
  glutCreateWindow("Un carré de sphères"); 
  myinit(); 
  creationMenuBasique();
  setParametresOrthoBasique(-10.0F,10.0F,-10.0F,10.0F,-10.0F,10.0F);
  setManipulateurDistance(1.0F);
  glutReshapeFunc(reshapeOrthoBasique);
  glutKeyboardFunc(key);
  glutSpecialFunc(specialBasique);
  glutMotionFunc(motionBasique);
  glutMouseFunc(sourisBasique);
  glutIdleFunc(idle);
  glutDisplayFunc(display);
  glutMainLoop();
  return(0);
}