libgender/material.C

#include <cstdlib>
#include <cstring>

#include <algorithm>

#include "opengl.h"
#include "material.h"
#include "view.h"
#include "util.h"

material::~material ()
{
}

void
simple_material::enable (view &ctx)
{
  glMaterialfv (GL_FRONT, GL_DIFFUSE, (GLfloat *) & diffuse);
  glMaterialfv (GL_FRONT, GL_SPECULAR, (GLfloat *) & specular);
  glMaterialfv (GL_FRONT, GL_EMISSION, (GLfloat *) & emission);
  glMaterialf (GL_FRONT, GL_SHININESS, shininess);
}

void
simple_material::disable (view &ctx)
{
}

GLuint
texture::load_texture (SDL_Surface * surface, GLfloat * tex2oord)
{
  GLuint name;
  SDL_Surface *image;
  SDL_Rect area;
  Uint32 saved_flags;
  Uint8 saved_alpha;

  /* Use the surface width and height expanded to powers of 2 */
  tex2oord[0] = 0.F;    /* Min X */
  tex2oord[1] = 0.F;    /* Min Y */
  tex2oord[2] = 1.F;    /* Max X */
  tex2oord[3] = 1.F;    /* Max Y */

  image = SDL_CreateRGBSurface (SDL_SWSURFACE, surface->w, surface->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, &name);
  glBindTexture (GL_TEXTURE_2D, name);
  glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
  glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR_MIPMAP_LINEAR);
  glTexParameteri (GL_TEXTURE_2D, GL_GENERATE_MIPMAP, GL_TRUE);
  glTexImage2D (GL_TEXTURE_2D,
                0,
                GL_RGBA, surface->w, surface->h, 0, GL_RGBA, GL_UNSIGNED_BYTE, image->pixels);
  SDL_FreeSurface (image);      /* No longer needed */

  return name;
}

test_material::test_material ()
: tex ("textures/osama.jpg"), texvar (tex.name)
{
  using namespace shader::compile;

  p.vsh->start ();

  temp_4f wpos;
  
  wpos = model_view_projection_matrix * vin.vertex;

  wpos = wpos / abs (w (wpos));

  vout.position = wpos;
  vout.tex_coord[0] = vin.tex_coord[0];
  vout.tex_coord[1] = model_view_matrix * shader::compile::vec4 (x(vin.normal), y(vin.normal), z(vin.normal), 0);
  vout.tex_coord[2] = lightpos - model_view_matrix * vin.vertex;

  p.vsh->end ();
  p.vsh->compile ();

  p.fsh->start ();

  temp_1f fac;
  
  fac = max (dot (normalize (fin.tex_coord[1]), normalize (fin.tex_coord[2])), 0.0);
  fac = pow (fac, 0.7);
  xyz (fout.frag_color) = texture_2d (texvar, fin.tex_coord[0]) * max (fac, 0.4);

  p.fsh->end ();
  p.fsh->compile ();
  p.link ();
}

void test_material::enable (view &ctx)
{
  p.enable ();
  lightpos->set (vec3 (0, 0, 0));
  texvar->enable ();
}

void test_material::disable (view &ctx)
{
  texvar->disable ();
  p.disable ();
}

