/* Copyright (c) 2001, Stanford University
 * All rights reserved
 *
 * See the file LICENSE.txt for information on redistributing this software.
 */

#include "unpacker.h"
#include "cr_error.h"
#include "cr_protocol.h"
#include "cr_mem.h"
#include "cr_version.h"
 
#if defined( GL_EXT_texture3D ) 
void crUnpackTexImage3DEXT( void )
{
	GLenum target = READ_DATA( sizeof( int ) + 0, GLenum );
	GLint level = READ_DATA( sizeof( int ) + 4, GLint );
	GLenum internalformat = READ_DATA( sizeof( int ) + 8, GLint );
	GLsizei width = READ_DATA( sizeof( int ) + 12, GLsizei );
	GLsizei height = READ_DATA( sizeof( int ) + 16, GLsizei );
	GLsizei depth = READ_DATA( sizeof( int ) + 20, GLsizei );
	GLint border = READ_DATA( sizeof( int ) + 24, GLint );
	GLenum format = READ_DATA( sizeof( int ) + 28, GLenum );
	GLenum type = READ_DATA( sizeof( int ) + 32, GLenum );
	int is_null = READ_DATA( sizeof( int ) + 36, int );
	GLvoid *pixels;

	if ( is_null )
		pixels = NULL;
	else
		pixels = DATA_POINTER( sizeof( int ) + 40, GLvoid );

	cr_unpackDispatch.TexImage3DEXT(target, level, internalformat, width,
	                                height, depth, border, format, type,
	                                pixels);
	INCR_VAR_PTR();
}
#endif /* GL_EXT_texture3D */

#if defined( CR_OPENGL_VERSION_1_2 )
void crUnpackTexImage3D( void )
{
	GLenum target = READ_DATA( sizeof( int ) + 0, GLenum );
	GLint level = READ_DATA( sizeof( int ) + 4, GLint );
	GLint internalformat = READ_DATA( sizeof( int ) + 8, GLint );
	GLsizei width = READ_DATA( sizeof( int ) + 12, GLsizei );
	GLsizei height = READ_DATA( sizeof( int ) + 16, GLsizei );
	GLsizei depth = READ_DATA( sizeof( int ) + 20, GLsizei );
	GLint border = READ_DATA( sizeof( int ) + 24, GLint );
	GLenum format = READ_DATA( sizeof( int ) + 28, GLenum );
	GLenum type = READ_DATA( sizeof( int ) + 32, GLenum );
	int is_null = READ_DATA( sizeof( int ) + 36, int );
	GLvoid *pixels;
	
	if ( is_null )
		pixels = NULL;
	else
		pixels = DATA_POINTER( sizeof( int ) + 40, GLvoid );
	
	cr_unpackDispatch.TexImage3D( target, level, internalformat, width, height,
	                              depth, border, format, type, pixels );
	INCR_VAR_PTR();
}
#endif /* CR_OPENGL_VERSION_1_2 */

void crUnpackTexImage2D( void )
{
	GLenum target = READ_DATA( sizeof( int ) + 0, GLenum );
	GLint level = READ_DATA( sizeof( int ) + 4, GLint );
	GLint internalformat = READ_DATA( sizeof( int ) + 8, GLint );
	GLsizei width = READ_DATA( sizeof( int ) + 12, GLsizei );
	GLsizei height = READ_DATA( sizeof( int ) + 16, GLsizei );
	GLint border = READ_DATA( sizeof( int ) + 20, GLint );
	GLenum format = READ_DATA( sizeof( int ) + 24, GLenum );
	GLenum type = READ_DATA( sizeof( int ) + 28, GLenum );
	int is_null = READ_DATA( sizeof( int ) + 32, int );
	GLvoid *pixels;

	if ( is_null )
		pixels = NULL;
	else 
		pixels = DATA_POINTER( sizeof( int ) + 36, GLvoid );

	cr_unpackDispatch.TexImage2D( target, level, internalformat, width, height,
						  border, format, type, pixels );
	INCR_VAR_PTR();
}

