libgender/test.C

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <math.h>

#include "opengl.h"

#include "SDL.h"
#include "SDL_opengl.h"

static SDL_Surface *global_image = NULL;
static GLuint global_texture = 0;

#include "util.h"
#include "entity.h"
#include "txtprt_import.h"

bool doom3parse (const char *f);

#include "shader.h"

/**********************************************************************/

view camera;
vec3 camera_velocity;
float camera_angle, camera_angle2, camera_velocity_angle, camera_velocity_angle2;
float camera_velocity_factor = 80;

void
HotKey_ToggleFullScreen (void)
{
  SDL_Surface *screen;

  screen = SDL_GetVideoSurface ();

  if (SDL_WM_ToggleFullScreen (screen))
    printf ("Toggled fullscreen mode - now %s\n",
            (screen->flags & SDL_FULLSCREEN) ? "fullscreen" : "windowed");
  else
    printf ("Unable to toggle fullscreen mode\n");
}

void
HotKey_ToggleGrab (void)
{
  SDL_GrabMode mode;

  printf ("Ctrl-G: toggling input grab!\n");
  mode = SDL_WM_GrabInput (SDL_GRAB_QUERY);

  if (mode == SDL_GRAB_ON)
    printf ("Grab was on\n");
  else
    printf ("Grab was off\n");

  mode = SDL_WM_GrabInput (mode ? SDL_GRAB_OFF : SDL_GRAB_ON);

  if (mode == SDL_GRAB_ON)
    printf ("Grab is now on\n");
  else
    printf ("Grab is now off\n");
}

void
HotKey_Iconify (void)
{
  printf ("Ctrl-Z: iconifying window!\n");
  SDL_WM_IconifyWindow ();
}

int
HandleEvent (SDL_Event * event)
{
  int done;

  done = 0;

  switch (event->type)
    {
    case SDL_ACTIVEEVENT:
      /* See what happened */
      printf ("app %s ", event->active.gain ? "gained" : "lost");
      if (event->active.state & SDL_APPACTIVE)
        printf ("active ");
      else if (event->active.state & SDL_APPMOUSEFOCUS)
        printf ("mouse ");
      else if (event->active.state & SDL_APPINPUTFOCUS)
        printf ("input ");

      printf ("focus\n");
      break;

    case SDL_KEYDOWN:
      if (event->key.keysym.sym == SDLK_UP)       camera_velocity.z--;
      if (event->key.keysym.sym == SDLK_DOWN)     camera_velocity.z++;
      if (event->key.keysym.sym == SDLK_RIGHT)    camera_velocity_angle++;
      if (event->key.keysym.sym == SDLK_LEFT)     camera_velocity_angle--;
      if (event->key.keysym.sym == SDLK_PAGEUP)   camera_velocity_angle2++;
      if (event->key.keysym.sym == SDLK_PAGEDOWN) camera_velocity_angle2--;
      if (event->key.keysym.sym == SDLK_e)        camera_velocity.y--;
      if (event->key.keysym.sym == SDLK_q)        camera_velocity.y++;
      if (event->key.keysym.sym == SDLK_v)        camera_velocity_factor *= 1.5;
      if (event->key.keysym.sym == SDLK_b)        camera_velocity_factor /= 1.5;

      if (event->key.keysym.sym == SDLK_ESCAPE)
        done = 1;

      if ((event->key.keysym.sym == SDLK_g) &&
          (event->key.keysym.mod & KMOD_CTRL))
        HotKey_ToggleGrab ();

      if ((event->key.keysym.sym == SDLK_z) &&
          (event->key.keysym.mod & KMOD_CTRL))
        HotKey_Iconify ();

      if ((event->key.keysym.sym == SDLK_RETURN) &&
          (event->key.keysym.mod & KMOD_ALT))
        HotKey_ToggleFullScreen ();

      break;

    case SDL_KEYUP:
      if (event->key.keysym.sym == SDLK_UP)    camera_velocity.z++;
      if (event->key.keysym.sym == SDLK_DOWN)  camera_velocity.z--;
      if (event->key.keysym.sym == SDLK_LEFT)  camera_velocity_angle++;
      if (event->key.keysym.sym == SDLK_RIGHT) camera_velocity_angle--;
      if (event->key.keysym.sym == SDLK_PAGEUP)   camera_velocity_angle2--;
      if (event->key.keysym.sym == SDLK_PAGEDOWN) camera_velocity_angle2++;
      if (event->key.keysym.sym == SDLK_e)     camera_velocity.y++;
      if (event->key.keysym.sym == SDLK_q)     camera_velocity.y--;
      break;

    case SDL_QUIT:
      done = 1;
      break;
    }

  return (done);
}

