//====================================================================
// File Name : Glib.c
// Function  : S3C2440 Graphic library(drawing).
//====================================================================
#include "def.h"
#include "lcdlib.h"
#include "glib.h"
#include "lcd.h"

extern U32 (*frameBuffer24BitTft800600)[SCR_XSIZE_TFT_800600/2];

void (*PutPixel)(U32,U32,U32);

void _PutTft16Bit_320240(U32 x,U32 y,U32 c);
void _PutTft16Bit_800600(U32 x,U32 y,U32 c);
void _PutTft24Bit_800600(U32 x,U32 y,U32 c);

void Glib_Init(int type)
{
	switch(type)
	{
	case MODE_TFT_8BIT_240320:
		PutPixel = _PutTft8Bit_240320;   	
		break;   

	case MODE_TFT_16BIT_240320:
		PutPixel = _PutTft16Bit_240320;
		break;   

	case MODE_TFT_16BIT_800600:
		PutPixel = _PutTft16Bit_800600;
		break;  

	case MODE_TFT_24BIT_800600:
		PutPixel = _PutTft24Bit_800600;
		break;  	    			

	default: 
		break;
	}
}

/* added by James for support 24 bit , 3/2/2006*/
void _PutTft24Bit_240320(U32 x,U32 y,U32 c)
{	
	if(x<SCR_XSIZE_TFT_240320 && y<SCR_YSIZE_TFT_240320){
		frameBuffer24BitTft240320[(y)][(x)] = (c & 0xffffff00);	
	}
}

void _PutTft8Bit_240320(U32 x,U32 y,U32 c)
{
	frameBuffer8BitTft240320[(y)][(x)/4] = 
		(frameBuffer8BitTft240320[(y)][x/4] &
		~(0xff000000>>((x)%4)*8) ) 			|
		((c&0x000000ff)<<((4-1-((x)%4))*8));
}

void _PutTft16Bit_240320(U32 x,U32 y,U32 c)
{
	frameBuffer16BitTft240320[(y)][(x)/2] = 
		(frameBuffer16BitTft240320[(y)][x/2] & 
		~(0xffff0000>>((x)%2)*16) )		 | 
		((c&0x0000ffff)<<((2-1-((x)%2))*16));
}

void _PutTft16Bit_320240(U32 x,U32 y,U32 c)
{
	frameBuffer16BitTft240320[(y)][(x/2)] = 
		(frameBuffer16BitTft240320[(y)][x/2] & 
		~(0xffff0000>>((x)%2)*16) )			 |
		((c&0x0000ffff)<<((2-1-((x)%2))*16));
}

//void _PutTft16Bit_800600(U32 x,U32 y,U32 c)
void _PutTft16Bit_800600(U32 x,U32 y,U32 c)
{
	frameBuffer16BitTft800600[(y)][(x)/2] =
		(frameBuffer16BitTft800600[(y)][x/2] & 
		~(0xffff0000>>((x)%2)*24)) 		 | 
		((c)<<((2-1-((x)%2))*24));
}

//void _PutTft16Bit_800600(U32 x,U32 y,U32 c)
void _PutTft24Bit_800600(U32 x,U32 y,U32 c)
{
	frameBuffer24BitTft800600[(y)][(x)] = c; 	
}

void Glib_Rectangle(int x1,int y1,int x2,int y2,int color)
{
	Glib_Line(x1,y1,x2,y1,color);
	Glib_Line(x2,y1,x2,y2,color);
	Glib_Line(x1,y2,x2,y2,color);
	Glib_Line(x1,y1,x1,y2,color);
}

void Glib_FilledRectangle(int x1,int y1,int x2,int y2,int color)
{
	int i;

	for(i=y1;i<=y2;i++){
		Glib_Line(x1,i,x2,i,color);
	}
}

