cf17a6b1e725775aaa73a10e97f23d1b2c710fd3
[mesa.git] / src / mesa / main / texstate.c
1 /*
2 * Mesa 3-D graphics library
3 * Version: 6.5
4 *
5 * Copyright (C) 1999-2005 Brian Paul All Rights Reserved.
6 *
7 * Permission is hereby granted, free of charge, to any person obtaining a
8 * copy of this software and associated documentation files (the "Software"),
9 * to deal in the Software without restriction, including without limitation
10 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
11 * and/or sell copies of the Software, and to permit persons to whom the
12 * Software is furnished to do so, subject to the following conditions:
13 *
14 * The above copyright notice and this permission notice shall be included
15 * in all copies or substantial portions of the Software.
16 *
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
18 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
20 * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
21 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
22 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
23 */
24
25 /**
26 * \file texstate.c
27 *
28 * Texture state handling.
29 */
30
31 #include "glheader.h"
32 #include "colormac.h"
33 #include "colortab.h"
34 #include "context.h"
35 #include "enums.h"
36 #include "extensions.h"
37 #include "macros.h"
38 #include "nvfragprog.h"
39 #include "texobj.h"
40 #include "teximage.h"
41 #include "texstate.h"
42 #include "texenvprogram.h"
43 #include "mtypes.h"
44 #include "math/m_xform.h"
45 #include "math/m_matrix.h"
46
47
48
49 #ifdef SPECIALCAST
50 /* Needed for an Amiga compiler */
51 #define ENUM_TO_FLOAT(X) ((GLfloat)(GLint)(X))
52 #define ENUM_TO_DOUBLE(X) ((GLdouble)(GLint)(X))
53 #else
54 /* all other compilers */
55 #define ENUM_TO_FLOAT(X) ((GLfloat)(X))
56 #define ENUM_TO_DOUBLE(X) ((GLdouble)(X))
57 #endif
58
59 /**
60 * Default texture combine environment state. This is used to initialize
61 * a context's texture units and as the basis for converting "classic"
62 * texture environmnets to ARB_texture_env_combine style values.
63 */
64 static const struct gl_tex_env_combine_state default_combine_state = {
65 GL_MODULATE, GL_MODULATE,
66 { GL_TEXTURE, GL_PREVIOUS, GL_CONSTANT },
67 { GL_TEXTURE, GL_PREVIOUS, GL_CONSTANT },
68 { GL_SRC_COLOR, GL_SRC_COLOR, GL_SRC_ALPHA },
69 { GL_SRC_ALPHA, GL_SRC_ALPHA, GL_SRC_ALPHA },
70 0, 0,
71 2, 2
72 };
73
74
75 void
76 _mesa_copy_texture_state( const GLcontext *src, GLcontext *dst )
77 {
78 GLuint i;
79
80 ASSERT(src);
81 ASSERT(dst);
82
83 dst->Texture.CurrentUnit = src->Texture.CurrentUnit;
84 dst->Texture._GenFlags = src->Texture._GenFlags;
85 dst->Texture._TexGenEnabled = src->Texture._TexGenEnabled;
86 dst->Texture._TexMatEnabled = src->Texture._TexMatEnabled;
87 dst->Texture.SharedPalette = src->Texture.SharedPalette;
88
89 /* per-unit state */
90 for (i = 0; i < src->Const.MaxTextureUnits; i++) {
91 dst->Texture.Unit[i].Enabled = src->Texture.Unit[i].Enabled;
92 dst->Texture.Unit[i].EnvMode = src->Texture.Unit[i].EnvMode;
93 COPY_4V(dst->Texture.Unit[i].EnvColor, src->Texture.Unit[i].EnvColor);
94 dst->Texture.Unit[i].TexGenEnabled = src->Texture.Unit[i].TexGenEnabled;
95 dst->Texture.Unit[i].GenModeS = src->Texture.Unit[i].GenModeS;
96 dst->Texture.Unit[i].GenModeT = src->Texture.Unit[i].GenModeT;
97 dst->Texture.Unit[i].GenModeR = src->Texture.Unit[i].GenModeR;
98 dst->Texture.Unit[i].GenModeQ = src->Texture.Unit[i].GenModeQ;
99 dst->Texture.Unit[i]._GenBitS = src->Texture.Unit[i]._GenBitS;
100 dst->Texture.Unit[i]._GenBitT = src->Texture.Unit[i]._GenBitT;
101 dst->Texture.Unit[i]._GenBitR = src->Texture.Unit[i]._GenBitR;
102 dst->Texture.Unit[i]._GenBitQ = src->Texture.Unit[i]._GenBitQ;
103 dst->Texture.Unit[i]._GenFlags = src->Texture.Unit[i]._GenFlags;
104 COPY_4V(dst->Texture.Unit[i].ObjectPlaneS, src->Texture.Unit[i].ObjectPlaneS);
105 COPY_4V(dst->Texture.Unit[i].ObjectPlaneT, src->Texture.Unit[i].ObjectPlaneT);
106 COPY_4V(dst->Texture.Unit[i].ObjectPlaneR, src->Texture.Unit[i].ObjectPlaneR);
107 COPY_4V(dst->Texture.Unit[i].ObjectPlaneQ, src->Texture.Unit[i].ObjectPlaneQ);
108 COPY_4V(dst->Texture.Unit[i].EyePlaneS, src->Texture.Unit[i].EyePlaneS);
109 COPY_4V(dst->Texture.Unit[i].EyePlaneT, src->Texture.Unit[i].EyePlaneT);
110 COPY_4V(dst->Texture.Unit[i].EyePlaneR, src->Texture.Unit[i].EyePlaneR);
111 COPY_4V(dst->Texture.Unit[i].EyePlaneQ, src->Texture.Unit[i].EyePlaneQ);
112 dst->Texture.Unit[i].LodBias = src->Texture.Unit[i].LodBias;
113
114 /* GL_EXT_texture_env_combine */
115 dst->Texture.Unit[i].Combine.ModeRGB = src->Texture.Unit[i].Combine.ModeRGB;
116 dst->Texture.Unit[i].Combine.ModeA = src->Texture.Unit[i].Combine.ModeA;
117 COPY_3V(dst->Texture.Unit[i].Combine.SourceRGB, src->Texture.Unit[i].Combine.SourceRGB);
118 COPY_3V(dst->Texture.Unit[i].Combine.SourceA, src->Texture.Unit[i].Combine.SourceA);
119 COPY_3V(dst->Texture.Unit[i].Combine.OperandRGB, src->Texture.Unit[i].Combine.OperandRGB);
120 COPY_3V(dst->Texture.Unit[i].Combine.OperandA, src->Texture.Unit[i].Combine.OperandA);
121 dst->Texture.Unit[i].Combine.ScaleShiftRGB = src->Texture.Unit[i].Combine.ScaleShiftRGB;
122 dst->Texture.Unit[i].Combine.ScaleShiftA = src->Texture.Unit[i].Combine.ScaleShiftA;
123
124 /* texture object state */
125 _mesa_copy_texture_object(dst->Texture.Unit[i].Current1D,
126 src->Texture.Unit[i].Current1D);
127 _mesa_copy_texture_object(dst->Texture.Unit[i].Current2D,
128 src->Texture.Unit[i].Current2D);
129 _mesa_copy_texture_object(dst->Texture.Unit[i].Current3D,
130 src->Texture.Unit[i].Current3D);
131 _mesa_copy_texture_object(dst->Texture.Unit[i].CurrentCubeMap,
132 src->Texture.Unit[i].CurrentCubeMap);
133 _mesa_copy_texture_object(dst->Texture.Unit[i].CurrentRect,
134 src->Texture.Unit[i].CurrentRect);
135 }
136 }
137
138
139 /*
140 * For debugging
141 */
142 void
143 _mesa_print_texunit_state( GLcontext *ctx, GLuint unit )
144 {
145 const struct gl_texture_unit *texUnit = ctx->Texture.Unit + unit;
146 _mesa_printf("Texture Unit %d\n", unit);
147 _mesa_printf(" GL_TEXTURE_ENV_MODE = %s\n", _mesa_lookup_enum_by_nr(texUnit->EnvMode));
148 _mesa_printf(" GL_COMBINE_RGB = %s\n", _mesa_lookup_enum_by_nr(texUnit->Combine.ModeRGB));
149 _mesa_printf(" GL_COMBINE_ALPHA = %s\n", _mesa_lookup_enum_by_nr(texUnit->Combine.ModeA));
150 _mesa_printf(" GL_SOURCE0_RGB = %s\n", _mesa_lookup_enum_by_nr(texUnit->Combine.SourceRGB[0]));
151 _mesa_printf(" GL_SOURCE1_RGB = %s\n", _mesa_lookup_enum_by_nr(texUnit->Combine.SourceRGB[1]));
152 _mesa_printf(" GL_SOURCE2_RGB = %s\n", _mesa_lookup_enum_by_nr(texUnit->Combine.SourceRGB[2]));
153 _mesa_printf(" GL_SOURCE0_ALPHA = %s\n", _mesa_lookup_enum_by_nr(texUnit->Combine.SourceA[0]));
154 _mesa_printf(" GL_SOURCE1_ALPHA = %s\n", _mesa_lookup_enum_by_nr(texUnit->Combine.SourceA[1]));
155 _mesa_printf(" GL_SOURCE2_ALPHA = %s\n", _mesa_lookup_enum_by_nr(texUnit->Combine.SourceA[2]));
156 _mesa_printf(" GL_OPERAND0_RGB = %s\n", _mesa_lookup_enum_by_nr(texUnit->Combine.OperandRGB[0]));
157 _mesa_printf(" GL_OPERAND1_RGB = %s\n", _mesa_lookup_enum_by_nr(texUnit->Combine.OperandRGB[1]));
158 _mesa_printf(" GL_OPERAND2_RGB = %s\n", _mesa_lookup_enum_by_nr(texUnit->Combine.OperandRGB[2]));
159 _mesa_printf(" GL_OPERAND0_ALPHA = %s\n", _mesa_lookup_enum_by_nr(texUnit->Combine.OperandA[0]));
160 _mesa_printf(" GL_OPERAND1_ALPHA = %s\n", _mesa_lookup_enum_by_nr(texUnit->Combine.OperandA[1]));
161 _mesa_printf(" GL_OPERAND2_ALPHA = %s\n", _mesa_lookup_enum_by_nr(texUnit->Combine.OperandA[2]));
162 _mesa_printf(" GL_RGB_SCALE = %d\n", 1 << texUnit->Combine.ScaleShiftRGB);
163 _mesa_printf(" GL_ALPHA_SCALE = %d\n", 1 << texUnit->Combine.ScaleShiftA);
164 _mesa_printf(" GL_TEXTURE_ENV_COLOR = (%f, %f, %f, %f)\n", texUnit->EnvColor[0], texUnit->EnvColor[1], texUnit->EnvColor[2], texUnit->EnvColor[3]);
165 }
166
167
168
169 /**********************************************************************/
170 /* Texture Environment */
171 /**********************************************************************/
172
173 /**
174 * Convert "classic" texture environment to ARB_texture_env_combine style
175 * environments.
176 *
177 * \param state texture_env_combine state vector to be filled-in.
178 * \param mode Classic texture environment mode (i.e., \c GL_REPLACE,
179 * \c GL_BLEND, \c GL_DECAL, etc.).
180 * \param texBaseFormat Base format of the texture associated with the
181 * texture unit.
182 */
183 static void
184 calculate_derived_texenv( struct gl_tex_env_combine_state *state,
185 GLenum mode, GLenum texBaseFormat )
186 {
187 GLenum mode_rgb;
188 GLenum mode_a;
189
190 *state = default_combine_state;
191
192 switch (texBaseFormat) {
193 case GL_ALPHA:
194 state->SourceRGB[0] = GL_PREVIOUS;
195 break;
196
197 case GL_LUMINANCE_ALPHA:
198 case GL_INTENSITY:
199 case GL_RGBA:
200 break;
201
202 case GL_LUMINANCE:
203 case GL_RGB:
204 case GL_YCBCR_MESA:
205 state->SourceA[0] = GL_PREVIOUS;
206 break;
207
208 default:
209 _mesa_problem(NULL, "Invalid texBaseFormat in calculate_derived_texenv");
210 return;
211 }
212
213 switch (mode) {
214 case GL_REPLACE:
215 case GL_MODULATE:
216 mode_rgb = (texBaseFormat == GL_ALPHA) ? GL_REPLACE : mode;
217 mode_a = mode;
218 break;
219
220 case GL_DECAL:
221 mode_rgb = GL_INTERPOLATE;
222 mode_a = GL_REPLACE;
223
224 state->SourceA[0] = GL_PREVIOUS;
225
226 /* Having alpha / luminance / intensity textures replace using the
227 * incoming fragment color matches the definition in NV_texture_shader.
228 * The 1.5 spec simply marks these as "undefined".
229 */
230 switch (texBaseFormat) {
231 case GL_ALPHA:
232 case GL_LUMINANCE:
233 case GL_LUMINANCE_ALPHA:
234 case GL_INTENSITY:
235 state->SourceRGB[0] = GL_PREVIOUS;
236 break;
237 case GL_RGB:
238 case GL_YCBCR_MESA:
239 mode_rgb = GL_REPLACE;
240 break;
241 case GL_RGBA:
242 state->SourceRGB[2] = GL_TEXTURE;
243 break;
244 }
245 break;
246
247 case GL_BLEND:
248 mode_rgb = GL_INTERPOLATE;
249 mode_a = GL_MODULATE;
250
251 switch (texBaseFormat) {
252 case GL_ALPHA:
253 mode_rgb = GL_REPLACE;
254 break;
255 case GL_INTENSITY:
256 mode_a = GL_INTERPOLATE;
257 state->SourceA[0] = GL_CONSTANT;
258 state->OperandA[2] = GL_SRC_ALPHA;
259 /* FALLTHROUGH */
260 case GL_LUMINANCE:
261 case GL_RGB:
262 case GL_LUMINANCE_ALPHA:
263 case GL_RGBA:
264 case GL_YCBCR_MESA:
265 state->SourceRGB[2] = GL_TEXTURE;
266 state->SourceA[2] = GL_TEXTURE;
267 state->SourceRGB[0] = GL_CONSTANT;
268 state->OperandRGB[2] = GL_SRC_COLOR;
269 break;
270 }
271 break;
272
273 case GL_ADD:
274 mode_rgb = (texBaseFormat == GL_ALPHA) ? GL_REPLACE : GL_ADD;
275 mode_a = (texBaseFormat == GL_INTENSITY) ? GL_ADD : GL_MODULATE;
276 break;
277
278 default:
279 _mesa_problem(NULL,
280 "Invalid texture env mode in calculate_derived_texenv");
281 return;
282 }
283
284 state->ModeRGB = (state->SourceRGB[0] != GL_PREVIOUS)
285 ? mode_rgb : GL_REPLACE;
286 state->ModeA = (state->SourceA[0] != GL_PREVIOUS)
287 ? mode_a : GL_REPLACE;
288 }
289
290
291 void GLAPIENTRY
292 _mesa_TexEnvfv( GLenum target, GLenum pname, const GLfloat *param )
293 {
294 GET_CURRENT_CONTEXT(ctx);
295 struct gl_texture_unit *texUnit = &ctx->Texture.Unit[ctx->Texture.CurrentUnit];
296 ASSERT_OUTSIDE_BEGIN_END(ctx);
297
298 #define TE_ERROR(errCode, msg, value) \
299 _mesa_error(ctx, errCode, msg, _mesa_lookup_enum_by_nr(value));
300
301 if (target == GL_TEXTURE_ENV) {
302 switch (pname) {
303 case GL_TEXTURE_ENV_MODE:
304 {
305 const GLenum mode = (GLenum) (GLint) *param;
306 if (texUnit->EnvMode == mode)
307 return;
308 if (mode == GL_MODULATE ||
309 mode == GL_BLEND ||
310 mode == GL_DECAL ||
311 mode == GL_REPLACE ||
312 (mode == GL_ADD && ctx->Extensions.EXT_texture_env_add) ||
313 (mode == GL_COMBINE &&
314 (ctx->Extensions.EXT_texture_env_combine ||
315 ctx->Extensions.ARB_texture_env_combine))) {
316 /* legal */
317 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
318 texUnit->EnvMode = mode;
319 }
320 else {
321 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", mode);
322 return;
323 }
324 }
325 break;
326 case GL_TEXTURE_ENV_COLOR:
327 {
328 GLfloat tmp[4];
329 tmp[0] = CLAMP( param[0], 0.0F, 1.0F );
330 tmp[1] = CLAMP( param[1], 0.0F, 1.0F );
331 tmp[2] = CLAMP( param[2], 0.0F, 1.0F );
332 tmp[3] = CLAMP( param[3], 0.0F, 1.0F );
333 if (TEST_EQ_4V(tmp, texUnit->EnvColor))
334 return;
335 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
336 COPY_4FV(texUnit->EnvColor, tmp);
337 }
338 break;
339 case GL_COMBINE_RGB:
340 if (ctx->Extensions.EXT_texture_env_combine ||
341 ctx->Extensions.ARB_texture_env_combine) {
342 const GLenum mode = (GLenum) (GLint) *param;
343 if (texUnit->Combine.ModeRGB == mode)
344 return;
345 switch (mode) {
346 case GL_REPLACE:
347 case GL_MODULATE:
348 case GL_ADD:
349 case GL_ADD_SIGNED:
350 case GL_INTERPOLATE:
351 /* OK */
352 break;
353 case GL_SUBTRACT:
354 if (!ctx->Extensions.ARB_texture_env_combine) {
355 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", mode);
356 return;
357 }
358 break;
359 case GL_DOT3_RGB_EXT:
360 case GL_DOT3_RGBA_EXT:
361 if (!ctx->Extensions.EXT_texture_env_dot3) {
362 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", mode);
363 return;
364 }
365 break;
366 case GL_DOT3_RGB:
367 case GL_DOT3_RGBA:
368 if (!ctx->Extensions.ARB_texture_env_dot3) {
369 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", mode);
370 return;
371 }
372 break;
373 case GL_MODULATE_ADD_ATI:
374 case GL_MODULATE_SIGNED_ADD_ATI:
375 case GL_MODULATE_SUBTRACT_ATI:
376 if (!ctx->Extensions.ATI_texture_env_combine3) {
377 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", mode);
378 return;
379 }
380 break;
381 default:
382 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", mode);
383 return;
384 }
385 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
386 texUnit->Combine.ModeRGB = mode;
387 }
388 else {
389 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(pname=%s)", pname);
390 return;
391 }
392 break;
393 case GL_COMBINE_ALPHA:
394 if (ctx->Extensions.EXT_texture_env_combine ||
395 ctx->Extensions.ARB_texture_env_combine) {
396 const GLenum mode = (GLenum) (GLint) *param;
397 if (texUnit->Combine.ModeA == mode)
398 return;
399 switch (mode) {
400 case GL_REPLACE:
401 case GL_MODULATE:
402 case GL_ADD:
403 case GL_ADD_SIGNED:
404 case GL_INTERPOLATE:
405 /* OK */
406 break;
407 case GL_SUBTRACT:
408 if (!ctx->Extensions.ARB_texture_env_combine) {
409 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", mode);
410 return;
411 }
412 break;
413 case GL_MODULATE_ADD_ATI:
414 case GL_MODULATE_SIGNED_ADD_ATI:
415 case GL_MODULATE_SUBTRACT_ATI:
416 if (!ctx->Extensions.ATI_texture_env_combine3) {
417 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", mode);
418 return;
419 }
420 break;
421 default:
422 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", mode);
423 return;
424 }
425 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
426 texUnit->Combine.ModeA = mode;
427 }
428 else {
429 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(pname=%s)", pname);
430 return;
431 }
432 break;
433 case GL_SOURCE0_RGB:
434 case GL_SOURCE1_RGB:
435 case GL_SOURCE2_RGB:
436 if (ctx->Extensions.EXT_texture_env_combine ||
437 ctx->Extensions.ARB_texture_env_combine) {
438 const GLenum source = (GLenum) (GLint) *param;
439 const GLuint s = pname - GL_SOURCE0_RGB;
440 if (texUnit->Combine.SourceRGB[s] == source)
441 return;
442 if (source == GL_TEXTURE ||
443 source == GL_CONSTANT ||
444 source == GL_PRIMARY_COLOR ||
445 source == GL_PREVIOUS ||
446 (ctx->Extensions.ARB_texture_env_crossbar &&
447 source >= GL_TEXTURE0 &&
448 source < GL_TEXTURE0 + ctx->Const.MaxTextureUnits) ||
449 (ctx->Extensions.ATI_texture_env_combine3 &&
450 (source == GL_ZERO || source == GL_ONE))) {
451 /* legal */
452 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
453 texUnit->Combine.SourceRGB[s] = source;
454 }
455 else {
456 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", source);
457 return;
458 }
459 }
460 else {
461 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(pname=%s)", pname);
462 return;
463 }
464 break;
465 case GL_SOURCE0_ALPHA:
466 case GL_SOURCE1_ALPHA:
467 case GL_SOURCE2_ALPHA:
468 if (ctx->Extensions.EXT_texture_env_combine ||
469 ctx->Extensions.ARB_texture_env_combine) {
470 const GLenum source = (GLenum) (GLint) *param;
471 const GLuint s = pname - GL_SOURCE0_ALPHA;
472 if (texUnit->Combine.SourceA[s] == source)
473 return;
474 if (source == GL_TEXTURE ||
475 source == GL_CONSTANT ||
476 source == GL_PRIMARY_COLOR ||
477 source == GL_PREVIOUS ||
478 (ctx->Extensions.ARB_texture_env_crossbar &&
479 source >= GL_TEXTURE0 &&
480 source < GL_TEXTURE0 + ctx->Const.MaxTextureUnits) ||
481 (ctx->Extensions.ATI_texture_env_combine3 &&
482 (source == GL_ZERO || source == GL_ONE))) {
483 /* legal */
484 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
485 texUnit->Combine.SourceA[s] = source;
486 }
487 else {
488 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", source);
489 return;
490 }
491 }
492 else {
493 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(pname=%s)", pname);
494 return;
495 }
496 break;
497 case GL_OPERAND0_RGB:
498 case GL_OPERAND1_RGB:
499 if (ctx->Extensions.EXT_texture_env_combine ||
500 ctx->Extensions.ARB_texture_env_combine) {
501 const GLenum operand = (GLenum) (GLint) *param;
502 const GLuint s = pname - GL_OPERAND0_RGB;
503 if (texUnit->Combine.OperandRGB[s] == operand)
504 return;
505 switch (operand) {
506 case GL_SRC_COLOR:
507 case GL_ONE_MINUS_SRC_COLOR:
508 case GL_SRC_ALPHA:
509 case GL_ONE_MINUS_SRC_ALPHA:
510 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
511 texUnit->Combine.OperandRGB[s] = operand;
512 break;
513 default:
514 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", operand);
515 return;
516 }
517 }
518 else {
519 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(pname=%s)", pname);
520 return;
521 }
522 break;
523 case GL_OPERAND0_ALPHA:
524 case GL_OPERAND1_ALPHA:
525 if (ctx->Extensions.EXT_texture_env_combine ||
526 ctx->Extensions.ARB_texture_env_combine) {
527 const GLenum operand = (GLenum) (GLint) *param;
528 if (texUnit->Combine.OperandA[pname-GL_OPERAND0_ALPHA] == operand)
529 return;
530 switch (operand) {
531 case GL_SRC_ALPHA:
532 case GL_ONE_MINUS_SRC_ALPHA:
533 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
534 texUnit->Combine.OperandA[pname-GL_OPERAND0_ALPHA] = operand;
535 break;
536 default:
537 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", operand);
538 return;
539 }
540 }
541 else {
542 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(pname=%s)", pname);
543 return;
544 }
545 break;
546 case GL_OPERAND2_RGB:
547 if (ctx->Extensions.ARB_texture_env_combine) {
548 const GLenum operand = (GLenum) (GLint) *param;
549 if (texUnit->Combine.OperandRGB[2] == operand)
550 return;
551 switch (operand) {
552 case GL_SRC_COLOR: /* ARB combine only */
553 case GL_ONE_MINUS_SRC_COLOR: /* ARB combine only */
554 case GL_SRC_ALPHA:
555 case GL_ONE_MINUS_SRC_ALPHA: /* ARB combine only */
556 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
557 texUnit->Combine.OperandRGB[2] = operand;
558 break;
559 default:
560 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", operand);
561 return;
562 }
563 }
564 else if (ctx->Extensions.EXT_texture_env_combine) {
565 const GLenum operand = (GLenum) (GLint) *param;
566 if (texUnit->Combine.OperandRGB[2] == operand)
567 return;
568 /* operand must be GL_SRC_ALPHA which is the initial value - thus
569 don't need to actually compare the operand to the possible value */
570 else {
571 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", operand);
572 return;
573 }
574 }
575 else {
576 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(pname=%s)", pname);
577 return;
578 }
579 break;
580 case GL_OPERAND2_ALPHA:
581 if (ctx->Extensions.ARB_texture_env_combine) {
582 const GLenum operand = (GLenum) (GLint) *param;
583 if (texUnit->Combine.OperandA[2] == operand)
584 return;
585 switch (operand) {
586 case GL_SRC_ALPHA:
587 case GL_ONE_MINUS_SRC_ALPHA: /* ARB combine only */
588 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
589 texUnit->Combine.OperandA[2] = operand;
590 break;
591 default:
592 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", operand);
593 return;
594 }
595 }
596 else if (ctx->Extensions.EXT_texture_env_combine) {
597 const GLenum operand = (GLenum) (GLint) *param;
598 if (texUnit->Combine.OperandA[2] == operand)
599 return;
600 /* operand must be GL_SRC_ALPHA which is the initial value - thus
601 don't need to actually compare the operand to the possible value */
602 else {
603 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(param=%s)", operand);
604 return;
605 }
606 }
607 else {
608 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(pname=%s)", pname);
609 return;
610 }
611 break;
612 case GL_RGB_SCALE:
613 if (ctx->Extensions.EXT_texture_env_combine ||
614 ctx->Extensions.ARB_texture_env_combine) {
615 GLuint newshift;
616 if (*param == 1.0) {
617 newshift = 0;
618 }
619 else if (*param == 2.0) {
620 newshift = 1;
621 }
622 else if (*param == 4.0) {
623 newshift = 2;
624 }
625 else {
626 _mesa_error( ctx, GL_INVALID_VALUE,
627 "glTexEnv(GL_RGB_SCALE not 1, 2 or 4)" );
628 return;
629 }
630 if (texUnit->Combine.ScaleShiftRGB == newshift)
631 return;
632 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
633 texUnit->Combine.ScaleShiftRGB = newshift;
634 }
635 else {
636 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(pname=%s)", pname);
637 return;
638 }
639 break;
640 case GL_ALPHA_SCALE:
641 if (ctx->Extensions.EXT_texture_env_combine ||
642 ctx->Extensions.ARB_texture_env_combine) {
643 GLuint newshift;
644 if (*param == 1.0) {
645 newshift = 0;
646 }
647 else if (*param == 2.0) {
648 newshift = 1;
649 }
650 else if (*param == 4.0) {
651 newshift = 2;
652 }
653 else {
654 _mesa_error( ctx, GL_INVALID_VALUE,
655 "glTexEnv(GL_ALPHA_SCALE not 1, 2 or 4)" );
656 return;
657 }
658 if (texUnit->Combine.ScaleShiftA == newshift)
659 return;
660 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
661 texUnit->Combine.ScaleShiftA = newshift;
662 }
663 else {
664 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(pname=%s)", pname);
665 return;
666 }
667 break;
668 default:
669 _mesa_error( ctx, GL_INVALID_ENUM, "glTexEnv(pname)" );
670 return;
671 }
672 }
673 else if (target == GL_TEXTURE_FILTER_CONTROL_EXT) {
674 /* GL_EXT_texture_lod_bias */
675 if (!ctx->Extensions.EXT_texture_lod_bias) {
676 _mesa_error( ctx, GL_INVALID_ENUM, "glTexEnv(target=0x%x)", target );
677 return;
678 }
679 if (pname == GL_TEXTURE_LOD_BIAS_EXT) {
680 if (texUnit->LodBias == param[0])
681 return;
682 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
683 texUnit->LodBias = param[0];
684 }
685 else {
686 TE_ERROR(GL_INVALID_ENUM, "glTexEnv(pname=%s)", pname);
687 return;
688 }
689 }
690 else if (target == GL_POINT_SPRITE_NV) {
691 /* GL_ARB_point_sprite / GL_NV_point_sprite */
692 if (!ctx->Extensions.NV_point_sprite
693 && !ctx->Extensions.ARB_point_sprite) {
694 _mesa_error( ctx, GL_INVALID_ENUM, "glTexEnv(target=0x%x)", target );
695 return;
696 }
697 if (pname == GL_COORD_REPLACE_NV) {
698 const GLenum value = (GLenum) param[0];
699 if (value == GL_TRUE || value == GL_FALSE) {
700 /* It's kind of weird to set point state via glTexEnv,
701 * but that's what the spec calls for.
702 */
703 const GLboolean state = (GLboolean) value;
704 if (ctx->Point.CoordReplace[ctx->Texture.CurrentUnit] == state)
705 return;
706 FLUSH_VERTICES(ctx, _NEW_POINT);
707 ctx->Point.CoordReplace[ctx->Texture.CurrentUnit] = state;
708 }
709 else {
710 _mesa_error( ctx, GL_INVALID_VALUE, "glTexEnv(param=0x%x)", value);
711 return;
712 }
713 }
714 else {
715 _mesa_error( ctx, GL_INVALID_ENUM, "glTexEnv(pname=0x%x)", pname );
716 return;
717 }
718 }
719 else {
720 _mesa_error( ctx, GL_INVALID_ENUM, "glTexEnv(target=0x%x)",target );
721 return;
722 }
723
724 if (MESA_VERBOSE&(VERBOSE_API|VERBOSE_TEXTURE))
725 _mesa_debug(ctx, "glTexEnv %s %s %.1f(%s) ...\n",
726 _mesa_lookup_enum_by_nr(target),
727 _mesa_lookup_enum_by_nr(pname),
728 *param,
729 _mesa_lookup_enum_by_nr((GLenum) (GLint) *param));
730
731 /* Tell device driver about the new texture environment */
732 if (ctx->Driver.TexEnv) {
733 (*ctx->Driver.TexEnv)( ctx, target, pname, param );
734 }
735 }
736
737
738 void GLAPIENTRY
739 _mesa_TexEnvf( GLenum target, GLenum pname, GLfloat param )
740 {
741 _mesa_TexEnvfv( target, pname, &param );
742 }
743
744
745
746 void GLAPIENTRY
747 _mesa_TexEnvi( GLenum target, GLenum pname, GLint param )
748 {
749 GLfloat p[4];
750 p[0] = (GLfloat) param;
751 p[1] = p[2] = p[3] = 0.0;
752 _mesa_TexEnvfv( target, pname, p );
753 }
754
755
756 void GLAPIENTRY
757 _mesa_TexEnviv( GLenum target, GLenum pname, const GLint *param )
758 {
759 GLfloat p[4];
760 if (pname == GL_TEXTURE_ENV_COLOR) {
761 p[0] = INT_TO_FLOAT( param[0] );
762 p[1] = INT_TO_FLOAT( param[1] );
763 p[2] = INT_TO_FLOAT( param[2] );
764 p[3] = INT_TO_FLOAT( param[3] );
765 }
766 else {
767 p[0] = (GLfloat) param[0];
768 p[1] = p[2] = p[3] = 0; /* init to zero, just to be safe */
769 }
770 _mesa_TexEnvfv( target, pname, p );
771 }
772
773
774 void GLAPIENTRY
775 _mesa_GetTexEnvfv( GLenum target, GLenum pname, GLfloat *params )
776 {
777 GET_CURRENT_CONTEXT(ctx);
778 const struct gl_texture_unit *texUnit = &ctx->Texture.Unit[ctx->Texture.CurrentUnit];
779 ASSERT_OUTSIDE_BEGIN_END(ctx);
780
781 if (target == GL_TEXTURE_ENV) {
782 switch (pname) {
783 case GL_TEXTURE_ENV_MODE:
784 *params = ENUM_TO_FLOAT(texUnit->EnvMode);
785 break;
786 case GL_TEXTURE_ENV_COLOR:
787 COPY_4FV( params, texUnit->EnvColor );
788 break;
789 case GL_COMBINE_RGB:
790 if (ctx->Extensions.EXT_texture_env_combine ||
791 ctx->Extensions.ARB_texture_env_combine) {
792 *params = (GLfloat) texUnit->Combine.ModeRGB;
793 }
794 else {
795 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
796 }
797 break;
798 case GL_COMBINE_ALPHA:
799 if (ctx->Extensions.EXT_texture_env_combine ||
800 ctx->Extensions.ARB_texture_env_combine) {
801 *params = (GLfloat) texUnit->Combine.ModeA;
802 }
803 else {
804 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
805 }
806 break;
807 case GL_SOURCE0_RGB:
808 if (ctx->Extensions.EXT_texture_env_combine ||
809 ctx->Extensions.ARB_texture_env_combine) {
810 *params = (GLfloat) texUnit->Combine.SourceRGB[0];
811 }
812 else {
813 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
814 }
815 break;
816 case GL_SOURCE1_RGB:
817 if (ctx->Extensions.EXT_texture_env_combine ||
818 ctx->Extensions.ARB_texture_env_combine) {
819 *params = (GLfloat) texUnit->Combine.SourceRGB[1];
820 }
821 else {
822 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
823 }
824 break;
825 case GL_SOURCE2_RGB:
826 if (ctx->Extensions.EXT_texture_env_combine ||
827 ctx->Extensions.ARB_texture_env_combine) {
828 *params = (GLfloat) texUnit->Combine.SourceRGB[2];
829 }
830 else {
831 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
832 }
833 break;
834 case GL_SOURCE0_ALPHA:
835 if (ctx->Extensions.EXT_texture_env_combine ||
836 ctx->Extensions.ARB_texture_env_combine) {
837 *params = (GLfloat) texUnit->Combine.SourceA[0];
838 }
839 else {
840 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
841 }
842 break;
843 case GL_SOURCE1_ALPHA:
844 if (ctx->Extensions.EXT_texture_env_combine ||
845 ctx->Extensions.ARB_texture_env_combine) {
846 *params = (GLfloat) texUnit->Combine.SourceA[1];
847 }
848 else {
849 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
850 }
851 break;
852 case GL_SOURCE2_ALPHA:
853 if (ctx->Extensions.EXT_texture_env_combine ||
854 ctx->Extensions.ARB_texture_env_combine) {
855 *params = (GLfloat) texUnit->Combine.SourceA[2];
856 }
857 else {
858 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
859 }
860 break;
861 case GL_OPERAND0_RGB:
862 if (ctx->Extensions.EXT_texture_env_combine ||
863 ctx->Extensions.ARB_texture_env_combine) {
864 *params = (GLfloat) texUnit->Combine.OperandRGB[0];
865 }
866 else {
867 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
868 }
869 break;
870 case GL_OPERAND1_RGB:
871 if (ctx->Extensions.EXT_texture_env_combine ||
872 ctx->Extensions.ARB_texture_env_combine) {
873 *params = (GLfloat) texUnit->Combine.OperandRGB[1];
874 }
875 else {
876 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
877 }
878 break;
879 case GL_OPERAND2_RGB:
880 if (ctx->Extensions.EXT_texture_env_combine ||
881 ctx->Extensions.ARB_texture_env_combine) {
882 *params = (GLfloat) texUnit->Combine.OperandRGB[2];
883 }
884 else {
885 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
886 }
887 break;
888 case GL_OPERAND0_ALPHA:
889 if (ctx->Extensions.EXT_texture_env_combine ||
890 ctx->Extensions.ARB_texture_env_combine) {
891 *params = (GLfloat) texUnit->Combine.OperandA[0];
892 }
893 else {
894 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
895 }
896 break;
897 case GL_OPERAND1_ALPHA:
898 if (ctx->Extensions.EXT_texture_env_combine ||
899 ctx->Extensions.ARB_texture_env_combine) {
900 *params = (GLfloat) texUnit->Combine.OperandA[1];
901 }
902 else {
903 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
904 }
905 break;
906 case GL_OPERAND2_ALPHA:
907 if (ctx->Extensions.EXT_texture_env_combine ||
908 ctx->Extensions.ARB_texture_env_combine) {
909 *params = (GLfloat) texUnit->Combine.OperandA[2];
910 }
911 else {
912 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
913 }
914 break;
915 case GL_RGB_SCALE:
916 if (ctx->Extensions.EXT_texture_env_combine ||
917 ctx->Extensions.ARB_texture_env_combine) {
918 if (texUnit->Combine.ScaleShiftRGB == 0)
919 *params = 1.0;
920 else if (texUnit->Combine.ScaleShiftRGB == 1)
921 *params = 2.0;
922 else
923 *params = 4.0;
924 }
925 else {
926 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
927 return;
928 }
929 break;
930 case GL_ALPHA_SCALE:
931 if (ctx->Extensions.EXT_texture_env_combine ||
932 ctx->Extensions.ARB_texture_env_combine) {
933 if (texUnit->Combine.ScaleShiftA == 0)
934 *params = 1.0;
935 else if (texUnit->Combine.ScaleShiftA == 1)
936 *params = 2.0;
937 else
938 *params = 4.0;
939 }
940 else {
941 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)");
942 return;
943 }
944 break;
945 default:
946 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname=0x%x)", pname);
947 }
948 }
949 else if (target == GL_TEXTURE_FILTER_CONTROL_EXT) {
950 /* GL_EXT_texture_lod_bias */
951 if (!ctx->Extensions.EXT_texture_lod_bias) {
952 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexEnvfv(target)" );
953 return;
954 }
955 if (pname == GL_TEXTURE_LOD_BIAS_EXT) {
956 *params = texUnit->LodBias;
957 }
958 else {
959 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)" );
960 return;
961 }
962 }
963 else if (target == GL_POINT_SPRITE_NV) {
964 /* GL_ARB_point_sprite / GL_NV_point_sprite */
965 if (!ctx->Extensions.NV_point_sprite
966 && !ctx->Extensions.ARB_point_sprite) {
967 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexEnvfv(target)" );
968 return;
969 }
970 if (pname == GL_COORD_REPLACE_NV) {
971 *params = (GLfloat) ctx->Point.CoordReplace[ctx->Texture.CurrentUnit];
972 }
973 else {
974 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexEnvfv(pname)" );
975 return;
976 }
977 }
978 else {
979 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexEnvfv(target)" );
980 return;
981 }
982 }
983
984
985 void GLAPIENTRY
986 _mesa_GetTexEnviv( GLenum target, GLenum pname, GLint *params )
987 {
988 GET_CURRENT_CONTEXT(ctx);
989 const struct gl_texture_unit *texUnit = &ctx->Texture.Unit[ctx->Texture.CurrentUnit];
990 ASSERT_OUTSIDE_BEGIN_END(ctx);
991
992 if (target == GL_TEXTURE_ENV) {
993 switch (pname) {
994 case GL_TEXTURE_ENV_MODE:
995 *params = (GLint) texUnit->EnvMode;
996 break;
997 case GL_TEXTURE_ENV_COLOR:
998 params[0] = FLOAT_TO_INT( texUnit->EnvColor[0] );
999 params[1] = FLOAT_TO_INT( texUnit->EnvColor[1] );
1000 params[2] = FLOAT_TO_INT( texUnit->EnvColor[2] );
1001 params[3] = FLOAT_TO_INT( texUnit->EnvColor[3] );
1002 break;
1003 case GL_COMBINE_RGB:
1004 if (ctx->Extensions.EXT_texture_env_combine ||
1005 ctx->Extensions.ARB_texture_env_combine) {
1006 *params = (GLint) texUnit->Combine.ModeRGB;
1007 }
1008 else {
1009 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1010 }
1011 break;
1012 case GL_COMBINE_ALPHA:
1013 if (ctx->Extensions.EXT_texture_env_combine ||
1014 ctx->Extensions.ARB_texture_env_combine) {
1015 *params = (GLint) texUnit->Combine.ModeA;
1016 }
1017 else {
1018 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1019 }
1020 break;
1021 case GL_SOURCE0_RGB:
1022 if (ctx->Extensions.EXT_texture_env_combine ||
1023 ctx->Extensions.ARB_texture_env_combine) {
1024 *params = (GLint) texUnit->Combine.SourceRGB[0];
1025 }
1026 else {
1027 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1028 }
1029 break;
1030 case GL_SOURCE1_RGB:
1031 if (ctx->Extensions.EXT_texture_env_combine ||
1032 ctx->Extensions.ARB_texture_env_combine) {
1033 *params = (GLint) texUnit->Combine.SourceRGB[1];
1034 }
1035 else {
1036 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1037 }
1038 break;
1039 case GL_SOURCE2_RGB:
1040 if (ctx->Extensions.EXT_texture_env_combine ||
1041 ctx->Extensions.ARB_texture_env_combine) {
1042 *params = (GLint) texUnit->Combine.SourceRGB[2];
1043 }
1044 else {
1045 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1046 }
1047 break;
1048 case GL_SOURCE0_ALPHA:
1049 if (ctx->Extensions.EXT_texture_env_combine ||
1050 ctx->Extensions.ARB_texture_env_combine) {
1051 *params = (GLint) texUnit->Combine.SourceA[0];
1052 }
1053 else {
1054 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1055 }
1056 break;
1057 case GL_SOURCE1_ALPHA:
1058 if (ctx->Extensions.EXT_texture_env_combine ||
1059 ctx->Extensions.ARB_texture_env_combine) {
1060 *params = (GLint) texUnit->Combine.SourceA[1];
1061 }
1062 else {
1063 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1064 }
1065 break;
1066 case GL_SOURCE2_ALPHA:
1067 if (ctx->Extensions.EXT_texture_env_combine ||
1068 ctx->Extensions.ARB_texture_env_combine) {
1069 *params = (GLint) texUnit->Combine.SourceA[2];
1070 }
1071 else {
1072 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1073 }
1074 break;
1075 case GL_OPERAND0_RGB:
1076 if (ctx->Extensions.EXT_texture_env_combine ||
1077 ctx->Extensions.ARB_texture_env_combine) {
1078 *params = (GLint) texUnit->Combine.OperandRGB[0];
1079 }
1080 else {
1081 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1082 }
1083 break;
1084 case GL_OPERAND1_RGB:
1085 if (ctx->Extensions.EXT_texture_env_combine ||
1086 ctx->Extensions.ARB_texture_env_combine) {
1087 *params = (GLint) texUnit->Combine.OperandRGB[1];
1088 }
1089 else {
1090 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1091 }
1092 break;
1093 case GL_OPERAND2_RGB:
1094 if (ctx->Extensions.EXT_texture_env_combine ||
1095 ctx->Extensions.ARB_texture_env_combine) {
1096 *params = (GLint) texUnit->Combine.OperandRGB[2];
1097 }
1098 else {
1099 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1100 }
1101 break;
1102 case GL_OPERAND0_ALPHA:
1103 if (ctx->Extensions.EXT_texture_env_combine ||
1104 ctx->Extensions.ARB_texture_env_combine) {
1105 *params = (GLint) texUnit->Combine.OperandA[0];
1106 }
1107 else {
1108 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1109 }
1110 break;
1111 case GL_OPERAND1_ALPHA:
1112 if (ctx->Extensions.EXT_texture_env_combine ||
1113 ctx->Extensions.ARB_texture_env_combine) {
1114 *params = (GLint) texUnit->Combine.OperandA[1];
1115 }
1116 else {
1117 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1118 }
1119 break;
1120 case GL_OPERAND2_ALPHA:
1121 if (ctx->Extensions.EXT_texture_env_combine ||
1122 ctx->Extensions.ARB_texture_env_combine) {
1123 *params = (GLint) texUnit->Combine.OperandA[2];
1124 }
1125 else {
1126 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1127 }
1128 break;
1129 case GL_RGB_SCALE:
1130 if (ctx->Extensions.EXT_texture_env_combine ||
1131 ctx->Extensions.ARB_texture_env_combine) {
1132 if (texUnit->Combine.ScaleShiftRGB == 0)
1133 *params = 1;
1134 else if (texUnit->Combine.ScaleShiftRGB == 1)
1135 *params = 2;
1136 else
1137 *params = 4;
1138 }
1139 else {
1140 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1141 return;
1142 }
1143 break;
1144 case GL_ALPHA_SCALE:
1145 if (ctx->Extensions.EXT_texture_env_combine ||
1146 ctx->Extensions.ARB_texture_env_combine) {
1147 if (texUnit->Combine.ScaleShiftA == 0)
1148 *params = 1;
1149 else if (texUnit->Combine.ScaleShiftA == 1)
1150 *params = 2;
1151 else
1152 *params = 4;
1153 }
1154 else {
1155 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)");
1156 return;
1157 }
1158 break;
1159 default:
1160 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname=0x%x)",
1161 pname);
1162 }
1163 }
1164 else if (target == GL_TEXTURE_FILTER_CONTROL_EXT) {
1165 /* GL_EXT_texture_lod_bias */
1166 if (!ctx->Extensions.EXT_texture_lod_bias) {
1167 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexEnviv(target)" );
1168 return;
1169 }
1170 if (pname == GL_TEXTURE_LOD_BIAS_EXT) {
1171 *params = (GLint) texUnit->LodBias;
1172 }
1173 else {
1174 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)" );
1175 return;
1176 }
1177 }
1178 else if (target == GL_POINT_SPRITE_NV) {
1179 /* GL_ARB_point_sprite / GL_NV_point_sprite */
1180 if (!ctx->Extensions.NV_point_sprite
1181 && !ctx->Extensions.ARB_point_sprite) {
1182 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexEnviv(target)" );
1183 return;
1184 }
1185 if (pname == GL_COORD_REPLACE_NV) {
1186 *params = (GLint) ctx->Point.CoordReplace[ctx->Texture.CurrentUnit];
1187 }
1188 else {
1189 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexEnviv(pname)" );
1190 return;
1191 }
1192 }
1193 else {
1194 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexEnviv(target)" );
1195 return;
1196 }
1197 }
1198
1199
1200
1201
1202 /**********************************************************************/
1203 /* Texture Parameters */
1204 /**********************************************************************/
1205
1206 static GLboolean
1207 _mesa_validate_texture_wrap_mode(GLcontext * ctx,
1208 GLenum target, GLenum eparam)
1209 {
1210 const struct gl_extensions * const e = & ctx->Extensions;
1211
1212 if (eparam == GL_CLAMP || eparam == GL_CLAMP_TO_EDGE ||
1213 (eparam == GL_CLAMP_TO_BORDER && e->ARB_texture_border_clamp)) {
1214 /* any texture target */
1215 return GL_TRUE;
1216 }
1217 else if (target != GL_TEXTURE_RECTANGLE_NV &&
1218 (eparam == GL_REPEAT ||
1219 (eparam == GL_MIRRORED_REPEAT &&
1220 e->ARB_texture_mirrored_repeat) ||
1221 (eparam == GL_MIRROR_CLAMP_EXT &&
1222 (e->ATI_texture_mirror_once || e->EXT_texture_mirror_clamp)) ||
1223 (eparam == GL_MIRROR_CLAMP_TO_EDGE_EXT &&
1224 (e->ATI_texture_mirror_once || e->EXT_texture_mirror_clamp)) ||
1225 (eparam == GL_MIRROR_CLAMP_TO_BORDER_EXT &&
1226 (e->EXT_texture_mirror_clamp)))) {
1227 /* non-rectangle texture */
1228 return GL_TRUE;
1229 }
1230
1231 _mesa_error( ctx, GL_INVALID_VALUE, "glTexParameter(param)" );
1232 return GL_FALSE;
1233 }
1234
1235
1236 void GLAPIENTRY
1237 _mesa_TexParameterf( GLenum target, GLenum pname, GLfloat param )
1238 {
1239 _mesa_TexParameterfv(target, pname, &param);
1240 }
1241
1242
1243 void GLAPIENTRY
1244 _mesa_TexParameterfv( GLenum target, GLenum pname, const GLfloat *params )
1245 {
1246 GET_CURRENT_CONTEXT(ctx);
1247 struct gl_texture_unit *texUnit = &ctx->Texture.Unit[ctx->Texture.CurrentUnit];
1248 GLenum eparam = (GLenum) (GLint) params[0];
1249 struct gl_texture_object *texObj;
1250 ASSERT_OUTSIDE_BEGIN_END(ctx);
1251
1252 if (MESA_VERBOSE&(VERBOSE_API|VERBOSE_TEXTURE))
1253 _mesa_debug(ctx, "glTexParameter %s %s %.1f(%s)...\n",
1254 _mesa_lookup_enum_by_nr(target),
1255 _mesa_lookup_enum_by_nr(pname),
1256 *params,
1257 _mesa_lookup_enum_by_nr(eparam));
1258
1259
1260 switch (target) {
1261 case GL_TEXTURE_1D:
1262 texObj = texUnit->Current1D;
1263 break;
1264 case GL_TEXTURE_2D:
1265 texObj = texUnit->Current2D;
1266 break;
1267 case GL_TEXTURE_3D:
1268 texObj = texUnit->Current3D;
1269 break;
1270 case GL_TEXTURE_CUBE_MAP:
1271 if (!ctx->Extensions.ARB_texture_cube_map) {
1272 _mesa_error( ctx, GL_INVALID_ENUM, "glTexParameter(target)" );
1273 return;
1274 }
1275 texObj = texUnit->CurrentCubeMap;
1276 break;
1277 case GL_TEXTURE_RECTANGLE_NV:
1278 if (!ctx->Extensions.NV_texture_rectangle) {
1279 _mesa_error( ctx, GL_INVALID_ENUM, "glTexParameter(target)" );
1280 return;
1281 }
1282 texObj = texUnit->CurrentRect;
1283 break;
1284 default:
1285 _mesa_error( ctx, GL_INVALID_ENUM, "glTexParameter(target)" );
1286 return;
1287 }
1288
1289 switch (pname) {
1290 case GL_TEXTURE_MIN_FILTER:
1291 /* A small optimization */
1292 if (texObj->MinFilter == eparam)
1293 return;
1294 if (eparam==GL_NEAREST || eparam==GL_LINEAR) {
1295 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1296 texObj->MinFilter = eparam;
1297 }
1298 else if ((eparam==GL_NEAREST_MIPMAP_NEAREST ||
1299 eparam==GL_LINEAR_MIPMAP_NEAREST ||
1300 eparam==GL_NEAREST_MIPMAP_LINEAR ||
1301 eparam==GL_LINEAR_MIPMAP_LINEAR) &&
1302 texObj->Target != GL_TEXTURE_RECTANGLE_NV) {
1303 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1304 texObj->MinFilter = eparam;
1305 }
1306 else {
1307 _mesa_error( ctx, GL_INVALID_VALUE, "glTexParameter(param)" );
1308 return;
1309 }
1310 break;
1311 case GL_TEXTURE_MAG_FILTER:
1312 /* A small optimization */
1313 if (texObj->MagFilter == eparam)
1314 return;
1315
1316 if (eparam==GL_NEAREST || eparam==GL_LINEAR) {
1317 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1318 texObj->MagFilter = eparam;
1319 }
1320 else {
1321 _mesa_error( ctx, GL_INVALID_VALUE, "glTexParameter(param)" );
1322 return;
1323 }
1324 break;
1325 case GL_TEXTURE_WRAP_S:
1326 if (texObj->WrapS == eparam)
1327 return;
1328 if (_mesa_validate_texture_wrap_mode(ctx, texObj->Target, eparam)) {
1329 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1330 texObj->WrapS = eparam;
1331 }
1332 else {
1333 return;
1334 }
1335 break;
1336 case GL_TEXTURE_WRAP_T:
1337 if (texObj->WrapT == eparam)
1338 return;
1339 if (_mesa_validate_texture_wrap_mode(ctx, texObj->Target, eparam)) {
1340 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1341 texObj->WrapT = eparam;
1342 }
1343 else {
1344 return;
1345 }
1346 break;
1347 case GL_TEXTURE_WRAP_R:
1348 if (texObj->WrapR == eparam)
1349 return;
1350 if (_mesa_validate_texture_wrap_mode(ctx, texObj->Target, eparam)) {
1351 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1352 texObj->WrapR = eparam;
1353 }
1354 else {
1355 return;
1356 }
1357 break;
1358 case GL_TEXTURE_BORDER_COLOR:
1359 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1360 texObj->BorderColor[RCOMP] = params[0];
1361 texObj->BorderColor[GCOMP] = params[1];
1362 texObj->BorderColor[BCOMP] = params[2];
1363 texObj->BorderColor[ACOMP] = params[3];
1364 UNCLAMPED_FLOAT_TO_CHAN(texObj->_BorderChan[RCOMP], params[0]);
1365 UNCLAMPED_FLOAT_TO_CHAN(texObj->_BorderChan[GCOMP], params[1]);
1366 UNCLAMPED_FLOAT_TO_CHAN(texObj->_BorderChan[BCOMP], params[2]);
1367 UNCLAMPED_FLOAT_TO_CHAN(texObj->_BorderChan[ACOMP], params[3]);
1368 break;
1369 case GL_TEXTURE_MIN_LOD:
1370 if (texObj->MinLod == params[0])
1371 return;
1372 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1373 texObj->MinLod = params[0];
1374 break;
1375 case GL_TEXTURE_MAX_LOD:
1376 if (texObj->MaxLod == params[0])
1377 return;
1378 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1379 texObj->MaxLod = params[0];
1380 break;
1381 case GL_TEXTURE_BASE_LEVEL:
1382 if (params[0] < 0.0) {
1383 _mesa_error(ctx, GL_INVALID_VALUE, "glTexParameter(param)" );
1384 return;
1385 }
1386 if (target == GL_TEXTURE_RECTANGLE_NV && params[0] != 0.0) {
1387 _mesa_error(ctx, GL_INVALID_VALUE, "glTexParameter(param)" );
1388 return;
1389 }
1390 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1391 texObj->BaseLevel = (GLint) params[0];
1392 break;
1393 case GL_TEXTURE_MAX_LEVEL:
1394 if (params[0] < 0.0) {
1395 _mesa_error(ctx, GL_INVALID_VALUE, "glTexParameter(param)" );
1396 return;
1397 }
1398 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1399 texObj->MaxLevel = (GLint) params[0];
1400 break;
1401 case GL_TEXTURE_PRIORITY:
1402 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1403 texObj->Priority = CLAMP( params[0], 0.0F, 1.0F );
1404 break;
1405 case GL_TEXTURE_MAX_ANISOTROPY_EXT:
1406 if (ctx->Extensions.EXT_texture_filter_anisotropic) {
1407 if (params[0] < 1.0) {
1408 _mesa_error(ctx, GL_INVALID_VALUE, "glTexParameter(param)" );
1409 return;
1410 }
1411 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1412 /* clamp to max, that's what NVIDIA does */
1413 texObj->MaxAnisotropy = MIN2(params[0],
1414 ctx->Const.MaxTextureMaxAnisotropy);
1415 }
1416 else {
1417 _mesa_error(ctx, GL_INVALID_ENUM,
1418 "glTexParameter(pname=GL_TEXTURE_MAX_ANISOTROPY_EXT)");
1419 return;
1420 }
1421 break;
1422 case GL_TEXTURE_COMPARE_SGIX:
1423 if (ctx->Extensions.SGIX_shadow) {
1424 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1425 texObj->CompareFlag = params[0] ? GL_TRUE : GL_FALSE;
1426 }
1427 else {
1428 _mesa_error(ctx, GL_INVALID_ENUM,
1429 "glTexParameter(pname=GL_TEXTURE_COMPARE_SGIX)");
1430 return;
1431 }
1432 break;
1433 case GL_TEXTURE_COMPARE_OPERATOR_SGIX:
1434 if (ctx->Extensions.SGIX_shadow) {
1435 GLenum op = (GLenum) params[0];
1436 if (op == GL_TEXTURE_LEQUAL_R_SGIX ||
1437 op == GL_TEXTURE_GEQUAL_R_SGIX) {
1438 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1439 texObj->CompareOperator = op;
1440 }
1441 else {
1442 _mesa_error(ctx, GL_INVALID_ENUM, "glTexParameter(param)");
1443 }
1444 }
1445 else {
1446 _mesa_error(ctx, GL_INVALID_ENUM,
1447 "glTexParameter(pname=GL_TEXTURE_COMPARE_OPERATOR_SGIX)");
1448 return;
1449 }
1450 break;
1451 case GL_SHADOW_AMBIENT_SGIX: /* aka GL_TEXTURE_COMPARE_FAIL_VALUE_ARB */
1452 if (ctx->Extensions.SGIX_shadow_ambient) {
1453 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1454 texObj->ShadowAmbient = CLAMP(params[0], 0.0F, 1.0F);
1455 }
1456 else {
1457 _mesa_error(ctx, GL_INVALID_ENUM,
1458 "glTexParameter(pname=GL_SHADOW_AMBIENT_SGIX)");
1459 return;
1460 }
1461 break;
1462 case GL_GENERATE_MIPMAP_SGIS:
1463 if (ctx->Extensions.SGIS_generate_mipmap) {
1464 texObj->GenerateMipmap = params[0] ? GL_TRUE : GL_FALSE;
1465 }
1466 else {
1467 _mesa_error(ctx, GL_INVALID_ENUM,
1468 "glTexParameter(pname=GL_GENERATE_MIPMAP_SGIS)");
1469 return;
1470 }
1471 break;
1472 case GL_TEXTURE_COMPARE_MODE_ARB:
1473 if (ctx->Extensions.ARB_shadow) {
1474 const GLenum mode = (GLenum) params[0];
1475 if (mode == GL_NONE || mode == GL_COMPARE_R_TO_TEXTURE_ARB) {
1476 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1477 texObj->CompareMode = mode;
1478 }
1479 else {
1480 _mesa_error(ctx, GL_INVALID_ENUM,
1481 "glTexParameter(bad GL_TEXTURE_COMPARE_MODE_ARB: 0x%x)", mode);
1482 return;
1483 }
1484 }
1485 else {
1486 _mesa_error(ctx, GL_INVALID_ENUM,
1487 "glTexParameter(pname=GL_TEXTURE_COMPARE_MODE_ARB)");
1488 return;
1489 }
1490 break;
1491 case GL_TEXTURE_COMPARE_FUNC_ARB:
1492 if (ctx->Extensions.ARB_shadow) {
1493 const GLenum func = (GLenum) params[0];
1494 if (func == GL_LEQUAL || func == GL_GEQUAL) {
1495 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1496 texObj->CompareFunc = func;
1497 }
1498 else if (ctx->Extensions.EXT_shadow_funcs &&
1499 (func == GL_EQUAL ||
1500 func == GL_NOTEQUAL ||
1501 func == GL_LESS ||
1502 func == GL_GREATER ||
1503 func == GL_ALWAYS ||
1504 func == GL_NEVER)) {
1505 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1506 texObj->CompareFunc = func;
1507 }
1508 else {
1509 _mesa_error(ctx, GL_INVALID_ENUM,
1510 "glTexParameter(bad GL_TEXTURE_COMPARE_FUNC_ARB)");
1511 return;
1512 }
1513 }
1514 else {
1515 _mesa_error(ctx, GL_INVALID_ENUM,
1516 "glTexParameter(pname=GL_TEXTURE_COMPARE_FUNC_ARB)");
1517 return;
1518 }
1519 break;
1520 case GL_DEPTH_TEXTURE_MODE_ARB:
1521 if (ctx->Extensions.ARB_depth_texture) {
1522 const GLenum result = (GLenum) params[0];
1523 if (result == GL_LUMINANCE || result == GL_INTENSITY
1524 || result == GL_ALPHA) {
1525 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1526 texObj->DepthMode = result;
1527 }
1528 else {
1529 _mesa_error(ctx, GL_INVALID_ENUM,
1530 "glTexParameter(bad GL_DEPTH_TEXTURE_MODE_ARB)");
1531 return;
1532 }
1533 }
1534 else {
1535 _mesa_error(ctx, GL_INVALID_ENUM,
1536 "glTexParameter(pname=GL_DEPTH_TEXTURE_MODE_ARB)");
1537 return;
1538 }
1539 break;
1540 case GL_TEXTURE_LOD_BIAS:
1541 /* NOTE: this is really part of OpenGL 1.4, not EXT_texture_lod_bias*/
1542 if (ctx->Extensions.EXT_texture_lod_bias) {
1543 if (texObj->LodBias != params[0]) {
1544 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
1545 texObj->LodBias = params[0];
1546 }
1547 }
1548 break;
1549
1550 default:
1551 _mesa_error(ctx, GL_INVALID_ENUM,
1552 "glTexParameter(pname=0x%x)", pname);
1553 return;
1554 }
1555
1556 texObj->Complete = GL_FALSE;
1557
1558 if (ctx->Driver.TexParameter) {
1559 (*ctx->Driver.TexParameter)( ctx, target, texObj, pname, params );
1560 }
1561 }
1562
1563
1564 void GLAPIENTRY
1565 _mesa_TexParameteri( GLenum target, GLenum pname, GLint param )
1566 {
1567 GLfloat fparam[4];
1568 if (pname == GL_TEXTURE_PRIORITY)
1569 fparam[0] = INT_TO_FLOAT(param);
1570 else
1571 fparam[0] = (GLfloat) param;
1572 fparam[1] = fparam[2] = fparam[3] = 0.0;
1573 _mesa_TexParameterfv(target, pname, fparam);
1574 }
1575
1576
1577 void GLAPIENTRY
1578 _mesa_TexParameteriv( GLenum target, GLenum pname, const GLint *params )
1579 {
1580 GLfloat fparam[4];
1581 if (pname == GL_TEXTURE_BORDER_COLOR) {
1582 fparam[0] = INT_TO_FLOAT(params[0]);
1583 fparam[1] = INT_TO_FLOAT(params[1]);
1584 fparam[2] = INT_TO_FLOAT(params[2]);
1585 fparam[3] = INT_TO_FLOAT(params[3]);
1586 }
1587 else {
1588 if (pname == GL_TEXTURE_PRIORITY)
1589 fparam[0] = INT_TO_FLOAT(params[0]);
1590 else
1591 fparam[0] = (GLfloat) params[0];
1592 fparam[1] = fparam[2] = fparam[3] = 0.0F;
1593 }
1594 _mesa_TexParameterfv(target, pname, fparam);
1595 }
1596
1597
1598 void GLAPIENTRY
1599 _mesa_GetTexLevelParameterfv( GLenum target, GLint level,
1600 GLenum pname, GLfloat *params )
1601 {
1602 GLint iparam;
1603 _mesa_GetTexLevelParameteriv( target, level, pname, &iparam );
1604 *params = (GLfloat) iparam;
1605 }
1606
1607
1608 static GLuint
1609 tex_image_dimensions(GLcontext *ctx, GLenum target)
1610 {
1611 switch (target) {
1612 case GL_TEXTURE_1D:
1613 case GL_PROXY_TEXTURE_1D:
1614 return 1;
1615 case GL_TEXTURE_2D:
1616 case GL_PROXY_TEXTURE_2D:
1617 return 2;
1618 case GL_TEXTURE_3D:
1619 case GL_PROXY_TEXTURE_3D:
1620 return 3;
1621 case GL_TEXTURE_CUBE_MAP:
1622 case GL_PROXY_TEXTURE_CUBE_MAP:
1623 case GL_TEXTURE_CUBE_MAP_POSITIVE_X:
1624 case GL_TEXTURE_CUBE_MAP_NEGATIVE_X:
1625 case GL_TEXTURE_CUBE_MAP_POSITIVE_Y:
1626 case GL_TEXTURE_CUBE_MAP_NEGATIVE_Y:
1627 case GL_TEXTURE_CUBE_MAP_POSITIVE_Z:
1628 case GL_TEXTURE_CUBE_MAP_NEGATIVE_Z:
1629 return ctx->Extensions.ARB_texture_cube_map ? 2 : 0;
1630 case GL_TEXTURE_RECTANGLE_NV:
1631 case GL_PROXY_TEXTURE_RECTANGLE_NV:
1632 return ctx->Extensions.NV_texture_rectangle ? 2 : 0;
1633 default:
1634 _mesa_problem(ctx, "bad target in _mesa_tex_target_dimensions()");
1635 return 0;
1636 }
1637 }
1638
1639
1640 void GLAPIENTRY
1641 _mesa_GetTexLevelParameteriv( GLenum target, GLint level,
1642 GLenum pname, GLint *params )
1643 {
1644 GET_CURRENT_CONTEXT(ctx);
1645 const struct gl_texture_unit *texUnit = &ctx->Texture.Unit[ctx->Texture.CurrentUnit];
1646 const struct gl_texture_image *img = NULL;
1647 GLuint dimensions;
1648 GLboolean isProxy;
1649 GLint maxLevels;
1650 ASSERT_OUTSIDE_BEGIN_END(ctx);
1651
1652 /* this will catch bad target values */
1653 dimensions = tex_image_dimensions(ctx, target); /* 1, 2 or 3 */
1654 if (dimensions == 0) {
1655 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexLevelParameter[if]v(target)");
1656 return;
1657 }
1658
1659 switch (target) {
1660 case GL_TEXTURE_1D:
1661 case GL_PROXY_TEXTURE_1D:
1662 case GL_TEXTURE_2D:
1663 case GL_PROXY_TEXTURE_2D:
1664 maxLevels = ctx->Const.MaxTextureLevels;
1665 break;
1666 case GL_TEXTURE_3D:
1667 case GL_PROXY_TEXTURE_3D:
1668 maxLevels = ctx->Const.Max3DTextureLevels;
1669 break;
1670 case GL_TEXTURE_CUBE_MAP_POSITIVE_X:
1671 case GL_TEXTURE_CUBE_MAP_NEGATIVE_X:
1672 case GL_TEXTURE_CUBE_MAP_POSITIVE_Y:
1673 case GL_TEXTURE_CUBE_MAP_NEGATIVE_Y:
1674 case GL_TEXTURE_CUBE_MAP_POSITIVE_Z:
1675 case GL_TEXTURE_CUBE_MAP_NEGATIVE_Z:
1676 case GL_PROXY_TEXTURE_CUBE_MAP:
1677 maxLevels = ctx->Const.MaxCubeTextureLevels;
1678 break;
1679 case GL_TEXTURE_RECTANGLE_NV:
1680 case GL_PROXY_TEXTURE_RECTANGLE_NV:
1681 maxLevels = 1;
1682 break;
1683 default:
1684 _mesa_problem(ctx, "switch in _mesa_GetTexLevelParameter");
1685 return;
1686 }
1687
1688 if (level < 0 || level >= maxLevels) {
1689 _mesa_error( ctx, GL_INVALID_VALUE, "glGetTexLevelParameter[if]v" );
1690 return;
1691 }
1692
1693 img = _mesa_select_tex_image(ctx, texUnit, target, level);
1694 if (!img || !img->TexFormat) {
1695 /* undefined texture image */
1696 if (pname == GL_TEXTURE_COMPONENTS)
1697 *params = 1;
1698 else
1699 *params = 0;
1700 return;
1701 }
1702
1703 isProxy = (target == GL_PROXY_TEXTURE_1D) ||
1704 (target == GL_PROXY_TEXTURE_2D) ||
1705 (target == GL_PROXY_TEXTURE_3D) ||
1706 (target == GL_PROXY_TEXTURE_CUBE_MAP) ||
1707 (target == GL_PROXY_TEXTURE_RECTANGLE_NV);
1708
1709 switch (pname) {
1710 case GL_TEXTURE_WIDTH:
1711 *params = img->Width;
1712 return;
1713 case GL_TEXTURE_HEIGHT:
1714 *params = img->Height;
1715 return;
1716 case GL_TEXTURE_DEPTH:
1717 *params = img->Depth;
1718 return;
1719 case GL_TEXTURE_INTERNAL_FORMAT:
1720 *params = img->IntFormat;
1721 return;
1722 case GL_TEXTURE_BORDER:
1723 *params = img->Border;
1724 return;
1725 case GL_TEXTURE_RED_SIZE:
1726 if (img->Format == GL_RGB || img->Format == GL_RGBA)
1727 *params = img->TexFormat->RedBits;
1728 else
1729 *params = 0;
1730 return;
1731 case GL_TEXTURE_GREEN_SIZE:
1732 if (img->Format == GL_RGB || img->Format == GL_RGBA)
1733 *params = img->TexFormat->GreenBits;
1734 else
1735 *params = 0;
1736 return;
1737 case GL_TEXTURE_BLUE_SIZE:
1738 if (img->Format == GL_RGB || img->Format == GL_RGBA)
1739 *params = img->TexFormat->BlueBits;
1740 else
1741 *params = 0;
1742 return;
1743 case GL_TEXTURE_ALPHA_SIZE:
1744 if (img->Format == GL_ALPHA || img->Format == GL_LUMINANCE_ALPHA ||
1745 img->Format == GL_RGBA)
1746 *params = img->TexFormat->AlphaBits;
1747 else
1748 *params = 0;
1749 return;
1750 case GL_TEXTURE_INTENSITY_SIZE:
1751 if (img->Format != GL_INTENSITY)
1752 *params = 0;
1753 else if (img->TexFormat->IntensityBits > 0)
1754 *params = img->TexFormat->IntensityBits;
1755 else /* intensity probably stored as rgb texture */
1756 *params = MIN2(img->TexFormat->RedBits, img->TexFormat->GreenBits);
1757 return;
1758 case GL_TEXTURE_LUMINANCE_SIZE:
1759 if (img->Format != GL_LUMINANCE &&
1760 img->Format != GL_LUMINANCE_ALPHA)
1761 *params = 0;
1762 else if (img->TexFormat->LuminanceBits > 0)
1763 *params = img->TexFormat->LuminanceBits;
1764 else /* luminance probably stored as rgb texture */
1765 *params = MIN2(img->TexFormat->RedBits, img->TexFormat->GreenBits);
1766 return;
1767 case GL_TEXTURE_INDEX_SIZE_EXT:
1768 if (img->Format == GL_COLOR_INDEX)
1769 *params = img->TexFormat->IndexBits;
1770 else
1771 *params = 0;
1772 return;
1773 case GL_DEPTH_BITS:
1774 if (ctx->Extensions.SGIX_depth_texture ||
1775 ctx->Extensions.ARB_depth_texture)
1776 *params = img->TexFormat->DepthBits;
1777 else
1778 _mesa_error(ctx, GL_INVALID_ENUM,
1779 "glGetTexLevelParameter[if]v(pname)");
1780 return;
1781
1782 /* GL_ARB_texture_compression */
1783 case GL_TEXTURE_COMPRESSED_IMAGE_SIZE:
1784 if (ctx->Extensions.ARB_texture_compression) {
1785 if (img->IsCompressed && !isProxy)
1786 *params = img->CompressedSize;
1787 else
1788 _mesa_error(ctx, GL_INVALID_OPERATION,
1789 "glGetTexLevelParameter[if]v(pname)");
1790 }
1791 else {
1792 _mesa_error(ctx, GL_INVALID_ENUM,
1793 "glGetTexLevelParameter[if]v(pname)");
1794 }
1795 return;
1796 case GL_TEXTURE_COMPRESSED:
1797 if (ctx->Extensions.ARB_texture_compression) {
1798 *params = (GLint) img->IsCompressed;
1799 }
1800 else {
1801 _mesa_error(ctx, GL_INVALID_ENUM,
1802 "glGetTexLevelParameter[if]v(pname)");
1803 }
1804 return;
1805
1806 /* GL_ARB_texture_float */
1807 case GL_TEXTURE_RED_TYPE_ARB:
1808 if (ctx->Extensions.ARB_texture_float) {
1809 *params = img->TexFormat->RedBits ? img->TexFormat->DataType : GL_NONE;
1810 }
1811 else {
1812 _mesa_error(ctx, GL_INVALID_ENUM,
1813 "glGetTexLevelParameter[if]v(pname)");
1814 }
1815 return;
1816 case GL_TEXTURE_GREEN_TYPE_ARB:
1817 if (ctx->Extensions.ARB_texture_float) {
1818 *params = img->TexFormat->GreenBits ? img->TexFormat->DataType : GL_NONE;
1819 }
1820 else {
1821 _mesa_error(ctx, GL_INVALID_ENUM,
1822 "glGetTexLevelParameter[if]v(pname)");
1823 }
1824 return;
1825 case GL_TEXTURE_BLUE_TYPE_ARB:
1826 if (ctx->Extensions.ARB_texture_float) {
1827 *params = img->TexFormat->BlueBits ? img->TexFormat->DataType : GL_NONE;
1828 }
1829 else {
1830 _mesa_error(ctx, GL_INVALID_ENUM,
1831 "glGetTexLevelParameter[if]v(pname)");
1832 }
1833 return;
1834 case GL_TEXTURE_ALPHA_TYPE_ARB:
1835 if (ctx->Extensions.ARB_texture_float) {
1836 *params = img->TexFormat->AlphaBits ? img->TexFormat->DataType : GL_NONE;
1837 }
1838 else {
1839 _mesa_error(ctx, GL_INVALID_ENUM,
1840 "glGetTexLevelParameter[if]v(pname)");
1841 }
1842 return;
1843 case GL_TEXTURE_LUMINANCE_TYPE_ARB:
1844 if (ctx->Extensions.ARB_texture_float) {
1845 *params = img->TexFormat->LuminanceBits ? img->TexFormat->DataType : GL_NONE;
1846 }
1847 else {
1848 _mesa_error(ctx, GL_INVALID_ENUM,
1849 "glGetTexLevelParameter[if]v(pname)");
1850 }
1851 return;
1852 case GL_TEXTURE_INTENSITY_TYPE_ARB:
1853 if (ctx->Extensions.ARB_texture_float) {
1854 *params = img->TexFormat->IntensityBits ? img->TexFormat->DataType : GL_NONE;
1855 }
1856 else {
1857 _mesa_error(ctx, GL_INVALID_ENUM,
1858 "glGetTexLevelParameter[if]v(pname)");
1859 }
1860 return;
1861 case GL_TEXTURE_DEPTH_TYPE_ARB:
1862 if (ctx->Extensions.ARB_texture_float) {
1863 *params = img->TexFormat->DepthBits ? img->TexFormat->DataType : GL_NONE;
1864 }
1865 else {
1866 _mesa_error(ctx, GL_INVALID_ENUM,
1867 "glGetTexLevelParameter[if]v(pname)");
1868 }
1869 return;
1870 default:
1871 _mesa_error(ctx, GL_INVALID_ENUM,
1872 "glGetTexLevelParameter[if]v(pname)");
1873 }
1874 }
1875
1876
1877
1878 void GLAPIENTRY
1879 _mesa_GetTexParameterfv( GLenum target, GLenum pname, GLfloat *params )
1880 {
1881 GET_CURRENT_CONTEXT(ctx);
1882 struct gl_texture_unit *texUnit = &ctx->Texture.Unit[ctx->Texture.CurrentUnit];
1883 struct gl_texture_object *obj;
1884 ASSERT_OUTSIDE_BEGIN_END(ctx);
1885
1886 obj = _mesa_select_tex_object(ctx, texUnit, target);
1887 if (!obj) {
1888 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexParameterfv(target)");
1889 return;
1890 }
1891
1892 switch (pname) {
1893 case GL_TEXTURE_MAG_FILTER:
1894 *params = ENUM_TO_FLOAT(obj->MagFilter);
1895 return;
1896 case GL_TEXTURE_MIN_FILTER:
1897 *params = ENUM_TO_FLOAT(obj->MinFilter);
1898 return;
1899 case GL_TEXTURE_WRAP_S:
1900 *params = ENUM_TO_FLOAT(obj->WrapS);
1901 return;
1902 case GL_TEXTURE_WRAP_T:
1903 *params = ENUM_TO_FLOAT(obj->WrapT);
1904 return;
1905 case GL_TEXTURE_WRAP_R:
1906 *params = ENUM_TO_FLOAT(obj->WrapR);
1907 return;
1908 case GL_TEXTURE_BORDER_COLOR:
1909 params[0] = CLAMP(obj->BorderColor[0], 0.0F, 1.0F);
1910 params[1] = CLAMP(obj->BorderColor[1], 0.0F, 1.0F);
1911 params[2] = CLAMP(obj->BorderColor[2], 0.0F, 1.0F);
1912 params[3] = CLAMP(obj->BorderColor[3], 0.0F, 1.0F);
1913 return;
1914 case GL_TEXTURE_RESIDENT:
1915 {
1916 GLboolean resident;
1917 if (ctx->Driver.IsTextureResident)
1918 resident = ctx->Driver.IsTextureResident(ctx, obj);
1919 else
1920 resident = GL_TRUE;
1921 *params = ENUM_TO_FLOAT(resident);
1922 }
1923 return;
1924 case GL_TEXTURE_PRIORITY:
1925 *params = obj->Priority;
1926 return;
1927 case GL_TEXTURE_MIN_LOD:
1928 *params = obj->MinLod;
1929 return;
1930 case GL_TEXTURE_MAX_LOD:
1931 *params = obj->MaxLod;
1932 return;
1933 case GL_TEXTURE_BASE_LEVEL:
1934 *params = (GLfloat) obj->BaseLevel;
1935 return;
1936 case GL_TEXTURE_MAX_LEVEL:
1937 *params = (GLfloat) obj->MaxLevel;
1938 return;
1939 case GL_TEXTURE_MAX_ANISOTROPY_EXT:
1940 if (ctx->Extensions.EXT_texture_filter_anisotropic) {
1941 *params = obj->MaxAnisotropy;
1942 return;
1943 }
1944 break;
1945 case GL_TEXTURE_COMPARE_SGIX:
1946 if (ctx->Extensions.SGIX_shadow) {
1947 *params = (GLfloat) obj->CompareFlag;
1948 return;
1949 }
1950 break;
1951 case GL_TEXTURE_COMPARE_OPERATOR_SGIX:
1952 if (ctx->Extensions.SGIX_shadow) {
1953 *params = (GLfloat) obj->CompareOperator;
1954 return;
1955 }
1956 break;
1957 case GL_SHADOW_AMBIENT_SGIX: /* aka GL_TEXTURE_COMPARE_FAIL_VALUE_ARB */
1958 if (ctx->Extensions.SGIX_shadow_ambient) {
1959 *params = obj->ShadowAmbient;
1960 return;
1961 }
1962 break;
1963 case GL_GENERATE_MIPMAP_SGIS:
1964 if (ctx->Extensions.SGIS_generate_mipmap) {
1965 *params = (GLfloat) obj->GenerateMipmap;
1966 return;
1967 }
1968 break;
1969 case GL_TEXTURE_COMPARE_MODE_ARB:
1970 if (ctx->Extensions.ARB_shadow) {
1971 *params = (GLfloat) obj->CompareMode;
1972 return;
1973 }
1974 break;
1975 case GL_TEXTURE_COMPARE_FUNC_ARB:
1976 if (ctx->Extensions.ARB_shadow) {
1977 *params = (GLfloat) obj->CompareFunc;
1978 return;
1979 }
1980 break;
1981 case GL_DEPTH_TEXTURE_MODE_ARB:
1982 if (ctx->Extensions.ARB_depth_texture) {
1983 *params = (GLfloat) obj->DepthMode;
1984 return;
1985 }
1986 break;
1987 case GL_TEXTURE_LOD_BIAS:
1988 if (ctx->Extensions.EXT_texture_lod_bias) {
1989 *params = obj->LodBias;
1990 return;
1991 }
1992 break;
1993 default:
1994 ; /* silence warnings */
1995 }
1996 /* If we get here, pname was an unrecognized enum */
1997 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexParameterfv(pname=0x%x)",
1998 pname);
1999 }
2000
2001
2002 void GLAPIENTRY
2003 _mesa_GetTexParameteriv( GLenum target, GLenum pname, GLint *params )
2004 {
2005 GET_CURRENT_CONTEXT(ctx);
2006 struct gl_texture_unit *texUnit = &ctx->Texture.Unit[ctx->Texture.CurrentUnit];
2007 struct gl_texture_object *obj;
2008 ASSERT_OUTSIDE_BEGIN_END(ctx);
2009
2010 obj = _mesa_select_tex_object(ctx, texUnit, target);
2011 if (!obj) {
2012 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexParameteriv(target)");
2013 return;
2014 }
2015
2016 switch (pname) {
2017 case GL_TEXTURE_MAG_FILTER:
2018 *params = (GLint) obj->MagFilter;
2019 return;
2020 case GL_TEXTURE_MIN_FILTER:
2021 *params = (GLint) obj->MinFilter;
2022 return;
2023 case GL_TEXTURE_WRAP_S:
2024 *params = (GLint) obj->WrapS;
2025 return;
2026 case GL_TEXTURE_WRAP_T:
2027 *params = (GLint) obj->WrapT;
2028 return;
2029 case GL_TEXTURE_WRAP_R:
2030 *params = (GLint) obj->WrapR;
2031 return;
2032 case GL_TEXTURE_BORDER_COLOR:
2033 {
2034 GLfloat b[4];
2035 b[0] = CLAMP(obj->BorderColor[0], 0.0F, 1.0F);
2036 b[1] = CLAMP(obj->BorderColor[1], 0.0F, 1.0F);
2037 b[2] = CLAMP(obj->BorderColor[2], 0.0F, 1.0F);
2038 b[3] = CLAMP(obj->BorderColor[3], 0.0F, 1.0F);
2039 params[0] = FLOAT_TO_INT(b[0]);
2040 params[1] = FLOAT_TO_INT(b[1]);
2041 params[2] = FLOAT_TO_INT(b[2]);
2042 params[3] = FLOAT_TO_INT(b[3]);
2043 }
2044 return;
2045 case GL_TEXTURE_RESIDENT:
2046 {
2047 GLboolean resident;
2048 if (ctx->Driver.IsTextureResident)
2049 resident = ctx->Driver.IsTextureResident(ctx, obj);
2050 else
2051 resident = GL_TRUE;
2052 *params = (GLint) resident;
2053 }
2054 return;
2055 case GL_TEXTURE_PRIORITY:
2056 *params = FLOAT_TO_INT(obj->Priority);
2057 return;
2058 case GL_TEXTURE_MIN_LOD:
2059 *params = (GLint) obj->MinLod;
2060 return;
2061 case GL_TEXTURE_MAX_LOD:
2062 *params = (GLint) obj->MaxLod;
2063 return;
2064 case GL_TEXTURE_BASE_LEVEL:
2065 *params = obj->BaseLevel;
2066 return;
2067 case GL_TEXTURE_MAX_LEVEL:
2068 *params = obj->MaxLevel;
2069 return;
2070 case GL_TEXTURE_MAX_ANISOTROPY_EXT:
2071 if (ctx->Extensions.EXT_texture_filter_anisotropic) {
2072 *params = (GLint) obj->MaxAnisotropy;
2073 return;
2074 }
2075 break;
2076 case GL_TEXTURE_COMPARE_SGIX:
2077 if (ctx->Extensions.SGIX_shadow) {
2078 *params = (GLint) obj->CompareFlag;
2079 return;
2080 }
2081 break;
2082 case GL_TEXTURE_COMPARE_OPERATOR_SGIX:
2083 if (ctx->Extensions.SGIX_shadow) {
2084 *params = (GLint) obj->CompareOperator;
2085 return;
2086 }
2087 break;
2088 case GL_SHADOW_AMBIENT_SGIX: /* aka GL_TEXTURE_COMPARE_FAIL_VALUE_ARB */
2089 if (ctx->Extensions.SGIX_shadow_ambient) {
2090 *params = (GLint) FLOAT_TO_INT(obj->ShadowAmbient);
2091 return;
2092 }
2093 break;
2094 case GL_GENERATE_MIPMAP_SGIS:
2095 if (ctx->Extensions.SGIS_generate_mipmap) {
2096 *params = (GLint) obj->GenerateMipmap;
2097 return;
2098 }
2099 break;
2100 case GL_TEXTURE_COMPARE_MODE_ARB:
2101 if (ctx->Extensions.ARB_shadow) {
2102 *params = (GLint) obj->CompareMode;
2103 return;
2104 }
2105 break;
2106 case GL_TEXTURE_COMPARE_FUNC_ARB:
2107 if (ctx->Extensions.ARB_shadow) {
2108 *params = (GLint) obj->CompareFunc;
2109 return;
2110 }
2111 break;
2112 case GL_DEPTH_TEXTURE_MODE_ARB:
2113 if (ctx->Extensions.ARB_depth_texture) {
2114 *params = (GLint) obj->DepthMode;
2115 return;
2116 }
2117 break;
2118 case GL_TEXTURE_LOD_BIAS:
2119 if (ctx->Extensions.EXT_texture_lod_bias) {
2120 *params = (GLint) obj->LodBias;
2121 return;
2122 }
2123 break;
2124 default:
2125 ; /* silence warnings */
2126 }
2127 /* If we get here, pname was an unrecognized enum */
2128 _mesa_error(ctx, GL_INVALID_ENUM, "glGetTexParameteriv(pname=0x%x)", pname);
2129 }
2130
2131
2132
2133
2134 /**********************************************************************/
2135 /* Texture Coord Generation */
2136 /**********************************************************************/
2137
2138 #if FEATURE_texgen
2139 void GLAPIENTRY
2140 _mesa_TexGenfv( GLenum coord, GLenum pname, const GLfloat *params )
2141 {
2142 GET_CURRENT_CONTEXT(ctx);
2143 GLuint tUnit = ctx->Texture.CurrentUnit;
2144 struct gl_texture_unit *texUnit = &ctx->Texture.Unit[tUnit];
2145 ASSERT_OUTSIDE_BEGIN_END(ctx);
2146
2147 if (MESA_VERBOSE&(VERBOSE_API|VERBOSE_TEXTURE))
2148 _mesa_debug(ctx, "glTexGen %s %s %.1f(%s)...\n",
2149 _mesa_lookup_enum_by_nr(coord),
2150 _mesa_lookup_enum_by_nr(pname),
2151 *params,
2152 _mesa_lookup_enum_by_nr((GLenum) (GLint) *params));
2153
2154 switch (coord) {
2155 case GL_S:
2156 if (pname==GL_TEXTURE_GEN_MODE) {
2157 GLenum mode = (GLenum) (GLint) *params;
2158 GLuint bits;
2159 switch (mode) {
2160 case GL_OBJECT_LINEAR:
2161 bits = TEXGEN_OBJ_LINEAR;
2162 break;
2163 case GL_EYE_LINEAR:
2164 bits = TEXGEN_EYE_LINEAR;
2165 break;
2166 case GL_REFLECTION_MAP_NV:
2167 bits = TEXGEN_REFLECTION_MAP_NV;
2168 break;
2169 case GL_NORMAL_MAP_NV:
2170 bits = TEXGEN_NORMAL_MAP_NV;
2171 break;
2172 case GL_SPHERE_MAP:
2173 bits = TEXGEN_SPHERE_MAP;
2174 break;
2175 default:
2176 _mesa_error( ctx, GL_INVALID_ENUM, "glTexGenfv(param)" );
2177 return;
2178 }
2179 if (texUnit->GenModeS == mode)
2180 return;
2181 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
2182 texUnit->GenModeS = mode;
2183 texUnit->_GenBitS = bits;
2184 }
2185 else if (pname==GL_OBJECT_PLANE) {
2186 if (TEST_EQ_4V(texUnit->ObjectPlaneS, params))
2187 return;
2188 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
2189 texUnit->ObjectPlaneS[0] = params[0];
2190 texUnit->ObjectPlaneS[1] = params[1];
2191 texUnit->ObjectPlaneS[2] = params[2];
2192 texUnit->ObjectPlaneS[3] = params[3];
2193 }
2194 else if (pname==GL_EYE_PLANE) {
2195 GLfloat tmp[4];
2196
2197 /* Transform plane equation by the inverse modelview matrix */
2198 if (_math_matrix_is_dirty(ctx->ModelviewMatrixStack.Top)) {
2199 _math_matrix_analyse( ctx->ModelviewMatrixStack.Top );
2200 }
2201 _mesa_transform_vector( tmp, params, ctx->ModelviewMatrixStack.Top->inv );
2202 if (TEST_EQ_4V(texUnit->EyePlaneS, tmp))
2203 return;
2204 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
2205 COPY_4FV(texUnit->EyePlaneS, tmp);
2206 }
2207 else {
2208 _mesa_error( ctx, GL_INVALID_ENUM, "glTexGenfv(pname)" );
2209 return;
2210 }
2211 break;
2212 case GL_T:
2213 if (pname==GL_TEXTURE_GEN_MODE) {
2214 GLenum mode = (GLenum) (GLint) *params;
2215 GLuint bitt;
2216 switch (mode) {
2217 case GL_OBJECT_LINEAR:
2218 bitt = TEXGEN_OBJ_LINEAR;
2219 break;
2220 case GL_EYE_LINEAR:
2221 bitt = TEXGEN_EYE_LINEAR;
2222 break;
2223 case GL_REFLECTION_MAP_NV:
2224 bitt = TEXGEN_REFLECTION_MAP_NV;
2225 break;
2226 case GL_NORMAL_MAP_NV:
2227 bitt = TEXGEN_NORMAL_MAP_NV;
2228 break;
2229 case GL_SPHERE_MAP:
2230 bitt = TEXGEN_SPHERE_MAP;
2231 break;
2232 default:
2233 _mesa_error( ctx, GL_INVALID_ENUM, "glTexGenfv(param)" );
2234 return;
2235 }
2236 if (texUnit->GenModeT == mode)
2237 return;
2238 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
2239 texUnit->GenModeT = mode;
2240 texUnit->_GenBitT = bitt;
2241 }
2242 else if (pname==GL_OBJECT_PLANE) {
2243 if (TEST_EQ_4V(texUnit->ObjectPlaneT, params))
2244 return;
2245 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
2246 texUnit->ObjectPlaneT[0] = params[0];
2247 texUnit->ObjectPlaneT[1] = params[1];
2248 texUnit->ObjectPlaneT[2] = params[2];
2249 texUnit->ObjectPlaneT[3] = params[3];
2250 }
2251 else if (pname==GL_EYE_PLANE) {
2252 GLfloat tmp[4];
2253 /* Transform plane equation by the inverse modelview matrix */
2254 if (_math_matrix_is_dirty(ctx->ModelviewMatrixStack.Top)) {
2255 _math_matrix_analyse( ctx->ModelviewMatrixStack.Top );
2256 }
2257 _mesa_transform_vector( tmp, params, ctx->ModelviewMatrixStack.Top->inv );
2258 if (TEST_EQ_4V(texUnit->EyePlaneT, tmp))
2259 return;
2260 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
2261 COPY_4FV(texUnit->EyePlaneT, tmp);
2262 }
2263 else {
2264 _mesa_error( ctx, GL_INVALID_ENUM, "glTexGenfv(pname)" );
2265 return;
2266 }
2267 break;
2268 case GL_R:
2269 if (pname==GL_TEXTURE_GEN_MODE) {
2270 GLenum mode = (GLenum) (GLint) *params;
2271 GLuint bitr;
2272 switch (mode) {
2273 case GL_OBJECT_LINEAR:
2274 bitr = TEXGEN_OBJ_LINEAR;
2275 break;
2276 case GL_REFLECTION_MAP_NV:
2277 bitr = TEXGEN_REFLECTION_MAP_NV;
2278 break;
2279 case GL_NORMAL_MAP_NV:
2280 bitr = TEXGEN_NORMAL_MAP_NV;
2281 break;
2282 case GL_EYE_LINEAR:
2283 bitr = TEXGEN_EYE_LINEAR;
2284 break;
2285 default:
2286 _mesa_error( ctx, GL_INVALID_ENUM, "glTexGenfv(param)" );
2287 return;
2288 }
2289 if (texUnit->GenModeR == mode)
2290 return;
2291 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
2292 texUnit->GenModeR = mode;
2293 texUnit->_GenBitR = bitr;
2294 }
2295 else if (pname==GL_OBJECT_PLANE) {
2296 if (TEST_EQ_4V(texUnit->ObjectPlaneR, params))
2297 return;
2298 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
2299 texUnit->ObjectPlaneR[0] = params[0];
2300 texUnit->ObjectPlaneR[1] = params[1];
2301 texUnit->ObjectPlaneR[2] = params[2];
2302 texUnit->ObjectPlaneR[3] = params[3];
2303 }
2304 else if (pname==GL_EYE_PLANE) {
2305 GLfloat tmp[4];
2306 /* Transform plane equation by the inverse modelview matrix */
2307 if (_math_matrix_is_dirty(ctx->ModelviewMatrixStack.Top)) {
2308 _math_matrix_analyse( ctx->ModelviewMatrixStack.Top );
2309 }
2310 _mesa_transform_vector( tmp, params, ctx->ModelviewMatrixStack.Top->inv );
2311 if (TEST_EQ_4V(texUnit->EyePlaneR, tmp))
2312 return;
2313 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
2314 COPY_4FV(texUnit->EyePlaneR, tmp);
2315 }
2316 else {
2317 _mesa_error( ctx, GL_INVALID_ENUM, "glTexGenfv(pname)" );
2318 return;
2319 }
2320 break;
2321 case GL_Q:
2322 if (pname==GL_TEXTURE_GEN_MODE) {
2323 GLenum mode = (GLenum) (GLint) *params;
2324 GLuint bitq;
2325 switch (mode) {
2326 case GL_OBJECT_LINEAR:
2327 bitq = TEXGEN_OBJ_LINEAR;
2328 break;
2329 case GL_EYE_LINEAR:
2330 bitq = TEXGEN_EYE_LINEAR;
2331 break;
2332 default:
2333 _mesa_error( ctx, GL_INVALID_ENUM, "glTexGenfv(param)" );
2334 return;
2335 }
2336 if (texUnit->GenModeQ == mode)
2337 return;
2338 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
2339 texUnit->GenModeQ = mode;
2340 texUnit->_GenBitQ = bitq;
2341 }
2342 else if (pname==GL_OBJECT_PLANE) {
2343 if (TEST_EQ_4V(texUnit->ObjectPlaneQ, params))
2344 return;
2345 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
2346 texUnit->ObjectPlaneQ[0] = params[0];
2347 texUnit->ObjectPlaneQ[1] = params[1];
2348 texUnit->ObjectPlaneQ[2] = params[2];
2349 texUnit->ObjectPlaneQ[3] = params[3];
2350 }
2351 else if (pname==GL_EYE_PLANE) {
2352 GLfloat tmp[4];
2353 /* Transform plane equation by the inverse modelview matrix */
2354 if (_math_matrix_is_dirty(ctx->ModelviewMatrixStack.Top)) {
2355 _math_matrix_analyse( ctx->ModelviewMatrixStack.Top );
2356 }
2357 _mesa_transform_vector( tmp, params, ctx->ModelviewMatrixStack.Top->inv );
2358 if (TEST_EQ_4V(texUnit->EyePlaneQ, tmp))
2359 return;
2360 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
2361 COPY_4FV(texUnit->EyePlaneQ, tmp);
2362 }
2363 else {
2364 _mesa_error( ctx, GL_INVALID_ENUM, "glTexGenfv(pname)" );
2365 return;
2366 }
2367 break;
2368 default:
2369 _mesa_error( ctx, GL_INVALID_ENUM, "glTexGenfv(coord)" );
2370 return;
2371 }
2372
2373 if (ctx->Driver.TexGen)
2374 ctx->Driver.TexGen( ctx, coord, pname, params );
2375 }
2376
2377
2378 void GLAPIENTRY
2379 _mesa_TexGeniv(GLenum coord, GLenum pname, const GLint *params )
2380 {
2381 GLfloat p[4];
2382 p[0] = (GLfloat) params[0];
2383 if (pname == GL_TEXTURE_GEN_MODE) {
2384 p[1] = p[2] = p[3] = 0.0F;
2385 }
2386 else {
2387 p[1] = (GLfloat) params[1];
2388 p[2] = (GLfloat) params[2];
2389 p[3] = (GLfloat) params[3];
2390 }
2391 _mesa_TexGenfv(coord, pname, p);
2392 }
2393
2394
2395 void GLAPIENTRY
2396 _mesa_TexGend(GLenum coord, GLenum pname, GLdouble param )
2397 {
2398 GLfloat p = (GLfloat) param;
2399 _mesa_TexGenfv( coord, pname, &p );
2400 }
2401
2402
2403 void GLAPIENTRY
2404 _mesa_TexGendv(GLenum coord, GLenum pname, const GLdouble *params )
2405 {
2406 GLfloat p[4];
2407 p[0] = (GLfloat) params[0];
2408 if (pname == GL_TEXTURE_GEN_MODE) {
2409 p[1] = p[2] = p[3] = 0.0F;
2410 }
2411 else {
2412 p[1] = (GLfloat) params[1];
2413 p[2] = (GLfloat) params[2];
2414 p[3] = (GLfloat) params[3];
2415 }
2416 _mesa_TexGenfv( coord, pname, p );
2417 }
2418
2419
2420 void GLAPIENTRY
2421 _mesa_TexGenf( GLenum coord, GLenum pname, GLfloat param )
2422 {
2423 _mesa_TexGenfv(coord, pname, &param);
2424 }
2425
2426
2427 void GLAPIENTRY
2428 _mesa_TexGeni( GLenum coord, GLenum pname, GLint param )
2429 {
2430 _mesa_TexGeniv( coord, pname, &param );
2431 }
2432
2433
2434
2435 void GLAPIENTRY
2436 _mesa_GetTexGendv( GLenum coord, GLenum pname, GLdouble *params )
2437 {
2438 GET_CURRENT_CONTEXT(ctx);
2439 GLuint tUnit = ctx->Texture.CurrentUnit;
2440 struct gl_texture_unit *texUnit = &ctx->Texture.Unit[tUnit];
2441 ASSERT_OUTSIDE_BEGIN_END(ctx);
2442
2443 switch (coord) {
2444 case GL_S:
2445 if (pname==GL_TEXTURE_GEN_MODE) {
2446 params[0] = ENUM_TO_DOUBLE(texUnit->GenModeS);
2447 }
2448 else if (pname==GL_OBJECT_PLANE) {
2449 COPY_4V( params, texUnit->ObjectPlaneS );
2450 }
2451 else if (pname==GL_EYE_PLANE) {
2452 COPY_4V( params, texUnit->EyePlaneS );
2453 }
2454 else {
2455 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGendv(pname)" );
2456 return;
2457 }
2458 break;
2459 case GL_T:
2460 if (pname==GL_TEXTURE_GEN_MODE) {
2461 params[0] = ENUM_TO_DOUBLE(texUnit->GenModeT);
2462 }
2463 else if (pname==GL_OBJECT_PLANE) {
2464 COPY_4V( params, texUnit->ObjectPlaneT );
2465 }
2466 else if (pname==GL_EYE_PLANE) {
2467 COPY_4V( params, texUnit->EyePlaneT );
2468 }
2469 else {
2470 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGendv(pname)" );
2471 return;
2472 }
2473 break;
2474 case GL_R:
2475 if (pname==GL_TEXTURE_GEN_MODE) {
2476 params[0] = ENUM_TO_DOUBLE(texUnit->GenModeR);
2477 }
2478 else if (pname==GL_OBJECT_PLANE) {
2479 COPY_4V( params, texUnit->ObjectPlaneR );
2480 }
2481 else if (pname==GL_EYE_PLANE) {
2482 COPY_4V( params, texUnit->EyePlaneR );
2483 }
2484 else {
2485 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGendv(pname)" );
2486 return;
2487 }
2488 break;
2489 case GL_Q:
2490 if (pname==GL_TEXTURE_GEN_MODE) {
2491 params[0] = ENUM_TO_DOUBLE(texUnit->GenModeQ);
2492 }
2493 else if (pname==GL_OBJECT_PLANE) {
2494 COPY_4V( params, texUnit->ObjectPlaneQ );
2495 }
2496 else if (pname==GL_EYE_PLANE) {
2497 COPY_4V( params, texUnit->EyePlaneQ );
2498 }
2499 else {
2500 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGendv(pname)" );
2501 return;
2502 }
2503 break;
2504 default:
2505 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGendv(coord)" );
2506 return;
2507 }
2508 }
2509
2510
2511
2512 void GLAPIENTRY
2513 _mesa_GetTexGenfv( GLenum coord, GLenum pname, GLfloat *params )
2514 {
2515 GET_CURRENT_CONTEXT(ctx);
2516 GLuint tUnit = ctx->Texture.CurrentUnit;
2517 struct gl_texture_unit *texUnit = &ctx->Texture.Unit[tUnit];
2518 ASSERT_OUTSIDE_BEGIN_END(ctx);
2519
2520 switch (coord) {
2521 case GL_S:
2522 if (pname==GL_TEXTURE_GEN_MODE) {
2523 params[0] = ENUM_TO_FLOAT(texUnit->GenModeS);
2524 }
2525 else if (pname==GL_OBJECT_PLANE) {
2526 COPY_4V( params, texUnit->ObjectPlaneS );
2527 }
2528 else if (pname==GL_EYE_PLANE) {
2529 COPY_4V( params, texUnit->EyePlaneS );
2530 }
2531 else {
2532 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGenfv(pname)" );
2533 return;
2534 }
2535 break;
2536 case GL_T:
2537 if (pname==GL_TEXTURE_GEN_MODE) {
2538 params[0] = ENUM_TO_FLOAT(texUnit->GenModeT);
2539 }
2540 else if (pname==GL_OBJECT_PLANE) {
2541 COPY_4V( params, texUnit->ObjectPlaneT );
2542 }
2543 else if (pname==GL_EYE_PLANE) {
2544 COPY_4V( params, texUnit->EyePlaneT );
2545 }
2546 else {
2547 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGenfv(pname)" );
2548 return;
2549 }
2550 break;
2551 case GL_R:
2552 if (pname==GL_TEXTURE_GEN_MODE) {
2553 params[0] = ENUM_TO_FLOAT(texUnit->GenModeR);
2554 }
2555 else if (pname==GL_OBJECT_PLANE) {
2556 COPY_4V( params, texUnit->ObjectPlaneR );
2557 }
2558 else if (pname==GL_EYE_PLANE) {
2559 COPY_4V( params, texUnit->EyePlaneR );
2560 }
2561 else {
2562 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGenfv(pname)" );
2563 return;
2564 }
2565 break;
2566 case GL_Q:
2567 if (pname==GL_TEXTURE_GEN_MODE) {
2568 params[0] = ENUM_TO_FLOAT(texUnit->GenModeQ);
2569 }
2570 else if (pname==GL_OBJECT_PLANE) {
2571 COPY_4V( params, texUnit->ObjectPlaneQ );
2572 }
2573 else if (pname==GL_EYE_PLANE) {
2574 COPY_4V( params, texUnit->EyePlaneQ );
2575 }
2576 else {
2577 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGenfv(pname)" );
2578 return;
2579 }
2580 break;
2581 default:
2582 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGenfv(coord)" );
2583 return;
2584 }
2585 }
2586
2587
2588
2589 void GLAPIENTRY
2590 _mesa_GetTexGeniv( GLenum coord, GLenum pname, GLint *params )
2591 {
2592 GET_CURRENT_CONTEXT(ctx);
2593 GLuint tUnit = ctx->Texture.CurrentUnit;
2594 struct gl_texture_unit *texUnit = &ctx->Texture.Unit[tUnit];
2595 ASSERT_OUTSIDE_BEGIN_END(ctx);
2596
2597 switch (coord) {
2598 case GL_S:
2599 if (pname==GL_TEXTURE_GEN_MODE) {
2600 params[0] = texUnit->GenModeS;
2601 }
2602 else if (pname==GL_OBJECT_PLANE) {
2603 params[0] = (GLint) texUnit->ObjectPlaneS[0];
2604 params[1] = (GLint) texUnit->ObjectPlaneS[1];
2605 params[2] = (GLint) texUnit->ObjectPlaneS[2];
2606 params[3] = (GLint) texUnit->ObjectPlaneS[3];
2607 }
2608 else if (pname==GL_EYE_PLANE) {
2609 params[0] = (GLint) texUnit->EyePlaneS[0];
2610 params[1] = (GLint) texUnit->EyePlaneS[1];
2611 params[2] = (GLint) texUnit->EyePlaneS[2];
2612 params[3] = (GLint) texUnit->EyePlaneS[3];
2613 }
2614 else {
2615 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGeniv(pname)" );
2616 return;
2617 }
2618 break;
2619 case GL_T:
2620 if (pname==GL_TEXTURE_GEN_MODE) {
2621 params[0] = texUnit->GenModeT;
2622 }
2623 else if (pname==GL_OBJECT_PLANE) {
2624 params[0] = (GLint) texUnit->ObjectPlaneT[0];
2625 params[1] = (GLint) texUnit->ObjectPlaneT[1];
2626 params[2] = (GLint) texUnit->ObjectPlaneT[2];
2627 params[3] = (GLint) texUnit->ObjectPlaneT[3];
2628 }
2629 else if (pname==GL_EYE_PLANE) {
2630 params[0] = (GLint) texUnit->EyePlaneT[0];
2631 params[1] = (GLint) texUnit->EyePlaneT[1];
2632 params[2] = (GLint) texUnit->EyePlaneT[2];
2633 params[3] = (GLint) texUnit->EyePlaneT[3];
2634 }
2635 else {
2636 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGeniv(pname)" );
2637 return;
2638 }
2639 break;
2640 case GL_R:
2641 if (pname==GL_TEXTURE_GEN_MODE) {
2642 params[0] = texUnit->GenModeR;
2643 }
2644 else if (pname==GL_OBJECT_PLANE) {
2645 params[0] = (GLint) texUnit->ObjectPlaneR[0];
2646 params[1] = (GLint) texUnit->ObjectPlaneR[1];
2647 params[2] = (GLint) texUnit->ObjectPlaneR[2];
2648 params[3] = (GLint) texUnit->ObjectPlaneR[3];
2649 }
2650 else if (pname==GL_EYE_PLANE) {
2651 params[0] = (GLint) texUnit->EyePlaneR[0];
2652 params[1] = (GLint) texUnit->EyePlaneR[1];
2653 params[2] = (GLint) texUnit->EyePlaneR[2];
2654 params[3] = (GLint) texUnit->EyePlaneR[3];
2655 }
2656 else {
2657 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGeniv(pname)" );
2658 return;
2659 }
2660 break;
2661 case GL_Q:
2662 if (pname==GL_TEXTURE_GEN_MODE) {
2663 params[0] = texUnit->GenModeQ;
2664 }
2665 else if (pname==GL_OBJECT_PLANE) {
2666 params[0] = (GLint) texUnit->ObjectPlaneQ[0];
2667 params[1] = (GLint) texUnit->ObjectPlaneQ[1];
2668 params[2] = (GLint) texUnit->ObjectPlaneQ[2];
2669 params[3] = (GLint) texUnit->ObjectPlaneQ[3];
2670 }
2671 else if (pname==GL_EYE_PLANE) {
2672 params[0] = (GLint) texUnit->EyePlaneQ[0];
2673 params[1] = (GLint) texUnit->EyePlaneQ[1];
2674 params[2] = (GLint) texUnit->EyePlaneQ[2];
2675 params[3] = (GLint) texUnit->EyePlaneQ[3];
2676 }
2677 else {
2678 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGeniv(pname)" );
2679 return;
2680 }
2681 break;
2682 default:
2683 _mesa_error( ctx, GL_INVALID_ENUM, "glGetTexGeniv(coord)" );
2684 return;
2685 }
2686 }
2687 #endif
2688
2689 /* GL_ARB_multitexture */
2690 void GLAPIENTRY
2691 _mesa_ActiveTextureARB( GLenum target )
2692 {
2693 GET_CURRENT_CONTEXT(ctx);
2694 const GLuint texUnit = target - GL_TEXTURE0;
2695 ASSERT_OUTSIDE_BEGIN_END(ctx);
2696
2697 if (MESA_VERBOSE & (VERBOSE_API|VERBOSE_TEXTURE))
2698 _mesa_debug(ctx, "glActiveTexture %s\n",
2699 _mesa_lookup_enum_by_nr(target));
2700
2701 /* Cater for texture unit 0 is first, therefore use >= */
2702 if (texUnit >= ctx->Const.MaxTextureUnits) {
2703 _mesa_error(ctx, GL_INVALID_ENUM, "glActiveTexture(target)");
2704 return;
2705 }
2706
2707 if (ctx->Texture.CurrentUnit == texUnit)
2708 return;
2709
2710 FLUSH_VERTICES(ctx, _NEW_TEXTURE);
2711
2712 ctx->Texture.CurrentUnit = texUnit;
2713 if (ctx->Transform.MatrixMode == GL_TEXTURE) {
2714 /* update current stack pointer */
2715 ctx->CurrentStack = &ctx->TextureMatrixStack[texUnit];
2716 }
2717
2718 if (ctx->Driver.ActiveTexture) {
2719 (*ctx->Driver.ActiveTexture)( ctx, (GLuint) texUnit );
2720 }
2721 }
2722
2723
2724 /* GL_ARB_multitexture */
2725 void GLAPIENTRY
2726 _mesa_ClientActiveTextureARB( GLenum target )
2727 {
2728 GET_CURRENT_CONTEXT(ctx);
2729 GLuint texUnit = target - GL_TEXTURE0;
2730 ASSERT_OUTSIDE_BEGIN_END(ctx);
2731
2732 if (texUnit > ctx->Const.MaxTextureUnits) {
2733 _mesa_error(ctx, GL_INVALID_ENUM, "glClientActiveTexture(target)");
2734 return;
2735 }
2736
2737 FLUSH_VERTICES(ctx, _NEW_ARRAY);
2738 ctx->Array.ActiveTexture = texUnit;
2739 }
2740
2741
2742
2743 /**********************************************************************/
2744 /* Pixel Texgen Extensions */
2745 /**********************************************************************/
2746
2747 void GLAPIENTRY
2748 _mesa_PixelTexGenSGIX(GLenum mode)
2749 {
2750 GLenum newRgbSource, newAlphaSource;
2751 GET_CURRENT_CONTEXT(ctx);
2752 ASSERT_OUTSIDE_BEGIN_END(ctx);
2753
2754 switch (mode) {
2755 case GL_NONE:
2756 newRgbSource = GL_PIXEL_GROUP_COLOR_SGIS;
2757 newAlphaSource = GL_PIXEL_GROUP_COLOR_SGIS;
2758 break;
2759 case GL_ALPHA:
2760 newRgbSource = GL_PIXEL_GROUP_COLOR_SGIS;
2761 newAlphaSource = GL_CURRENT_RASTER_COLOR;
2762 break;
2763 case GL_RGB:
2764 newRgbSource = GL_CURRENT_RASTER_COLOR;
2765 newAlphaSource = GL_PIXEL_GROUP_COLOR_SGIS;
2766 break;
2767 case GL_RGBA:
2768 newRgbSource = GL_CURRENT_RASTER_COLOR;
2769 newAlphaSource = GL_CURRENT_RASTER_COLOR;
2770 break;
2771 default:
2772 _mesa_error(ctx, GL_INVALID_ENUM, "glPixelTexGenSGIX(mode)");
2773 return;
2774 }
2775
2776 if (newRgbSource == ctx->Pixel.FragmentRgbSource &&
2777 newAlphaSource == ctx->Pixel.FragmentAlphaSource)
2778 return;
2779
2780 FLUSH_VERTICES(ctx, _NEW_PIXEL);
2781 ctx->Pixel.FragmentRgbSource = newRgbSource;
2782 ctx->Pixel.FragmentAlphaSource = newAlphaSource;
2783 }
2784
2785
2786 void GLAPIENTRY
2787 _mesa_PixelTexGenParameterfSGIS(GLenum target, GLfloat value)
2788 {
2789 _mesa_PixelTexGenParameteriSGIS(target, (GLint) value);
2790 }
2791
2792
2793 void GLAPIENTRY
2794 _mesa_PixelTexGenParameterfvSGIS(GLenum target, const GLfloat *value)
2795 {
2796 _mesa_PixelTexGenParameteriSGIS(target, (GLint) *value);
2797 }
2798
2799
2800 void GLAPIENTRY
2801 _mesa_PixelTexGenParameteriSGIS(GLenum target, GLint value)
2802 {
2803 GET_CURRENT_CONTEXT(ctx);
2804 ASSERT_OUTSIDE_BEGIN_END(ctx);
2805
2806 if (value != GL_CURRENT_RASTER_COLOR && value != GL_PIXEL_GROUP_COLOR_SGIS) {
2807 _mesa_error(ctx, GL_INVALID_ENUM, "glPixelTexGenParameterSGIS(value)");
2808 return;
2809 }
2810
2811 switch (target) {
2812 case GL_PIXEL_FRAGMENT_RGB_SOURCE_SGIS:
2813 if (ctx->Pixel.FragmentRgbSource == (GLenum) value)
2814 return;
2815 FLUSH_VERTICES(ctx, _NEW_PIXEL);
2816 ctx->Pixel.FragmentRgbSource = (GLenum) value;
2817 break;
2818 case GL_PIXEL_FRAGMENT_ALPHA_SOURCE_SGIS:
2819 if (ctx->Pixel.FragmentAlphaSource == (GLenum) value)
2820 return;
2821 FLUSH_VERTICES(ctx, _NEW_PIXEL);
2822 ctx->Pixel.FragmentAlphaSource = (GLenum) value;
2823 break;
2824 default:
2825 _mesa_error(ctx, GL_INVALID_ENUM, "glPixelTexGenParameterSGIS(target)");
2826 return;
2827 }
2828 }
2829
2830
2831 void GLAPIENTRY
2832 _mesa_PixelTexGenParameterivSGIS(GLenum target, const GLint *value)
2833 {
2834 _mesa_PixelTexGenParameteriSGIS(target, *value);
2835 }
2836
2837
2838 void GLAPIENTRY
2839 _mesa_GetPixelTexGenParameterfvSGIS(GLenum target, GLfloat *value)
2840 {
2841 GET_CURRENT_CONTEXT(ctx);
2842 ASSERT_OUTSIDE_BEGIN_END(ctx);
2843
2844 if (target == GL_PIXEL_FRAGMENT_RGB_SOURCE_SGIS) {
2845 *value = (GLfloat) ctx->Pixel.FragmentRgbSource;
2846 }
2847 else if (target == GL_PIXEL_FRAGMENT_ALPHA_SOURCE_SGIS) {
2848 *value = (GLfloat) ctx->Pixel.FragmentAlphaSource;
2849 }
2850 else {
2851 _mesa_error(ctx, GL_INVALID_ENUM, "glGetPixelTexGenParameterfvSGIS(target)");
2852 }
2853 }
2854
2855
2856 void GLAPIENTRY
2857 _mesa_GetPixelTexGenParameterivSGIS(GLenum target, GLint *value)
2858 {
2859 GET_CURRENT_CONTEXT(ctx);
2860 ASSERT_OUTSIDE_BEGIN_END(ctx);
2861
2862 if (target == GL_PIXEL_FRAGMENT_RGB_SOURCE_SGIS) {
2863 *value = (GLint) ctx->Pixel.FragmentRgbSource;
2864 }
2865 else if (target == GL_PIXEL_FRAGMENT_ALPHA_SOURCE_SGIS) {
2866 *value = (GLint) ctx->Pixel.FragmentAlphaSource;
2867 }
2868 else {
2869 _mesa_error(ctx, GL_INVALID_ENUM, "glGetPixelTexGenParameterivSGIS(target)");
2870 }
2871 }
2872
2873
2874
2875 /**********************************************************************/
2876 /***** State management *****/
2877 /**********************************************************************/
2878
2879
2880 /**
2881 * \note This routine refers to derived texture attribute values to
2882 * compute the ENABLE_TEXMAT flags, but is only called on
2883 * _NEW_TEXTURE_MATRIX. On changes to _NEW_TEXTURE, the ENABLE_TEXMAT
2884 * flags are updated by _mesa_update_textures(), below.
2885 *
2886 * \param ctx GL context.
2887 */
2888 static void
2889 update_texture_matrices( GLcontext *ctx )
2890 {
2891 GLuint i;
2892
2893 ctx->Texture._TexMatEnabled = 0;
2894
2895 for (i=0; i < ctx->Const.MaxTextureUnits; i++) {
2896 if (_math_matrix_is_dirty(ctx->TextureMatrixStack[i].Top)) {
2897 _math_matrix_analyse( ctx->TextureMatrixStack[i].Top );
2898
2899 if (ctx->Texture.Unit[i]._ReallyEnabled &&
2900 ctx->TextureMatrixStack[i].Top->type != MATRIX_IDENTITY)
2901 ctx->Texture._TexMatEnabled |= ENABLE_TEXMAT(i);
2902
2903 if (ctx->Driver.TextureMatrix)
2904 ctx->Driver.TextureMatrix( ctx, i, ctx->TextureMatrixStack[i].Top);
2905 }
2906 }
2907 }
2908
2909
2910
2911
2912 /**
2913 * \note This routine refers to derived texture matrix values to
2914 * compute the ENABLE_TEXMAT flags, but is only called on
2915 * _NEW_TEXTURE. On changes to _NEW_TEXTURE_MATRIX, the ENABLE_TEXMAT
2916 * flags are updated by _mesa_update_texture_matrices, above.
2917 *
2918 * \param ctx GL context.
2919 */
2920 static void
2921 update_texture_state( GLcontext *ctx )
2922 {
2923 GLuint unit;
2924
2925 ctx->NewState |= _NEW_TEXTURE; /* TODO: only set this if there are
2926 * actual changes.
2927 */
2928
2929 ctx->Texture._EnabledUnits = 0;
2930 ctx->Texture._GenFlags = 0;
2931 ctx->Texture._TexMatEnabled = 0;
2932 ctx->Texture._TexGenEnabled = 0;
2933
2934 /* Update texture unit state.
2935 * XXX this loop should probably be broken into separate loops for
2936 * texture coord units and texture image units.
2937 */
2938 for (unit = 0; unit < ctx->Const.MaxTextureUnits; unit++) {
2939 struct gl_texture_unit *texUnit = &ctx->Texture.Unit[unit];
2940 GLuint enableBits;
2941
2942 texUnit->_Current = NULL;
2943 texUnit->_ReallyEnabled = 0;
2944 texUnit->_GenFlags = 0;
2945
2946 /* Get the bitmask of texture enables */
2947 if (ctx->FragmentProgram._Enabled) {
2948 enableBits = ctx->FragmentProgram.Current->TexturesUsed[unit];
2949 }
2950 else {
2951 if (!texUnit->Enabled)
2952 continue;
2953 enableBits = texUnit->Enabled;
2954 }
2955
2956 /* Look for the highest-priority texture target that's enabled and
2957 * complete. That's the one we'll use for texturing. If we're using
2958 * a fragment program we're guaranteed that bitcount(enabledBits) <= 1.
2959 */
2960 if (enableBits & TEXTURE_CUBE_BIT) {
2961 struct gl_texture_object *texObj = texUnit->CurrentCubeMap;
2962 if (!texObj->Complete) {
2963 _mesa_test_texobj_completeness(ctx, texObj);
2964 }
2965 if (texObj->Complete) {
2966 texUnit->_ReallyEnabled = TEXTURE_CUBE_BIT;
2967 texUnit->_Current = texObj;
2968 }
2969 }
2970
2971 if (!texUnit->_ReallyEnabled && (enableBits & TEXTURE_3D_BIT)) {
2972 struct gl_texture_object *texObj = texUnit->Current3D;
2973 if (!texObj->Complete) {
2974 _mesa_test_texobj_completeness(ctx, texObj);
2975 }
2976 if (texObj->Complete) {
2977 texUnit->_ReallyEnabled = TEXTURE_3D_BIT;
2978 texUnit->_Current = texObj;
2979 }
2980 }
2981
2982 if (!texUnit->_ReallyEnabled && (enableBits & TEXTURE_RECT_BIT)) {
2983 struct gl_texture_object *texObj = texUnit->CurrentRect;
2984 if (!texObj->Complete) {
2985 _mesa_test_texobj_completeness(ctx, texObj);
2986 }
2987 if (texObj->Complete) {
2988 texUnit->_ReallyEnabled = TEXTURE_RECT_BIT;
2989 texUnit->_Current = texObj;
2990 }
2991 }
2992
2993 if (!texUnit->_ReallyEnabled && (enableBits & TEXTURE_2D_BIT)) {
2994 struct gl_texture_object *texObj = texUnit->Current2D;
2995 if (!texObj->Complete) {
2996 _mesa_test_texobj_completeness(ctx, texObj);
2997 }
2998 if (texObj->Complete) {
2999 texUnit->_ReallyEnabled = TEXTURE_2D_BIT;
3000 texUnit->_Current = texObj;
3001 }
3002 }
3003
3004 if (!texUnit->_ReallyEnabled && (enableBits & TEXTURE_1D_BIT)) {
3005 struct gl_texture_object *texObj = texUnit->Current1D;
3006 if (!texObj->Complete) {
3007 _mesa_test_texobj_completeness(ctx, texObj);
3008 }
3009 if (texObj->Complete) {
3010 texUnit->_ReallyEnabled = TEXTURE_1D_BIT;
3011 texUnit->_Current = texObj;
3012 }
3013 }
3014
3015 if (!texUnit->_ReallyEnabled) {
3016 continue;
3017 }
3018
3019 if (texUnit->_ReallyEnabled)
3020 ctx->Texture._EnabledUnits |= (1 << unit);
3021
3022 if (texUnit->EnvMode == GL_COMBINE) {
3023 texUnit->_CurrentCombine = & texUnit->Combine;
3024 }
3025 else {
3026 GLenum format = texUnit->_Current->Image[0][0]->Format;
3027 if (format == GL_COLOR_INDEX) {
3028 format = GL_RGBA; /* a bit of a hack */
3029 }
3030 else if (format == GL_DEPTH_COMPONENT) {
3031 format = texUnit->_Current->DepthMode;
3032 }
3033 calculate_derived_texenv(&texUnit->_EnvMode, texUnit->EnvMode, format);
3034 texUnit->_CurrentCombine = & texUnit->_EnvMode;
3035 }
3036
3037 switch (texUnit->_CurrentCombine->ModeRGB) {
3038 case GL_REPLACE:
3039 texUnit->_CurrentCombine->_NumArgsRGB = 1;
3040 break;
3041 case GL_MODULATE:
3042 case GL_ADD:
3043 case GL_ADD_SIGNED:
3044 case GL_SUBTRACT:
3045 case GL_DOT3_RGB:
3046 case GL_DOT3_RGBA:
3047 case GL_DOT3_RGB_EXT:
3048 case GL_DOT3_RGBA_EXT:
3049 texUnit->_CurrentCombine->_NumArgsRGB = 2;
3050 break;
3051 case GL_INTERPOLATE:
3052 case GL_MODULATE_ADD_ATI:
3053 case GL_MODULATE_SIGNED_ADD_ATI:
3054 case GL_MODULATE_SUBTRACT_ATI:
3055 texUnit->_CurrentCombine->_NumArgsRGB = 3;
3056 break;
3057 default:
3058 texUnit->_CurrentCombine->_NumArgsRGB = 0;
3059 _mesa_problem(ctx, "invalid RGB combine mode in update_texture_state");
3060 return;
3061 }
3062
3063 switch (texUnit->_CurrentCombine->ModeA) {
3064 case GL_REPLACE:
3065 texUnit->_CurrentCombine->_NumArgsA = 1;
3066 break;
3067 case GL_MODULATE:
3068 case GL_ADD:
3069 case GL_ADD_SIGNED:
3070 case GL_SUBTRACT:
3071 texUnit->_CurrentCombine->_NumArgsA = 2;
3072 break;
3073 case GL_INTERPOLATE:
3074 case GL_MODULATE_ADD_ATI:
3075 case GL_MODULATE_SIGNED_ADD_ATI:
3076 case GL_MODULATE_SUBTRACT_ATI:
3077 texUnit->_CurrentCombine->_NumArgsA = 3;
3078 break;
3079 default:
3080 texUnit->_CurrentCombine->_NumArgsA = 0;
3081 _mesa_problem(ctx, "invalid Alpha combine mode in update_texture_state");
3082 break;
3083 }
3084
3085 if (texUnit->TexGenEnabled) {
3086 if (texUnit->TexGenEnabled & S_BIT) {
3087 texUnit->_GenFlags |= texUnit->_GenBitS;
3088 }
3089 if (texUnit->TexGenEnabled & T_BIT) {
3090 texUnit->_GenFlags |= texUnit->_GenBitT;
3091 }
3092 if (texUnit->TexGenEnabled & Q_BIT) {
3093 texUnit->_GenFlags |= texUnit->_GenBitQ;
3094 }
3095 if (texUnit->TexGenEnabled & R_BIT) {
3096 texUnit->_GenFlags |= texUnit->_GenBitR;
3097 }
3098
3099 ctx->Texture._TexGenEnabled |= ENABLE_TEXGEN(unit);
3100 ctx->Texture._GenFlags |= texUnit->_GenFlags;
3101 }
3102
3103 if (ctx->TextureMatrixStack[unit].Top->type != MATRIX_IDENTITY)
3104 ctx->Texture._TexMatEnabled |= ENABLE_TEXMAT(unit);
3105 }
3106
3107 ctx->Texture._EnabledCoordUnits = ctx->Texture._EnabledUnits;
3108 /* Fragment programs may need texture coordinates but not the
3109 * corresponding texture images.
3110 */
3111 if (ctx->FragmentProgram._Enabled) {
3112 ctx->Texture._EnabledCoordUnits |=
3113 (ctx->FragmentProgram.Current->InputsRead >> FRAG_ATTRIB_TEX0);
3114 }
3115 }
3116
3117
3118 void _mesa_update_texture( GLcontext *ctx, GLuint new_state )
3119 {
3120 if (new_state & _NEW_TEXTURE_MATRIX)
3121 update_texture_matrices( ctx );
3122
3123 if (new_state & (_NEW_TEXTURE | _NEW_PROGRAM))
3124 update_texture_state( ctx );
3125 }
3126
3127 /**********************************************************************/
3128 /***** Initialization *****/
3129 /**********************************************************************/
3130
3131 /**
3132 * Allocate the proxy textures for the given context.
3133 *
3134 * \param ctx the context to allocate proxies for.
3135 *
3136 * \return GL_TRUE on success, or GL_FALSE on failure
3137 *
3138 * If run out of memory part way through the allocations, clean up and return
3139 * GL_FALSE.
3140 */
3141 static GLboolean
3142 alloc_proxy_textures( GLcontext *ctx )
3143 {
3144 ctx->Texture.Proxy1D = (*ctx->Driver.NewTextureObject)(ctx, 0, GL_TEXTURE_1D);
3145 if (!ctx->Texture.Proxy1D)
3146 goto cleanup;
3147
3148 ctx->Texture.Proxy2D = (*ctx->Driver.NewTextureObject)(ctx, 0, GL_TEXTURE_2D);
3149 if (!ctx->Texture.Proxy2D)
3150 goto cleanup;
3151
3152 ctx->Texture.Proxy3D = (*ctx->Driver.NewTextureObject)(ctx, 0, GL_TEXTURE_3D);
3153 if (!ctx->Texture.Proxy3D)
3154 goto cleanup;
3155
3156 ctx->Texture.ProxyCubeMap = (*ctx->Driver.NewTextureObject)(ctx, 0, GL_TEXTURE_CUBE_MAP_ARB);
3157 if (!ctx->Texture.ProxyCubeMap)
3158 goto cleanup;
3159
3160 ctx->Texture.ProxyRect = (*ctx->Driver.NewTextureObject)(ctx, 0, GL_TEXTURE_RECTANGLE_NV);
3161 if (!ctx->Texture.ProxyRect)
3162 goto cleanup;
3163
3164 return GL_TRUE;
3165
3166 cleanup:
3167 if (ctx->Texture.Proxy1D)
3168 (ctx->Driver.DeleteTexture)(ctx, ctx->Texture.Proxy1D);
3169 if (ctx->Texture.Proxy2D)
3170 (ctx->Driver.DeleteTexture)(ctx, ctx->Texture.Proxy2D);
3171 if (ctx->Texture.Proxy3D)
3172 (ctx->Driver.DeleteTexture)(ctx, ctx->Texture.Proxy3D);
3173 if (ctx->Texture.ProxyCubeMap)
3174 (ctx->Driver.DeleteTexture)(ctx, ctx->Texture.ProxyCubeMap);
3175 if (ctx->Texture.ProxyRect)
3176 (ctx->Driver.DeleteTexture)(ctx, ctx->Texture.ProxyRect);
3177 return GL_FALSE;
3178 }
3179
3180
3181 /**
3182 * Initialize a texture unit.
3183 *
3184 * \param ctx GL context.
3185 * \param unit texture unit number to be initialized.
3186 */
3187 static void
3188 init_texture_unit( GLcontext *ctx, GLuint unit )
3189 {
3190 struct gl_texture_unit *texUnit = &ctx->Texture.Unit[unit];
3191
3192 texUnit->EnvMode = GL_MODULATE;
3193 ASSIGN_4V( texUnit->EnvColor, 0.0, 0.0, 0.0, 0.0 );
3194
3195 texUnit->Combine = default_combine_state;
3196 texUnit->_EnvMode = default_combine_state;
3197 texUnit->_CurrentCombine = & texUnit->_EnvMode;
3198
3199 texUnit->TexGenEnabled = 0;
3200 texUnit->GenModeS = GL_EYE_LINEAR;
3201 texUnit->GenModeT = GL_EYE_LINEAR;
3202 texUnit->GenModeR = GL_EYE_LINEAR;
3203 texUnit->GenModeQ = GL_EYE_LINEAR;
3204 texUnit->_GenBitS = TEXGEN_EYE_LINEAR;
3205 texUnit->_GenBitT = TEXGEN_EYE_LINEAR;
3206 texUnit->_GenBitR = TEXGEN_EYE_LINEAR;
3207 texUnit->_GenBitQ = TEXGEN_EYE_LINEAR;
3208
3209 /* Yes, these plane coefficients are correct! */
3210 ASSIGN_4V( texUnit->ObjectPlaneS, 1.0, 0.0, 0.0, 0.0 );
3211 ASSIGN_4V( texUnit->ObjectPlaneT, 0.0, 1.0, 0.0, 0.0 );
3212 ASSIGN_4V( texUnit->ObjectPlaneR, 0.0, 0.0, 0.0, 0.0 );
3213 ASSIGN_4V( texUnit->ObjectPlaneQ, 0.0, 0.0, 0.0, 0.0 );
3214 ASSIGN_4V( texUnit->EyePlaneS, 1.0, 0.0, 0.0, 0.0 );
3215 ASSIGN_4V( texUnit->EyePlaneT, 0.0, 1.0, 0.0, 0.0 );
3216 ASSIGN_4V( texUnit->EyePlaneR, 0.0, 0.0, 0.0, 0.0 );
3217 ASSIGN_4V( texUnit->EyePlaneQ, 0.0, 0.0, 0.0, 0.0 );
3218
3219 texUnit->Current1D = ctx->Shared->Default1D;
3220 texUnit->Current2D = ctx->Shared->Default2D;
3221 texUnit->Current3D = ctx->Shared->Default3D;
3222 texUnit->CurrentCubeMap = ctx->Shared->DefaultCubeMap;
3223 texUnit->CurrentRect = ctx->Shared->DefaultRect;
3224 }
3225
3226
3227 GLboolean _mesa_init_texture( GLcontext * ctx )
3228 {
3229 int i;
3230
3231 assert(MAX_TEXTURE_LEVELS >= MAX_3D_TEXTURE_LEVELS);
3232 assert(MAX_TEXTURE_LEVELS >= MAX_CUBE_TEXTURE_LEVELS);
3233
3234 /* Effectively bind the default textures to all texture units */
3235 ctx->Shared->Default1D->RefCount += MAX_TEXTURE_UNITS;
3236 ctx->Shared->Default2D->RefCount += MAX_TEXTURE_UNITS;
3237 ctx->Shared->Default3D->RefCount += MAX_TEXTURE_UNITS;
3238 ctx->Shared->DefaultCubeMap->RefCount += MAX_TEXTURE_UNITS;
3239 ctx->Shared->DefaultRect->RefCount += MAX_TEXTURE_UNITS;
3240
3241 /* Texture group */
3242 ctx->Texture.CurrentUnit = 0; /* multitexture */
3243 ctx->Texture._EnabledUnits = 0;
3244 for (i=0; i<MAX_TEXTURE_UNITS; i++)
3245 init_texture_unit( ctx, i );
3246 ctx->Texture.SharedPalette = GL_FALSE;
3247 _mesa_init_colortable(&ctx->Texture.Palette);
3248
3249 /* Allocate proxy textures */
3250 if (!alloc_proxy_textures( ctx ))
3251 return GL_FALSE;
3252
3253 return GL_TRUE;
3254 }
3255
3256 void _mesa_free_texture_data( GLcontext *ctx )
3257 {
3258 int i;
3259
3260 /* Free proxy texture objects */
3261 (ctx->Driver.DeleteTexture)(ctx, ctx->Texture.Proxy1D );
3262 (ctx->Driver.DeleteTexture)(ctx, ctx->Texture.Proxy2D );
3263 (ctx->Driver.DeleteTexture)(ctx, ctx->Texture.Proxy3D );
3264 (ctx->Driver.DeleteTexture)(ctx, ctx->Texture.ProxyCubeMap );
3265 (ctx->Driver.DeleteTexture)(ctx, ctx->Texture.ProxyRect );
3266
3267 for (i = 0; i < MAX_TEXTURE_IMAGE_UNITS; i++)
3268 _mesa_free_colortable_data( &ctx->Texture.Unit[i].ColorTable );
3269
3270 _mesa_TexEnvProgramCacheDestroy( ctx );
3271 }