#include <windows.h>
#include <GL/gl.h>
#include <GL/glaux.h>
#include <GL/glu.h>
#include <math.h>
#include <float.h>
#include "map.h"

#define DIVISION_NUM 36

void CALLBACK myReshape(GLsizei w,GLsizei h);
void CALLBACK myDisplay(void);

float sphere[DIVISION_NUM][DIVISION_NUM][3];

void initsphere(float rad,int nlat,int nlong,float point[][DIVISION_NUM][3])
{
   int i,j;
   double pi=3.1415926,inclat,heigh,dval,magnitude;

   for(i=0;i<nlat;i++)
   { 
     inclat=pi/(nlat-1)*i-pi/2.;
	 magnitude=cos(inclat)*rad;
	 heigh=sin(inclat)*rad;
	 for(j=0;j<nlong+1;j++)
	    { 
	      point[i][j][1]=(float)heigh;
	      dval=cos(2.*pi*j/nlong)*magnitude;
	      point[i][j][0]=(float)dval;
	      dval=sin(2.*pi*j/nlong)*magnitude;
	      point[i][j][2]=(float)dval;
	     }
	}
}

void fillsphere(int nlat,int nlong,float point[][DIVISION_NUM][3])
{
   int i,j;

   for(i=0;i<nlat;i++) {
      glBegin(GL_QUAD_STRIP);
      for(j=0;j<nlong+1;j++)
      {  
           glColor3ub(35,35,(unsigned char)(35+6*(i+1)));
		   glVertex3fv(point[i+1][j]);
           glColor3ub(35,35,(unsigned char)(35+6*(i+0)));
		   glVertex3fv(point[i][j]);
      }   //    end j
	  glEnd();
    }       //   end i
}

void draw_sat(float Omig,float omig,float a,float i)
{
    glPushMatrix();
       glRotatef(Omig,0.0,1.0,0.0);
       glRotatef(i,1.0,0.0,0.0);
       glRotatef(omig,0.0,1.0,0.0);
	   glTranslatef(a,0.,0.);
       glRotatef(90,0.0,0.0,1.0);
	   glScalef(.1f,.1f,.1f);
	   glColor3f(0.5f,0.5f,0.0f);
  	   auxSolidCube(1.0);
	   glColor3f(0.f,0.f,1.0f);
	   auxSolidBox(4.0,0.1,0.9);
    glPopMatrix();
}

void draw_orbit(float Omig,float omig,float a,float i)
{
	int j,seg_num=36;
	float PI=3.1415926f;

    glPushMatrix();
       glRotatef(Omig,0.0,1.0,0.0);
       glRotatef(i,1.0,0.0,0.0);
	   glScalef(a,a,a);
	   glBegin(GL_LINE_LOOP);
	      for(j=0;j<seg_num;j++)
		     glVertex3d(cos(j*2*PI/seg_num),0,sin(j*2*PI/seg_num));
	   glEnd();
    glPopMatrix();
}

void drawmap(void) 
{
	int i;

	glColor3f(.0,.5,1.);
    glBegin(GL_LINE_LOOP);
       for(i=0;i<45;i++)
		   glVertex3fv(mape1[i]);
	glEnd();

	glColor3f(1.0,0.,1.);
    glBegin(GL_LINE_LOOP);
       for(i=0;i<32;i++)
		   glVertex3fv(mape2[i]);
	glEnd();

	glColor3f(.0,1.,1.);
    glBegin(GL_LINE_LOOP);
       for(i=0;i<12;i++)
		   glVertex3fv(mape3[i]);
	glEnd();

	glColor3f(1.0,1.,0.);
    glBegin(GL_LINE_LOOP);
       for(i=0;i<54;i++)
		   glVertex3fv(mape4[i]);
	glEnd();

	glColor3f(1.0,.5,1.);
    glBegin(GL_LINE_LOOP);
       for(i=0;i<73;i++)
		   glVertex3fv(mape5[i]);
	glEnd();

	glColor3f(.5f,0.7f,1.f);
    glBegin(GL_LINE_STRIP);
       for(i=0;i<168;i++)
		   glVertex3fv(mape6[i]);
	glEnd();

	glColor3f(1.0,0.,0.);
    glBegin(GL_LINE_LOOP);
       for(i=0;i<124;i++)
		   glVertex3fv(mape7[i]);
	glEnd();
}

void CALLBACK myReshape(GLsizei w,GLsizei h)
{
    if (!h) return;
	glViewport(0,0,w,h);
    glMatrixMode(GL_PROJECTION);
    glLoadIdentity();
    gluPerspective(60.0, (GLfloat) w/(GLfloat) h, .1, 100.0);
    glMatrixMode(GL_MODELVIEW);
    glLoadIdentity();
    gluLookAt(4.0,0.0,-3.0,0.0,0.0,0.0,0.0,1.0,0.0);
}

void myInit()
{
    auxInitDisplayMode (AUX_SINGLE | AUX_RGB);
    auxInitPosition (0, 0, 500, 500);
    auxInitWindow ("earth");
	glClearColor(0.f,0.f,0.f,0.f);

    glEnable(GL_DEPTH_TEST); //
    initsphere(.99f,DIVISION_NUM,DIVISION_NUM-1,sphere);
}

void CALLBACK myDisplay(void)
{
	float rotx=50.f;
	static float pos=90.f;

	glClear(GL_COLOR_BUFFER_BIT| GL_DEPTH_BUFFER_BIT);   //
    glPushMatrix();
	   glRotatef(rotx,1.0f,0.f,0.f);
       fillsphere(DIVISION_NUM,DIVISION_NUM-1,sphere);
    glPopMatrix();
	drawmap();
	draw_sat(30.f,pos,1.4f,50.f);
	glColor3f(0.f,1.f,0.f);
	draw_orbit(30.f,pos,1.4f,50.f);

    glFlush();
}

void main(void)
{
	myInit();
	auxReshapeFunc(myReshape);
	auxMainLoop(myDisplay);
}