Utils/Libs/GLib/MISC.CPP

@@ -0,0 +1,425 @@
+//--------------------------------------------------------------------------
+//	Miscellaneous functions
+//	Box Files
+//
+//	Gary Liddon @ Probe
+//	21/11/92
+//
+//	(c)1992-1998 Gary Robert Liddon
+//
+//--------------------------------------------------------------------------
+
+
+//--------------------------------------------------------------------------
+//	Includes
+//	--------
+#include "gtypes.h"
+#include <vector>
+#include <io.h>
+#include <string.h>
+#include <conio.h>
+
+#include <fstream>
+
+#include "misc.hpp"
+#include "gfname.hpp"
+
+using namespace std;
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+
+
+bool copyFile(char const * Dest,char const * Source,bool Overwrite)
+{
+	ifstream		InFile;
+	vector<u8>		Data;
+
+	int		Size;
+
+	Size=FileSize(Source);
+
+	if (Size >= 0)
+		{
+		Data.resize(Size);
+
+		ifstream	In;
+		In.open(Source,ios::binary);
+		In.read((char *)(&Data[0]),Size);
+		In.close();
+
+		if (In)
+			{
+			ofstream		OutFile;
+			int				OpenMode;
+
+			OpenMode=ios::binary;
+
+			if (Overwrite)
+				OpenMode|=ios::trunc;
+
+			OutFile.open(Dest,OpenMode);
+
+			if (OutFile)
+				{
+				OutFile.write((char*)&Data[0],Data.size());
+				OutFile.close();
+				}
+			else
+				GObject::Error(ERR_FATAL,"Unable to open out file %s",Dest);
+			}
+		else
+			GObject::Error(ERR_FATAL,"Unable to open in file %s",Source);
+		}
+
+	return(true);
+}
+
+int FileCycler::DoCycle(char const *Spec,bool Recurse)
+{
+	int 	FileNum=0;
+	int 	Handle;
+	GFName  InName(Spec);
+	char *	Speccy;
+
+	if(!(Speccy=strdup(Spec)))
+		GObject::Error(ERM_OUTOFMEM);
+
+	_finddata_t FindBlock;
+
+	/* Do dirs first */
+
+	if (Recurse)
+		{
+		GFName	DirName(Spec);
+
+		DirName.File("*");
+		DirName.Ext("*");
+
+		if ((Handle = _findfirst((char *) DirName.FullName(),&FindBlock))!=-1)
+			{
+			BOOL	Done;
+
+			Done=FALSE;
+	
+			while (!Done)
+				{
+				if (FindBlock.attrib&_A_SUBDIR)
+					{
+					if (strcmp(FindBlock.name,".") && strcmp(FindBlock.name,".."))
+						{
+						GFName	TempName(InName.FullName());
+
+						if (TempName.Dir())
+							{
+							char *	NewSub;
+
+							if (!(NewSub=new char [strlen(TempName.Dir()) +strlen (FindBlock.name)+1+2] ))
+								GObject::Error(ERM_OUTOFMEM);
+
+							sprintf(NewSub,"%s\\%s",TempName.Dir(),FindBlock.name);
+
+							TempName.Dir(NewSub);
+
+							delete NewSub;
+							}
+						else
+							TempName.Dir(FindBlock.name);
+
+						DoCycle(TempName.FullName(),Recurse);
+						}
+					}
+				Done=_findnext(Handle,&FindBlock);
+				}
+			}
+		}	
+
+	if ((Handle = _findfirst(Speccy,&FindBlock))!=-1)
+		{
+		BOOL	Done;
+		Done=FALSE;
+
+		while (!Done)
+			{
+
+			if (!(FindBlock.attrib&_A_SUBDIR))
+				{
+				GFName	TempName(InName.FullName());
+				GFName	Temp2(FindBlock.name);
+				TempName.File(Temp2.File());
+				TempName.Ext(Temp2.Ext());
+				FileCallback(TempName.FullName(),FileNum++);
+				}
+
+			Done=_findnext(Handle,&FindBlock);
+			}
+		}
+
+	free(Speccy);
+
+	return FileNum;
+}
+
+
+//ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+//	Cycle through files of a particular spec, Returns Number of Files found
+//	ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+int	CycleFiles(char const *Spec,void (*Func)(char const *Fname,int Num),BOOL Recurse)
+{
+	int 	FileNum=0;
+	int 	Handle;
+	GFName  InName(Spec);
+	char *	Speccy;
+
+	if(!(Speccy=strdup(Spec)))
+		GObject::Error(ERM_OUTOFMEM);
+
+	_finddata_t FindBlock;
+
+	/* Do dirs first */
+
+	if (Recurse)
+		{
+		GFName	DirName(Spec);
+
+		DirName.File("*");
+		DirName.Ext("*");
+
+		if ((Handle = _findfirst((char *) DirName.FullName(),&FindBlock))!=-1)
+			{
+			BOOL	Done;
+
+			Done=FALSE;
+	
+			while (!Done)
+				{
+				if (FindBlock.attrib&_A_SUBDIR)
+					{
+					if (strcmp(FindBlock.name,".") && strcmp(FindBlock.name,".."))
+						{
+						GFName	TempName(InName.FullName());
+
+						if (TempName.Dir())
+							{
+							char *	NewSub;
+
+							if (!(NewSub=new char [strlen(TempName.Dir()) +strlen (FindBlock.name)+1+2] ))
+								GObject::Error(ERM_OUTOFMEM);
+
+							sprintf(NewSub,"%s\\%s",TempName.Dir(),FindBlock.name);
+
+							TempName.Dir(NewSub);
+
+							delete NewSub;
+							}
+						else
+							TempName.Dir(FindBlock.name);
+
+						CycleFiles(TempName.FullName(),Func,Recurse);
+						}
+					}
+				Done=_findnext(Handle,&FindBlock);
+				}
+			}
+		}	
+
+	if ((Handle = _findfirst(Speccy,&FindBlock))!=-1)
+		{
+		BOOL	Done;
+		Done=FALSE;
+
+		while (!Done)
+			{
+
+			if (!(FindBlock.attrib&_A_SUBDIR))
+				{
+				GFName	TempName(InName.FullName());
+				GFName	Temp2(FindBlock.name);
+				TempName.File(Temp2.File());
+				TempName.Ext(Temp2.Ext());
+				Func(TempName.FullName(),FileNum++);
+				}
+
+			Done=_findnext(Handle,&FindBlock);
+			}
+		}
+
+	free(Speccy);
+
+	return FileNum;
+}
+
+//ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+//	Get Switch Info
+//	ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+BOOL SwitchInfo(char *String)
+{
+	if (strlen(String)!=3 || (String[2] != '+' && String[2] != '-'))
+		{
+		GObject::Error(ERR_FATAL,"%s option formatted incorrectly",String);
+		return 0;
+		}
+	else
+		return String[2]=='+' ? 1 : 0;
+}
+
+//ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+//	Command Line Constructor
+//	ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+CommandLine::CommandLine(int argc,char **argv,char *(*Func)(char *String,int Num))
+{
+	LastItem=NULL;
+	InStream=NULL;
+	CommandItem=0;
+
+	if (!(LastItem=new char[1000]))
+		Error(ERM_OUTOFMEM);
+
+	MyArgc=argc;
+	MyArgv=argv;
+
+	GetNextItem();			// Skip progname
+
+	int x=0;
+
+	char *SpamString;
+
+	while ((SpamString=GetNextItem()))
+		{
+		Func(SpamString,x);
+		x++;
+		}
+}
+
+//ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+//	Command Line Destructor
+//	ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+CommandLine::~CommandLine()
+{
+	if (InStream)
+		delete InStream;
+
+	if (LastItem)
+		delete LastItem;
+}
+
+//ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+//	Get The Next Item in the Commandline string
+//	ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+char *CommandLine::GetNextItem()
+{
+	char *RetStuff=NULL;
+
+	if (!InStream)
+		RetStuff=GetNextCommandLineItem();
+	else
+		RetStuff=GetNextScriptFileItem();
+			
+	return RetStuff;
+}
+
+//ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+//	Get The Next Item in the Argv list
+//	ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+char *CommandLine::GetNextCommandLineItem()
+{
+	char *RetStuff=NULL;
+
+	if (CommandItem!=MyArgc)
+		{
+		strcpy(LastItem,MyArgv[CommandItem]);
+		RetStuff=LastItem;
+
+		CommandItem++;
+
+		if (*RetStuff=='@')
+			{
+			if (InStream)
+				delete InStream;
+
+			if (!(InStream = new ifstream (&RetStuff[1])))
+				Error(ERM_OUTOFMEM);
+
+			if (!(*InStream))
+				Error(ERR_FATAL,"Cannot open script file %s",&RetStuff[1]);
+
+			if (!(RetStuff=GetNextScriptFileItem()))
+				RetStuff=GetNextCommandLineItem();
+			}
+		}
+
+	return RetStuff;
+}
+
+
+
+//ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+//	Get The Next Item from the currently open script file
+//	ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+char *CommandLine::GetNextScriptFileItem()
+{
+	char *RetStuff=NULL;
+
+	(*InStream)>>LastItem;
+
+	if (InStream->eof())
+		{
+		delete InStream;
+		InStream=NULL;
+		RetStuff=GetNextCommandLineItem();
+		}
+	else
+		RetStuff=LastItem;
+
+	return RetStuff;
+}
+
+//ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+//	Does this file exist?
+//	ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+bool FileExists(const char *String)
+{
+	ifstream	InStream;
+	bool		RetVal;
+
+	InStream.open(String,ios::in);
+	if (InStream)
+		RetVal=true;
+	else
+		RetVal=false;
+
+	InStream.close();
+	return(RetVal);
+}
+
+
+//ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+//	What is the size of this file?
+//	ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+int FileSize(const char *String)
+{
+	ifstream	InStream;
+	int			RetVal;
+
+	RetVal=-1;
+
+	InStream.open(String,ios::in);
+
+	if (InStream)
+		{
+		InStream.seekg(0,ios::end);
+		RetVal=InStream.tellg();
+		InStream.close();
+		}
+
+	return(RetVal);
+}
+
+
+
+//ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
+//ends