void crUnpackTexImage1D( void )
{
	GLenum target = READ_DATA( sizeof( int ) + 0, GLenum );
	GLint level = READ_DATA( sizeof( int ) + 4, GLint );
	GLint internalformat = READ_DATA( sizeof( int ) + 8, GLint );
	GLsizei width = READ_DATA( sizeof( int ) + 12, GLsizei );
	GLint border = READ_DATA( sizeof( int ) + 16, GLint );
	GLenum format = READ_DATA( sizeof( int ) + 20, GLenum );
	GLenum type = READ_DATA( sizeof( int ) + 24, GLenum );
	int is_null = READ_DATA( sizeof( int ) + 28, int );
	GLvoid *pixels;

	if ( is_null )
		pixels = NULL;
	else 
		pixels = DATA_POINTER( sizeof( int ) + 32, GLvoid );

	cr_unpackDispatch.TexImage1D( target, level, internalformat, width, border,
						  format, type, pixels );
	INCR_VAR_PTR();
}

void crUnpackDeleteTextures( void )
{
	GLsizei n = READ_DATA( sizeof( int ) + 0, GLsizei );
	GLuint *textures = DATA_POINTER( sizeof( int ) + 4, GLuint );

	cr_unpackDispatch.DeleteTextures( n, textures );
	INCR_VAR_PTR();
}


void crUnpackPrioritizeTextures( void )
{
	GLsizei n = READ_DATA( sizeof( int ) + 0, GLsizei );
	GLuint *textures = DATA_POINTER( sizeof( int ) + 4, GLuint );
	GLclampf *priorities = DATA_POINTER( sizeof( int ) + 4 + n*sizeof( GLuint ),
	                                     GLclampf );

	cr_unpackDispatch.PrioritizeTextures( n, textures, priorities );
	INCR_VAR_PTR();
}

void crUnpackTexParameterfv( void )
{
	GLenum target = READ_DATA( sizeof( int ) + 0, GLenum );
	GLenum pname = READ_DATA( sizeof( int ) + 4, GLenum );
	GLfloat *params = DATA_POINTER( sizeof( int ) + 8, GLfloat );

	cr_unpackDispatch.TexParameterfv( target, pname, params );
	INCR_VAR_PTR();
}

void crUnpackTexParameteriv( void )
{
	GLenum target = READ_DATA( sizeof( int ) + 0, GLenum );
	GLenum pname = READ_DATA( sizeof( int ) + 4, GLenum );
	GLint *params = DATA_POINTER( sizeof( int ) + 8, GLint );

	cr_unpackDispatch.TexParameteriv( target, pname, params );
	INCR_VAR_PTR();
}

void crUnpackTexParameterf( void )
{
	GLenum target = READ_DATA( sizeof( int ) + 0, GLenum );
	GLenum pname = READ_DATA( sizeof( int ) + 4, GLenum );
	GLfloat param = READ_DATA( sizeof( int ) + 8, GLfloat );

	cr_unpackDispatch.TexParameterf( target, pname, param );
	INCR_VAR_PTR();
}

void crUnpackTexParameteri( void )
{
	GLenum target = READ_DATA( sizeof( int ) + 0, GLenum );
	GLenum pname = READ_DATA( sizeof( int ) + 4, GLenum );
	GLint param = READ_DATA( sizeof( int ) + 8, GLint );

	cr_unpackDispatch.TexParameteri( target, pname, param );
	INCR_VAR_PTR();
}

#if defined(CR_OPENGL_VERSION_1_2)
void crUnpackTexSubImage3D( void )
{
	GLenum target = READ_DATA( sizeof( int ) + 0, GLenum );
	GLint level = READ_DATA( sizeof( int ) + 4, GLint );
	GLint xoffset = READ_DATA( sizeof( int ) + 8, GLint );
	GLint yoffset = READ_DATA( sizeof( int ) + 12, GLint );
	GLint zoffset = READ_DATA( sizeof( int ) + 16, GLint );
	GLsizei width = READ_DATA( sizeof( int ) + 20, GLsizei );
	GLsizei height = READ_DATA( sizeof( int ) + 24, GLsizei );
	GLsizei depth = READ_DATA( sizeof( int ) + 28, GLsizei );
	GLenum format = READ_DATA( sizeof( int ) + 32, GLenum );
	GLenum type = READ_DATA( sizeof( int ) + 36, GLenum );
	GLvoid *pixels = DATA_POINTER( sizeof( int ) + 40, GLvoid );

	cr_unpackDispatch.PixelStorei( GL_UNPACK_ROW_LENGTH, 0 );
	cr_unpackDispatch.PixelStorei( GL_UNPACK_SKIP_PIXELS, 0 );
	cr_unpackDispatch.PixelStorei( GL_UNPACK_SKIP_ROWS, 0 );
	cr_unpackDispatch.PixelStorei( GL_UNPACK_ALIGNMENT, 1 );

	cr_unpackDispatch.TexSubImage3D(target, level, xoffset, yoffset, zoffset,
	                                width, height, depth, format, type, pixels);
	INCR_VAR_PTR();
}
#endif /* CR_OPENGL_VERSION_1_2 */

