/*
   Copyright (C) 1999-2006 Id Software, Inc. and contributors.
   For a list of contributors, see the accompanying CONTRIBUTORS file.

   This file is part of GtkRadiant.

   GtkRadiant 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.

   GtkRadiant 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 GtkRadiant; if not, write to the Free Software
   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 */

/*
   Camera plugin for GtkRadiant
   Copyright (C) 2002 Splash Damage Ltd.
 */

#include "camera.h"

void Sys_ERROR( char* text, ... ){
	va_list argptr;
	char buf[32768];

	va_start( argptr,text );
	vsprintf( buf, text,argptr );
	va_end( argptr );

	Sys_Printf( "Camera::ERROR->%s", buf );
}

char* UnixToDosPath( char* path ){
#ifndef WIN32
	return path;
#else
	for ( char* p = path; *p; p++ )
	{
		if ( *p == '/' ) {
			*p = '\\';
		}
	}
	return path;
#endif
}

void ExtractFilePath( const char *path, char *dest ){
	const char *src;

	src = path + strlen( path ) - 1;

//
// back up until a \ or the start
//
	while ( src != path && *( src - 1 ) != '/' && *( src - 1 ) != '\\' )
		src--;

	memcpy( dest, path, src - path );
	dest[src - path] = 0;
}

const char* ExtractFilename( const char* path ){
	char* p = strrchr( path, '/' );
	if ( !p ) {
		p = strrchr( path, '\\' );

		if ( !p ) {
			return path;
		}
	}
	return ++p;
}

int Q_stricmp( const char *s1, const char *s2 ) {
	return string_equal_nocase( s1, s2 );
}

/*
   ==============
   FileExists
   ==============
 */
bool FileExists( const char *filename ){
	FILE    *f;

	f = fopen( filename, "r" );
	if ( !f ) {
		return false;
	}
	fclose( f );
	return true;
}

//
// command buffer
// empty wrappers, don't really use them here
//
void Cbuf_AddText( const char *text ) {};
void Cbuf_Execute( void ) {};

//
// Common
//

void CDECL Com_Error( int level, const char *error, ... ){
	va_list argptr;
	char buf[32768];

	va_start( argptr,error );
	vsprintf( buf, error,argptr );
	va_end( argptr );

	Sys_Printf( "Camera::ERROR->%s", buf );
}

void CDECL Com_Printf( const char* msg, ... ){
	va_list argptr;
	char buf[32768];

	va_start( argptr,msg );
	vsprintf( buf, msg,argptr );
	va_end( argptr );

	Sys_Printf( "Camera::%s", buf );
}

void CDECL Com_DPrintf( const char* msg, ... ){
#ifdef _DEBUG
	va_list argptr;
	char buf[32768];

	va_start( argptr,msg );
	vsprintf( buf, msg,argptr );
	va_end( argptr );

	Sys_Printf( "Camera::%s", buf );
#endif
}

void *Com_Allocate( int bytes ) {
	return( malloc( bytes ) );
}

void Com_Dealloc( void *ptr ) {
	free( ptr );
}

//
// Filesystem
//

#ifdef WIN32
	#pragma warning(disable : 4311)
	#pragma warning(disable : 4312)
#endif

int FS_Read( void *buffer, int len, fileHandle_t f ) {
	return fread( buffer, len, 1, (FILE *)f );
}

int FS_Write( const void *buffer, int len, fileHandle_t h ) {
	return fwrite( buffer, len, 1, (FILE *)h );
}

int FS_ReadFile( const char *qpath, void **buffer ) {
	fileHandle_t h;
	byte*         buf;
	int len;

	buf = NULL;

	len = FS_FOpenFileRead( qpath, &h, qfalse );

	if ( h == 0 ) {
		if ( buffer ) {
			*buffer = NULL;
		}

		return -1;
	}

	buf = (byte *)Com_Allocate( len + 1 );

	*buffer = buf;

	FS_Read( buf, len, h );

	buf[len] = 0;
	FS_FCloseFile( h );

	return len;
}

void FS_FreeFile( void *buffer ) {
	Com_Dealloc( buffer );
}

int FS_FOpenFileRead( const char *filename, fileHandle_t *file, bool uniqueFILE ) {
	FILE  *fh;
	long len;

	fh = fopen( filename, "rb" );
	*file = *(fileHandle_t *)&fh;

	if ( file ) {
		fseek( fh, 0, SEEK_END );
		len = ftell( fh );
		rewind( fh );
		return len;
	}
	else{
		return -1;
	}
}

fileHandle_t FS_FOpenFileWrite( const char *filename ) {
	FILE          *fh;
	fileHandle_t f;

	memset( &f, 0, sizeof( f ) );

	fh = fopen( filename, "wb" );

	f = (fileHandle_t)fh;
	return f;
}

void FS_FCloseFile( fileHandle_t f ) {
	fclose( (FILE *)f );
}