// Chloe Chao
// LetterSound.java
// Sound out each letter as printed out.

import java.applet.*;
import java.awt.*;
import java.io.*;
import java.lang.*;
import java.util.Vector;
import java.util.StringTokenizer;
import java.net.*;

public class LetterSound extends Applet implements Runnable {

  //  AudioClip sound;
  //  Vector sounds;          // sound alphabet
  Thread thread;          // animation thread
  int sleepRate = 100;    // sleep between redraw in milliseconds
  Button button;
  TextField textField;
  ImageCanvas imageCanvas;
  Graphics offg;
  Image displayImage;
  String toBeSaid;
  boolean FLAG = false;  // just to debug
  String sourceString;
  StringTokenizer sourceFile;
  int UNIT, LEFT_MARGIN, TOP_MARGIN;
  int currx, curry;
  int lastWidth = 0;
  Vector alphabet; 
  public static final int NW = 0;
  public static final int NE = 1;
  public static final int SE = 2;
  public static final int SW = 3;

  int maxFrames=0;
  int currFrameNum=0;
  CodeString currCS = null;            
  

public void init() {
  UNIT = 4;
  LEFT_MARGIN = 6;
  TOP_MARGIN = 30;
  alphabet = new Vector();
  toBeSaid = new String();

  // Draw the gui.
  Panel p = new Panel();
  p.setLayout(new GridLayout(0,2));
  makeTextField();
  p.add("West", textField);
  makeButton();
  p.add("East", button);

  BorderLayout b = new BorderLayout();
  setLayout(b);
  add( "North", p );   
  makeImageCanvas();
  add( "South", imageCanvas );
  
  // Create the image
  displayImage = createImage(size().width,size().height);
  offg = displayImage.getGraphics();
  offg.setColor( Color.black );
  imageCanvas.setImage(displayImage);
  imageCanvas.repaint();

  //Read in the homemade font file.
  fetch("http://acg.media.mit.edu/mas962/users/cchao/ps8/soundfontcode.txt");

  // Load the sounds
  /*try {
    java.net.URL test = new java.net.URL(getDocumentBase(), "db.txt");
    sourceString = (String) test.getContent();
    sourceFile = new StringTokenizer(sourceString);//, " \t\n\r,;/\"(");        
  } catch (Exception e) {}

  System.out.println("sourceFile is: "+sourceFile.countTokens() );

  sounds = loadSounds( sourceFile );
  */
  //sounds = getSounds();

  // Start the applet thread.
  thread = new Thread( this );
  thread.start();

} // init

public void start() {
  if (thread != null) {
    thread.resume();
  }
} // start

public void stop() {
  if (thread != null) {
    thread.suspend();
  }
} //stop

public void destroy() {
  if(thread != null) {
    thread.stop();
  }
} // destroy

public void run() {
 try {
   while( true ) {
     offg = displayImage.getGraphics();
     speak();
     repaint();
     thread.sleep(sleepRate);
   }
 } catch (InterruptedException e) {}
} // run

private void speak() {
  // Each sound less than a second. (1 sec=1000 milliseconds?)

  if( currFrameNum >= maxFrames ) {
    // The animation is over.
    currCS = null;
    maxFrames = 0;
    currFrameNum = 0;
    toBeSaid = new String(); // empty 
  } // if
  else if( (currFrameNum%10 == 0) && ((currFrameNum/10)<toBeSaid.length())) {
    // Move the cursor over.
    if( currFrameNum>0 )//currx != LEFT_MARGIN && curry != TOP_MARGIN )
      currx+=lastWidth;
    if( currx>(size().width-(12*UNIT)) ) {
      currx = LEFT_MARGIN;
      curry+=(12*UNIT);
    }// if
    
    // Go get the next letter.      
    char currLetter = toBeSaid.charAt( (int)(currFrameNum/10) );
    currCS = findCodeString( currLetter );
    // Start playing the letter sound.
    if( currCS!=null ) {
      lastWidth = currCS.getWidth();
      //System.out.println("I'm ready to play a sound!");
      if( currCS.getSound()!=null ) {
	AudioClip audy = currCS.getSound();
	audy.play();
	//System.out.println("I've played a sound!");
      }// if
    }// if

  }// end else if
  drawLetter();
  currFrameNum++;
  

} // speak

private void drawLetter() {
  if( currCS!=null ) { 
    int dim  = UNIT*12;
    Image i2 = currCS.getImage();
    Graphics g2 = i2.getGraphics();
    g2.setColor( Color.white );
    g2.fillRect( 0, 0, 2*dim, dim );
    float val;
    if( (val=((currFrameNum%10)/10.0f))<0.8 ) 
      g2.setColor( new Color( val, val, val) );
    else
      g2.setColor( new Color( .7f, .7f, .7f ) );

    for( int i=0; i<currCS.lines.size();) {
      Point b = (Point)currCS.lines.elementAt(i++);
      Point e = (Point)currCS.lines.elementAt(i++);
      g2.drawLine( b.x*UNIT, b.y*UNIT, e.x*UNIT, e.y*UNIT );
    }
    
    for( int i=0; i<currCS.arcs.size();) {
      Point p = (Point)currCS.arcs.elementAt(i++);
      Point d = (Point)currCS.arcs.elementAt(i++);
      Point a = (Point)currCS.arcs.elementAt(i++);
      g2.drawArc( p.x*UNIT, p.y*UNIT, d.x*UNIT, d.y*UNIT, a.x, a.y );
    }
    for( int i=0; i<currCS.serifs.size(); i++) {
      Polygon q = (Polygon)currCS.serifs.elementAt(i);
      g2.fillPolygon( q );
      g2.drawPolygon(q);
    }
    offg.drawImage( i2, currx, curry, this );
  } // end if
} // drawLetter

private CodeString findCodeString( char code ) {
  CodeString cs = null;
  boolean searching = true;
  int j=0;
  while( searching && j<alphabet.size()) {
    cs = (CodeString)alphabet.elementAt( j );
    char key = cs.getCode();
    //System.out.println("KEY is: "+key );
    if( key == code ) {
      //                                    codestring = cs.codestring;
      searching = false;
      System.out.println("found it: "+code);
    }
    j++;
  }
  
  if( searching ) {//Didn't find a match.
    // Add a space?
    return null;
  }
  else {
    return cs;
  }

} // findCodeString

public void update(Graphics g) {
    paint(g);
} // update

public void paint (Graphics g) {
  paintComponents(g);
  imageCanvas.setImage(displayImage);
  imageCanvas.repaint();
  g.drawImage(displayImage, 0, 0, this);
} // paint

public boolean action(Event e, Object arg) {
  if (e.target == button) {
    /*
    if(sounds!=null) {
    sound = (AudioClip)sounds.elementAt(0);
    sound.play();
    System.out.println("played sound!");
    }
    */  
    FLAG = true;
    toBeSaid = textField.getText();
    toBeSaid =  toBeSaid.toUpperCase() ;
    offg = displayImage.getGraphics();
    sayIt();
    return true;
  }
  return false;
} // action
  
  
// This function sets all the variables for a new phrase.
public void sayIt() {
  


  // Go through the string and change the double letter sounds to symbols.
  StringBuffer remap = new StringBuffer();
  for( int i=0; i<toBeSaid.length(); i++ ) {
    char code = toBeSaid.charAt( i );
  
    // Special cases: th, sh, ch, ng, wh
    if( code == 'T' && ((i+1)<toBeSaid.length())) {
      //System.out.println( "GOT A T");
      char nxcode = toBeSaid.charAt( i+1 );
      if( nxcode == 'H' ) {
        i++; // skip over
        code = '<';
      }
    }
    else if( code == 'S' && ((i+1)<toBeSaid.length())) {
      char nxcode = toBeSaid.charAt( i+1 );
      if( nxcode == 'H' ) {
        i++; // skip over
        code = '=';
      }
    }
    else if( code == 'C' && ((i+1)<toBeSaid.length())) {
      char nxcode = toBeSaid.charAt( i+1 );
      if( nxcode == 'H' ) {
        i++; // skip over
        code = '>';
      }
    }
    else if( code == 'N' && ((i+1)<toBeSaid.length())) {
      char nxcode = toBeSaid.charAt( i+1 );
      if( nxcode == 'G' ) {
        i++; // skip over
        code = '?';
      }
    }
    else if( code == 'W' && ((i+1)<toBeSaid.length())) {
      char nxcode = toBeSaid.charAt( i+1 );
      if( nxcode == 'H' ) {
        i++; // skip over
        code = '@';
      }
    }
    remap.append(code);
  } // end for
  toBeSaid = remap.toString();

  maxFrames = toBeSaid.length()*10; // 10 frames per letter.
  currFrameNum = 0;
  currCS = null;       

  // Reset drawing coordinates to upper-left and clear screen
  currx = LEFT_MARGIN;
  curry = TOP_MARGIN;
  // Clear the background.
  offg.setColor(Color.white);
  offg.fillRect( 0, 0, this.size().width, this.size().height);

} // sayIt


public void fetch (String address) {
  showStatus("Reading in the font file.");

  byte buf[] = null;

  Image img;
  Graphics gg;

  if (!alphabet.isEmpty())
    alphabet.removeAllElements();
  try {
    URL url = new URL(address);

    StreamTokenizer tokens = new StreamTokenizer(url.openStream());

    int token;


    tokens.ordinaryChar(';'); // signifies end of commands
    tokens.ordinaryChar('|'); // signifies eol
    tokens.whitespaceChars( '(', ')' );
    tokens.eolIsSignificant(true);
    tokens.commentChar('%');

    tokens.wordChars('<', '@' );

    // Get first token.
    token = tokens.nextToken();


    // While not eof
    while (token != tokens.TT_EOF) {
      // While not eol
      while ( token != tokens.TT_EOL ) {
	// Take the first Integer of the line as the letter.
	if( tokens.sval != null ) {
	  String codestr = tokens.sval;
	  char code = codestr.charAt(0);
	  //System.out.println("code: "+code);
	  Image ii=createImage(UNIT*24, UNIT*12 );
	  URL uu = null;
	  try {
	    uu = new URL(getDocumentBase(), "sounds/ch.au"); 
	  } // try
	  catch (MalformedURLException e) {}
	  CodeString cs = new CodeString( code, UNIT, ii, getAudioClip(uu) );//****
	  alphabet.addElement( cs );
	  img = cs.getImage();
	  gg = img.getGraphics();
	  gg.setColor( Color.black );
	  // Get the next token and start parsing for operators.
	  // I don't have any error-checking. Sorry.
	  //token = tokens.nextToken();
	  while( (token=tokens.nextToken())!='|' ) {
	    if( token == tokens.TT_WORD ) {
	      if (tokens.sval.equals( "stop" )) {
		//cs.setColor(STOP);
	      }
	      if (tokens.sval.equals( "fricative" )) {
		//cs.setColor(FRICATIVE);
	      }
	      if (tokens.sval.equals( "affricate" )) {
		//cs.setColor(AFFRICATE);
	      }
	      if (tokens.sval.equals( "nasal" )) {
		//cs.setColor(NASAL);
	      }
	      if (tokens.sval.equals( "liquid" )) {
		//cs.setColor(LIQUID);
	      }
	      if (tokens.sval.equals( "glide" )) {
		//cs.setColor(GLIDE);
	      }
	      if (tokens.sval.equals( "serifs" )) {
		// Get the number of serifs to draw.
		//tokens.nextToken();
		//int numOfSerifs = (int)tokens.nval;
		//for(int i=0; i<numOfSerifs; i++) {
		while( (token= tokens.nextToken())!=';') {
		  int d, x, y;
		  if( tokens.sval.equals("nw") )
		    d=NW;
		  else if( tokens.sval.equals("ne") )
		    d=NE;
		  else if( tokens.sval.equals("se") )
		    d=SE;
		  else
		    d=SW;
		  tokens.nextToken();
		  x = (int)tokens.nval;
		  tokens.nextToken();
		  y = (int)tokens.nval;
		  drawSerifs( d, x*UNIT, y*UNIT, gg, cs );
		}//end while
		//}// end for
	      }//end if serifs
	      else if( tokens.sval.equals( "lines" )) {
		while( (token= tokens.nextToken())!=';') {
		  int x1, y1, x2, y2;
		  x1 = (int)tokens.nval;
		  tokens.nextToken();
		  y1 = (int)tokens.nval;
		  tokens.nextToken();
		  x2 = (int)tokens.nval;
		  tokens.nextToken();
		  y2 = (int)tokens.nval;
		  gg.drawLine( x1*UNIT, y1*UNIT, x2*UNIT, y2*UNIT );
		  cs.lines.addElement( new Point( x1, y1 ) );
		  cs.lines.addElement( new Point( x2, y2 ) );
		}//end while
	      }// end else if lines
	      else if( tokens.sval.equals( "arcs" )) {
		while( (token= tokens.nextToken())!=';') {
		  int x, y, w, h, start, end;
		  x = (int)tokens.nval;
		  tokens.nextToken();
		  y = (int)tokens.nval;
		  tokens.nextToken();
		  w = (int)tokens.nval;
		  tokens.nextToken();
		  h = (int)tokens.nval;
		  tokens.nextToken();
		  start = (int)tokens.nval;
		  tokens.nextToken();
		  end = (int)tokens.nval;
		  gg.drawArc( x*UNIT, y*UNIT, w*UNIT, h*UNIT, start, end );
		  cs.arcs.addElement( new Point( x, y) );
		  cs.arcs.addElement( new Point(w, h));
		  cs.arcs.addElement( new Point(start,end));
		}// end while
	      }// end else if arcs
	      else if( tokens.sval.equals( "polygon" )) {
		Polygon p = new Polygon();
		//Read in the points until you hit a ';'
		while( (token= tokens.nextToken())!=';') {
		  int x, y;
		  x = (int)tokens.nval;
		  token= tokens.nextToken();
		  y = (int)tokens.nval;
		  p.addPoint(x*UNIT,y*UNIT);
		}// end while
		gg.fillPolygon(p);
		gg.drawPolygon(p);
	      }// end else if polygon
	      else if( tokens.sval.equals( "audio" )) {
		tokens.nextToken();
		StringBuffer SOUNDPATH = new StringBuffer("sounds/");
		SOUNDPATH.append(tokens.sval);
		//System.out.println("the file is: "+SOUNDPATH);
		URL theURL = null;
		try {
		  theURL = new URL(getDocumentBase(), SOUNDPATH.toString()); 
		} // try
		catch (MalformedURLException e) {
		  System.out.println("Hit a bad URL: "+e);
		} // catch 
		AudioClip theSound = getAudioClip( theURL );
		cs.setSound( theSound );
	      }// end else if audio
	    }// end if TT.WORD
	  }// end while not "|"
	}// end if tokens.sval!=null
	token = tokens.nextToken();


      }//END while not EOL
      token = tokens.nextToken();
    }//END while not EOF
    //}//END if( FILE_READABLE )
    System.out.println("finished reading font file");
  }//END try
  catch (MalformedURLException e) {
    System.err.println(e);
    return;
  }
  catch (IOException e) {
    System.err.println(e);
    return;
  }
  showStatus("Finished reading in font file.");
} // fetch

private void drawSerifs( int direction, int x, int y, Graphics gf, CodeString cs ) {
  Polygon p = new Polygon();
  p.addPoint( x,y );
  switch(direction) {
  case NW:
    p.addPoint(x,y-(2*UNIT)); p.addPoint( x-(2*UNIT), y);
    break;
  case NE:
    p.addPoint(x+(2*UNIT), y); p.addPoint(x, y-(2*UNIT));
    break;
  case SE:
    p.addPoint(x, y+(2*UNIT)); p.addPoint(x+(2*UNIT), y);
    break;
  case SW:
    p.addPoint(x-(2*UNIT), y); p.addPoint(x, y+(2*UNIT));
    break;
  default:
    break;

  }// end switch
  p.addPoint(x,y);
  gf.fillPolygon(p);
  gf.drawPolygon(p);
  cs.addSerif(p);

} // drawSerifs

private void makeTextField() {
  textField = new TextField(5);
  textField.setText("klow chaw");
}

private void makeButton() {
  button = new Button("sound it out.");
}

private void makeImageCanvas() {
  imageCanvas = new ImageCanvas();
}

private Vector loadSounds( StringTokenizer source ) {
  System.out.println( "Got this far.");
  // Get the sounds.
  Vector loaded = new Vector();
  String SOUNDPATH = "sounds/";
  String[] toLoad = new String[source.countTokens()];

  System.out.println( "number of files to load: "+source.countTokens() );

  for( int i=0; source.hasMoreTokens(); i++ ) {
    String s = source.nextToken();
    if (s != null) {
      toLoad[i] = s;
    }
  }

  System.out.println( "Made it past getFileNames");

  // Make URLs, and get the sounds.
  for( int i=0; i < toLoad.length; i++ ) {
    showStatus("Busy loading up. #" + i +"/"+toLoad.length);
    URL theURL = null;
    String theName = toLoad[i];
    if (theName != null) { 
      try {
	theURL = new URL(getDocumentBase(), SOUNDPATH+theName); 
      } // try
      catch (MalformedURLException e) {
	System.out.println("Hit a bad URL: "+e);
      } // catch 
     
      AudioClip theSound = getAudioClip( theURL );
      loaded.addElement( theSound );
    } // end if
  } // end for

  showStatus("Fully loaded.");
  return loaded;

} // loadSounds

} // LetterSound

