]> de.git.xonotic.org Git - xonotic/darkplaces.git/blobdiff - pr_cmds.c
no time to explain, more changes on the path to q3bsp support
[xonotic/darkplaces.git] / pr_cmds.c
index 1c4665aec7e2a7a9b2f30e9351b2d48605a97bcc..0f801f8a4e6f6afd8ea26343ed5b957408b9f160 100644 (file)
--- a/pr_cmds.c
+++ b/pr_cmds.c
@@ -20,7 +20,14 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 
 #include "quakedef.h"
 
-cvar_t sv_aim = {CVAR_SAVE, "sv_aim", "2"}; //"0.93"}; // LordHavoc: disabled autoaim by default
+cvar_t sv_aim = {CVAR_SAVE, "sv_aim", "2"}; //"0.93"}; // LordHavoc: disabled autoaim by default
+cvar_t pr_zone_min_strings = {0, "pr_zone_min_strings", "64"};
+
+mempool_t *pr_strings_mempool;
+
+#define MAX_VARSTRING 4096
+
+char pr_varstring_temp[MAX_VARSTRING];
 
 #define        RETURN_EDICT(e) (((int *)pr_globals)[OFS_RETURN] = EDICT_TO_PROG(e))
 
@@ -34,18 +41,33 @@ cvar_t      sv_aim = {CVAR_SAVE, "sv_aim", "2"}; //"0.93"}; // LordHavoc: disabled au
 */
 
 
-char *PF_VarString (int        first)
+char *PF_VarString (int first)
 {
-       int             i;
-       static char out[4096]; // FIXME: buffer overflow potential
+       int i;
+       const char *s;
+       char *out, *outend;
 
-       out[0] = 0;
-       for (i = first;i < pr_argc;i++)
-               strcat (out, G_STRING((OFS_PARM0+i*3)));
-       return out;
+       out = pr_varstring_temp;
+       outend = pr_varstring_temp + sizeof(pr_varstring_temp) - 1;
+       for (i = first;i < pr_argc && out < outend;i++)
+       {
+               s = G_STRING((OFS_PARM0+i*3));
+               while (out < outend && *s)
+                       *out++ = *s++;
+       }
+       *out++ = 0;
+       return pr_varstring_temp;
 }
 
 char *ENGINE_EXTENSIONS =
+"DP_CL_LOADSKY "
+"DP_EF_NODRAW "
+"DP_EF_ADDITIVE "
+"DP_EF_BLUE "
+"DP_EF_RED "
+"DP_EF_FULLBRIGHT "
+"DP_EF_FLAME "
+"DP_EF_STARDUST "
 "DP_ENT_ALPHA "
 "DP_ENT_CUSTOMCOLORMAP "
 "DP_ENT_EXTERIORMODELTOCLIENT "
@@ -53,10 +75,16 @@ char *ENGINE_EXTENSIONS =
 "DP_ENT_GLOW "
 "DP_ENT_SCALE "
 "DP_ENT_VIEWMODEL "
+"DP_GFX_EXTERNALTEXTURES "
 "DP_GFX_FOG "
+"DP_GFX_QUAKE3MODELTAGS "
+"DP_GFX_SKINFILES "
+"DP_GFX_SKYBOX "
 "DP_HALFLIFE_MAP "
+"DP_HALFLIFE_MAP_CVAR "
 "DP_INPUTBUTTONS "
 "DP_MONSTERWALK "
+"DP_MOVETYPEBOUNCEMISSILE "
 "DP_MOVETYPEFOLLOW "
 "DP_QC_CHANGEPITCH "
 "DP_QC_COPYENTITY "
@@ -65,6 +93,7 @@ char *ENGINE_EXTENSIONS =
 "DP_QC_FINDCHAINFLOAT "
 "DP_QC_FINDFLOAT "
 "DP_QC_GETLIGHT "
+"DP_QC_GETSURFACE "
 "DP_QC_MINMAXBOUND "
 "DP_QC_RANDOMVEC "
 "DP_QC_SINCOSSQRTPOW "
@@ -72,6 +101,7 @@ char *ENGINE_EXTENSIONS =
 "DP_QC_TRACETOSS "
 "DP_QC_VECTORVECTORS "
 "DP_QUAKE2_MODEL "
+"DP_QUAKE3_MODEL "
 "DP_REGISTERCVAR "
 "DP_SOLIDCORPSE "
 "DP_SPRITE32 "
@@ -84,11 +114,20 @@ char *ENGINE_EXTENSIONS =
 "DP_SV_SLOWMO "
 "DP_TE_BLOOD "
 "DP_TE_BLOODSHOWER "
+"DP_TE_CUSTOMFLASH "
 "DP_TE_EXPLOSIONRGB "
+"DP_TE_FLAMEJET "
 "DP_TE_PARTICLECUBE "
 "DP_TE_PARTICLERAIN "
 "DP_TE_PARTICLESNOW "
+"DP_TE_PLASMABURN "
+"DP_TE_QUADEFFECTS1 "
+"DP_TE_SMALLFLASH "
 "DP_TE_SPARK "
+"DP_TE_STANDARDEFFECTBUILTINS "
+"DP_VIEWZOOM "
+"FRIK_FILE "
+"KRIMZON_SV_PARSECLIENTCOMMAND "
 "NEH_CMD_PLAY2 "
 "NEH_RESTOREGAME "
 "TW_SV_STEPCONTROL "
@@ -226,7 +265,7 @@ void PF_setorigin (void)
 void SetMinMaxSize (edict_t *e, float *min, float *max, qboolean rotate)
 {
        int             i;
-       
+
        for (i=0 ; i<3 ; i++)
                if (min[i] > max[i])
                        Host_Error ("backwards mins/maxs");
@@ -329,20 +368,19 @@ void PF_sprint (void)
        char            *s;
        client_t        *client;
        int                     entnum;
-       
+
        entnum = G_EDICTNUM(OFS_PARM0);
        s = PF_VarString(1);
-       
-       if (entnum < 1 || entnum > svs.maxclients)
+
+       if (entnum < 1 || entnum > MAX_SCOREBOARD || !svs.connectedclients[entnum-1])
        {
                Con_Printf ("tried to sprint to a non-client\n");
                return;
        }
-               
-       client = &svs.clients[entnum-1];
-               
-       MSG_WriteChar (&client->message,svc_print);
-       MSG_WriteString (&client->message, s );
+
+       client = svs.connectedclients[entnum-1];
+       MSG_WriteChar(&client->message,svc_print);
+       MSG_WriteString(&client->message, s );
 }
 
 
@@ -360,20 +398,19 @@ void PF_centerprint (void)
        char            *s;
        client_t        *client;
        int                     entnum;
-       
+
        entnum = G_EDICTNUM(OFS_PARM0);
        s = PF_VarString(1);
-       
-       if (entnum < 1 || entnum > svs.maxclients)
+
+       if (entnum < 1 || entnum > MAX_SCOREBOARD || !svs.connectedclients[entnum-1])
        {
                Con_Printf ("tried to sprint to a non-client\n");
                return;
        }
-               
-       client = &svs.clients[entnum-1];
 
-       MSG_WriteChar (&client->message,svc_centerprint);
-       MSG_WriteString (&client->message, s );
+       client = svs.connectedclients[entnum-1];
+       MSG_WriteChar(&client->message,svc_centerprint);
+       MSG_WriteString(&client->message, s );
 }
 
 
@@ -389,12 +426,12 @@ void PF_normalize (void)
        float   *value1;
        vec3_t  newvalue;
        float   new;
-       
+
        value1 = G_VECTOR(OFS_PARM0);
 
        new = value1[0] * value1[0] + value1[1] * value1[1] + value1[2]*value1[2];
        new = sqrt(new);
