/* $Id$ */

/*
 * include.c (c) 1998,1999 Brian Smith
 */

#include <stdlib.h>
#include <stdio.h>
#include <conio.h>
#include <io.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <string.h>

extern int files;

FILE *cfgfile, *installfile;
char *INSTALLER_APPLICATION;
char *INSTALLER_VERSION;
char *INSTALLER_TITLE;
char *INSTALLER_PATH;
char *INSTALLER_FOLDER;
char *INSTALLER_PROGRAM;
char *INSTALLER_SHADOW;
char *INSTALLER_OBJECT;
char *INSTALLER_SETS;
char *INSTALLER_SYSVAR;
char *INSTALLER_SYSLINE;
char *INSTALLER_PACKAGES[20];
char *INSTALLER_CONFIRM_WPS;
char *INSTALLER_CONFIRM_CONFIGSYS;
char *INSTALLER_CONFIRM_OVERWRITE;
int INSTALLER_BITMAP_WIDTH;
int INSTALLER_BITMAP_HEIGHT;
int INSTALLER_PACKAGE_COUNT=0;

int packagefiles[20];
char *packagefilename[20];

void resetglobals(void);

int include_unpack(char *aname);

void append_file(char *filename)
{
	FILE *appendfile;
	int amnt;
	char buffer[512];

	if((appendfile = fopen(filename, "rb"))==NULL)
	{
		printf("Error opening %s for reading!\n", filename);
		exit(3);
	}
	while(!feof(appendfile))
	{
		amnt = fread(buffer, 1, 512, appendfile);
		fwrite(buffer, 1, amnt, installfile);
	}
	fclose(appendfile);
}

void getline(FILE *f, char *entry, char *entrydata)
{
	char in[4096];
	int z;

	memset(in, 0, 4096);
	fgets(in, 4095, f);

	if(in[strlen(in)-1] == '\n')
		in[strlen(in)-1] = 0;

	if(in[0] != '#')
	{
		for(z=0;z<strlen(in);z++)
		{
			if(in[z] == '=')
			{
				in[z] = 0;
				strcpy(entry, in);
				strcpy(entrydata, &in[z+1]);
				return;
			}
		}
	}
	strcpy(entry, "");
	strcpy(entrydata, "");
}

int main(int argc, char *argv[])
{
	char entry[8096], entrydata[8096];
	int z;

	printf("Packinst- version 2.0 (c) 1999-2000 DBSoft\n\n");
	if(argc!=2)
	{
		printf("Usage: Packinst <filename.cfg>\n");
		exit(1);
      }
	if((cfgfile = fopen(argv[1], "r"))==NULL)
	{
		printf("Error opening config file \"%s\"!\n", argv[1]);
		exit(2);
	}
	if((installfile = fopen("install.exe", "wb"))==NULL)
	{
		printf("Error opening install.exe for writing!\n");
		exit(3);
	}
#if 0
	printf("Adding resources to sfx.exe...\n");
	system("rc install.rc sfx.exe > NUL");
#endif
	printf("Creating installer...\n");
	append_file("sfx.exe");
	fwrite("DBSOFT-HEADER", 1, 13, installfile);
	while(!feof(cfgfile))
	{
		getline(cfgfile, entry, entrydata);
		if(stricmp(entry, "INSTALLER_APPLICATION") == 0)
			INSTALLER_APPLICATION = (char *)strdup(entrydata);
		if(stricmp(entry, "INSTALLER_VERSION") == 0)
			INSTALLER_VERSION = (char *)strdup(entrydata);
		if(stricmp(entry, "INSTALLER_TITLE") == 0)
			INSTALLER_TITLE = (char *)strdup(entrydata);
		if(stricmp(entry, "INSTALLER_PATH") == 0)
			INSTALLER_PATH = (char *)strdup(entrydata);
		if(stricmp(entry, "INSTALLER_FOLDER") == 0)
			INSTALLER_FOLDER = (char *)strdup(entrydata);
		if(stricmp(entry, "INSTALLER_PROGRAM") == 0)
			INSTALLER_PROGRAM = (char *)strdup(entrydata);
		if(stricmp(entry, "INSTALLER_SHADOW") == 0)
			INSTALLER_SHADOW = (char *)strdup(entrydata);
		if(stricmp(entry, "INSTALLER_OBJECT") == 0)
			INSTALLER_OBJECT = (char *)strdup(entrydata);
		if(stricmp(entry, "INSTALLER_SETS") == 0)
			INSTALLER_SETS = (char *)strdup(entrydata);
		if(stricmp(entry, "INSTALLER_SYSVAR") == 0)
			INSTALLER_SYSVAR = (char *)strdup(entrydata);
		if(stricmp(entry, "INSTALLER_SYSLINE") == 0)
			INSTALLER_SYSLINE = (char *)strdup(entrydata);
		if(stricmp(entry, "INSTALLER_CONFIRM_WPS") == 0)
			INSTALLER_CONFIRM_WPS = (char *)strdup(entrydata);
		if(stricmp(entry, "INSTALLER_CONFIRM_CONFIGSYS") == 0)
			INSTALLER_CONFIRM_CONFIGSYS = (char *)strdup(entrydata);
		if(stricmp(entry, "INSTALLER_CONFIRM_OVERWRITE") == 0)
			INSTALLER_CONFIRM_OVERWRITE = (char *)strdup(entrydata);
		if(stricmp(entry, "INSTALLER_PACKAGE") == 0)
		{
			for(z=0;z<strlen(entrydata);z++)
			{
				if(entrydata[z] == ',')
				{
					entrydata[z] = 0;
					packagefilename[INSTALLER_PACKAGE_COUNT] = (char *)strdup(entrydata);
					INSTALLER_PACKAGES[INSTALLER_PACKAGE_COUNT] = (char *)strdup(&entrydata[z+1]);
				}
			}
			resetglobals();
			files=0;
			include_unpack(packagefilename[INSTALLER_PACKAGE_COUNT]);
			packagefiles[INSTALLER_PACKAGE_COUNT] = files;
			INSTALLER_PACKAGE_COUNT++;
		}
	}
	fclose(cfgfile);
	fprintf(installfile, "%s-%s-%s-%s-%s-%s-%s-%s-%s-%s-%s-%s-%s-%s-%d",
			INSTALLER_APPLICATION, INSTALLER_VERSION, INSTALLER_TITLE,
			INSTALLER_PATH, INSTALLER_FOLDER, INSTALLER_PROGRAM,
			INSTALLER_SHADOW, INSTALLER_OBJECT, INSTALLER_SETS, INSTALLER_SYSVAR,
			INSTALLER_SYSLINE, INSTALLER_CONFIRM_WPS, INSTALLER_CONFIRM_CONFIGSYS,
			INSTALLER_CONFIRM_OVERWRITE, INSTALLER_PACKAGE_COUNT);
	for(z=0;z<INSTALLER_PACKAGE_COUNT;z++)
		fprintf(installfile, "-%s", INSTALLER_PACKAGES[z]);
	fwrite("*", 1, 1, installfile);
	for(z=0;z<INSTALLER_PACKAGE_COUNT;z++)
	{
		struct stat blah;

		stat(packagefilename[z], &blah);
		fprintf(installfile, "DBSOFT-ACE%d%d-%lu*", z, packagefiles[z], blah.st_size);
		append_file(packagefilename[z]);
		printf("Package: %s - %d files in %s (%lu bytes).\n", INSTALLER_PACKAGES[z], packagefiles[z], packagefilename[z], blah.st_size);
	}
	fclose(installfile);
	fclose(cfgfile);
	return 0;
}