void draw_floor (int size, int dx, int dy, int dz)
{
  int x, z, ry;

  for (x = 0; x < 10; x++)
    {
      for (z = 0; z < 10; z++)
        {
          vector<vertex_t2f_n3f_v3f> pts;
          pts.push_back (vertex_t2f_n3f_v3f (point (   0, 0,    0), vec3 (0, 1, 0), tex2 (0, 0)));
          pts.push_back (vertex_t2f_n3f_v3f (point (   0, 0, size), vec3 (0, 1, 0), tex2 (0, 1)));
          pts.push_back (vertex_t2f_n3f_v3f (point (size, 0, size), vec3 (0, 1, 0), tex2 (1, 1)));
          pts.push_back (vertex_t2f_n3f_v3f (point (size, 0,    0), vec3 (0, 1, 0), tex2 (1, 0)));

          geometry_quads *q = new geometry_quads;
          //q->m = new simple_material;
          q->set (pts);
          entity *e = new entity (q);
          e->move (vec3 (dx + x * size, dy, dz + z * size));
          e->show ();
        }
    }
}

void draw_test_nurb ()
{
  geometry_nurbs *q = new geometry_nurbs;
  q->set ();
  entity *e = new entity (q);
  e->move (vec3 (10, 3, -4));
  e->show ();
}

void fisch (vec3 center, GLfloat radius, int depth)
{
  entity *planet = new entity (new geometry_sphere (testmat, radius));
  planet->move (center);
  planet->show ();

  if (--depth)
    {
      GLfloat r2 = radius * .1F;
      GLfloat r3 = radius + r2;

      fisch (center + vec3 (r3, 0, 0), r2, depth);
      fisch (center + vec3 (0, 0, r3), r2, depth);
      fisch (center + vec3 (-r3, 0, 0), r2, depth);
    }
}

extern void draw_level ();

octant *optimize (octant *o)//D
{
  if (!o)
    return o;

  for (int i = 8; --i; )
    o->sub[i] = optimize (o->sub[i]);

  if (o->fill != 1 || o->size ())
    return o;

  printf ("skipped\n");

  for (int i = 8; --i; )
    if (o->sub[i])
      return o->sub[i];

  abort ();
}

