+#include "quakedef.h"
+
#include "prvm_cmds.h"
+#include "clvm_cmds.h"
+#include "menu.h"
+#include "csprogs.h"
+
+// TODO check which strings really should be engine strings
//============================================================================
// Menu
-char *vm_m_extensions =
+const char *vm_m_extensions =
"BX_WAL_SUPPORT "
"DP_CINEMATIC_DPV "
+"DP_COVERAGE "
+"DP_CRYPTO "
+"DP_CSQC_BINDMAPS "
+"DP_GFX_FONTS "
+"DP_GFX_FONTS_FREETYPE "
+"DP_UTF8 "
+"DP_FONT_VARIABLEWIDTH "
"DP_MENU_EXTRESPONSEPACKET "
"DP_QC_ASINACOSATANATAN2TAN "
+"DP_QC_AUTOCVARS "
+"DP_QC_CMD "
+"DP_QC_CRC16 "
+"DP_QC_CVAR_TYPE "
+"DP_QC_CVAR_DESCRIPTION "
+"DP_QC_DIGEST "
+"DP_QC_DIGEST_SHA256 "
+"DP_QC_FINDCHAIN_TOFIELD "
+"DP_QC_I18N "
+"DP_QC_LOG "
+"DP_QC_RENDER_SCENE "
+"DP_QC_SPRINTF "
"DP_QC_STRFTIME "
+"DP_QC_STRINGBUFFERS "
+"DP_QC_STRINGBUFFERS_CVARLIST "
+"DP_QC_STRINGBUFFERS_EXT_WIP "
"DP_QC_STRINGCOLORFUNCTIONS "
-"DP_QC_UNLIMITEDTEMPSTRINGS";
-
-/*
-=========
-VM_M_precache_file
-
-string precache_file(string)
-=========
-*/
-void VM_M_precache_file (void)
-{ // precache_file is only used to copy files with qcc, it does nothing
- VM_SAFEPARMCOUNT(1,VM_precache_file);
-
- PRVM_G_INT(OFS_RETURN) = PRVM_G_INT(OFS_PARM0);
-}
-
-/*
-=========
-VM_M_preache_error
-
-used instead of the other VM_precache_* functions in the builtin list
-=========
-*/
-
-void VM_M_precache_error (void)
-{
- PRVM_ERROR ("PF_Precache_*: Precache can only be done in spawn functions");
-}
-
-/*
-=========
-VM_M_precache_sound
-
-string precache_sound (string sample)
-=========
-*/
-void VM_M_precache_sound (void)
-{
- const char *s;
-
- VM_SAFEPARMCOUNT(1, VM_precache_sound);
-
- s = PRVM_G_STRING(OFS_PARM0);
- PRVM_G_INT(OFS_RETURN) = PRVM_G_INT(OFS_PARM0);
- VM_CheckEmptyString (s);
-
- if(snd_initialized.integer && !S_PrecacheSound (s,true, true))
- {
- VM_Warning("VM_precache_sound: Failed to load %s for %s\n", s, PRVM_NAME);
- return;
- }
-}
+"DP_QC_STRING_CASE_FUNCTIONS "
+"DP_QC_STRREPLACE "
+"DP_QC_TOKENIZEBYSEPARATOR "
+"DP_QC_TOKENIZE_CONSOLE "
+"DP_QC_UNLIMITEDTEMPSTRINGS "
+"DP_QC_URI_ESCAPE "
+"DP_QC_URI_GET "
+"DP_QC_URI_POST "
+"DP_QC_WHICHPACK "
+"FTE_STRINGS "
+;
/*
=========
setmousetarget(float target)
=========
*/
-void VM_M_setmousetarget(void)
+static void VM_M_setmousetarget(prvm_prog_t *prog)
{
VM_SAFEPARMCOUNT(1, VM_M_setmousetarget);
in_client_mouse = true;
break;
default:
- PRVM_ERROR("VM_M_setmousetarget: wrong destination %f !",PRVM_G_FLOAT(OFS_PARM0));
+ prog->error_cmd("VM_M_setmousetarget: wrong destination %f !",PRVM_G_FLOAT(OFS_PARM0));
}
}
float getmousetarget
=========
*/
-void VM_M_getmousetarget(void)
+static void VM_M_getmousetarget(prvm_prog_t *prog)
{
VM_SAFEPARMCOUNT(0,VM_M_getmousetarget);
setkeydest(float dest)
=========
*/
-void VM_M_setkeydest(void)
+static void VM_M_setkeydest(prvm_prog_t *prog)
{
VM_SAFEPARMCOUNT(1,VM_M_setkeydest);
// key_menu
key_dest = key_menu;
break;
+ case 3:
+ // key_menu_grabbed
+ key_dest = key_menu_grabbed;
+ break;
case 1:
// key_message
// key_dest = key_message
// break;
default:
- PRVM_ERROR("VM_M_setkeydest: wrong destination %f !", PRVM_G_FLOAT(OFS_PARM0));
+ prog->error_cmd("VM_M_setkeydest: wrong destination %f !", PRVM_G_FLOAT(OFS_PARM0));
}
}
float getkeydest
=========
*/
-void VM_M_getkeydest(void)
+static void VM_M_getkeydest(prvm_prog_t *prog)
{
VM_SAFEPARMCOUNT(0,VM_M_getkeydest);
- // key_game = 0, key_message = 1, key_menu = 2, unknown = 3
+ // key_game = 0, key_message = 1, key_menu = 2, key_menu_grabbed = 3, unknown = -1
switch(key_dest)
{
case key_game:
case key_menu:
PRVM_G_FLOAT(OFS_RETURN) = 2;
break;
+ case key_menu_grabbed:
+ PRVM_G_FLOAT(OFS_RETURN) = 3;
+ break;
case key_message:
// not supported
// PRVM_G_FLOAT(OFS_RETURN) = 1;
// break;
default:
- PRVM_G_FLOAT(OFS_RETURN) = 3;
+ PRVM_G_FLOAT(OFS_RETURN) = -1;
}
}
+
/*
=========
-VM_M_callfunction
+VM_M_getresolution
- callfunction(...,string function_name)
-Extension: pass
+vector getresolution(float number)
=========
*/
-mfunction_t *PRVM_ED_FindFunction (const char *name);
-void VM_M_callfunction(void)
+static void VM_M_getresolution(prvm_prog_t *prog)
{
- mfunction_t *func;
- const char *s;
+ int nr, fs;
+ VM_SAFEPARMCOUNTRANGE(1, 2, VM_getresolution);
- if(prog->argc == 0)
- PRVM_ERROR("VM_M_callfunction: 1 parameter is required !");
-
- s = PRVM_G_STRING(OFS_PARM0 + (prog->argc - 1));
-
- VM_CheckEmptyString(s);
+ nr = (int)PRVM_G_FLOAT(OFS_PARM0);
- func = PRVM_ED_FindFunction(s);
+ fs = ((prog->argc <= 1) || ((int)PRVM_G_FLOAT(OFS_PARM1)));
- if(!func)
- PRVM_ERROR("VM_M_callfunciton: function %s not found !", s);
- else if (func->first_statement < 0)
+ if(nr < -1 || nr >= (fs ? video_resolutions_count : video_resolutions_hardcoded_count))
{
- // negative statements are built in functions
- int builtinnumber = -func->first_statement;
- prog->xfunction->builtinsprofile++;
- if (builtinnumber < prog->numbuiltins && prog->builtins[builtinnumber])
- prog->builtins[builtinnumber]();
- else
- PRVM_ERROR("No such builtin #%i in %s", builtinnumber, PRVM_NAME);
+ PRVM_G_VECTOR(OFS_RETURN)[0] = 0;
+ PRVM_G_VECTOR(OFS_RETURN)[1] = 0;
+ PRVM_G_VECTOR(OFS_RETURN)[2] = 0;
}
- else if(func > 0)
+ else if(nr == -1)
{
- prog->argc--;
- PRVM_ExecuteProgram(func - prog->functions,"");
- prog->argc++;
+ vid_mode_t *m = VID_GetDesktopMode();
+ if (m)
+ {
+ PRVM_G_VECTOR(OFS_RETURN)[0] = m->width;
+ PRVM_G_VECTOR(OFS_RETURN)[1] = m->height;
+ PRVM_G_VECTOR(OFS_RETURN)[2] = m->pixelheight_num / (prvm_vec_t) m->pixelheight_denom;
+ }
+ else
+ {
+ PRVM_G_VECTOR(OFS_RETURN)[0] = 0;
+ PRVM_G_VECTOR(OFS_RETURN)[1] = 0;
+ PRVM_G_VECTOR(OFS_RETURN)[2] = 0;
+ }
}
-}
-
-/*
-=========
-VM_M_isfunction
-
-float isfunction(string function_name)
-=========
-*/
-mfunction_t *PRVM_ED_FindFunction (const char *name);
-void VM_M_isfunction(void)
-{
- mfunction_t *func;
- const char *s;
-
- VM_SAFEPARMCOUNT(1, VM_M_isfunction);
-
- s = PRVM_G_STRING(OFS_PARM0);
-
- VM_CheckEmptyString(s);
-
- func = PRVM_ED_FindFunction(s);
-
- if(!func)
- PRVM_G_FLOAT(OFS_RETURN) = false;
else
- PRVM_G_FLOAT(OFS_RETURN) = true;
-}
-
-/*
-=========
-VM_M_writetofile
-
- writetofile(float fhandle, entity ent)
-=========
-*/
-void VM_M_writetofile(void)
-{
- prvm_edict_t * ent;
- qfile_t *file;
-
- VM_SAFEPARMCOUNT(2, VM_M_writetofile);
-
- file = VM_GetFileHandle( (int)PRVM_G_FLOAT(OFS_PARM0) );
- if( !file )
- {
- VM_Warning("VM_M_writetofile: invalid or closed file handle\n");
- return;
- }
-
- ent = PRVM_G_EDICT(OFS_PARM1);
- if(ent->priv.required->free)
{
- VM_Warning("VM_M_writetofile: %s: entity %i is free !\n", PRVM_NAME, PRVM_NUM_FOR_EDICT(ent));
- return;
+ video_resolution_t *r = &((fs ? video_resolutions : video_resolutions_hardcoded)[nr]);
+ PRVM_G_VECTOR(OFS_RETURN)[0] = r->width;
+ PRVM_G_VECTOR(OFS_RETURN)[1] = r->height;
+ PRVM_G_VECTOR(OFS_RETURN)[2] = r->pixelheight;
}
-
- PRVM_ED_Write (file, ent);
}
-/*
-=========
-VM_M_getresolution
-
-vector getresolution(float number)
-=========
-*/
-extern unsigned short video_resolutions[][2];
-void VM_M_getresolution(void)
+static void VM_M_getgamedirinfo(prvm_prog_t *prog)
{
- int nr;
- VM_SAFEPARMCOUNT(1, VM_getresolution);
+ int nr, item;
+ VM_SAFEPARMCOUNT(2, VM_getgamedirinfo);
nr = (int)PRVM_G_FLOAT(OFS_PARM0);
+ item = (int)PRVM_G_FLOAT(OFS_PARM1);
+ PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
- PRVM_G_VECTOR(OFS_RETURN)[0] = video_resolutions[nr][0];
- PRVM_G_VECTOR(OFS_RETURN)[1] = video_resolutions[nr][1];
- PRVM_G_VECTOR(OFS_RETURN)[2] = 0;
-}
-
-/*
-=========
-VM_M_findkeysforcommand
-
-string findkeysforcommand(string command)
-
-the returned string is an altstring
-=========
-*/
-#define NUMKEYS 5 // TODO: merge the constant in keys.c with this one somewhen
-
-void M_FindKeysForCommand(const char *command, int *keys);
-void VM_M_findkeysforcommand(void)
-{
- const char *cmd;
- char ret[VM_STRINGTEMP_LENGTH];
- int keys[NUMKEYS];
- int i;
-
- VM_SAFEPARMCOUNT(1, VM_M_findkeysforcommand);
-
- cmd = PRVM_G_STRING(OFS_PARM0);
-
- VM_CheckEmptyString(cmd);
-
- M_FindKeysForCommand(cmd, keys);
-
- ret[0] = 0;
- for(i = 0; i < NUMKEYS; i++)
- strlcat(ret, va(" \'%i\'", keys[i]), sizeof(ret));
-
- PRVM_G_INT(OFS_RETURN) = PRVM_SetTempString(ret);
+ if(nr >= 0 && nr < fs_all_gamedirs_count)
+ {
+ if(item == 0)
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, fs_all_gamedirs[nr].name );
+ else if(item == 1)
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, fs_all_gamedirs[nr].description );
+ }
}
/*
4 serverquerycount
5 serverreplycount
6 sortfield
-7 sortdescending
+7 sortflags
*/
-void VM_M_getserverliststat( void )
+static void VM_M_getserverliststat(prvm_prog_t *prog)
{
int type;
VM_SAFEPARMCOUNT ( 1, VM_M_getserverliststat );
return;
case 1:
PRVM_G_FLOAT ( OFS_RETURN ) = serverlist_cachecount;
+ return;
case 2:
PRVM_G_FLOAT ( OFS_RETURN ) = masterquerycount;
return;
PRVM_G_FLOAT ( OFS_RETURN ) = serverlist_sortbyfield;
return;
case 7:
- PRVM_G_FLOAT ( OFS_RETURN ) = serverlist_sortdescending;
+ PRVM_G_FLOAT ( OFS_RETURN ) = serverlist_sortflags;
return;
default:
- VM_Warning( "VM_M_getserverliststat: bad type %i!\n", type );
+ VM_Warning(prog, "VM_M_getserverliststat: bad type %i!\n", type );
}
}
resetserverlistmasks()
========================
*/
-void VM_M_resetserverlistmasks( void )
+static void VM_M_resetserverlistmasks(prvm_prog_t *prog)
{
+ VM_SAFEPARMCOUNT(0, VM_M_resetserverlistmasks);
ServerList_ResetMasks();
}
512 - 1024 or
========================
*/
-void VM_M_setserverlistmaskstring( void )
+static void VM_M_setserverlistmaskstring(prvm_prog_t *prog)
{
const char *str;
int masknr;
str = PRVM_G_STRING( OFS_PARM2 );
masknr = (int)PRVM_G_FLOAT( OFS_PARM0 );
- if( masknr >= 0 && masknr <= SERVERLIST_ANDMASKCOUNT )
+ if( masknr >= 0 && masknr < SERVERLIST_ANDMASKCOUNT )
mask = &serverlist_andmasks[masknr];
- else if( masknr >= 512 && masknr - 512 <= SERVERLIST_ORMASKCOUNT )
+ else if( masknr >= 512 && masknr - 512 < SERVERLIST_ORMASKCOUNT )
mask = &serverlist_ormasks[masknr - 512 ];
else
{
- VM_Warning( "VM_M_setserverlistmaskstring: invalid mask number %i\n", masknr );
+ VM_Warning(prog, "VM_M_setserverlistmaskstring: invalid mask number %i\n", masknr );
return;
}
switch( field ) {
case SLIF_CNAME:
- strlcpy( mask->info.cname, PRVM_G_STRING( OFS_PARM2 ), sizeof(mask->info.cname) );
+ strlcpy( mask->info.cname, str, sizeof(mask->info.cname) );
break;
case SLIF_NAME:
- strlcpy( mask->info.name, PRVM_G_STRING( OFS_PARM2 ), sizeof(mask->info.name) );
+ strlcpy( mask->info.name, str, sizeof(mask->info.name) );
+ break;
+ case SLIF_QCSTATUS:
+ strlcpy( mask->info.qcstatus, str, sizeof(mask->info.qcstatus) );
+ break;
+ case SLIF_PLAYERS:
+ strlcpy( mask->info.players, str, sizeof(mask->info.players) );
break;
case SLIF_MAP:
- strlcpy( mask->info.map, PRVM_G_STRING( OFS_PARM2 ), sizeof(mask->info.map) );
+ strlcpy( mask->info.map, str, sizeof(mask->info.map) );
break;
case SLIF_MOD:
- strlcpy( mask->info.mod, PRVM_G_STRING( OFS_PARM2 ), sizeof(mask->info.mod) );
+ strlcpy( mask->info.mod, str, sizeof(mask->info.mod) );
break;
case SLIF_GAME:
- strlcpy( mask->info.game, PRVM_G_STRING( OFS_PARM2 ), sizeof(mask->info.game) );
+ strlcpy( mask->info.game, str, sizeof(mask->info.game) );
break;
default:
- VM_Warning( "VM_M_setserverlistmaskstring: Bad field number %i passed!\n", field );
+ VM_Warning(prog, "VM_M_setserverlistmaskstring: Bad field number %i passed!\n", field );
return;
}
512 - 1024 or
========================
*/
-void VM_M_setserverlistmasknumber( void )
+static void VM_M_setserverlistmasknumber(prvm_prog_t *prog)
{
int number;
serverlist_mask_t *mask;
VM_SAFEPARMCOUNT( 4, VM_M_setserverlistmasknumber );
masknr = (int)PRVM_G_FLOAT( OFS_PARM0 );
- if( masknr >= 0 && masknr <= SERVERLIST_ANDMASKCOUNT )
+ if( masknr >= 0 && masknr < SERVERLIST_ANDMASKCOUNT )
mask = &serverlist_andmasks[masknr];
- else if( masknr >= 512 && masknr - 512 <= SERVERLIST_ORMASKCOUNT )
+ else if( masknr >= 512 && masknr - 512 < SERVERLIST_ORMASKCOUNT )
mask = &serverlist_ormasks[masknr - 512 ];
else
{
- VM_Warning( "VM_M_setserverlistmasknumber: invalid mask number %i\n", masknr );
+ VM_Warning(prog, "VM_M_setserverlistmasknumber: invalid mask number %i\n", masknr );
return;
}
case SLIF_NUMPLAYERS:
mask->info.numplayers = number;
break;
+ case SLIF_NUMBOTS:
+ mask->info.numbots = number;
+ break;
+ case SLIF_NUMHUMANS:
+ mask->info.numhumans = number;
+ break;
case SLIF_PING:
mask->info.ping = number;
break;
case SLIF_PROTOCOL:
mask->info.protocol = number;
break;
+ case SLIF_FREESLOTS:
+ mask->info.freeslots = number;
+ break;
+ case SLIF_CATEGORY:
+ mask->info.category = number;
+ break;
+ case SLIF_ISFAVORITE:
+ mask->info.isfavorite = number != 0;
+ break;
default:
- VM_Warning( "VM_M_setserverlistmasknumber: Bad field number %i passed!\n", field );
+ VM_Warning(prog, "VM_M_setserverlistmasknumber: Bad field number %i passed!\n", field );
return;
}
resortserverlist
========================
*/
-void VM_M_resortserverlist( void )
+static void VM_M_resortserverlist(prvm_prog_t *prog)
{
+ VM_SAFEPARMCOUNT(0, VM_M_resortserverlist);
ServerList_RebuildViewList();
}
string getserverliststring(float field, float hostnr)
=========
*/
-void VM_M_getserverliststring(void)
+static void VM_M_getserverliststring(prvm_prog_t *prog)
{
- serverlist_entry_t *cache;
+ const serverlist_entry_t *cache;
int hostnr;
VM_SAFEPARMCOUNT(2, VM_M_getserverliststring);
hostnr = (int)PRVM_G_FLOAT(OFS_PARM1);
- if(hostnr < 0 || hostnr >= serverlist_viewcount)
+ if(hostnr == -1 && serverlist_callbackentry)
{
- Con_Print("VM_M_getserverliststring: bad hostnr passed!\n");
- return;
+ cache = serverlist_callbackentry;
+ }
+ else
+ {
+ if(hostnr < 0 || hostnr >= serverlist_viewcount)
+ {
+ Con_Print("VM_M_getserverliststring: bad hostnr passed!\n");
+ return;
+ }
+ cache = ServerList_GetViewEntry(hostnr);
}
- cache = serverlist_viewlist[hostnr];
switch( (int) PRVM_G_FLOAT(OFS_PARM0) ) {
case SLIF_CNAME:
- PRVM_G_INT( OFS_RETURN ) = PRVM_SetEngineString( cache->info.cname );
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, cache->info.cname );
break;
case SLIF_NAME:
- PRVM_G_INT( OFS_RETURN ) = PRVM_SetEngineString( cache->info.name );
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, cache->info.name );
+ break;
+ case SLIF_QCSTATUS:
+ PRVM_G_INT (OFS_RETURN ) = PRVM_SetTempString( prog, cache->info.qcstatus );
+ break;
+ case SLIF_PLAYERS:
+ PRVM_G_INT (OFS_RETURN ) = PRVM_SetTempString( prog, cache->info.players );
break;
case SLIF_GAME:
- PRVM_G_INT( OFS_RETURN ) = PRVM_SetEngineString( cache->info.game );
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, cache->info.game );
break;
case SLIF_MOD:
- PRVM_G_INT( OFS_RETURN ) = PRVM_SetEngineString( cache->info.mod );
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, cache->info.mod );
break;
case SLIF_MAP:
- PRVM_G_INT( OFS_RETURN ) = PRVM_SetEngineString( cache->info.map );
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, cache->info.map );
break;
// TODO remove this again
case 1024:
- PRVM_G_INT( OFS_RETURN ) = PRVM_SetEngineString( cache->line1 );
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, cache->line1 );
break;
case 1025:
- PRVM_G_INT( OFS_RETURN ) = PRVM_SetEngineString( cache->line2 );
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, cache->line2 );
break;
default:
Con_Print("VM_M_getserverliststring: bad field number passed!\n");
float getserverlistnumber(float field, float hostnr)
=========
*/
-void VM_M_getserverlistnumber(void)
+static void VM_M_getserverlistnumber(prvm_prog_t *prog)
{
- serverlist_entry_t *cache;
+ const serverlist_entry_t *cache;
int hostnr;
VM_SAFEPARMCOUNT(2, VM_M_getserverliststring);
hostnr = (int)PRVM_G_FLOAT(OFS_PARM1);
- if(hostnr < 0 || hostnr >= serverlist_viewcount)
+ if(hostnr == -1 && serverlist_callbackentry)
{
- Con_Print("VM_M_getserverliststring: bad hostnr passed!\n");
- return;
+ cache = serverlist_callbackentry;
+ }
+ else
+ {
+ if(hostnr < 0 || hostnr >= serverlist_viewcount)
+ {
+ Con_Print("VM_M_getserverliststring: bad hostnr passed!\n");
+ return;
+ }
+ cache = ServerList_GetViewEntry(hostnr);
}
- cache = serverlist_viewlist[hostnr];
switch( (int) PRVM_G_FLOAT(OFS_PARM0) ) {
case SLIF_MAXPLAYERS:
PRVM_G_FLOAT( OFS_RETURN ) = cache->info.maxplayers;
case SLIF_NUMPLAYERS:
PRVM_G_FLOAT( OFS_RETURN ) = cache->info.numplayers;
break;
+ case SLIF_NUMBOTS:
+ PRVM_G_FLOAT( OFS_RETURN ) = cache->info.numbots;
+ break;
+ case SLIF_NUMHUMANS:
+ PRVM_G_FLOAT( OFS_RETURN ) = cache->info.numhumans;
+ break;
+ case SLIF_FREESLOTS:
+ PRVM_G_FLOAT( OFS_RETURN ) = cache->info.freeslots;
+ break;
case SLIF_PING:
PRVM_G_FLOAT( OFS_RETURN ) = cache->info.ping;
break;
case SLIF_PROTOCOL:
PRVM_G_FLOAT( OFS_RETURN ) = cache->info.protocol;
break;
+ case SLIF_CATEGORY:
+ PRVM_G_FLOAT( OFS_RETURN ) = cache->info.category;
+ break;
+ case SLIF_ISFAVORITE:
+ PRVM_G_FLOAT( OFS_RETURN ) = cache->info.isfavorite;
+ break;
default:
Con_Print("VM_M_getserverlistnumber: bad field number passed!\n");
}
========================
VM_M_setserverlistsort
-setserverlistsort(float field, float descending)
+setserverlistsort(float field, float flags)
========================
*/
-void VM_M_setserverlistsort( void )
+static void VM_M_setserverlistsort(prvm_prog_t *prog)
{
VM_SAFEPARMCOUNT( 2, VM_M_setserverlistsort );
serverlist_sortbyfield = (serverlist_infofield_t)((int)PRVM_G_FLOAT( OFS_PARM0 ));
- serverlist_sortdescending = (qboolean) PRVM_G_FLOAT( OFS_PARM1 );
+ serverlist_sortflags = (int) PRVM_G_FLOAT( OFS_PARM1 );
}
/*
refreshserverlist()
========================
*/
-void VM_M_refreshserverlist( void )
+static void VM_M_refreshserverlist(prvm_prog_t *prog)
{
- VM_SAFEPARMCOUNT( 0, VM_M_refreshserverlist );
- ServerList_QueryList(true, false);
+ qboolean do_reset = false;
+ VM_SAFEPARMCOUNTRANGE( 0, 1, VM_M_refreshserverlist );
+ if (prog->argc >= 1 && PRVM_G_FLOAT(OFS_PARM0))
+ do_reset = true;
+ ServerList_QueryList(do_reset, true, false, false);
}
/*
float getserverlistindexforkey(string key)
========================
*/
-void VM_M_getserverlistindexforkey( void )
+static void VM_M_getserverlistindexforkey(prvm_prog_t *prog)
{
const char *key;
VM_SAFEPARMCOUNT( 1, VM_M_getserverlistindexforkey );
key = PRVM_G_STRING( OFS_PARM0 );
- VM_CheckEmptyString( key );
+ VM_CheckEmptyString( prog, key );
if( !strcmp( key, "cname" ) )
PRVM_G_FLOAT( OFS_RETURN ) = SLIF_CNAME;
PRVM_G_FLOAT( OFS_RETURN ) = SLIF_MAP;
else if( !strcmp( key, "name" ) )
PRVM_G_FLOAT( OFS_RETURN ) = SLIF_NAME;
+ else if( !strcmp( key, "qcstatus" ) )
+ PRVM_G_FLOAT( OFS_RETURN ) = SLIF_QCSTATUS;
+ else if( !strcmp( key, "players" ) )
+ PRVM_G_FLOAT( OFS_RETURN ) = SLIF_PLAYERS;
else if( !strcmp( key, "maxplayers" ) )
PRVM_G_FLOAT( OFS_RETURN ) = SLIF_MAXPLAYERS;
else if( !strcmp( key, "numplayers" ) )
PRVM_G_FLOAT( OFS_RETURN ) = SLIF_NUMPLAYERS;
+ else if( !strcmp( key, "numbots" ) )
+ PRVM_G_FLOAT( OFS_RETURN ) = SLIF_NUMBOTS;
+ else if( !strcmp( key, "numhumans" ) )
+ PRVM_G_FLOAT( OFS_RETURN ) = SLIF_NUMHUMANS;
+ else if( !strcmp( key, "freeslots" ) )
+ PRVM_G_FLOAT( OFS_RETURN ) = SLIF_FREESLOTS;
else if( !strcmp( key, "protocol" ) )
PRVM_G_FLOAT( OFS_RETURN ) = SLIF_PROTOCOL;
+ else if( !strcmp( key, "category" ) )
+ PRVM_G_FLOAT( OFS_RETURN ) = SLIF_CATEGORY;
+ else if( !strcmp( key, "isfavorite" ) )
+ PRVM_G_FLOAT( OFS_RETURN ) = SLIF_ISFAVORITE;
else
PRVM_G_FLOAT( OFS_RETURN ) = -1;
}
addwantedserverlistkey(string key)
========================
*/
-void VM_M_addwantedserverlistkey( void )
+static void VM_M_addwantedserverlistkey(prvm_prog_t *prog)
{
VM_SAFEPARMCOUNT( 1, VM_M_addwantedserverlistkey );
}
MESSAGE WRITING
used only for client and menu
-severs uses VM_SV_...
+server uses VM_SV_...
Write*(* data, float type, float to)
#define MSG_ALL 2 // reliable to all
#define MSG_INIT 3 // write to the init string
-sizebuf_t *VM_WriteDest (void)
+static sizebuf_t *VM_M_WriteDest (prvm_prog_t *prog)
{
int dest;
int destclient;
if(!sv.active)
- PRVM_ERROR("VM_WriteDest: game is not server (%s)", PRVM_NAME);
+ prog->error_cmd("VM_M_WriteDest: game is not server (%s)", prog->name);
dest = (int)PRVM_G_FLOAT(OFS_PARM1);
switch (dest)
case MSG_ONE:
destclient = (int) PRVM_G_FLOAT(OFS_PARM2);
if (destclient < 0 || destclient >= svs.maxclients || !svs.clients[destclient].active || !svs.clients[destclient].netconnection)
- PRVM_ERROR("VM_clientcommand: %s: invalid client !", PRVM_NAME);
+ prog->error_cmd("VM_clientcommand: %s: invalid client !", prog->name);
return &svs.clients[destclient].netconnection->message;
return &sv.signon;
default:
- PRVM_ERROR ("WriteDest: bad destination");
+ prog->error_cmd("WriteDest: bad destination");
break;
}
return NULL;
}
-void VM_M_WriteByte (void)
+static void VM_M_WriteByte (prvm_prog_t *prog)
{
- MSG_WriteByte (VM_WriteDest(), (int)PRVM_G_FLOAT(OFS_PARM0));
+ VM_SAFEPARMCOUNT(1, VM_M_WriteByte);
+ MSG_WriteByte (VM_M_WriteDest(prog), (int)PRVM_G_FLOAT(OFS_PARM0));
}
-void VM_M_WriteChar (void)
+static void VM_M_WriteChar (prvm_prog_t *prog)
{
- MSG_WriteChar (VM_WriteDest(), (int)PRVM_G_FLOAT(OFS_PARM0));
+ VM_SAFEPARMCOUNT(1, VM_M_WriteChar);
+ MSG_WriteChar (VM_M_WriteDest(prog), (int)PRVM_G_FLOAT(OFS_PARM0));
}
-void VM_M_WriteShort (void)
+static void VM_M_WriteShort (prvm_prog_t *prog)
{
- MSG_WriteShort (VM_WriteDest(), (int)PRVM_G_FLOAT(OFS_PARM0));
+ VM_SAFEPARMCOUNT(1, VM_M_WriteShort);
+ MSG_WriteShort (VM_M_WriteDest(prog), (int)PRVM_G_FLOAT(OFS_PARM0));
}
-void VM_M_WriteLong (void)
+static void VM_M_WriteLong (prvm_prog_t *prog)
{
- MSG_WriteLong (VM_WriteDest(), (int)PRVM_G_FLOAT(OFS_PARM0));
+ VM_SAFEPARMCOUNT(1, VM_M_WriteLong);
+ MSG_WriteLong (VM_M_WriteDest(prog), (int)PRVM_G_FLOAT(OFS_PARM0));
}
-void VM_M_WriteAngle (void)
+static void VM_M_WriteAngle (prvm_prog_t *prog)
{
- MSG_WriteAngle (VM_WriteDest(), PRVM_G_FLOAT(OFS_PARM0), sv.protocol);
+ VM_SAFEPARMCOUNT(1, VM_M_WriteAngle);
+ MSG_WriteAngle (VM_M_WriteDest(prog), PRVM_G_FLOAT(OFS_PARM0), sv.protocol);
}
-void VM_M_WriteCoord (void)
+static void VM_M_WriteCoord (prvm_prog_t *prog)
{
- MSG_WriteCoord (VM_WriteDest(), PRVM_G_FLOAT(OFS_PARM0), sv.protocol);
+ VM_SAFEPARMCOUNT(1, VM_M_WriteCoord);
+ MSG_WriteCoord (VM_M_WriteDest(prog), PRVM_G_FLOAT(OFS_PARM0), sv.protocol);
}
-void VM_M_WriteString (void)
+static void VM_M_WriteString (prvm_prog_t *prog)
{
- MSG_WriteString (VM_WriteDest(), PRVM_G_STRING(OFS_PARM0));
+ VM_SAFEPARMCOUNT(1, VM_M_WriteString);
+ MSG_WriteString (VM_M_WriteDest(prog), PRVM_G_STRING(OFS_PARM0));
}
-void VM_M_WriteEntity (void)
+static void VM_M_WriteEntity (prvm_prog_t *prog)
{
- MSG_WriteShort (VM_WriteDest(), PRVM_G_EDICTNUM(OFS_PARM0));
+ VM_SAFEPARMCOUNT(1, VM_M_WriteEntity);
+ MSG_WriteShort (VM_M_WriteDest(prog), PRVM_G_EDICTNUM(OFS_PARM0));
}
-//string(void) getextresponse = #624; // returns the next extResponse packet that was sent to this client
-void VM_M_getextresponse (void)
+/*
+=================
+VM_M_copyentity
+
+copies data from one entity to another
+
+copyentity(entity src, entity dst)
+=================
+*/
+static void VM_M_copyentity (prvm_prog_t *prog)
{
- VM_SAFEPARMCOUNT(0,VM_argv);
+ prvm_edict_t *in, *out;
+ VM_SAFEPARMCOUNT(2,VM_M_copyentity);
+ in = PRVM_G_EDICT(OFS_PARM0);
+ out = PRVM_G_EDICT(OFS_PARM1);
+ memcpy(out->fields.fp, in->fields.fp, prog->entityfields * sizeof(prvm_vec_t));
+}
- if (net_extresponse_count <= 0)
- PRVM_G_INT(OFS_RETURN) = OFS_NULL;
+//#66 vector() getmousepos (EXT_CSQC)
+static void VM_M_getmousepos(prvm_prog_t *prog)
+{
+ VM_SAFEPARMCOUNT(0,VM_M_getmousepos);
+
+ if (key_consoleactive || (key_dest != key_menu && key_dest != key_menu_grabbed))
+ VectorSet(PRVM_G_VECTOR(OFS_RETURN), 0, 0, 0);
+ else if (in_client_mouse)
+ VectorSet(PRVM_G_VECTOR(OFS_RETURN), in_windowmouse_x * vid_conwidth.integer / vid.width, in_windowmouse_y * vid_conheight.integer / vid.height, 0);
else
+ VectorSet(PRVM_G_VECTOR(OFS_RETURN), in_mouse_x * vid_conwidth.integer / vid.width, in_mouse_y * vid_conheight.integer / vid.height, 0);
+}
+
+static void VM_M_crypto_getkeyfp(prvm_prog_t *prog)
+{
+ lhnetaddress_t addr;
+ const char *s;
+ char keyfp[FP64_SIZE + 1];
+
+ VM_SAFEPARMCOUNT(1,VM_M_crypto_getkeyfp);
+
+ s = PRVM_G_STRING( OFS_PARM0 );
+ VM_CheckEmptyString( prog, s );
+
+ if(LHNETADDRESS_FromString(&addr, s, 26000) && Crypto_RetrieveHostKey(&addr, NULL, keyfp, sizeof(keyfp), NULL, 0, NULL, NULL))
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, keyfp );
+ else
+ PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
+}
+static void VM_M_crypto_getidfp(prvm_prog_t *prog)
+{
+ lhnetaddress_t addr;
+ const char *s;
+ char idfp[FP64_SIZE + 1];
+
+ VM_SAFEPARMCOUNT(1,VM_M_crypto_getidfp);
+
+ s = PRVM_G_STRING( OFS_PARM0 );
+ VM_CheckEmptyString( prog, s );
+
+ if(LHNETADDRESS_FromString(&addr, s, 26000) && Crypto_RetrieveHostKey(&addr, NULL, NULL, 0, idfp, sizeof(idfp), NULL, NULL))
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, idfp );
+ else
+ PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
+}
+static void VM_M_crypto_getidstatus(prvm_prog_t *prog)
+{
+ lhnetaddress_t addr;
+ const char *s;
+ qboolean issigned;
+
+ VM_SAFEPARMCOUNT(1,VM_M_crypto_getidstatus);
+
+ s = PRVM_G_STRING( OFS_PARM0 );
+ VM_CheckEmptyString( prog, s );
+
+ if(LHNETADDRESS_FromString(&addr, s, 26000) && Crypto_RetrieveHostKey(&addr, NULL, NULL, 0, NULL, 0, NULL, &issigned))
+ PRVM_G_FLOAT( OFS_RETURN ) = issigned ? 2 : 1;
+ else
+ PRVM_G_FLOAT( OFS_RETURN ) = 0;
+}
+static void VM_M_crypto_getencryptlevel(prvm_prog_t *prog)
+{
+ lhnetaddress_t addr;
+ const char *s;
+ int aeslevel;
+ char vabuf[1024];
+
+ VM_SAFEPARMCOUNT(1,VM_M_crypto_getencryptlevel);
+
+ s = PRVM_G_STRING( OFS_PARM0 );
+ VM_CheckEmptyString( prog, s );
+
+ if(LHNETADDRESS_FromString(&addr, s, 26000) && Crypto_RetrieveHostKey(&addr, NULL, NULL, 0, NULL, 0, &aeslevel, NULL))
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString(prog, aeslevel ? va(vabuf, sizeof(vabuf), "%d AES128", aeslevel) : "0");
+ else
+ PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
+}
+static void VM_M_crypto_getmykeyfp(prvm_prog_t *prog)
+{
+ int i;
+ char keyfp[FP64_SIZE + 1];
+
+ VM_SAFEPARMCOUNT(1,VM_M_crypto_getmykey);
+
+ i = PRVM_G_FLOAT( OFS_PARM0 );
+ switch(Crypto_RetrieveLocalKey(i, keyfp, sizeof(keyfp), NULL, 0, NULL))
+ {
+ case -1:
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString(prog, "");
+ break;
+ case 0:
+ PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
+ break;
+ default:
+ case 1:
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString(prog, keyfp);
+ break;
+ }
+}
+static void VM_M_crypto_getmyidfp(prvm_prog_t *prog)
+{
+ int i;
+ char idfp[FP64_SIZE + 1];
+
+ VM_SAFEPARMCOUNT(1,VM_M_crypto_getmykey);
+
+ i = PRVM_G_FLOAT( OFS_PARM0 );
+ switch(Crypto_RetrieveLocalKey(i, NULL, 0, idfp, sizeof(idfp), NULL))
{
- int first;
- --net_extresponse_count;
- first = (net_extresponse_last + NET_EXTRESPONSE_MAX - net_extresponse_count) % NET_EXTRESPONSE_MAX;
- PRVM_G_INT(OFS_RETURN) = PRVM_SetEngineString(net_extresponse[first]);
+ case -1:
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString(prog, "");
+ break;
+ case 0:
+ PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
+ break;
+ default:
+ case 1:
+ PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString(prog, idfp);
+ break;
+ }
+}
+static void VM_M_crypto_getmyidstatus(prvm_prog_t *prog)
+{
+ int i;
+ qboolean issigned;
+
+ VM_SAFEPARMCOUNT(1,VM_M_crypto_getmykey);
+
+ i = PRVM_G_FLOAT( OFS_PARM0 );
+ switch(Crypto_RetrieveLocalKey(i, NULL, 0, NULL, 0, &issigned))
+ {
+ case -1:
+ PRVM_G_FLOAT( OFS_RETURN ) = 0; // have no ID there
+ break;
+ case 0:
+ PRVM_G_FLOAT( OFS_RETURN ) = -1; // out of range
+ break;
+ default:
+ case 1:
+ PRVM_G_FLOAT( OFS_RETURN ) = issigned ? 2 : 1;
+ break;
}
}
prvm_builtin_t vm_m_builtins[] = {
- 0, // to be consistent with the old vm
- // common builtings (mostly)
- VM_checkextension,
- VM_error,
- VM_objerror,
- VM_print,
- VM_bprint,
- VM_sprint,
- VM_centerprint,
- VM_normalize,
- VM_vlen,
- VM_vectoyaw, // #10
- VM_vectoangles,
- VM_random,
- VM_localcmd,
- VM_cvar,
- VM_cvar_set,
- VM_dprint,
- VM_ftos,
- VM_fabs,
- VM_vtos,
- VM_etos, // 20
- VM_stof,
- VM_spawn,
- VM_remove,
- VM_find,
- VM_findfloat,
- VM_findchain,
- VM_findchainfloat,
- VM_M_precache_file,
- VM_M_precache_sound,
- VM_coredump, // 30
- VM_traceon,
- VM_traceoff,
- VM_eprint,
- VM_rint,
- VM_floor,
- VM_ceil,
- VM_nextent,
- VM_sin,
- VM_cos,
- VM_sqrt, // 40
- VM_randomvec,
- VM_registercvar,
- VM_min,
- VM_max,
- VM_bound,
- VM_pow,
- VM_copyentity,
- VM_fopen,
- VM_fclose,
- VM_fgets, // 50
- VM_fputs,
- VM_strlen,
- VM_strcat,
- VM_substring,
- VM_stov,
- VM_strzone,
- VM_strunzone,
- VM_tokenize,
- VM_argv,
- VM_isserver, // 60
- VM_clientcount,
- VM_clientstate,
- VM_clcommand,
- VM_changelevel,
- VM_localsound,
- VM_getmousepos,
- VM_gettime,
- VM_loadfromdata,
- VM_loadfromfile,
- VM_modulo, // 70
- VM_cvar_string,
- VM_crash,
- VM_stackdump, // 73
- VM_search_begin,
- VM_search_end,
- VM_search_getsize,
- VM_search_getfilename, // 77
- VM_chr,
- VM_itof,
- VM_ftoe, // 80
- VM_itof, // isString
- VM_altstr_count,
- VM_altstr_prepare,
- VM_altstr_get,
- VM_altstr_set,
- VM_altstr_ins,
- VM_findflags,
- VM_findchainflags,
- VM_cvar_defstring, // 89
- 0, // 90
- e10, // 100
- e100, // 200
- e100, // 300
- e100, // 400
- // msg functions
- VM_M_WriteByte,
- VM_M_WriteChar,
- VM_M_WriteShort,
- VM_M_WriteLong,
- VM_M_WriteAngle,
- VM_M_WriteCoord,
- VM_M_WriteString,
- VM_M_WriteEntity, // 408
- 0,
- 0, // 410
- e10, // 420
- e10, // 430
- e10, // 440
- e10, // 450
- // draw functions
- VM_iscachedpic,
- VM_precache_pic,
- VM_freepic,
- VM_drawcharacter,
- VM_drawstring,
- VM_drawpic,
- VM_drawfill,
- VM_drawsetcliparea,
- VM_drawresetcliparea,
- VM_getimagesize,// 460
- VM_cin_open,
- VM_cin_close,
- VM_cin_setstate,
- VM_cin_getstate,
- VM_cin_restart, // 465
- VM_drawline, // 466
- 0,0,0,0, // 470
- VM_asin, // #471 float(float s) VM_asin (DP_QC_ASINACOSATANATAN2TAN)
- VM_acos, // #472 float(float c) VM_acos (DP_QC_ASINACOSATANATAN2TAN)
- VM_atan, // #473 float(float t) VM_atan (DP_QC_ASINACOSATANATAN2TAN)
- VM_atan2, // #474 float(float c, float s) VM_atan2 (DP_QC_ASINACOSATANATAN2TAN)
- VM_tan, // #475 float(float a) VM_tan (DP_QC_ASINACOSATANATAN2TAN)
- VM_strlennocol, // #476 float(string s) : DRESK - String Length (not counting color codes) (DP_QC_STRINGCOLORFUNCTIONS)
- VM_strdecolorize, // #477 string(string s) : DRESK - Decolorized String (DP_QC_STRINGCOLORFUNCTIONS)
- VM_strftime, // #478 string(float uselocaltime, string format, ...) (DP_QC_STRFTIME)
- 0, // 479
- 0, // 480
- e10, // 490
- e10, // 500
- e100, // 600
- // menu functions
- VM_M_setkeydest,
- VM_M_getkeydest,
- VM_M_setmousetarget,
- VM_M_getmousetarget,
- VM_M_callfunction,
- VM_M_writetofile,
- VM_M_isfunction,
- VM_M_getresolution,
- VM_keynumtostring,
- VM_M_findkeysforcommand,// 610
- VM_M_getserverliststat,
- VM_M_getserverliststring,
- VM_parseentitydata,
- VM_stringtokeynum,
- VM_M_resetserverlistmasks,
- VM_M_setserverlistmaskstring,
- VM_M_setserverlistmasknumber,
- VM_M_resortserverlist,
- VM_M_setserverlistsort,
- VM_M_refreshserverlist,
- VM_M_getserverlistnumber,
- VM_M_getserverlistindexforkey,
- VM_M_addwantedserverlistkey, // 623
- VM_M_getextresponse
+NULL, // #0 NULL function (not callable)
+VM_checkextension, // #1
+VM_error, // #2
+VM_objerror, // #3
+VM_print, // #4
+VM_bprint, // #5
+VM_sprint, // #6
+VM_centerprint, // #7
+VM_normalize, // #8
+VM_vlen, // #9
+VM_vectoyaw, // #10
+VM_vectoangles, // #11
+VM_random, // #12
+VM_localcmd, // #13
+VM_cvar, // #14
+VM_cvar_set, // #15
+VM_dprint, // #16
+VM_ftos, // #17
+VM_fabs, // #18
+VM_vtos, // #19
+VM_etos, // #20
+VM_stof, // #21
+VM_spawn, // #22
+VM_remove, // #23
+VM_find, // #24
+VM_findfloat, // #25
+VM_findchain, // #26
+VM_findchainfloat, // #27
+VM_precache_file, // #28
+VM_precache_sound, // #29
+VM_coredump, // #30
+VM_traceon, // #31
+VM_traceoff, // #32
+VM_eprint, // #33
+VM_rint, // #34
+VM_floor, // #35
+VM_ceil, // #36
+VM_nextent, // #37
+VM_sin, // #38
+VM_cos, // #39
+VM_sqrt, // #40
+VM_randomvec, // #41
+VM_registercvar, // #42
+VM_min, // #43
+VM_max, // #44
+VM_bound, // #45
+VM_pow, // #46
+VM_M_copyentity, // #47
+VM_fopen, // #48
+VM_fclose, // #49
+VM_fgets, // #50
+VM_fputs, // #51
+VM_strlen, // #52
+VM_strcat, // #53
+VM_substring, // #54
+VM_stov, // #55
+VM_strzone, // #56
+VM_strunzone, // #57
+VM_tokenize, // #58
+VM_argv, // #59
+VM_isserver, // #60
+VM_clientcount, // #61
+VM_clientstate, // #62
+VM_clcommand, // #63
+VM_changelevel, // #64
+VM_localsound, // #65
+VM_M_getmousepos, // #66
+VM_gettime, // #67
+VM_loadfromdata, // #68
+VM_loadfromfile, // #69
+VM_modulo, // #70
+VM_cvar_string, // #71
+VM_crash, // #72
+VM_stackdump, // #73
+VM_search_begin, // #74
+VM_search_end, // #75
+VM_search_getsize, // #76
+VM_search_getfilename, // #77
+VM_chr, // #78
+VM_itof, // #79
+VM_ftoe, // #80
+VM_itof, // #81 isString
+VM_altstr_count, // #82
+VM_altstr_prepare, // #83
+VM_altstr_get, // #84
+VM_altstr_set, // #85
+VM_altstr_ins, // #86
+VM_findflags, // #87
+VM_findchainflags, // #88
+VM_cvar_defstring, // #89
+// deactivate support for model rendering in the menu until someone has time to do it right [3/2/2008 Andreas]
+#if 0
+VM_CL_setmodel, // #90 void(entity e, string m) setmodel (QUAKE)
+VM_CL_precache_model, // #91 void(string s) precache_model (QUAKE)
+VM_CL_setorigin, // #92 void(entity e, vector o) setorigin (QUAKE)
+#else
+NULL,
+NULL,
+NULL,
+#endif
+NULL, // #93
+NULL, // #94
+NULL, // #95
+NULL, // #96
+NULL, // #97
+NULL, // #98
+NULL, // #99
+NULL, // #100
+NULL, // #101
+NULL, // #102
+NULL, // #103
+NULL, // #104
+NULL, // #105
+NULL, // #106
+NULL, // #107
+NULL, // #108
+NULL, // #109
+NULL, // #110
+NULL, // #111
+NULL, // #112
+NULL, // #113
+NULL, // #114
+NULL, // #115
+NULL, // #116
+NULL, // #117
+NULL, // #118
+NULL, // #119
+NULL, // #120
+NULL, // #121
+NULL, // #122
+NULL, // #123
+NULL, // #124
+NULL, // #125
+NULL, // #126
+NULL, // #127
+NULL, // #128
+NULL, // #129
+NULL, // #130
+NULL, // #131
+NULL, // #132
+NULL, // #133
+NULL, // #134
+NULL, // #135
+NULL, // #136
+NULL, // #137
+NULL, // #138
+NULL, // #139
+NULL, // #140
+NULL, // #141
+NULL, // #142
+NULL, // #143
+NULL, // #144
+NULL, // #145
+NULL, // #146
+NULL, // #147
+NULL, // #148
+NULL, // #149
+NULL, // #150
+NULL, // #151
+NULL, // #152
+NULL, // #153
+NULL, // #154
+NULL, // #155
+NULL, // #156
+NULL, // #157
+NULL, // #158
+NULL, // #159
+NULL, // #160
+NULL, // #161
+NULL, // #162
+NULL, // #163
+NULL, // #164
+NULL, // #165
+NULL, // #166
+NULL, // #167
+NULL, // #168
+NULL, // #169
+NULL, // #170
+NULL, // #171
+NULL, // #172
+NULL, // #173
+NULL, // #174
+NULL, // #175
+NULL, // #176
+NULL, // #177
+NULL, // #178
+NULL, // #179
+NULL, // #180
+NULL, // #181
+NULL, // #182
+NULL, // #183
+NULL, // #184
+NULL, // #185
+NULL, // #186
+NULL, // #187
+NULL, // #188
+NULL, // #189
+NULL, // #190
+NULL, // #191
+NULL, // #192
+NULL, // #193
+NULL, // #194
+NULL, // #195
+NULL, // #196
+NULL, // #197
+NULL, // #198
+NULL, // #199
+NULL, // #200
+NULL, // #201
+NULL, // #202
+NULL, // #203
+NULL, // #204
+NULL, // #205
+NULL, // #206
+NULL, // #207
+NULL, // #208
+NULL, // #209
+NULL, // #210
+NULL, // #211
+NULL, // #212
+NULL, // #213
+NULL, // #214
+NULL, // #215
+NULL, // #216
+NULL, // #217
+NULL, // #218
+NULL, // #219
+NULL, // #220
+VM_strstrofs, // #221 float(string str, string sub[, float startpos]) strstrofs (FTE_STRINGS)
+VM_str2chr, // #222 float(string str, float ofs) str2chr (FTE_STRINGS)
+VM_chr2str, // #223 string(float c, ...) chr2str (FTE_STRINGS)
+VM_strconv, // #224 string(float ccase, float calpha, float cnum, string s, ...) strconv (FTE_STRINGS)
+VM_strpad, // #225 string(float chars, string s, ...) strpad (FTE_STRINGS)
+VM_infoadd, // #226 string(string info, string key, string value, ...) infoadd (FTE_STRINGS)
+VM_infoget, // #227 string(string info, string key) infoget (FTE_STRINGS)
+VM_strncmp, // #228 float(string s1, string s2, float len) strncmp (FTE_STRINGS)
+VM_strncasecmp, // #229 float(string s1, string s2) strcasecmp (FTE_STRINGS)
+VM_strncasecmp, // #230 float(string s1, string s2, float len) strncasecmp (FTE_STRINGS)
+NULL, // #231
+NULL, // #232
+NULL, // #233
+NULL, // #234
+NULL, // #235
+NULL, // #236
+NULL, // #237
+NULL, // #238
+NULL, // #239
+NULL, // #240
+NULL, // #241
+NULL, // #242
+NULL, // #243
+NULL, // #244
+NULL, // #245
+NULL, // #246
+NULL, // #247
+NULL, // #248
+NULL, // #249
+NULL, // #250
+NULL, // #251
+NULL, // #252
+NULL, // #253
+NULL, // #254
+NULL, // #255
+NULL, // #256
+NULL, // #257
+NULL, // #258
+NULL, // #259
+NULL, // #260
+NULL, // #261
+NULL, // #262
+NULL, // #263
+NULL, // #264
+NULL, // #265
+NULL, // #266
+NULL, // #267
+NULL, // #268
+NULL, // #269
+NULL, // #270
+NULL, // #271
+NULL, // #272
+NULL, // #273
+NULL, // #274
+NULL, // #275
+NULL, // #276
+NULL, // #277
+NULL, // #278
+NULL, // #279
+NULL, // #280
+NULL, // #281
+NULL, // #282
+NULL, // #283
+NULL, // #284
+NULL, // #285
+NULL, // #286
+NULL, // #287
+NULL, // #288
+NULL, // #289
+NULL, // #290
+NULL, // #291
+NULL, // #292
+NULL, // #293
+NULL, // #294
+NULL, // #295
+NULL, // #296
+NULL, // #297
+NULL, // #298
+NULL, // #299
+// deactivate support for model rendering in the menu until someone has time to do it right [3/2/2008 Andreas]
+#if 0
+// CSQC range #300-#399
+VM_CL_R_ClearScene, // #300 void() clearscene (DP_QC_RENDER_SCENE)
+VM_CL_R_AddEntities, // #301 void(float mask) addentities (DP_QC_RENDER_SCENE)
+VM_CL_R_AddEntity, // #302 void(entity ent) addentity (DP_QC_RENDER_SCENE)
+VM_CL_R_SetView, // #303 float(float property, ...) setproperty (DP_QC_RENDER_SCENE)
+VM_CL_R_RenderScene, // #304 void() renderscene (DP_QC_RENDER_SCENE)
+VM_CL_R_AddDynamicLight, // #305 void(vector org, float radius, vector lightcolours) adddynamiclight (DP_QC_RENDER_SCENE)
+VM_CL_R_PolygonBegin, // #306 void(string texturename, float flag[, float is2d, float lines]) R_BeginPolygon (DP_QC_RENDER_SCENE)
+VM_CL_R_PolygonVertex, // #307 void(vector org, vector texcoords, vector rgb, float alpha) R_PolygonVertex (DP_QC_RENDER_SCENE)
+VM_CL_R_PolygonEnd, // #308 void() R_EndPolygon
+NULL/*VM_CL_R_LoadWorldModel*/, // #309 void(string modelname) R_LoadWorldModel
+// TODO: rearrange and merge all builtin lists and share as many extensions as possible between all VM instances [1/27/2008 Andreas]
+VM_CL_setattachment, // #310 void(entity e, entity tagentity, string tagname) setattachment (DP_GFX_QUAKE3MODELTAGS) (DP_QC_RENDER_SCENE)
+VM_CL_gettagindex, // #311 float(entity ent, string tagname) gettagindex (DP_QC_GETTAGINFO) (DP_QC_RENDER_SCENE)
+VM_CL_gettaginfo, // #312 vector(entity ent, float tagindex) gettaginfo (DP_QC_GETTAGINFO) (DP_QC_RENDER_SCENE)
+#else
+// CSQC range #300-#399
+NULL,
+NULL,
+NULL,
+NULL,
+NULL,
+NULL,
+NULL,
+NULL,
+NULL,
+NULL,
+NULL,
+NULL,
+NULL,
+#endif
+NULL, // #313
+NULL, // #314
+NULL, // #315
+NULL, // #316
+NULL, // #317
+NULL, // #318
+NULL, // #319
+NULL, // #320
+NULL, // #321
+NULL, // #322
+NULL, // #323
+NULL, // #324
+NULL, // #325
+NULL, // #326
+NULL, // #327
+NULL, // #328
+NULL, // #329
+NULL, // #330
+NULL, // #331
+NULL, // #332
+NULL, // #333
+NULL, // #334
+NULL, // #335
+NULL, // #336
+NULL, // #337
+NULL, // #338
+NULL, // #339
+VM_keynumtostring, // #340 string keynumtostring(float keynum)
+VM_stringtokeynum, // #341 float stringtokeynum(string key)
+VM_getkeybind, // #342 string(float keynum[, float bindmap]) getkeybind (EXT_CSQC)
+NULL, // #343
+NULL, // #344
+NULL, // #345
+NULL, // #346
+NULL, // #347
+NULL, // #348
+VM_CL_isdemo, // #349
+NULL, // #350
+NULL, // #351
+NULL, // #352
+VM_wasfreed, // #353 float(entity ent) wasfreed
+NULL, // #354
+VM_CL_videoplaying, // #355
+VM_findfont, // #356 float(string fontname) loadfont (DP_GFX_FONTS)
+VM_loadfont, // #357 float(string fontname, string fontmaps, string sizes, float slot) loadfont (DP_GFX_FONTS)
+NULL, // #358
+NULL, // #359
+NULL, // #360
+NULL, // #361
+NULL, // #362
+NULL, // #363
+NULL, // #364
+NULL, // #365
+NULL, // #366
+NULL, // #367
+NULL, // #368
+NULL, // #369
+NULL, // #370
+NULL, // #371
+NULL, // #372
+NULL, // #373
+NULL, // #374
+NULL, // #375
+NULL, // #376
+NULL, // #377
+NULL, // #378
+NULL, // #379
+NULL, // #380
+NULL, // #381
+NULL, // #382
+NULL, // #383
+NULL, // #384
+NULL, // #385
+NULL, // #386
+NULL, // #387
+NULL, // #388
+NULL, // #389
+NULL, // #390
+NULL, // #391
+NULL, // #392
+NULL, // #393
+NULL, // #394
+NULL, // #395
+NULL, // #396
+NULL, // #397
+NULL, // #398
+NULL, // #399
+NULL, // #400
+VM_M_WriteByte, // #401
+VM_M_WriteChar, // #402
+VM_M_WriteShort, // #403
+VM_M_WriteLong, // #404
+VM_M_WriteAngle, // #405
+VM_M_WriteCoord, // #406
+VM_M_WriteString, // #407
+VM_M_WriteEntity, // #408
+NULL, // #409
+NULL, // #410
+NULL, // #411
+NULL, // #412
+NULL, // #413
+NULL, // #414
+NULL, // #415
+NULL, // #416
+NULL, // #417
+NULL, // #418
+NULL, // #419
+NULL, // #420
+NULL, // #421
+NULL, // #422
+NULL, // #423
+NULL, // #424
+NULL, // #425
+NULL, // #426
+NULL, // #427
+NULL, // #428
+NULL, // #429
+NULL, // #430
+NULL, // #431
+NULL, // #432
+NULL, // #433
+NULL, // #434
+NULL, // #435
+NULL, // #436
+NULL, // #437
+NULL, // #438
+NULL, // #439
+VM_buf_create, // #440 float() buf_create (DP_QC_STRINGBUFFERS)
+VM_buf_del, // #441 void(float bufhandle) buf_del (DP_QC_STRINGBUFFERS)
+VM_buf_getsize, // #442 float(float bufhandle) buf_getsize (DP_QC_STRINGBUFFERS)
+VM_buf_copy, // #443 void(float bufhandle_from, float bufhandle_to) buf_copy (DP_QC_STRINGBUFFERS)
+VM_buf_sort, // #444 void(float bufhandle, float sortpower, float backward) buf_sort (DP_QC_STRINGBUFFERS)
+VM_buf_implode, // #445 string(float bufhandle, string glue) buf_implode (DP_QC_STRINGBUFFERS)
+VM_bufstr_get, // #446 string(float bufhandle, float string_index) bufstr_get (DP_QC_STRINGBUFFERS)
+VM_bufstr_set, // #447 void(float bufhandle, float string_index, string str) bufstr_set (DP_QC_STRINGBUFFERS)
+VM_bufstr_add, // #448 float(float bufhandle, string str, float order) bufstr_add (DP_QC_STRINGBUFFERS)
+VM_bufstr_free, // #449 void(float bufhandle, float string_index) bufstr_free (DP_QC_STRINGBUFFERS)
+NULL, // #450
+VM_iscachedpic, // #451 draw functions...
+VM_precache_pic, // #452
+VM_freepic, // #453
+VM_drawcharacter, // #454
+VM_drawstring, // #455
+VM_drawpic, // #456
+VM_drawfill, // #457
+VM_drawsetcliparea, // #458
+VM_drawresetcliparea, // #459
+VM_getimagesize, // #460
+VM_cin_open, // #461
+VM_cin_close, // #462
+VM_cin_setstate, // #463
+VM_cin_getstate, // #464
+VM_cin_restart, // #465
+VM_drawline, // #466
+VM_drawcolorcodedstring, // #467
+VM_stringwidth, // #468
+VM_drawsubpic, // #469
+VM_drawrotpic, // #470
+VM_asin, // #471 float(float s) VM_asin (DP_QC_ASINACOSATANATAN2TAN)
+VM_acos, // #472 float(float c) VM_acos (DP_QC_ASINACOSATANATAN2TAN)
+VM_atan, // #473 float(float t) VM_atan (DP_QC_ASINACOSATANATAN2TAN)
+VM_atan2, // #474 float(float c, float s) VM_atan2 (DP_QC_ASINACOSATANATAN2TAN)
+VM_tan, // #475 float(float a) VM_tan (DP_QC_ASINACOSATANATAN2TAN)
+VM_strlennocol, // #476 float(string s) : DRESK - String Length (not counting color codes) (DP_QC_STRINGCOLORFUNCTIONS)
+VM_strdecolorize, // #477 string(string s) : DRESK - Decolorized String (DP_QC_STRINGCOLORFUNCTIONS)
+VM_strftime, // #478 string(float uselocaltime, string format, ...) (DP_QC_STRFTIME)
+VM_tokenizebyseparator, // #479 float(string s) tokenizebyseparator (DP_QC_TOKENIZEBYSEPARATOR)
+VM_strtolower, // #480 string(string s) VM_strtolower : DRESK - Return string as lowercase
+VM_strtoupper, // #481 string(string s) VM_strtoupper : DRESK - Return string as uppercase
+NULL, // #482
+NULL, // #483
+VM_strreplace, // #484 string(string search, string replace, string subject) strreplace (DP_QC_STRREPLACE)
+VM_strireplace, // #485 string(string search, string replace, string subject) strireplace (DP_QC_STRREPLACE)
+NULL, // #486
+VM_gecko_create, // #487 float gecko_create( string name )
+VM_gecko_destroy, // #488 void gecko_destroy( string name )
+VM_gecko_navigate, // #489 void gecko_navigate( string name, string URI )
+VM_gecko_keyevent, // #490 float gecko_keyevent( string name, float key, float eventtype )
+VM_gecko_movemouse, // #491 void gecko_mousemove( string name, float x, float y )
+VM_gecko_resize, // #492 void gecko_resize( string name, float w, float h )
+VM_gecko_get_texture_extent, // #493 vector gecko_get_texture_extent( string name )
+VM_crc16, // #494 float(float caseinsensitive, string s, ...) crc16 = #494 (DP_QC_CRC16)
+VM_cvar_type, // #495 float(string name) cvar_type = #495; (DP_QC_CVAR_TYPE)
+VM_numentityfields, // #496 float() numentityfields = #496; (QP_QC_ENTITYDATA)
+VM_entityfieldname, // #497 string(float fieldnum) entityfieldname = #497; (DP_QC_ENTITYDATA)
+VM_entityfieldtype, // #498 float(float fieldnum) entityfieldtype = #498; (DP_QC_ENTITYDATA)
+VM_getentityfieldstring, // #499 string(float fieldnum, entity ent) getentityfieldstring = #499; (DP_QC_ENTITYDATA)
+VM_putentityfieldstring, // #500 float(float fieldnum, entity ent, string s) putentityfieldstring = #500; (DP_QC_ENTITYDATA)
+NULL, // #501
+NULL, // #502
+VM_whichpack, // #503 string(string) whichpack = #503;
+NULL, // #504
+NULL, // #505
+NULL, // #506
+NULL, // #507
+NULL, // #508
+NULL, // #509
+VM_uri_escape, // #510 string(string in) uri_escape = #510;
+VM_uri_unescape, // #511 string(string in) uri_unescape = #511;
+VM_etof, // #512 float(entity ent) num_for_edict = #512 (DP_QC_NUM_FOR_EDICT)
+VM_uri_get, // #513 float(string uri, float id, [string post_contenttype, string post_delim, [float buf]]) uri_get = #513; (DP_QC_URI_GET, DP_QC_URI_POST)
+VM_tokenize_console, // #514 float(string str) tokenize_console = #514; (DP_QC_TOKENIZE_CONSOLE)
+VM_argv_start_index, // #515 float(float idx) argv_start_index = #515; (DP_QC_TOKENIZE_CONSOLE)
+VM_argv_end_index, // #516 float(float idx) argv_end_index = #516; (DP_QC_TOKENIZE_CONSOLE)
+VM_buf_cvarlist, // #517 void(float buf, string prefix, string antiprefix) buf_cvarlist = #517; (DP_QC_STRINGBUFFERS_CVARLIST)
+VM_cvar_description, // #518 float(string name) cvar_description = #518; (DP_QC_CVAR_DESCRIPTION)
+NULL, // #519
+NULL, // #520
+NULL, // #521
+NULL, // #522
+NULL, // #523
+NULL, // #524
+NULL, // #525
+NULL, // #526
+NULL, // #527
+NULL, // #528
+NULL, // #529
+NULL, // #530
+NULL, // #531
+VM_log, // #532
+VM_getsoundtime, // #533 float(entity e, float channel) getsoundtime = #533; (DP_SND_GETSOUNDTIME)
+VM_soundlength, // #534 float(string sample) soundlength = #534; (DP_SND_GETSOUNDTIME)
+VM_buf_loadfile, // #535 float(string filename, float bufhandle) buf_loadfile (DP_QC_STRINGBUFFERS_EXT_WIP)
+VM_buf_writefile, // #536 float(float filehandle, float bufhandle, float startpos, float numstrings) buf_writefile (DP_QC_STRINGBUFFERS_EXT_WIP)
+VM_bufstr_find, // #537 float(float bufhandle, string match, float matchrule, float startpos) bufstr_find (DP_QC_STRINGBUFFERS_EXT_WIP)
+VM_matchpattern, // #538 float(string s, string pattern, float matchrule) matchpattern (DP_QC_STRINGBUFFERS_EXT_WIP)
+NULL, // #539
+NULL, // #540
+NULL, // #541
+NULL, // #542
+NULL, // #543
+NULL, // #544
+NULL, // #545
+NULL, // #546
+NULL, // #547
+NULL, // #548
+NULL, // #549
+NULL, // #550
+NULL, // #551
+NULL, // #552
+NULL, // #553
+NULL, // #554
+NULL, // #555
+NULL, // #556
+NULL, // #557
+NULL, // #558
+NULL, // #559
+NULL, // #560
+NULL, // #561
+NULL, // #562
+NULL, // #563
+NULL, // #564
+NULL, // #565
+NULL, // #566
+NULL, // #567
+NULL, // #568
+NULL, // #569
+NULL, // #570
+NULL, // #571
+NULL, // #572
+NULL, // #573
+NULL, // #574
+NULL, // #575
+NULL, // #576
+NULL, // #577
+NULL, // #578
+NULL, // #579
+NULL, // #580
+NULL, // #581
+NULL, // #582
+NULL, // #583
+NULL, // #584
+NULL, // #585
+NULL, // #586
+NULL, // #587
+NULL, // #588
+NULL, // #589
+NULL, // #590
+NULL, // #591
+NULL, // #592
+NULL, // #593
+NULL, // #594
+NULL, // #595
+NULL, // #596
+NULL, // #597
+NULL, // #598
+NULL, // #599
+NULL, // #600
+VM_M_setkeydest, // #601 void setkeydest(float dest)
+VM_M_getkeydest, // #602 float getkeydest(void)
+VM_M_setmousetarget, // #603 void setmousetarget(float trg)
+VM_M_getmousetarget, // #604 float getmousetarget(void)
+VM_callfunction, // #605 void callfunction(...)
+VM_writetofile, // #606 void writetofile(float fhandle, entity ent)
+VM_isfunction, // #607 float isfunction(string function_name)
+VM_M_getresolution, // #608 vector getresolution(float number, [float forfullscreen])
+VM_keynumtostring, // #609 string keynumtostring(float keynum)
+VM_findkeysforcommand, // #610 string findkeysforcommand(string command[, float bindmap])
+VM_M_getserverliststat, // #611 float gethostcachevalue(float type)
+VM_M_getserverliststring, // #612 string gethostcachestring(float type, float hostnr)
+VM_parseentitydata, // #613 void parseentitydata(entity ent, string data)
+VM_stringtokeynum, // #614 float stringtokeynum(string key)
+VM_M_resetserverlistmasks, // #615 void resethostcachemasks(void)
+VM_M_setserverlistmaskstring, // #616 void sethostcachemaskstring(float mask, float fld, string str, float op)
+VM_M_setserverlistmasknumber, // #617 void sethostcachemasknumber(float mask, float fld, float num, float op)
+VM_M_resortserverlist, // #618 void resorthostcache(void)
+VM_M_setserverlistsort, // #619 void sethostcachesort(float fld, float descending)
+VM_M_refreshserverlist, // #620 void refreshhostcache(void)
+VM_M_getserverlistnumber, // #621 float gethostcachenumber(float fld, float hostnr)
+VM_M_getserverlistindexforkey,// #622 float gethostcacheindexforkey(string key)
+VM_M_addwantedserverlistkey, // #623 void addwantedhostcachekey(string key)
+VM_CL_getextresponse, // #624 string getextresponse(void)
+VM_netaddress_resolve, // #625 string netaddress_resolve(string, float)
+VM_M_getgamedirinfo, // #626 string getgamedirinfo(float n, float prop)
+VM_sprintf, // #627 string sprintf(string format, ...)
+NULL, // #628
+NULL, // #629
+VM_setkeybind, // #630 float(float key, string bind[, float bindmap]) setkeybind
+VM_getbindmaps, // #631 vector(void) getbindmap
+VM_setbindmaps, // #632 float(vector bm) setbindmap
+VM_M_crypto_getkeyfp, // #633 string(string addr) crypto_getkeyfp
+VM_M_crypto_getidfp, // #634 string(string addr) crypto_getidfp
+VM_M_crypto_getencryptlevel, // #635 string(string addr) crypto_getencryptlevel
+VM_M_crypto_getmykeyfp, // #636 string(float addr) crypto_getmykeyfp
+VM_M_crypto_getmyidfp, // #637 string(float addr) crypto_getmyidfp
+NULL, // #638
+VM_digest_hex, // #639
+NULL, // #640
+VM_M_crypto_getmyidstatus, // #641 float(float i) crypto_getmyidstatus
+VM_coverage, // #642
+VM_M_crypto_getidstatus, // #643 float(string addr) crypto_getidstatus
+NULL
};
const int vm_m_numbuiltins = sizeof(vm_m_builtins) / sizeof(prvm_builtin_t);
-void VM_M_Cmd_Init(void)
+void MVM_init_cmd(prvm_prog_t *prog)
{
- VM_Cmd_Init();
+ r_refdef_scene_t *scene;
+
+ VM_Cmd_Init(prog);
+ prog->polygonbegin_model = NULL;
+ prog->polygonbegin_guess2d = 0;
+
+ scene = R_GetScenePointer( RST_MENU );
+
+ memset (scene, 0, sizeof (*scene));
+
+ scene->maxtempentities = 128;
+ scene->tempentities = (entity_render_t*) Mem_Alloc(prog->progs_mempool, sizeof(entity_render_t) * scene->maxtempentities);
+
+ scene->maxentities = MAX_EDICTS + 256 + 512;
+ scene->entities = (entity_render_t **)Mem_Alloc(prog->progs_mempool, sizeof(entity_render_t *) * scene->maxentities);
+
+ // LadyHavoc: what is this for?
+ scene->ambientintensity = 32.0f;
}
-void VM_M_Cmd_Reset(void)
+void MVM_reset_cmd(prvm_prog_t *prog)
{
+ // note: the menu's render entities are automatically freed when the prog's pool is freed
+
//VM_Cmd_Init();
- VM_Cmd_Reset();
+ VM_Cmd_Reset(prog);
+ prog->polygonbegin_model = NULL;
+ prog->polygonbegin_guess2d = 0;
}
projects / xonotic / darkplaces.git / blobdiff