/* Auteur: Nicolas JANEY            */
/* nicolas.janey@univ-fcomte.fr     */
/* Avril 2001                       */
/* Modelisation OpenGL d'une scene  */
/* composee d'un bras robot         */

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

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

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

static int type = 0 ;
static int maille = 0 ;
static float r1 = -100.0 ;
static float r2 = 40.0 ;
static float r3 = 75.0 ;
static float ouv = 0.0 ;

void myinit(void) {
  GLfloat light_position0[] = { 0.0F,0.0F,1.0F,0.0F };
  GLfloat light_position1[] = { 0.0F,0.0F,1.0F,0.0F };
  glLightfv(GL_LIGHT0,GL_AMBIENT,couleurNoir());
  glLightfv(GL_LIGHT0,GL_DIFFUSE,couleurBlanc());
  glLightfv(GL_LIGHT1,GL_DIFFUSE,couleurBlanc());
  glLightfv(GL_LIGHT0,GL_SPECULAR,couleurNoir());
  glLightfv(GL_LIGHT0,GL_POSITION,light_position0);
  glLightfv(GL_LIGHT1,GL_POSITION,light_position1);
  glEnable(GL_LIGHT0);
  glEnable(GL_LIGHT1);
  glEnable(GL_AUTO_NORMAL);
  glDepthFunc(GL_LESS);
  glClearAccum(0.0,0.0,0.0,0.0);
  setManipulateurClavierAngle(16.0F,20.0F,0.0F);
}

void axes() {
  glPushMatrix() ;
  glColor4fv(couleurJaune()) ;
  glBegin(GL_LINES) ;
  glVertex3f(0.0F,0.0F,0.0F) ;
  glVertex3f(1.0F,0.0F,0.0F) ;
  glEnd() ;
  placeFontCursor(1.05F,0.05F,0.05F);
  simpleBitmapOutput("x");
  glColor4fv(couleurCyan()) ;
  glBegin(GL_LINES) ;
  glVertex3f(0.0F,0.0F,0.0F) ;
  glVertex3f(0.0F,1.0F,0.0F) ;
  glEnd() ;
  placeFontCursor(0.05F,1.05F,0.05F);
  simpleBitmapOutput("y");
  glColor4fv(couleurMagenta()) ;
  glBegin(GL_LINES) ;
  glVertex3f(0.0F,0.0F,0.0F) ;
  glVertex3f(0.0F,0.0F,1.0F) ;
  glEnd() ;
  placeFontCursor(0.05F,0.05F,1.05F);
  simpleBitmapOutput("z");
  if ( maille ) {
    glColor4fv(couleurGrisMoyen()) ;
    for ( int i = -100 ; i < 100 ; i++ ) {
      glBegin(GL_LINES) ;
      glVertex3f((float) i,0.0F,200.0F) ;
      glVertex3f((float) i,0.0F,-200.0F) ;
      glEnd() ;
      glBegin(GL_LINES) ;
      glVertex3f(200.0F,0.0F,(float) i) ;
      glVertex3f(-200.0F,0.0F,(float) i) ;
      glEnd() ; } }
  glPopMatrix() ;
}

void displayCotes(void) {
  glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
  glPushMatrix();
  manipulateurSouris();
  manipulateurClavier();
  glPushMatrix();
  glPushMatrix();
  glRotatef(r1,0.0F,1.0F,0.0F) ;
  glTranslatef(1.5F,0.0F,0.0F) ;
  glColor4fv(couleurRouge()) ;
  glPushMatrix();
  glScalef(3.0F,1.0F,1.0F) ;
  glutWireCube(1.0) ;
  glPopMatrix();
  glTranslatef(1.5F,0.0F,0.0F) ;
  glRotatef(r2,0.0F,1.0F,0.0F) ;
  glTranslatef(1.5F,0.0F,0.0F) ;
  glColor4fv(couleurVert()) ;
  glPushMatrix();
  glScalef(3.0F,0.8F,0.8F) ;
  glutWireCube(1.0) ;
  glPopMatrix();
  glTranslatef(1.8F,0.0F,0.0F) ;
  glRotatef(r3,1.0F,0.0F,0.0F) ;
  glColor4fv(couleurBleu()) ;
  glPushMatrix();
  glScalef(0.6F,1.2F,1.8F) ;
  glutWireCube(1.0) ;
  glPopMatrix();
  glTranslatef(0.8F,0.0F,0.0F) ;
  glPushMatrix();
  glTranslatef(0.0F,0.0F,ouv+0.2F) ;
  glColor4fv(couleurJaune()) ;
  glPushMatrix();
  glScalef(1.0F,1.2F,0.4F) ;
  glutWireCube(1.0) ;
  glPopMatrix();
  glPopMatrix();
  glPushMatrix();
  glTranslatef(0.0F,0.0F,-ouv-0.2F) ;
  glColor4fv(couleurJaune()) ;
  glPushMatrix();
  glScalef(1.0F,1.2F,0.4F) ;
  glutWireCube(1.0) ;
  glPopMatrix();
  glPopMatrix();
  glPopMatrix();
  axes() ;
  glPopMatrix();
  glDisable(GL_DEPTH_TEST);
  glPopMatrix();
  glAccum(GL_ACCUM,0.6F);
}