int
RunGLTest (int argc, char *argv[],
           int logo, int slowly, int bpp, float gamma, int noframe, int fsaa)
{
  int i;
  int rgb_size[3];
  int w = 640;
  int h = 480;
  int done = 0;
  int frames;
  Uint32 video_flags;
  int value;
      GLenum gl_error;

  if (SDL_Init (SDL_INIT_VIDEO) < 0)
    {
      fprintf (stderr, "Couldn't initialize SDL: %s\n", SDL_GetError ());
      exit (1);
    }

  /* See if we should detect the display depth */
  if (bpp == 0)
    {
      if (SDL_GetVideoInfo ()->vfmt->BitsPerPixel <= 8)
        bpp = 8;
      else
        bpp = 16;               /* More doesn't seem to work */
    }

  video_flags = SDL_OPENGL;

  for (i = 1; argv[i]; ++i)
    if (strcmp (argv[1], "-fullscreen") == 0)
      video_flags |= SDL_FULLSCREEN;

  if (noframe)
    video_flags |= SDL_NOFRAME;

  /* Initialize the display */
  switch (bpp)
    {
    case 8:
      rgb_size[0] = 3;
      rgb_size[1] = 3;
      rgb_size[2] = 2;
      break;

    case 15:
    case 16:
      rgb_size[0] = 5;
      rgb_size[1] = 5;
      rgb_size[2] = 5;
      break;

    default:
      rgb_size[0] = 8;
      rgb_size[1] = 8;
      rgb_size[2] = 8;
      break;
    }

  SDL_GL_SetAttribute (SDL_GL_RED_SIZE, rgb_size[0]);
  SDL_GL_SetAttribute (SDL_GL_GREEN_SIZE, rgb_size[1]);
  SDL_GL_SetAttribute (SDL_GL_BLUE_SIZE, rgb_size[2]);
  SDL_GL_SetAttribute (SDL_GL_DEPTH_SIZE, 24);
  SDL_GL_SetAttribute (SDL_GL_DOUBLEBUFFER, 1);

  if (fsaa)
    {
      SDL_GL_SetAttribute (SDL_GL_MULTISAMPLEBUFFERS, 1);
      SDL_GL_SetAttribute (SDL_GL_MULTISAMPLESAMPLES, fsaa);
    }

  if (SDL_SetVideoMode (w, h, bpp, video_flags) == NULL)
    {
      fprintf (stderr, "Couldn't set GL mode: %s\n", SDL_GetError ());
      SDL_Quit ();
      exit (1);
    }

  //printf ("Screen BPP: %d\n", SDL_GetVideoSurface ()->format->BitsPerPixel);
  //printf ("\n");
  //printf ("Vendor     : %s\n", glGetString (GL_VENDOR));
  //printf ("Renderer   : %s\n", glGetString (GL_RENDERER));
  //printf ("Version    : %s\n", glGetString (GL_VERSION));
  //printf ("Extensions : %s\n", glGetString (GL_EXTENSIONS));
  printf ("\n");

  SDL_GL_GetAttribute (SDL_GL_RED_SIZE, &value);
  printf ("SDL_GL_RED_SIZE: requested %d, got %d\n", rgb_size[0], value);
  SDL_GL_GetAttribute (SDL_GL_GREEN_SIZE, &value);
  printf ("SDL_GL_GREEN_SIZE: requested %d, got %d\n", rgb_size[1], value);
  SDL_GL_GetAttribute (SDL_GL_BLUE_SIZE, &value);
  printf ("SDL_GL_BLUE_SIZE: requested %d, got %d\n", rgb_size[2], value);
  SDL_GL_GetAttribute (SDL_GL_DEPTH_SIZE, &value);
  printf ("SDL_GL_DEPTH_SIZE: requested %d, got %d\n", bpp, value);
  SDL_GL_GetAttribute (SDL_GL_DOUBLEBUFFER, &value);
  printf ("SDL_GL_DOUBLEBUFFER: requested 1, got %d\n", value);

  if (fsaa)
    {
      SDL_GL_GetAttribute (SDL_GL_MULTISAMPLEBUFFERS, &value);
      printf ("SDL_GL_MULTISAMPLEBUFFERS: requested 1, got %d\n", value);
      SDL_GL_GetAttribute (SDL_GL_MULTISAMPLESAMPLES, &value);
      printf ("SDL_GL_MULTISAMPLESAMPLES: requested %d, got %d\n", fsaa,
              value);
    }

  /* Set the window manager title bar */
  SDL_WM_SetCaption ("libgender rendering test", "gendertest");

  /* Set the gamma for the window */
  if (gamma != 0.0)
    SDL_SetGamma (gamma, gamma, gamma);

  testmat = new test_material;

  entity *planet = new entity (new geometry_sphere (testmat, 10));
  planet->move (vec3 (0, 0, -20));
  planet->show ();

  doom3parse ("test.proc");

  for (int i = 8; --i; )
    world.sub[i] = optimize (world.sub[i]);//D

  for (int i = 0; i < 20; i++)
    {
      // load a entity
      txtprt_parser p;
      geometry *g;
      try
        {
          g = p.read ("test.blasc");
        }
      catch (txtprt_i_exception & e)
        {
          cout << "ERR: " << e.msg << endl;
        }

      entity *e = new entity (g);
      e->move (vec3 (i*5, -3, -i*10));
      e->show ();
    }

  {
    fisch (vec3 (0, 0, -2e9), 1e9, 8);
    //entity *planet = new entity (new geometry_sphere (1e9));
    //planet->move (vec3 (0, 0, -1.5e9));
    //planet->show ();
  }

  {
    entity *planet = new entity (new geometry_sphere (testmat, 4e15));
    planet->move (vec3 (0, 0, 1e17));
    planet->show ();
  }

  //draw_floor (10, -500, -10, -1000);
  draw_level ();

#if 0
  {
    geometry_heightfield *hf = new geometry_heightfield (100000., 100000.);
    entity *e = new entity (hf);
    e->move (vec3 (-100000, -100000 * 0.01, -100000));
    e->show ();
  }
#endif

  //draw_test_nurb ();

  //camera.orig.x = 108; camera.orig.y = 0; camera.orig.z = -368;
  camera.orig.x = 0; camera.orig.y = 0; camera.orig.z = 0;
  camera.p = point (0, 0, 10);
  camera.d = vec3 (0, 0, -1);
  camera.u = vec3 (0, 1, 0);
  camera.w = w; camera.h = h;
  camera.fov = 40.;

  glDisable (GL_ALPHA_TEST);

  /* Loop until done. */
  frames = 0;

  linear_light mylight, mylight2;

  mylight.radius = 100000;
  mylight.c = colour (1., 1, 1, 1.);
  mylight.intensity = 1.F;

  mylight2.radius = 100000;
  mylight2.c = colour (1., 0, 0, 1.);
  mylight2.intensity = 1.F;

  pass_data pass_light (&mylight);
  pass_data pass_light2 (&mylight2);

  while (!done)
    {
      char *sdl_error;
      SDL_Event event;

      camera_angle  += 90 * camera_velocity_angle  * timer.diff;
      camera_angle2 += 90 * camera_velocity_angle2 * timer.diff;

      vec3 geradeaus = matrix::rotation (-camera_angle, vec3 (0, 1, 0)) * vec3 (0, 0, -1);
      vec3 right     = matrix::rotation (90., vec3 (0, 1, 0)) * geradeaus;

      camera.d = matrix::rotation (camera_angle2, right) * geradeaus;
      camera.u = cross (camera.d, right);

      camera.p = camera.p - camera.d * (camera_velocity_factor * timer.diff) * camera_velocity.z;
      camera.p = camera.p - camera.u * (camera_velocity_factor * timer.diff) * camera_velocity.y;

      mylight.orig = camera.orig;
      mylight.p = camera.p;

      mylight2.orig = camera.orig;
      mylight2.p = camera.p + vec3 (sin (timer.now * 2) * 100, 1, cos (timer.now * 2) * 100);

      //mylight.intensity = max (sinf (timer.now) + 1.2F, 0.2F);
      
      camera.begin ();
      camera.render (pass_depth);
      camera.render (pass_postdepth);
      camera.render (pass_light);
      //camera.render (view::LIGHTED, pass_light2);
      camera.end ();

      SDL_GL_SwapBuffers ();
      timer.frame ();

#if 0
      /* Check for error conditions. */
      gl_error = glGetError ();

      if (gl_error != GL_NO_ERROR) fprintf (stderr, "testgl: OpenGL error: %d\n", gl_error);

      sdl_error = SDL_GetError ();

      if (sdl_error[0] != '\0')
        {
          fprintf (stderr, "testgl: SDL error '%s'\n", sdl_error);
          SDL_ClearError ();
        }

      /* Allow the user to see what's happening */
      //SDL_Delay (40);
#endif

      /* Check if there's a pending event. */
      while (SDL_PollEvent (&event))
        done = HandleEvent (&event);

      ++frames;
    }

  if (global_image)
    {
      SDL_FreeSurface (global_image);
      global_image = NULL;
    }

  if (global_texture)
    {
      glDeleteTextures (1, &global_texture);
      global_texture = 0;
    }

  /* Destroy our GL context, etc. */
  SDL_Quit ();
  return (0);
}
int
main (int argc, char *argv[])
{
  int i, logo;
  int numtests;
  int bpp = 0;
  int slowly;
  float gamma = 0.0;
  int noframe = 0;
  int fsaa = 0;

  logo = 0;
  slowly = 0;
  numtests = 1;
  for (i = 1; argv[i]; ++i)
    {
      if (strcmp (argv[i], "-twice") == 0)
        {
          ++numtests;
        }
      if (strcmp (argv[i], "-slow") == 0)
        {
          slowly = 1;
        }
      if (strcmp (argv[i], "-bpp") == 0)
        {
          bpp = atoi (argv[++i]);
        }
      if (strcmp (argv[i], "-gamma") == 0)
        {
          gamma = (float) atof (argv[++i]);
        }
      if (strcmp (argv[i], "-noframe") == 0)
        {
          noframe = 1;
        }
      if (strcmp (argv[i], "-fsaa") == 0)
        {
          ++fsaa;
        }
      if (strncmp (argv[i], "-h", 2) == 0)
        {
          printf
            ("Usage: %s [-twice] [-logo] [-slow] [-bpp n] [-gamma n] [-noframe] [-fsaa]\n",
             argv[0]);
          exit (0);
        }
    }

  for (i = 0; i < numtests; ++i)
    RunGLTest (argc, argv, logo, slowly, bpp, gamma, noframe, fsaa);

  return 0;
}
Revision:	1.92
Committed:	Wed Nov 10 01:57:15 2004 UTC (19 years, 7 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.91:	+24 -0 lines
Log Message:	* empty log message *
#	User	Rev	Content
1	root	1.1	#include <stdlib.h>
2			#include <stdio.h>
3			#include <string.h>
4			#include <math.h>
5
6	root	1.62	#include "opengl.h"
7
8	root	1.1	#include "SDL.h"
9			#include "SDL_opengl.h"
10
11			static SDL_Surface *global_image = NULL;
12			static GLuint global_texture = 0;
13
14	root	1.29	#include "util.h"
15	root	1.2	#include "entity.h"
16	root	1.29	#include "txtprt_import.h"
17
18	root	1.84	bool doom3parse (const char *f);
19
20	root	1.70	#include "shader.h"
21
22	root	1.1	/**********************************************************************/
23
24	root	1.6	view camera;
25	root	1.18	vec3 camera_velocity;
26	root	1.51	float camera_angle, camera_angle2, camera_velocity_angle, camera_velocity_angle2;
27	root	1.50	float camera_velocity_factor = 80;
28	root	1.6
29	root	1.1	void
30			HotKey_ToggleFullScreen (void)
31			{
32			SDL_Surface *screen;
33
34			screen = SDL_GetVideoSurface ();
35	root	1.73
36	root	1.1	if (SDL_WM_ToggleFullScreen (screen))
37	root	1.5	printf ("Toggled fullscreen mode - now %s\n",
38			(screen->flags & SDL_FULLSCREEN) ? "fullscreen" : "windowed");
39	root	1.1	else
40	root	1.5	printf ("Unable to toggle fullscreen mode\n");
41	root	1.1	}
42
43			void
44			HotKey_ToggleGrab (void)
45			{
46			SDL_GrabMode mode;
47
48			printf ("Ctrl-G: toggling input grab!\n");
49			mode = SDL_WM_GrabInput (SDL_GRAB_QUERY);
50	root	1.73
51	root	1.1	if (mode == SDL_GRAB_ON)
52	root	1.5	printf ("Grab was on\n");
53	root	1.1	else
54	root	1.5	printf ("Grab was off\n");
55	root	1.1
56			mode = SDL_WM_GrabInput (mode ? SDL_GRAB_OFF : SDL_GRAB_ON);
57	root	1.73
58	root	1.1	if (mode == SDL_GRAB_ON)
59	root	1.5	printf ("Grab is now on\n");
60	root	1.1	else
61	root	1.5	printf ("Grab is now off\n");
62	root	1.1	}
63
64			void
65			HotKey_Iconify (void)
66			{
67			printf ("Ctrl-Z: iconifying window!\n");
68			SDL_WM_IconifyWindow ();
69			}
70
71			int
72			HandleEvent (SDL_Event * event)
73			{
74			int done;
75
76			done = 0;
77	root	1.73
78	root	1.1	switch (event->type)
79			{
80			case SDL_ACTIVEEVENT:
81			/* See what happened */
82			printf ("app %s ", event->active.gain ? "gained" : "lost");
83			if (event->active.state & SDL_APPACTIVE)
84	root	1.62	printf ("active ");
85	root	1.1	else if (event->active.state & SDL_APPMOUSEFOCUS)
86	root	1.62	printf ("mouse ");
87	root	1.1	else if (event->active.state & SDL_APPINPUTFOCUS)
88	root	1.62	printf ("input ");
89	root	1.1
90			printf ("focus\n");
91			break;
92
93			case SDL_KEYDOWN:
94	root	1.51	if (event->key.keysym.sym == SDLK_UP) camera_velocity.z--;
95			if (event->key.keysym.sym == SDLK_DOWN) camera_velocity.z++;
96			if (event->key.keysym.sym == SDLK_RIGHT) camera_velocity_angle++;
97			if (event->key.keysym.sym == SDLK_LEFT) camera_velocity_angle--;
98			if (event->key.keysym.sym == SDLK_PAGEUP) camera_velocity_angle2++;
99			if (event->key.keysym.sym == SDLK_PAGEDOWN) camera_velocity_angle2--;
100			if (event->key.keysym.sym == SDLK_e) camera_velocity.y--;
101			if (event->key.keysym.sym == SDLK_q) camera_velocity.y++;
102			if (event->key.keysym.sym == SDLK_v) camera_velocity_factor *= 1.5;
103			if (event->key.keysym.sym == SDLK_b) camera_velocity_factor /= 1.5;
104	root	1.6
105	root	1.1	if (event->key.keysym.sym == SDLK_ESCAPE)
106	root	1.6	done = 1;
107	root	1.1
108			if ((event->key.keysym.sym == SDLK_g) &&
109			(event->key.keysym.mod & KMOD_CTRL))
110	root	1.6	HotKey_ToggleGrab ();
111	root	1.1
112			if ((event->key.keysym.sym == SDLK_z) &&
113			(event->key.keysym.mod & KMOD_CTRL))
114	root	1.6	HotKey_Iconify ();
115	root	1.1
116			if ((event->key.keysym.sym == SDLK_RETURN) &&
117			(event->key.keysym.mod & KMOD_ALT))
118	root	1.6	HotKey_ToggleFullScreen ();
119	root	1.1
120			break;
121
122	root	1.18	case SDL_KEYUP:
123	root	1.19	if (event->key.keysym.sym == SDLK_UP) camera_velocity.z++;
124			if (event->key.keysym.sym == SDLK_DOWN) camera_velocity.z--;
125	root	1.50	if (event->key.keysym.sym == SDLK_LEFT) camera_velocity_angle++;
126			if (event->key.keysym.sym == SDLK_RIGHT) camera_velocity_angle--;
127	root	1.51	if (event->key.keysym.sym == SDLK_PAGEUP) camera_velocity_angle2--;
128			if (event->key.keysym.sym == SDLK_PAGEDOWN) camera_velocity_angle2++;
129	root	1.50	if (event->key.keysym.sym == SDLK_e) camera_velocity.y++;
130			if (event->key.keysym.sym == SDLK_q) camera_velocity.y--;
131	root	1.18	break;
132
133	root	1.1	case SDL_QUIT:
134			done = 1;
135			break;
136			}
137
138			return (done);
139			}
140
141	root	1.47	void draw_floor (int size, int dx, int dy, int dz)
142			{
143			int x, z, ry;
144
145	root	1.60	for (x = 0; x < 10; x++)
146	root	1.47	{
147	root	1.60	for (z = 0; z < 10; z++)
148	root	1.47	{
149	root	1.62	vector<vertex_t2f_n3f_v3f> pts;
150			pts.push_back (vertex_t2f_n3f_v3f (point ( 0, 0, 0), vec3 (0, 1, 0), tex2 (0, 0)));
151			pts.push_back (vertex_t2f_n3f_v3f (point ( 0, 0, size), vec3 (0, 1, 0), tex2 (0, 1)));
152			pts.push_back (vertex_t2f_n3f_v3f (point (size, 0, size), vec3 (0, 1, 0), tex2 (1, 1)));
153			pts.push_back (vertex_t2f_n3f_v3f (point (size, 0, 0), vec3 (0, 1, 0), tex2 (1, 0)));
154	root	1.47
155			geometry_quads *q = new geometry_quads;
156	root	1.78	//q->m = new simple_material;
157	root	1.47	q->set (pts);
158			entity *e = new entity (q);
159			e->move (vec3 (dx + x * size, dy, dz + z * size));
160			e->show ();
161			}
162			}
163			}
164
165	root	1.52	void draw_test_nurb ()
166			{
167	root	1.49	geometry_nurbs *q = new geometry_nurbs;
168			q->set ();
169			entity *e = new entity (q);
170			e->move (vec3 (10, 3, -4));
171			e->show ();
172			}
173
174	root	1.66	void fisch (vec3 center, GLfloat radius, int depth)
175			{
176	root	1.80	entity *planet = new entity (new geometry_sphere (testmat, radius));
177	root	1.66	planet->move (center);
178			planet->show ();
179
180			if (--depth)
181			{
182			GLfloat r2 = radius * .1F;
183			GLfloat r3 = radius + r2;
184
185			fisch (center + vec3 (r3, 0, 0), r2, depth);
186			fisch (center + vec3 (0, 0, r3), r2, depth);
187			fisch (center + vec3 (-r3, 0, 0), r2, depth);
188			}
189			}
190
191	root	1.54	extern void draw_level ();
192	root	1.92
193			octant optimize (octant o)//D
194			{
195			if (!o)
196			return o;
197
198			for (int i = 8; --i; )
199			o->sub[i] = optimize (o->sub[i]);
200
201			if (o->fill != 1 \|\| o->size ())
202			return o;
203
204			printf ("skipped\n");
205
206			for (int i = 8; --i; )
207			if (o->sub[i])
208			return o->sub[i];
209
210			abort ();
211			}
212
213	root	1.1	int
214			RunGLTest (int argc, char *argv[],
215			int logo, int slowly, int bpp, float gamma, int noframe, int fsaa)
216			{
217			int i;
218			int rgb_size[3];
219			int w = 640;
220			int h = 480;
221			int done = 0;
222			int frames;
223	root	1.2	Uint32 video_flags;
224	root	1.1	int value;
225	root	1.45	GLenum gl_error;
226	root	1.1
227			if (SDL_Init (SDL_INIT_VIDEO) < 0)
228			{
229			fprintf (stderr, "Couldn't initialize SDL: %s\n", SDL_GetError ());
230			exit (1);
231			}
232
233			/* See if we should detect the display depth */
234			if (bpp == 0)
235			{
236			if (SDL_GetVideoInfo ()->vfmt->BitsPerPixel <= 8)
237	root	1.3	bpp = 8;
238	root	1.1	else
239	root	1.3	bpp = 16; /* More doesn't seem to work */
240	root	1.1	}
241
242	root	1.2	video_flags = SDL_OPENGL;
243
244	root	1.1	for (i = 1; argv[i]; ++i)
245	root	1.3	if (strcmp (argv[1], "-fullscreen") == 0)
246			video_flags \|= SDL_FULLSCREEN;
247	root	1.1
248			if (noframe)
249	root	1.3	video_flags \|= SDL_NOFRAME;
250	root	1.1
251			/* Initialize the display */
252			switch (bpp)
253			{
254			case 8:
255			rgb_size[0] = 3;
256			rgb_size[1] = 3;
257			rgb_size[2] = 2;
258			break;
259	root	1.3
260	root	1.1	case 15:
261			case 16:
262			rgb_size[0] = 5;
263			rgb_size[1] = 5;
264			rgb_size[2] = 5;
265			break;
266	root	1.3
267	root	1.1	default:
268			rgb_size[0] = 8;
269			rgb_size[1] = 8;
270			rgb_size[2] = 8;
271			break;
272			}
273	root	1.18
274	root	1.1	SDL_GL_SetAttribute (SDL_GL_RED_SIZE, rgb_size[0]);
275			SDL_GL_SetAttribute (SDL_GL_GREEN_SIZE, rgb_size[1]);
276			SDL_GL_SetAttribute (SDL_GL_BLUE_SIZE, rgb_size[2]);
277	root	1.69	SDL_GL_SetAttribute (SDL_GL_DEPTH_SIZE, 24);
278	root	1.1	SDL_GL_SetAttribute (SDL_GL_DOUBLEBUFFER, 1);
279	root	1.3
280	root	1.1	if (fsaa)
281			{
282			SDL_GL_SetAttribute (SDL_GL_MULTISAMPLEBUFFERS, 1);
283			SDL_GL_SetAttribute (SDL_GL_MULTISAMPLESAMPLES, fsaa);
284			}
285	root	1.3
286	root	1.1	if (SDL_SetVideoMode (w, h, bpp, video_flags) == NULL)
287			{
288			fprintf (stderr, "Couldn't set GL mode: %s\n", SDL_GetError ());
289			SDL_Quit ();
290			exit (1);
291			}
292
293	root	1.69	//printf ("Screen BPP: %d\n", SDL_GetVideoSurface ()->format->BitsPerPixel);
294			//printf ("\n");
295			//printf ("Vendor : %s\n", glGetString (GL_VENDOR));
296			//printf ("Renderer : %s\n", glGetString (GL_RENDERER));
297			//printf ("Version : %s\n", glGetString (GL_VERSION));
298			//printf ("Extensions : %s\n", glGetString (GL_EXTENSIONS));
299	root	1.1	printf ("\n");
300
301			SDL_GL_GetAttribute (SDL_GL_RED_SIZE, &value);
302			printf ("SDL_GL_RED_SIZE: requested %d, got %d\n", rgb_size[0], value);
303			SDL_GL_GetAttribute (SDL_GL_GREEN_SIZE, &value);
304			printf ("SDL_GL_GREEN_SIZE: requested %d, got %d\n", rgb_size[1], value);
305			SDL_GL_GetAttribute (SDL_GL_BLUE_SIZE, &value);
306			printf ("SDL_GL_BLUE_SIZE: requested %d, got %d\n", rgb_size[2], value);
307			SDL_GL_GetAttribute (SDL_GL_DEPTH_SIZE, &value);
308			printf ("SDL_GL_DEPTH_SIZE: requested %d, got %d\n", bpp, value);
309			SDL_GL_GetAttribute (SDL_GL_DOUBLEBUFFER, &value);
310			printf ("SDL_GL_DOUBLEBUFFER: requested 1, got %d\n", value);
311	root	1.3
312	root	1.1	if (fsaa)
313			{
314			SDL_GL_GetAttribute (SDL_GL_MULTISAMPLEBUFFERS, &value);
315			printf ("SDL_GL_MULTISAMPLEBUFFERS: requested 1, got %d\n", value);
316			SDL_GL_GetAttribute (SDL_GL_MULTISAMPLESAMPLES, &value);
317			printf ("SDL_GL_MULTISAMPLESAMPLES: requested %d, got %d\n", fsaa,
318			value);
319			}
320
321			/* Set the window manager title bar */
322	root	1.12	SDL_WM_SetCaption ("libgender rendering test", "gendertest");
323	root	1.1
324			/* Set the gamma for the window */
325			if (gamma != 0.0)
326	root	1.3	SDL_SetGamma (gamma, gamma, gamma);
327	root	1.1
328	root	1.79	testmat = new test_material;
329
330	root	1.81	entity *planet = new entity (new geometry_sphere (testmat, 10));
331	root	1.78	planet->move (vec3 (0, 0, -20));
332			planet->show ();
333	root	1.84
334	root	1.89	doom3parse ("test.proc");
335	root	1.92
336			for (int i = 8; --i; )
337			world.sub[i] = optimize (world.sub[i]);//D
338	root	1.89
339	root	1.56	for (int i = 0; i < 20; i++)
340	root	1.17	{
341	root	1.40	// load a entity
342	root	1.17	txtprt_parser p;
343	root	1.47	geometry *g;
344	root	1.17	try
345	root	1.40	{
346	root	1.47	g = p.read ("test.blasc");
347	root	1.40	}
348			catch (txtprt_i_exception & e)
349			{
350			cout << "ERR: " << e.msg << endl;
351			}
352
353	root	1.47	entity *e = new entity (g);
354			e->move (vec3 (i5, -3, -i10));
355			e->show ();
356	root	1.17	}
357	root	1.47
358	root	1.89	{
359			fisch (vec3 (0, 0, -2e9), 1e9, 8);
360			//entity *planet = new entity (new geometry_sphere (1e9));
361			//planet->move (vec3 (0, 0, -1.5e9));
362			//planet->show ();
363			}
364
365			{
366			entity *planet = new entity (new geometry_sphere (testmat, 4e15));
367			planet->move (vec3 (0, 0, 1e17));
368			planet->show ();
369			}
370	root	1.60
371	root	1.75	//draw_floor (10, -500, -10, -1000);
372	root	1.54	draw_level ();
373	root	1.73
374	root	1.83	#if 0
375	root	1.73	{
376	root	1.75	geometry_heightfield *hf = new geometry_heightfield (100000., 100000.);
377			entity *e = new entity (hf);
378			e->move (vec3 (-100000, -100000 * 0.01, -100000));
379	root	1.73	e->show ();
380			}
381	root	1.83	#endif
382	root	1.73
383	root	1.60	//draw_test_nurb ();
384	root	1.47
385	root	1.55	//camera.orig.x = 108; camera.orig.y = 0; camera.orig.z = -368;
386			camera.orig.x = 0; camera.orig.y = 0; camera.orig.z = 0;
387	root	1.6	camera.p = point (0, 0, 10);
388			camera.d = vec3 (0, 0, -1);
389			camera.u = vec3 (0, 1, 0);
390			camera.w = w; camera.h = h;
391	root	1.67	camera.fov = 40.;
392	root	1.1
393	root	1.65	glDisable (GL_ALPHA_TEST);
394	root	1.29
395	root	1.1	/* Loop until done. */
396			frames = 0;
397	root	1.16
398	root	1.90	linear_light mylight, mylight2;
399
400	root	1.78	mylight.radius = 100000;
401	root	1.79	mylight.c = colour (1., 1, 1, 1.);
402	root	1.80	mylight.intensity = 1.F;
403	root	1.78
404	root	1.90	mylight2.radius = 100000;
405			mylight2.c = colour (1., 0, 0, 1.);
406			mylight2.intensity = 1.F;
407
408	root	1.91	pass_data pass_light (&mylight);
409			pass_data pass_light2 (&mylight2);
410	root	1.78
411	root	1.1	while (!done)
412			{
413			char *sdl_error;
414			SDL_Event event;
415
416	root	1.88	camera_angle += 90 * camera_velocity_angle * timer.diff;
417			camera_angle2 += 90 * camera_velocity_angle2 * timer.diff;
418	root	1.51
419			vec3 geradeaus = matrix::rotation (-camera_angle, vec3 (0, 1, 0)) * vec3 (0, 0, -1);
420			vec3 right = matrix::rotation (90., vec3 (0, 1, 0)) * geradeaus;
421
422			camera.d = matrix::rotation (camera_angle2, right) * geradeaus;
423			camera.u = cross (camera.d, right);
424
425	root	1.50	camera.p = camera.p - camera.d * (camera_velocity_factor * timer.diff) * camera_velocity.z;
426			camera.p = camera.p - camera.u * (camera_velocity_factor * timer.diff) * camera_velocity.y;
427	root	1.18
428	root	1.78	mylight.orig = camera.orig;
429			mylight.p = camera.p;
430	root	1.1
431	root	1.90	mylight2.orig = camera.orig;
432			mylight2.p = camera.p + vec3 (sin (timer.now * 2) * 100, 1, cos (timer.now * 2) * 100);
433
434	root	1.79	//mylight.intensity = max (sinf (timer.now) + 1.2F, 0.2F);
435
436	root	1.34	camera.begin ();
437	root	1.91	camera.render (pass_depth);
438			camera.render (pass_postdepth);
439			camera.render (pass_light);
440	root	1.90	//camera.render (view::LIGHTED, pass_light2);
441	root	1.34	camera.end ();
442	root	1.1
443			SDL_GL_SwapBuffers ();
444	root	1.15	timer.frame ();
445	root	1.62
446			#if 0
447	root	1.1	/* Check for error conditions. */
448			gl_error = glGetError ();
449
450	root	1.45	if (gl_error != GL_NO_ERROR) fprintf (stderr, "testgl: OpenGL error: %d\n", gl_error);
451	root	1.1
452			sdl_error = SDL_GetError ();
453
454			if (sdl_error[0] != '\0')
455			{
456			fprintf (stderr, "testgl: SDL error '%s'\n", sdl_error);
457			SDL_ClearError ();
458			}
459
460			/* Allow the user to see what's happening */
461	root	1.51	//SDL_Delay (40);
462	root	1.62	#endif
463	root	1.1
464			/* Check if there's a pending event. */
465			while (SDL_PollEvent (&event))
466	root	1.18	done = HandleEvent (&event);
467	root	1.20
468	root	1.1	++frames;
469			}
470
471			if (global_image)
472			{
473			SDL_FreeSurface (global_image);
474			global_image = NULL;
475			}
476	root	1.73
477	root	1.1	if (global_texture)
478			{
479			glDeleteTextures (1, &global_texture);
480			global_texture = 0;
481			}
482
483			/* Destroy our GL context, etc. */
484			SDL_Quit ();
485			return (0);
486			}
487			int
488			main (int argc, char *argv[])
489			{
490			int i, logo;
491			int numtests;
492			int bpp = 0;
493			int slowly;
494			float gamma = 0.0;
495			int noframe = 0;
496			int fsaa = 0;
497	root	1.68
498	root	1.1	logo = 0;
499			slowly = 0;
500			numtests = 1;
501			for (i = 1; argv[i]; ++i)
502			{
503			if (strcmp (argv[i], "-twice") == 0)
504			{
505			++numtests;
506			}
507			if (strcmp (argv[i], "-slow") == 0)
508			{
509			slowly = 1;
510			}
511			if (strcmp (argv[i], "-bpp") == 0)
512			{
513			bpp = atoi (argv[++i]);
514			}
515			if (strcmp (argv[i], "-gamma") == 0)
516			{
517			gamma = (float) atof (argv[++i]);
518			}
519			if (strcmp (argv[i], "-noframe") == 0)
520			{
521			noframe = 1;
522			}
523			if (strcmp (argv[i], "-fsaa") == 0)
524			{
525			++fsaa;
526			}
527			if (strncmp (argv[i], "-h", 2) == 0)
528			{
529			printf
530			("Usage: %s [-twice] [-logo] [-slow] [-bpp n] [-gamma n] [-noframe] [-fsaa]\n",
531			argv[0]);
532			exit (0);
533			}
534			}
535	root	1.17
536	root	1.1	for (i = 0; i < numtests; ++i)
537	root	1.17	RunGLTest (argc, argv, logo, slowly, bpp, gamma, noframe, fsaa);
538
539	root	1.1	return 0;
540			}