//withMouse2
//  mouse operation for object motion
// T. Kosaka CS TNCT 16Aug2002

#include <stdio.h>
#include <math.h>
#include <GL/glut.h>
#include "GLDrawingtool3D.h"
#ifndef M_PI
#define M_PI 3.141592653589793
#endif

GLfloat light0pos[] = { 500.0, 500.0, 1500.0, 0.0 }; // x,y,z,d
GLfloat White[] = { 1.0, 1.0, 1.0, 1.0 }; // R,G,B,A
GLfloat Black[] = { 0.0, 0.0, 0.0, 1.0 }; // R,G,B,A
GLfloat Brown[] = { 0.3, 0.25, 0.0, 1.0 }; // R,G,B,A
GLfloat Gray[] = { 0.4, 0.4, 0.4, 1.0 }; // R,G,B,A
GLfloat CupColor[] = { 0.7, 0.7, 0.9, 1.0 }; // R,G,B,A
GLfloat TeapotColor[] = { 0.7, 0.7, 0.4, 1.0 }; // R,G,B,A
GLfloat TableColor[] = { 0.5, 0.4, 0.0, 1.0 }; // R,G,B,A
GLfloat Red[] = { 1.0, 0.0, 0.0, 1.0 }; // R,G,B,A
GLfloat Shine[] = { 100.0}; //0.0(large highlight) ... 128.0(small highlight)

void userdraw(void);

void display(void)
{
    glClear( GL_COLOR_BUFFER_BIT);
    glClear(GL_DEPTH_BUFFER_BIT); // depth check
    userdraw();
    glutSwapBuffers();
}

//////////////////////////////////////////////////////////////////
point3D_t p0,p1;
int active=0; // 0:nothing 1:press 2:draging 3:release

void onMouseButton(int button, int state, int x_got, int y_got)
{
    if (button==GLUT_LEFT_BUTTON) {
        if (state==GLUT_DOWN) {
            p0.x=x_got-320; // device coordinate -> view coordinate
            p0.y=240-y_got-1; // device coordinate -> view coordinate
            if (p0.x!=0 || p0.y!=0) {
                active=1;
            }
        } else {
            active=3;
        }
    }
}

void onDrag(int x_got, int y_got)
{
    p1.x=x_got-320; // device coordinate -> view coordinate
    p1.y=240-y_got-1; // device coordinate -> view coordinate
    active=2;
}

//////////////////////////////////////////////////////////////////
void myInitView(void)
{
    static float leyetmp=700.0;
    static float leye;
    static float rottmp=0.5;//rot[rad]
    static float rot;
    float alpha;
    if (active==2) {
        leye=leyetmp-(p1.y-p0.y);
        rot=rottmp-0.01*(p1.x-p0.x);
        if (1300.<leye) leye=1300.;
        if (leye<301.0) leye=301.;
    } else if (active==3) {
        leyetmp=leye;
        rottmp=rot;
        active=0;
    } else {
        leye=leyetmp;
        rot=rottmp;
    }
    alpha=atan(700.*tan(40*M_PI/180.)/leye)*180./M_PI;
    if (alpha<40.) alpha=40.;

    glEnable(GL_LIGHTING);
    glEnable(GL_LIGHT0);
    glLightfv(GL_LIGHT0, GL_AMBIENT, White);
    glLightfv(GL_LIGHT0, GL_DIFFUSE, White);
    glLightfv(GL_LIGHT0, GL_SPECULAR, White);

    //To set perspective view
    glMatrixMode(GL_PROJECTION);
    glLoadIdentity();
    gluPerspective(alpha, 640. / 480., 1.0, 2500.0);
    glMatrixMode(GL_MODELVIEW);
    glEnable(GL_NORMALIZE); // normarize normal vectors
    glLoadIdentity();
    glLightfv(GL_LIGHT0, GL_POSITION, light0pos); //definition of light position must be here

    float dip=0.7;
    float ly,lxz,lx,lz;
    ly=leye*sin(dip); lxz=leye*cos(dip);
    lx=lxz*sin(rot); lz=lxz*cos(rot);
    gluLookAt(lx,ly,lz, 0.0, 0.0, 0.0, 0.0, 1.0, 0.0);

    glMaterialfv(GL_FRONT, GL_AMBIENT, White); // Attribute of the Axes
    drawAxes();
}

