cd_maker.cpp

/********************************************************************** <BR>
   This file is part of Crack dot Com's free source code release of
   Golgotha. <a href="http://www.crack.com/golgotha_release"> <BR> for
   information about compiling & licensing issues visit this URL</a>
   <PRE> If that doesn't help, contact Jonathan Clark at
   golgotha_source@usa.net (Subject should have "GOLG" in it)
 ***********************************************************************/

#include "main/main.h"
#include "error/alert.h"
#include "error/error.h"
#include "file/file.h"
#include "string/str_checksum.h"
#include "memory/malloc.h"
#include <stdio.h>
int G1_HZ=10; //To please the linker (from golg__main)
struct cd_file
{

	i4_str * name;
	w32 length;
	w32 checksum;

	void add(const i4_const_str &str)
	{
		char tmp[256];

		i4_os_string(str, tmp,256);
		for (char * c=tmp; * c; c++)
		{
			if (* c=='\\')
			{
				* c='/';
			}
		}

		name=new i4_str(tmp);
		i4_file_class * fp=i4_open(str);
		I4_ASSERT(fp,"no fp");
		length=fp->size();
		delete fp;
	}

} flist[10000];


int flist_compare(const void * a, const void * b)
{
	if (((cd_file *)a)->checksum > ((cd_file *)b)->checksum)
	{
		return 1;
	}
	else if (((cd_file *)a)->checksum < ((cd_file *)b)->checksum)
	{
		return -1;
	}
	else
	{
		return 0;
	}

}

void i4_main(w32 argc, i4_const_str * argv)
{
	i4_init();



	if (argc>1)
	{
		i4_string_man.load(argv[1]);
	}
	else
	{
		i4_string_man.load("..\\cd_maker\\resource.res");
	}

	i4_debug->printf("Building CD image golgotha.cd");


	i4_const_str * files=i4_string_man.get_array("cd_files");



	int i, tfiles=0,j;

	for (i=0; !files[i].null(); i++)
	{
		i4_directory_struct d;
		if (i4_get_directory(files[i], d))
		{
			for (j=0; j<d.tfiles; j++)
			{
				i4_str * r=i4_const_str("%S/%S").sprintf(150,&files[i],d.files[j]);

				flist[tfiles++].add(*r);
				delete r;
			}
		}
		else
		{
			i4_file_status_struct return_stat;
			if (i4_get_status(files[i], return_stat))
			{
				flist[tfiles++].add(files[i]);
			}
			else
			{
				i4_alert("File does not exsist : %S",100,&files[i]);
			}
		}
	}

	i4_file_class * out=i4_open("golgotha.cd", I4_WRITE);
	if (!out)
	{
		i4_error("could not open output file");
	}


	out->write_32(tfiles);

	w32 offset=4 +           // total files
				(12 * tfiles); // directory

	for (i=0; i<tfiles; i++)
	{
		flist[i].checksum = i4_str_checksum(*flist[i].name);
	}

	qsort(flist, tfiles, sizeof(flist[0]), flist_compare);


	for (i=0; i<tfiles; i++)
	{
		out->write_32(offset);
		offset+=flist[i].length;

		if (i!=0 && flist[i-1].checksum==flist[i].checksum)
		{
			i4_error("2 files have same checkum");
		}

		out->write_32(flist[i].checksum);
		out->write_32(flist[i].length);
	}

	int tsize=0;
	for (i=0; i<tfiles; i++)
	{
		i4_file_class * fp=i4_open(*flist[i].name);

		if(fp)
		{
			int off=out->tell();

			char fn[100];
			i4_os_string(*flist[i].name, fn, 100);
			printf("%d bytes Adding '%s' checksum = %x, off=%d\n",
				   flist[i].length,  fn, flist[i].checksum, off);

			tsize+=flist[i].length;

			if (flist[i].length)
			{
				w8 buf[64*1024];

				int size=flist[i].length;
				while (size)
				{
					int to_read=size>sizeof(buf) ? sizeof(buf) : size;

					if (fp->read(buf, to_read)!=to_read)
					{
						i4_error("file read premature");
					}

					if (out->write(buf, to_read)!=to_read)
					{
						i4_error("write premature, out of space?");
					}

					size-=to_read;
				}
			}

			delete fp;
		}
		else
		{
			char buf[100];
			i4_os_string(*flist[i].name, buf, 100);
			i4_error("%s : file not found", buf);
		}
	}
	delete out;

	printf("Total size= %d\n", tsize);


	i4_free(files);

	i4_uninit();
}