--- libgender/view.C	2004/10/23 02:27:52	1.64
+++ libgender/view.C	2004/11/09 22:24:14	1.77
@@ -4,9 +4,13 @@
 
 #include "view.h"
 #include "oct.h"
+#include "material.h"
 
 using namespace gl;
 
+pass_data pass_depth     (0, DEPTH);
+pass_data pass_postdepth (0, POSTDEPTH);
+
 vector<GLuint> occ_query_objects;
 
 static GLuint begin_occ_query ()
@@ -19,22 +23,22 @@
       occ_query_objects.pop_back ();
     }
   else
-    glGenQueriesARB (1, &id);
+    glGenQueries (1, &id);
 
-  glBeginQueryARB (GL_SAMPLES_PASSED, id);
+  glBeginQuery (GL_SAMPLES_PASSED, id);
   return id;
 }
 
 inline void end_occ_query ()
 {
-  glEndQueryARB (GL_SAMPLES_PASSED);
+  glEndQuery (GL_SAMPLES_PASSED);
 }
 
 static GLuint occ_query_result (GLuint id)
 {
   GLuint count;
 
-  glGetQueryObjectuivARB (id, GL_QUERY_RESULT, &count);
+  glGetQueryObjectuiv (id, GL_QUERY_RESULT, &count);
   occ_query_objects.push_back (id);
 
   return count;
@@ -59,6 +63,24 @@
   ::end_occ_query ();
 }
 
+struct occ_query_material : material
+{
+  void vsh (view &ctx);
+  void fsh (view &ctx);
+};
+
+static struct occ_query_material occ_query_material;
+
+void occ_query_material::vsh (view &ctx)
+{
+  std_vsh ();
+}
+
+void occ_query_material::fsh (view &ctx)
+{
+  // nop
+}
+
 bool view::may_draw (const entity *e)
 {
   if (drawn.find (e) != drawn.end ())
@@ -101,17 +123,33 @@
   glViewport (0, 0, w, h);
 
   glMatrixMode (GL_PROJECTION);
-  glLoadIdentity ();
 
   GLdouble aspect = (GLdouble)w/h;
-  GLdouble ftan = tan (fov * (.5 * M_PI / 180.));
-  GLdouble ymax = z_near * ftan;
+  GLdouble ftan = tanf (fov * GLfloat (.5 * M_PI / 180.));
+  GLdouble ymax = ftan;
   GLdouble xmax = ymax * aspect;
 
-  glFrustum (-xmax, xmax, -ymax, ymax, z_near, z_far);
+  matrix perspective;
+  {
+    matrix &m = perspective;
+
+    m(0,0) = 1.F / xmax; m(0,1) =          0; m(0,2) =               0; m(0,3) = 0;
+    m(1,0) =          0; m(1,1) = 1.F / ymax; m(1,2) =               0; m(1,3) = 0;
+    m(2,0) =          0; m(2,1) =          0; m(2,2) =  -1e10F / z_far; m(2,3) = 1;
+    m(3,0) =          0; m(3,1) =          0; m(3,2) =              -1; m(3,3) = 0;
+
+    glLoadMatrixf (perspective);
+  }
+  //glFrustum (-xmax, xmax, -ymax, ymax, z_near, z_far);
+
+  glGetFloatv (GL_PROJECTION_MATRIX, perspective);
 
   perspfact = z_near / ymax * 0.5F * h;
 
+  glMatrixMode (GL_MODELVIEW);
+  glLoadIdentity ();
+  matrix &m = projection;
+
   d = normalize (d);//D
   u = normalize (u);//D
 
@@ -119,7 +157,6 @@
   vec3 rx = cross (u, rz);
   vec3 ry = cross (rz, rx);
 
-  matrix &m = projection;
   m(0,0) = rx.x; m(0,1) = rx.y; m(0,2) = rx.z; m(0,3) = 0;
   m(1,0) = ry.x; m(1,1) = ry.y; m(1,2) = ry.z; m(1,3) = 0;
   m(2,0) = rz.x; m(2,1) = rz.y; m(2,2) = rz.z; m(2,3) = 0;
@@ -130,9 +167,12 @@
   diagfact = sqrtf (3.);//D WHY???
 
   glMultMatrixf (m);
-  glTranslatef (-p.x, -p.y, -p.z);
   
-  glGetFloatv (GL_PROJECTION_MATRIX, m);
+  glTranslatef (-p.x, -p.y, -p.z);
+
+  glGetFloatv (GL_MODELVIEW_MATRIX, m);
+
+  m = perspective * m;
 
   frustum.l = plane ( m(3,0) + m(0,0), m(3,1) + m(0,1), m(3,2) + m(0,2), m(3,3) + m(0,3) );
   frustum.r = plane ( m(3,0) - m(0,0), m(3,1) - m(0,1), m(3,2) - m(0,2), m(3,3) - m(0,3) );
@@ -141,6 +181,7 @@
   frustum.n = plane ( m(3,0) + m(2,0), m(3,1) + m(2,1), m(3,2) + m(2,2), m(3,3) + m(2,3) );
   frustum.f = plane ( m(3,0) - m(2,0), m(3,1) - m(2,1), m(3,2) - m(2,2), m(3,3) - m(2,3) );
 
+#if 0
   {
     GLdouble frustlen = z_far - z_near;
     GLdouble fheight  = frustlen * ftan;
@@ -150,15 +191,13 @@
     
     frustum.s = sphere (p + d * (.5 * frustlen), length (corner - half));
   }
+#endif
 
   {
     GLdouble depth = h / ftan;
 
     frustum.c = cone (p, d, atan (sqrt (GLdouble (w * w + h * h)) * ftan / h));
   }
-
-  glMatrixMode (GL_MODELVIEW);
-  glLoadIdentity ();
 }
 
 void view::begin ()
