ddef_t *PRVM_ED_FieldAtOfs(int ofs);
qboolean PRVM_ED_ParseEpair(prvm_edict_t *ent, ddef_t *key, const char *s, qboolean parsebackslash);
-// LordHavoc: optional runtime bounds checking (speed drain, but worth it for security, on by default - breaks most QCCX features (used by CRMod and others))
-#ifdef PRVM_BOUNDSCHECK_CVAR
-cvar_t prvm_boundscheck = {0, "prvm_boundscheck", "1", "enables detection of out of bounds memory access in the QuakeC code being run (in other words, prevents really exceedingly bad QuakeC code from doing nasty things to your computer)"};
-#endif
// LordHavoc: prints every opcode as it executes - warning: this is significant spew
cvar_t prvm_traceqc = {0, "prvm_traceqc", "0", "prints every QuakeC statement as it is executed (only for really thorough debugging!)"};
// LordHavoc: counts usage of each QuakeC statement
cvar_t prvm_leaktest_ignore_classnames = {0, "prvm_leaktest_ignore_classnames", "", "classnames of entities to NOT leak check because they are found by find(world, classname, ...) but are actually spawned by QC code (NOT map entities)"};
cvar_t prvm_errordump = {0, "prvm_errordump", "0", "write a savegame on crash to crash-server.dmp"};
+qboolean prvm_runawaycheck = true;
+
+// LordHavoc: optional runtime bounds checking (speed drain, but worth it for security, on by default - breaks most QCCX features (used by CRMod and others))
+// enables detection of out of bounds memory access in the QuakeC code being run (in other words, prevents really exceedingly bad QuakeC code from doing nasty things to your computer)
+qboolean prvm_boundscheck = true;
+
extern sizebuf_t vm_tempstringsbuf;
//============================================================================
Cmd_AddCommand ("cl_cmd", PRVM_GameCommand_Client_f, "calls the client QC function GameCommand with the supplied string as argument");
Cmd_AddCommand ("menu_cmd", PRVM_GameCommand_Menu_f, "calls the menu QC function GameCommand with the supplied string as argument");
Cmd_AddCommand ("sv_cmd", PRVM_GameCommand_Server_f, "calls the server QC function GameCommand with the supplied string as argument");
- // LordHavoc: optional runtime bounds checking (speed drain, but worth it for security, on by default - breaks most QCCX features (used by CRMod and others))
-#ifdef PRVM_BOUNDSCHECK_CVAR
- Cvar_RegisterVariable (&prvm_boundscheck);
-#endif
+
+ // COMMANDLINEOPTION: PRVM: -noboundscheck disables the bounds checks (security hole if CSQC is in use!)
+ prvm_boundscheck = !COM_CheckParm("-noboundscheck");
+
Cvar_RegisterVariable (&prvm_traceqc);
Cvar_RegisterVariable (&prvm_statementprofiling);
Cvar_RegisterVariable (&prvm_backtraceforwarnings);
Cvar_RegisterVariable (&prvm_leaktest_ignore_classnames);
Cvar_RegisterVariable (&prvm_errordump);
+ // COMMANDLINEOPTION: PRVM: -norunaway disables the runaway loop check (it might be impossible to exit DarkPlaces if used!)
+ prvm_runawaycheck = !COM_CheckParm("-norunaway");
+
//VM_Cmd_Init();
}
#define OPA ((prvm_eval_t *)&prog->globals.generic[(unsigned short) st->a])
#define OPB ((prvm_eval_t *)&prog->globals.generic[(unsigned short) st->b])
#define OPC ((prvm_eval_t *)&prog->globals.generic[(unsigned short) st->c])
-#ifdef PRVM_BOUNDSCHECK_CVAR
-extern cvar_t prvm_boundscheck;
-#endif
extern cvar_t prvm_traceqc;
extern cvar_t prvm_statementprofiling;
extern sizebuf_t vm_tempstringsbuf;
+extern qboolean prvm_runawaycheck;
+extern qboolean prvm_boundscheck;
void PRVM_ExecuteProgram (func_t fnum, const char *errormessage)
{
dstatement_t *st, *startst;
chooseexecprogram:
cachedpr_trace = prog->trace;
- if (prvm_statementprofiling.integer)
+ if (prvm_runawaycheck)
{
-#define PRVMSTATEMENTPROFILING 1
-#ifdef PRVM_BOUNDSCHECK_CVAR
- if (prvm_boundscheck.integer)
-#endif
+#define PRVMRUNAWAYCHECK 1
+ if (prvm_statementprofiling.integer)
{
-#define PRVMBOUNDSCHECK 1
- if (prog->trace)
+#define PRVMSTATEMENTPROFILING 1
+ if (prvm_boundscheck)
{
+#define PRVMBOUNDSCHECK 1
+ if (prog->trace)
+ {
#define PRVMTRACE 1
#include "prvm_execprogram.h"
#undef PRVMTRACE
+ }
+ else
+ {
+#include "prvm_execprogram.h"
+ }
+#undef PRVMBOUNDSCHECK
}
else
{
+ if (prog->trace)
+ {
+#define PRVMTRACE 1
+#include "prvm_execprogram.h"
+#undef PRVMTRACE
+ }
+ else
+ {
#include "prvm_execprogram.h"
+ }
}
-#undef PRVMBOUNDSCHECK
+#undef PRVMSTATEMENTPROFILING
}
-#ifdef PRVM_BOUNDSCHECK_CVAR
else
{
- if (prog->trace)
+ if (prvm_boundscheck)
{
+#define PRVMBOUNDSCHECK 1
+ if (prog->trace)
+ {
#define PRVMTRACE 1
#include "prvm_execprogram.h"
#undef PRVMTRACE
+ }
+ else
+ {
+#include "prvm_execprogram.h"
+ }
+#undef PRVMBOUNDSCHECK
}
else
{
+ if (prog->trace)
+ {
+#define PRVMTRACE 1
+#include "prvm_execprogram.h"
+#undef PRVMTRACE
+ }
+ else
+ {
#include "prvm_execprogram.h"
+ }
}
}
-#endif
-#undef PRVMSTATEMENTPROFILING
+#undef PRVMRUNAWAYCHECK 1
}
else
{
-#ifdef PRVM_BOUNDSCHECK_CVAR
- if (prvm_boundscheck.integer)
-#endif
+ if (prvm_statementprofiling.integer)
{
-#define PRVMBOUNDSCHECK 1
- if (prog->trace)
+#define PRVMSTATEMENTPROFILING 1
+ if (prvm_boundscheck)
{
+#define PRVMBOUNDSCHECK 1
+ if (prog->trace)
+ {
#define PRVMTRACE 1
#include "prvm_execprogram.h"
#undef PRVMTRACE
+ }
+ else
+ {
+#include "prvm_execprogram.h"
+ }
+#undef PRVMBOUNDSCHECK
}
else
{
+ if (prog->trace)
+ {
+#define PRVMTRACE 1
+#include "prvm_execprogram.h"
+#undef PRVMTRACE
+ }
+ else
+ {
#include "prvm_execprogram.h"
+ }
}
-#undef PRVMBOUNDSCHECK
+#undef PRVMSTATEMENTPROFILING
}
-#ifdef PRVM_BOUNDSCHECK_CVAR
else
{
- if (prog->trace)
+ if (prvm_boundscheck)
{
+#define PRVMBOUNDSCHECK 1
+ if (prog->trace)
+ {
#define PRVMTRACE 1
#include "prvm_execprogram.h"
#undef PRVMTRACE
+ }
+ else
+ {
+#include "prvm_execprogram.h"
+ }
+#undef PRVMBOUNDSCHECK
}
else
{
+ if (prog->trace)
+ {
+#define PRVMTRACE 1
+#include "prvm_execprogram.h"
+#undef PRVMTRACE
+ }
+ else
+ {
#include "prvm_execprogram.h"
+ }
}
}
-#endif
}
cleanup:
prog->xfunction->profile += (st - startst);
st += st->b - 1; // offset the s++
startst = st;
+#if PRVMRUNAWAYCHECK
if (++jumpcount == 10000000)
{
prog->xstatement = st - prog->statements;
PRVM_Profile(1<<30, 1000000);
PRVM_ERROR("%s runaway loop counter hit limit of %d jumps\ntip: read above for list of most-executed functions", PRVM_NAME, jumpcount);
}
+#endif
}
break;
prog->xfunction->profile += (st - startst);
st += st->b - 1; // offset the s++
startst = st;
+#if PRVMRUNAWAYCHECK
if (++jumpcount == 10000000)
{
prog->xstatement = st - prog->statements;
PRVM_Profile(1<<30, 1000000);
PRVM_ERROR("%s runaway loop counter hit limit of %d jumps\ntip: read above for list of most-executed functions", PRVM_NAME, jumpcount);
}
+#endif
}
break;
prog->xfunction->profile += (st - startst);
st += st->a - 1; // offset the s++
startst = st;
+#if PRVMRUNAWAYCHECK
if (++jumpcount == 10000000)
{
prog->xstatement = st - prog->statements;
PRVM_Profile(1<<30, 1000000);
PRVM_ERROR("%s runaway loop counter hit limit of %d jumps\ntip: read above for list of most-executed functions", PRVM_NAME, jumpcount);
}
+#endif
break;
case OP_CALL0: