import java.applet.*;
import java.awt.*;
import java.awt.event.*;
import java.io.*;
import java.net.*;
import Vertex2D;
import InterpolatedTriangle2D;
import ppmDecoder;

public class TriTest extends Applet implements  MouseListener,  MouseMotionListener{
    static int CHUNKSIZE = 2000;
    Raster reference, raster;
    Drawable triList[];
    int triangles;
    Color background;
    Image screen;
    int state;
   
    public void init( ) {
        // Read in the reference image
        ppmDecoder ppmDecoder1 = new ppmDecoder();
        screen = ppmDecoder1.getImage(getDocumentBase(), getParameter("filename1"));
        reference = new Raster(screen);

        // Create a raster for rendering
        background = Color.white;
        raster = new Raster(reference.getWidth(), reference.getHeight());
	raster.fill(background);
        // Read in the triangle file
        triList = new InterpolatedTriangle2D[CHUNKSIZE];
        triangles = 0;
	InputStream is = null;
	try {
            is = new URL(getDocumentBase(), getParameter("filename2")).openStream();
            ReadInput(is);
	    is.close();
        } catch (IOException e) {
            showStatus("Error reading "+getParameter("filename2"));
        }
        state = 0;
	this.addMouseListener(this);
	this.addMouseMotionListener(this);
    }


    ///////////// METHODS //////////////////////
  // parse a floting point number
  private float getNumber(StreamTokenizer st) throws IOException {
      //private int getNumber(StreamTokenizer st) throws IOException {
        st.nextToken();
        return (Float.valueOf(st.sval).floatValue());
    }

    // parse a packed integer in hex, octal, or decimal
    private int getColor(StreamTokenizer st) throws IOException {
        st.nextToken();
        int pix;
        if (st.sval.startsWith("0x") || st.sval.startsWith("0X")) {
                pix = (int) Long.parseLong(st.sval.substring(2), 16);
            } else
            if (st.sval.startsWith("0") || st.sval.length() > 1) {
                pix = (int) Long.parseLong(st.sval.substring(1), 8);
            } else
                pix = Integer.parseInt(st.sval);
        return pix;
    }

  //   // extend the triangle array if needed
    private void growList() {
        Drawable newList[] = new Drawable[triList.length+CHUNKSIZE];
        System.arraycopy(triList, 0, newList, 0, triList.length);
        triList = newList;
        CHUNKSIZE = (3*CHUNKSIZE)/2;
    }
    


   
    // define legal characters for our parser
    // The remainder of a line after a '#' is ignored
    // you might find this helpful for debugging
    private void configureParser(StreamTokenizer st) {
            st.ordinaryChars(0, 255);
            st.wordChars('a', 'f');
            st.wordChars('A', 'F');
            st.wordChars('0', '9');
            st.wordChars('-', '-');
            st.wordChars('.', '.');
            st.wordChars('x', 'x');
            st.wordChars('X', 'X');
            st.whitespaceChars(' ', ' ');
            st.whitespaceChars('\t', '\t');
            st.whitespaceChars('\n', '\n');
            st.whitespaceChars('\r', '\r');
        st.eolIsSignificant(false);
        st.commentChar('#');
    }

    // Scan the triangle file
    public void ReadInput(InputStream is) throws IOException {
        Vertex2D v1, v2, v3;
        int currentvert = 0;
        float x, y;
	//int x, y;
        int pix;
	int j=0;
	Reader r = new BufferedReader(new InputStreamReader(is));
	StreamTokenizer st = new StreamTokenizer(r);
	configureParser(st);
	//System.out.println( "READING TRIANGLE FILE" );
        while (st.nextToken() != StreamTokenizer.TT_EOF) {
            st.pushBack();
	    x = getNumber(st);
            y = getNumber(st);
            pix = getColor(st);
            v1 = new Vertex2D(x, y, pix);
            x = getNumber(st);
            y = getNumber(st);
            pix = getColor(st);
            v2 = new Vertex2D(x, y, pix);
            x = getNumber(st);
            y = getNumber(st);
            pix = getColor(st);
            v3 = new Vertex2D(x, y, pix);
            if (triangles == triList.length) growList();
            triList[triangles++] = new InterpolatedTriangle2D(v1, v2, v3);
            }
        }
        
        
        String message[] = { "Reference", "Rendered", "Difference" };

    public void paint(Graphics g) {
        g.drawImage(screen, 0, 0, this);
        g.setColor(Color.black);
        g.drawString(message[state], 10, 20);
        if (state == 2) {
            double t = (badpixels*100.0)/pixels;
            g.drawString("Bad pixels = "+t+"%", 10, 36);
            if (badpixels > 0)
                t = ((double)pixelerror)/badpixels;
            else
                t = 0;
            g.drawString("Ave error  = "+t, 10, 52);
            g.drawString("Time  = "+time+" ms", 10, 68);
        }
	//raster.printPixelBlock(0,120,202,212);
    }

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

    long time;
    //long time1;
    int pixels;
    int badpixels;
    int pixelerror;

    public void mousePressed( MouseEvent e) {
      //System.out.println("IN MOUSEPRESSED" );
      int x = e.getX(); 
      int y = e.getY();
        if (state == 0) {
	  //System.out.println("IN STATE 0" );
	    raster.fill(background);
            time = System.currentTimeMillis();
	    for (int i = 0; i < triangles; i++){
	      //System.out.println("tri no=" + i);
		triList[i].draw(raster);
		repaint();
	    }
            time = System.currentTimeMillis() - time;
            screen = raster.toImage( );
        } else
        if (state == 1) {
	  //System.out.println("IN STATE 1" );
            int pixa, pixb, t;
            pixels = raster.getsize();
            badpixels = 0;
            pixelerror = 0;
            for (int i = 0; i < pixels; i++) {
                pixa = raster.getPixel(i);
                pixb = reference.getPixel(i);
                if (pixa != pixb) {
		    
                    badpixels += 1;
                    t = Math.abs((pixa & 255) - (pixb & 255));
                    t += Math.abs(((pixa >> 8) & 255) - ((pixb >> 8) & 255));
                    t += Math.abs(((pixa >> 16) & 255) - ((pixb >> 16) & 255));
                    pixelerror += t;
                    int b = (255 - t);
                    if (b < 0) b = 0;
                    int g = (t > 382) ? (637 - t) : (t - 127);
                    if (g < 0) g = 0;
                    int r = (t - 510);
                    if (r < 0) r = 0;
                    raster.setPixel( (((((0xff00 + r) << 8) + g)<< 8)+b) , i );
		} else {
                    raster.setPixel( 0xffffffff , i );
		}
            }
            screen = raster.toImage( );
        } else
        if (state == 2) {
	  //System.out.println("IN STATE 2" );
            screen = reference.toImage( );
        }
        state = (state + 1) % 3;
        repaint();
        return;
    }

    public void mouseReleased( MouseEvent e ) { ; }
    public void mouseEntered( MouseEvent e ) { ; }
    public void mouseExited( MouseEvent e ) { ;}
    public void mouseClicked( MouseEvent e ) { ; }


    public void mouseMoved( MouseEvent e ) { 
	int x = e.getX(); 
	int y = e.getY();
	showStatus("x=" + x + "  y=" + y );
}


    public void mouseDragged( MouseEvent e ) { ; }


}