void crUnpackTexSubImage2D( void )
{
	GLenum target = READ_DATA( sizeof( int ) + 0, GLenum );
	GLint level = READ_DATA( sizeof( int ) + 4, GLint );
	GLint xoffset = READ_DATA( sizeof( int ) + 8, GLint );
	GLint yoffset = READ_DATA( sizeof( int ) + 12, GLint );
	GLsizei width = READ_DATA( sizeof( int ) + 16, GLsizei );
	GLsizei height = READ_DATA( sizeof( int ) + 20, GLsizei );
	GLenum format = READ_DATA( sizeof( int ) + 24, GLenum );
	GLenum type = READ_DATA( sizeof( int ) + 28, GLenum );
	GLvoid *pixels = DATA_POINTER( sizeof( int ) + 32, GLvoid );

	cr_unpackDispatch.PixelStorei( GL_UNPACK_ROW_LENGTH, 0 );
	cr_unpackDispatch.PixelStorei( GL_UNPACK_SKIP_PIXELS, 0 );
	cr_unpackDispatch.PixelStorei( GL_UNPACK_SKIP_ROWS, 0 );
	cr_unpackDispatch.PixelStorei( GL_UNPACK_ALIGNMENT, 1 );

	cr_unpackDispatch.TexSubImage2D( target, level, xoffset, yoffset, width,
	                                 height, format, type, pixels );
	INCR_VAR_PTR();
}

void crUnpackTexSubImage1D( void )
{
	GLenum target = READ_DATA( sizeof( int ) + 0, GLenum );
	GLint level = READ_DATA( sizeof( int ) + 4, GLint );
	GLint xoffset =	READ_DATA( sizeof( int ) + 8, GLint );
	GLsizei width = READ_DATA( sizeof( int ) + 12, GLsizei );
	GLenum format = READ_DATA( sizeof( int ) + 16, GLenum );
	GLenum type = READ_DATA( sizeof( int ) + 20, GLenum );
	GLvoid *pixels = DATA_POINTER( sizeof( int ) + 24, GLvoid );

	cr_unpackDispatch.PixelStorei( GL_UNPACK_ROW_LENGTH, 0 );
	cr_unpackDispatch.PixelStorei( GL_UNPACK_SKIP_PIXELS, 0 );
	cr_unpackDispatch.PixelStorei( GL_UNPACK_SKIP_ROWS, 0 );
	cr_unpackDispatch.PixelStorei( GL_UNPACK_ALIGNMENT, 1 );

	cr_unpackDispatch.TexSubImage1D( target, level, xoffset, width, format,
	                                 type, pixels );
	INCR_VAR_PTR();
}


void crUnpackTexEnvfv( void )
{
	GLenum target = READ_DATA( sizeof( int ) + 0, GLenum );
	GLenum pname = READ_DATA( sizeof( int ) + 4, GLenum );
	GLfloat *params = DATA_POINTER( sizeof( int ) + 8, GLfloat );

	cr_unpackDispatch.TexEnvfv( target, pname, params );
	INCR_VAR_PTR();
}

void crUnpackTexEnviv( void )
{
	GLenum target = READ_DATA( sizeof( int ) + 0, GLenum );
	GLenum pname = READ_DATA( sizeof( int ) + 4, GLenum );
	GLint *params = DATA_POINTER( sizeof( int ) + 8, GLint );

	cr_unpackDispatch.TexEnviv( target, pname, params );
	INCR_VAR_PTR();
}

#define DATA_POINTER_DOUBLE( offset )

void crUnpackTexGendv( void )
{
	GLenum coord = READ_DATA( sizeof( int ) + 0, GLenum );
	GLenum pname = READ_DATA( sizeof( int ) + 4, GLenum );
	GLdouble params[4];
	unsigned int n_param = READ_DATA( 0, int ) - ( sizeof(int) + 8 );

	if ( n_param > sizeof(params) )
		crError( "crUnpackTexGendv: n_param=%d, expected <= %d\n", n_param,
		         (unsigned int)sizeof(params) );
	crMemcpy( params, DATA_POINTER( sizeof( int ) + 8, GLdouble ), n_param );

	cr_unpackDispatch.TexGendv( coord, pname, params );
	INCR_VAR_PTR();
}