//////////////////////////////////////////////////////////////////
void userdraw(void)
{
    myInitView();
    glMaterialfv(GL_FRONT, GL_SHININESS, Shine);
    glShadeModel(GL_SMOOTH);

    // table board
    glEnable(GL_CULL_FACE); // Cull back face
    glCullFace(GL_BACK);    // Cull back face
    glMaterialfv(GL_FRONT, GL_AMBIENT, Brown);
    glMaterialfv(GL_FRONT, GL_DIFFUSE, TableColor);
    glMaterialfv(GL_FRONT, GL_SPECULAR, Black);
    glPushMatrix();
    glTranslatef(0,100,0);
    glScalef(280,10,280);
    glutSolidCube(1);
    glPopMatrix();

    // table leg 1
    glEnable(GL_CULL_FACE); // Cull back face
    glCullFace(GL_BACK);    // Cull back face
    glMaterialfv(GL_FRONT, GL_AMBIENT, Brown);
    glMaterialfv(GL_FRONT, GL_DIFFUSE, TableColor);
    glMaterialfv(GL_FRONT, GL_SPECULAR, Black);
    glPushMatrix();
    glTranslatef(110,0,110);
    glScalef(20,200,20);
    glutSolidCube(1);
    glPopMatrix();

    // table leg 2
    glEnable(GL_CULL_FACE); // Cull back face
    glCullFace(GL_BACK);    // Cull back face
    glMaterialfv(GL_FRONT, GL_DIFFUSE, TableColor);
    glMaterialfv(GL_FRONT, GL_SPECULAR, Black);
    glPushMatrix();
    glTranslatef(110,0,-110);
    glScalef(20,200,20);
    glutSolidCube(1);
    glPopMatrix();

    // table leg 3
    glEnable(GL_CULL_FACE); // Cull back face
    glCullFace(GL_BACK);    // Cull back face
    glMaterialfv(GL_FRONT, GL_DIFFUSE, TableColor);
    glMaterialfv(GL_FRONT, GL_SPECULAR, Black);
    glPushMatrix();
    glTranslatef(-110,0,-110);
    glScalef(20,200,20);
    glutSolidCube(1);
    glPopMatrix();

    // table leg 4
    glEnable(GL_CULL_FACE); // Cull back face
    glCullFace(GL_BACK);    // Cull back face
    glMaterialfv(GL_FRONT, GL_DIFFUSE, TableColor);
    glMaterialfv(GL_FRONT, GL_SPECULAR, Black);
    glPushMatrix();
    glTranslatef(-110,0,110);
    glScalef(20,200,20);
    glutSolidCube(1);
    glPopMatrix();

    // Teapot
    glDisable(GL_CULL_FACE); // Cull back face
    glMaterialfv(GL_FRONT, GL_AMBIENT, Gray);
    glMaterialfv(GL_FRONT, GL_DIFFUSE, TeapotColor);
    glMaterialfv(GL_FRONT, GL_SPECULAR, White);
    glPushMatrix();
    glTranslatef(60,135,60);
    glRotatef(120,0,1,0);
    glutSolidTeapot(40);
    glPopMatrix();

    // cup 1
    glDisable(GL_CULL_FACE); // Cull back face
    glMaterialfv(GL_FRONT, GL_AMBIENT, Gray);
    glMaterialfv(GL_FRONT, GL_DIFFUSE, CupColor);
    glMaterialfv(GL_FRONT, GL_SPECULAR, White);
    glPushMatrix();
    glTranslatef(-60,100,0);
    glRotatef(-90,1,0,0);
    {
        GLUquadricObj *qobj=gluNewQuadric();
        gluQuadricDrawStyle(qobj,GLU_FILL);
        gluCylinder(qobj,20,30,50,20,10);
    }
    glPopMatrix();

    // cup 2
    glDisable(GL_CULL_FACE); // Cull back face
    glMaterialfv(GL_FRONT, GL_AMBIENT, Gray);
    glMaterialfv(GL_FRONT, GL_DIFFUSE, CupColor);
    glMaterialfv(GL_FRONT, GL_SPECULAR, White);
    glPushMatrix();
    glTranslatef(0,100,-30);
    glRotatef(-90,1,0,0);
    {
        GLUquadricObj *qobj=gluNewQuadric();
        gluQuadricDrawStyle(qobj,GLU_FILL);
        gluCylinder(qobj,20,30,50,20,10);
    }
    glPopMatrix();
}

int main(int argc, char **argv)
{
    glutInit(&argc,argv);
    glutInitDisplayMode ( GLUT_DOUBLE | GLUT_RGB | GLUT_DEPTH); // depth check
    glutInitWindowPosition(100,100);
    glutInitWindowSize(640,480);
    glutCreateWindow ("withMouse2  !!! Drag on the screen and the object will turn round. !!!");
    glClearColor(0.0, 0.0, 0.0, 0.0);
    glViewport(0,0,640,480);               
    glutIdleFunc(display); // idle event call back
    glutDisplayFunc(display);
    glEnable(GL_DEPTH_TEST); // depth check (OpenGL inner Z-Buffer)
    glutMouseFunc(onMouseButton);   // mouse button event call back
    glutMotionFunc(onDrag); // mouse drag event call back
    glutMainLoop();
    return 0;
}