/*
Copyright (C) 2003 Rice1964

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
*/

#include "stdafx.h"

COGLTexture::COGLTexture(DWORD dwWidth, DWORD dwHeight, bool asRenderTarget) :
	CTexture(dwWidth,dwHeight,asRenderTarget),
	m_glFmt(GL_RGBA)
{
	m_dwTextureFmt = TEXTURE_FMT_A8R8G8B8;	// Always use 32bit to load texture
	glGenTextures( 1, &m_dwTextureName );

	// Make the width and height be the power of 2
	uint32 w;
	for (w = 1; w < dwWidth; w <<= 1);
	m_dwCreatedTextureWidth = w;
	for (w = 1; w < dwHeight; w <<= 1);
	m_dwCreatedTextureHeight = w;
	
	if (dwWidth*dwHeight > 256*256)
		TRACE4("Large texture: (%d x %d), created as (%d x %d)", 
			dwWidth, dwHeight,m_dwCreatedTextureWidth,m_dwCreatedTextureHeight);

#ifdef _DEBUG
	///if( (dwWidth != m_dwCreatedTextureWidth && m_dwCreatedTextureWidth/2+1 == dwWidth) ||
	//	(dwHeight != m_dwCreatedTextureHeight && m_dwCreatedTextureHeight/2+1 == dwHeight) )
	//{
	//	DebuggerAppendMsg("Texture: Width=%d, Height=%d", dwWidth, dwHeight);
	//}
#endif
	
	m_fYScale = (float)m_dwCreatedTextureHeight/(float)m_dwHeight;
	m_fXScale = (float)m_dwCreatedTextureWidth/(float)m_dwWidth;

#ifdef _WIN32
	m_pTexture = VirtualAlloc( NULL, m_dwCreatedTextureWidth * m_dwCreatedTextureHeight * GetPixelSize(), MEM_COMMIT, PAGE_READWRITE );
#else // _WIN32
        m_pTexture = malloc(m_dwCreatedTextureWidth * m_dwCreatedTextureHeight * GetPixelSize());
#endif // _WIN32
	if( options.OpenglColorBufferSetting == TEXTURE_FMT_A4R4G4B4 ) m_glFmt = GL_RGBA4;
	DEBUGGER_ONLY_IF( logTextureDetails, {DebuggerAppendMsg("New texture: (%d, %d)", dwWidth, dwHeight);});
}

COGLTexture::~COGLTexture()
{
	glDeleteTextures(1, &m_dwTextureName );
#ifdef _WIN32
	VirtualFree(m_pTexture, 0, MEM_RELEASE);
#else // _WIN32
        free(m_pTexture);
#endif // _WIN32
	m_pTexture = NULL;
	m_dwWidth = 0;
	m_dwHeight = 0;
}

bool COGLTexture::StartUpdate(DrawInfo *di)
{
	if (m_pTexture == NULL)
		return false;

	di->dwHeight = (WORD)m_dwHeight;
	di->dwWidth = (WORD)m_dwWidth;
	di->dwCreatedHeight = m_dwCreatedTextureHeight;
	di->dwCreatedWidth = m_dwCreatedTextureWidth;
	di->lpSurface = m_pTexture;
	di->lPitch = GetPixelSize()*m_dwCreatedTextureWidth;

	return true;
}

void COGLTexture::EndUpdate(DrawInfo *di)
{
	glBindTexture(GL_TEXTURE_2D, m_dwTextureName);
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
	// Copy the image data from main memory to video card texture memory
	glTexImage2D(GL_TEXTURE_2D, 0, m_glFmt, m_dwCreatedTextureWidth, m_dwCreatedTextureHeight, 0, GL_BGRA_EXT, GL_UNSIGNED_BYTE, m_pTexture);
}


// Keep in mind that the real texture is not scaled to fix the created opengl texture yet.
// when the image is need to be scaled, ScaleImageToSurface in CTexure will be called to 
// scale the image automatically