-       
+
        if (new == 0)
                newvalue[0] = newvalue[1] = newvalue[2] = 0;
        else
@@ -404,7 +441,7 @@ void PF_normalize (void)
                newvalue[1] = value1[1] * new;
                newvalue[2] = value1[2] * new;
        }
-       
+
        VectorCopy (newvalue, G_VECTOR(OFS_RETURN));
 }
 
@@ -424,7 +461,7 @@ void PF_vlen (void)
 
        new = value1[0] * value1[0] + value1[1] * value1[1] + value1[2]*value1[2];
        new = sqrt(new);
-       
+
        G_FLOAT(OFS_RETURN) = new;
 }
 
@@ -439,7 +476,7 @@ void PF_vectoyaw (void)
 {
        float   *value1;
        float   yaw;
-       
+
        value1 = G_VECTOR(OFS_PARM0);
 
        if (value1[1] == 0 && value1[0] == 0)
@@ -467,7 +504,7 @@ void PF_vectoangles (void)
        float   *value1;
        float   forward;
        float   yaw, pitch;
-       
+
        value1 = G_VECTOR(OFS_PARM0);
 
        if (value1[1] == 0 && value1[0] == 0)
@@ -533,7 +570,7 @@ void PF_particle (void)
        float           *org, *dir;
        float           color;
        float           count;
-                       
+
        org = G_VECTOR(OFS_PARM0);
        dir = G_VECTOR(OFS_PARM1);
        color = G_FLOAT(OFS_PARM2);
@@ -556,11 +593,11 @@ void PF_ambientsound (void)
        float           vol, attenuation;
        int                     i, soundnum, large;
 
-       pos = G_VECTOR (OFS_PARM0);                     
+       pos = G_VECTOR (OFS_PARM0);
        samp = G_STRING(OFS_PARM1);
        vol = G_FLOAT(OFS_PARM2);
        attenuation = G_FLOAT(OFS_PARM3);
-       
+
 // check to see if samp was properly precached
        for (soundnum=0, check = sv.sound_precache ; *check ; check++, soundnum++)
                if (!strcmp(*check,samp))
@@ -618,13 +655,13 @@ void PF_sound (void)
        edict_t         *entity;
        int             volume;
        float attenuation;
-               
+
        entity = G_EDICT(OFS_PARM0);
        channel = G_FLOAT(OFS_PARM1);
        sample = G_STRING(OFS_PARM2);
        volume = G_FLOAT(OFS_PARM3) * 255;
        attenuation = G_FLOAT(OFS_PARM4);
-       
+
        if (volume < 0 || volume > 255)
                Host_Error ("SV_StartSound: volume = %i", volume);
 
@@ -674,7 +711,7 @@ void PF_traceline (void)
        nomonsters = G_FLOAT(OFS_PARM2);
        ent = G_EDICT(OFS_PARM3);
 
-       trace = SV_Move (v1, vec3_origin, vec3_origin, v2, nomonsters ? MOVE_NOMONSTERS : MOVE_NORMAL, ent);
+       trace = SV_Move (v1, vec3_origin, vec3_origin, v2, nomonsters, ent);
 
        pr_global_struct->trace_allsolid = trace.allsolid;
        pr_global_struct->trace_startsolid = trace.startsolid;
@@ -781,55 +818,44 @@ void PF_checkpos (void)
 
 //============================================================================
 
+int checkpvsbytes;
 qbyte checkpvs[MAX_MAP_LEAFS/8];
 
 int PF_newcheckclient (int check)
 {
        int             i;
-       qbyte   *pvs;
        edict_t *ent;
-       mleaf_t *leaf;
        vec3_t  org;
 
 // cycle to the next one
 
-       if (check < 1)
-               check = 1;
-       if (check > svs.maxclients)
-               check = svs.maxclients;
-
-       if (check == svs.maxclients)
+       check = bound(1, check, MAX_SCOREBOARD);
+       if (check == MAX_SCOREBOARD)
                i = 1;
        else
                i = check + 1;
 
        for ( ;  ; i++)
        {
+               // count the cost
                pr_xfunction->builtinsprofile++;
-               if (i == svs.maxclients+1)
+               // wrap around
+               if (i == MAX_SCOREBOARD+1)
                        i = 1;
-
+               // look up the client's edict
                ent = EDICT_NUM(i);
-
-               if (i == check)
-                       break;  // didn't find anything else
-
-               if (ent->free)
-                       continue;
-               if (ent->v->health <= 0)
-                       continue;
-               if ((int)ent->v->flags & FL_NOTARGET)
+               // check if it is to be ignored, but never ignore the one we started on (prevent infinite loop)
+               if (i != check && (ent->e->free || ent->v->health <= 0 || ((int)ent->v->flags & FL_NOTARGET)))
                        continue;
-
-       // anything that is a client, or has a client as an enemy
+               // found a valid client (possibly the same one again)
                break;
        }
 
 // get the PVS for the entity
-       VectorAdd (ent->v->origin, ent->v->view_ofs, org);
-       leaf = Mod_PointInLeaf (org, sv.worldmodel);
-       pvs = Mod_LeafPVS (leaf, sv.worldmodel);
-       memcpy (checkpvs, pvs, (sv.worldmodel->numleafs+7)>>3 );
+       VectorAdd(ent->v->origin, ent->v->view_ofs, org);
+       checkpvsbytes = 0;
+       if (sv.worldmodel && sv.worldmodel->brush.FatPVS)
+               checkpvsbytes = sv.worldmodel->brush.FatPVS(sv.worldmodel, org, 0, checkpvs, sizeof(checkpvs));
 
        return i;
 }
@@ -853,8 +879,6 @@ int c_invis, c_notvis;
 void PF_checkclient (void)
 {
        edict_t *ent, *self;
-       mleaf_t *leaf;
-       int             l;
        vec3_t  view;
 
        // find a new check if on a new frame
@@ -866,7 +890,7 @@ void PF_checkclient (void)
 
        // return check if it might be visible
        ent = EDICT_NUM(sv.lastcheck);
-       if (ent->free || ent->v->health <= 0)
+       if (ent->e->free || ent->v->health <= 0)
        {
                RETURN_EDICT(sv.edicts);
                return;
@@ -874,17 +898,12 @@ void PF_checkclient (void)
 
        // if current entity can't possibly see the check entity, return 0
        self = PROG_TO_EDICT(pr_global_struct->self);
-       VectorAdd (self->v->origin, self->v->view_ofs, view);
-       leaf = Mod_PointInLeaf (view, sv.worldmodel);
-       if (leaf)
+       VectorAdd(self->v->origin, self->v->view_ofs, view);
+       if (sv.worldmodel && checkpvsbytes && !sv.worldmodel->brush.BoxTouchingPVS(sv.worldmodel, checkpvs, view, view))
        {
-               l = (leaf - sv.worldmodel->leafs) - 1;
-               if ( (l<0) || !(checkpvs[l>>3] & (1<<(l&7)) ) )
-               {
-                       c_notvis++;
-                       RETURN_EDICT(sv.edicts);
-                       return;
-               }
+               c_notvis++;
+               RETURN_EDICT(sv.edicts);
+               return;
        }
 
        // might be able to see it
@@ -911,13 +930,13 @@ void PF_stuffcmd (void)
        client_t        *old;
 
        entnum = G_EDICTNUM(OFS_PARM0);
-       if (entnum < 1 || entnum > svs.maxclients)
+       if (entnum < 1 || entnum > MAX_SCOREBOARD)
                Host_Error ("Parm 0 not a client");
        str = G_STRING(OFS_PARM1);
 
        old = host_client;
-       host_client = &svs.clients[entnum-1];
-       Host_ClientCommands ("%s", str);
+       if ((host_client = svs.connectedclients[entnum-1]))
+               Host_ClientCommands ("%s", str);
        host_client = old;
 }
 
@@ -999,7 +1018,7 @@ void PF_findradius (void)
        for (i=1 ; i<sv.num_edicts ; i++, ent = NEXT_EDICT(ent))
        {
                pr_xfunction->builtinsprofile++;
-               if (ent->free)
+               if (ent->e->free)
                        continue;
                if (ent->v->solid == SOLID_NOT)
                        continue;
@@ -1095,7 +1114,7 @@ void PF_Remove (void)
        ed = G_EDICT(OFS_PARM0);
        if (ed == sv.edicts)
                Host_Error("remove: tried to remove world\n");
-       if (NUM_FOR_EDICT(ed) <= svs.maxclients)
+       if (NUM_FOR_EDICT(ed) <= MAX_SCOREBOARD)
                Host_Error("remove: tried to remove a client\n");
        ED_Free (ed);
 }
@@ -1122,7 +1141,7 @@ void PF_Find (void)
        {
                pr_xfunction->builtinsprofile++;
                ed = EDICT_NUM(e);
-               if (ed->free)
+               if (ed->e->free)
                        continue;
                t = E_STRING(ed,f);
                if (!t)
@@ -1153,7 +1172,7 @@ void PF_FindFloat (void)
        {
                pr_xfunction->builtinsprofile++;
                ed = EDICT_NUM(e);
-               if (ed->free)
+               if (ed->e->free)
                        continue;
                if (E_FLOAT(ed,f) == s)
                {
@@ -1188,7 +1207,7 @@ void PF_findchain (void)
        for (i = 1;i < sv.num_edicts;i++, ent = NEXT_EDICT(ent))
        {
                pr_xfunction->builtinsprofile++;
-               if (ent->free)
+               if (ent->e->free)
                        continue;
                t = E_STRING(ent,f);
                if (!t)
@@ -1221,7 +1240,7 @@ void PF_findchainfloat (void)
        for (i = 1;i < sv.num_edicts;i++, ent = NEXT_EDICT(ent))
        {
                pr_xfunction->builtinsprofile++;
-               if (ent->free)
+               if (ent->e->free)
                        continue;
                if (E_FLOAT(ent,f) != s)
                        continue;
@@ -1278,7 +1297,7 @@ void PF_precache_model (void)
                Host_Error ("PF_Precache_*: Precache can only be done in spawn functions");
 
        s = G_STRING(OFS_PARM0);
-       if (sv.worldmodel->ishlbsp && ((!s) || (!s[0])))
+       if (sv.worldmodel->brush.ishlbsp && ((!s) || (!s[0])))
                return;
        G_INT(OFS_RETURN) = G_INT(OFS_PARM0);
        PR_CheckEmptyString (s);
@@ -1391,7 +1410,7 @@ void PF_droptofloor (void)
                ent->v->groundentity = EDICT_TO_PROG(trace.ent);
                G_FLOAT(OFS_RETURN) = 1;
                // if support is destroyed, keep suspended (gross hack for floating items in various maps)
-               ent->suspendedinairflag = true;
+               ent->e->suspendedinairflag = true;
        }
 }
 
@@ -1419,13 +1438,15 @@ void PF_lightstyle (void)
        if (sv.state != ss_active)
                return;
 
-       for (j=0, client = svs.clients ; j<svs.maxclients ; j++, client++)
-               if (client->active || client->spawned)
+       for (j = 0;j < MAX_SCOREBOARD;j++)
+       {
+               if ((client = svs.connectedclients[j]))
                {
                        MSG_WriteChar (&client->message, svc_lightstyle);
                        MSG_WriteChar (&client->message,style);
                        MSG_WriteString (&client->message, val);
                }
+       }
 }
 
 void PF_rint (void)
@@ -1464,7 +1485,7 @@ PF_pointcontents
 */
 void PF_pointcontents (void)
 {
-       G_FLOAT(OFS_RETURN) = Mod_PointContents(G_VECTOR(OFS_PARM0), sv.worldmodel);
+       G_FLOAT(OFS_RETURN) = SV_PointContents(G_VECTOR(OFS_PARM0));
 }
 
 /*
@@ -1490,7 +1511,7 @@ void PF_nextent (void)
                        return;
                }
                ent = EDICT_NUM(i);
-               if (!ent->free)
+               if (!ent->e->free)
                {
                        RETURN_EDICT(ent);
                        return;
@@ -1706,9 +1727,9 @@ sizebuf_t *WriteDest (void)
        case MSG_ONE:
                ent = PROG_TO_EDICT(pr_global_struct->msg_entity);
                entnum = NUM_FOR_EDICT(ent);
-               if (entnum < 1 || entnum > svs.maxclients)
-                       Host_Error ("WriteDest: not a client");
-               return &svs.clients[entnum-1].message;
+               if (entnum < 1 || entnum > MAX_SCOREBOARD || svs.connectedclients[entnum-1] == NULL)
+                       Host_Error("WriteDest: not a client");
+               return &svs.connectedclients[entnum-1]->message;
 
        case MSG_ALL:
                return &sv.reliable_datagram;
@@ -1818,12 +1839,11 @@ void PF_setspawnparms (void)
 
        ent = G_EDICT(OFS_PARM0);
        i = NUM_FOR_EDICT(ent);
-       if (i < 1 || i > svs.maxclients)
+       if (i < 1 || i > MAX_SCOREBOARD || !svs.connectedclients[i-1])
                Host_Error ("Entity is not a client");
 
        // copy spawn parms out of the client_t
-       client = svs.clients + (i-1);
-
+       client = svs.connectedclients[i-1];
        for (i=0 ; i< NUM_SPAWN_PARMS ; i++)
                (&pr_global_struct->parm1)[i] = client->spawn_parms[i];
 }
@@ -1883,7 +1903,6 @@ void PF_randomvec (void)
        VectorCopy (temp, G_VECTOR(OFS_RETURN));
 }
 
-void SV_LightPoint (vec3_t color, vec3_t p);
 /*
 =================
 PF_GetLight
@@ -1898,11 +1917,15 @@ getlight(vector)
 */
 void PF_GetLight (void)
 {
-       vec3_t          color;
-       vec_t*          p;
+       vec3_t ambientcolor, diffusecolor, diffusenormal;
+       vec_t *p;
        p = G_VECTOR(OFS_PARM0);
-       SV_LightPoint (color, p);
-       VectorCopy (color, G_VECTOR(OFS_RETURN));
+       VectorClear(ambientcolor);
+       VectorClear(diffusecolor);
+       VectorClear(diffusenormal);
+       if (sv.worldmodel && sv.worldmodel->brush.LightPoint)
+               sv.worldmodel->brush.LightPoint(sv.worldmodel, p, ambientcolor, diffusecolor, diffusenormal);
+       VectorMA(ambientcolor, 0.5, diffusecolor, G_VECTOR(OFS_RETURN));
 }
 
 #define MAX_QC_CVARS 128
@@ -2043,29 +2066,32 @@ void PF_copyentity (void)
 
 /*
 =================
-PF_setcolors
+PF_setcolor
 
 sets the color of a client and broadcasts the update to all connected clients
 
-setcolors(clientent, value)
+setcolor(clientent, value)
 =================
 */
-void PF_setcolors (void)
+void PF_setcolor (void)
 {
-       client_t        *client;
-       int                     entnum, i;
+       client_t *client;
+       int entnum, i;
+       eval_t *val;
 
        entnum = G_EDICTNUM(OFS_PARM0);
        i = G_FLOAT(OFS_PARM1);
 
-       if (entnum < 1 || entnum > svs.maxclients)
+       if (entnum < 1 || entnum > MAX_SCOREBOARD || !(client = svs.connectedclients[entnum-1]))
        {
                Con_Printf ("tried to setcolor a non-client\n");
                return;
        }
 
-       client = &svs.clients[entnum-1];
+       if ((val = GETEDICTFIELDVALUE(client->edict, eval_clientcolors)))
+               val->_float = i;
        client->colors = i;
+       client->old_colors = i;
        client->edict->v->team = (i & 15) + 1;
 
        MSG_WriteByte (&sv.reliable_datagram, svc_updatecolors);
@@ -2510,7 +2536,7 @@ static msurface_t *getsurface(edict_t *ed, int surfnum)
 {
        int modelindex;
        model_t *model;
-       if (!ed || ed->free)
+       if (!ed || ed->e->free)
                return NULL;
        modelindex = ed->v->modelindex;
        if (modelindex < 1 || modelindex >= MAX_MODELS)
@@ -2518,9 +2544,9 @@ static msurface_t *getsurface(edict_t *ed, int surfnum)
        model = sv.models[modelindex];
        if (model->type != mod_brush)
                return NULL;
-       if (surfnum < 0 || surfnum >= model->nummodelsurfaces)
+       if (surfnum < 0 || surfnum >= model->brushq1.nummodelsurfaces)
                return NULL;
-       return model->surfaces + surfnum + model->firstmodelsurface;
+       return model->brushq1.surfaces + surfnum + model->brushq1.firstmodelsurface;
 }
 
 
@@ -2545,7 +2571,7 @@ void PF_getsurfacepoint(void)
        int pointnum;
        VectorClear(G_VECTOR(OFS_RETURN));
        ed = G_EDICT(OFS_PARM0);
-       if (!ed || ed->free)
+       if (!ed || ed->e->free)
                return;
        if (!(surf = getsurface(ed, G_FLOAT(OFS_PARM1))))
                return;
@@ -2591,7 +2617,7 @@ void PF_getsurfacenearpoint(void)
        ed = G_EDICT(OFS_PARM0);
        point = G_VECTOR(OFS_PARM1);
 
-       if (!ed || ed->free)
+       if (!ed || ed->e->free)
                return;
        modelindex = ed->v->modelindex;
        if (modelindex < 1 || modelindex >= MAX_MODELS)
@@ -2604,9 +2630,9 @@ void PF_getsurfacenearpoint(void)
        VectorSubtract(point, ed->v->origin, p);
        best = -1;
        bestdist = 1000000000;
-       for (surfnum = 0;surfnum < model->nummodelsurfaces;surfnum++)
+       for (surfnum = 0;surfnum < model->brushq1.nummodelsurfaces;surfnum++)
        {
-               surf = model->surfaces + surfnum + model->firstmodelsurface;
+               surf = model->brushq1.surfaces + surfnum + model->brushq1.firstmodelsurface;
                dist = PlaneDiff(p, surf->plane);
                dist = dist * dist;
                if (dist < bestdist)
@@ -2631,7 +2657,7 @@ void PF_getsurfaceclippedpoint(void)
        vec3_t p, out;
        VectorClear(G_VECTOR(OFS_RETURN));
        ed = G_EDICT(OFS_PARM0);
-       if (!ed || ed->free)
+       if (!ed || ed->e->free)
                return;
        if (!(surf = getsurface(ed, G_FLOAT(OFS_PARM1))))
                return;
@@ -2642,172 +2668,510 @@ void PF_getsurfaceclippedpoint(void)
        VectorAdd(out, ed->v->origin, G_VECTOR(OFS_RETURN));
 }
 
-void PF_Fixme (void)
+#define MAX_PRFILES 256
+
+qfile_t *pr_files[MAX_PRFILES];
+
+void PR_Files_Init(void)
+{
+       memset(pr_files, 0, sizeof(pr_files));
+}
+
+void PR_Files_CloseAll(void)
+{
+       int i;
+       for (i = 0;i < MAX_PRFILES;i++)
+       {
+               if (pr_files[i])
+                       FS_Close(pr_files[i]);
+               pr_files[i] = NULL;
+       }
+}
+
+//float(string s) stof = #81; // get numerical value from a string
+void PF_stof(void)
+{
+       char *s = PF_VarString(0);
+       G_FLOAT(OFS_RETURN) = atof(s);
+}
+
+//float(string filename, float mode) fopen = #110; // opens a file inside quake/gamedir/data/ (mode is FILE_READ, FILE_APPEND, or FILE_WRITE), returns fhandle >= 0 if successful, or fhandle < 0 if unable to open file for any reason
+void PF_fopen(void)
+{
+       int filenum, mode;
+       char *modestring, *filename;
+       for (filenum = 0;filenum < MAX_PRFILES;filenum++)
+               if (pr_files[filenum] == NULL)
+                       break;
+       if (filenum >= MAX_PRFILES)
+       {
+               Con_Printf("PF_fopen: ran out of file handles (%i)\n", MAX_PRFILES);
+               G_FLOAT(OFS_RETURN) = -2;
+               return;
+       }
+       mode = G_FLOAT(OFS_PARM1);
+       switch(mode)
+       {
+       case 0: // FILE_READ
+               modestring = "rb";
+               break;
+       case 1: // FILE_APPEND
+               modestring = "ab";
+               break;
+       case 2: // FILE_WRITE
+               modestring = "wb";
+               break;
+       default:
+               Con_Printf("PF_fopen: no such mode %i (valid: 0 = read, 1 = append, 2 = write)\n", mode);
+               G_FLOAT(OFS_RETURN) = -3;
+               return;
+       }
+       filename = G_STRING(OFS_PARM0);
+       // .. is parent directory on many platforms
+       // / is parent directory on Amiga
+       // : is root of drive on Amiga (also used as a directory separator on Mac, but / works there too, so that's a bad idea)
+       // \ is a windows-ism (so it's naughty to use it, / works on all platforms)
+       if ((filename[0] == '.' && filename[1] == '.') || filename[0] == '/' || strrchr(filename, ':') || strrchr(filename, '\\'))
+       {
+               Con_Printf("PF_fopen: dangerous or non-portable filename \"%s\" not allowed. (contains : or \\ or begins with .. or /)\n", filename);
+               G_FLOAT(OFS_RETURN) = -4;
+               return;
+       }
+       pr_files[filenum] = FS_Open(va("data/%s", filename), modestring, false);
+       if (pr_files[filenum] == NULL)
+               G_FLOAT(OFS_RETURN) = -1;
+       else
+               G_FLOAT(OFS_RETURN) = filenum;
+}
+
+//void(float fhandle) fclose = #111; // closes a file
+void PF_fclose(void)
+{
+       int filenum = G_FLOAT(OFS_PARM0);
+       if (filenum < 0 || filenum >= MAX_PRFILES)
+       {
+               Con_Printf("PF_fclose: invalid file handle %i\n", filenum);
+               return;
+       }
+       if (pr_files[filenum] == NULL)
+       {
+               Con_Printf("PF_fclose: no such file handle %i (or file has been closed)\n", filenum);
+               return;
+       }
+       FS_Close(pr_files[filenum]);
+       pr_files[filenum] = NULL;
+}
+
+//string(float fhandle) fgets = #112; // reads a line of text from the file and returns as a tempstring
+void PF_fgets(void)
+{
+       int c, end;
+       static char string[MAX_VARSTRING];
+       int filenum = G_FLOAT(OFS_PARM0);
+       if (filenum < 0 || filenum >= MAX_PRFILES)
+       {
+               Con_Printf("PF_fgets: invalid file handle %i\n", filenum);
+               return;
+       }
+       if (pr_files[filenum] == NULL)
+       {
+               Con_Printf("PF_fgets: no such file handle %i (or file has been closed)\n", filenum);
+               return;
+       }
+       end = 0;
+       for (;;)
+       {
+               c = FS_Getc(pr_files[filenum]);
+               if (c == '\r' || c == '\n' || c < 0)
+                       break;
+               if (end < MAX_VARSTRING - 1)
+                       string[end++] = c;
+       }
+       string[end] = 0;
+       // remove \n following \r
+       if (c == '\r')
+               c = FS_Getc(pr_files[filenum]);
+       if (developer.integer)
+               Con_Printf("fgets: %s\n", string);
+       if (c >= 0)
+               G_INT(OFS_RETURN) = PR_SetString(string);
+       else
+               G_INT(OFS_RETURN) = 0;
+}
+
+//void(float fhandle, string s) fputs = #113; // writes a line of text to the end of the file
+void PF_fputs(void)
+{
+       int stringlength;
+       char *s = PF_VarString(1);
+       int filenum = G_FLOAT(OFS_PARM0);
+       if (filenum < 0 || filenum >= MAX_PRFILES)
+       {
+               Con_Printf("PF_fputs: invalid file handle %i\n", filenum);
+               return;
+       }
+       if (pr_files[filenum] == NULL)
+       {
+               Con_Printf("PF_fputs: no such file handle %i (or file has been closed)\n", filenum);
+               return;
+       }
+       if ((stringlength = strlen(s)))
+               FS_Write(pr_files[filenum], s, stringlength);
+       if (developer.integer)
+               Con_Printf("fputs: %s\n", s);
+}
+
+//float(string s) strlen = #114; // returns how many characters are in a string
+void PF_strlen(void)
+{
+       char *s;
+       s = G_STRING(OFS_PARM0);
+       if (s)
+               G_FLOAT(OFS_RETURN) = strlen(s);
+       else
+               G_FLOAT(OFS_RETURN) = 0;
+}
+
+//string(string s1, string s2) strcat = #115; // concatenates two strings (for example "abc", "def" would return "abcdef") and returns as a tempstring
+void PF_strcat(void)
+{
+       char *s = PF_VarString(0);
+       G_INT(OFS_RETURN) = PR_SetString(s);
+}
+
+//string(string s, float start, float length) substring = #116; // returns a section of a string as a tempstring
+void PF_substring(void)
+{
+       int i, start, length;
+       char *s, *string = PR_GetTempString();
+       s = G_STRING(OFS_PARM0);
+       start = G_FLOAT(OFS_PARM1);
+       length = G_FLOAT(OFS_PARM2);
+       if (!s)
+               s = "";
+       for (i = 0;i < start && *s;i++, s++);
+       for (i = 0;i < STRINGTEMP_LENGTH - 1 && *s && i < length;i++, s++)
+               string[i] = *s;
+       string[i] = 0;
+       G_INT(OFS_RETURN) = PR_SetString(string);
+}
+
+//vector(string s) stov = #117; // returns vector value from a string
+void PF_stov(void)
+{
+       Math_atov(PF_VarString(0), G_VECTOR(OFS_RETURN));
+}
+
+//string(string s) strzone = #118; // makes a copy of a string into the string zone and returns it, this is often used to keep around a tempstring for longer periods of time (tempstrings are replaced often)
+void PF_strzone(void)
+{
+       char *in, *out;
+       in = G_STRING(OFS_PARM0);
+       out = Mem_Alloc(pr_strings_mempool, strlen(in) + 1);
+       strcpy(out, in);
+       G_INT(OFS_RETURN) = PR_SetString(out);
+}
+
+//void(string s) strunzone = #119; // removes a copy of a string from the string zone (you can not use that string again or it may crash!!!)
+void PF_strunzone(void)
 {
-       Host_Error ("unimplemented QC builtin"); // LordHavoc: was misspelled (bulitin)
+       Mem_Free(G_STRING(OFS_PARM0));
 }
 
+//void(entity e, string s) clientcommand = #440; // executes a command string as if it came from the specified client
+//this function originally written by KrimZon, made shorter by LordHavoc
+void PF_clientcommand (void)
+{
+       client_t *temp_client;
+       int i;
+
+       //find client for this entity
+       i = (NUM_FOR_EDICT(G_EDICT(OFS_PARM0)) - 1);
+       if (i < 0 || i >= MAX_SCOREBOARD || !svs.connectedclients[i])
+               Host_Error("PF_clientcommand: entity is not a client");
+
+       temp_client = host_client;
+       host_client = svs.connectedclients[i];
+       Cmd_ExecuteString (G_STRING(OFS_PARM1), src_client);
+       host_client = temp_client;
+}
+
+//float(string s) tokenize = #441; // takes apart a string into individal words (access them with argv), returns how many
+//this function originally written by KrimZon, made shorter by LordHavoc
+char **tokens = NULL;
+int    max_tokens, num_tokens = 0;
+void PF_tokenize (void)
+{
+       const char *p;
+       char *str;
+       str = G_STRING(OFS_PARM0);
+
+       if (tokens != NULL)
+       {
+               int i;
+               for (i=0;i<num_tokens;i++)
+                       Z_Free(tokens[i]);
+               Z_Free(tokens);
+               num_tokens = 0;
+       }
+
+       tokens = Z_Malloc(strlen(str) * sizeof(char *));
+       max_tokens = strlen(str);
+
+       for (p = str;COM_ParseToken(&p, false) && num_tokens < max_tokens;num_tokens++)
+       {
+               tokens[num_tokens] = Z_Malloc(strlen(com_token) + 1);
+               strcpy(tokens[num_tokens], com_token);
+       }
+
+       G_FLOAT(OFS_RETURN) = num_tokens;
+}
+
+//string(float n) argv = #442; // returns a word from the tokenized string (returns nothing for an invalid index)
+//this function originally written by KrimZon, made shorter by LordHavoc
+void PF_argv (void)
+{
+       int token_num = G_FLOAT(OFS_PARM0);
+       if (token_num >= 0 && token_num < num_tokens)
+               G_INT(OFS_RETURN) = PR_SetString(tokens[token_num]);
+       else
+               G_INT(OFS_RETURN) = PR_SetString("");
+}
+
+//void(entity e, entity tagentity, string tagname) setattachment = #443; // attachs e to a tag on tagentity (note: use "" to attach to entity origin/angles instead of a tag)
+void PF_setattachment (void)
+{
+       edict_t *e = G_EDICT(OFS_PARM0);
+       edict_t *tagentity = G_EDICT(OFS_PARM1);
+       char *tagname = G_STRING(OFS_PARM2);
+       eval_t *v;
+       int i, modelindex;
+       model_t *model;
+
+       if (tagentity == NULL)
+               tagentity = sv.edicts;
+
+       v = GETEDICTFIELDVALUE(e, eval_tag_entity);
+       if (v)
+               v->edict = EDICT_TO_PROG(tagentity);
+
+       v = GETEDICTFIELDVALUE(e, eval_tag_index);
+       if (v)
+               v->_float = 0;
+       if (tagentity != NULL && tagentity != sv.edicts && tagname && tagname[0])
+       {
+               modelindex = (int)tagentity->v->modelindex;
+               if (modelindex >= 0 && modelindex < MAX_MODELS)
+               {
+                       model = sv.models[modelindex];
+                       if (model->data_overridetagnamesforskin && (unsigned int)tagentity->v->skin < (unsigned int)model->numskins && model->data_overridetagnamesforskin[(unsigned int)tagentity->v->skin].num_overridetagnames)
+                               for (i = 0;i < model->data_overridetagnamesforskin[(unsigned int)tagentity->v->skin].num_overridetagnames;i++)
+                                       if (!strcmp(tagname, model->data_overridetagnamesforskin[(unsigned int)tagentity->v->skin].data_overridetagnames[i].name))
+                                               v->_float = i + 1;
+                       if (v->_float == 0 && model->alias.aliasnum_tags)
+                               for (i = 0;i < model->alias.aliasnum_tags;i++)
+                                       if (!strcmp(tagname, model->alias.aliasdata_tags[i].name))
+                                               v->_float = i + 1;
+                       if (v->_float == 0)
+                               Con_DPrintf("setattachment(edict %i, edict %i, string \"%s\"): tried to find tag named \"%s\" on entity %i (model \"%s\") but could not find it\n", NUM_FOR_EDICT(e), NUM_FOR_EDICT(tagentity), tagname, tagname, NUM_FOR_EDICT(tagentity), model->name);
+               }
+               else
+                       Con_DPrintf("setattachment(edict %i, edict %i, string \"%s\"): tried to find tag named \"%s\" on entity %i but it has no model\n", NUM_FOR_EDICT(e), NUM_FOR_EDICT(tagentity), tagname, tagname, NUM_FOR_EDICT(tagentity));
+       }
+}
 
 
 builtin_t pr_builtin[] =
 {
-PF_Fixme,
-PF_makevectors,        // void(entity e)       makevectors             = #1;
-PF_setorigin,  // void(entity e, vector o) setorigin   = #2;
-PF_setmodel,   // void(entity e, string m) setmodel    = #3;
-PF_setsize,    // void(entity e, vector min, vector max) setsize = #4;
-PF_Fixme,      // void(entity e, vector min, vector max) setabssize = #5;
-PF_break,      // void() break                                         = #6;
-PF_random,     // float() random                                               = #7;
-PF_sound,      // void(entity e, float chan, string samp) sound = #8;
-PF_normalize,  // vector(vector v) normalize                   = #9;
-PF_error,      // void(string e) error                         = #10;
-PF_objerror,   // void(string e) objerror                              = #11;
-PF_vlen,       // float(vector v) vlen                         = #12;
-PF_vectoyaw,   // float(vector v) vectoyaw             = #13;
-PF_Spawn,      // entity() spawn                                               = #14;
-PF_Remove,     // void(entity e) remove                                = #15;
-PF_traceline,  // float(vector v1, vector v2, float tryents) traceline = #16;
-PF_checkclient,        // entity() clientlist                                  = #17;
-PF_Find,       // entity(entity start, .string fld, string match) find = #18;
-PF_precache_sound,     // void(string s) precache_sound                = #19;
-PF_precache_model,     // void(string s) precache_model                = #20;
-PF_stuffcmd,   // void(entity client, string s)stuffcmd = #21;
-PF_findradius, // entity(vector org, float rad) findradius = #22;
-PF_bprint,     // void(string s) bprint                                = #23;
-PF_sprint,     // void(entity client, string s) sprint = #24;
-PF_dprint,     // void(string s) dprint                                = #25;
-PF_ftos,       // void(string s) ftos                          = #26;
-PF_vtos,       // void(string s) vtos                          = #27;
-PF_coredump,
-PF_traceon,
-PF_traceoff,
-PF_eprint,     // void(entity e) debug print an entire entity
-PF_walkmove, // float(float yaw, float dist) walkmove
-PF_Fixme, // float(float yaw, float dist) walkmove
-PF_droptofloor,
-PF_lightstyle,
-PF_rint,
-PF_floor,
-PF_ceil,
-PF_Fixme,
-PF_checkbottom,
-PF_pointcontents,
-PF_Fixme,
-PF_fabs,
-PF_aim,
-PF_cvar,
-PF_localcmd,
-PF_nextent,
-PF_particle,
-PF_changeyaw,
-PF_Fixme,
-PF_vectoangles,
-
-PF_WriteByte,
-PF_WriteChar,
-PF_WriteShort,
-PF_WriteLong,
-PF_WriteCoord,
-PF_WriteAngle,
-PF_WriteString,
-PF_WriteEntity,
-
-PF_sin,
-PF_cos,
-PF_sqrt,
-PF_changepitch,
-PF_TraceToss,
-PF_etos,
-PF_Fixme,
-
-SV_MoveToGoal,
-PF_precache_file,
-PF_makestatic,
-
-PF_changelevel,
-PF_Fixme,
-
-PF_cvar_set,
-PF_centerprint,
-
-PF_ambientsound,
-
-PF_precache_model,
-PF_precache_sound,             // precache_sound2 is different only for qcc
-PF_precache_file,
-
-PF_setspawnparms,
-
-PF_Fixme,                              // #79 LordHavoc: dunno who owns 79-89, so these are just padding
-PF_Fixme,                              // #80
-PF_Fixme,                              // #81
-PF_Fixme,                              // #82
-PF_Fixme,                              // #83
-PF_Fixme,                              // #84
-PF_Fixme,                              // #85
-PF_Fixme,                              // #86
-PF_Fixme,                              // #87
-PF_Fixme,                              // #88
-PF_Fixme,                              // #89
-
-PF_tracebox,                   // #90 LordHavoc builtin range (9x)
-PF_randomvec,                  // #91
-PF_GetLight,                   // #92
-PF_registercvar,               // #93
-PF_min,                                        // #94
-PF_max,                                        // #95
-PF_bound,                              // #96
-PF_pow,                                        // #97
-PF_FindFloat,                  // #98
-PF_checkextension,             // #99
-#define a PF_Fixme, PF_Fixme, PF_Fixme, PF_Fixme, PF_Fixme, PF_Fixme, PF_Fixme, PF_Fixme, PF_Fixme, PF_Fixme,
-#define aa a a a a a a a a a a
-aa // #200
-aa // #300
-aa // #400
-PF_copyentity,                 // #400 LordHavoc: builtin range (4xx)
-PF_setcolors,                  // #401
-PF_findchain,                  // #402
-PF_findchainfloat,             // #403
-PF_effect,                             // #404
-PF_te_blood,                   // #405
-PF_te_bloodshower,             // #406
-PF_te_explosionrgb,            // #407
-PF_te_particlecube,            // #408
-PF_te_particlerain,            // #409
-PF_te_particlesnow,            // #410
-PF_te_spark,                   // #411
-PF_te_gunshotquad,             // #412
-PF_te_spikequad,               // #413
-PF_te_superspikequad,  // #414
-PF_te_explosionquad,   // #415
-PF_te_smallflash,              // #416
-PF_te_customflash,             // #417
-PF_te_gunshot,                 // #418
-PF_te_spike,                   // #419
-PF_te_superspike,              // #420
-PF_te_explosion,               // #421
-PF_te_tarexplosion,            // #422
-PF_te_wizspike,                        // #423
-PF_te_knightspike,             // #424
-PF_te_lavasplash,              // #425
-PF_te_teleport,                        // #426
-PF_te_explosion2,              // #427
-PF_te_lightning1,              // #428
-PF_te_lightning2,              // #429
-PF_te_lightning3,              // #430
-PF_te_beam,                            // #431
-PF_vectorvectors,              // #432
-PF_te_plasmaburn,              // #433
-PF_getsurfacenumpoints, // #434 float(entity e, float s) getsurfacenumpoints = #434;
-PF_getsurfacepoint,     // #435 vector(entity e, float s, float n) getsurfacepoint = #435;
-PF_getsurfacenormal,    // #436 vector(entity e, float s) getsurfacenormal = #436;
-PF_getsurfacetexture,   // #437 string(entity e, float s) getsurfacetexture = #437;
-PF_getsurfacenearpoint, // #438 float(entity e, vector p) getsurfacenearpoint = #438;
-PF_getsurfaceclippedpoint,// #439 vector(entity e, float s, vector p) getsurfaceclippedpoint = #439;
+NULL,                                          // #0
+PF_makevectors,                                // #1 void(entity e) makevectors
+PF_setorigin,                          // #2 void(entity e, vector o) setorigin
+PF_setmodel,                           // #3 void(entity e, string m) setmodel
+PF_setsize,                                    // #4 void(entity e, vector min, vector max) setsize
+NULL,                                          // #5 void(entity e, vector min, vector max) setabssize
+PF_break,                                      // #6 void() break
+PF_random,                                     // #7 float() random
+PF_sound,                                      // #8 void(entity e, float chan, string samp) sound
+PF_normalize,                          // #9 vector(vector v) normalize
+PF_error,                                      // #10 void(string e) error
+PF_objerror,                           // #11 void(string e) objerror
+PF_vlen,                                       // #12 float(vector v) vlen
+PF_vectoyaw,                           // #13 float(vector v) vectoyaw
+PF_Spawn,                                      // #14 entity() spawn
+PF_Remove,                                     // #15 void(entity e) remove
+PF_traceline,                          // #16 float(vector v1, vector v2, float tryents) traceline
+PF_checkclient,                                // #17 entity() clientlist
+PF_Find,                                       // #18 entity(entity start, .string fld, string match) find
+PF_precache_sound,                     // #19 void(string s) precache_sound
+PF_precache_model,                     // #20 void(string s) precache_model
+PF_stuffcmd,                           // #21 void(entity client, string s)stuffcmd
+PF_findradius,                         // #22 entity(vector org, float rad) findradius
+PF_bprint,                                     // #23 void(string s) bprint
+PF_sprint,                                     // #24 void(entity client, string s) sprint
+PF_dprint,                                     // #25 void(string s) dprint
+PF_ftos,                                       // #26 void(string s) ftos
+PF_vtos,                                       // #27 void(string s) vtos
+PF_coredump,                           // #28 void() coredump
+PF_traceon,                                    // #29 void() traceon
+PF_traceoff,                           // #30 void() traceoff
+PF_eprint,                                     // #31 void(entity e) eprint
+PF_walkmove,                           // #32 float(float yaw, float dist) walkmove
+NULL,                                          // #33
+PF_droptofloor,                                // #34 float() droptofloor
+PF_lightstyle,                         // #35 void(float style, string value) lightstyle
+PF_rint,                                       // #36 float(float v) rint
+PF_floor,                                      // #37 float(float v) floor
+PF_ceil,                                       // #38 float(float v) ceil
+NULL,                                          // #39
+PF_checkbottom,                                // #40 float(entity e) checkbottom
+PF_pointcontents               ,       // #41 float(vector v) pointcontents
+NULL,                                          // #42
+PF_fabs,                                       // #43 float(float f) fabs
+PF_aim,                                                // #44 vector(entity e, float speed) aim
+PF_cvar,                                       // #45 float(string s) cvar
+PF_localcmd,                           // #46 void(string s) localcmd
+PF_nextent,                                    // #47 entity(entity e) nextent
+PF_particle,                           // #48 void(vector o, vector d, float color, float count) particle
+PF_changeyaw,                          // #49 void() ChangeYaw
+NULL,                                          // #50
+PF_vectoangles,                                // #51 vector(vector v) vectoangles
+PF_WriteByte,                          // #52 void(float to, float f) WriteByte
+PF_WriteChar,                          // #53 void(float to, float f) WriteChar
+PF_WriteShort,                         // #54 void(float to, float f) WriteShort
+PF_WriteLong,                          // #55 void(float to, float f) WriteLong
+PF_WriteCoord,                         // #56 void(float to, float f) WriteCoord
+PF_WriteAngle,                         // #57 void(float to, float f) WriteAngle
+PF_WriteString,                                // #58 void(float to, string s) WriteString
+PF_WriteEntity,                                // #59 void(float to, entity e) WriteEntity
+PF_sin,                                                // #60 float(float f) sin (DP_QC_SINCOSSQRTPOW)
+PF_cos,                                                // #61 float(float f) cos (DP_QC_SINCOSSQRTPOW)
+PF_sqrt,                                       // #62 float(float f) sqrt (DP_QC_SINCOSSQRTPOW)
+PF_changepitch,                                // #63 void(entity ent) changepitch (DP_QC_CHANGEPITCH)
+PF_TraceToss,                          // #64 void(entity e, entity ignore) tracetoss (DP_QC_TRACETOSS)
+PF_etos,                                       // #65 string(entity ent) etos (DP_QC_ETOS)
+NULL,                                          // #66
+SV_MoveToGoal,                         // #67 void(float step) movetogoal
+PF_precache_file,                      // #68 string(string s) precache_file
+PF_makestatic,                         // #69 void(entity e) makestatic
+PF_changelevel,                                // #70 void(string s) changelevel
+NULL,                                          // #71
+PF_cvar_set,                           // #72 void(string var, string val) cvar_set
+PF_centerprint,                                // #73 void(entity client, strings) centerprint
+PF_ambientsound,                       // #74 void(vector pos, string samp, float vol, float atten) ambientsound
+PF_precache_model,                     // #75 string(string s) precache_model2
+PF_precache_sound,                     // #76 string(string s) precache_sound2
+PF_precache_file,                      // #77 string(string s) precache_file2
+PF_setspawnparms,                      // #78 void(entity e) setspawnparms
+NULL,                                          // #79
+NULL,                                          // #80
+PF_stof,                                       // #81 float(string s) stof (FRIK_FILE)
+NULL,                                          // #82
+NULL,                                          // #83
+NULL,                                          // #84
+NULL,                                          // #85
+NULL,                                          // #86
+NULL,                                          // #87
+NULL,                                          // #88
+NULL,                                          // #89
+PF_tracebox,                           // #90 void(vector v1, vector min, vector max, vector v2, float nomonsters, entity forent) tracebox (DP_QC_TRACEBOX)
+PF_randomvec,                          // #91 vector() randomvec (DP_QC_RANDOMVEC)
+PF_GetLight,                           // #92 vector(vector org) getlight (DP_QC_GETLIGHT)
+PF_registercvar,                       // #93 float(string name, string value) registercvar (DP_REGISTERCVAR)
+PF_min,                                                // #94 float(float a, floats) min (DP_QC_MINMAXBOUND)
+PF_max,                                                // #95 float(float a, floats) max (DP_QC_MINMAXBOUND)
+PF_bound,                                      // #96 float(float minimum, float val, float maximum) bound (DP_QC_MINMAXBOUND)
+PF_pow,                                                // #97 float(float f, float f) pow (DP_QC_SINCOSSQRTPOW)
+PF_FindFloat,                          // #98 entity(entity start, .float fld, float match) findfloat (DP_QC_FINDFLOAT)
+PF_checkextension,                     // #99 float(string s) checkextension (the basis of the extension system)
+NULL,                                          // #100
+NULL,                                          // #101
+NULL,                                          // #102
+NULL,                                          // #103
+NULL,                                          // #104
+NULL,                                          // #105
+NULL,                                          // #106
+NULL,                                          // #107
+NULL,                                          // #108
+NULL,                                          // #109
+PF_fopen,                                      // #110 float(string filename, float mode) fopen (FRIK_FILE)
+PF_fclose,                                     // #111 void(float fhandle) fclose (FRIK_FILE)
+PF_fgets,                                      // #112 string(float fhandle) fgets (FRIK_FILE)
+PF_fputs,                                      // #113 void(float fhandle, string s) fputs (FRIK_FILE)
+PF_strlen,                                     // #114 float(string s) strlen (FRIK_FILE)
+PF_strcat,                                     // #115 string(string s1, string s2) strcat (FRIK_FILE)
+PF_substring,                          // #116 string(string s, float start, float length) substring (FRIK_FILE)
+PF_stov,                                       // #117 vector(string) stov (FRIK_FILE)
+PF_strzone,                                    // #118 string(string s) strzone (FRIK_FILE)
+PF_strunzone,                          // #119 void(string s) strunzone (FRIK_FILE)
+#define a NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
+a a a a a a a a                                // #120-199
+a a a a a a a a a a                    // #200-299
+a a a a a a a a a a                    // #300-399
+PF_copyentity,                         // #400 void(entity from, entity to) copyentity (DP_QC_COPYENTITY)
+PF_setcolor,                           // #401 void(entity ent, float colors) setcolor (DP_QC_SETCOLOR)
+PF_findchain,                          // #402 entity(.string fld, string match) findchain (DP_QC_FINDCHAIN)
+PF_findchainfloat,                     // #403 entity(.float fld, float match) findchainfloat (DP_QC_FINDCHAINFLOAT)
+PF_effect,                                     // #404 void(vector org, string modelname, float startframe, float endframe, float framerate) effect (DP_SV_EFFECT)
+PF_te_blood,                           // #405 void(vector org, vector velocity, float howmany) te_blood (DP_TE_BLOOD)
+PF_te_bloodshower,                     // #406 void(vector mincorner, vector maxcorner, float explosionspeed, float howmany) te_bloodshower (DP_TE_BLOODSHOWER)
+PF_te_explosionrgb,                    // #407 void(vector org, vector color) te_explosionrgb (DP_TE_EXPLOSIONRGB)
+PF_te_particlecube,                    // #408 void(vector mincorner, vector maxcorner, vector vel, float howmany, float color, float gravityflag, float randomveljitter) te_particlecube (DP_TE_PARTICLECUBE)
+PF_te_particlerain,                    // #409 void(vector mincorner, vector maxcorner, vector vel, float howmany, float color) te_particlerain (DP_TE_PARTICLERAIN)
+PF_te_particlesnow,                    // #410 void(vector mincorner, vector maxcorner, vector vel, float howmany, float color) te_particlesnow (DP_TE_PARTICLESNOW)
+PF_te_spark,                           // #411 void(vector org, vector vel, float howmany) te_spark (DP_TE_SPARK)
+PF_te_gunshotquad,                     // #412 void(vector org) te_gunshotquad (DP_QUADEFFECTS1)
+PF_te_spikequad,                       // #413 void(vector org) te_spikequad (DP_QUADEFFECTS1)
+PF_te_superspikequad,          // #414 void(vector org) te_superspikequad (DP_QUADEFFECTS1)
+PF_te_explosionquad,           // #415 void(vector org) te_explosionquad (DP_QUADEFFECTS1)
+PF_te_smallflash,                      // #416 void(vector org) te_smallflash (DP_TE_SMALLFLASH)
+PF_te_customflash,                     // #417 void(vector org, float radius, float lifetime, vector color) te_customflash (DP_TE_CUSTOMFLASH)
+PF_te_gunshot,                         // #418 void(vector org) te_gunshot (DP_TE_STANDARDEFFECTBUILTINS)
+PF_te_spike,                           // #419 void(vector org) te_spike (DP_TE_STANDARDEFFECTBUILTINS)
+PF_te_superspike,                      // #420 void(vector org) te_superspike (DP_TE_STANDARDEFFECTBUILTINS)
+PF_te_explosion,                       // #421 void(vector org) te_explosion (DP_TE_STANDARDEFFECTBUILTINS)
+PF_te_tarexplosion,                    // #422 void(vector org) te_tarexplosion (DP_TE_STANDARDEFFECTBUILTINS)
+PF_te_wizspike,                                // #423 void(vector org) te_wizspike (DP_TE_STANDARDEFFECTBUILTINS)
+PF_te_knightspike,                     // #424 void(vector org) te_knightspike (DP_TE_STANDARDEFFECTBUILTINS)
+PF_te_lavasplash,                      // #425 void(vector org) te_lavasplash (DP_TE_STANDARDEFFECTBUILTINS)
+PF_te_teleport,                                // #426 void(vector org) te_teleport (DP_TE_STANDARDEFFECTBUILTINS)
+PF_te_explosion2,                      // #427 void(vector org, float color) te_explosion2 (DP_TE_STANDARDEFFECTBUILTINS)
+PF_te_lightning1,                      // #428 void(entity own, vector start, vector end) te_lightning1 (DP_TE_STANDARDEFFECTBUILTINS)
+PF_te_lightning2,                      // #429 void(entity own, vector start, vector end) te_lightning2 (DP_TE_STANDARDEFFECTBUILTINS)
+PF_te_lightning3,                      // #430 void(entity own, vector start, vector end) te_lightning3 (DP_TE_STANDARDEFFECTBUILTINS)
+PF_te_beam,                                    // #431 void(entity own, vector start, vector end) te_beam (DP_TE_STANDARDEFFECTBUILTINS)
+PF_vectorvectors,                      // #432 void(vector dir) vectorvectors (DP_QC_VECTORVECTORS)
+PF_te_plasmaburn,                      // #433 void(vector org) te_plasmaburn (DP_TE_PLASMABURN)
+PF_getsurfacenumpoints,                // #434 float(entity e, float s) getsurfacenumpoints (DP_QC_GETSURFACE)
+PF_getsurfacepoint,                    // #435 vector(entity e, float s, float n) getsurfacepoint (DP_QC_GETSURFACE)
+PF_getsurfacenormal,           // #436 vector(entity e, float s) getsurfacenormal (DP_QC_GETSURFACE)
+PF_getsurfacetexture,          // #437 string(entity e, float s) getsurfacetexture (DP_QC_GETSURFACE)
+PF_getsurfacenearpoint,                // #438 float(entity e, vector p) getsurfacenearpoint (DP_QC_GETSURFACE)
+PF_getsurfaceclippedpoint,     // #439 vector(entity e, float s, vector p) getsurfaceclippedpoint (DP_QC_GETSURFACE)
+PF_clientcommand,                      // #440 void(entity e, string s) clientcommand (KRIMZON_SV_PARSECLIENTCOMMAND)
+PF_tokenize,                           // #441 float(string s) tokenize (KRIMZON_SV_PARSECLIENTCOMMAND)
+PF_argv,                                       // #442 string(float n) argv (KRIMZON_SV_PARSECLIENTCOMMAND)
+PF_setattachment,                      // #443 void(entity e, entity tagentity, string tagname) setattachment (DP_GFX_QUAKE3MODELTAGS)
+NULL,                                          // #444
+NULL,                                          // #445
+NULL,                                          // #446
+NULL,                                          // #447
+NULL,                                          // #448
+NULL,                                          // #449
+a a a a a                                      // #450-499 (LordHavoc)
 };
 
 builtin_t *pr_builtins = pr_builtin;
 int pr_numbuiltins = sizeof(pr_builtin)/sizeof(pr_builtin[0]);
 
+void PR_Cmd_Init(void)
+{
+       pr_strings_mempool = Mem_AllocPool("pr_stringszone");
+       PR_Files_Init();
+}
+
+void PR_Cmd_Reset(void)
+{
+       Mem_EmptyPool(pr_strings_mempool);
+       PR_Files_CloseAll();
+}
+