/***************************************************************************

  CUncompress.c

  (c) 2003-2004 Daniel Campos Fern�dez <danielcampos@netcourrier.com>

  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, 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., 51 Franklin Street, Fifth Floor, Boston,
  MA 02110-1301, USA.

***************************************************************************/

#define __CUNCOMPRESS_C

#include "CUncompress.h"
#include "main.h"
#include <stdio.h>

#define Check_Driver()  if (!THIS->driver) { GB.Error("No driver specified"); return; }


static void set_type(void *_object, const char *type)
{
	if (THIS->stream.desc)
	{
		GB.Error("Type can not be changed while the stream is opened");
		return;
	}

	THIS->driver = COMPRESS_GetDriver(type);
}

static void *create_uncompress(const char *type)
{
	COMPRESS_DRIVER *driver;
	void *_object;

	driver = COMPRESS_GetDriver(type);
	if (!driver)
		return NULL;

	_object = GB.New(GB.FindClass("Uncompress"), NULL, NULL);
	THIS->driver = driver;
	return _object;
}




//*************************************************************************
//#################### INITIALIZATION AND DESTRUCTION #####################
//*************************************************************************



/*************************************************
 Gambas object "Constructor"
 *************************************************/
BEGIN_METHOD_VOID(Uncompress_new)

	THIS->driver=NULL;
	THIS->stream.desc=NULL;

END_METHOD


/*************************************************
 Gambas object "Destructor"
 *************************************************/
BEGIN_METHOD_VOID(Uncompress_free)

	if (THIS->stream.desc && THIS->driver)
		THIS->driver->Compress.Close(&THIS->stream);

END_METHOD


BEGIN_METHOD (Uncompress_File, GB_STRING Source; GB_STRING Target)

	Check_Driver();
	THIS->driver->Uncompress.File(STRING(Source), STRING(Target));

END_METHOD


BEGIN_METHOD(Uncompress_String, GB_STRING Source)

	char *target = NULL;
	unsigned int lent = 0;

	Check_Driver();
	if (!LENGTH(Source)) { GB.ReturnVoidString(); return; }
	
	THIS->driver->Uncompress.String(&target, &lent, STRING(Source), LENGTH(Source));
	
	if (!lent) { GB.ReturnVoidString(); return; }
	GB.ReturnNewString(target, lent);
	GB.Free(POINTER(&target));

END_METHOD


BEGIN_METHOD (Uncompress_Open,GB_STRING Path;)

	Check_Driver();
	
	if (THIS->stream.desc) { GB.Error ("File is already opened"); return; }
	
	THIS->driver->Uncompress.Open(STRING(Path), &THIS->stream);

END_METHOD


BEGIN_PROPERTY (Uncompress_Type)

	if (READ_PROPERTY)
	{
		if (!THIS->driver)
		{	
			GB.ReturnNull();
			return;
		}
		GB.ReturnNewZeroString(THIS->driver->name);
		return;
	}

	set_type(THIS, GB.ToZeroString(PROP(GB_STRING)));
	
END_PROPERTY


BEGIN_METHOD(Uncompress_get, GB_STRING type)

	GB.ReturnObject(create_uncompress(GB.ToZeroString(ARG(type))));

END_METHOD


/*******************************************************************
 Interface declaration
 *******************************************************************/
GB_DESC UncompressDesc[] =
{
  GB_DECLARE("Uncompress", sizeof(CUNCOMPRESS)),
  
  GB_INHERITS("Stream"),
  
  GB_PROPERTY("Type", "s", Uncompress_Type),

  GB_METHOD("_new", NULL, Uncompress_new, NULL),
  GB_METHOD("_free", NULL, Uncompress_free, NULL),
  
  GB_METHOD("String", "s", Uncompress_String,"(Source)s"),
  GB_METHOD("File", NULL, Uncompress_File, "(Source)s(Target)s"),
  GB_METHOD("Open", NULL, Uncompress_Open, "(Path)s"),
    
	GB_STATIC_METHOD("_get", "Uncompress", Uncompress_get, "(Type)s"),

  GB_END_DECLARE
};