libgender/material.C

#include <cstdlib>
#include <cstring>

#include <algorithm>

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

material::~material ()
{
}

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

void material::enable (view &ctx)
{
  pass::matmap_t &matmap = ctx.pass_data->matmap;

  pass::matmap_t::iterator i = matmap.find (this);
  shader::program_object *p;

  if (i == matmap.end ())
    {
      shader::program_object po;

      shader::shader_builder::start ();
      vsh (ctx);

      if (ctx.pass_data->l)
        ctx.pass_data->l->vsh ();

      po->vsh->compile (shader::shader_builder::stop ());

      shader::shader_builder::start ();
      shader::compile::fout.frag_color = shader::compile::float4 (1., 1., 0., 1.);
      fsh (ctx);
      po->fsh->compile (shader::shader_builder::stop ());

      po->link ();

      matmap.insert (pass::matmap_t::value_type (this, po));

      p = &po;
    }
  else
    p = &i->second;

  (*p)->enable ();
}

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

test_material::test_material ()
//: tex ("textures/osama.jpg"), texvar (tex.name)
: tex ("textures/rockwall.jpg"), texvar (tex.name)
, norm ("textures/rockwall_normal.jpg"), normvar (norm.name)
{
}

static shader::varying_3f normal, lightvec;
static shader::varying_2f texcoord;

void test_material::vsh (view &ctx)
{
  using namespace shader::compile;

  std_vsh ();

  if (ctx.pass_data->l)
    {
      texcoord = xy (vin.tex_coord[0]);
      normal = normal_matrix * vin.normal;
      lightvec = xyz (ctx.pass_data->l->lightpos - model_view_matrix * vin.vertex);
    }
}

void test_material::fsh (view &ctx)
{
  using namespace shader::compile;

  if (ctx.pass_data->l)
    {
      temp_3f lc;
      temp_1f fac;

      lc = (*ctx.pass_data->l)();

      temp_3f rot1, rot2, rot3;

      rot1 = yxz (texture_2d (normvar, texcoord) * 2.F - 1.F);
      rot2 = float3 (x(rot1), z(rot1), -y(rot1));
      rot3 = float3 (y(rot1), -x(rot1), z(rot1));

      normal = mat3 (rot1, rot2, rot3) * normal;

      fac = dot (normalize (normal), normalize (lightvec));
      fac = pow (max (fac, 0.0), 6);
      xyz (fout.frag_color) = (texture_2d (texvar, texcoord) + 0.2F) * lc * fac;
    }
}

void test_material::enable (view &ctx)
{
  material::enable (ctx);
  texvar->enable ();
  normvar->enable ();
}

void test_material::disable (view &ctx)
{
  normvar->disable ();
  texvar->disable ();
  material::disable (ctx);
}

test_material *testmat;

