#include "conversation.h"

conversation::conversation() {
  for (int x=0; x<MAXCHATS; x++)
    progress[x]=0;
  textcols=40;// 40 //how many columns of text display in one box
  textrows=4;// 4 //how many rows of text display in one box
  boxx=-5;// 0 //x coordinate of lower left corner
  boxy=0;// 0 //y coordinate of the lower left corner
  boxwidth=650;// 400//width of the box
  boxheight=200;// 100//height of the box
  borderthickness=5;
  message=new (char *)[MAXCHATS];
  for (int x=0; x<MAXCHATS; x++)
    message[x]=NULL;
}

conversation::~conversation() {
  for (int x=0; x<MAXCHATS; x++) 
  if (message[x]!=NULL) delete[] message[x];
}




bool conversation::Init(char *backgroundfile, char *borderfile) {
  //load the background and border texture here, build the display list
      TextureMap &tex = BackgroundTexture;

      if (tex.LoadTIFF(backgroundfile)) {
      // set up params and bind name
        glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT);
        glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT);
        tex.InitTextureParams(false);//or after the clamps?
        glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT);
        glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT);
      } else cerr<<"Error loading conversation background"<<endl;

      TextureMap &tex2 = BorderTexture;

      if (tex2.LoadTIFF(borderfile)) {
      // set up params and bind name
        glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT);
        glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT);
        tex2.InitTextureParams(false);//or after the clamps?
        glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT);
        glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT);
      } else cerr<<"Error loading conversation border"<<endl;

      return true;
}




void conversation::SetBox(int newtextcols, int newtextrows, int newboxx, int newboxy, int newboxwidth, int newboxheight, int newborderthickness) {
  textcols=newtextcols;
  textrows=newtextrows;
  boxx=newboxx;
  boxy=newboxy;
  boxwidth=newboxwidth;
  boxheight=newboxheight;
  borderthickness=newborderthickness;
}






  bool conversation::StartConversation(int which,char *newmessage) {//returns true if the conversation is working, false if it failed
    if (newmessage==NULL) return false;

    if (message[which]!=NULL) delete[] message[which];

    message[which]=new char[strlen(newmessage)];
    if (message[which]==NULL) return false;
    strcpy(message[which],newmessage);
    
    progress[which]=0;
    return true;

  }




  bool conversation::ContinueMessage(int which) {//displays the next section of the message if there's more. returns true if there's still more, false if the message is over (and the window has been closed)

    if ((unsigned int)progress[which]>=(unsigned int)strlen(message[which])) {//ran out of conversation
      EndConversation(which);
      return false;
    } else {//theres more to do
      progress[which]+=textcols*textrows;
      if ((unsigned int)progress[which]>(unsigned int)strlen(message[which])) 
        progress[which]=strlen(message[which]);
    }
    return true;
  }

  void conversation::EndConversation(int which) {//kills the current conversation
    if (message[which]!=NULL) delete[] message[which];
    message[which]=NULL;
    progress[which]=0;
  }



