shithub: qk1

ref: fc4eb838ab4af811315b80e91164e00d1ec8d6b9
dir: /sys_9.c/

#include <u.h>
#include <libc.h>
#include "quakedef.h"

qboolean isDedicated;
int nostdout = 0;
char *basedir = ".";
char *cachedir = "/tmp";
cvar_t sys_linerefresh = {"sys_linerefresh","0"};	// set for entity display


void Sys_Printf (char *fmt, ...)
{
	char buf[1024];
	va_list arg;
	uchar *p;

	/* FIXME: does not work, fix your megashit code */
	if(nostdout)
		return;
	va_start(arg, fmt);
	vseprint(buf, buf+sizeof(buf), fmt, arg);
	va_end(arg);

	for(p = (uchar *)buf; *p; p++){
		*p &= 0x7f;
		if((*p > 128 || *p < 32) && *p != 10 && *p != 13 && *p != 9)
			print("[%02x]", *p);
		else
			write(1, p, sizeof *p);
	}
}

void Sys_Quit (void)
{
	Host_Shutdown();
	//fcntl (0, F_SETFL, fcntl (0, F_GETFL, 0) & ~FNDELAY);
	exits(nil);
}

void Sys_Error (char *error, ...)
{
	char buf[1024], *out;
	va_list arg;

	/* FIXME: does not work, fix your megashit code */
	//fcntl (0, F_SETFL, fcntl (0, F_GETFL, 0) & ~FNDELAY);
	out = seprint(buf, buf+sizeof(buf), "%s: ", argv0);
	va_start(arg, error);
	out = vseprint(out, buf+sizeof(buf), error, arg);
	va_end(arg);
	write(2, buf, out-buf);
	/* FIXME: newline */
	Host_Shutdown();
	exits("ending");
} 

int Sys_FileTime (char *path)
{
	/* FIXME: man 5 intro, man 2 stat, man 2 fcall */
	uchar	sb[1024];

	if(stat(path, sb, sizeof sb) < 0){
		fprint(2, "%s stat %s: %r\n", argv0, path);
		return -1;
	}

	/* FIXME */
	return *((int *)(sb+25));
}

void Sys_mkdir (char *path)
{
	int	d;

	if((d = create(path, OREAD, DMDIR|0777)) < 0)
		fprint(2, "%s create %s: %r\n", argv0, path);
	else
		close(d);
}

vlong Sys_FileOpenRead (char *path, int *handle)
{
	int	d;
	uchar	bs[1024];

	d = open (path, OREAD);
	*handle = d;
	if(d < 0)
		return -1;
	if(fstat(d, bs, sizeof bs) < 0)
		Sys_Error("%s fstat %s: %r", argv0, path);
	/* FIXME */
	return *((vlong *)(bs+33));
}

int Sys_FileOpenWrite (char *path)
{
	int     d;

	if((d = open(path, OREAD|OTRUNC)) < 0)
		Sys_Error("%s open %s: %r", argv0, path);
	return d;
}

int Sys_FileWrite (int handle, void *src, int count)
{
	return write(handle, src, count);
}

void Sys_FileClose (int handle)
{
	close(handle);
}

void Sys_FileSeek (int handle, int position)
{
	seek(handle, position, 0);
}

int Sys_FileRead (int handle, void *dest, int count)
{
	return read(handle, dest, count);
}

double Sys_FloatTime (void)
{
	static long	secbase;

	if(secbase == 0)
		secbase = time(nil);
	return nsec()/1000000000.0 - secbase;
}

char *Sys_ConsoleInput(void)
{
	static char	text[256];
	int     len;

	if(cls.state == ca_dedicated){
		if((len = read(0, text, sizeof(text))) < 1)
			return nil;
		text[len-1] = '\0';
		return text;
	}
	return nil;
}

void Sys_HighFPPrecision (void)
{
}

void Sys_LowFPPrecision (void)
{
}

void Sys_LineRefresh (void)
{
}

int main (int c, char **v)
{
	double	time, oldtime, newtime;
	quakeparms_t	parms;
	extern int	vcrFile;
	extern int	recording;
	int	j;

	argv0 = *v;

	memset(&parms, 0, sizeof(parms));

	COM_InitArgv(c, v);
	parms.argc = com_argc;
	parms.argv = com_argv;
	parms.memsize = 8*1024*1024;

	j = COM_CheckParm("-mem");
	if(j)
		parms.memsize = (int)(Q_atof(com_argv[j+1]) * 1024*1024);

	parms.membase = malloc(parms.memsize);
	parms.basedir = basedir;

	//fcntl(0, F_SETFL, fcntl (0, F_GETFL, 0) | FNDELAY);

	/* ignore fp exceptions (bad), rendering shit assumes they are */
	setfcr(getfcr() & ~(FPOVFL|FPUNFL|FPINVAL|FPZDIV));	/* FIXME */

	Host_Init(&parms);

	if(COM_CheckParm("-nostdout"))
		nostdout = 1;
	else{
		//fcntl(0, F_SETFL, fcntl (0, F_GETFL, 0) | FNDELAY);
		print("(9)quake %4.2f\n", (float)VERSION);
	}

	oldtime = Sys_FloatTime () - 0.1;
	for(;;){
		// find time spent rendering last frame
		newtime = Sys_FloatTime ();
		time = newtime - oldtime;

		if(cls.state == ca_dedicated){   // play vcrfiles at max speed
			if(time < sys_ticrate.value && (vcrFile == -1 || recording)){
				//usleep(1);
				continue;       // not time to run a server only tic yet
			}
			time = sys_ticrate.value;
        	}

		if(time > sys_ticrate.value*2)
			oldtime = newtime;
		else
			oldtime += time;

		Host_Frame(time);

		// graphic debugging aids
		if (sys_linerefresh.value)
			Sys_LineRefresh ();
	}
}