Revision:	1.36
Committed:	Thu Nov 4 04:49:04 2004 UTC (19 years, 7 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.35:	+2 -2 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	GLuint
16			texture::load_texture (SDL_Surface * surface, GLfloat * tex2oord)
17	root	1.3	{
18	root	1.15	GLuint name;
19	root	1.3	SDL_Surface *image;
20			SDL_Rect area;
21			Uint32 saved_flags;
22			Uint8 saved_alpha;
23
24			/* Use the surface width and height expanded to powers of 2 */
25	root	1.19	tex2oord[0] = 0.F; /* Min X */
26			tex2oord[1] = 0.F; /* Min Y */
27			tex2oord[2] = 1.F; /* Max X */
28			tex2oord[3] = 1.F; /* Max Y */
29	root	1.3
30	root	1.19	image = SDL_CreateRGBSurface (SDL_SWSURFACE, surface->w, surface->h, 32,
31	root	1.3	#if SDL_BYTEORDER == SDL_LIL_ENDIAN /* OpenGL RGBA masks */
32			0x000000FF, 0x0000FF00, 0x00FF0000, 0xFF000000
33			#else
34			0xFF000000, 0x00FF0000, 0x0000FF00, 0x000000FF
35			#endif
36			);
37	root	1.6
38	root	1.3	if (image == NULL)
39	root	1.6	return 0;
40	root	1.3
41			/* Save the alpha blending attributes */
42			saved_flags = surface->flags & (SDL_SRCALPHA \| SDL_RLEACCELOK);
43			saved_alpha = surface->format->alpha;
44			if ((saved_flags & SDL_SRCALPHA) == SDL_SRCALPHA)
45	root	1.6	SDL_SetAlpha (surface, 0, 0);
46	root	1.3
47			/* Copy the surface into the GL texture image */
48			area.x = 0;
49			area.y = 0;
50			area.w = surface->w;
51			area.h = surface->h;
52			SDL_BlitSurface (surface, &area, image, &area);
53
54			/* Restore the alpha blending attributes */
55			if ((saved_flags & SDL_SRCALPHA) == SDL_SRCALPHA)
56	root	1.6	SDL_SetAlpha (surface, saved_flags, saved_alpha);
57	root	1.3
58			/* Create an OpenGL texture for the image */
59	root	1.15	glGenTextures (1, &name);
60			glBindTexture (GL_TEXTURE_2D, name);
61	root	1.6	glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
62			glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR_MIPMAP_LINEAR);
63	root	1.15	glTexParameteri (GL_TEXTURE_2D, GL_GENERATE_MIPMAP, GL_TRUE);
64	root	1.3	glTexImage2D (GL_TEXTURE_2D,
65			0,
66	root	1.19	GL_RGBA, surface->w, surface->h, 0, GL_RGBA, GL_UNSIGNED_BYTE, image->pixels);
67	root	1.3	SDL_FreeSurface (image); /* No longer needed */
68
69	root	1.15	return name;
70			}
71
72	root	1.32	void material::enable (view &ctx)
73			{
74			pass::matmap_t &matmap = ctx.pass_data->matmap;
75
76			pass::matmap_t::iterator i = matmap.find (this);
77			shader::program_object *p;
78
79			if (i == matmap.end ())
80			{
81			shader::program_object po;
82
83			shader::shader_builder::start ();
84			vsh (ctx);
85
86			if (ctx.pass_data->l)
87			ctx.pass_data->l->vsh ();
88
89			po->vsh->compile (shader::shader_builder::stop ());
90
91			shader::shader_builder::start ();
92	root	1.33	shader::compile::fout.frag_color = shader::compile::float4 (1., 1., 0., 1.);
93	root	1.32	fsh (ctx);
94			po->fsh->compile (shader::shader_builder::stop ());
95
96			po->link ();
97
98			matmap.insert (pass::matmap_t::value_type (this, po));
99
100			p = &po;
101			}
102			else
103			p = &i->second;
104
105			(*p)->enable ();
106			}
107
108			void material::disable (view &ctx)
109			{
110			}
111
112	root	1.15	test_material::test_material ()
113	root	1.23	//: tex ("textures/osama.jpg"), texvar (tex.name)
114	root	1.24	: tex ("textures/rockwall.jpg"), texvar (tex.name)
115	root	1.35	, norm ("textures/rockwall_normal.jpg"), normvar (norm.name)
116	root	1.15	{
117	root	1.32	}
118
119			static shader::varying_3f normal, lightvec;
120			static shader::varying_2f texcoord;
121
122			void test_material::vsh (view &ctx)
123			{
124	root	1.20	using namespace shader::compile;
125	root	1.15
126	root	1.32	std_vsh ();
127	root	1.15
128	root	1.32	if (ctx.pass_data->l)
129			{
130			texcoord = xy (vin.tex_coord[0]);
131			normal = normal_matrix * vin.normal;
132			lightvec = xyz (ctx.pass_data->l->lightpos - model_view_matrix * vin.vertex);
133			}
134			}
135
136			void test_material::fsh (view &ctx)
137			{
138			using namespace shader::compile;
139	root	1.15
140	root	1.32	if (ctx.pass_data->l)
141			{
142			temp_3f lc;
143			temp_1f fac;
144
145			lc = (*ctx.pass_data->l)();
146
147	root	1.35	temp_3f rot1, rot2, rot3;
148
149			rot1 = yxz (texture_2d (normvar, texcoord) * 2.F - 1.F);
150	root	1.36	rot2 = float3 (x(rot1), z(rot1), -y(rot1));
151			rot3 = float3 (y(rot1), -x(rot1), z(rot1));
152	root	1.35
153			normal = mat3 (rot1, rot2, rot3) * normal;
154
155	root	1.32	fac = dot (normalize (normal), normalize (lightvec));
156	root	1.35	fac = pow (max (fac, 0.0), 6);
157			xyz (fout.frag_color) = (texture_2d (texvar, texcoord) + 0.2F) * lc * fac;
158	root	1.32	}
159	root	1.3	}
160
161	root	1.18	void test_material::enable (view &ctx)
162	root	1.15	{
163	root	1.32	material::enable (ctx);
164	root	1.15	texvar->enable ();
165	root	1.23	normvar->enable ();
166	root	1.15	}
167	root	1.3
168	root	1.18	void test_material::disable (view &ctx)
169	root	1.6	{
170	root	1.23	normvar->disable ();
171	root	1.15	texvar->disable ();
172	root	1.32	material::disable (ctx);
173	root	1.3	}
174	root	1.8
175	root	1.34	test_material *testmat;
176