class ImageCanvas extends Canvas {
  Image image;
public ImageCanvas () {
}
public void setImage( Image image ) {
  this.image = image;
}
public void paint( Graphics g ) {
  g.drawImage(this.image, 0, 0, this);
}
} // ImageCanvas

/////////////////////////////////////////////////////////////
//All the letters of the homemade font are 8x8 so to allow
//for overreach make Image 12x12
class CodeString extends Object {
  char code;
  Color color;
  Image i;
  int u;
  int width;
  AudioClip sound;
  public Vector lines, serifs, arcs;
  
public CodeString( char code, int unit, Image image, AudioClip a ) {
  this.code = code;
  this.u = unit;
  this.i = image;
  this.color = Color.black;
  Graphics g= i.getGraphics();
  //  g.setColor( Color.black );
  g.fillRect( 0, 0, u*12, u*12 );
  lines = new Vector();
  serifs = new Vector();
  arcs = new Vector();
  this.sound = a;
  switch( code ) {
  case '<':
  case '=':
  case '>':
  case '?':
  case '@':
    this.width = u*19;
    break;
  default:
    this.width = u*12;
    break;
  }

}
  
public void addSerif( Polygon p ) {
  serifs.addElement(p);
}
  
public char getCode() {
  return this.code;
}
  
public void setColor(Color col) {
  this.color = col;
}

public Color getColor() {
  return this.color;
}
  
public Image getImage() {
  return this.i;
}

public void setSound( AudioClip audio ) {
  this.sound = audio;
}

public AudioClip getSound() {
  return this.sound;
}

public int getWidth() {
  return this.width;
}

} // CodeString