void displayCubes(void) {
  glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
  glPushMatrix();
  manipulateurSouris();
  manipulateurClavier();
  glEnable(GL_LIGHTING);
  glEnable(GL_DEPTH_TEST);
  glPushMatrix();
  glRotatef(r1,0.0F,1.0F,0.0F) ;
  glTranslatef(1.5F,0.0F,0.0F) ;
  glMaterialfv(GL_FRONT,GL_DIFFUSE,couleurRouge(0.5F)) ;
  glPushMatrix();
  glScalef(3.0F,1.0F,1.0F) ;
  glutSolidCube(1.0) ;
  glPopMatrix();
  glTranslatef(1.5F,0.0F,0.0F) ;
  glRotatef(r2,0.0F,1.0F,0.0F) ;
  glTranslatef(1.5F,0.0F,0.0F) ;
  glMaterialfv(GL_FRONT,GL_DIFFUSE,couleurVert(0.5F)) ;
  glPushMatrix();
  glScalef(3.0F,0.8F,0.8F) ;
  glutSolidCube(1.0) ;
  glPopMatrix();
  glTranslatef(1.8F,0.0F,0.0F) ;
  glRotatef(r3,1.0F,0.0F,0.0F) ;
  glMaterialfv(GL_FRONT,GL_DIFFUSE,couleurBleu(0.5F)) ;
  glPushMatrix();
  glScalef(0.6F,1.2F,1.8F) ;
  glutSolidCube(1.0) ;
  glPopMatrix();
  glTranslatef(0.8F,0.0F,0.0F) ;
  glPushMatrix();
  glTranslatef(0.0F,0.0F,ouv+0.2F) ;
  glMaterialfv(GL_FRONT,GL_DIFFUSE,couleurJaune(0.5F)) ;
  glPushMatrix();
  glScalef(1.0F,1.2F,0.4F) ;
  glutSolidCube(1.0) ;
  glPopMatrix();
  glPopMatrix();
  glPushMatrix();
  glTranslatef(0.0F,0.0F,-ouv-0.2F) ;
  glMaterialfv(GL_FRONT,GL_DIFFUSE,couleurJaune(0.5F)) ;
  glPushMatrix();
  glScalef(1.0F,1.2F,0.4F) ;
  glutSolidCube(1.0) ;
  glPopMatrix();
  glPopMatrix();
  glPopMatrix();
  glDisable(GL_LIGHTING);
  glPopMatrix();
  glAccum(GL_ACCUM,0.4F);
}

void display(void) {
  glClear(GL_ACCUM_BUFFER_BIT);
  glPushMatrix() ;
  displayCubes() ;
  displayCotes() ;
  glAccum(GL_RETURN,1.0);
  glPopMatrix() ;
  glFlush();
  glutSwapBuffers();
}

void key(unsigned char key,int x,int y) {
  if ( keyManipulateur(key,x,y) )
    glutPostRedisplay();
    else
    switch ( key ) {
      case '1'  : r1 += 4 ; 
                  glutPostRedisplay();
                  break;
      case '7'  : r1 -= 4 ; 
                  glutPostRedisplay();
                  break;
      case '2'  : r2 += 4 ; 
                  glutPostRedisplay();
                  break;
      case '8'  : r2 -= 4 ; 
                  glutPostRedisplay();
                  break;
      case '3'  : r3 += 4 ; 
                  glutPostRedisplay();
                  break;
      case '9'  : r3 -= 4 ; 
                  glutPostRedisplay();
                  break;
      case 43   : ouv += 0.02F ;
                  if ( ouv > 0.5 )
                    ouv = 0.5 ;
                  glutPostRedisplay();
                  break;
      case 45   : ouv -= 0.02F ;
                  if ( ouv < 0.0 )
                    ouv = 0.0 ;
                  glutPostRedisplay();
                  break;
      case 0x0D : type = (type+1)%5 ;
                  glutPostRedisplay();
                  break;
      case 32   : maille = 1 - maille ;
                  glutPostRedisplay();
                  break; }
}

int main(int argc,char **argv) {
  glutInit(&argc,argv);
  glutInitDisplayMode(GLUT_RGBA|GLUT_DEPTH|GLUT_DOUBLE|GLUT_ACCUM);
  glutInitWindowSize(380,270); 
  glutInitWindowPosition(50,50); 
  glutCreateWindow("Mini-langage"); 
  myinit(); 
  creationMenuBasique();
  setParametresOrthoBasique(-5.0,5.0,-5.0,5.0,-500.0,500.0);
  setManipulateurDistance(1.0F);
  glutReshapeFunc(reshapeOrthoBasique);
  glutKeyboardFunc(key);
  glutSpecialFunc(specialBasique);
  glutMotionFunc(motionBasique);
  glutMouseFunc(sourisBasique);
  glutDisplayFunc(display);
  glutMainLoop();
  return(0);
}