shithub: qk1

ref: 35ef4f5f660d802a0cf766c44b192426e0c8e492
dir: /sys_9.c/

View raw version
#include <u.h>
#include <libc.h>
#include <stdio.h>
#include <thread.h>
#include "quakedef.h"

qboolean isDedicated;
int nostdout = 0;
mainstacksize = 512*1024;	/* FIXME */
char end1[] =
	"                QUAKE: The Doomed Dimension by id Software\n"
	"  ----------------------------------------------------------------------------\n"
	"           CALL 1-800-IDGAMES TO ORDER OR FOR TECHNICAL SUPPORT\n"
	"             PRICE: $45.00 (PRICES MAY VARY OUTSIDE THE US.)\n"
	"\n"
	"  Yes! You only have one fourth of this incredible epic. That is because most\n"
	"   of you have paid us nothing or at most, very little. You could steal the\n"
	"   game from a friend. But we both know you'll be punished by God if you do.\n"
	"        WHY RISK ETERNAL DAMNATION? CALL 1-800-IDGAMES AND BUY NOW!\n"
	"             Remember, we love you almost as much as He does.\n"
	"\n"
	"            Programming: John Carmack, Michael Abrash, John Cash\n"
	"      Design: John Romero, Sandy Petersen, American McGee, Tim Willits\n"
	"                     Art: Adrian Carmack, Kevin Cloud\n"
	"               Biz: Jay Wilbur, Mike Wilson, Donna Jackson\n"
	"            Projects: Shawn Green   Support: Barrett Alexander\n"
	"              Sound Effects: Trent Reznor and Nine Inch Nails\n"
	"  For other information or details on ordering outside the US, check out the\n"
	"     files accompanying QUAKE or our website at http://www.idsoftware.com.\n"
	"    Quake is a trademark of Id Software, inc., (c)1996 Id Software, inc.\n"
	"     All rights reserved. NIN logo is a registered trademark licensed to\n"
	"                 Nothing Interactive, Inc. All rights reserved.\n";
char end2[] =
	"        QUAKE by id Software\n"
	" -----------------------------------------------------------------------------\n"
	"        Why did you quit from the registered version of QUAKE? Did the\n"
	"        scary monsters frighten you? Or did Mr. Sandman tug at your\n"
	"        little lids? No matter! What is important is you love our\n"
	"        game, and gave us your money. Congratulations, you are probably\n"
	"        not a thief.\n"
	"                                                           Thank You.\n"
	"        id Software is:\n"
	"        PROGRAMMING: John Carmack, Michael Abrash, John Cash\n"
	"        DESIGN: John Romero, Sandy Petersen, American McGee, Tim Willits\n"
	"        ART: Adrian Carmack, Kevin Cloud\n"
	"        BIZ: Jay Wilbur, Mike Wilson     PROJECTS MAN: Shawn Green\n"
	"        BIZ ASSIST: Donna Jackson        SUPPORT: Barrett Alexander\n"
	"        SOUND EFFECTS AND MUSIC: Trent Reznor and Nine Inch Nails\n"
	"\n"
	"        If you need help running QUAKE refer to the text files in the\n"
	"        QUAKE directory, or our website at http://www.idsoftware.com.\n"
	"        If all else fails, call our technical support at 1-800-IDGAMES.\n"
	"      Quake is a trademark of Id Software, inc., (c)1996 Id Software, inc.\n"
	"        All rights reserved. NIN logo is a registered trademark licensed\n"
	"             to Nothing Interactive, Inc. All rights reserved.\n";


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

	if(nostdout)
		return;
	va_start(arg, fmt);
	vseprint(buf, buf+sizeof(buf), fmt, arg);
	va_end(arg);
	//write(1, buf, out-buf);
	for(p = (uchar *)buf; *p; p++){
		*p &= 0x7f;
		if((*p > 128 || *p < 32) && *p != 10 && *p != 13 && *p != 9)
			print("[%02x]", *p);
		else
			print("%c", *p);
	}
}

void Sys_Quit (void)
{
	Host_Shutdown();
	print("\n");
	if(registered.value)
		print("%s\n", end2);
	else
		print("%s\n", end1);
	exits(nil);
}

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

	out = seprint(buf, buf+sizeof(buf), "%s: ", argv0);
	va_start(arg, msg);
	out = vseprint(out, buf+sizeof(buf), msg, arg);
	va_end(arg);
	out = seprint(out, buf+sizeof(buf), ": %r\n");
	write(2, buf, out-buf);
}

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

	va_start(arg, error);
	out = vseprint(buf, buf+sizeof(buf), error, arg);
	va_end(arg);
	out = seprint(out, buf+sizeof(buf), "\n%s: %r\n", argv0);
	write(2, buf, out-buf);
	Host_Shutdown();
	sysfatal("ending");
} 

int Sys_FileTime (char *path)
{
	uchar	sb[1024];

	if(stat(path, sb, sizeof sb) < 0){
		Sys_Warn("Sys_FileTime:stat");
		return -1;
	}
	return *((int *)(sb+25));
}

void Sys_mkdir (char *path)
{
	int	d;

	if((d = create(path, OREAD, DMDIR|0777)) < 0)
		Sys_Warn("Sys_mkdir:create %s", 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("Sys_FileOpenRead %s failed", path);
	return *((vlong *)(bs+33));
}

int Sys_FileOpenWrite (char *path)
{
	int     d;

	if((d = open(path, OREAD|OTRUNC)) < 0)
		Sys_Error("Sys_FileOpenWrite %s failed", 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 threadmain (int c, char **v)
{
	static char basedir[1024];
	int j;
	char *home;
	double time, oldtime, newtime;
	quakeparms_t parms;
	extern int vcrFile;
	extern int recording;

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

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

	COM_InitArgv(c, v);
	parms.argc = com_argc;
	parms.argv = com_argv;
	argv0 = *v;

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

	if(home = getenv("home")){
		snprintf(basedir, sizeof basedir, "%s/lib/quake", home);
		free(home);
	}else
		snprintf(basedir, sizeof basedir, "/sys/lib/quake");
	parms.basedir = basedir;

	Host_Init(&parms);

	if(COM_CheckParm("-nostdout"))
		nostdout = 1;
	else
		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);
	}
}