1 /* $Id: light.c,v 1.45 2001/07/28 19:28:49 keithw Exp $ */
4 * Mesa 3-D graphics library
7 * Copyright (C) 1999-2001 Brian Paul All Rights Reserved.
9 * Permission is hereby granted, free of charge, to any person obtaining a
10 * copy of this software and associated documentation files (the "Software"),
11 * to deal in the Software without restriction, including without limitation
12 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
13 * and/or sell copies of the Software, and to permit persons to whom the
14 * Software is furnished to do so, subject to the following conditions:
16 * The above copyright notice and this permission notice shall be included
17 * in all copies or substantial portions of the Software.
19 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
20 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
21 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
22 * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
23 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
24 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
39 #include "simple_list.h"
42 #include "math/m_xform.h"
43 #include "math/m_matrix.h"
47 /* XXX this is a bit of a hack needed for compilation within XFree86 */
54 _mesa_ShadeModel( GLenum mode
)
56 GET_CURRENT_CONTEXT(ctx
);
57 ASSERT_OUTSIDE_BEGIN_END(ctx
);
59 if (MESA_VERBOSE
& VERBOSE_API
)
60 fprintf(stderr
, "glShadeModel %s\n", _mesa_lookup_enum_by_nr(mode
));
62 if (mode
!= GL_FLAT
&& mode
!= GL_SMOOTH
) {
63 _mesa_error( ctx
, GL_INVALID_ENUM
, "glShadeModel" );
67 if (ctx
->Light
.ShadeModel
== mode
)
70 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
71 ctx
->Light
.ShadeModel
= mode
;
72 ctx
->_TriangleCaps
^= DD_FLATSHADE
;
73 if (ctx
->Driver
.ShadeModel
)
74 (*ctx
->Driver
.ShadeModel
)( ctx
, mode
);
80 _mesa_Lightf( GLenum light
, GLenum pname
, GLfloat param
)
82 _mesa_Lightfv( light
, pname
, ¶m
);
87 _mesa_Lightfv( GLenum light
, GLenum pname
, const GLfloat
*params
)
89 GET_CURRENT_CONTEXT(ctx
);
90 GLint i
= (GLint
) (light
- GL_LIGHT0
);
91 struct gl_light
*l
= &ctx
->Light
.Light
[i
];
93 if (i
< 0 || i
>= (GLint
) ctx
->Const
.MaxLights
) {
94 _mesa_error( ctx
, GL_INVALID_ENUM
, "glLight" );
100 if (TEST_EQ_4V(l
->Ambient
, params
))
102 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
103 COPY_4V( l
->Ambient
, params
);
106 if (TEST_EQ_4V(l
->Diffuse
, params
))
108 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
109 COPY_4V( l
->Diffuse
, params
);
112 if (TEST_EQ_4V(l
->Specular
, params
))
114 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
115 COPY_4V( l
->Specular
, params
);
119 /* transform position by ModelView matrix */
120 TRANSFORM_POINT( tmp
, ctx
->ModelView
.m
, params
);
121 if (TEST_EQ_4V(l
->EyePosition
, tmp
))
123 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
124 COPY_4V(l
->EyePosition
, tmp
);
125 if (l
->EyePosition
[3] != 0.0F
)
126 l
->_Flags
|= LIGHT_POSITIONAL
;
128 l
->_Flags
&= ~LIGHT_POSITIONAL
;
131 case GL_SPOT_DIRECTION
: {
133 /* transform direction by inverse modelview */
134 if (ctx
->ModelView
.flags
& MAT_DIRTY_INVERSE
) {
135 _math_matrix_analyse( &ctx
->ModelView
);
137 TRANSFORM_NORMAL( tmp
, params
, ctx
->ModelView
.inv
);
138 if (TEST_EQ_3V(l
->EyeDirection
, tmp
))
140 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
141 COPY_3V(l
->EyeDirection
, tmp
);
144 case GL_SPOT_EXPONENT
:
145 if (params
[0]<0.0 || params
[0]>128.0) {
146 _mesa_error( ctx
, GL_INVALID_VALUE
, "glLight" );
149 if (l
->SpotExponent
== params
[0])
151 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
152 l
->SpotExponent
= params
[0];
153 _mesa_invalidate_spot_exp_table( l
);
156 if ((params
[0]<0.0 || params
[0]>90.0) && params
[0]!=180.0) {
157 _mesa_error( ctx
, GL_INVALID_VALUE
, "glLight" );
160 if (l
->SpotCutoff
== params
[0])
162 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
163 l
->SpotCutoff
= params
[0];
164 l
->_CosCutoff
= cos(params
[0]*DEG2RAD
);
165 if (l
->_CosCutoff
< 0)
167 if (l
->SpotCutoff
!= 180.0F
)
168 l
->_Flags
|= LIGHT_SPOT
;
170 l
->_Flags
&= ~LIGHT_SPOT
;
172 case GL_CONSTANT_ATTENUATION
:
174 _mesa_error( ctx
, GL_INVALID_VALUE
, "glLight" );
177 if (l
->ConstantAttenuation
== params
[0])
179 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
180 l
->ConstantAttenuation
= params
[0];
182 case GL_LINEAR_ATTENUATION
:
184 _mesa_error( ctx
, GL_INVALID_VALUE
, "glLight" );
187 if (l
->LinearAttenuation
== params
[0])
189 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
190 l
->LinearAttenuation
= params
[0];
192 case GL_QUADRATIC_ATTENUATION
:
194 _mesa_error( ctx
, GL_INVALID_VALUE
, "glLight" );
197 if (l
->QuadraticAttenuation
== params
[0])
199 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
200 l
->QuadraticAttenuation
= params
[0];
203 _mesa_error( ctx
, GL_INVALID_ENUM
, "glLight" );
207 if (ctx
->Driver
.Lightfv
)
208 ctx
->Driver
.Lightfv( ctx
, light
, pname
, params
);
213 _mesa_Lighti( GLenum light
, GLenum pname
, GLint param
)
215 _mesa_Lightiv( light
, pname
, ¶m
);
220 _mesa_Lightiv( GLenum light
, GLenum pname
, const GLint
*params
)
228 fparam
[0] = INT_TO_FLOAT( params
[0] );
229 fparam
[1] = INT_TO_FLOAT( params
[1] );
230 fparam
[2] = INT_TO_FLOAT( params
[2] );
231 fparam
[3] = INT_TO_FLOAT( params
[3] );
234 fparam
[0] = (GLfloat
) params
[0];
235 fparam
[1] = (GLfloat
) params
[1];
236 fparam
[2] = (GLfloat
) params
[2];
237 fparam
[3] = (GLfloat
) params
[3];
239 case GL_SPOT_DIRECTION
:
240 fparam
[0] = (GLfloat
) params
[0];
241 fparam
[1] = (GLfloat
) params
[1];
242 fparam
[2] = (GLfloat
) params
[2];
244 case GL_SPOT_EXPONENT
:
246 case GL_CONSTANT_ATTENUATION
:
247 case GL_LINEAR_ATTENUATION
:
248 case GL_QUADRATIC_ATTENUATION
:
249 fparam
[0] = (GLfloat
) params
[0];
252 /* error will be caught later in gl_Lightfv */
256 _mesa_Lightfv( light
, pname
, fparam
);
262 _mesa_GetLightfv( GLenum light
, GLenum pname
, GLfloat
*params
)
264 GET_CURRENT_CONTEXT(ctx
);
265 GLint l
= (GLint
) (light
- GL_LIGHT0
);
266 ASSERT_OUTSIDE_BEGIN_END(ctx
);
268 if (l
< 0 || l
>= (GLint
) ctx
->Const
.MaxLights
) {
269 _mesa_error( ctx
, GL_INVALID_ENUM
, "glGetLightfv" );
275 COPY_4V( params
, ctx
->Light
.Light
[l
].Ambient
);
278 COPY_4V( params
, ctx
->Light
.Light
[l
].Diffuse
);
281 COPY_4V( params
, ctx
->Light
.Light
[l
].Specular
);
284 COPY_4V( params
, ctx
->Light
.Light
[l
].EyePosition
);
286 case GL_SPOT_DIRECTION
:
287 COPY_3V( params
, ctx
->Light
.Light
[l
].EyeDirection
);
289 case GL_SPOT_EXPONENT
:
290 params
[0] = ctx
->Light
.Light
[l
].SpotExponent
;
293 params
[0] = ctx
->Light
.Light
[l
].SpotCutoff
;
295 case GL_CONSTANT_ATTENUATION
:
296 params
[0] = ctx
->Light
.Light
[l
].ConstantAttenuation
;
298 case GL_LINEAR_ATTENUATION
:
299 params
[0] = ctx
->Light
.Light
[l
].LinearAttenuation
;
301 case GL_QUADRATIC_ATTENUATION
:
302 params
[0] = ctx
->Light
.Light
[l
].QuadraticAttenuation
;
305 _mesa_error( ctx
, GL_INVALID_ENUM
, "glGetLightfv" );
313 _mesa_GetLightiv( GLenum light
, GLenum pname
, GLint
*params
)
315 GET_CURRENT_CONTEXT(ctx
);
316 GLint l
= (GLint
) (light
- GL_LIGHT0
);
317 ASSERT_OUTSIDE_BEGIN_END(ctx
);
319 if (l
< 0 || l
>= (GLint
) ctx
->Const
.MaxLights
) {
320 _mesa_error( ctx
, GL_INVALID_ENUM
, "glGetLightiv" );
326 params
[0] = FLOAT_TO_INT(ctx
->Light
.Light
[l
].Ambient
[0]);
327 params
[1] = FLOAT_TO_INT(ctx
->Light
.Light
[l
].Ambient
[1]);
328 params
[2] = FLOAT_TO_INT(ctx
->Light
.Light
[l
].Ambient
[2]);
329 params
[3] = FLOAT_TO_INT(ctx
->Light
.Light
[l
].Ambient
[3]);
332 params
[0] = FLOAT_TO_INT(ctx
->Light
.Light
[l
].Diffuse
[0]);
333 params
[1] = FLOAT_TO_INT(ctx
->Light
.Light
[l
].Diffuse
[1]);
334 params
[2] = FLOAT_TO_INT(ctx
->Light
.Light
[l
].Diffuse
[2]);
335 params
[3] = FLOAT_TO_INT(ctx
->Light
.Light
[l
].Diffuse
[3]);
338 params
[0] = FLOAT_TO_INT(ctx
->Light
.Light
[l
].Specular
[0]);
339 params
[1] = FLOAT_TO_INT(ctx
->Light
.Light
[l
].Specular
[1]);
340 params
[2] = FLOAT_TO_INT(ctx
->Light
.Light
[l
].Specular
[2]);
341 params
[3] = FLOAT_TO_INT(ctx
->Light
.Light
[l
].Specular
[3]);
344 params
[0] = (GLint
) ctx
->Light
.Light
[l
].EyePosition
[0];
345 params
[1] = (GLint
) ctx
->Light
.Light
[l
].EyePosition
[1];
346 params
[2] = (GLint
) ctx
->Light
.Light
[l
].EyePosition
[2];
347 params
[3] = (GLint
) ctx
->Light
.Light
[l
].EyePosition
[3];
349 case GL_SPOT_DIRECTION
:
350 params
[0] = (GLint
) ctx
->Light
.Light
[l
].EyeDirection
[0];
351 params
[1] = (GLint
) ctx
->Light
.Light
[l
].EyeDirection
[1];
352 params
[2] = (GLint
) ctx
->Light
.Light
[l
].EyeDirection
[2];
354 case GL_SPOT_EXPONENT
:
355 params
[0] = (GLint
) ctx
->Light
.Light
[l
].SpotExponent
;
358 params
[0] = (GLint
) ctx
->Light
.Light
[l
].SpotCutoff
;
360 case GL_CONSTANT_ATTENUATION
:
361 params
[0] = (GLint
) ctx
->Light
.Light
[l
].ConstantAttenuation
;
363 case GL_LINEAR_ATTENUATION
:
364 params
[0] = (GLint
) ctx
->Light
.Light
[l
].LinearAttenuation
;
366 case GL_QUADRATIC_ATTENUATION
:
367 params
[0] = (GLint
) ctx
->Light
.Light
[l
].QuadraticAttenuation
;
370 _mesa_error( ctx
, GL_INVALID_ENUM
, "glGetLightiv" );
377 /**********************************************************************/
378 /*** Light Model ***/
379 /**********************************************************************/
383 _mesa_LightModelfv( GLenum pname
, const GLfloat
*params
)
387 GET_CURRENT_CONTEXT(ctx
);
388 ASSERT_OUTSIDE_BEGIN_END(ctx
);
391 case GL_LIGHT_MODEL_AMBIENT
:
392 if (TEST_EQ_4V( ctx
->Light
.Model
.Ambient
, params
))
394 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
395 COPY_4V( ctx
->Light
.Model
.Ambient
, params
);
397 case GL_LIGHT_MODEL_LOCAL_VIEWER
:
398 newbool
= (params
[0]!=0.0);
399 if (ctx
->Light
.Model
.LocalViewer
== newbool
)
401 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
402 ctx
->Light
.Model
.LocalViewer
= newbool
;
404 case GL_LIGHT_MODEL_TWO_SIDE
:
405 newbool
= (params
[0]!=0.0);
406 if (ctx
->Light
.Model
.TwoSide
== newbool
)
408 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
409 ctx
->Light
.Model
.TwoSide
= newbool
;
411 case GL_LIGHT_MODEL_COLOR_CONTROL
:
412 if (params
[0] == (GLfloat
) GL_SINGLE_COLOR
)
413 newenum
= GL_SINGLE_COLOR
;
414 else if (params
[0] == (GLfloat
) GL_SEPARATE_SPECULAR_COLOR
)
415 newenum
= GL_SEPARATE_SPECULAR_COLOR
;
417 _mesa_error( ctx
, GL_INVALID_ENUM
, "glLightModel(param)" );
420 if (ctx
->Light
.Model
.ColorControl
== newenum
)
422 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
423 ctx
->Light
.Model
.ColorControl
= newenum
;
425 if ((ctx
->Light
.Enabled
&&
426 ctx
->Light
.Model
.ColorControl
==GL_SEPARATE_SPECULAR_COLOR
)
427 || ctx
->Fog
.ColorSumEnabled
)
428 ctx
->_TriangleCaps
|= DD_SEPARATE_SPECULAR
;
430 ctx
->_TriangleCaps
&= ~DD_SEPARATE_SPECULAR
;
434 _mesa_error( ctx
, GL_INVALID_ENUM
, "glLightModel" );
438 if (ctx
->Driver
.LightModelfv
)
439 ctx
->Driver
.LightModelfv( ctx
, pname
, params
);
444 _mesa_LightModeliv( GLenum pname
, const GLint
*params
)
449 case GL_LIGHT_MODEL_AMBIENT
:
450 fparam
[0] = INT_TO_FLOAT( params
[0] );
451 fparam
[1] = INT_TO_FLOAT( params
[1] );
452 fparam
[2] = INT_TO_FLOAT( params
[2] );
453 fparam
[3] = INT_TO_FLOAT( params
[3] );
455 case GL_LIGHT_MODEL_LOCAL_VIEWER
:
456 case GL_LIGHT_MODEL_TWO_SIDE
:
457 case GL_LIGHT_MODEL_COLOR_CONTROL
:
458 fparam
[0] = (GLfloat
) params
[0];
461 /* Error will be caught later in gl_LightModelfv */
464 _mesa_LightModelfv( pname
, fparam
);
469 _mesa_LightModeli( GLenum pname
, GLint param
)
471 _mesa_LightModeliv( pname
, ¶m
);
476 _mesa_LightModelf( GLenum pname
, GLfloat param
)
478 _mesa_LightModelfv( pname
, ¶m
);
483 /********** MATERIAL **********/
487 * Given a face and pname value (ala glColorMaterial), compute a bitmask
488 * of the targeted material values.
491 _mesa_material_bitmask( GLcontext
*ctx
, GLenum face
, GLenum pname
,
492 GLuint legal
, const char *where
)
496 /* Make a bitmask indicating what material attribute(s) we're updating */
499 bitmask
|= FRONT_EMISSION_BIT
| BACK_EMISSION_BIT
;
502 bitmask
|= FRONT_AMBIENT_BIT
| BACK_AMBIENT_BIT
;
505 bitmask
|= FRONT_DIFFUSE_BIT
| BACK_DIFFUSE_BIT
;
508 bitmask
|= FRONT_SPECULAR_BIT
| BACK_SPECULAR_BIT
;
511 bitmask
|= FRONT_SHININESS_BIT
| BACK_SHININESS_BIT
;
513 case GL_AMBIENT_AND_DIFFUSE
:
514 bitmask
|= FRONT_AMBIENT_BIT
| BACK_AMBIENT_BIT
;
515 bitmask
|= FRONT_DIFFUSE_BIT
| BACK_DIFFUSE_BIT
;
517 case GL_COLOR_INDEXES
:
518 bitmask
|= FRONT_INDEXES_BIT
| BACK_INDEXES_BIT
;
521 _mesa_error( ctx
, GL_INVALID_ENUM
, where
);
525 if (face
==GL_FRONT
) {
526 bitmask
&= FRONT_MATERIAL_BITS
;
528 else if (face
==GL_BACK
) {
529 bitmask
&= BACK_MATERIAL_BITS
;
531 else if (face
!= GL_FRONT_AND_BACK
) {
532 _mesa_error( ctx
, GL_INVALID_ENUM
, where
);
536 if (bitmask
& ~legal
) {
537 _mesa_error( ctx
, GL_INVALID_ENUM
, where
);
545 /* Perform a straight copy between pairs of materials.
547 void _mesa_copy_material_pairs( struct gl_material dst
[2],
548 const struct gl_material src
[2],
551 if (bitmask
& FRONT_EMISSION_BIT
) {
552 COPY_4FV( dst
[0].Emission
, src
[0].Emission
);
554 if (bitmask
& BACK_EMISSION_BIT
) {
555 COPY_4FV( dst
[1].Emission
, src
[1].Emission
);
557 if (bitmask
& FRONT_AMBIENT_BIT
) {
558 COPY_4FV( dst
[0].Ambient
, src
[0].Ambient
);
560 if (bitmask
& BACK_AMBIENT_BIT
) {
561 COPY_4FV( dst
[1].Ambient
, src
[1].Ambient
);
563 if (bitmask
& FRONT_DIFFUSE_BIT
) {
564 COPY_4FV( dst
[0].Diffuse
, src
[0].Diffuse
);
566 if (bitmask
& BACK_DIFFUSE_BIT
) {
567 COPY_4FV( dst
[1].Diffuse
, src
[1].Diffuse
);
569 if (bitmask
& FRONT_SPECULAR_BIT
) {
570 COPY_4FV( dst
[0].Specular
, src
[0].Specular
);
572 if (bitmask
& BACK_SPECULAR_BIT
) {
573 COPY_4FV( dst
[1].Specular
, src
[1].Specular
);
575 if (bitmask
& FRONT_SHININESS_BIT
) {
576 dst
[0].Shininess
= src
[0].Shininess
;
578 if (bitmask
& BACK_SHININESS_BIT
) {
579 dst
[1].Shininess
= src
[1].Shininess
;
581 if (bitmask
& FRONT_INDEXES_BIT
) {
582 dst
[0].AmbientIndex
= src
[0].AmbientIndex
;
583 dst
[0].DiffuseIndex
= src
[0].DiffuseIndex
;
584 dst
[0].SpecularIndex
= src
[0].SpecularIndex
;
586 if (bitmask
& BACK_INDEXES_BIT
) {
587 dst
[1].AmbientIndex
= src
[1].AmbientIndex
;
588 dst
[1].DiffuseIndex
= src
[1].DiffuseIndex
;
589 dst
[1].SpecularIndex
= src
[1].SpecularIndex
;
595 * Check if the global material has to be updated with info that was
596 * associated with a vertex via glMaterial.
597 * This function is used when any material values get changed between
598 * glBegin/glEnd either by calling glMaterial() or by calling glColor()
599 * when GL_COLOR_MATERIAL is enabled.
601 * src[0] is front material, src[1] is back material
603 * Additionally keeps the precomputed lighting state uptodate.
605 void _mesa_update_material( GLcontext
*ctx
,
606 const struct gl_material src
[2],
609 struct gl_light
*light
, *list
= &ctx
->Light
.EnabledList
;
611 if (ctx
->Light
.ColorMaterialEnabled
)
612 bitmask
&= ~ctx
->Light
.ColorMaterialBitmask
;
614 if (MESA_VERBOSE
&VERBOSE_IMMEDIATE
)
615 fprintf(stderr
, "_mesa_update_material, mask 0x%x\n", bitmask
);
620 /* update material emission */
621 if (bitmask
& FRONT_EMISSION_BIT
) {
622 struct gl_material
*mat
= &ctx
->Light
.Material
[0];
623 COPY_4FV( mat
->Emission
, src
[0].Emission
);
625 if (bitmask
& BACK_EMISSION_BIT
) {
626 struct gl_material
*mat
= &ctx
->Light
.Material
[1];
627 COPY_4FV( mat
->Emission
, src
[1].Emission
);
630 /* update material ambience */
631 if (bitmask
& FRONT_AMBIENT_BIT
) {
632 struct gl_material
*mat
= &ctx
->Light
.Material
[0];
633 COPY_4FV( mat
->Ambient
, src
[0].Ambient
);
634 foreach (light
, list
) {
635 SCALE_3V( light
->_MatAmbient
[0], light
->Ambient
, src
[0].Ambient
);
638 if (bitmask
& BACK_AMBIENT_BIT
) {
639 struct gl_material
*mat
= &ctx
->Light
.Material
[1];
640 COPY_4FV( mat
->Ambient
, src
[1].Ambient
);
641 foreach (light
, list
) {
642 SCALE_3V( light
->_MatAmbient
[1], light
->Ambient
, src
[1].Ambient
);
646 /* update BaseColor = emission + scene's ambience * material's ambience */
647 if (bitmask
& (FRONT_EMISSION_BIT
| FRONT_AMBIENT_BIT
)) {
648 struct gl_material
*mat
= &ctx
->Light
.Material
[0];
649 COPY_3V( ctx
->Light
._BaseColor
[0], mat
->Emission
);
650 ACC_SCALE_3V( ctx
->Light
._BaseColor
[0], mat
->Ambient
,
651 ctx
->Light
.Model
.Ambient
);
653 if (bitmask
& (BACK_EMISSION_BIT
| BACK_AMBIENT_BIT
)) {
654 struct gl_material
*mat
= &ctx
->Light
.Material
[1];
655 COPY_3V( ctx
->Light
._BaseColor
[1], mat
->Emission
);
656 ACC_SCALE_3V( ctx
->Light
._BaseColor
[1], mat
->Ambient
,
657 ctx
->Light
.Model
.Ambient
);
660 /* update material diffuse values */
661 if (bitmask
& FRONT_DIFFUSE_BIT
) {
662 struct gl_material
*mat
= &ctx
->Light
.Material
[0];
663 COPY_4FV( mat
->Diffuse
, src
[0].Diffuse
);
664 foreach (light
, list
) {
665 SCALE_3V( light
->_MatDiffuse
[0], light
->Diffuse
, mat
->Diffuse
);
668 if (bitmask
& BACK_DIFFUSE_BIT
) {
669 struct gl_material
*mat
= &ctx
->Light
.Material
[1];
670 COPY_4FV( mat
->Diffuse
, src
[1].Diffuse
);
671 foreach (light
, list
) {
672 SCALE_3V( light
->_MatDiffuse
[1], light
->Diffuse
, mat
->Diffuse
);
676 /* update material specular values */
677 if (bitmask
& FRONT_SPECULAR_BIT
) {
678 struct gl_material
*mat
= &ctx
->Light
.Material
[0];
679 COPY_4FV( mat
->Specular
, src
[0].Specular
);
680 foreach (light
, list
) {
681 SCALE_3V( light
->_MatSpecular
[0], light
->Specular
, mat
->Specular
);
684 if (bitmask
& BACK_SPECULAR_BIT
) {
685 struct gl_material
*mat
= &ctx
->Light
.Material
[1];
686 COPY_4FV( mat
->Specular
, src
[1].Specular
);
687 foreach (light
, list
) {
688 SCALE_3V( light
->_MatSpecular
[1], light
->Specular
, mat
->Specular
);
692 if (bitmask
& FRONT_SHININESS_BIT
) {
693 ctx
->Light
.Material
[0].Shininess
= src
[0].Shininess
;
694 _mesa_invalidate_shine_table( ctx
, 0 );
696 if (bitmask
& BACK_SHININESS_BIT
) {
697 ctx
->Light
.Material
[1].Shininess
= src
[1].Shininess
;
698 _mesa_invalidate_shine_table( ctx
, 1 );
701 if (bitmask
& FRONT_INDEXES_BIT
) {
702 ctx
->Light
.Material
[0].AmbientIndex
= src
[0].AmbientIndex
;
703 ctx
->Light
.Material
[0].DiffuseIndex
= src
[0].DiffuseIndex
;
704 ctx
->Light
.Material
[0].SpecularIndex
= src
[0].SpecularIndex
;
706 if (bitmask
& BACK_INDEXES_BIT
) {
707 ctx
->Light
.Material
[1].AmbientIndex
= src
[1].AmbientIndex
;
708 ctx
->Light
.Material
[1].DiffuseIndex
= src
[1].DiffuseIndex
;
709 ctx
->Light
.Material
[1].SpecularIndex
= src
[1].SpecularIndex
;
714 struct gl_material
*mat
= &ctx
->Light
.Material
[0];
715 fprintf(stderr
, "update_mat emission : %f %f %f\n",
719 fprintf(stderr
, "update_mat specular : %f %f %f\n",
723 fprintf(stderr
, "update_mat diffuse : %f %f %f\n",
727 fprintf(stderr
, "update_mat ambient : %f %f %f\n",
741 * Update the current materials from the given rgba color
742 * according to the bitmask in ColorMaterialBitmask, which is
743 * set by glColorMaterial().
745 void _mesa_update_color_material( GLcontext
*ctx
,
746 const GLfloat color
[4] )
748 struct gl_light
*light
, *list
= &ctx
->Light
.EnabledList
;
749 GLuint bitmask
= ctx
->Light
.ColorMaterialBitmask
;
751 if (MESA_VERBOSE
&VERBOSE_IMMEDIATE
)
752 fprintf(stderr
, "_mesa_update_color_material, mask 0x%x\n", bitmask
);
754 /* update emissive colors */
755 if (bitmask
& FRONT_EMISSION_BIT
) {
756 struct gl_material
*mat
= &ctx
->Light
.Material
[0];
757 COPY_4FV( mat
->Emission
, color
);
760 if (bitmask
& BACK_EMISSION_BIT
) {
761 struct gl_material
*mat
= &ctx
->Light
.Material
[1];
762 COPY_4FV( mat
->Emission
, color
);
765 /* update light->_MatAmbient = light's ambient * material's ambient */
766 if (bitmask
& FRONT_AMBIENT_BIT
) {
767 struct gl_material
*mat
= &ctx
->Light
.Material
[0];
768 foreach (light
, list
) {
769 SCALE_3V( light
->_MatAmbient
[0], light
->Ambient
, color
);
771 COPY_4FV( mat
->Ambient
, color
);
774 if (bitmask
& BACK_AMBIENT_BIT
) {
775 struct gl_material
*mat
= &ctx
->Light
.Material
[1];
776 foreach (light
, list
) {
777 SCALE_3V( light
->_MatAmbient
[1], light
->Ambient
, color
);
779 COPY_4FV( mat
->Ambient
, color
);
782 /* update BaseColor = emission + scene's ambience * material's ambience */
783 if (bitmask
& (FRONT_EMISSION_BIT
| FRONT_AMBIENT_BIT
)) {
784 struct gl_material
*mat
= &ctx
->Light
.Material
[0];
785 COPY_3V( ctx
->Light
._BaseColor
[0], mat
->Emission
);
786 ACC_SCALE_3V( ctx
->Light
._BaseColor
[0], mat
->Ambient
, ctx
->Light
.Model
.Ambient
);
789 if (bitmask
& (BACK_EMISSION_BIT
| BACK_AMBIENT_BIT
)) {
790 struct gl_material
*mat
= &ctx
->Light
.Material
[1];
791 COPY_3V( ctx
->Light
._BaseColor
[1], mat
->Emission
);
792 ACC_SCALE_3V( ctx
->Light
._BaseColor
[1], mat
->Ambient
, ctx
->Light
.Model
.Ambient
);
795 /* update light->_MatDiffuse = light's diffuse * material's diffuse */
796 if (bitmask
& FRONT_DIFFUSE_BIT
) {
797 struct gl_material
*mat
= &ctx
->Light
.Material
[0];
798 COPY_4FV( mat
->Diffuse
, color
);
799 foreach (light
, list
) {
800 SCALE_3V( light
->_MatDiffuse
[0], light
->Diffuse
, mat
->Diffuse
);
804 if (bitmask
& BACK_DIFFUSE_BIT
) {
805 struct gl_material
*mat
= &ctx
->Light
.Material
[1];
806 COPY_4FV( mat
->Diffuse
, color
);
807 foreach (light
, list
) {
808 SCALE_3V( light
->_MatDiffuse
[1], light
->Diffuse
, mat
->Diffuse
);
812 /* update light->_MatSpecular = light's specular * material's specular */
813 if (bitmask
& FRONT_SPECULAR_BIT
) {
814 struct gl_material
*mat
= &ctx
->Light
.Material
[0];
815 COPY_4FV( mat
->Specular
, color
);
816 foreach (light
, list
) {
817 ACC_SCALE_3V( light
->_MatSpecular
[0], light
->Specular
, mat
->Specular
);
821 if (bitmask
& BACK_SPECULAR_BIT
) {
822 struct gl_material
*mat
= &ctx
->Light
.Material
[1];
823 COPY_4FV( mat
->Specular
, color
);
824 foreach (light
, list
) {
825 ACC_SCALE_3V( light
->_MatSpecular
[1], light
->Specular
, mat
->Specular
);
831 struct gl_material
*mat
= &ctx
->Light
.Material
[0];
832 fprintf(stderr
, "update_color_mat emission : %f %f %f\n",
836 fprintf(stderr
, "update_color_mat specular : %f %f %f\n",
840 fprintf(stderr
, "update_color_mat diffuse : %f %f %f\n",
844 fprintf(stderr
, "update_color_mat ambient : %f %f %f\n",
855 _mesa_ColorMaterial( GLenum face
, GLenum mode
)
857 GET_CURRENT_CONTEXT(ctx
);
859 GLuint legal
= (FRONT_EMISSION_BIT
| BACK_EMISSION_BIT
|
860 FRONT_SPECULAR_BIT
| BACK_SPECULAR_BIT
|
861 FRONT_DIFFUSE_BIT
| BACK_DIFFUSE_BIT
|
862 FRONT_AMBIENT_BIT
| BACK_AMBIENT_BIT
);
863 ASSERT_OUTSIDE_BEGIN_END(ctx
);
865 if (MESA_VERBOSE
&VERBOSE_API
)
866 fprintf(stderr
, "glColorMaterial %s %s\n",
867 _mesa_lookup_enum_by_nr(face
),
868 _mesa_lookup_enum_by_nr(mode
));
870 bitmask
= _mesa_material_bitmask(ctx
, face
, mode
, legal
, "glColorMaterial");
872 if (ctx
->Light
.ColorMaterialBitmask
== bitmask
&&
873 ctx
->Light
.ColorMaterialFace
== face
&&
874 ctx
->Light
.ColorMaterialMode
== mode
)
877 FLUSH_VERTICES(ctx
, _NEW_LIGHT
);
878 ctx
->Light
.ColorMaterialBitmask
= bitmask
;
879 ctx
->Light
.ColorMaterialFace
= face
;
880 ctx
->Light
.ColorMaterialMode
= mode
;
882 if (ctx
->Light
.ColorMaterialEnabled
) {
883 FLUSH_CURRENT( ctx
, 0 );
884 _mesa_update_color_material( ctx
, ctx
->Current
.Color
);
893 _mesa_GetMaterialfv( GLenum face
, GLenum pname
, GLfloat
*params
)
895 GET_CURRENT_CONTEXT(ctx
);
897 ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx
); /* update materials */
899 if (face
==GL_FRONT
) {
902 else if (face
==GL_BACK
) {
906 _mesa_error( ctx
, GL_INVALID_ENUM
, "glGetMaterialfv(face)" );
911 COPY_4FV( params
, ctx
->Light
.Material
[f
].Ambient
);
914 COPY_4FV( params
, ctx
->Light
.Material
[f
].Diffuse
);
917 COPY_4FV( params
, ctx
->Light
.Material
[f
].Specular
);
920 COPY_4FV( params
, ctx
->Light
.Material
[f
].Emission
);
923 *params
= ctx
->Light
.Material
[f
].Shininess
;
925 case GL_COLOR_INDEXES
:
926 params
[0] = ctx
->Light
.Material
[f
].AmbientIndex
;
927 params
[1] = ctx
->Light
.Material
[f
].DiffuseIndex
;
928 params
[2] = ctx
->Light
.Material
[f
].SpecularIndex
;
931 _mesa_error( ctx
, GL_INVALID_ENUM
, "glGetMaterialfv(pname)" );
938 _mesa_GetMaterialiv( GLenum face
, GLenum pname
, GLint
*params
)
940 GET_CURRENT_CONTEXT(ctx
);
942 ASSERT_OUTSIDE_BEGIN_END_AND_FLUSH(ctx
); /* update materials */
944 if (face
==GL_FRONT
) {
947 else if (face
==GL_BACK
) {
951 _mesa_error( ctx
, GL_INVALID_ENUM
, "glGetMaterialiv(face)" );
956 params
[0] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Ambient
[0] );
957 params
[1] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Ambient
[1] );
958 params
[2] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Ambient
[2] );
959 params
[3] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Ambient
[3] );
962 params
[0] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Diffuse
[0] );
963 params
[1] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Diffuse
[1] );
964 params
[2] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Diffuse
[2] );
965 params
[3] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Diffuse
[3] );
968 params
[0] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Specular
[0] );
969 params
[1] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Specular
[1] );
970 params
[2] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Specular
[2] );
971 params
[3] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Specular
[3] );
974 params
[0] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Emission
[0] );
975 params
[1] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Emission
[1] );
976 params
[2] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Emission
[2] );
977 params
[3] = FLOAT_TO_INT( ctx
->Light
.Material
[f
].Emission
[3] );
980 *params
= ROUNDF( ctx
->Light
.Material
[f
].Shininess
);
982 case GL_COLOR_INDEXES
:
983 params
[0] = ROUNDF( ctx
->Light
.Material
[f
].AmbientIndex
);
984 params
[1] = ROUNDF( ctx
->Light
.Material
[f
].DiffuseIndex
);
985 params
[2] = ROUNDF( ctx
->Light
.Material
[f
].SpecularIndex
);
988 _mesa_error( ctx
, GL_INVALID_ENUM
, "glGetMaterialfv(pname)" );
995 /**********************************************************************/
996 /***** Lighting computation *****/
997 /**********************************************************************/
1002 * When two-sided lighting is enabled we compute the color (or index)
1003 * for both the front and back side of the primitive. Then, when the
1004 * orientation of the facet is later learned, we can determine which
1005 * color (or index) to use for rendering.
1007 * KW: We now know orientation in advance and only shade for
1008 * the side or sides which are actually required.
1012 * V = vertex position
1013 * P = light source position
1018 * // light at infinity
1019 * IF local_viewer THEN
1020 * _VP_inf_norm = unit vector from V to P // Precompute
1022 * // eye at infinity
1023 * _h_inf_norm = Normalize( VP + <0,0,1> ) // Precompute
1028 * Normalize( v ) = normalized vector v
1029 * Magnitude( v ) = length of vector v
1035 * Whenever the spotlight exponent for a light changes we must call
1036 * this function to recompute the exponent lookup table.
1039 _mesa_invalidate_spot_exp_table( struct gl_light
*l
)
1041 l
->_SpotExpTable
[0][0] = -1;
1044 static void validate_spot_exp_table( struct gl_light
*l
)
1047 GLdouble exponent
= l
->SpotExponent
;
1051 l
->_SpotExpTable
[0][0] = 0.0;
1053 for (i
= EXP_TABLE_SIZE
- 1; i
> 0 ;i
--) {
1055 tmp
= pow(i
/ (GLdouble
) (EXP_TABLE_SIZE
- 1), exponent
);
1056 if (tmp
< FLT_MIN
* 100.0) {
1061 l
->_SpotExpTable
[i
][0] = tmp
;
1063 for (i
= 0; i
< EXP_TABLE_SIZE
- 1; i
++) {
1064 l
->_SpotExpTable
[i
][1] = (l
->_SpotExpTable
[i
+1][0] -
1065 l
->_SpotExpTable
[i
][0]);
1067 l
->_SpotExpTable
[EXP_TABLE_SIZE
-1][1] = 0.0;
1073 /* Calculate a new shine table. Doing this here saves a branch in
1074 * lighting, and the cost of doing it early may be partially offset
1075 * by keeping a MRU cache of shine tables for various shine values.
1078 _mesa_invalidate_shine_table( GLcontext
*ctx
, GLuint i
)
1080 if (ctx
->_ShineTable
[i
])
1081 ctx
->_ShineTable
[i
]->refcount
--;
1082 ctx
->_ShineTable
[i
] = 0;
1085 static void validate_shine_table( GLcontext
*ctx
, GLuint i
, GLfloat shininess
)
1087 struct gl_shine_tab
*list
= ctx
->_ShineTabList
;
1088 struct gl_shine_tab
*s
;
1091 if ( s
->shininess
== shininess
)
1099 if (s
->refcount
== 0)
1104 if (shininess
== 0.0) {
1105 for (j
= 1 ; j
<= SHINE_TABLE_SIZE
; j
++)
1109 for (j
= 1 ; j
< SHINE_TABLE_SIZE
; j
++) {
1110 GLdouble t
, x
= j
/ (GLfloat
) (SHINE_TABLE_SIZE
- 1);
1111 if (x
< 0.005) /* underflow check */
1113 t
= pow(x
, shininess
);
1119 m
[SHINE_TABLE_SIZE
] = 1.0;
1122 s
->shininess
= shininess
;
1125 if (ctx
->_ShineTable
[i
])
1126 ctx
->_ShineTable
[i
]->refcount
--;
1128 ctx
->_ShineTable
[i
] = s
;
1129 move_to_tail( list
, s
);
1134 _mesa_validate_all_lighting_tables( GLcontext
*ctx
)
1139 shininess
= ctx
->Light
.Material
[0].Shininess
;
1140 if (!ctx
->_ShineTable
[0] || ctx
->_ShineTable
[0]->shininess
!= shininess
)
1141 validate_shine_table( ctx
, 0, shininess
);
1143 shininess
= ctx
->Light
.Material
[1].Shininess
;
1144 if (!ctx
->_ShineTable
[1] || ctx
->_ShineTable
[1]->shininess
!= shininess
)
1145 validate_shine_table( ctx
, 1, shininess
);
1147 for (i
= 0 ; i
< MAX_LIGHTS
; i
++)
1148 if (ctx
->Light
.Light
[i
]._SpotExpTable
[0][0] == -1)
1149 validate_spot_exp_table( &ctx
->Light
.Light
[i
] );
1156 * Examine current lighting parameters to determine if the optimized lighting
1157 * function can be used.
1158 * Also, precompute some lighting values such as the products of light
1159 * source and material ambient, diffuse and specular coefficients.
1162 _mesa_update_lighting( GLcontext
*ctx
)
1164 struct gl_light
*light
;
1165 ctx
->_TriangleCaps
&= ~DD_TRI_LIGHT_TWOSIDE
;
1166 ctx
->_NeedEyeCoords
&= ~NEED_EYE_LIGHT
;
1167 ctx
->_NeedNormals
&= ~NEED_NORMALS_LIGHT
;
1168 ctx
->Light
._Flags
= 0;
1170 if (!ctx
->Light
.Enabled
)
1173 ctx
->_NeedNormals
|= NEED_NORMALS_LIGHT
;
1175 if (ctx
->Light
.Model
.TwoSide
)
1176 ctx
->_TriangleCaps
|= DD_TRI_LIGHT_TWOSIDE
;
1178 foreach(light
, &ctx
->Light
.EnabledList
) {
1179 ctx
->Light
._Flags
|= light
->_Flags
;
1182 ctx
->Light
._NeedVertices
=
1183 ((ctx
->Light
._Flags
& (LIGHT_POSITIONAL
|LIGHT_SPOT
)) ||
1184 ctx
->Light
.Model
.ColorControl
== GL_SEPARATE_SPECULAR_COLOR
||
1185 ctx
->Light
.Model
.LocalViewer
);
1187 if ((ctx
->Light
._Flags
& LIGHT_POSITIONAL
) ||
1188 ctx
->Light
.Model
.LocalViewer
)
1189 ctx
->_NeedEyeCoords
|= NEED_EYE_LIGHT
;
1192 /* XXX: This test is overkill & needs to be fixed both for software and
1193 * hardware t&l drivers. The above should be sufficient & should
1194 * be tested to verify this.
1196 if (ctx
->Light
._NeedVertices
)
1197 ctx
->_NeedEyeCoords
|= NEED_EYE_LIGHT
;
1200 /* Precompute some shading values. Although we reference
1201 * Light.Material here, we can get away without flushing
1202 * FLUSH_UPDATE_CURRENT, as when any outstanding material changes
1203 * are flushed, they will update the derived state at that time.
1205 if (ctx
->Visual
.rgbMode
) {
1206 GLuint sides
= ctx
->Light
.Model
.TwoSide
? 2 : 1;
1208 for (side
=0; side
< sides
; side
++) {
1209 struct gl_material
*mat
= &ctx
->Light
.Material
[side
];
1211 COPY_3V(ctx
->Light
._BaseColor
[side
], mat
->Emission
);
1212 ACC_SCALE_3V(ctx
->Light
._BaseColor
[side
],
1213 ctx
->Light
.Model
.Ambient
,
1217 foreach (light
, &ctx
->Light
.EnabledList
) {
1218 for (side
=0; side
< sides
; side
++) {
1219 const struct gl_material
*mat
= &ctx
->Light
.Material
[side
];
1220 SCALE_3V( light
->_MatDiffuse
[side
], light
->Diffuse
, mat
->Diffuse
);
1221 SCALE_3V( light
->_MatAmbient
[side
], light
->Ambient
, mat
->Ambient
);
1222 SCALE_3V( light
->_MatSpecular
[side
], light
->Specular
,
1228 static const GLfloat ci
[3] = { .30, .59, .11 };
1229 foreach(light
, &ctx
->Light
.EnabledList
) {
1230 light
->_dli
= DOT3(ci
, light
->Diffuse
);
1231 light
->_sli
= DOT3(ci
, light
->Specular
);
1239 * _TNL_NEW_NEED_EYE_COORDS
1241 * Update on (_NEW_MODELVIEW | _NEW_LIGHT) when lighting is enabled.
1242 * Also update on lighting space changes.
1245 _mesa_compute_light_positions( GLcontext
*ctx
)
1247 struct gl_light
*light
;
1248 static const GLfloat eye_z
[3] = { 0, 0, 1 };
1250 if (!ctx
->Light
.Enabled
)
1253 if (ctx
->_NeedEyeCoords
) {
1254 COPY_3V( ctx
->_EyeZDir
, eye_z
);
1257 TRANSFORM_NORMAL( ctx
->_EyeZDir
, eye_z
, ctx
->ModelView
.m
);
1260 foreach (light
, &ctx
->Light
.EnabledList
) {
1262 if (ctx
->_NeedEyeCoords
) {
1263 COPY_4FV( light
->_Position
, light
->EyePosition
);
1266 TRANSFORM_POINT( light
->_Position
, ctx
->ModelView
.inv
,
1267 light
->EyePosition
);
1270 if (!(light
->_Flags
& LIGHT_POSITIONAL
)) {
1271 /* VP (VP) = Normalize( Position ) */
1272 COPY_3V( light
->_VP_inf_norm
, light
->_Position
);
1273 NORMALIZE_3FV( light
->_VP_inf_norm
);
1275 if (!ctx
->Light
.Model
.LocalViewer
) {
1276 /* _h_inf_norm = Normalize( V_to_P + <0,0,1> ) */
1277 ADD_3V( light
->_h_inf_norm
, light
->_VP_inf_norm
, ctx
->_EyeZDir
);
1278 NORMALIZE_3FV( light
->_h_inf_norm
);
1280 light
->_VP_inf_spot_attenuation
= 1.0;
1283 if (light
->_Flags
& LIGHT_SPOT
) {
1284 if (ctx
->_NeedEyeCoords
) {
1285 COPY_3V( light
->_NormDirection
, light
->EyeDirection
);
1288 TRANSFORM_NORMAL( light
->_NormDirection
,
1289 light
->EyeDirection
,
1293 NORMALIZE_3FV( light
->_NormDirection
);
1295 if (!(light
->_Flags
& LIGHT_POSITIONAL
)) {
1296 GLfloat PV_dot_dir
= - DOT3(light
->_VP_inf_norm
,
1297 light
->_NormDirection
);
1299 if (PV_dot_dir
> light
->_CosCutoff
) {
1300 double x
= PV_dot_dir
* (EXP_TABLE_SIZE
-1);
1302 light
->_VP_inf_spot_attenuation
=
1303 (light
->_SpotExpTable
[k
][0] +
1304 (x
-k
)*light
->_SpotExpTable
[k
][1]);
1307 light
->_VP_inf_spot_attenuation
= 0;