// MidiVizSnake
// Lew Hill II

#include "MidiVizSnake.h"

MidiVizSnake::MidiVizSnake(){
  init();
}

void MidiVizSnake::init(){

  for (int i = 0; i < SNAKE_LENGTH; i++){
    snakeNotes[i] = 0;
  }
  notes_in = 0;
}

void MidiVizSnake::processMidiEvent(MidiEvent event){
  
  int note = event.getNote();
  //  int velocity = event.getVelocity();

  notes_in++;

  int note_index = note %12;

  snakeNotes[0] = note_index;
  
  // shift notes back one space...
  // cheap deque.

  for (int i = SNAKE_LENGTH-1 ; i > 0; i--){
    snakeNotes[i] = snakeNotes[i-1];
  }
  
}

void MidiVizSnake::setPositionShift(int note_index){
  
  switch(note_index){
    
  case 0:
    position_shift[0] = 0.2;
    position_shift[1] = 0; 
    position_shift[2] = 0; 
    break;
    
  case 1:
    position_shift[0] = -0.2;
    position_shift[1] = 0; 
    position_shift[2] = 0; 
    break;
    
  case 2:
    position_shift[0] = 0;
    position_shift[1] = .2; 
    position_shift[2] = 0; 
    break;
    
  case 3:
    position_shift[0] = 0;
    position_shift[1] = -0.2; 
    position_shift[2] = 0; 
    break;
    
  case 4:
    position_shift[0] = 0;
    position_shift[1] = 0; 
    position_shift[2] = 0.2; 
    break;
    
  case 5:
    position_shift[0] = 0;
    position_shift[1] = 0; 
    position_shift[2] = -0.2; 
    break;
    
  case 6:
    position_shift[0] = 0.2;
    position_shift[1] = 0; 
    position_shift[2] = 0.2; 
    break;
    
  case 7:
    position_shift[0] = -0.2;
    position_shift[1] = 0; 
    position_shift[2] = -.2; 
    break;
    
  case 8:
    position_shift[0] = -0.2;
    position_shift[1] = 0.2; 
    position_shift[2] = 0; 
    break;
    
  case 9:
    position_shift[0] = 0;
    position_shift[1] = -0.2; 
    position_shift[2] = 0.2; 
    break;
    
  case 10:
    position_shift[0] = -.2;
    position_shift[1] = -0.2; 
    position_shift[2] = 0.2; 
    break;
    
  case 11:
    position_shift[0] = -.2;
    position_shift[1] = 0; 
    position_shift[2] = -0.2; 
    break;
    
  default:
    position_shift[0] = 0;
    position_shift[1] = 0; 
    position_shift[2] = 0; 
    break;
  }
}


void MidiVizSnake::frame(){
  
}

void MidiVizSnake::draw(){

  glPushMatrix();
  glTranslatef(position[0], position[1], position[2]);
  glRotatef(rotation[2], 0.0, 0.0, 1.0); 
  glRotatef(rotation[1], 0.0, 1.0, 0.0); 
  glRotatef(rotation[0], 1.0, 0.0, 0.0); 
  glScalef(scale[0], scale[1], scale[2]);

  glPushMatrix();
  
  for (int i = 0; i < SNAKE_LENGTH; i++){
    
    setPositionShift(snakeNotes[i]);
    
    glTranslatef(position_shift[0], position_shift[1], position_shift[2]); 
    
    float* colors = color_table.getValue(snakeNotes[i]);
    glColor3fv(colors);

    drawbox(-.1,.1,-.1, .1, -.1, .1, GL_QUADS); 
    
  }

  glPopMatrix();
  
  glPopMatrix();
  
}

void MidiVizSnake::drawbox(GLdouble x0, GLdouble x1, GLdouble y0, GLdouble y1,
             GLdouble z0, GLdouble z1, GLenum type)
{
   static GLdouble n[6][3] = {
      {-1.0, 0.0, 0.0}, {0.0, 1.0, 0.0}, {1.0, 0.0, 0.0},
      {0.0, -1.0, 0.0}, {0.0, 0.0, 1.0}, {0.0, 0.0, -1.0}
   };
   static GLint faces[6][4] = {
      { 0, 1, 2, 3}, { 3, 2, 6, 7}, { 7, 6, 5, 4},
      { 4, 5, 1, 0}, { 5, 6, 2, 1}, { 7, 4, 0, 3}
   };
   GLdouble v[8][3], tmp;
   GLint i;

   if (x0 > x1)
   {
      tmp = x0; x0 = x1; x1 = tmp;
   }
   if (y0 > y1)
   {
      tmp = y0; y0 = y1; y1 = tmp;
   }
   if (z0 > z1)
   {
      tmp = z0; z0 = z1; z1 = tmp;
   }
   v[0][0] = v[1][0] = v[2][0] = v[3][0] = x0;
   v[4][0] = v[5][0] = v[6][0] = v[7][0] = x1;
   v[0][1] = v[1][1] = v[4][1] = v[5][1] = y0;
   v[2][1] = v[3][1] = v[6][1] = v[7][1] = y1;
   v[0][2] = v[3][2] = v[4][2] = v[7][2] = z0;
   v[1][2] = v[2][2] = v[5][2] = v[6][2] = z1;

   for (i = 0; i < 6; i++)
   {
      glBegin(type);
         glNormal3dv(&n[i][0]);
         glVertex3dv(&v[faces[i][0]][0]);
         glNormal3dv(&n[i][0]);
         glVertex3dv(&v[faces[i][1]][0]);
         glNormal3dv(&n[i][0]);
         glVertex3dv(&v[faces[i][2]][0]);
         glNormal3dv(&n[i][0]);
         glVertex3dv(&v[faces[i][3]][0]);
      glEnd();
   }
}