void crUnpackTexGenfv( void )
{
	GLenum coord = READ_DATA( sizeof( int ) + 0, GLenum );
	GLenum pname = READ_DATA( sizeof( int ) + 4, GLenum );
	GLfloat *params = DATA_POINTER( sizeof( int ) + 8, GLfloat );

	cr_unpackDispatch.TexGenfv( coord, pname, params );
	INCR_VAR_PTR();
}

void crUnpackTexGeniv( void )
{
	GLenum coord = READ_DATA( sizeof( int ) + 0, GLenum );
	GLenum pname = READ_DATA( sizeof( int ) + 4, GLenum );
	GLint *params = DATA_POINTER( sizeof( int ) + 8, GLint );

	cr_unpackDispatch.TexGeniv( coord, pname, params );
	INCR_VAR_PTR();
}

void crUnpackExtendAreTexturesResident( void )
{
	GLsizei n = READ_DATA( 8, GLsizei );
	const GLuint *textures = DATA_POINTER( 12, const GLuint );
	SET_RETURN_PTR(12 + n * sizeof(GLuint));
	SET_WRITEBACK_PTR(20 + n * sizeof(GLuint));
	(void) cr_unpackDispatch.AreTexturesResident( n, textures, NULL );
}


void crUnpackExtendCompressedTexImage3DARB( void )
{
	GLenum  target         = READ_DATA( 4 + sizeof(int) +  0, GLenum );
	GLint   level          = READ_DATA( 4 + sizeof(int) +  4, GLint );
	GLenum  internalformat = READ_DATA( 4 + sizeof(int) +  8, GLenum );
	GLsizei width          = READ_DATA( 4 + sizeof(int) + 12, GLsizei );
	GLsizei height         = READ_DATA( 4 + sizeof(int) + 16, GLsizei );
	GLsizei depth          = READ_DATA( 4 + sizeof(int) + 20, GLsizei );
	GLint   border         = READ_DATA( 4 + sizeof(int) + 24, GLint );
	GLsizei imagesize      = READ_DATA( 4 + sizeof(int) + 28, GLsizei );
	int     is_null        = READ_DATA( 4 + sizeof(int) + 32, int );
	GLvoid  *pixels;

	if( is_null )
		pixels = NULL;
	else
		pixels = DATA_POINTER( 4 + sizeof(int) + 36, GLvoid );

	cr_unpackDispatch.CompressedTexImage3DARB(target, level, internalformat,
	                                          width, height, depth, border,
	                                          imagesize, pixels);
}


void crUnpackExtendCompressedTexImage2DARB( void )
{
	GLenum target =         READ_DATA( 4 + sizeof( int ) + 0, GLenum );
	GLint level =           READ_DATA( 4 + sizeof( int ) + 4, GLint );
	GLenum internalformat = READ_DATA( 4 + sizeof( int ) + 8, GLenum );
	GLsizei width =         READ_DATA( 4 + sizeof( int ) + 12, GLsizei );
	GLsizei height =        READ_DATA( 4 + sizeof( int ) + 16, GLsizei );
	GLint border =          READ_DATA( 4 + sizeof( int ) + 20, GLint );
	GLsizei imagesize =     READ_DATA( 4 + sizeof( int ) + 24, GLsizei );
	int is_null =           READ_DATA( 4 + sizeof( int ) + 28, int );
	GLvoid *pixels;

	if ( is_null )
		pixels = NULL;
	else
		pixels = DATA_POINTER( 4 + sizeof( int ) + 32, GLvoid );

	cr_unpackDispatch.CompressedTexImage2DARB( target, level, internalformat,
	                                           width, height, border, imagesize,
	                                           pixels );
}