bool conversation::CheckTalking(int which) {
  if (message[which]==NULL) return false;
  if (progress[which]>=strlen(message[which])) return false;
  if (progress[which]<0) return false;
  return true;
}




  void conversation::DrawConversation(int which, int numplayers, int windowwidth, int windowheight) {//renders the box
    if (CheckTalking(which)==false) return;

    if (numplayers>MAXCHATS) {
      cerr<<"drawconversation cannot support more than "<<MAXCHATS<<" players"<<endl;
      return;
    }
    
    //go to ortho mode-see intro
    glDisable(GL_DEPTH_TEST);
    glPushMatrix();
    glMatrixMode(GL_MODELVIEW);
    glLoadIdentity();
    //glOrtho(-250,640+200,-250,480+250,0,100);//aspect 1
    glOrtho(-120,640+120,-190,480+220,0,100);

    glEnable(GL_TEXTURE_2D);
    glDisable(GL_LIGHTING);
    glBindTexture(GL_TEXTURE_2D, BorderTexture.GetName());
    glColor4f(1,1,1,1);
    
    glColor3f(1,1,1);
    //draw the background
    //left quad, includes corners
    glBegin(GL_QUADS);
    glTexCoord2i(0,0);
    glVertex2f(0,borderthickness);
    glTexCoord2i(0,1);
    glVertex2f(0,boxheight-borderthickness);
    glTexCoord2i(1,1);
    glVertex2f(borderthickness,boxheight);
    glTexCoord2i(1,0);
    glVertex2f(borderthickness,0);
    glEnd();
    //top quad
    glBegin(GL_QUADS);
    glTexCoord2i(0,0);
    glVertex2f(borderthickness,boxheight-borderthickness);
    glTexCoord2i(0,1);
    glVertex2f(borderthickness,boxheight);
    glTexCoord2i(1,1);
    glVertex2f(boxwidth-borderthickness,boxheight);
    glTexCoord2i(1,0);
    glVertex2f(boxwidth-borderthickness,boxheight-borderthickness);
    glEnd();
    //right quad, includes corners
    glBegin(GL_QUADS);
    glTexCoord2i(0,0);
    glVertex2f(boxwidth-borderthickness,0);
    glTexCoord2i(0,1);
    glVertex2f(boxwidth-borderthickness,boxheight);
    glTexCoord2i(1,1);
    glVertex2f(boxwidth,boxheight-borderthickness);
    glTexCoord2i(1,0);
    glVertex2f(boxwidth,borderthickness);
    glEnd();
    //bottom quad
    glBegin(GL_QUADS);
    glTexCoord2i(0,0);
    glVertex2f(borderthickness,0);
    glTexCoord2i(0,1);
    glVertex2f(borderthickness,borderthickness);
    glTexCoord2i(1,1);
    glVertex2f(boxwidth-borderthickness,borderthickness);
    glTexCoord2i(1,0);
    glVertex2f(boxwidth-borderthickness,0);
    glEnd();


    //bind internal texture
    glColor3f(0,0,1);
    //internal quad (repeating texture)
    glBindTexture(GL_TEXTURE_2D, BackgroundTexture.GetName());
    glBegin(GL_QUADS);
    glTexCoord2i(0,0);
    glVertex2f(borderthickness,borderthickness);
    glTexCoord2i(0,1);
    glVertex2f(borderthickness,boxheight-borderthickness);
    glTexCoord2i(1,1);
    glVertex2f(boxwidth-borderthickness,boxheight-borderthickness);
    glTexCoord2i(1,0);
    glVertex2f(boxwidth-borderthickness,borderthickness);
    glEnd();

    glColor3f(1,1,1);
    //draw the text
    //la la, text drawing here
    //from message[progress]
    //draw a > at the bottom right corner if there's more text after this
    glRasterPos2f(30,150);
    if (numplayers>2) {
      glTranslatef(borderthickness+30,boxy+boxheight-borderthickness-50,0);
      glScalef(0.16,0.16,0.16);
          glDisable(GL_DEPTH_TEST);
          glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
          glLineWidth(1.0);
          glEnable(GL_LINE_SMOOTH);
    }
    //glutBitmapCharacter(GLUT_BITMAP_TIMES_ROMAN_24,'A');
    //glutBitmapCharacter(GLUT_BITMAP_TIMES_ROMAN_24,'a');


    if ((progress[which]>=0)&&(message[which]!=NULL)) {
      int startprogress=progress[which];
      char *thismessage=message[which];
      while (progress[which]<strlen(message[which]) && (progress[which]-startprogress<rowlength*4)) {
        if (numplayers==1)
          glutBitmapCharacter(GLUT_BITMAP_TIMES_ROMAN_24,thismessage[progress[which]]);
        else if (numplayers==2)
          glutBitmapCharacter(GLUT_BITMAP_TIMES_ROMAN_10,thismessage[progress[which]]);
        else {//many players

          glEnable(GL_BLEND);

          glutStrokeCharacter(GLUT_STROKE_ROMAN,thismessage[progress[which]]);

          glDisable(GL_BLEND);

        }
        progress[which]++;
        if ((progress[which]-startprogress)%rowlength==0) {
          //60,150
          if (numplayers<=2)
            glRasterPos2f(boxx+40,(boxy+boxheight-50-((progress[which]-startprogress)/rowlength)*colheight));
          else
            glTranslatef(-3300,-170,0);
        }
      }
      if (progress[which]<strlen(message[which])) {
        if (numplayers<=2) {
          glutBitmapCharacter(GLUT_BITMAP_TIMES_ROMAN_24,' ');
          glutBitmapCharacter(GLUT_BITMAP_TIMES_ROMAN_24,'>');
        } else {
          glutStrokeCharacter(GLUT_STROKE_MONO_ROMAN,' ');
          glutStrokeCharacter(GLUT_STROKE_MONO_ROMAN,'>');
        }
      }
      progress[which]=startprogress;//only continue function will update it
    }

    /*
    glDisable(GL_DEPTH_TEST);
    glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
    glEnable(GL_BLEND);
    glEnable(GL_LINE_SMOOTH);
    glLineWidth(8.0);

    glTranslatef(0,90,0);
    glScalef(0.5,0.5,0.5);
    glutStrokeCharacter(GLUT_STROKE_MONO_ROMAN,'z');
    glutStrokeCharacter(GLUT_STROKE_ROMAN,'c');

    glDisable(GL_BLEND);
    */
    glPopMatrix();
    glEnable(GL_DEPTH_TEST);
  }