libgender/test.C

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <math.h>
#include <sh/sh.hpp>

using namespace SH;

#include "SDL.h"

#include "SDL_opengl.h"

/* Undefine this if you want a flat cube instead of a rainbow cube */
#define SHADED_CUBE

/* Define this to be the name of the logo image to use with -logo */
#define LOGO_FILE       "icon.bmp"

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

#include "entity.h"

#include "txtprt_import.h"

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

view camera;
vec3 camera_velocity;
float  camera_velocity_factor = 10;

ShMatrix4x4f mvp, mv;
ShPoint3f light_pv;
ShProgram vsh, fsh;

void 
init_shaders() {
   {
   vsh = SH_BEGIN_PROGRAM("gpu:vertex") 
      ShInputNormal3f normal;
                           ShInputPosition4f p;

                           ShOutputPoint4f ov;
                           ShOutputNormal3f on;
                           ShOutputVector3f lvv;
                           ShOutputPosition4f opd;

                           opd = mvp | p;
                           on = normalize(mv | normal);
                           ov = -normalize(mv | p);
                           lvv = normalize(lightPos - (mv | p)(0,1,2));
   SH_END;
   }
   // declare and initialize diffuse color
   ShColor3f kd = ShColor3f(0.5, 0.7, 0.9);
   {
   fsh = SH_BEGIN_PROGRAM("gpu:fragment") 
      ShInputVector4f v;
   ShInputNormal3f n;
   ShInputVector3f lvv;
   ShInputPosition4f p;

   ShOutputColor3f out;
   out(0,1,2) = Globals::color * dot(normalize(n), normalize(lvv));


   SH_END;
   }
}
                                              

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;

#define VELOCITY 10
    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_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--;
      break;

    case SDL_QUIT:
      done = 1;
      break;
    }

  return (done);
}

/* Quick utility function for texture creation */
static int
power_of_two (int input)
{
  int value = 1;

  while (value < input)
    {
      value <<= 1;
    }
  return value;
}

GLuint
SDL_GL_LoadTexture (SDL_Surface * surface, GLfloat * texcoord)
{
  GLuint texture;
  int w, h;
  SDL_Surface *image;
  SDL_Rect area;
  Uint32 saved_flags;
  Uint8 saved_alpha;

  /* Use the surface width and height expanded to powers of 2 */
  w = power_of_two (surface->w);
  h = power_of_two (surface->h);
  texcoord[0] = 0.0f;           /* Min X */
  texcoord[1] = 0.0f;           /* Min Y */
  texcoord[2] = (GLfloat) surface->w / w;       /* Max X */
  texcoord[3] = (GLfloat) surface->h / h;       /* Max Y */

  image = SDL_CreateRGBSurface (SDL_SWSURFACE, w, h, 32,
#if SDL_BYTEORDER == SDL_LIL_ENDIAN     /* OpenGL RGBA masks */
                                0x000000FF, 0x0000FF00, 0x00FF0000, 0xFF000000
#else
                                0xFF000000, 0x00FF0000, 0x0000FF00, 0x000000FF
#endif
    );
  if (image == NULL)
    {
      return 0;
    }

  /* Save the alpha blending attributes */
  saved_flags = surface->flags & (SDL_SRCALPHA | SDL_RLEACCELOK);
  saved_alpha = surface->format->alpha;
  if ((saved_flags & SDL_SRCALPHA) == SDL_SRCALPHA)
    {
      SDL_SetAlpha (surface, 0, 0);
    }

  /* Copy the surface into the GL texture image */
  area.x = 0;
  area.y = 0;
  area.w = surface->w;
  area.h = surface->h;
  SDL_BlitSurface (surface, &area, image, &area);

  /* Restore the alpha blending attributes */
  if ((saved_flags & SDL_SRCALPHA) == SDL_SRCALPHA)
    {
      SDL_SetAlpha (surface, saved_flags, saved_alpha);
    }

  /* Create an OpenGL texture for the image */
  glGenTextures (1, &texture);
  glBindTexture (GL_TEXTURE_2D, texture);
  glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
  glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
  glTexImage2D (GL_TEXTURE_2D,
                0,
                GL_RGBA, w, h, 0, GL_RGBA, GL_UNSIGNED_BYTE, image->pixels);
  SDL_FreeSurface (image);      /* No longer needed */

  return texture;
}

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;

  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);

  // load a entity
  for (int i = 0; i < 7; i++)
    {
      txtprt_parser p;
      entity_transform *f = new entity_transform;
      entity *e;
      try
      {
        e = p.read ("test.blasc");
      } catch (txtprt_i_exception & e)
      {
        cout << "ERR: " << e.msg << endl;
      }
      f->set (e);
      f->update (gl_matrix::translation (vec3 (0, -1, -i*5)));
      f->show ();
    }

  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 = 90;

  glMatrixMode (GL_MODELVIEW);
  glLoadIdentity ();

  glEnable (GL_CULL_FACE);
  glEnable (GL_DEPTH_TEST);
  shInit();
  shSetBackend("arb");
  glEnable(GL_VERTEX_PROGRAM_ARB);
  glEnable(GL_FRAGMENT_PROGRAM_ARB);

  init_shaders();
  shBind(vsh);
  shBind(fsh);
  glShadeModel (GL_SMOOTH);

  glEnable (GL_LIGHTING);
  //GLfloat lightc[4] = { 1, 0.1, 0.1, 1 };
  //glLightf (GL_LIGHT0, GL_QUADRATIC_ATTENUATION);
  //glLightfv (GL_LIGHT0, GL_DIFFUSE, lightc);
  glEnable (GL_LIGHT0);

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

  draw_context c (camera);

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

      glClear (GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);

      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;

      GLfloat lightp[4];
      lightp[0] = camera.p.x;
      lightp[1] = camera.p.y;
      lightp[2] = camera.p.z;
      lightp[3] = 1;
      glLightfv (GL_LIGHT0, GL_POSITION, lightp);

