package ca;

import java.awt.Image;
import java.awt.Graphics;
import java.awt.Component;
import java.awt.Dimension;
import java.awt.image.*;
import java.util.*;

public abstract class CAs implements Runnable
{
	//private Graphics paper;
	public Image bufImage;
	public Graphics backPaper;
	public short cellWidth = 2;
	public short cellHeight = 2;
	public int width = 0;
	public int height = 0;
	public boolean wrap = true;
	protected short cells[][];
	protected short cells2[][];
	protected static short STATE = 2;
	public short table[][]; // table
	protected Component target;
	protected static final boolean DEBUG = false;
	int black = 0xff000000;
	int yellow = 0xffffff00;
	int blue = 0xff0000ff;
	public int cols[] = {black,blue};
	
	protected int[] p;

	public CAs(){}

	public void setWrap(boolean wrap){
		this.wrap = wrap;
	}
	
	public boolean getWrap(){
		return wrap;
	}


	public short getCellStatus( int x, int y){
		if( x >= 0 && x/cellWidth < cells.length && y >= 0 && y/cellHeight < cells[x].length){
			return cells[x/cellWidth][y/cellHeight];
		}
		return -1;
	}
	
	public void setCellStatus(int x, int y, short value){
		if( x >= 0 && x/cellWidth < cells.length && y >= 0 && y/cellHeight < cells[x].length){
			cells[x/cellWidth][(y/cellHeight)] = (short)(value % STATE);
		}
	}
	
	public void setCells ( short[][] data){
		cells = data;
		cells2 = new short[data.length][data[0].length];
		Clear(cells2);
	}
	
	public void setTarget(Component target){
		this.target = target;
		//this.paper = paper;
		//this.bufImage = bufImage;
		//this.backPaper = bufImage.getGraphics();
		Dimension r = target.size();
		width = r.width/cellWidth;
		height = r.height/cellHeight;
		cells = new short[width][height];
		Randmize(cells);
		cells2 = new short[width][height];
		Clear(cells2);
		
		p = new int [width * height];
		for(int i = 0;i<p.length;i++){
			p[i] = cols[0];
		}
		/*
		System.out.println("makePixelGrabber");
		PixelGrabber pg = new PixelGrabber(this.bufImage, 0, 0, width, height, p, 0, width);
		System.out.println("try grabPixels!");
		try {
			pg.grabPixels();
		} catch(InterruptedException e) {
			System.out.println("Intrupted");
		}
		if ((pg.status() & ImageObserver.ABORT) != 0) {
			System.out.println("image fetch aborted or errored");
		}
		System.out.println("Succeces Pixel Grab!");
		System.out.println("p[0] = "+p[0]);
		System.out.println("pixelgrabber status = "+pg.status());
		*/
	}
	
	public void Randmize(short array[][]){
		for(int i = 0;i<array.length;i++){
			for(int j = 0 ; j < array[i].length;j++){
				int temp = (int)( Math.random() * STATE);
				if (temp < 0){ temp=0;
				}else if (temp > STATE-1 ){ temp = STATE-1;}
				array[i][j] = (short)temp;
			}
		}
	}
	
	public void Clear(short array[][]){
		for(int i = 0;i<array.length;i++){
			for(int j = 0 ; j < array[i].length;j++){
				array[i][j] = 0;
			}
		}
	}
	
	public void Copy(short array[][],short array2[][]){
		for(int i = 0;i<array.length;i++){
			for(int j = 0 ; j < array[i].length;j++){
				array[i][j] = array2[i][j];
			}
		}
	}
	
	/**
	Old Life routine
	int count = cells[x1][y1]+cells[x1][y2]+cells[x1][y3]+
		cells[x2][y1]+cells[x2][y3]+
		cells[x3][y1]+cells[x3][y2]+cells[x3][y3];
	switch( count){
		case 3:
			cells2[x2][y2] = 1;
			break;
		case 2:
			if(cells[x2][y2] == 1){
				cells2[x2][y2]=1;
			}else{
				cells2[x2][y2]=0;
			}
			break;
		default:
			cells2[x2][y2]=0;
			break;
	}
	if( cells2[x2][y2] != cells[x2][y2]){
		int c = cols[cells2[x2][y2]];
		for(int n = 0; n < cellWidth; n++){
			for(int m = 0; m < cellHeight; m++){
				p[((x2*2+n)*width)+y2*2+m] = c;
			}
		}
		
		backPaper.setColor(ct[cells2[x2][y2]]);
		backPaper.drawLine(x2*2,y2*2,x2*2+cellWidth-1,y2*2);
		backPaper.drawLine(x2*2,y2*2+1,x2*2+cellWidth-1,y2*2+1);
		
	}*/
	public abstract void check(int x1,int x2,int x3,int y1,int y2,int y3);
	
	public void draw (int x,int y){
		if( cells2[x][y] != cells[x][y]){
			if (cells2[x][y] < cols.length && x < cells2.length && y < cells2[x].length){
				int c = cols[cells2[x][y]];
				p[ y * width + x ] = c;
				return;
			}
			System.out.println("Error cells2["+x+"]["+y+"] = "+cells2[x][y]);
		}
	}
	public void run ()
	{
		int x = width;
		int y = height;
		long timer;
		int x1,x3,y1,y3;
		Graphics g = target.getGraphics();
		
		while(true){
			if(DEBUG){
				System.out.println("--Start Life--");
			}
			for(int i = 0 ;i < x ;i++ ){
				if (i != 0 && i != x-1){
					x1 = i-1;
					x3 = i+1;
				}else if (i == x-1 && wrap){
					x1 = i-1;
					x3 = 0;
				}else if (i == 0 && wrap){
					x1 = x-1;
					x3 = i+1;
				}else if (i == x-1){
					x1 = i-1;
					x3 = i;
				}else{
					x1 = i;
					x3 = i+1;
				}
				for(int j = 0 ;j < y ;j++ ){
					if (j != 0 && j != y-1){
						y1 = j-1;
						y3 = j+1;
					}else if (j == y-1 && wrap){
						y1 = j-1;
						y3 = 0;
					}else if (j == 0 && wrap){
						y1 = y-1;
						y3 = j+1;
					}else if (j == y-1){
						y1 = j-1;
						y3 = j;
					}else{
						y1 = j;
						y3 = j+1;
					}
					check(x1,i,x3,y1,j,y3);
					draw(i,j);
				}
			}
			if (DEBUG){
				System.out.println("--Copy--");
			}
			Copy(cells,cells2);
			if(DEBUG){
				System.out.println("--Clear--");
			}
			Clear(cells2);
			if(DEBUG){
				System.out.println("--repaint--");
			}
			Image img = target.createImage(new MemoryImageSource(width,height, p, 0, width));
			g.drawImage(img,0,0,width*cellWidth,height*cellHeight,target);
			//target.bufimg = img;
			//target.repaint();
			if(DEBUG){
				System.out.println("--Sleep--");
			}
			try{
				Thread.yield();
				Thread.sleep(100);
			}catch ( InterruptedException e ){}
			System.runFinalization();
			System.gc();
		}
	}
}