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)
: tex ("textures/rockwall.jpg"), texvar (tex.name)
, norm ("textures/rockwall_height.jpg"), normvar (norm.name)
{
  using namespace shader::compile;

  p.vsh->start ();

  temp_4f wpos;
  varying_1f camdist;
  varying_3f lightvec;
  
  wpos = model_view_projection_matrix * vin.vertex;

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

  vout.position = wpos;
  vout.tex_coord[0] = vin.tex_coord[0];
  xyz (vout.tex_coord[1]) = normal_matrix * vin.normal;
  lightvec = xyz (lightpos - model_view_matrix * vin.vertex);
  camdist = length (xyz (vout.tex_coord[2]));

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

  p.fsh->start ();

  temp_1f fac;
  temp_2f disp;
  temp_1f dx, dy;
  temp_1f bumpnormal;
  temp_1f dist;

  dist = min (x(camdist), 10000.);

  fac = dot (normalize (xyz (fin.tex_coord[1])), normalize (lightvec));
  //fac = dot (shader::compile::vec3 (normalize (fin.tex_coord[1]) + normalize (fin.tex_coord[2])) * 0.5, bumpnormal);
  //fac = dot (bumpnormal, normalize (fin.tex_coord[2]));
  //fac = pow (max (fac, 0.0), 8);
  xyz (fout.frag_color) = (texture_2d (texvar, fin.tex_coord[0] - disp)) * max (fac * (0.4 + 1.F * (1 - dist / 10000.)), 0);

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

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

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

Revision:	1.26
Committed:	Mon Nov 1 20:11:35 2004 UTC (21 years, 10 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.25:	+7 -6 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	root	1.23	//: tex ("textures/osama.jpg"), texvar (tex.name)
88	root	1.24	: tex ("textures/rockwall.jpg"), texvar (tex.name)
89			, norm ("textures/rockwall_height.jpg"), normvar (norm.name)
90	root	1.15	{
91	root	1.20	using namespace shader::compile;
92	root	1.15
93			p.vsh->start ();
94
95			temp_4f wpos;
96	root	1.26	varying_1f camdist;
97			varying_3f lightvec;
98	root	1.18
99	root	1.20	wpos = model_view_projection_matrix * vin.vertex;
100	root	1.15
101	root	1.23	//wpos = wpos / abs (w (wpos));
102	root	1.22
103	root	1.18	vout.position = wpos;
104	root	1.17	vout.tex_coord[0] = vin.tex_coord[0];
105	root	1.25	xyz (vout.tex_coord[1]) = normal_matrix * vin.normal;
106	root	1.26	lightvec = xyz (lightpos - model_view_matrix * vin.vertex);
107			camdist = length (xyz (vout.tex_coord[2]));
108	root	1.15
109			p.vsh->end ();
110			p.vsh->compile ();
111
112			p.fsh->start ();
113
114	root	1.18	temp_1f fac;
115	root	1.23	temp_2f disp;
116			temp_1f dx, dy;
117			temp_1f bumpnormal;
118	root	1.25	temp_1f dist;
119	root	1.23
120	root	1.26	dist = min (x(camdist), 10000.);
121	root	1.23
122	root	1.26	fac = dot (normalize (xyz (fin.tex_coord[1])), normalize (lightvec));
123	root	1.23	//fac = dot (shader::compile::vec3 (normalize (fin.tex_coord[1]) + normalize (fin.tex_coord[2])) * 0.5, bumpnormal);
124			//fac = dot (bumpnormal, normalize (fin.tex_coord[2]));
125			//fac = pow (max (fac, 0.0), 8);
126	root	1.26	xyz (fout.frag_color) = (texture_2d (texvar, fin.tex_coord[0] - disp)) * max (fac * (0.4 + 1.F * (1 - dist / 10000.)), 0);
127	root	1.15
128			p.fsh->end ();
129			p.fsh->compile ();
130			p.link ();
131	root	1.3	}
132
133	root	1.18	void test_material::enable (view &ctx)
134	root	1.15	{
135			p.enable ();
136	root	1.21	lightpos->set (vec3 (0, 0, 0));
137	root	1.15	texvar->enable ();
138	root	1.23	normvar->enable ();
139	root	1.15	}
140	root	1.3
141	root	1.18	void test_material::disable (view &ctx)
142	root	1.6	{
143	root	1.23	normvar->disable ();
144	root	1.15	texvar->disable ();
145			p.disable ();
146	root	1.3	}
147	root	1.8