#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

      c.mode = draw_context::DEPTH;  
      camera.draw (c);
      c.mode = draw_context::LIGHTED;
      camera.draw (c);

      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.22
Committed:	Tue Oct 5 02:14:06 2004 UTC (19 years, 8 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.21:	+51 -0 lines
Log Message:	sh4d3rz
#	User	Rev	Content
1	root	1.1	#include <stdlib.h>
2			#include <stdio.h>
3			#include <string.h>
4			#include <math.h>
5	root	1.22	#include <sh/sh.hpp>
6
7			using namespace SH;
8	root	1.1
9			#include "SDL.h"
10
11			#include "SDL_opengl.h"
12
13			/* Undefine this if you want a flat cube instead of a rainbow cube */
14			#define SHADED_CUBE
15
16			/* Define this to be the name of the logo image to use with -logo */
17			#define LOGO_FILE "icon.bmp"
18
19			static SDL_Surface *global_image = NULL;
20			static GLuint global_texture = 0;
21
22	root	1.2	#include "entity.h"
23
24	root	1.4	#include "txtprt_import.h"
25
26	root	1.1	/**********************************************************************/
27
28	root	1.6	view camera;
29	root	1.18	vec3 camera_velocity;
30	root	1.20	float camera_velocity_factor = 10;
31	root	1.6
32	root	1.22	ShMatrix4x4f mvp, mv;
33			ShPoint3f light_pv;
34			ShProgram vsh, fsh;
35
36			void
37			init_shaders() {
38			{
39			vsh = SH_BEGIN_PROGRAM("gpu:vertex")
40			ShInputNormal3f normal;
41			ShInputPosition4f p;
42
43			ShOutputPoint4f ov;
44			ShOutputNormal3f on;
45			ShOutputVector3f lvv;
46			ShOutputPosition4f opd;
47
48			opd = mvp \| p;
49			on = normalize(mv \| normal);
50			ov = -normalize(mv \| p);
51			lvv = normalize(lightPos - (mv \| p)(0,1,2));
52			SH_END;
53			}
54			// declare and initialize diffuse color
55			ShColor3f kd = ShColor3f(0.5, 0.7, 0.9);
56			{
57			fsh = SH_BEGIN_PROGRAM("gpu:fragment")
58			ShInputVector4f v;
59			ShInputNormal3f n;
60			ShInputVector3f lvv;
61			ShInputPosition4f p;
62
63			ShOutputColor3f out;
64			out(0,1,2) = Globals::color * dot(normalize(n), normalize(lvv));
65
66
67			SH_END;
68			}
69			}
70
71
72	root	1.1	void
73			HotKey_ToggleFullScreen (void)
74			{
75			SDL_Surface *screen;
76
77			screen = SDL_GetVideoSurface ();
78			if (SDL_WM_ToggleFullScreen (screen))
79	root	1.5	printf ("Toggled fullscreen mode - now %s\n",
80			(screen->flags & SDL_FULLSCREEN) ? "fullscreen" : "windowed");
81	root	1.1	else
82	root	1.5	printf ("Unable to toggle fullscreen mode\n");
83	root	1.1	}
84
85			void
86			HotKey_ToggleGrab (void)
87			{
88			SDL_GrabMode mode;
89
90			printf ("Ctrl-G: toggling input grab!\n");
91			mode = SDL_WM_GrabInput (SDL_GRAB_QUERY);
92			if (mode == SDL_GRAB_ON)
93	root	1.5	printf ("Grab was on\n");
94	root	1.1	else
95	root	1.5	printf ("Grab was off\n");
96	root	1.1
97			mode = SDL_WM_GrabInput (mode ? SDL_GRAB_OFF : SDL_GRAB_ON);
98			if (mode == SDL_GRAB_ON)
99	root	1.5	printf ("Grab is now on\n");
100	root	1.1	else
101	root	1.5	printf ("Grab is now off\n");
102	root	1.1	}
103
104			void
105			HotKey_Iconify (void)
106			{
107			printf ("Ctrl-Z: iconifying window!\n");
108			SDL_WM_IconifyWindow ();
109			}
110
111			int
112			HandleEvent (SDL_Event * event)
113			{
114			int done;
115
116			done = 0;
117			switch (event->type)
118			{
119			case SDL_ACTIVEEVENT:
120			/* See what happened */
121			printf ("app %s ", event->active.gain ? "gained" : "lost");
122			if (event->active.state & SDL_APPACTIVE)
123			{
124			printf ("active ");
125			}
126			else if (event->active.state & SDL_APPMOUSEFOCUS)
127			{
128			printf ("mouse ");
129			}
130			else if (event->active.state & SDL_APPINPUTFOCUS)
131			{
132			printf ("input ");
133			}
134
135			printf ("focus\n");
136			break;
137
138	root	1.18	#define VELOCITY 10
139	root	1.1	case SDL_KEYDOWN:
140	root	1.19	if (event->key.keysym.sym == SDLK_UP) camera_velocity.z--;
141			if (event->key.keysym.sym == SDLK_DOWN) camera_velocity.z++;
142			if (event->key.keysym.sym == SDLK_LEFT) camera_velocity.x--;
143			if (event->key.keysym.sym == SDLK_RIGHT) camera_velocity.x++;
144			if (event->key.keysym.sym == SDLK_a) camera_velocity.y--;
145			if (event->key.keysym.sym == SDLK_s) camera_velocity.y++;
146			if (event->key.keysym.sym == SDLK_v) camera_velocity_factor *= 1.5;
147			if (event->key.keysym.sym == SDLK_b) camera_velocity_factor /= 1.5;
148	root	1.6
149	root	1.1	if (event->key.keysym.sym == SDLK_ESCAPE)
150	root	1.6	done = 1;
151	root	1.1
152			if ((event->key.keysym.sym == SDLK_g) &&
153			(event->key.keysym.mod & KMOD_CTRL))
154	root	1.6	HotKey_ToggleGrab ();
155	root	1.1
156			if ((event->key.keysym.sym == SDLK_z) &&
157			(event->key.keysym.mod & KMOD_CTRL))
158	root	1.6	HotKey_Iconify ();
159	root	1.1
160			if ((event->key.keysym.sym == SDLK_RETURN) &&
161			(event->key.keysym.mod & KMOD_ALT))
162	root	1.6	HotKey_ToggleFullScreen ();
163	root	1.1
164			break;
165
166	root	1.18	case SDL_KEYUP:
167	root	1.19	if (event->key.keysym.sym == SDLK_UP) camera_velocity.z++;
168			if (event->key.keysym.sym == SDLK_DOWN) camera_velocity.z--;
169			if (event->key.keysym.sym == SDLK_LEFT) camera_velocity.x++;
170			if (event->key.keysym.sym == SDLK_RIGHT) camera_velocity.x--;
171			if (event->key.keysym.sym == SDLK_a) camera_velocity.y++;
172			if (event->key.keysym.sym == SDLK_s) camera_velocity.y--;
173	root	1.18	break;
174
175	root	1.1	case SDL_QUIT:
176			done = 1;
177			break;
178			}
179
180			return (done);
181			}
182
183			/* Quick utility function for texture creation */
184			static int
185			power_of_two (int input)
186			{
187			int value = 1;
188
189			while (value < input)
190			{
191			value <<= 1;
192			}
193			return value;
194			}
195
196			GLuint
197			SDL_GL_LoadTexture (SDL_Surface * surface, GLfloat * texcoord)
198			{
199			GLuint texture;
200			int w, h;
201			SDL_Surface *image;
202			SDL_Rect area;
203			Uint32 saved_flags;
204			Uint8 saved_alpha;
205
206			/* Use the surface width and height expanded to powers of 2 */
207			w = power_of_two (surface->w);
208			h = power_of_two (surface->h);
209			texcoord[0] = 0.0f; /* Min X */
210			texcoord[1] = 0.0f; /* Min Y */
211			texcoord[2] = (GLfloat) surface->w / w; /* Max X */
212			texcoord[3] = (GLfloat) surface->h / h; /* Max Y */
213
214			image = SDL_CreateRGBSurface (SDL_SWSURFACE, w, h, 32,
215			#if SDL_BYTEORDER == SDL_LIL_ENDIAN /* OpenGL RGBA masks */
216			0x000000FF, 0x0000FF00, 0x00FF0000, 0xFF000000
217			#else
218			0xFF000000, 0x00FF0000, 0x0000FF00, 0x000000FF
219			#endif
220			);
221			if (image == NULL)
222			{
223			return 0;
224			}
225
226			/* Save the alpha blending attributes */
227			saved_flags = surface->flags & (SDL_SRCALPHA \| SDL_RLEACCELOK);
228			saved_alpha = surface->format->alpha;
229			if ((saved_flags & SDL_SRCALPHA) == SDL_SRCALPHA)
230			{
231			SDL_SetAlpha (surface, 0, 0);
232			}
233
234			/* Copy the surface into the GL texture image */
235			area.x = 0;
236			area.y = 0;
237			area.w = surface->w;
238			area.h = surface->h;
239			SDL_BlitSurface (surface, &area, image, &area);
240
241			/* Restore the alpha blending attributes */
242			if ((saved_flags & SDL_SRCALPHA) == SDL_SRCALPHA)
243			{
244			SDL_SetAlpha (surface, saved_flags, saved_alpha);
245			}
246
247			/* Create an OpenGL texture for the image */
248			glGenTextures (1, &texture);
249			glBindTexture (GL_TEXTURE_2D, texture);
250			glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
251			glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
252			glTexImage2D (GL_TEXTURE_2D,
253			0,
254			GL_RGBA, w, h, 0, GL_RGBA, GL_UNSIGNED_BYTE, image->pixels);
255			SDL_FreeSurface (image); /* No longer needed */
256
257			return texture;
258			}
259
260			int
261			RunGLTest (int argc, char *argv[],
262			int logo, int slowly, int bpp, float gamma, int noframe, int fsaa)
263			{
264			int i;
265			int rgb_size[3];
266			int w = 640;
267			int h = 480;
268			int done = 0;
269			int frames;
270			Uint32 start_time, this_time;
271	root	1.2	Uint32 video_flags;
272	root	1.1	int value;
273
274			if (SDL_Init (SDL_INIT_VIDEO) < 0)
275			{
276			fprintf (stderr, "Couldn't initialize SDL: %s\n", SDL_GetError ());
277			exit (1);
278			}
279
280			/* See if we should detect the display depth */
281			if (bpp == 0)
282			{
283			if (SDL_GetVideoInfo ()->vfmt->BitsPerPixel <= 8)
284	root	1.3	bpp = 8;
285	root	1.1	else
286	root	1.3	bpp = 16; /* More doesn't seem to work */
287	root	1.1	}
288
289	root	1.2	video_flags = SDL_OPENGL;
290
291	root	1.1	for (i = 1; argv[i]; ++i)
292	root	1.3	if (strcmp (argv[1], "-fullscreen") == 0)
293			video_flags \|= SDL_FULLSCREEN;
294	root	1.1
295			if (noframe)
296	root	1.3	video_flags \|= SDL_NOFRAME;
297	root	1.1
298			/* Initialize the display */
299			switch (bpp)
300			{
301			case 8:
302			rgb_size[0] = 3;
303			rgb_size[1] = 3;
304			rgb_size[2] = 2;
305			break;
306	root	1.3
307	root	1.1	case 15:
308			case 16:
309			rgb_size[0] = 5;
310			rgb_size[1] = 5;
311			rgb_size[2] = 5;
312			break;
313	root	1.3
314	root	1.1	default:
315			rgb_size[0] = 8;
316			rgb_size[1] = 8;
317			rgb_size[2] = 8;
318			break;
319			}
320	root	1.18
321	root	1.1	SDL_GL_SetAttribute (SDL_GL_RED_SIZE, rgb_size[0]);
322			SDL_GL_SetAttribute (SDL_GL_GREEN_SIZE, rgb_size[1]);
323			SDL_GL_SetAttribute (SDL_GL_BLUE_SIZE, rgb_size[2]);
324			SDL_GL_SetAttribute (SDL_GL_DEPTH_SIZE, 16);
325			SDL_GL_SetAttribute (SDL_GL_DOUBLEBUFFER, 1);
326	root	1.3
327	root	1.1	if (fsaa)
328			{
329			SDL_GL_SetAttribute (SDL_GL_MULTISAMPLEBUFFERS, 1);
330			SDL_GL_SetAttribute (SDL_GL_MULTISAMPLESAMPLES, fsaa);
331			}
332	root	1.3
333	root	1.1	if (SDL_SetVideoMode (w, h, bpp, video_flags) == NULL)
334			{
335			fprintf (stderr, "Couldn't set GL mode: %s\n", SDL_GetError ());
336			SDL_Quit ();
337			exit (1);
338			}
339
340			printf ("Screen BPP: %d\n", SDL_GetVideoSurface ()->format->BitsPerPixel);
341			printf ("\n");
342			printf ("Vendor : %s\n", glGetString (GL_VENDOR));
343			printf ("Renderer : %s\n", glGetString (GL_RENDERER));
344			printf ("Version : %s\n", glGetString (GL_VERSION));
345			printf ("Extensions : %s\n", glGetString (GL_EXTENSIONS));
346			printf ("\n");
347
348			SDL_GL_GetAttribute (SDL_GL_RED_SIZE, &value);
349			printf ("SDL_GL_RED_SIZE: requested %d, got %d\n", rgb_size[0], value);
350			SDL_GL_GetAttribute (SDL_GL_GREEN_SIZE, &value);
351			printf ("SDL_GL_GREEN_SIZE: requested %d, got %d\n", rgb_size[1], value);
352			SDL_GL_GetAttribute (SDL_GL_BLUE_SIZE, &value);
353			printf ("SDL_GL_BLUE_SIZE: requested %d, got %d\n", rgb_size[2], value);
354			SDL_GL_GetAttribute (SDL_GL_DEPTH_SIZE, &value);
355			printf ("SDL_GL_DEPTH_SIZE: requested %d, got %d\n", bpp, value);
356			SDL_GL_GetAttribute (SDL_GL_DOUBLEBUFFER, &value);
357			printf ("SDL_GL_DOUBLEBUFFER: requested 1, got %d\n", value);
358	root	1.3
359	root	1.1	if (fsaa)
360			{
361			SDL_GL_GetAttribute (SDL_GL_MULTISAMPLEBUFFERS, &value);
362			printf ("SDL_GL_MULTISAMPLEBUFFERS: requested 1, got %d\n", value);
363			SDL_GL_GetAttribute (SDL_GL_MULTISAMPLESAMPLES, &value);
364			printf ("SDL_GL_MULTISAMPLESAMPLES: requested %d, got %d\n", fsaa,
365			value);
366			}
367
368			/* Set the window manager title bar */
369	root	1.12	SDL_WM_SetCaption ("libgender rendering test", "gendertest");
370	root	1.1
371			/* Set the gamma for the window */
372			if (gamma != 0.0)
373	root	1.3	SDL_SetGamma (gamma, gamma, gamma);
374	root	1.1
375	root	1.17	// load a entity
376			for (int i = 0; i < 7; i++)
377			{
378			txtprt_parser p;
379	root	1.18	entity_transform *f = new entity_transform;
380	root	1.17	entity *e;
381			try
382			{
383			e = p.read ("test.blasc");
384			} catch (txtprt_i_exception & e)
385			{
386			cout << "ERR: " << e.msg << endl;
387			}
388			f->set (e);
389	root	1.21	f->update (gl_matrix::translation (vec3 (0, -1, -i*5)));
390	root	1.17	f->show ();
391			}
392
393	root	1.13	camera.orig.x = camera.orig.y = camera.orig.z = 0;
394	root	1.6	camera.p = point (0, 0, 10);
395			camera.d = vec3 (0, 0, -1);
396			camera.u = vec3 (0, 1, 0);
397			camera.w = w; camera.h = h;
398			camera.fov = 90;
399	root	1.1
400			glMatrixMode (GL_MODELVIEW);
401			glLoadIdentity ();
402
403	root	1.16	glEnable (GL_CULL_FACE);
404	root	1.1	glEnable (GL_DEPTH_TEST);
405	root	1.22	shInit();
406			shSetBackend("arb");
407			glEnable(GL_VERTEX_PROGRAM_ARB);
408			glEnable(GL_FRAGMENT_PROGRAM_ARB);
409
410			init_shaders();
411			shBind(vsh);
412			shBind(fsh);
413	root	1.11	glShadeModel (GL_SMOOTH);
414	root	1.6
415	root	1.3	glEnable (GL_LIGHTING);
416	root	1.9	//GLfloat lightc[4] = { 1, 0.1, 0.1, 1 };
417	root	1.6	//glLightf (GL_LIGHT0, GL_QUADRATIC_ATTENUATION);
418	root	1.9	//glLightfv (GL_LIGHT0, GL_DIFFUSE, lightc);
419	root	1.6	glEnable (GL_LIGHT0);
420	root	1.1
421			/* Loop until done. */
422			start_time = SDL_GetTicks ();
423			frames = 0;
424	root	1.16
425			draw_context c (camera);
426
427	root	1.1	while (!done)
428			{
429			GLenum gl_error;
430			char *sdl_error;
431			SDL_Event event;
432
433			glClear (GL_COLOR_BUFFER_BIT \| GL_DEPTH_BUFFER_BIT);
434
435	root	1.19	camera.p.x += (camera_velocity_factor * camera_velocity.x) * timer.diff;
436			camera.p.y += (camera_velocity_factor * camera_velocity.y) * timer.diff;
437			camera.p.z += (camera_velocity_factor * camera_velocity.z) * timer.diff;
438	root	1.18
439	root	1.6	GLfloat lightp[4];
440			lightp[0] = camera.p.x;
441			lightp[1] = camera.p.y;
442			lightp[2] = camera.p.z;
443			lightp[3] = 1;
444			glLightfv (GL_LIGHT0, GL_POSITION, lightp);
445
446	root	1.5	#if 0
447	root	1.3	static GLfloat ry;
448	root	1.13	ry += 0.001;
449			camera.d.x = cos (ry);
450			camera.d.z = sin (ry);
451			//camera.d.y = sin (ry * 0.1);
452	root	1.5	#endif
453	root	1.1
454	root	1.16	c.mode = draw_context::DEPTH;
455			camera.draw (c);
456	root	1.9	c.mode = draw_context::LIGHTED;
457	root	1.6	camera.draw (c);
458	root	1.1
459			SDL_GL_SwapBuffers ();
460	root	1.15	timer.frame ();
461	root	1.1
462			/* Check for error conditions. */
463			gl_error = glGetError ();
464
465			if (gl_error != GL_NO_ERROR)
466	root	1.3	fprintf (stderr, "testgl: OpenGL error: %d\n", gl_error);
467	root	1.1
468			sdl_error = SDL_GetError ();
469
470			if (sdl_error[0] != '\0')
471			{
472			fprintf (stderr, "testgl: SDL error '%s'\n", sdl_error);
473			SDL_ClearError ();
474			}
475
476			/* Allow the user to see what's happening */
477	root	1.9	//SDL_Delay (20);
478	root	1.1
479			/* Check if there's a pending event. */
480			while (SDL_PollEvent (&event))
481	root	1.18	done = HandleEvent (&event);
482	root	1.20
483	root	1.18
484	root	1.1	++frames;
485			}
486
487			/* Print out the frames per second */
488			this_time = SDL_GetTicks ();
489			if (this_time != start_time)
490			{
491			printf ("%2.2f FPS\n",
492			((float) frames / (this_time - start_time)) * 1000.0);
493			}
494
495			if (global_image)
496			{
497			SDL_FreeSurface (global_image);
498			global_image = NULL;
499			}
500			if (global_texture)
501			{
502			glDeleteTextures (1, &global_texture);
503			global_texture = 0;
504			}
505
506			/* Destroy our GL context, etc. */
507			SDL_Quit ();
508			return (0);
509			}
510
511			int
512			main (int argc, char *argv[])
513			{
514			int i, logo;
515			int numtests;
516			int bpp = 0;
517			int slowly;
518			float gamma = 0.0;
519			int noframe = 0;
520			int fsaa = 0;
521	root	1.4
522	root	1.1	logo = 0;
523			slowly = 0;
524			numtests = 1;
525			for (i = 1; argv[i]; ++i)
526			{
527			if (strcmp (argv[i], "-twice") == 0)
528			{
529			++numtests;
530			}
531			if (strcmp (argv[i], "-slow") == 0)
532			{
533			slowly = 1;
534			}
535			if (strcmp (argv[i], "-bpp") == 0)
536			{
537			bpp = atoi (argv[++i]);
538			}
539			if (strcmp (argv[i], "-gamma") == 0)
540			{
541			gamma = (float) atof (argv[++i]);
542			}
543			if (strcmp (argv[i], "-noframe") == 0)
544			{
545			noframe = 1;
546			}
547			if (strcmp (argv[i], "-fsaa") == 0)
548			{
549			++fsaa;
550			}
551			if (strncmp (argv[i], "-h", 2) == 0)
552			{
553			printf
554			("Usage: %s [-twice] [-logo] [-slow] [-bpp n] [-gamma n] [-noframe] [-fsaa]\n",
555			argv[0]);
556			exit (0);
557			}
558			}
559	root	1.17
560	root	1.1	for (i = 0; i < numtests; ++i)
561	root	1.17	RunGLTest (argc, argv, logo, slowly, bpp, gamma, noframe, fsaa);
562
563	root	1.1	return 0;
564			}