void crUnpackExtendCompressedTexImage1DARB( void )
{
	GLenum  target         = READ_DATA( 4 + sizeof(int) +  0, GLenum );
	GLint   level          = READ_DATA( 4 + sizeof(int) +  4, GLint );
	GLenum  internalformat = READ_DATA( 4 + sizeof(int) +  8, GLenum );
	GLsizei width          = READ_DATA( 4 + sizeof(int) + 12, GLsizei );
	GLint   border         = READ_DATA( 4 + sizeof(int) + 16, GLint );
	GLsizei imagesize      = READ_DATA( 4 + sizeof(int) + 20, GLsizei );
	int     is_null        = READ_DATA( 4 + sizeof(int) + 24, int );
	GLvoid  *pixels;

	if( is_null )
		pixels = NULL;
	else
		pixels = DATA_POINTER( 4 + sizeof(int) + 28, GLvoid );

	cr_unpackDispatch.CompressedTexImage1DARB(target, level, internalformat,
	                                          width, border, imagesize, pixels);
}


void crUnpackExtendCompressedTexSubImage3DARB( void )
{
	GLenum  target    = READ_DATA( 4 + sizeof(int) +  0, GLenum );
	GLint   level     = READ_DATA( 4 + sizeof(int) +  4, GLint );
	GLint   xoffset   = READ_DATA( 4 + sizeof(int) +  8, GLint );
	GLint   yoffset   = READ_DATA( 4 + sizeof(int) + 12, GLint );
	GLint   zoffset   = READ_DATA( 4 + sizeof(int) + 16, GLint );
	GLsizei width     = READ_DATA( 4 + sizeof(int) + 20, GLsizei );
	GLsizei height    = READ_DATA( 4 + sizeof(int) + 24, GLsizei );
	GLsizei depth     = READ_DATA( 4 + sizeof(int) + 28, GLsizei );
	GLenum  format    = READ_DATA( 4 + sizeof(int) + 32, GLenum );
	GLsizei imagesize = READ_DATA( 4 + sizeof(int) + 36, GLsizei );
	int     is_null   = READ_DATA( 4 + sizeof(int) + 40, int );
	GLvoid  *pixels;

	if( is_null )
		pixels = NULL;
	else
		pixels = DATA_POINTER( 4 + sizeof(int) + 44, GLvoid );

	cr_unpackDispatch.CompressedTexSubImage3DARB(target, level, xoffset,
	                                             yoffset, zoffset, width,
	                                             height, depth, format,
	                                             imagesize, pixels);
}


void crUnpackExtendCompressedTexSubImage2DARB( void )
{
	GLenum  target    = READ_DATA( 4 + sizeof(int) +  0, GLenum );
	GLint   level     = READ_DATA( 4 + sizeof(int) +  4, GLint );
	GLint   xoffset   = READ_DATA( 4 + sizeof(int) +  8, GLint );
	GLint   yoffset   = READ_DATA( 4 + sizeof(int) + 12, GLint );
	GLsizei width     = READ_DATA( 4 + sizeof(int) + 16, GLsizei );
	GLsizei height    = READ_DATA( 4 + sizeof(int) + 20, GLsizei );
	GLenum  format    = READ_DATA( 4 + sizeof(int) + 24, GLenum );
	GLsizei imagesize = READ_DATA( 4 + sizeof(int) + 28, GLsizei );
	int     is_null   = READ_DATA( 4 + sizeof(int) + 32, int );
	GLvoid  *pixels;

	if( is_null )
		pixels = NULL;
	else
		pixels = DATA_POINTER( 4 + sizeof(int) + 36, GLvoid );

	cr_unpackDispatch.CompressedTexSubImage2DARB(target, level, xoffset,
	                                             yoffset, width, height,
	                                             format, imagesize, pixels);
}


void crUnpackExtendCompressedTexSubImage1DARB( void )
{
	GLenum  target    = READ_DATA( 4 + sizeof(int) +  0, GLenum );
	GLint   level     = READ_DATA( 4 + sizeof(int) +  4, GLint );
	GLint   xoffset   = READ_DATA( 4 + sizeof(int) +  8, GLint );
	GLsizei width     = READ_DATA( 4 + sizeof(int) + 12, GLsizei );
	GLenum  format    = READ_DATA( 4 + sizeof(int) + 16, GLenum );
	GLsizei imagesize = READ_DATA( 4 + sizeof(int) + 20, GLsizei );
	int     is_null   = READ_DATA( 4 + sizeof(int) + 24, int );
	GLvoid  *pixels;

	if( is_null )
		pixels = NULL;
	else
		pixels = DATA_POINTER( 4 + sizeof(int) + 28, GLvoid );

	cr_unpackDispatch.CompressedTexSubImage1DARB(target, level, xoffset, width,
	                                             format, imagesize, pixels);
}
