1 files changed, 523 insertions, 0 deletions

diff --git a/apps/plugins/sdl/progs/quake/r_misc.c b/apps/plugins/sdl/progs/quake/r_misc.c
new file mode 100644
index 0000000000..c0aa7e991d
--- /dev/null
+++ b/apps/plugins/sdl/progs/quake/r_misc.c
@@ -0,0 +1,523 @@
+/*
+Copyright (C) 1996-1997 Id Software, Inc.
+
+This program is free software; you can redistribute it and/or
+modify it under the terms of the GNU General Public License
+as published by the Free Software Foundation; either version 2
+of the License, or (at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  
+
+See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Software
+Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
+
+*/
+// r_misc.c
+
+#include "quakedef.h"
+#include "r_local.h"
+
+
+/*
+===============
+R_CheckVariables
+===============
+*/
+void R_CheckVariables (void)
+{
+        static float    oldbright;
+
+        if (r_fullbright.value != oldbright)
+        {
+                oldbright = r_fullbright.value;
+                D_FlushCaches ();       // so all lighting changes
+        }
+}
+
+
+/*
+============
+Show
+
+Debugging use
+============
+*/
+void Show (void)
+{
+        vrect_t vr;
+
+        vr.x = vr.y = 0;
+        vr.width = vid.width;
+        vr.height = vid.height;
+        vr.pnext = NULL;
+        VID_Update (&vr);
+}
+
+
+/*
+====================
+R_TimeRefresh_f
+
+For program optimization
+====================
+*/
+void R_TimeRefresh_f (void)
+{
+        int                     i;
+        float           start, stop, time;
+        int                     startangle;
+        vrect_t         vr;
+
+        startangle = r_refdef.viewangles[1];
+        
+        start = Sys_FloatTime ();
+        for (i=0 ; i<128 ; i++)
+        {
+                r_refdef.viewangles[1] = i/128.0*360.0;
+
+                VID_LockBuffer ();
+
+                R_RenderView ();
+
+                VID_UnlockBuffer ();
+
+                vr.x = r_refdef.vrect.x;
+                vr.y = r_refdef.vrect.y;
+                vr.width = r_refdef.vrect.width;
+                vr.height = r_refdef.vrect.height;
+                vr.pnext = NULL;
+                VID_Update (&vr);
+        }
+        stop = Sys_FloatTime ();
+        time = stop-start;
+        Con_Printf ("%f seconds (%f fps)\n", time, 128/time);
+        
+        r_refdef.viewangles[1] = startangle;
+}
+
+
+/*
+================
+R_LineGraph
+
+Only called by R_DisplayTime
+================
+*/
+void R_LineGraph (int x, int y, int h)
+{
+        int             i;
+        byte    *dest;
+        int             s;
+
+// FIXME: should be disabled on no-buffer adapters, or should be in the driver
+        
+        x += r_refdef.vrect.x;
+        y += r_refdef.vrect.y;
+        
+        dest = vid.buffer + vid.rowbytes*y + x;
+        
+        s = r_graphheight.value;
+        
+        if (h>s)
+                h = s;
+                
+        for (i=0 ; i<h ; i++, dest -= vid.rowbytes*2)
+        {
+                dest[0] = 0xff;
+                *(dest-vid.rowbytes) = 0x30;
+        }
+        for ( ; i<s ; i++, dest -= vid.rowbytes*2)
+        {
+                dest[0] = 0x30;
+                *(dest-vid.rowbytes) = 0x30;
+        }
+}
+
+/*
+==============
+R_TimeGraph
+
+Performance monitoring tool
+==============
+*/
+#define MAX_TIMINGS             100
+extern float mouse_x, mouse_y;
+void R_TimeGraph (void)
+{
+        static  int             timex;
+        int             a;
+        float   r_time2;
+        static byte     r_timings[MAX_TIMINGS];
+        int             x;
+        
+        r_time2 = Sys_FloatTime ();
+
+        a = (r_time2-r_time1)/0.01;
+//a = fabs(mouse_y * 0.05);
+//a = (int)((r_refdef.vieworg[2] + 1024)/1)%(int)r_graphheight.value;
+//a = fabs(velocity[0])/20;
+//a = ((int)fabs(origin[0])/8)%20;
+//a = (cl.idealpitch + 30)/5;
+        r_timings[timex] = a;
+        a = timex;
+
+        if (r_refdef.vrect.width <= MAX_TIMINGS)
+                x = r_refdef.vrect.width-1;
+        else
+                x = r_refdef.vrect.width -
+                                (r_refdef.vrect.width - MAX_TIMINGS)/2;
+        do
+        {
+                R_LineGraph (x, r_refdef.vrect.height-2, r_timings[a]);
+                if (x==0)
+                        break;          // screen too small to hold entire thing
+                x--;
+                a--;
+                if (a == -1)
+                        a = MAX_TIMINGS-1;
+        } while (a != timex);
+
+        timex = (timex+1)%MAX_TIMINGS;
+}
+
+
+/*
+=============
+R_PrintTimes
+=============
+*/
+void R_PrintTimes (void)
+{
+        float   r_time2;
+        float           ms;
+
+        r_time2 = Sys_FloatTime ();
+
+        ms = 1000* (r_time2 - r_time1);
+        
+        Con_Printf ("%5.1f ms %3i/%3i/%3i poly %3i surf\n",
+                                ms, c_faceclip, r_polycount, r_drawnpolycount, c_surf);
+        c_surf = 0;
+}
+
+
+/*
+=============
+R_PrintDSpeeds
+=============
+*/
+void R_PrintDSpeeds (void)
+{
+        float   ms, dp_time, r_time2, rw_time, db_time, se_time, de_time, dv_time;
+
+        r_time2 = Sys_FloatTime ();
+
+        dp_time = (dp_time2 - dp_time1) * 1000;
+        rw_time = (rw_time2 - rw_time1) * 1000;
+        db_time = (db_time2 - db_time1) * 1000;
+        se_time = (se_time2 - se_time1) * 1000;
+        de_time = (de_time2 - de_time1) * 1000;
+        dv_time = (dv_time2 - dv_time1) * 1000;
+        ms = (r_time2 - r_time1) * 1000;
+
+        Con_Printf ("%3i %4.1fp %3iw %4.1fb %3is %4.1fe %4.1fv\n",
+                                (int)ms, dp_time, (int)rw_time, db_time, (int)se_time, de_time,
+                                dv_time);
+}
+
+
+/*
+=============
+R_PrintAliasStats
+=============
+*/
+void R_PrintAliasStats (void)
+{
+        Con_Printf ("%3i polygon model drawn\n", r_amodels_drawn);
+}
+
+
+void WarpPalette (void)
+{
+        int             i,j;
+        byte    newpalette[768];
+        int             basecolor[3];
+        
+        basecolor[0] = 130;
+        basecolor[1] = 80;
+        basecolor[2] = 50;
+
+// pull the colors halfway to bright brown
+        for (i=0 ; i<256 ; i++)
+        {
+                for (j=0 ; j<3 ; j++)
+                {
+                        newpalette[i*3+j] = (host_basepal[i*3+j] + basecolor[j])/2;
+                }
+        }
+        
+        VID_ShiftPalette (newpalette);
+}
+
+
+/*
+===================
+R_TransformFrustum
+===================
+*/
+void R_TransformFrustum (void)
+{
+        int             i;
+        vec3_t  v, v2;
+        
+        for (i=0 ; i<4 ; i++)
+        {
+                v[0] = screenedge[i].normal[2];
+                v[1] = -screenedge[i].normal[0];
+                v[2] = screenedge[i].normal[1];
+
+                v2[0] = v[1]*vright[0] + v[2]*vup[0] + v[0]*vpn[0];
+                v2[1] = v[1]*vright[1] + v[2]*vup[1] + v[0]*vpn[1];
+                v2[2] = v[1]*vright[2] + v[2]*vup[2] + v[0]*vpn[2];
+
+                VectorCopy (v2, view_clipplanes[i].normal);
+
+                view_clipplanes[i].dist = DotProduct (modelorg, v2);
+        }
+}
+
+
+#if     !id386
+
+/*
+================
+TransformVector
+================
+*/
+void TransformVector (vec3_t in, vec3_t out)
+{
+        out[0] = DotProduct(in,vright);
+        out[1] = DotProduct(in,vup);
+        out[2] = DotProduct(in,vpn);            
+}
+
+#endif
+
+
+/*
+================
+R_TransformPlane
+================
+*/
+void R_TransformPlane (mplane_t *p, float *normal, float *dist)
+{
+        float   d;
+        
+        d = DotProduct (r_origin, p->normal);
+        *dist = p->dist - d;
+// TODO: when we have rotating entities, this will need to use the view matrix
+        TransformVector (p->normal, normal);
+}
+
+
+/*
+===============
+R_SetUpFrustumIndexes
+===============
+*/
+void R_SetUpFrustumIndexes (void)
+{
+        int             i, j, *pindex;
+
+        pindex = r_frustum_indexes;
+
+        for (i=0 ; i<4 ; i++)
+        {
+                for (j=0 ; j<3 ; j++)
+                {
+                        if (view_clipplanes[i].normal[j] < 0)
+                        {
+                                pindex[j] = j;
+                                pindex[j+3] = j+3;
+                        }
+                        else
+                        {
+                                pindex[j] = j+3;
+                                pindex[j+3] = j;
+                        }
+                }
+
+        // FIXME: do just once at start
+                pfrustum_indexes[i] = pindex;
+                pindex += 6;
+        }
+}
+
+
+/*
+===============
+R_SetupFrame
+===============
+*/
+void R_SetupFrame (void)
+{
+        int                             edgecount;
+        vrect_t                 vrect;
+        float                   w, h;
+
+// don't allow cheats in multiplayer
+        if (cl.maxclients > 1)
+        {
+                Cvar_Set ("r_draworder", "0");
+                Cvar_Set ("r_fullbright", "0");
+                Cvar_Set ("r_ambient", "0");
+                Cvar_Set ("r_drawflat", "0");
+        }
+
+        if (r_numsurfs.value)
+        {
+                if ((surface_p - surfaces) > r_maxsurfsseen)
+                        r_maxsurfsseen = surface_p - surfaces;
+
+                Con_Printf ("Used %d of %d surfs; %d max\n", surface_p - surfaces,
+                                surf_max - surfaces, r_maxsurfsseen);
+        }
+
+        if (r_numedges.value)
+        {
+                edgecount = edge_p - r_edges;
+
+                if (edgecount > r_maxedgesseen)
+                        r_maxedgesseen = edgecount;
+
+                Con_Printf ("Used %d of %d edges; %d max\n", edgecount,
+                                r_numallocatededges, r_maxedgesseen);
+        }
+
+        r_refdef.ambientlight = r_ambient.value;
+
+        if (r_refdef.ambientlight < 0)
+                r_refdef.ambientlight = 0;
+
+        if (!sv.active)
+                r_draworder.value = 0;  // don't let cheaters look behind walls
+                
+        R_CheckVariables ();
+        
+        R_AnimateLight ();
+
+        r_framecount++;
+
+        numbtofpolys = 0;
+
+// debugging
+#if 0
+r_refdef.vieworg[0]=  80;
+r_refdef.vieworg[1]=      64;
+r_refdef.vieworg[2]=      40;
+r_refdef.viewangles[0]=    0;
+r_refdef.viewangles[1]=    46.763641357;
+r_refdef.viewangles[2]=    0;
+#endif
+
+// build the transformation matrix for the given view angles
+        VectorCopy (r_refdef.vieworg, modelorg);
+        VectorCopy (r_refdef.vieworg, r_origin);
+
+        AngleVectors (r_refdef.viewangles, vpn, vright, vup);
+
+// current viewleaf
+        r_oldviewleaf = r_viewleaf;
+        r_viewleaf = Mod_PointInLeaf (r_origin, cl.worldmodel);
+
+        r_dowarpold = r_dowarp;
+        r_dowarp = r_waterwarp.value && (r_viewleaf->contents <= CONTENTS_WATER);
+
+        if ((r_dowarp != r_dowarpold) || r_viewchanged || lcd_x.value)
+        {
+                if (r_dowarp)
+                {
+                        if ((vid.width <= vid.maxwarpwidth) &&
+                                (vid.height <= vid.maxwarpheight))
+                        {
+                                vrect.x = 0;
+                                vrect.y = 0;
+                                vrect.width = vid.width;
+                                vrect.height = vid.height;
+
+                                R_ViewChanged (&vrect, sb_lines, vid.aspect);
+                        }
+                        else
+                        {
+                                w = vid.width;
+                                h = vid.height;
+
+                                if (w > vid.maxwarpwidth)
+                                {
+                                        h *= (float)vid.maxwarpwidth / w;
+                                        w = vid.maxwarpwidth;
+                                }
+
+                                if (h > vid.maxwarpheight)
+                                {
+                                        h = vid.maxwarpheight;
+                                        w *= (float)vid.maxwarpheight / h;
+                                }
+
+                                vrect.x = 0;
+                                vrect.y = 0;
+                                vrect.width = (int)w;
+                                vrect.height = (int)h;
+
+                                R_ViewChanged (&vrect,
+                                                           (int)((float)sb_lines * (h/(float)vid.height)),
+                                                           vid.aspect * (h / w) *
+                                                                 ((float)vid.width / (float)vid.height));
+                        }
+                }
+                else
+                {
+                        vrect.x = 0;
+                        vrect.y = 0;
+                        vrect.width = vid.width;
+                        vrect.height = vid.height;
+
+                        R_ViewChanged (&vrect, sb_lines, vid.aspect);
+                }
+
+                r_viewchanged = false;
+        }
+
+// start off with just the four screen edge clip planes
+        R_TransformFrustum ();
+
+// save base values
+        VectorCopy (vpn, base_vpn);
+        VectorCopy (vright, base_vright);
+        VectorCopy (vup, base_vup);
+        VectorCopy (modelorg, base_modelorg);
+
+        R_SetSkyFrame ();
+
+        R_SetUpFrustumIndexes ();
+
+        r_cache_thrash = false;
+
+// clear frame counts
+        c_faceclip = 0;
+        d_spanpixcount = 0;
+        r_polycount = 0;
+        r_drawnpolycount = 0;
+        r_wholepolycount = 0;
+        r_amodels_drawn = 0;
+        r_outofsurfaces = 0;
+        r_outofedges = 0;
+
+        D_SetupFrame ();
+}
+