/* sanity tests on SDL_rwops.c (usefull for alternative implementations of stdio rwops) */

#include <stdlib.h>

#ifndef _MSC_VER

#include <unistd.h>

#endif

#include "SDL.h"

#include "SDL_endian.h"

#include <stdio.h>	

/* WARNING ! those 2 files will be destroyed by this test program */

#define FBASENAME1	"sdldata1"		/* this file will be created during tests */

#define FBASENAME2	"sdldata2"		/* this file should not exists before starting test */

#ifndef NULL

#define NULL ((void *)0)

#endif 

static void cleanup( void ) {

	unlink(FBASENAME1);

	unlink(FBASENAME2); 

}

static void rwops_error_quit( unsigned line, SDL_RWops *rwops) {

	printf("testfile.c(%d): failed\n",line);

	if (rwops) {

		rwops->close(rwops); /* This calls SDL_FreeRW(rwops); */

	}

	cleanup();

	exit(1); /* quit with rwops error (test failed) */

}

#define RWOP_ERR_QUIT(x)	rwops_error_quit( __LINE__, (x) )

int main(int argc, char *argv[])

{

	SDL_RWops *rwops = NULL;

	char test_buf[30];

	cleanup();

/* test 1 : basic argument test: all those calls to SDL_RWFromFile should fail */

	rwops = SDL_RWFromFile(NULL,NULL);

	if (rwops) RWOP_ERR_QUIT(rwops);

	rwops = SDL_RWFromFile(NULL,"ab+");

	if (rwops) RWOP_ERR_QUIT(rwops);

	rwops = SDL_RWFromFile(NULL,"sldfkjsldkfj");

	if (rwops) RWOP_ERR_QUIT(rwops);

	rwops = SDL_RWFromFile("something","");

	if (rwops) RWOP_ERR_QUIT(rwops);

	rwops = SDL_RWFromFile("something",NULL);

	if (rwops) RWOP_ERR_QUIT(rwops);	

	printf("test1 OK\n");

/* test 2 : check that inexistant file is not successfully opened/created when required */

/* modes : r, r+ implie that file MUST exist 

   modes : a, a+, w, w+ checks that it succeeds (file may not exists)

 */

	rwops = SDL_RWFromFile(FBASENAME2,"rb"); /* this file doesn't exist that call must fail */

	if (rwops) RWOP_ERR_QUIT(rwops);

	rwops = SDL_RWFromFile(FBASENAME2,"rb+"); /* this file doesn't exist that call must fail */

	if (rwops) RWOP_ERR_QUIT(rwops);

	rwops = SDL_RWFromFile(FBASENAME2,"wb");

	if (!rwops) RWOP_ERR_QUIT(rwops); 

	rwops->close(rwops); unlink(FBASENAME2);

	rwops = SDL_RWFromFile(FBASENAME2,"wb+");

	if (!rwops) RWOP_ERR_QUIT(rwops); 

	rwops->close(rwops); unlink(FBASENAME2);

	rwops = SDL_RWFromFile(FBASENAME2,"ab"); 

	if (!rwops) RWOP_ERR_QUIT(rwops); 

	rwops->close(rwops); unlink(FBASENAME2);

	rwops = SDL_RWFromFile(FBASENAME2,"ab+");

	if (!rwops) RWOP_ERR_QUIT(rwops); 

	rwops->close(rwops); unlink(FBASENAME2);

	printf("test2 OK\n");

/* test 3 : creation, writing , reading, seeking, 

	        test : w mode, r mode, w+ mode

 */

	rwops = SDL_RWFromFile(FBASENAME1,"wb"); /* write only */	

	if (!rwops)											RWOP_ERR_QUIT(rwops);

	if (1 != rwops->write(rwops,"1234567890",10,1) )	RWOP_ERR_QUIT(rwops);		

	if (10 != rwops->write(rwops,"1234567890",1,10) )	RWOP_ERR_QUIT(rwops);		

	if (7 != rwops->write(rwops,"1234567",1,7) )		RWOP_ERR_QUIT(rwops);		

	if (0!=rwops->seek(rwops,0L,RW_SEEK_SET))			RWOP_ERR_QUIT(rwops);					

	if (0!=rwops->read(rwops,test_buf,1,1))				RWOP_ERR_QUIT(rwops); /* we are in write only mode */

	rwops->close(rwops);

	rwops = SDL_RWFromFile(FBASENAME1,"rb"); /* read mode, file must exists */

	if (!rwops)											RWOP_ERR_QUIT(rwops);

	if (0!=rwops->seek(rwops,0L,RW_SEEK_SET))			RWOP_ERR_QUIT(rwops);					

	if (20!=rwops->seek(rwops,-7,RW_SEEK_END))			RWOP_ERR_QUIT(rwops);					

	if (7!=rwops->read(rwops,test_buf,1,7))				RWOP_ERR_QUIT(rwops);		

	if (SDL_memcmp(test_buf,"1234567",7))				RWOP_ERR_QUIT(rwops);		

	if (0!=rwops->read(rwops,test_buf,1,1))				RWOP_ERR_QUIT(rwops);		

	if (0!=rwops->read(rwops,test_buf,10,100))			RWOP_ERR_QUIT(rwops);		

	if (0!=rwops->seek(rwops,-27,RW_SEEK_CUR))			RWOP_ERR_QUIT(rwops);		

	if (2!=rwops->read(rwops,test_buf,10,3))			RWOP_ERR_QUIT(rwops);				

	if (SDL_memcmp(test_buf,"12345678901234567890",20))	RWOP_ERR_QUIT(rwops);

	if (0!=rwops->write(rwops,test_buf,1,1))			RWOP_ERR_QUIT(rwops); /* readonly mode */

	rwops->close(rwops);

/* test 3: same with w+ mode */

	rwops = SDL_RWFromFile(FBASENAME1,"wb+"); /* write + read + truncation */		

	if (!rwops)											RWOP_ERR_QUIT(rwops);

	if (1 != rwops->write(rwops,"1234567890",10,1) )	RWOP_ERR_QUIT(rwops);		

	if (10 != rwops->write(rwops,"1234567890",1,10) )	RWOP_ERR_QUIT(rwops);		

	if (7 != rwops->write(rwops,"1234567",1,7) )		RWOP_ERR_QUIT(rwops);		

	if (0!=rwops->seek(rwops,0L,RW_SEEK_SET))			RWOP_ERR_QUIT(rwops);					

	if (1!=rwops->read(rwops,test_buf,1,1))				RWOP_ERR_QUIT(rwops); /* we are in read/write mode */

	if (0!=rwops->seek(rwops,0L,RW_SEEK_SET))			RWOP_ERR_QUIT(rwops);					

	if (20!=rwops->seek(rwops,-7,RW_SEEK_END))			RWOP_ERR_QUIT(rwops);					

	if (7!=rwops->read(rwops,test_buf,1,7))				RWOP_ERR_QUIT(rwops);		

	if (SDL_memcmp(test_buf,"1234567",7))				RWOP_ERR_QUIT(rwops);		

	if (0!=rwops->read(rwops,test_buf,1,1))				RWOP_ERR_QUIT(rwops);		

	if (0!=rwops->read(rwops,test_buf,10,100))			RWOP_ERR_QUIT(rwops);		

	if (0!=rwops->seek(rwops,-27,RW_SEEK_CUR))			RWOP_ERR_QUIT(rwops);		

	if (2!=rwops->read(rwops,test_buf,10,3))			RWOP_ERR_QUIT(rwops);				

	if (SDL_memcmp(test_buf,"12345678901234567890",20))	RWOP_ERR_QUIT(rwops);

	rwops->close(rwops);

	printf("test3 OK\n");

/* test 4: same in r+ mode */

	rwops = SDL_RWFromFile(FBASENAME1,"rb+"); /* write + read + file must exists, no truncation */		

	if (!rwops)											RWOP_ERR_QUIT(rwops);

	if (1 != rwops->write(rwops,"1234567890",10,1) )	RWOP_ERR_QUIT(rwops);		

	if (10 != rwops->write(rwops,"1234567890",1,10) )	RWOP_ERR_QUIT(rwops);		

	if (7 != rwops->write(rwops,"1234567",1,7) )		RWOP_ERR_QUIT(rwops);		

	if (0!=rwops->seek(rwops,0L,RW_SEEK_SET))			RWOP_ERR_QUIT(rwops);					

	if (1!=rwops->read(rwops,test_buf,1,1))				RWOP_ERR_QUIT(rwops); /* we are in read/write mode */

	if (0!=rwops->seek(rwops,0L,RW_SEEK_SET))			RWOP_ERR_QUIT(rwops);					

	if (20!=rwops->seek(rwops,-7,RW_SEEK_END))			RWOP_ERR_QUIT(rwops);					

	if (7!=rwops->read(rwops,test_buf,1,7))				RWOP_ERR_QUIT(rwops);		

	if (SDL_memcmp(test_buf,"1234567",7))				RWOP_ERR_QUIT(rwops);		

	if (0!=rwops->read(rwops,test_buf,1,1))				RWOP_ERR_QUIT(rwops);		

	if (0!=rwops->read(rwops,test_buf,10,100))			RWOP_ERR_QUIT(rwops);		

	if (0!=rwops->seek(rwops,-27,RW_SEEK_CUR))			RWOP_ERR_QUIT(rwops);		

	if (2!=rwops->read(rwops,test_buf,10,3))			RWOP_ERR_QUIT(rwops);				

	if (SDL_memcmp(test_buf,"12345678901234567890",20))	RWOP_ERR_QUIT(rwops);

	rwops->close(rwops);

	printf("test4 OK\n");

/* test5 : append mode */

	rwops = SDL_RWFromFile(FBASENAME1,"ab+"); /* write + read + append */		

	if (!rwops)											RWOP_ERR_QUIT(rwops);

	if (1 != rwops->write(rwops,"1234567890",10,1) )	RWOP_ERR_QUIT(rwops);		

	if (10 != rwops->write(rwops,"1234567890",1,10) )	RWOP_ERR_QUIT(rwops);		

	if (7 != rwops->write(rwops,"1234567",1,7) )		RWOP_ERR_QUIT(rwops); 	

	if (0!=rwops->seek(rwops,0L,RW_SEEK_SET))			RWOP_ERR_QUIT(rwops);					

	if (1!=rwops->read(rwops,test_buf,1,1))				RWOP_ERR_QUIT(rwops); 

	if (0!=rwops->seek(rwops,0L,RW_SEEK_SET))			RWOP_ERR_QUIT(rwops);					

	if (20+27!=rwops->seek(rwops,-7,RW_SEEK_END))		RWOP_ERR_QUIT(rwops);					

	if (7!=rwops->read(rwops,test_buf,1,7))				RWOP_ERR_QUIT(rwops);		

	if (SDL_memcmp(test_buf,"1234567",7))				RWOP_ERR_QUIT(rwops);		

	if (0!=rwops->read(rwops,test_buf,1,1))				RWOP_ERR_QUIT(rwops);		

	if (0!=rwops->read(rwops,test_buf,10,100))			RWOP_ERR_QUIT(rwops);		

	if (27!=rwops->seek(rwops,-27,RW_SEEK_CUR))			RWOP_ERR_QUIT(rwops);

	if (0!=rwops->seek(rwops,0L,RW_SEEK_SET))			RWOP_ERR_QUIT(rwops);

	if (3!=rwops->read(rwops,test_buf,10,3))			RWOP_ERR_QUIT(rwops);				

	if (SDL_memcmp(test_buf,"123456789012345678901234567123",30))	

														RWOP_ERR_QUIT(rwops);

	rwops->close(rwops);

	printf("test5 OK\n");

	cleanup();

	return 0; /* all ok */

}