libgender/test.C

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <math.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"

CGcontext cgc;
CGprogram vsh, fsh;
CGparameter mv, mvp, lightpos;
CGprofile vsh_profile, fsh_profile;

static void CheckCgError (void)
{
  CGerror err = cgGetError ();

  if (err != CG_NO_ERROR)
    {
      printf("CG error: %s\n", cgGetErrorString (err));
      exit(1);
    }
}

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

view camera;
vec3 camera_velocity;
float camera_angle = 0, camera_velocity_angle;
float camera_velocity_factor = 20;

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_LEFT)  camera_velocity.x--;
      if (event->key.keysym.sym == SDLK_RIGHT) camera_velocity.x++;
      if (event->key.keysym.sym == SDLK_a)     camera_velocity.y--;
      if (event->key.keysym.sym == SDLK_s)     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_e)     camera_velocity_angle++;
      if (event->key.keysym.sym == SDLK_q)     camera_velocity_angle--;

      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.x++;
      if (event->key.keysym.sym == SDLK_RIGHT) camera_velocity.x--;
      if (event->key.keysym.sym == SDLK_a)     camera_velocity.y++;
      if (event->key.keysym.sym == SDLK_s)     camera_velocity.y--;
      if (event->key.keysym.sym == SDLK_e)     camera_velocity_angle--;
      if (event->key.keysym.sym == SDLK_q)     camera_velocity_angle++;
      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 < 100; x++)
    {
      for (z = 0; z < 100; z++)
        {
          vector<vertex2d> pts;
          pts.push_back (vertex2d (point (dx + (x * size),       dy, dz + (z * size)),       vec3  (0, 1, 0), texc (0, 0)));
          pts.push_back (vertex2d (point (dx + (x * size),       dy, dz + ((z + 1) * size)), vec3  (0, 1, 0), texc (0, 1)));
          pts.push_back (vertex2d (point (dx + ((x + 1) * size), dy, dz + ((z + 1) * size)), vec3  (0, 1, 0), texc (1, 1)));
          pts.push_back (vertex2d (point (dx + ((x + 1) * size), dy, dz + (z * size)),       vec3  (0, 1, 0), texc (1, 0)));

          geometry_quads *q = new geometry_quads;
          q->set (pts);
          (new entity (q))->show ();
#if 0
          vector<vertex2d> pts;
          pts.push_back (vertex2d (point (   0, 0,    0), vec3 (0, 1, 0), texc (0, 0)));
          pts.push_back (vertex2d (point (   0, 0, size), vec3 (0, 1, 0), texc (0, 1)));
          pts.push_back (vertex2d (point (size, 0, size), vec3 (0, 1, 0), texc (1, 1)));
          pts.push_back (vertex2d (point (size, 0,    0), vec3 (0, 1, 0), texc (1, 0)));

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

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 start_time, this_time;
  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, 16);
  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);

  for (int i = 0; i < 70; 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 ();
    }

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

  camera.orig.x = camera.orig.y = 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 = 35;

  glMatrixMode (GL_MODELVIEW);
  glLoadIdentity ();

  glEnable (GL_CULL_FACE);
  glEnable (GL_DEPTH_TEST);

  glShadeModel (GL_SMOOTH);

  glEnable (GL_LIGHTING);
  glEnable (GL_LIGHT0);

  cgc = cgCreateContext ();

  vsh_profile = CG_PROFILE_ARBVP1;
  //if (cgGLIsProfileSupported (CG_PROFILE_VP30)) vsh_profile = CG_PROFILE_VP30;
  //if (cgGLIsProfileSupported (CG_PROFILE_VP40)) vsh_profile = CG_PROFILE_VP40;
  fsh_profile = CG_PROFILE_ARBFP1;
  //if (cgGLIsProfileSupported (CG_PROFILE_FP30)) fsh_profile = CG_PROFILE_FP30;
  //if (cgGLIsProfileSupported (CG_PROFILE_FP40)) fsh_profile = CG_PROFILE_FP40;

  vsh = cgCreateProgramFromFile (cgc, CG_SOURCE, "vsh.cg", vsh_profile, 0, 0);
  CheckCgError ();
  cgGLLoadProgram (vsh);
  CheckCgError ();
  mv = cgGetNamedParameter (vsh, "WorldProj");
  mvp = cgGetNamedParameter (vsh, "WorldViewProj");
  lightpos = cgGetNamedParameter (vsh, "LightPos");
  CheckCgError ();

  CGparameter g_Texture; // the texture parameter


  fsh = cgCreateProgramFromFile (cgc, CG_SOURCE, "fsh.cg", fsh_profile, 0, 0);
  Texture t("o.jpg");
  g_Texture = cgGetNamedParameter(fsh, "Texture"); // the texture cg-warper ;)
  cgGLSetTextureParameter(g_Texture, t.texture); // Bind the texture number 999 to g_Texture
  CheckCgError ();
  cgGLLoadProgram (fsh);
  CheckCgError ();

  cgGLBindProgram (vsh);
  CheckCgError ();
  cgGLBindProgram (fsh);
  CheckCgError ();

  /* Loop until done. */
  start_time = SDL_GetTicks ();
  frames = 0;

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

      camera.p.x += camera_velocity_factor * camera_velocity.x * timer.diff;
      camera.p.y += camera_velocity_factor * camera_velocity.y * timer.diff;
      camera.p.z += camera_velocity_factor * camera_velocity.z * timer.diff;

      camera_angle += camera_velocity_factor * camera_velocity_angle * timer.diff;
      camera.d.z = -cos (camera_angle * 12 / 180.);
      camera.d.x = sin (camera_angle * 12 / 180.);

      cgGLSetParameter4f (lightpos, camera.p.x, camera.p.y, camera.p.z, 1);

      glBindTexture (GL_TEXTURE_2D, t.texture);
      cgGLEnableTextureParameter (g_Texture); // Enable the texture parameter 