Revision:	1.22
Committed:	Sat Oct 30 16:40:02 2004 UTC (21 years, 10 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.21:	+3 -1 lines
Log Message:	* empty log message *
#	User	Rev	Content
1	root	1.8	#include <cstdlib>
2			#include <cstring>
3
4	root	1.9	#include <algorithm>
5
6	root	1.13	#include "opengl.h"
7			#include "material.h"
8	root	1.18	#include "view.h"
9	root	1.13	#include "util.h"
10
11	root	1.1	material::~material ()
12			{
13			}
14
15	root	1.6	void
16	root	1.18	simple_material::enable (view &ctx)
17	root	1.1	{
18	root	1.6	glMaterialfv (GL_FRONT, GL_DIFFUSE, (GLfloat *) & diffuse);
19			glMaterialfv (GL_FRONT, GL_SPECULAR, (GLfloat *) & specular);
20			glMaterialfv (GL_FRONT, GL_EMISSION, (GLfloat *) & emission);
21			glMaterialf (GL_FRONT, GL_SHININESS, shininess);
22	root	1.1	}
23
24	root	1.6	void
25	root	1.18	simple_material::disable (view &ctx)
26	root	1.1	{
27			}
28	root	1.6
29			GLuint
30			texture::load_texture (SDL_Surface * surface, GLfloat * tex2oord)
31	root	1.3	{
32	root	1.15	GLuint name;
33	root	1.3	SDL_Surface *image;
34			SDL_Rect area;
35			Uint32 saved_flags;
36			Uint8 saved_alpha;
37
38			/* Use the surface width and height expanded to powers of 2 */
39	root	1.19	tex2oord[0] = 0.F; /* Min X */
40			tex2oord[1] = 0.F; /* Min Y */
41			tex2oord[2] = 1.F; /* Max X */
42			tex2oord[3] = 1.F; /* Max Y */
43	root	1.3
44	root	1.19	image = SDL_CreateRGBSurface (SDL_SWSURFACE, surface->w, surface->h, 32,
45	root	1.3	#if SDL_BYTEORDER == SDL_LIL_ENDIAN /* OpenGL RGBA masks */
46			0x000000FF, 0x0000FF00, 0x00FF0000, 0xFF000000
47			#else
48			0xFF000000, 0x00FF0000, 0x0000FF00, 0x000000FF
49			#endif
50			);
51	root	1.6
52	root	1.3	if (image == NULL)
53	root	1.6	return 0;
54	root	1.3
55			/* Save the alpha blending attributes */
56			saved_flags = surface->flags & (SDL_SRCALPHA \| SDL_RLEACCELOK);
57			saved_alpha = surface->format->alpha;
58			if ((saved_flags & SDL_SRCALPHA) == SDL_SRCALPHA)
59	root	1.6	SDL_SetAlpha (surface, 0, 0);
60	root	1.3
61			/* Copy the surface into the GL texture image */
62			area.x = 0;
63			area.y = 0;
64			area.w = surface->w;
65			area.h = surface->h;
66			SDL_BlitSurface (surface, &area, image, &area);
67
68			/* Restore the alpha blending attributes */
69			if ((saved_flags & SDL_SRCALPHA) == SDL_SRCALPHA)
70	root	1.6	SDL_SetAlpha (surface, saved_flags, saved_alpha);
71	root	1.3
72			/* Create an OpenGL texture for the image */
73	root	1.15	glGenTextures (1, &name);
74			glBindTexture (GL_TEXTURE_2D, name);
75	root	1.6	glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
76			glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR_MIPMAP_LINEAR);
77	root	1.15	glTexParameteri (GL_TEXTURE_2D, GL_GENERATE_MIPMAP, GL_TRUE);
78	root	1.3	glTexImage2D (GL_TEXTURE_2D,
79			0,
80	root	1.19	GL_RGBA, surface->w, surface->h, 0, GL_RGBA, GL_UNSIGNED_BYTE, image->pixels);
81	root	1.3	SDL_FreeSurface (image); /* No longer needed */
82
83	root	1.15	return name;
84			}
85
86			test_material::test_material ()
87			: tex ("textures/osama.jpg"), texvar (tex.name)
88			{
89	root	1.20	using namespace shader::compile;
90	root	1.15
91			p.vsh->start ();
92
93			temp_4f wpos;
94	root	1.18
95	root	1.20	wpos = model_view_projection_matrix * vin.vertex;
96	root	1.15
97	root	1.22	wpos = wpos / abs (w (wpos));
98
99	root	1.18	vout.position = wpos;
100	root	1.17	vout.tex_coord[0] = vin.tex_coord[0];
101	root	1.20	vout.tex_coord[1] = model_view_matrix * shader::compile::vec4 (x(vin.normal), y(vin.normal), z(vin.normal), 0);
102	root	1.21	vout.tex_coord[2] = lightpos - model_view_matrix * vin.vertex;
103	root	1.15
104			p.vsh->end ();
105			p.vsh->compile ();
106
107			p.fsh->start ();
108
109	root	1.18	temp_1f fac;
110
111	root	1.21	fac = max (dot (normalize (fin.tex_coord[1]), normalize (fin.tex_coord[2])), 0.0);
112	root	1.22	fac = pow (fac, 0.7);
113	root	1.21	xyz (fout.frag_color) = texture_2d (texvar, fin.tex_coord[0]) * max (fac, 0.4);
114	root	1.15
115			p.fsh->end ();
116			p.fsh->compile ();
117			p.link ();
118	root	1.3	}
119
120	root	1.18	void test_material::enable (view &ctx)
121	root	1.15	{
122			p.enable ();
123	root	1.21	lightpos->set (vec3 (0, 0, 0));
124	root	1.15	texvar->enable ();
125			}
126	root	1.3
127	root	1.18	void test_material::disable (view &ctx)
128	root	1.6	{
129	root	1.15	texvar->disable ();
130			p.disable ();
131	root	1.3	}
132	root	1.8