//***********************************************************//
// Demo:    Lens Flare Editor
// Author:  terror
// Spec:    demo for gamedev.ru
//***********************************************************//
#include  <Windows.h>
#include  <stdio.h>
#include  "texture.h"
#include	<gl/gl.h>
#include	<gl/glu.h>
#include  <gl/glext.h>
#include  "utils.h"
#include  "jpglib.h"

#define TGA_RGB		 2
#define TGA_A			 3
#define TGA_RLE		10


void DecodeJPG ( jpeg_decompress_struct* cinfo, ImageJPG_t &pImageData )
{
	jpeg_read_header(cinfo, TRUE);
	jpeg_start_decompress(cinfo);

	pImageData.RowSpan = cinfo->image_width * cinfo->num_components;
	pImageData.Width   = cinfo->image_width;
	pImageData.Height  = cinfo->image_height;
	NEW_ARRAY_MEM ( pImageData.data, byte, pImageData.RowSpan * pImageData.Height );

	unsigned char** rowPtr = new unsigned char*[pImageData.Height];
	for (int i = 0; i < pImageData.Height; i++)
		rowPtr[i] = &(pImageData.data[i*pImageData.RowSpan]);

	int rowsRead = 0;
	while (cinfo->output_scanline < cinfo->output_height) 
	{
		rowsRead += jpeg_read_scanlines(cinfo, &rowPtr[rowsRead], cinfo->output_height - rowsRead);
	}

	delete [] rowPtr;
	jpeg_finish_decompress(cinfo);
}


bool LoadJPG ( const char *filename, ImageJPG_t &pImageData )
{
	struct jpeg_decompress_struct cinfo;
	FILE *pFile;
	if((pFile = fopen(filename, "rb")) == NULL) 
	{
		MessageBox ( 0, "Cant load JPG file", "Error", MB_OK );
		return false;
	}
	jpeg_error_mgr jerr;
	cinfo.err = jpeg_std_error(&jerr);
	jpeg_create_decompress(&cinfo);
	jpeg_stdio_src(&cinfo, pFile);
	DecodeJPG(&cinfo, pImageData);
	jpeg_destroy_decompress(&cinfo);
	fclose(pFile);

	return true;
}


bool UploadImage ( char *filename, uint &TexID )
{
	ImageJPG_t  jpg;
	TexID = 0;

	if ( !CheckFile ( filename ))
		return false;

	LoadJPG ( filename, jpg );
	glGenTextures		( 1, &TexID );
	glBindTexture		(	GL_TEXTURE_2D, TexID );
	glPixelStorei		( GL_UNPACK_ALIGNMENT, 1 );
	glTexEnvi				( GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE );
	glTexParameteri ( GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP );
	glTexParameteri ( GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP );
	glTexParameterf ( GL_TEXTURE_2D, GL_TEXTURE_MAX_ANISOTROPY_EXT, 2.0f );
	glTexParameteri ( GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR_MIPMAP_LINEAR );
	glTexParameteri ( GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR );
	gluBuild2DMipmaps ( GL_TEXTURE_2D, 3, jpg.Width, jpg.Height,
											GL_RGB, GL_UNSIGNED_BYTE, jpg.data );

	DELETE_ARRAY_MEM ( jpg.data );

	return true;
}



void DeleteTexture ( uint &TexID )
{
	if ( TexID != NULL )
	{
		glDeleteTextures ( 1, &TexID );
		TexID = NULL;
	}
}

void DeleteTextures ( int num, uint *TexID )
{
	for ( int i = 0; i < num; i++ )
	{
		DeleteTexture ( TexID[i] );
	}
}