#if 0
      static GLfloat ry;
      ry += 0.001;
      camera.d.x = cos (ry);
      camera.d.z = sin (ry);
      //camera.d.y = sin (ry * 0.1);
#endif

      camera.begin ();
      camera.pass (view::DEPTH);
      camera.pass (view::LIGHTED);
      camera.end ();

      SDL_GL_SwapBuffers ();
      timer.frame ();

      /* 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 (20);

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


      ++frames;
    }

  /* Print out the frames per second */
  this_time = SDL_GetTicks ();
  if (this_time != start_time)
    {
      printf ("%2.2f FPS\n",
              ((float) frames / (this_time - start_time)) * 1000.0);
    }

  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.47
Committed:	Thu Oct 7 23:39:43 2004 UTC (19 years, 8 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.46:	+42 -7 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			#include "SDL.h"
7			#include "SDL_opengl.h"
8
9			static SDL_Surface *global_image = NULL;
10			static GLuint global_texture = 0;
11
12	root	1.29	#include "util.h"
13	root	1.2	#include "entity.h"
14	root	1.29	#include "txtprt_import.h"
15
16			CGcontext cgc;
17			CGprogram vsh, fsh;
18	root	1.30	CGparameter mv, mvp, lightpos;
19	root	1.35	CGprofile vsh_profile, fsh_profile;
20	root	1.29
21	root	1.46	static void CheckCgError (void)
22	root	1.29	{
23	root	1.46	CGerror err = cgGetError ();
24	root	1.2
25	root	1.29	if (err != CG_NO_ERROR)
26	root	1.46	{
27			printf("CG error: %s\n", cgGetErrorString (err));
28			exit(1);
29			}
30	root	1.29	}
31	root	1.4
32	root	1.1	/**********************************************************************/
33
34	root	1.6	view camera;
35	root	1.18	vec3 camera_velocity;
36	root	1.38	float camera_angle = 0, camera_velocity_angle;
37	root	1.32	float camera_velocity_factor = 20;
38	root	1.6
39	root	1.1	void
40			HotKey_ToggleFullScreen (void)
41			{
42			SDL_Surface *screen;
43
44			screen = SDL_GetVideoSurface ();
45			if (SDL_WM_ToggleFullScreen (screen))
46	root	1.5	printf ("Toggled fullscreen mode - now %s\n",
47			(screen->flags & SDL_FULLSCREEN) ? "fullscreen" : "windowed");
48	root	1.1	else
49	root	1.5	printf ("Unable to toggle fullscreen mode\n");
50	root	1.1	}
51
52			void
53			HotKey_ToggleGrab (void)
54			{
55			SDL_GrabMode mode;
56
57			printf ("Ctrl-G: toggling input grab!\n");
58			mode = SDL_WM_GrabInput (SDL_GRAB_QUERY);
59			if (mode == SDL_GRAB_ON)
60	root	1.5	printf ("Grab was on\n");
61	root	1.1	else
62	root	1.5	printf ("Grab was off\n");
63	root	1.1
64			mode = SDL_WM_GrabInput (mode ? SDL_GRAB_OFF : SDL_GRAB_ON);
65			if (mode == SDL_GRAB_ON)
66	root	1.5	printf ("Grab is now on\n");
67	root	1.1	else
68	root	1.5	printf ("Grab is now off\n");
69	root	1.1	}
70
71			void
72			HotKey_Iconify (void)
73			{
74			printf ("Ctrl-Z: iconifying window!\n");
75			SDL_WM_IconifyWindow ();
76			}
77
78			int
79			HandleEvent (SDL_Event * event)
80			{
81			int done;
82
83			done = 0;
84			switch (event->type)
85			{
86			case SDL_ACTIVEEVENT:
87			/* See what happened */
88			printf ("app %s ", event->active.gain ? "gained" : "lost");
89			if (event->active.state & SDL_APPACTIVE)
90			{
91			printf ("active ");
92			}
93			else if (event->active.state & SDL_APPMOUSEFOCUS)
94			{
95			printf ("mouse ");
96			}
97			else if (event->active.state & SDL_APPINPUTFOCUS)
98			{
99			printf ("input ");
100			}
101
102			printf ("focus\n");
103			break;
104
105			case SDL_KEYDOWN:
106	root	1.19	if (event->key.keysym.sym == SDLK_UP) camera_velocity.z--;
107			if (event->key.keysym.sym == SDLK_DOWN) camera_velocity.z++;
108			if (event->key.keysym.sym == SDLK_LEFT) camera_velocity.x--;
109			if (event->key.keysym.sym == SDLK_RIGHT) camera_velocity.x++;
110			if (event->key.keysym.sym == SDLK_a) camera_velocity.y--;
111			if (event->key.keysym.sym == SDLK_s) camera_velocity.y++;
112			if (event->key.keysym.sym == SDLK_v) camera_velocity_factor *= 1.5;
113			if (event->key.keysym.sym == SDLK_b) camera_velocity_factor /= 1.5;
114	root	1.38	if (event->key.keysym.sym == SDLK_e) camera_velocity_angle++;
115			if (event->key.keysym.sym == SDLK_q) camera_velocity_angle--;
116	root	1.6
117	root	1.1	if (event->key.keysym.sym == SDLK_ESCAPE)
118	root	1.6	done = 1;
119	root	1.1
120			if ((event->key.keysym.sym == SDLK_g) &&
121			(event->key.keysym.mod & KMOD_CTRL))
122	root	1.6	HotKey_ToggleGrab ();
123	root	1.1
124			if ((event->key.keysym.sym == SDLK_z) &&
125			(event->key.keysym.mod & KMOD_CTRL))
126	root	1.6	HotKey_Iconify ();
127	root	1.1
128			if ((event->key.keysym.sym == SDLK_RETURN) &&
129			(event->key.keysym.mod & KMOD_ALT))
130	root	1.6	HotKey_ToggleFullScreen ();
131	root	1.1
132			break;
133
134	root	1.18	case SDL_KEYUP:
135	root	1.19	if (event->key.keysym.sym == SDLK_UP) camera_velocity.z++;
136			if (event->key.keysym.sym == SDLK_DOWN) camera_velocity.z--;
137			if (event->key.keysym.sym == SDLK_LEFT) camera_velocity.x++;
138			if (event->key.keysym.sym == SDLK_RIGHT) camera_velocity.x--;
139			if (event->key.keysym.sym == SDLK_a) camera_velocity.y++;
140			if (event->key.keysym.sym == SDLK_s) camera_velocity.y--;
141	root	1.38	if (event->key.keysym.sym == SDLK_e) camera_velocity_angle--;
142			if (event->key.keysym.sym == SDLK_q) camera_velocity_angle++;
143	root	1.18	break;
144
145	root	1.1	case SDL_QUIT:
146			done = 1;
147			break;
148			}
149
150			return (done);
151			}
152
153	root	1.47	void draw_floor (int size, int dx, int dy, int dz)
154			{
155			int x, z, ry;
156
157			for (x = 0; x < 100; x++)
158			{
159			for (z = 0; z < 100; z++)
160			{
161			vector<vertex2d> pts;
162			pts.push_back (vertex2d (point (dx + (x * size), dy, dz + (z * size)), vec3 (0, 1, 0), texc (0, 0)));
163			pts.push_back (vertex2d (point (dx + (x * size), dy, dz + ((z + 1) * size)), vec3 (0, 1, 0), texc (0, 1)));
164			pts.push_back (vertex2d (point (dx + ((x + 1) * size), dy, dz + ((z + 1) * size)), vec3 (0, 1, 0), texc (1, 1)));
165			pts.push_back (vertex2d (point (dx + ((x + 1) * size), dy, dz + (z * size)), vec3 (0, 1, 0), texc (1, 0)));
166
167			geometry_quads *q = new geometry_quads;
168			q->set (pts);
169			(new entity (q))->show ();
170			#if 0
171			vector<vertex2d> pts;
172			pts.push_back (vertex2d (point ( 0, 0, 0), vec3 (0, 1, 0), texc (0, 0)));
173			pts.push_back (vertex2d (point ( 0, 0, size), vec3 (0, 1, 0), texc (0, 1)));
174			pts.push_back (vertex2d (point (size, 0, size), vec3 (0, 1, 0), texc (1, 1)));
175			pts.push_back (vertex2d (point (size, 0, 0), vec3 (0, 1, 0), texc (1, 0)));
176
177			geometry_quads *q = new geometry_quads;
178			q->set (pts);
179			entity *e = new entity (q);
180			e->move (vec3 (dx + x * size, dy, dz + z * size));
181			e->show ();
182			#endif
183			}
184			}
185			}
186
187	root	1.1	int
188			RunGLTest (int argc, char *argv[],
189			int logo, int slowly, int bpp, float gamma, int noframe, int fsaa)
190			{
191			int i;
192			int rgb_size[3];
193			int w = 640;
194			int h = 480;
195			int done = 0;
196			int frames;
197			Uint32 start_time, this_time;
198	root	1.2	Uint32 video_flags;
199	root	1.1	int value;
200	root	1.45	GLenum gl_error;
201	root	1.1
202			if (SDL_Init (SDL_INIT_VIDEO) < 0)
203			{
204			fprintf (stderr, "Couldn't initialize SDL: %s\n", SDL_GetError ());
205			exit (1);
206			}
207
208			/* See if we should detect the display depth */
209			if (bpp == 0)
210			{
211			if (SDL_GetVideoInfo ()->vfmt->BitsPerPixel <= 8)
212	root	1.3	bpp = 8;
213	root	1.1	else
214	root	1.3	bpp = 16; /* More doesn't seem to work */
215	root	1.1	}
216
217	root	1.2	video_flags = SDL_OPENGL;
218
219	root	1.1	for (i = 1; argv[i]; ++i)
220	root	1.3	if (strcmp (argv[1], "-fullscreen") == 0)
221			video_flags \|= SDL_FULLSCREEN;
222	root	1.1
223			if (noframe)
224	root	1.3	video_flags \|= SDL_NOFRAME;
225	root	1.1
226			/* Initialize the display */
227			switch (bpp)
228			{
229			case 8:
230			rgb_size[0] = 3;
231			rgb_size[1] = 3;
232			rgb_size[2] = 2;
233			break;
234	root	1.3
235	root	1.1	case 15:
236			case 16:
237			rgb_size[0] = 5;
238			rgb_size[1] = 5;
239			rgb_size[2] = 5;
240			break;
241	root	1.3
242	root	1.1	default:
243			rgb_size[0] = 8;
244			rgb_size[1] = 8;
245			rgb_size[2] = 8;
246			break;
247			}
248	root	1.18
249	root	1.1	SDL_GL_SetAttribute (SDL_GL_RED_SIZE, rgb_size[0]);
250			SDL_GL_SetAttribute (SDL_GL_GREEN_SIZE, rgb_size[1]);
251			SDL_GL_SetAttribute (SDL_GL_BLUE_SIZE, rgb_size[2]);
252			SDL_GL_SetAttribute (SDL_GL_DEPTH_SIZE, 16);
253			SDL_GL_SetAttribute (SDL_GL_DOUBLEBUFFER, 1);
254	root	1.3
255	root	1.1	if (fsaa)
256			{
257			SDL_GL_SetAttribute (SDL_GL_MULTISAMPLEBUFFERS, 1);
258			SDL_GL_SetAttribute (SDL_GL_MULTISAMPLESAMPLES, fsaa);
259			}
260	root	1.3
261	root	1.1	if (SDL_SetVideoMode (w, h, bpp, video_flags) == NULL)
262			{
263			fprintf (stderr, "Couldn't set GL mode: %s\n", SDL_GetError ());
264			SDL_Quit ();
265			exit (1);
266			}
267
268			printf ("Screen BPP: %d\n", SDL_GetVideoSurface ()->format->BitsPerPixel);
269			printf ("\n");
270			printf ("Vendor : %s\n", glGetString (GL_VENDOR));
271			printf ("Renderer : %s\n", glGetString (GL_RENDERER));
272			printf ("Version : %s\n", glGetString (GL_VERSION));
273			printf ("Extensions : %s\n", glGetString (GL_EXTENSIONS));
274			printf ("\n");
275
276			SDL_GL_GetAttribute (SDL_GL_RED_SIZE, &value);
277			printf ("SDL_GL_RED_SIZE: requested %d, got %d\n", rgb_size[0], value);
278			SDL_GL_GetAttribute (SDL_GL_GREEN_SIZE, &value);
279			printf ("SDL_GL_GREEN_SIZE: requested %d, got %d\n", rgb_size[1], value);
280			SDL_GL_GetAttribute (SDL_GL_BLUE_SIZE, &value);
281			printf ("SDL_GL_BLUE_SIZE: requested %d, got %d\n", rgb_size[2], value);
282			SDL_GL_GetAttribute (SDL_GL_DEPTH_SIZE, &value);
283			printf ("SDL_GL_DEPTH_SIZE: requested %d, got %d\n", bpp, value);
284			SDL_GL_GetAttribute (SDL_GL_DOUBLEBUFFER, &value);
285			printf ("SDL_GL_DOUBLEBUFFER: requested 1, got %d\n", value);
286	root	1.3
287	root	1.1	if (fsaa)
288			{
289			SDL_GL_GetAttribute (SDL_GL_MULTISAMPLEBUFFERS, &value);
290			printf ("SDL_GL_MULTISAMPLEBUFFERS: requested 1, got %d\n", value);
291			SDL_GL_GetAttribute (SDL_GL_MULTISAMPLESAMPLES, &value);
292			printf ("SDL_GL_MULTISAMPLESAMPLES: requested %d, got %d\n", fsaa,
293			value);
294			}
295
296			/* Set the window manager title bar */
297	root	1.12	SDL_WM_SetCaption ("libgender rendering test", "gendertest");
298	root	1.1
299			/* Set the gamma for the window */
300			if (gamma != 0.0)
301	root	1.3	SDL_SetGamma (gamma, gamma, gamma);
302	root	1.1
303	root	1.40	for (int i = 0; i < 70; i++)
304	root	1.17	{
305	root	1.40	// load a entity
306	root	1.17	txtprt_parser p;
307	root	1.47	geometry *g;
308	root	1.17	try
309	root	1.40	{
310	root	1.47	g = p.read ("test.blasc");
311	root	1.40	}
312			catch (txtprt_i_exception & e)
313			{
314			cout << "ERR: " << e.msg << endl;
315			}
316
317	root	1.47	entity *e = new entity (g);
318			e->move (vec3 (i5, -3, -i10));
319			e->show ();
320	root	1.17	}
321	root	1.47
322			draw_floor (10, -500, -10, -1000);
323
324	root	1.13	camera.orig.x = camera.orig.y = camera.orig.z = 0;
325	root	1.6	camera.p = point (0, 0, 10);
326			camera.d = vec3 (0, 0, -1);
327			camera.u = vec3 (0, 1, 0);
328			camera.w = w; camera.h = h;
329	root	1.46	camera.fov = 35;
330	root	1.1
331			glMatrixMode (GL_MODELVIEW);
332			glLoadIdentity ();
333
334	root	1.41	glEnable (GL_CULL_FACE);
335	root	1.1	glEnable (GL_DEPTH_TEST);
336	root	1.22
337	root	1.11	glShadeModel (GL_SMOOTH);
338	root	1.6
339	root	1.3	glEnable (GL_LIGHTING);
340	root	1.6	glEnable (GL_LIGHT0);
341	root	1.29
342			cgc = cgCreateContext ();
343	root	1.35
344			vsh_profile = CG_PROFILE_ARBVP1;
345	root	1.36	//if (cgGLIsProfileSupported (CG_PROFILE_VP30)) vsh_profile = CG_PROFILE_VP30;
346			//if (cgGLIsProfileSupported (CG_PROFILE_VP40)) vsh_profile = CG_PROFILE_VP40;
347	root	1.35	fsh_profile = CG_PROFILE_ARBFP1;
348	root	1.36	//if (cgGLIsProfileSupported (CG_PROFILE_FP30)) fsh_profile = CG_PROFILE_FP30;
349			//if (cgGLIsProfileSupported (CG_PROFILE_FP40)) fsh_profile = CG_PROFILE_FP40;
350	root	1.35
351			vsh = cgCreateProgramFromFile (cgc, CG_SOURCE, "vsh.cg", vsh_profile, 0, 0);
352	root	1.29	CheckCgError ();
353			cgGLLoadProgram (vsh);
354			CheckCgError ();
355			mv = cgGetNamedParameter (vsh, "WorldProj");
356			mvp = cgGetNamedParameter (vsh, "WorldViewProj");
357	root	1.30	lightpos = cgGetNamedParameter (vsh, "LightPos");
358	root	1.29	CheckCgError ();
359
360	root	1.39	CGparameter g_Texture; // the texture parameter
361
362
363	root	1.35	fsh = cgCreateProgramFromFile (cgc, CG_SOURCE, "fsh.cg", fsh_profile, 0, 0);
364	root	1.39	Texture t("o.jpg");
365			g_Texture = cgGetNamedParameter(fsh, "Texture"); // the texture cg-warper ;)
366			cgGLSetTextureParameter(g_Texture, t.texture); // Bind the texture number 999 to g_Texture
367	root	1.30	CheckCgError ();
368	root	1.29	cgGLLoadProgram (fsh);
369	root	1.30	CheckCgError ();
370	root	1.29
371			cgGLBindProgram (vsh);
372	root	1.30	CheckCgError ();
373	root	1.29	cgGLBindProgram (fsh);
374	root	1.30	CheckCgError ();
375	root	1.1
376			/* Loop until done. */
377			start_time = SDL_GetTicks ();
378			frames = 0;
379	root	1.16
380	root	1.1	while (!done)
381			{
382			char *sdl_error;
383			SDL_Event event;
384
385	root	1.38	camera.p.x += camera_velocity_factor * camera_velocity.x * timer.diff;
386			camera.p.y += camera_velocity_factor * camera_velocity.y * timer.diff;
387			camera.p.z += camera_velocity_factor * camera_velocity.z * timer.diff;
388
389			camera_angle += camera_velocity_factor * camera_velocity_angle * timer.diff;
390			camera.d.z = -cos (camera_angle * 12 / 180.);
391			camera.d.x = sin (camera_angle * 12 / 180.);
392	root	1.18
393	root	1.30	cgGLSetParameter4f (lightpos, camera.p.x, camera.p.y, camera.p.z, 1);
394	root	1.39
395			glBindTexture (GL_TEXTURE_2D, t.texture);
396	root	1.40	cgGLEnableTextureParameter (g_Texture); // Enable the texture parameter
397	root	1.6
398	root	1.5	#if 0
399	root	1.3	static GLfloat ry;
400	root	1.13	ry += 0.001;
401			camera.d.x = cos (ry);
402			camera.d.z = sin (ry);
403			//camera.d.y = sin (ry * 0.1);
404	root	1.5	#endif
405	root	1.1
406	root	1.34	camera.begin ();
407			camera.pass (view::DEPTH);
408			camera.pass (view::LIGHTED);
409			camera.end ();
410	root	1.1
411			SDL_GL_SwapBuffers ();
412	root	1.15	timer.frame ();
413	root	1.1
414			/* Check for error conditions. */
415			gl_error = glGetError ();
416
417	root	1.45	if (gl_error != GL_NO_ERROR) fprintf (stderr, "testgl: OpenGL error: %d\n", gl_error);
418	root	1.1
419			sdl_error = SDL_GetError ();
420
421			if (sdl_error[0] != '\0')
422			{
423			fprintf (stderr, "testgl: SDL error '%s'\n", sdl_error);
424			SDL_ClearError ();
425			}
426
427			/* Allow the user to see what's happening */
428	root	1.9	//SDL_Delay (20);
429	root	1.1
430			/* Check if there's a pending event. */
431			while (SDL_PollEvent (&event))
432	root	1.18	done = HandleEvent (&event);
433	root	1.20
434	root	1.18
435	root	1.1	++frames;
436			}
437
438			/* Print out the frames per second */
439			this_time = SDL_GetTicks ();
440			if (this_time != start_time)
441			{
442			printf ("%2.2f FPS\n",
443			((float) frames / (this_time - start_time)) * 1000.0);
444			}
445
446			if (global_image)
447			{
448			SDL_FreeSurface (global_image);
449			global_image = NULL;
450			}
451			if (global_texture)
452			{
453			glDeleteTextures (1, &global_texture);
454			global_texture = 0;
455			}
456
457			/* Destroy our GL context, etc. */
458			SDL_Quit ();
459			return (0);
460			}
461
462			int
463			main (int argc, char *argv[])
464			{
465			int i, logo;
466			int numtests;
467			int bpp = 0;
468			int slowly;
469			float gamma = 0.0;
470			int noframe = 0;
471			int fsaa = 0;
472	root	1.4
473	root	1.1	logo = 0;
474			slowly = 0;
475			numtests = 1;
476			for (i = 1; argv[i]; ++i)
477			{
478			if (strcmp (argv[i], "-twice") == 0)
479			{
480			++numtests;
481			}
482			if (strcmp (argv[i], "-slow") == 0)
483			{
484			slowly = 1;
485			}
486			if (strcmp (argv[i], "-bpp") == 0)
487			{
488			bpp = atoi (argv[++i]);
489			}
490			if (strcmp (argv[i], "-gamma") == 0)
491			{
492			gamma = (float) atof (argv[++i]);
493			}
494			if (strcmp (argv[i], "-noframe") == 0)
495			{
496			noframe = 1;
497			}
498			if (strcmp (argv[i], "-fsaa") == 0)
499			{
500			++fsaa;
501			}
502			if (strncmp (argv[i], "-h", 2) == 0)
503			{
504			printf
505			("Usage: %s [-twice] [-logo] [-slow] [-bpp n] [-gamma n] [-noframe] [-fsaa]\n",
506			argv[0]);
507			exit (0);
508			}
509			}
510	root	1.17
511	root	1.1	for (i = 0; i < numtests; ++i)
512	root	1.17	RunGLTest (argc, argv, logo, slowly, bpp, gamma, noframe, fsaa);
513
514	root	1.1	return 0;
515			}