// LCD display is flipped vertically
// But, think the algorithm by mathematics point.
//   3I2
//   4 I 1
//  --+--   <-8 octants  mathematical cordinate
//   5 I 8
//   6I7
void Glib_Line(int x1,int y1,int x2,int y2,int color)
{
	int dx,dy,e;
	dx=x2-x1; 
	dy=y2-y1;

	if(dx>=0)
	{
		if(dy >= 0) // dy>=0
		{
			if(dx>=dy) // 1/8 octant
			{
				e=dy-dx/2;
				while(x1<=x2)
				{
					/* PutPixel*/_PutTft24Bit_800600(x1,y1,color);
					if(e>0){y1+=1;e-=dx;}	
					x1+=1;
					e+=dy;
				}
			}
			else		// 2/8 octant
			{
				e=dx-dy/2;
				while(y1<=y2)
				{
					/* PutPixel*/_PutTft24Bit_800600(x1,y1,color);
					if(e>0){x1+=1;e-=dy;}	
					y1+=1;
					e+=dx;
				}
			}
		}
		else		   // dy<0
		{
			dy=-dy;   // dy=abs(dy)

			if(dx>=dy) // 8/8 octant
			{
				e=dy-dx/2;
				while(x1<=x2)
				{
					/* PutPixel*/_PutTft24Bit_800600(x1,y1,color);
					if(e>0){y1-=1;e-=dx;}	
					x1+=1;
					e+=dy;
				}
			}
			else		// 7/8 octant
			{
				e=dx-dy/2;
				while(y1>=y2)
				{
					/* PutPixel*/_PutTft24Bit_800600(x1,y1,color);
					if(e>0){x1+=1;e-=dy;}	
					y1-=1;
					e+=dx;
				}
			}
		}	
	}
	else //dx<0
	{
		dx=-dx;		//dx=abs(dx)
		if(dy >= 0) // dy>=0
		{
			if(dx>=dy) // 4/8 octant
			{
				e=dy-dx/2;
				while(x1>=x2)
				{
					/* PutPixel*/_PutTft24Bit_800600(x1,y1,color);
					if(e>0){y1+=1;e-=dx;}	
					x1-=1;
					e+=dy;
				}
			}
			else		// 3/8 octant
			{
				e=dx-dy/2;
				while(y1<=y2)
				{
					/* PutPixel*/_PutTft24Bit_800600(x1,y1,color);
					if(e>0){x1-=1;e-=dy;}	
					y1+=1;
					e+=dx;
				}
			}
		}
		else		   // dy<0
		{
			dy=-dy;   // dy=abs(dy)

			if(dx>=dy) // 5/8 octant
			{
				e=dy-dx/2;
				while(x1>=x2)
				{
					/* PutPixel*/_PutTft24Bit_800600(x1,y1,color);
					if(e>0){y1-=1;e-=dx;}	
					x1-=1;
					e+=dy;
				}
			}
			else		// 6/8 octant
			{
				e=dx-dy/2;
				while(y1>=y2)
				{
					/* PutPixel*/_PutTft24Bit_800600(x1,y1,color);
					if(e>0){x1-=1;e-=dy;}	
					y1-=1;
					e+=dx;
				}
			}
		}	
	}
}

void Glib_ClearScr(U32 c, int type)
{	
	//Very inefficient function.
	int i,j;

	if(	(type == MODE_TFT_1BIT_800600) | 
		(type == MODE_TFT_8BIT_800600) |
		(type == MODE_TFT_16BIT_800600)|
		(type == MODE_TFT_24BIT_800600)){

			for(j=0;j<LCD_YSIZE_TFT_800600;j++){
				for(i=0;i<LCD_XSIZE_TFT_800600;i++){
					_PutTft24Bit_800600(i, j, c);
				}
			}
		}


		if((type&0x4000)&&(type&0x100)){
			for(j=0;j<SCR_YSIZE_TFT_240320;j++){
				for(i=0;i<SCR_XSIZE_TFT_240320;i++){
					PutPixel(i,j,c);
				}
			}
		}

}