X-Git-Url: https://de.git.xonotic.org/?p=voretournament%2Fvoretournament.git;a=blobdiff_plain;f=misc%2Fmediasource%2Ffteqcc-src%2Fcomprout.c;fp=misc%2Fmediasource%2Ffteqcc-src%2Fcomprout.c;h=0000000000000000000000000000000000000000;hp=a2a7a3bd80340b9f1b722c280a88214b2329c383;hb=2376f1d3e3ea56046cca61d87cb8d648034e1a11;hpb=71c85af29fb024d5657f383c6e6f33720cd2c25e

diff --git a/misc/mediasource/fteqcc-src/comprout.c b/misc/mediasource/fteqcc-src/comprout.c
deleted file mode 100644
index a2a7a3bd..00000000
--- a/misc/mediasource/fteqcc-src/comprout.c
+++ /dev/null
@@ -1,252 +0,0 @@
-//compile routines
-
-#include "qcc.h"
-#undef progfuncs
-
-char errorfile[128];
-int errorline;
-
-progfuncs_t *qccprogfuncs;
-
-#include <setjmp.h>
-
-extern int qcc_compileactive;
-jmp_buf qcccompileerror;
-char qcc_gamedir[128];
-void QCC_PR_ResetErrorScope(void);
-
-
-
-#ifdef MINIMAL
-
-#else
-
-int qccalloced;
-int qcchunksize;
-char *qcchunk;
-void *qccHunkAlloc(size_t mem)
-{
-	mem = (mem + 7)&~7;
-
-	qccalloced+=mem;
-	if (qccalloced > qcchunksize)
-		QCC_Error(ERR_INTERNAL, "Compile hunk was filled");
-
-	memset(qcchunk+qccalloced-mem, 0, mem);
-	return qcchunk+qccalloced-mem;
-}
-void qccClearHunk(void)
-{
-	if (qcchunk)
-	{
-		free(qcchunk);
-		qcchunk=NULL;
-	}
-}
-int qccpersisthunk;
-void PostCompile(void)
-{
-	if (!qccpersisthunk)
-		qccClearHunk();
-
-	if (asmfile)
-	{
-		fclose(asmfile);
-		asmfile = NULL;
-	}	
-}
-pbool PreCompile(void)
-{
-	QCC_PR_ResetErrorScope();
-
-	qccClearHunk();
-	strcpy(qcc_gamedir, "");
-	qcchunk = malloc(qcchunksize=128*1024*1024);
-	while(!qcchunk && qcchunksize > 8*1024*1024)
-	{
-		qcchunksize /= 2;
-		qcchunk = malloc(qcchunksize);
-	}
-	qccalloced=0;
-
-	return !!qcchunk;
-}
-
-void QCC_main (int argc, char **argv);
-void QCC_ContinueCompile(void);
-void QCC_FinishCompile(void);
-
-int comp_nump;char **comp_parms;
-//void Editor(char *fname, int line, int numparms, char **compileparms);
-pbool CompileParams(progfuncs_t *progfuncs, int doall, int nump, char **parms)
-{
-	comp_nump = nump;
-	comp_parms = parms;
-	*errorfile = '\0';
-	qccprogfuncs = progfuncs;
-	if (setjmp(qcccompileerror))
-	{
-		PostCompile();
-		if (*errorfile)
-		{
-			if (!externs->useeditor)
-				printf("Error in %s on line %i\n", errorfile, errorline);
-			else
-				externs->useeditor(progfuncs, errorfile, errorline, nump, parms);
-		}
-		return false;
-	}
-
-	if (!PreCompile())
-		return false;
-	QCC_main(nump, parms);
-
-	while(qcc_compileactive)
-		QCC_ContinueCompile();
-
-	PostCompile();
-
-	return true;
-}
-int Comp_Begin(progfuncs_t *progfuncs, int nump, char **parms)
-{
-	comp_nump = nump;
-	comp_parms = parms;
-	qccprogfuncs = progfuncs;
-	*errorfile = '\0';
-	if (setjmp(qcccompileerror))
-	{
-		PostCompile();
-		if (*errorfile)
-			externs->useeditor(progfuncs, errorfile, errorline, nump, parms);
-		return false;
-	}
-
-	if (!PreCompile())
-		return false;
-	QCC_main(nump, parms);
-
-	return true;
-}
-int Comp_Continue(progfuncs_t *progfuncs)
-{	
-	qccprogfuncs = progfuncs;
-	if (setjmp(qcccompileerror))
-	{
-		PostCompile();
-		if (*errorfile && externs->useeditor)
-			externs->useeditor(progfuncs, errorfile, errorline, comp_nump, comp_parms);
-		return false;
-	}
-
-	if (qcc_compileactive)
-		QCC_ContinueCompile();
-	else
-	{
-		PostCompile();
-
-		if (*errorfile && externs->useeditor)
-			externs->useeditor(progfuncs, errorfile, errorline, comp_nump, comp_parms);
-
-		return false;
-	}
-
-	return true;
-}
-#endif
-pbool CompileFile(progfuncs_t *progfuncs, char *filename)
-{	
-#ifdef MINIMAL
-	return false;
-#else
-	char srcfile[32];
-	char newname[32];
-	static char *p[5];
-	int parms;
-	char *s, *s2;
-	
-	p[0] = NULL;
-	parms = 1;
-	
-	strcpy(newname, filename);
-	s = newname;
-	if (strchr(s+1, '/'))
-	{
-		while(1)
-		{
-			s2 = strchr(s+1, '/');
-			if (!s2)
-			{
-				*s = '\0';
-				break;
-			}
-			s = s2;
-		}
-		p[parms] = "-src";
-		p[parms+1] = newname;
-		parms+=2;	
-		
-		strcpy(srcfile, s+1);
-		srcfile[strlen(srcfile)-4] = '\0';
-		strcat(srcfile, ".src");
-
-		if (externs->FileSize(qcva("%s/%s", newname, srcfile))>0)
-		{
-			p[parms] = "-srcfile";
-			p[parms+1] = srcfile;
-			parms+=2;
-		}
-	}
-	else
-	{
-		p[parms] = "-srcfile";
-		p[parms+1] = newname;
-		newname[strlen(newname)-4] = '\0';
-		strcat(newname, ".src");
-		parms+=2;
-	}
-//	p[2][strlen(p[2])-4] = '\0';
-//	strcat(p[2], "/");
-
-	while (!CompileParams(progfuncs, true, parms, p))
-	{
-		return false;
-	}
-	return true;
-#endif
-}
-
-int QC_strncasecmp(const char *s1, const char *s2, int n)
-{
-	int             c1, c2;
-	
-	while (1)
-	{
-		c1 = *s1++;
-		c2 = *s2++;
-
-		if (!n--)
-			return 0;               // strings are equal until end point
-		
-		if (c1 != c2)
-		{
-			if (c1 >= 'a' && c1 <= 'z')
-				c1 -= ('a' - 'A');
-			if (c2 >= 'a' && c2 <= 'z')
-				c2 -= ('a' - 'A');
-			if (c1 != c2)
-				return -1;              // strings not equal
-		}
-		if (!c1)
-			return 0;               // strings are equal
-	}
-	
-	return -1;
-}
-
-void editbadfile(char *fname, int line)
-{
-	strcpy(errorfile, fname);
-	errorline = line;
-}
-