#include "graphics.h"

 GraphicsDevice::GraphicsDevice(void) 

 {

 //	init();

 	buffer = new unsigned char[64000]; 

 	if ( buffer )

 	{

 //		screen=(unsigned char *) MK_FP(0xa000, 0);

 		screen_width=320;

 		screen_height=200;

 		screen_size=64000u;

 //		enter_mode13h();

 		memset(buffer, 0, screen_size);

 	}

 	else

 	{

 		// no mem! Return error code!

 		printf("Out of mem!\n");

 //		throw bad_alloc();

 	}

 }

 GraphicsDevice::~GraphicsDevice()

 {

 	if(buffer != NULL)

 		delete[] buffer;	

 }

 void GraphicsDevice::enter_mode13h(void)

 {

 #if 0

 	union REGS in, out;

 	// get old video mode	

 	in.h.ah=0xf;

 	int86(0x10, &in, &out);

 //	old_mode=out.h.al;

 	// enter mode 13h

 	in.h.ah=0;

 	in.h.al=0x13;

 	int86(0x10, &in, &out);

 #endif

 	__dpmi_regs r;

 	r.x.ax = 0x13;

 	__dpmi_int(0x10, &r);

 }

 void GraphicsDevice::leave_mode13h()

 {

 #if 0

 	union REGS in, out;

 	// change to the video mode we were in before we switched to mode 13h

 	in.h.ah=0;

 	in.h.al=3;

 	int86(0x10, &in, &out);

 //	free(buffer);

 #endif

 	__dpmi_regs r;

 	r.x.ax = 3;

 	__dpmi_int(0x10, &r);

 }

 void GraphicsDevice::drawPixel(int x, int y, unsigned char color)

 {

 	if( x > screen_width || x < 0 || y > screen_height || y < 0 )

 		return;

 	*(buffer + (y*screen_width) + x) = color;

 }

 //TODO fix bug when sprite is drawn on the right side of the screen

 void GraphicsDevice::drawSprite(int x, int y, struct sprite * aSprite)

 {

 	for(int i = 0; i< aSprite->height; i++)

 	{

 		for(int j = 0; j < aSprite->width; j++)

 		{

 			// if off-screen dont draw

 			if(!(x + j > screen_width || x + j < 0 || y + i > screen_height || y + i < 0)

 				&& !(*(aSprite->bitmap + (i*aSprite->width) + j) == 0))

 				*(buffer + ( (y+i) * screen_width) + (x+j)) = *(aSprite->bitmap + (i*aSprite->width) + j);

 		}

 	}

 }

 void GraphicsDevice::drawHorizontalLine(int x, int y, unsigned int length, unsigned char color)

 {

 	if( y < 0 || y > screen_height)

 		return;

 	for(int i = 0; i < length; i++)

 	{

 		if( (x+ i) > screen_width)

 			break;

 		*(buffer + (y * screen_width) + x + i) = color;

 	}

 }

 void GraphicsDevice::drawVerticalLine(int x, int y, unsigned int length, unsigned char color)

 {

 	if( x < 0 || x > screen_width)

 		return;

 	for(int i = 0; i < length; i++)

 	{

 		if(y+i > screen_height)

 			break;

 		*(buffer + ( (y+i) * screen_width) + x) = color;

 	}

 }

 void GraphicsDevice::drawLine(int x1, int y1, int x2, int y2, unsigned char color)

 {

 }

 void GraphicsDevice::drawRectangle(int x1, int y1, int x2, int y2, unsigned char color)

 {

 }

 void GraphicsDevice::drawString8x8(int x, int y, char * aString)

 {

 }

 void GraphicsDevice::drawString8x14(int x, int y, char * aString)

 {

 }

 // untested

 void GraphicsDevice::getPalette(char * palette)

 {

 	if(palette != NULL)

 	{

 		/* get the palette */

 		outportb(0x3c7, 0); /* want to read */

 		for (int i = 0; i < 768; i++)

 			palette[i] = inportb(0x3c9);

 	}

 }

 // untested 

 // number should be a multiple of 3 and max is 768 or else it doesnt do anything

 void GraphicsDevice::setPalette(char * palette, int number)

 {

 	if(number % 3 != 0 || number < 0 || number > 768 || palette == NULL)

 		return;

 	// set palette

 	outportb(0x3c8, 0); 

 	for (int i = 0; i < number; i++)

 	{

 		outportb(0x3c9, palette[i] /4); // divide by 4 because color needs to be between 0-63

 	}

 }

  // with color black

 void GraphicsDevice::clearScreen()

 {

 	memset(buffer, 0, screen_size);

 }

 // with a defined color

 void GraphicsDevice::clearScreen(char color)

 {

 	memset(buffer, color, screen_size);

 }

 // draws the stuff on the screen

 void GraphicsDevice::updateBuffer()

 {

 	// wait for vertical re-trace

 	while ( inportb(INPUT_STATUS_0) & 8 )

 		;

 	while ( !(inportb(INPUT_STATUS_0) & 8) )

 		;

 	// copy everything to video memory

 	//_fmemcpy(screen, buffer, screen_size);

 	dosmemput(buffer, screen_size, SCREEN);

 }

 unsigned int GraphicsDevice::getScreenWidth(){ return screen_width; }

 unsigned int GraphicsDevice::getScreenHeight(){ return screen_height; }