@@ -173,8 +212,10 @@
 
   reset_projection ();
 
-  nz_near = 1e37;
+  nz_near = 100.;
   nc_far = nz_far = 1.F;
+
+  first_lighted = false;
 }
 
 void view::end ()
@@ -184,17 +225,19 @@
 
 #define DEPTH_OFFSET (1. / (GLdouble)(1L << 16))
 
-void view::render (enum pass p)
+void view::render (pass_data &pass)
 {
-  pass = p;
+  this->pass = &pass;
 
-  switch (pass)
+  switch (pass.type)
     {
       case DEPTH:
         glColorMask (1, 1, 1, 1);
         glDepthMask (1);
+        glDisable (GL_BLEND);
 
-        glClear (GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT | GL_STENCIL_BUFFER_BIT);
+        //glClear (GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT | GL_STENCIL_BUFFER_BIT);
+        glClear (GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
 
         //glEnable (GL_STENCIL_TEST); // for depth-passes
         //glStencilOp (GL_KEEP, GL_KEEP, GL_REPLACE);
@@ -202,6 +245,7 @@
 
         //glEnable (GL_POLYGON_OFFSET_FILL);
         //glPolygonOffset (0, 5);
+        glEnable (GL_CULL_FACE);
         glDisable (GL_MINMAX);
         glDepthRange (DEPTH_OFFSET, 1.);
         glDepthFunc (GL_LESS);
@@ -211,6 +255,12 @@
 
         world.detect_visibility (*this);
 
+        for (vector<octant *>::iterator i = vislist.begin (); i != vislist.end (); ++i)
+          (*i)->draw_depth (*this);
+
+        if (pass.type == DEPTH)
+          printf ("fps %f NF %f:%f vis %d CAM (%d,%d,%d)\n", timer.fps, z_near, z_far, drawn.size (), orig.x, orig.y, orig.z);//D
+
         break;
 
       case POSTDEPTH:
@@ -220,7 +270,10 @@
         glDepthMask (0);
         glEnable (GL_DEPTH_CLAMP_NV);
         glDisable (GL_STENCIL_TEST);
+        glDisable (GL_CULL_FACE);
        
+        occ_query_material.enable (*this);
+
         // check occlusion queries
         for (vector<oq_data>::iterator i = occ_queries.begin (); i != occ_queries.end (); ++i)
           {
@@ -228,13 +281,29 @@
             i->recv->event (oq);
           }
 
+        occ_query_material.disable (*this);
+
         occ_queries.clear ();
 
+        for (vector<octant *>::iterator i = vislist.begin (); i != vislist.end (); ++i)
+          (*i)->draw_postdepth (*this);
+
+        first_lighted = true;
+
         break;
 
       case LIGHTED:
-        glClear (GL_STENCIL_BUFFER_BIT);
+        if (first_lighted)
+          glDisable (GL_BLEND);
+        else
+          {
+            glBlendFunc (GL_ONE, GL_ONE);
+            glEnable (GL_BLEND);
+          }
+
+        //glClear (GL_STENCIL_BUFFER_BIT);
         //glEnable (GL_STENCIL_TEST);
+        glEnable (GL_CULL_FACE);
         glEnable (GL_MINMAX);
         glDepthRange (0., 1. - DEPTH_OFFSET);
         glDepthFunc (GL_LESS);
@@ -242,34 +311,45 @@
         glDepthMask (0);
         glDisable (GL_DEPTH_CLAMP_NV);
 
+        for (vector<octant *>::iterator i = vislist.begin (); i != vislist.end (); ++i)
+          (*i)->draw_lighted (*this);
+
+        first_lighted = false;
+
         break;
     }
   
-  for (vector<octant *>::iterator i = vislist.begin (); i != vislist.end (); ++i)
-    (*i)->display (*this);
+  drawn.clear ();
+}
+
+void light::enable ()
+{
+  lightpos->set (p);
+}
 
-  if (pass == LIGHTED)
-    printf ("fps %f NF %f:%f vis %d CAM (%d,%d,%d)\n", timer.fps, z_near, z_far, drawn.size (), orig.x, orig.y, orig.z);//D
+void light::disable ()
+{
+}
 
-  drawn.clear ();
+static shader::varying_1f camdist;
+static shader::varying_3f lightvec;
 
-#if 0
-  if (pass == view::DEPTH)
-    {
-      glEnable (GL_DEPTH_CLAMP_NV);
-      glDepthMask (0);
-      glDepthFunc (GL_LESS);
+void linear_light::vsh ()
+{
+  using namespace shader::compile;
 
-      for (vector<octant *>::iterator i = farlist.begin (); i != farlist.end (); ++i)
-        {
-          begin_occ_query (**i);
-          (*i)->draw_bbox (*this);
-          end_occ_query ();
-       }
+  lightvec = xyz (lightpos - model_view_matrix * vin.vertex);
+  camdist = max (1 - length (lightvec) / radius, 0);
 
-      glDisable (GL_DEPTH_CLAMP_NV);
-    }
-#endif
+  fsh ();
+}
+
+void linear_light::fsh ()
+{
+  using namespace shader::compile;
+
+  sh_lightvec = lightvec;
+  sh_colour = float3 (c.r / 255.F, c.g / 255.F, c.b / 255.F) * (min (intensity * camdist * 100.F + 0.9F, 1.F));
 }