projects / mesa.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
mesa: fix CurrentSavePrimitive <= GL_POLYGON tests
[mesa.git] / src / mesa / main / dlist.c
1 /*
2 * Mesa 3-D graphics library
3 * Version: 7.7
4 *
5 * Copyright (C) 1999-2008 Brian Paul All Rights Reserved.
6 * Copyright (C) 2009 VMware, Inc. All Rights Reserved.
7 *
8 * Permission is hereby granted, free of charge, to any person obtaining a
9 * copy of this software and associated documentation files (the "Software"),
10 * to deal in the Software without restriction, including without limitation
11 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
12 * and/or sell copies of the Software, and to permit persons to whom the
13 * Software is furnished to do so, subject to the following conditions:
14 *
15 * The above copyright notice and this permission notice shall be included
16 * in all copies or substantial portions of the Software.
17 *
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
19 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
20 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
21 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
22 * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
23 * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
24 * OTHER DEALINGS IN THE SOFTWARE.
25 */
26
27
28 /**
29 * \file dlist.c
30 * Display lists management functions.
31 */
32
33 #include "glheader.h"
34 #include "imports.h"
35 #include "api_arrayelt.h"
36 #include "api_exec.h"
37 #include "api_loopback.h"
38 #include "api_validate.h"
39 #include "atifragshader.h"
40 #include "config.h"
41 #include "bufferobj.h"
42 #include "arrayobj.h"
43 #include "context.h"
44 #include "dlist.h"
45 #include "enums.h"
46 #include "eval.h"
47 #include "fbobject.h"
48 #include "framebuffer.h"
49 #include "glapi/glapi.h"
50 #include "glformats.h"
51 #include "hash.h"
52 #include "image.h"
53 #include "light.h"
54 #include "macros.h"
55 #include "pack.h"
56 #include "pbo.h"
57 #include "queryobj.h"
58 #include "samplerobj.h"
59 #include "shaderapi.h"
60 #include "syncobj.h"
61 #include "teximage.h"
62 #include "texstorage.h"
63 #include "mtypes.h"
64 #include "varray.h"
65 #include "arbprogram.h"
66 #include "transformfeedback.h"
67
68 #include "math/m_matrix.h"
69
70 #include "main/dispatch.h"
71
72
73
74 /**
75 * Other parts of Mesa (such as the VBO module) can plug into the display
76 * list system. This structure describes new display list instructions.
77 */
78 struct gl_list_instruction
79 {
80 GLuint Size;
81 void (*Execute)( struct gl_context *ctx, void *data );
82 void (*Destroy)( struct gl_context *ctx, void *data );
83 void (*Print)( struct gl_context *ctx, void *data );
84 };
85
86
87 #define MAX_DLIST_EXT_OPCODES 16
88
89 /**
90 * Used by device drivers to hook new commands into display lists.
91 */
92 struct gl_list_extensions
93 {
94 struct gl_list_instruction Opcode[MAX_DLIST_EXT_OPCODES];
95 GLuint NumOpcodes;
96 };
97
98
99
100 /**
101 * Flush vertices.
102 *
103 * \param ctx GL context.
104 *
105 * Checks if dd_function_table::SaveNeedFlush is marked to flush
106 * stored (save) vertices, and calls
107 * dd_function_table::SaveFlushVertices if so.
108 */
109 #define SAVE_FLUSH_VERTICES(ctx) \
110 do { \
111 if (ctx->Driver.SaveNeedFlush) \
112 ctx->Driver.SaveFlushVertices(ctx); \
113 } while (0)
114
115
116 /**
117 * Macro to assert that the API call was made outside the
118 * glBegin()/glEnd() pair, with return value.
119 *
120 * \param ctx GL context.
121 * \param retval value to return value in case the assertion fails.
122 */
123 #define ASSERT_OUTSIDE_SAVE_BEGIN_END_WITH_RETVAL(ctx, retval) \
124 do { \
125 if (ctx->Driver.CurrentSavePrimitive <= PRIM_MAX || \
126 ctx->Driver.CurrentSavePrimitive == PRIM_INSIDE_UNKNOWN_PRIM) { \
127 _mesa_compile_error( ctx, GL_INVALID_OPERATION, "glBegin/End" ); \
128 return retval; \
129 } \
130 } while (0)
131
132 /**
133 * Macro to assert that the API call was made outside the
134 * glBegin()/glEnd() pair.
135 *
136 * \param ctx GL context.
137 */
138 #define ASSERT_OUTSIDE_SAVE_BEGIN_END(ctx) \
139 do { \
140 if (ctx->Driver.CurrentSavePrimitive <= PRIM_MAX || \
141 ctx->Driver.CurrentSavePrimitive == PRIM_INSIDE_UNKNOWN_PRIM) { \
142 _mesa_compile_error( ctx, GL_INVALID_OPERATION, "glBegin/End" ); \
143 return; \
144 } \
145 } while (0)
146
147 /**
148 * Macro to assert that the API call was made outside the
149 * glBegin()/glEnd() pair and flush the vertices.
150 *
151 * \param ctx GL context.
152 */
153 #define ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx) \
154 do { \
155 ASSERT_OUTSIDE_SAVE_BEGIN_END(ctx); \
156 SAVE_FLUSH_VERTICES(ctx); \
157 } while (0)
158
159 /**
160 * Macro to assert that the API call was made outside the
161 * glBegin()/glEnd() pair and flush the vertices, with return value.
162 *
163 * \param ctx GL context.
164 * \param retval value to return value in case the assertion fails.
165 */
166 #define ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH_WITH_RETVAL(ctx, retval)\
167 do { \
168 ASSERT_OUTSIDE_SAVE_BEGIN_END_WITH_RETVAL(ctx, retval); \
169 SAVE_FLUSH_VERTICES(ctx); \
170 } while (0)
171
172
173
174 /**
175 * Display list opcodes.
176 *
177 * The fact that these identifiers are assigned consecutive
178 * integer values starting at 0 is very important, see InstSize array usage)
179 */
180 typedef enum
181 {
182 OPCODE_INVALID = -1, /* Force signed enum */
183 OPCODE_ACCUM,
184 OPCODE_ALPHA_FUNC,
185 OPCODE_BIND_TEXTURE,
186 OPCODE_BITMAP,
187 OPCODE_BLEND_COLOR,
188 OPCODE_BLEND_EQUATION,
189 OPCODE_BLEND_EQUATION_SEPARATE,
190 OPCODE_BLEND_FUNC_SEPARATE,
191
192 OPCODE_BLEND_EQUATION_I,
193 OPCODE_BLEND_EQUATION_SEPARATE_I,
194 OPCODE_BLEND_FUNC_I,
195 OPCODE_BLEND_FUNC_SEPARATE_I,
196
197 OPCODE_CALL_LIST,
198 OPCODE_CALL_LIST_OFFSET,
199 OPCODE_CLEAR,
200 OPCODE_CLEAR_ACCUM,
201 OPCODE_CLEAR_COLOR,
202 OPCODE_CLEAR_DEPTH,
203 OPCODE_CLEAR_INDEX,
204 OPCODE_CLEAR_STENCIL,
205 OPCODE_CLEAR_BUFFER_IV,
206 OPCODE_CLEAR_BUFFER_UIV,
207 OPCODE_CLEAR_BUFFER_FV,
208 OPCODE_CLEAR_BUFFER_FI,
209 OPCODE_CLIP_PLANE,
210 OPCODE_COLOR_MASK,
211 OPCODE_COLOR_MASK_INDEXED,
212 OPCODE_COLOR_MATERIAL,
213 OPCODE_COLOR_TABLE,
214 OPCODE_COLOR_TABLE_PARAMETER_FV,
215 OPCODE_COLOR_TABLE_PARAMETER_IV,
216 OPCODE_COLOR_SUB_TABLE,
217 OPCODE_CONVOLUTION_FILTER_1D,
218 OPCODE_CONVOLUTION_FILTER_2D,
219 OPCODE_CONVOLUTION_PARAMETER_I,
220 OPCODE_CONVOLUTION_PARAMETER_IV,
221 OPCODE_CONVOLUTION_PARAMETER_F,
222 OPCODE_CONVOLUTION_PARAMETER_FV,
223 OPCODE_COPY_COLOR_SUB_TABLE,
224 OPCODE_COPY_COLOR_TABLE,
225 OPCODE_COPY_PIXELS,
226 OPCODE_COPY_TEX_IMAGE1D,
227 OPCODE_COPY_TEX_IMAGE2D,
228 OPCODE_COPY_TEX_SUB_IMAGE1D,
229 OPCODE_COPY_TEX_SUB_IMAGE2D,
230 OPCODE_COPY_TEX_SUB_IMAGE3D,
231 OPCODE_CULL_FACE,
232 OPCODE_DEPTH_FUNC,
233 OPCODE_DEPTH_MASK,
234 OPCODE_DEPTH_RANGE,
235 OPCODE_DISABLE,
236 OPCODE_DISABLE_INDEXED,
237 OPCODE_DRAW_BUFFER,
238 OPCODE_DRAW_PIXELS,
239 OPCODE_ENABLE,
240 OPCODE_ENABLE_INDEXED,
241 OPCODE_EVALMESH1,
242 OPCODE_EVALMESH2,
243 OPCODE_FOG,
244 OPCODE_FRONT_FACE,
245 OPCODE_FRUSTUM,
246 OPCODE_HINT,
247 OPCODE_HISTOGRAM,
248 OPCODE_INDEX_MASK,
249 OPCODE_INIT_NAMES,
250 OPCODE_LIGHT,
251 OPCODE_LIGHT_MODEL,
252 OPCODE_LINE_STIPPLE,
253 OPCODE_LINE_WIDTH,
254 OPCODE_LIST_BASE,
255 OPCODE_LOAD_IDENTITY,
256 OPCODE_LOAD_MATRIX,
257 OPCODE_LOAD_NAME,
258 OPCODE_LOGIC_OP,
259 OPCODE_MAP1,
260 OPCODE_MAP2,
261 OPCODE_MAPGRID1,
262 OPCODE_MAPGRID2,
263 OPCODE_MATRIX_MODE,
264 OPCODE_MIN_MAX,
265 OPCODE_MULT_MATRIX,
266 OPCODE_ORTHO,
267 OPCODE_PASSTHROUGH,
268 OPCODE_PIXEL_MAP,
269 OPCODE_PIXEL_TRANSFER,
270 OPCODE_PIXEL_ZOOM,
271 OPCODE_POINT_SIZE,
272 OPCODE_POINT_PARAMETERS,
273 OPCODE_POLYGON_MODE,
274 OPCODE_POLYGON_STIPPLE,
275 OPCODE_POLYGON_OFFSET,
276 OPCODE_POP_ATTRIB,
277 OPCODE_POP_MATRIX,
278 OPCODE_POP_NAME,
279 OPCODE_PRIORITIZE_TEXTURE,
280 OPCODE_PUSH_ATTRIB,
281 OPCODE_PUSH_MATRIX,
282 OPCODE_PUSH_NAME,
283 OPCODE_RASTER_POS,
284 OPCODE_READ_BUFFER,
285 OPCODE_RESET_HISTOGRAM,
286 OPCODE_RESET_MIN_MAX,
287 OPCODE_ROTATE,
288 OPCODE_SCALE,
289 OPCODE_SCISSOR,
290 OPCODE_SELECT_TEXTURE_SGIS,
291 OPCODE_SELECT_TEXTURE_COORD_SET,
292 OPCODE_SHADE_MODEL,
293 OPCODE_STENCIL_FUNC,
294 OPCODE_STENCIL_MASK,
295 OPCODE_STENCIL_OP,
296 OPCODE_TEXENV,
297 OPCODE_TEXGEN,
298 OPCODE_TEXPARAMETER,
299 OPCODE_TEX_IMAGE1D,
300 OPCODE_TEX_IMAGE2D,
301 OPCODE_TEX_IMAGE3D,
302 OPCODE_TEX_SUB_IMAGE1D,
303 OPCODE_TEX_SUB_IMAGE2D,
304 OPCODE_TEX_SUB_IMAGE3D,
305 OPCODE_TRANSLATE,
306 OPCODE_VIEWPORT,
307 OPCODE_WINDOW_POS,
308 /* GL_ARB_multitexture */
309 OPCODE_ACTIVE_TEXTURE,
310 /* GL_ARB_texture_compression */
311 OPCODE_COMPRESSED_TEX_IMAGE_1D,
312 OPCODE_COMPRESSED_TEX_IMAGE_2D,
313 OPCODE_COMPRESSED_TEX_IMAGE_3D,
314 OPCODE_COMPRESSED_TEX_SUB_IMAGE_1D,
315 OPCODE_COMPRESSED_TEX_SUB_IMAGE_2D,
316 OPCODE_COMPRESSED_TEX_SUB_IMAGE_3D,
317 /* GL_ARB_multisample */
318 OPCODE_SAMPLE_COVERAGE,
319 /* GL_ARB_window_pos */
320 OPCODE_WINDOW_POS_ARB,
321 /* GL_NV_fragment_program */
322 OPCODE_BIND_PROGRAM_NV,
323 OPCODE_PROGRAM_LOCAL_PARAMETER_ARB,
324 /* GL_EXT_stencil_two_side */
325 OPCODE_ACTIVE_STENCIL_FACE_EXT,
326 /* GL_EXT_depth_bounds_test */
327 OPCODE_DEPTH_BOUNDS_EXT,
328 /* GL_ARB_vertex/fragment_program */
329 OPCODE_PROGRAM_STRING_ARB,
330 OPCODE_PROGRAM_ENV_PARAMETER_ARB,
331 /* GL_ARB_occlusion_query */
332 OPCODE_BEGIN_QUERY_ARB,
333 OPCODE_END_QUERY_ARB,
334 /* GL_ARB_draw_buffers */
335 OPCODE_DRAW_BUFFERS_ARB,
336 /* GL_ATI_fragment_shader */
337 OPCODE_TEX_BUMP_PARAMETER_ATI,
338 /* GL_ATI_fragment_shader */
339 OPCODE_BIND_FRAGMENT_SHADER_ATI,
340 OPCODE_SET_FRAGMENT_SHADER_CONSTANTS_ATI,
341 /* OpenGL 2.0 */
342 OPCODE_STENCIL_FUNC_SEPARATE,
343 OPCODE_STENCIL_OP_SEPARATE,
344 OPCODE_STENCIL_MASK_SEPARATE,
345
346 /* GL_ARB_shader_objects */
347 OPCODE_USE_PROGRAM,
348 OPCODE_UNIFORM_1F,
349 OPCODE_UNIFORM_2F,
350 OPCODE_UNIFORM_3F,
351 OPCODE_UNIFORM_4F,
352 OPCODE_UNIFORM_1FV,
353 OPCODE_UNIFORM_2FV,
354 OPCODE_UNIFORM_3FV,
355 OPCODE_UNIFORM_4FV,
356 OPCODE_UNIFORM_1I,
357 OPCODE_UNIFORM_2I,
358 OPCODE_UNIFORM_3I,
359 OPCODE_UNIFORM_4I,
360 OPCODE_UNIFORM_1IV,
361 OPCODE_UNIFORM_2IV,
362 OPCODE_UNIFORM_3IV,
363 OPCODE_UNIFORM_4IV,
364 OPCODE_UNIFORM_MATRIX22,
365 OPCODE_UNIFORM_MATRIX33,
366 OPCODE_UNIFORM_MATRIX44,
367 OPCODE_UNIFORM_MATRIX23,
368 OPCODE_UNIFORM_MATRIX32,
369 OPCODE_UNIFORM_MATRIX24,
370 OPCODE_UNIFORM_MATRIX42,
371 OPCODE_UNIFORM_MATRIX34,
372 OPCODE_UNIFORM_MATRIX43,
373
374 /* OpenGL 3.0 */
375 OPCODE_UNIFORM_1UI,
376 OPCODE_UNIFORM_2UI,
377 OPCODE_UNIFORM_3UI,
378 OPCODE_UNIFORM_4UI,
379 OPCODE_UNIFORM_1UIV,
380 OPCODE_UNIFORM_2UIV,
381 OPCODE_UNIFORM_3UIV,
382 OPCODE_UNIFORM_4UIV,
383
384 /* GL_ARB_color_buffer_float */
385 OPCODE_CLAMP_COLOR,
386
387 /* GL_EXT_framebuffer_blit */
388 OPCODE_BLIT_FRAMEBUFFER,
389
390 /* Vertex attributes -- fallback for when optimized display
391 * list build isn't active.
392 */
393 OPCODE_ATTR_1F_NV,
394 OPCODE_ATTR_2F_NV,
395 OPCODE_ATTR_3F_NV,
396 OPCODE_ATTR_4F_NV,
397 OPCODE_ATTR_1F_ARB,
398 OPCODE_ATTR_2F_ARB,
399 OPCODE_ATTR_3F_ARB,
400 OPCODE_ATTR_4F_ARB,
401 OPCODE_MATERIAL,
402 OPCODE_BEGIN,
403 OPCODE_END,
404 OPCODE_RECTF,
405 OPCODE_EVAL_C1,
406 OPCODE_EVAL_C2,
407 OPCODE_EVAL_P1,
408 OPCODE_EVAL_P2,
409
410 /* GL_EXT_provoking_vertex */
411 OPCODE_PROVOKING_VERTEX,
412
413 /* GL_EXT_transform_feedback */
414 OPCODE_BEGIN_TRANSFORM_FEEDBACK,
415 OPCODE_END_TRANSFORM_FEEDBACK,
416 OPCODE_BIND_TRANSFORM_FEEDBACK,
417 OPCODE_PAUSE_TRANSFORM_FEEDBACK,
418 OPCODE_RESUME_TRANSFORM_FEEDBACK,
419 OPCODE_DRAW_TRANSFORM_FEEDBACK,
420
421 /* GL_EXT_texture_integer */
422 OPCODE_CLEARCOLOR_I,
423 OPCODE_CLEARCOLOR_UI,
424 OPCODE_TEXPARAMETER_I,
425 OPCODE_TEXPARAMETER_UI,
426
427 /* GL_EXT_separate_shader_objects */
428 OPCODE_ACTIVE_PROGRAM_EXT,
429 OPCODE_USE_SHADER_PROGRAM_EXT,
430
431 /* GL_ARB_instanced_arrays */
432 OPCODE_VERTEX_ATTRIB_DIVISOR,
433
434 /* GL_NV_texture_barrier */
435 OPCODE_TEXTURE_BARRIER_NV,
436
437 /* GL_ARB_sampler_object */
438 OPCODE_BIND_SAMPLER,
439 OPCODE_SAMPLER_PARAMETERIV,
440 OPCODE_SAMPLER_PARAMETERFV,
441 OPCODE_SAMPLER_PARAMETERIIV,
442 OPCODE_SAMPLER_PARAMETERUIV,
443
444 /* GL_ARB_geometry_shader4 */
445 OPCODE_PROGRAM_PARAMETERI,
446 OPCODE_FRAMEBUFFER_TEXTURE,
447 OPCODE_FRAMEBUFFER_TEXTURE_FACE,
448
449 /* GL_ARB_sync */
450 OPCODE_WAIT_SYNC,
451
452 /* GL_NV_conditional_render */
453 OPCODE_BEGIN_CONDITIONAL_RENDER,
454 OPCODE_END_CONDITIONAL_RENDER,
455
456 /* ARB_timer_query */
457 OPCODE_QUERY_COUNTER,
458
459 /* ARB_transform_feedback3 */
460 OPCODE_BEGIN_QUERY_INDEXED,
461 OPCODE_END_QUERY_INDEXED,
462 OPCODE_DRAW_TRANSFORM_FEEDBACK_STREAM,
463
464 /* ARB_transform_feedback_instanced */
465 OPCODE_DRAW_TRANSFORM_FEEDBACK_INSTANCED,
466 OPCODE_DRAW_TRANSFORM_FEEDBACK_STREAM_INSTANCED,
467
468 /* ARB_uniform_buffer_object */
469 OPCODE_UNIFORM_BLOCK_BINDING,
470
471 /* The following three are meta instructions */
472 OPCODE_ERROR, /* raise compiled-in error */
473 OPCODE_CONTINUE,
474 OPCODE_END_OF_LIST,
475 OPCODE_EXT_0
476 } OpCode;
477
478
479
480 /**
481 * Display list node.
482 *
483 * Display list instructions are stored as sequences of "nodes". Nodes
484 * are allocated in blocks. Each block has BLOCK_SIZE nodes. Blocks
485 * are linked together with a pointer.
486 *
487 * Each instruction in the display list is stored as a sequence of
488 * contiguous nodes in memory.
489 * Each node is the union of a variety of data types.
490 */
491 union gl_dlist_node
492 {
493 OpCode opcode;
494 GLboolean b;
495 GLbitfield bf;
496 GLubyte ub;
497 GLshort s;
498 GLushort us;
499 GLint i;
500 GLuint ui;
501 GLenum e;
502 GLfloat f;
503 GLsizei si;
504 GLvoid *data;
505 void *next; /* If prev node's opcode==OPCODE_CONTINUE */
506 };
507
508
509 typedef union gl_dlist_node Node;
510
511
512 /**
513 * Used to store a 64-bit uint in a pair of "Nodes" for the sake of 32-bit
514 * environment. In 64-bit env, sizeof(Node)==8 anyway.
515 */
516 union uint64_pair
517 {
518 GLuint64 uint64;
519 GLuint uint32[2];
520 };
521
522
523 /**
524 * How many nodes to allocate at a time.
525 *
526 * \note Reduced now that we hold vertices etc. elsewhere.
527 */
528 #define BLOCK_SIZE 256
529
530
531
532 /**
533 * Number of nodes of storage needed for each instruction.
534 * Sizes for dynamically allocated opcodes are stored in the context struct.
535 */
536 static GLuint InstSize[OPCODE_END_OF_LIST + 1];
537
538
539 void mesa_print_display_list(GLuint list);
540
541
542 /**********************************************************************/
543 /***** Private *****/
544 /**********************************************************************/
545
546
547 /**
548 * Make an empty display list. This is used by glGenLists() to
549 * reserve display list IDs.
550 */
551 static struct gl_display_list *
552 make_list(GLuint name, GLuint count)
553 {
554 struct gl_display_list *dlist = CALLOC_STRUCT(gl_display_list);
555 dlist->Name = name;
556 dlist->Head = malloc(sizeof(Node) * count);
557 dlist->Head[0].opcode = OPCODE_END_OF_LIST;
558 return dlist;
559 }
560
561
562 /**
563 * Lookup function to just encapsulate casting.
564 */
565 static inline struct gl_display_list *
566 lookup_list(struct gl_context *ctx, GLuint list)
567 {
568 return (struct gl_display_list *)
569 _mesa_HashLookup(ctx->Shared->DisplayList, list);
570 }
571
572
573 /** Is the given opcode an extension code? */
574 static inline GLboolean
575 is_ext_opcode(OpCode opcode)
576 {
577 return (opcode >= OPCODE_EXT_0);
578 }
579
580
581 /** Destroy an extended opcode instruction */
582 static GLint
583 ext_opcode_destroy(struct gl_context *ctx, Node *node)
584 {
585 const GLint i = node[0].opcode - OPCODE_EXT_0;
586 GLint step;
587 ctx->ListExt->Opcode[i].Destroy(ctx, &node[1]);
588 step = ctx->ListExt->Opcode[i].Size;
589 return step;
590 }
591
592
593 /** Execute an extended opcode instruction */
594 static GLint
595 ext_opcode_execute(struct gl_context *ctx, Node *node)
596 {
597 const GLint i = node[0].opcode - OPCODE_EXT_0;
598 GLint step;
599 ctx->ListExt->Opcode[i].Execute(ctx, &node[1]);
600 step = ctx->ListExt->Opcode[i].Size;
601 return step;
602 }
603
604
605 /** Print an extended opcode instruction */
606 static GLint
607 ext_opcode_print(struct gl_context *ctx, Node *node)
608 {
609 const GLint i = node[0].opcode - OPCODE_EXT_0;
610 GLint step;
611 ctx->ListExt->Opcode[i].Print(ctx, &node[1]);
612 step = ctx->ListExt->Opcode[i].Size;
613 return step;
614 }
615
616
617 /**
618 * Delete the named display list, but don't remove from hash table.
619 * \param dlist - display list pointer
620 */
621 void
622 _mesa_delete_list(struct gl_context *ctx, struct gl_display_list *dlist)
623 {
624 Node *n, *block;
625 GLboolean done;
626
627 n = block = dlist->Head;
628
629 done = block ? GL_FALSE : GL_TRUE;
630 while (!done) {
631 const OpCode opcode = n[0].opcode;
632
633 /* check for extension opcodes first */
634 if (is_ext_opcode(opcode)) {
635 n += ext_opcode_destroy(ctx, n);
636 }
637 else {
638 switch (opcode) {
639 /* for some commands, we need to free malloc'd memory */
640 case OPCODE_MAP1:
641 free(n[6].data);
642 n += InstSize[n[0].opcode];
643 break;
644 case OPCODE_MAP2:
645 free(n[10].data);
646 n += InstSize[n[0].opcode];
647 break;
648 case OPCODE_DRAW_PIXELS:
649 free(n[5].data);
650 n += InstSize[n[0].opcode];
651 break;
652 case OPCODE_BITMAP:
653 free(n[7].data);
654 n += InstSize[n[0].opcode];
655 break;
656 case OPCODE_COLOR_TABLE:
657 free(n[6].data);
658 n += InstSize[n[0].opcode];
659 break;
660 case OPCODE_COLOR_SUB_TABLE:
661 free(n[6].data);
662 n += InstSize[n[0].opcode];
663 break;
664 case OPCODE_CONVOLUTION_FILTER_1D:
665 free(n[6].data);
666 n += InstSize[n[0].opcode];
667 break;
668 case OPCODE_CONVOLUTION_FILTER_2D:
669 free(n[7].data);
670 n += InstSize[n[0].opcode];
671 break;
672 case OPCODE_POLYGON_STIPPLE:
673 free(n[1].data);
674 n += InstSize[n[0].opcode];
675 break;
676 case OPCODE_TEX_IMAGE1D:
677 free(n[8].data);
678 n += InstSize[n[0].opcode];
679 break;
680 case OPCODE_TEX_IMAGE2D:
681 free(n[9].data);
682 n += InstSize[n[0].opcode];
683 break;
684 case OPCODE_TEX_IMAGE3D:
685 free(n[10].data);
686 n += InstSize[n[0].opcode];
687 break;
688 case OPCODE_TEX_SUB_IMAGE1D:
689 free(n[7].data);
690 n += InstSize[n[0].opcode];
691 break;
692 case OPCODE_TEX_SUB_IMAGE2D:
693 free(n[9].data);
694 n += InstSize[n[0].opcode];
695 break;
696 case OPCODE_TEX_SUB_IMAGE3D:
697 free(n[11].data);
698 n += InstSize[n[0].opcode];
699 break;
700 case OPCODE_COMPRESSED_TEX_IMAGE_1D:
701 free(n[7].data);
702 n += InstSize[n[0].opcode];
703 break;
704 case OPCODE_COMPRESSED_TEX_IMAGE_2D:
705 free(n[8].data);
706 n += InstSize[n[0].opcode];
707 break;
708 case OPCODE_COMPRESSED_TEX_IMAGE_3D:
709 free(n[9].data);
710 n += InstSize[n[0].opcode];
711 break;
712 case OPCODE_COMPRESSED_TEX_SUB_IMAGE_1D:
713 free(n[7].data);
714 n += InstSize[n[0].opcode];
715 break;
716 case OPCODE_COMPRESSED_TEX_SUB_IMAGE_2D:
717 free(n[9].data);
718 n += InstSize[n[0].opcode];
719 break;
720 case OPCODE_COMPRESSED_TEX_SUB_IMAGE_3D:
721 free(n[11].data);
722 n += InstSize[n[0].opcode];
723 break;
724 case OPCODE_PROGRAM_STRING_ARB:
725 free(n[4].data); /* program string */
726 n += InstSize[n[0].opcode];
727 break;
728 case OPCODE_UNIFORM_1FV:
729 case OPCODE_UNIFORM_2FV:
730 case OPCODE_UNIFORM_3FV:
731 case OPCODE_UNIFORM_4FV:
732 case OPCODE_UNIFORM_1IV:
733 case OPCODE_UNIFORM_2IV:
734 case OPCODE_UNIFORM_3IV:
735 case OPCODE_UNIFORM_4IV:
736 case OPCODE_UNIFORM_1UIV:
737 case OPCODE_UNIFORM_2UIV:
738 case OPCODE_UNIFORM_3UIV:
739 case OPCODE_UNIFORM_4UIV:
740 free(n[3].data);
741 n += InstSize[n[0].opcode];
742 break;
743 case OPCODE_UNIFORM_MATRIX22:
744 case OPCODE_UNIFORM_MATRIX33:
745 case OPCODE_UNIFORM_MATRIX44:
746 case OPCODE_UNIFORM_MATRIX24:
747 case OPCODE_UNIFORM_MATRIX42:
748 case OPCODE_UNIFORM_MATRIX23:
749 case OPCODE_UNIFORM_MATRIX32:
750 case OPCODE_UNIFORM_MATRIX34:
751 case OPCODE_UNIFORM_MATRIX43:
752 free(n[4].data);
753 n += InstSize[n[0].opcode];
754 break;
755
756 case OPCODE_CONTINUE:
757 n = (Node *) n[1].next;
758 free(block);
759 block = n;
760 break;
761 case OPCODE_END_OF_LIST:
762 free(block);
763 done = GL_TRUE;
764 break;
765 default:
766 /* Most frequent case */
767 n += InstSize[n[0].opcode];
768 break;
769 }
770 }
771 }
772
773 free(dlist);
774 }
775
776
777 /**
778 * Destroy a display list and remove from hash table.
779 * \param list - display list number
780 */
781 static void
782 destroy_list(struct gl_context *ctx, GLuint list)
783 {
784 struct gl_display_list *dlist;
785
786 if (list == 0)
787 return;
788
789 dlist = lookup_list(ctx, list);
790 if (!dlist)
791 return;
792
793 _mesa_delete_list(ctx, dlist);
794 _mesa_HashRemove(ctx->Shared->DisplayList, list);
795 }
796
797
798 /*
799 * Translate the nth element of list from <type> to GLint.
800 */
801 static GLint
802 translate_id(GLsizei n, GLenum type, const GLvoid * list)
803 {
804 GLbyte *bptr;
805 GLubyte *ubptr;
806 GLshort *sptr;
807 GLushort *usptr;
808 GLint *iptr;
809 GLuint *uiptr;
810 GLfloat *fptr;
811
812 switch (type) {
813 case GL_BYTE:
814 bptr = (GLbyte *) list;
815 return (GLint) bptr[n];
816 case GL_UNSIGNED_BYTE:
817 ubptr = (GLubyte *) list;
818 return (GLint) ubptr[n];
819 case GL_SHORT:
820 sptr = (GLshort *) list;
821 return (GLint) sptr[n];
822 case GL_UNSIGNED_SHORT:
823 usptr = (GLushort *) list;
824 return (GLint) usptr[n];
825 case GL_INT:
826 iptr = (GLint *) list;
827 return iptr[n];
828 case GL_UNSIGNED_INT:
829 uiptr = (GLuint *) list;
830 return (GLint) uiptr[n];
831 case GL_FLOAT:
832 fptr = (GLfloat *) list;
833 return (GLint) FLOORF(fptr[n]);
834 case GL_2_BYTES:
835 ubptr = ((GLubyte *) list) + 2 * n;
836 return (GLint) ubptr[0] * 256
837 + (GLint) ubptr[1];
838 case GL_3_BYTES:
839 ubptr = ((GLubyte *) list) + 3 * n;
840 return (GLint) ubptr[0] * 65536
841 + (GLint) ubptr[1] * 256
842 + (GLint) ubptr[2];
843 case GL_4_BYTES:
844 ubptr = ((GLubyte *) list) + 4 * n;
845 return (GLint) ubptr[0] * 16777216
846 + (GLint) ubptr[1] * 65536
847 + (GLint) ubptr[2] * 256
848 + (GLint) ubptr[3];
849 default:
850 return 0;
851 }
852 }
853
854
855
856
857 /**********************************************************************/
858 /***** Public *****/
859 /**********************************************************************/
860
861 /**
862 * Wrapper for _mesa_unpack_image/bitmap() that handles pixel buffer objects.
863 * If width < 0 or height < 0 or format or type are invalid we'll just
864 * return NULL. We will not generate an error since OpenGL command
865 * arguments aren't error-checked until the command is actually executed
866 * (not when they're compiled).
867 * But if we run out of memory, GL_OUT_OF_MEMORY will be recorded.
868 */
869 static GLvoid *
870 unpack_image(struct gl_context *ctx, GLuint dimensions,
871 GLsizei width, GLsizei height, GLsizei depth,
872 GLenum format, GLenum type, const GLvoid * pixels,
873 const struct gl_pixelstore_attrib *unpack)
874 {
875 if (width <= 0 || height <= 0) {
876 return NULL;
877 }
878
879 if (_mesa_bytes_per_pixel(format, type) < 0) {
880 /* bad format and/or type */
881 return NULL;
882 }
883
884 if (!_mesa_is_bufferobj(unpack->BufferObj)) {
885 /* no PBO */
886 GLvoid *image;
887
888 if (type == GL_BITMAP)
889 image = _mesa_unpack_bitmap(width, height, pixels, unpack);
890 else
891 image = _mesa_unpack_image(dimensions, width, height, depth,
892 format, type, pixels, unpack);
893 if (pixels && !image) {
894 _mesa_error(ctx, GL_OUT_OF_MEMORY, "display list construction");
895 }
896 return image;
897 }
898 else if (_mesa_validate_pbo_access(dimensions, unpack, width, height,
899 depth, format, type, INT_MAX, pixels)) {
900 const GLubyte *map, *src;
901 GLvoid *image;
902
903 map = (GLubyte *)
904 ctx->Driver.MapBufferRange(ctx, 0, unpack->BufferObj->Size,
905 GL_MAP_READ_BIT, unpack->BufferObj);
906 if (!map) {
907 /* unable to map src buffer! */
908 _mesa_error(ctx, GL_INVALID_OPERATION, "unable to map PBO");
909 return NULL;
910 }
911
912 src = ADD_POINTERS(map, pixels);
913 if (type == GL_BITMAP)
914 image = _mesa_unpack_bitmap(width, height, src, unpack);
915 else
916 image = _mesa_unpack_image(dimensions, width, height, depth,
917 format, type, src, unpack);
918
919 ctx->Driver.UnmapBuffer(ctx, unpack->BufferObj);
920
921 if (!image) {
922 _mesa_error(ctx, GL_OUT_OF_MEMORY, "display list construction");
923 }
924 return image;
925 }
926
927 /* bad access! */
928 _mesa_error(ctx, GL_INVALID_OPERATION, "invalid PBO access");
929 return NULL;
930 }
931
932 /**
933 * Allocate space for a display list instruction (opcode + payload space).
934 * \param opcode the instruction opcode (OPCODE_* value)
935 * \param bytes instruction payload size (not counting opcode)
936 * \return pointer to allocated memory (the opcode space)
937 */
938 static Node *
939 dlist_alloc(struct gl_context *ctx, OpCode opcode, GLuint bytes)
940 {
941 const GLuint numNodes = 1 + (bytes + sizeof(Node) - 1) / sizeof(Node);
942 Node *n;
943
944 if (opcode < (GLuint) OPCODE_EXT_0) {
945 if (InstSize[opcode] == 0) {
946 /* save instruction size now */
947 InstSize[opcode] = numNodes;
948 }
949 else {
950 /* make sure instruction size agrees */
951 ASSERT(numNodes == InstSize[opcode]);
952 }
953 }
954
955 if (ctx->ListState.CurrentPos + numNodes + 2 > BLOCK_SIZE) {
956 /* This block is full. Allocate a new block and chain to it */
957 Node *newblock;
958 n = ctx->ListState.CurrentBlock + ctx->ListState.CurrentPos;
959 n[0].opcode = OPCODE_CONTINUE;
960 newblock = malloc(sizeof(Node) * BLOCK_SIZE);
961 if (!newblock) {
962 _mesa_error(ctx, GL_OUT_OF_MEMORY, "Building display list");
963 return NULL;
964 }
965 n[1].next = (Node *) newblock;
966 ctx->ListState.CurrentBlock = newblock;
967 ctx->ListState.CurrentPos = 0;
968 }
969
970 n = ctx->ListState.CurrentBlock + ctx->ListState.CurrentPos;
971 ctx->ListState.CurrentPos += numNodes;
972
973 n[0].opcode = opcode;
974
975 return n;
976 }
977
978
979
980 /**
981 * Allocate space for a display list instruction. Used by callers outside
982 * this file for things like VBO vertex data.
983 *
984 * \param opcode the instruction opcode (OPCODE_* value)
985 * \param bytes instruction size in bytes, not counting opcode.
986 * \return pointer to the usable data area (not including the internal
987 * opcode).
988 */
989 void *
990 _mesa_dlist_alloc(struct gl_context *ctx, GLuint opcode, GLuint bytes)
991 {
992 Node *n = dlist_alloc(ctx, (OpCode) opcode, bytes);
993 if (n)
994 return n + 1; /* return pointer to payload area, after opcode */
995 else
996 return NULL;
997 }
998
999
1000 /**
1001 * This function allows modules and drivers to get their own opcodes
1002 * for extending display list functionality.
1003 * \param ctx the rendering context
1004 * \param size number of bytes for storing the new display list command
1005 * \param execute function to execute the new display list command
1006 * \param destroy function to destroy the new display list command
1007 * \param print function to print the new display list command
1008 * \return the new opcode number or -1 if error
1009 */
1010 GLint
1011 _mesa_dlist_alloc_opcode(struct gl_context *ctx,
1012 GLuint size,
1013 void (*execute) (struct gl_context *, void *),
1014 void (*destroy) (struct gl_context *, void *),
1015 void (*print) (struct gl_context *, void *))
1016 {
1017 if (ctx->ListExt->NumOpcodes < MAX_DLIST_EXT_OPCODES) {
1018 const GLuint i = ctx->ListExt->NumOpcodes++;
1019 ctx->ListExt->Opcode[i].Size =
1020 1 + (size + sizeof(Node) - 1) / sizeof(Node);
1021 ctx->ListExt->Opcode[i].Execute = execute;
1022 ctx->ListExt->Opcode[i].Destroy = destroy;
1023 ctx->ListExt->Opcode[i].Print = print;
1024 return i + OPCODE_EXT_0;
1025 }
1026 return -1;
1027 }
1028
1029
1030 /**
1031 * Allocate space for a display list instruction. The space is basically
1032 * an array of Nodes where node[0] holds the opcode, node[1] is the first
1033 * function parameter, node[2] is the second parameter, etc.
1034 *
1035 * \param opcode one of OPCODE_x
1036 * \param nparams number of function parameters
1037 * \return pointer to start of instruction space
1038 */
1039 static inline Node *
1040 alloc_instruction(struct gl_context *ctx, OpCode opcode, GLuint nparams)
1041 {
1042 return dlist_alloc(ctx, opcode, nparams * sizeof(Node));
1043 }
1044
1045
1046
1047 /*
1048 * Display List compilation functions
1049 */
1050 static void GLAPIENTRY
1051 save_Accum(GLenum op, GLfloat value)
1052 {
1053 GET_CURRENT_CONTEXT(ctx);
1054 Node *n;
1055 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1056 n = alloc_instruction(ctx, OPCODE_ACCUM, 2);
1057 if (n) {
1058 n[1].e = op;
1059 n[2].f = value;
1060 }
1061 if (ctx->ExecuteFlag) {
1062 CALL_Accum(ctx->Exec, (op, value));
1063 }
1064 }
1065
1066
1067 static void GLAPIENTRY
1068 save_AlphaFunc(GLenum func, GLclampf ref)
1069 {
1070 GET_CURRENT_CONTEXT(ctx);
1071 Node *n;
1072 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1073 n = alloc_instruction(ctx, OPCODE_ALPHA_FUNC, 2);
1074 if (n) {
1075 n[1].e = func;
1076 n[2].f = (GLfloat) ref;
1077 }
1078 if (ctx->ExecuteFlag) {
1079 CALL_AlphaFunc(ctx->Exec, (func, ref));
1080 }
1081 }
1082
1083
1084 static void GLAPIENTRY
1085 save_BindTexture(GLenum target, GLuint texture)
1086 {
1087 GET_CURRENT_CONTEXT(ctx);
1088 Node *n;
1089 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1090 n = alloc_instruction(ctx, OPCODE_BIND_TEXTURE, 2);
1091 if (n) {
1092 n[1].e = target;
1093 n[2].ui = texture;
1094 }
1095 if (ctx->ExecuteFlag) {
1096 CALL_BindTexture(ctx->Exec, (target, texture));
1097 }
1098 }
1099
1100
1101 static void GLAPIENTRY
1102 save_Bitmap(GLsizei width, GLsizei height,
1103 GLfloat xorig, GLfloat yorig,
1104 GLfloat xmove, GLfloat ymove, const GLubyte * pixels)
1105 {
1106 GET_CURRENT_CONTEXT(ctx);
1107 Node *n;
1108 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1109 n = alloc_instruction(ctx, OPCODE_BITMAP, 7);
1110 if (n) {
1111 n[1].i = (GLint) width;
1112 n[2].i = (GLint) height;
1113 n[3].f = xorig;
1114 n[4].f = yorig;
1115 n[5].f = xmove;
1116 n[6].f = ymove;
1117 n[7].data = unpack_image(ctx, 2, width, height, 1, GL_COLOR_INDEX,
1118 GL_BITMAP, pixels, &ctx->Unpack);
1119 }
1120 if (ctx->ExecuteFlag) {
1121 CALL_Bitmap(ctx->Exec, (width, height,
1122 xorig, yorig, xmove, ymove, pixels));
1123 }
1124 }
1125
1126
1127 static void GLAPIENTRY
1128 save_BlendEquation(GLenum mode)
1129 {
1130 GET_CURRENT_CONTEXT(ctx);
1131 Node *n;
1132 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1133 n = alloc_instruction(ctx, OPCODE_BLEND_EQUATION, 1);
1134 if (n) {
1135 n[1].e = mode;
1136 }
1137 if (ctx->ExecuteFlag) {
1138 CALL_BlendEquation(ctx->Exec, (mode));
1139 }
1140 }
1141
1142
1143 static void GLAPIENTRY
1144 save_BlendEquationSeparateEXT(GLenum modeRGB, GLenum modeA)
1145 {
1146 GET_CURRENT_CONTEXT(ctx);
1147 Node *n;
1148 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1149 n = alloc_instruction(ctx, OPCODE_BLEND_EQUATION_SEPARATE, 2);
1150 if (n) {
1151 n[1].e = modeRGB;
1152 n[2].e = modeA;
1153 }
1154 if (ctx->ExecuteFlag) {
1155 CALL_BlendEquationSeparate(ctx->Exec, (modeRGB, modeA));
1156 }
1157 }
1158
1159
1160 static void GLAPIENTRY
1161 save_BlendFuncSeparateEXT(GLenum sfactorRGB, GLenum dfactorRGB,
1162 GLenum sfactorA, GLenum dfactorA)
1163 {
1164 GET_CURRENT_CONTEXT(ctx);
1165 Node *n;
1166 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1167 n = alloc_instruction(ctx, OPCODE_BLEND_FUNC_SEPARATE, 4);
1168 if (n) {
1169 n[1].e = sfactorRGB;
1170 n[2].e = dfactorRGB;
1171 n[3].e = sfactorA;
1172 n[4].e = dfactorA;
1173 }
1174 if (ctx->ExecuteFlag) {
1175 CALL_BlendFuncSeparate(ctx->Exec,
1176 (sfactorRGB, dfactorRGB, sfactorA, dfactorA));
1177 }
1178 }
1179
1180
1181 static void GLAPIENTRY
1182 save_BlendFunc(GLenum srcfactor, GLenum dstfactor)
1183 {
1184 save_BlendFuncSeparateEXT(srcfactor, dstfactor, srcfactor, dstfactor);
1185 }
1186
1187
1188 static void GLAPIENTRY
1189 save_BlendColor(GLfloat red, GLfloat green, GLfloat blue, GLfloat alpha)
1190 {
1191 GET_CURRENT_CONTEXT(ctx);
1192 Node *n;
1193 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1194 n = alloc_instruction(ctx, OPCODE_BLEND_COLOR, 4);
1195 if (n) {
1196 n[1].f = red;
1197 n[2].f = green;
1198 n[3].f = blue;
1199 n[4].f = alpha;
1200 }
1201 if (ctx->ExecuteFlag) {
1202 CALL_BlendColor(ctx->Exec, (red, green, blue, alpha));
1203 }
1204 }
1205
1206 /* GL_ARB_draw_buffers_blend */
1207 static void GLAPIENTRY
1208 save_BlendFuncSeparatei(GLuint buf, GLenum sfactorRGB, GLenum dfactorRGB,
1209 GLenum sfactorA, GLenum dfactorA)
1210 {
1211 GET_CURRENT_CONTEXT(ctx);
1212 Node *n;
1213 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1214 n = alloc_instruction(ctx, OPCODE_BLEND_FUNC_SEPARATE_I, 5);
1215 if (n) {
1216 n[1].ui = buf;
1217 n[2].e = sfactorRGB;
1218 n[3].e = dfactorRGB;
1219 n[4].e = sfactorA;
1220 n[5].e = dfactorA;
1221 }
1222 if (ctx->ExecuteFlag) {
1223 CALL_BlendFuncSeparateiARB(ctx->Exec, (buf, sfactorRGB, dfactorRGB,
1224 sfactorA, dfactorA));
1225 }
1226 }
1227
1228 /* GL_ARB_draw_buffers_blend */
1229 static void GLAPIENTRY
1230 save_BlendFunci(GLuint buf, GLenum sfactor, GLenum dfactor)
1231 {
1232 GET_CURRENT_CONTEXT(ctx);
1233 Node *n;
1234 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1235 n = alloc_instruction(ctx, OPCODE_BLEND_FUNC_SEPARATE_I, 3);
1236 if (n) {
1237 n[1].ui = buf;
1238 n[2].e = sfactor;
1239 n[3].e = dfactor;
1240 }
1241 if (ctx->ExecuteFlag) {
1242 CALL_BlendFunciARB(ctx->Exec, (buf, sfactor, dfactor));
1243 }
1244 }
1245
1246 /* GL_ARB_draw_buffers_blend */
1247 static void GLAPIENTRY
1248 save_BlendEquationi(GLuint buf, GLenum mode)
1249 {
1250 GET_CURRENT_CONTEXT(ctx);
1251 Node *n;
1252 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1253 n = alloc_instruction(ctx, OPCODE_BLEND_EQUATION_I, 2);
1254 if (n) {
1255 n[1].ui = buf;
1256 n[2].e = mode;
1257 }
1258 if (ctx->ExecuteFlag) {
1259 CALL_BlendEquationiARB(ctx->Exec, (buf, mode));
1260 }
1261 }
1262
1263 /* GL_ARB_draw_buffers_blend */
1264 static void GLAPIENTRY
1265 save_BlendEquationSeparatei(GLuint buf, GLenum modeRGB, GLenum modeA)
1266 {
1267 GET_CURRENT_CONTEXT(ctx);
1268 Node *n;
1269 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1270 n = alloc_instruction(ctx, OPCODE_BLEND_EQUATION_SEPARATE_I, 3);
1271 if (n) {
1272 n[1].ui = buf;
1273 n[2].e = modeRGB;
1274 n[3].e = modeA;
1275 }
1276 if (ctx->ExecuteFlag) {
1277 CALL_BlendEquationSeparateiARB(ctx->Exec, (buf, modeRGB, modeA));
1278 }
1279 }
1280
1281
1282 /* GL_ARB_draw_instanced. */
1283 static void GLAPIENTRY
1284 save_DrawArraysInstancedARB(GLenum mode,
1285 GLint first,
1286 GLsizei count,
1287 GLsizei primcount)
1288 {
1289 GET_CURRENT_CONTEXT(ctx);
1290 _mesa_error(ctx, GL_INVALID_OPERATION,
1291 "glDrawArraysInstanced() during display list compile");
1292 }
1293
1294 static void GLAPIENTRY
1295 save_DrawElementsInstancedARB(GLenum mode,
1296 GLsizei count,
1297 GLenum type,
1298 const GLvoid *indices,
1299 GLsizei primcount)
1300 {
1301 GET_CURRENT_CONTEXT(ctx);
1302 _mesa_error(ctx, GL_INVALID_OPERATION,
1303 "glDrawElementsInstanced() during display list compile");
1304 }
1305
1306 static void GLAPIENTRY
1307 save_DrawElementsInstancedBaseVertexARB(GLenum mode,
1308 GLsizei count,
1309 GLenum type,
1310 const GLvoid *indices,
1311 GLsizei primcount,
1312 GLint basevertex)
1313 {
1314 GET_CURRENT_CONTEXT(ctx);
1315 _mesa_error(ctx, GL_INVALID_OPERATION,
1316 "glDrawElementsInstancedBaseVertex() during display list compile");
1317 }
1318
1319 /* GL_ARB_base_instance. */
1320 static void GLAPIENTRY
1321 save_DrawArraysInstancedBaseInstance(GLenum mode,
1322 GLint first,
1323 GLsizei count,
1324 GLsizei primcount,
1325 GLuint baseinstance)
1326 {
1327 GET_CURRENT_CONTEXT(ctx);
1328 _mesa_error(ctx, GL_INVALID_OPERATION,
1329 "glDrawArraysInstancedBaseInstance() during display list compile");
1330 }
1331
1332 static void APIENTRY
1333 save_DrawElementsInstancedBaseInstance(GLenum mode,
1334 GLsizei count,
1335 GLenum type,
1336 const void *indices,
1337 GLsizei primcount,
1338 GLuint baseinstance)
1339 {
1340 GET_CURRENT_CONTEXT(ctx);
1341 _mesa_error(ctx, GL_INVALID_OPERATION,
1342 "glDrawElementsInstancedBaseInstance() during display list compile");
1343 }
1344
1345 static void APIENTRY
1346 save_DrawElementsInstancedBaseVertexBaseInstance(GLenum mode,
1347 GLsizei count,
1348 GLenum type,
1349 const void *indices,
1350 GLsizei primcount,
1351 GLint basevertex,
1352 GLuint baseinstance)
1353 {
1354 GET_CURRENT_CONTEXT(ctx);
1355 _mesa_error(ctx, GL_INVALID_OPERATION,
1356 "glDrawElementsInstancedBaseVertexBaseInstance() during display list compile");
1357 }
1358
1359 static void invalidate_saved_current_state( struct gl_context *ctx )
1360 {
1361 GLint i;
1362
1363 for (i = 0; i < VERT_ATTRIB_MAX; i++)
1364 ctx->ListState.ActiveAttribSize[i] = 0;
1365
1366 for (i = 0; i < MAT_ATTRIB_MAX; i++)
1367 ctx->ListState.ActiveMaterialSize[i] = 0;
1368
1369 memset(&ctx->ListState.Current, 0, sizeof ctx->ListState.Current);
1370
1371 ctx->Driver.CurrentSavePrimitive = PRIM_UNKNOWN;
1372 }
1373
1374 static void GLAPIENTRY
1375 save_CallList(GLuint list)
1376 {
1377 GET_CURRENT_CONTEXT(ctx);
1378 Node *n;
1379 SAVE_FLUSH_VERTICES(ctx);
1380
1381 n = alloc_instruction(ctx, OPCODE_CALL_LIST, 1);
1382 if (n) {
1383 n[1].ui = list;
1384 }
1385
1386 /* After this, we don't know what state we're in. Invalidate all
1387 * cached information previously gathered:
1388 */
1389 invalidate_saved_current_state( ctx );
1390
1391 if (ctx->ExecuteFlag) {
1392 _mesa_CallList(list);
1393 }
1394 }
1395
1396
1397 static void GLAPIENTRY
1398 save_CallLists(GLsizei num, GLenum type, const GLvoid * lists)
1399 {
1400 GET_CURRENT_CONTEXT(ctx);
1401 GLint i;
1402 GLboolean typeErrorFlag;
1403
1404 SAVE_FLUSH_VERTICES(ctx);
1405
1406 switch (type) {
1407 case GL_BYTE:
1408 case GL_UNSIGNED_BYTE:
1409 case GL_SHORT:
1410 case GL_UNSIGNED_SHORT:
1411 case GL_INT:
1412 case GL_UNSIGNED_INT:
1413 case GL_FLOAT:
1414 case GL_2_BYTES:
1415 case GL_3_BYTES:
1416 case GL_4_BYTES:
1417 typeErrorFlag = GL_FALSE;
1418 break;
1419 default:
1420 typeErrorFlag = GL_TRUE;
1421 }
1422
1423 for (i = 0; i < num; i++) {
1424 GLint list = translate_id(i, type, lists);
1425 Node *n = alloc_instruction(ctx, OPCODE_CALL_LIST_OFFSET, 2);
1426 if (n) {
1427 n[1].i = list;
1428 n[2].b = typeErrorFlag;
1429 }
1430 }
1431
1432 /* After this, we don't know what state we're in. Invalidate all
1433 * cached information previously gathered:
1434 */
1435 invalidate_saved_current_state( ctx );
1436
1437 if (ctx->ExecuteFlag) {
1438 CALL_CallLists(ctx->Exec, (num, type, lists));
1439 }
1440 }
1441
1442
1443 static void GLAPIENTRY
1444 save_Clear(GLbitfield mask)
1445 {
1446 GET_CURRENT_CONTEXT(ctx);
1447 Node *n;
1448 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1449 n = alloc_instruction(ctx, OPCODE_CLEAR, 1);
1450 if (n) {
1451 n[1].bf = mask;
1452 }
1453 if (ctx->ExecuteFlag) {
1454 CALL_Clear(ctx->Exec, (mask));
1455 }
1456 }
1457
1458
1459 static void GLAPIENTRY
1460 save_ClearBufferiv(GLenum buffer, GLint drawbuffer, const GLint *value)
1461 {
1462 GET_CURRENT_CONTEXT(ctx);
1463 Node *n;
1464 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1465 n = alloc_instruction(ctx, OPCODE_CLEAR_BUFFER_IV, 6);
1466 if (n) {
1467 n[1].e = buffer;
1468 n[2].i = drawbuffer;
1469 n[3].i = value[0];
1470 if (buffer == GL_COLOR) {
1471 n[4].i = value[1];
1472 n[5].i = value[2];
1473 n[6].i = value[3];
1474 }
1475 else {
1476 n[4].i = 0;
1477 n[5].i = 0;
1478 n[6].i = 0;
1479 }
1480 }
1481 if (ctx->ExecuteFlag) {
1482 CALL_ClearBufferiv(ctx->Exec, (buffer, drawbuffer, value));
1483 }
1484 }
1485
1486
1487 static void GLAPIENTRY
1488 save_ClearBufferuiv(GLenum buffer, GLint drawbuffer, const GLuint *value)
1489 {
1490 GET_CURRENT_CONTEXT(ctx);
1491 Node *n;
1492 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1493 n = alloc_instruction(ctx, OPCODE_CLEAR_BUFFER_UIV, 6);
1494 if (n) {
1495 n[1].e = buffer;
1496 n[2].i = drawbuffer;
1497 n[3].ui = value[0];
1498 if (buffer == GL_COLOR) {
1499 n[4].ui = value[1];
1500 n[5].ui = value[2];
1501 n[6].ui = value[3];
1502 }
1503 else {
1504 n[4].ui = 0;
1505 n[5].ui = 0;
1506 n[6].ui = 0;
1507 }
1508 }
1509 if (ctx->ExecuteFlag) {
1510 CALL_ClearBufferuiv(ctx->Exec, (buffer, drawbuffer, value));
1511 }
1512 }
1513
1514
1515 static void GLAPIENTRY
1516 save_ClearBufferfv(GLenum buffer, GLint drawbuffer, const GLfloat *value)
1517 {
1518 GET_CURRENT_CONTEXT(ctx);
1519 Node *n;
1520 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1521 n = alloc_instruction(ctx, OPCODE_CLEAR_BUFFER_FV, 6);
1522 if (n) {
1523 n[1].e = buffer;
1524 n[2].i = drawbuffer;
1525 n[3].f = value[0];
1526 if (buffer == GL_COLOR) {
1527 n[4].f = value[1];
1528 n[5].f = value[2];
1529 n[6].f = value[3];
1530 }
1531 else {
1532 n[4].f = 0.0F;
1533 n[5].f = 0.0F;
1534 n[6].f = 0.0F;
1535 }
1536 }
1537 if (ctx->ExecuteFlag) {
1538 CALL_ClearBufferfv(ctx->Exec, (buffer, drawbuffer, value));
1539 }
1540 }
1541
1542
1543 static void GLAPIENTRY
1544 save_ClearBufferfi(GLenum buffer, GLint drawbuffer,
1545 GLfloat depth, GLint stencil)
1546 {
1547 GET_CURRENT_CONTEXT(ctx);
1548 Node *n;
1549 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1550 n = alloc_instruction(ctx, OPCODE_CLEAR_BUFFER_FI, 4);
1551 if (n) {
1552 n[1].e = buffer;
1553 n[2].i = drawbuffer;
1554 n[3].f = depth;
1555 n[4].i = stencil;
1556 }
1557 if (ctx->ExecuteFlag) {
1558 CALL_ClearBufferfi(ctx->Exec, (buffer, drawbuffer, depth, stencil));
1559 }
1560 }
1561
1562
1563 static void GLAPIENTRY
1564 save_ClearAccum(GLfloat red, GLfloat green, GLfloat blue, GLfloat alpha)
1565 {
1566 GET_CURRENT_CONTEXT(ctx);
1567 Node *n;
1568 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1569 n = alloc_instruction(ctx, OPCODE_CLEAR_ACCUM, 4);
1570 if (n) {
1571 n[1].f = red;
1572 n[2].f = green;
1573 n[3].f = blue;
1574 n[4].f = alpha;
1575 }
1576 if (ctx->ExecuteFlag) {
1577 CALL_ClearAccum(ctx->Exec, (red, green, blue, alpha));
1578 }
1579 }
1580
1581
1582 static void GLAPIENTRY
1583 save_ClearColor(GLclampf red, GLclampf green, GLclampf blue, GLclampf alpha)
1584 {
1585 GET_CURRENT_CONTEXT(ctx);
1586 Node *n;
1587 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1588 n = alloc_instruction(ctx, OPCODE_CLEAR_COLOR, 4);
1589 if (n) {
1590 n[1].f = red;
1591 n[2].f = green;
1592 n[3].f = blue;
1593 n[4].f = alpha;
1594 }
1595 if (ctx->ExecuteFlag) {
1596 CALL_ClearColor(ctx->Exec, (red, green, blue, alpha));
1597 }
1598 }
1599
1600
1601 static void GLAPIENTRY
1602 save_ClearDepth(GLclampd depth)
1603 {
1604 GET_CURRENT_CONTEXT(ctx);
1605 Node *n;
1606 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1607 n = alloc_instruction(ctx, OPCODE_CLEAR_DEPTH, 1);
1608 if (n) {
1609 n[1].f = (GLfloat) depth;
1610 }
1611 if (ctx->ExecuteFlag) {
1612 CALL_ClearDepth(ctx->Exec, (depth));
1613 }
1614 }
1615
1616
1617 static void GLAPIENTRY
1618 save_ClearIndex(GLfloat c)
1619 {
1620 GET_CURRENT_CONTEXT(ctx);
1621 Node *n;
1622 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1623 n = alloc_instruction(ctx, OPCODE_CLEAR_INDEX, 1);
1624 if (n) {
1625 n[1].f = c;
1626 }
1627 if (ctx->ExecuteFlag) {
1628 CALL_ClearIndex(ctx->Exec, (c));
1629 }
1630 }
1631
1632
1633 static void GLAPIENTRY
1634 save_ClearStencil(GLint s)
1635 {
1636 GET_CURRENT_CONTEXT(ctx);
1637 Node *n;
1638 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1639 n = alloc_instruction(ctx, OPCODE_CLEAR_STENCIL, 1);
1640 if (n) {
1641 n[1].i = s;
1642 }
1643 if (ctx->ExecuteFlag) {
1644 CALL_ClearStencil(ctx->Exec, (s));
1645 }
1646 }
1647
1648
1649 static void GLAPIENTRY
1650 save_ClipPlane(GLenum plane, const GLdouble * equ)
1651 {
1652 GET_CURRENT_CONTEXT(ctx);
1653 Node *n;
1654 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1655 n = alloc_instruction(ctx, OPCODE_CLIP_PLANE, 5);
1656 if (n) {
1657 n[1].e = plane;
1658 n[2].f = (GLfloat) equ[0];
1659 n[3].f = (GLfloat) equ[1];
1660 n[4].f = (GLfloat) equ[2];
1661 n[5].f = (GLfloat) equ[3];
1662 }
1663 if (ctx->ExecuteFlag) {
1664 CALL_ClipPlane(ctx->Exec, (plane, equ));
1665 }
1666 }
1667
1668
1669
1670 static void GLAPIENTRY
1671 save_ColorMask(GLboolean red, GLboolean green,
1672 GLboolean blue, GLboolean alpha)
1673 {
1674 GET_CURRENT_CONTEXT(ctx);
1675 Node *n;
1676 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1677 n = alloc_instruction(ctx, OPCODE_COLOR_MASK, 4);
1678 if (n) {
1679 n[1].b = red;
1680 n[2].b = green;
1681 n[3].b = blue;
1682 n[4].b = alpha;
1683 }
1684 if (ctx->ExecuteFlag) {
1685 CALL_ColorMask(ctx->Exec, (red, green, blue, alpha));
1686 }
1687 }
1688
1689
1690 static void GLAPIENTRY
1691 save_ColorMaskIndexed(GLuint buf, GLboolean red, GLboolean green,
1692 GLboolean blue, GLboolean alpha)
1693 {
1694 GET_CURRENT_CONTEXT(ctx);
1695 Node *n;
1696 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1697 n = alloc_instruction(ctx, OPCODE_COLOR_MASK_INDEXED, 5);
1698 if (n) {
1699 n[1].ui = buf;
1700 n[2].b = red;
1701 n[3].b = green;
1702 n[4].b = blue;
1703 n[5].b = alpha;
1704 }
1705 if (ctx->ExecuteFlag) {
1706 /*CALL_ColorMaski(ctx->Exec, (buf, red, green, blue, alpha));*/
1707 }
1708 }
1709
1710
1711 static void GLAPIENTRY
1712 save_ColorMaterial(GLenum face, GLenum mode)
1713 {
1714 GET_CURRENT_CONTEXT(ctx);
1715 Node *n;
1716 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1717
1718 n = alloc_instruction(ctx, OPCODE_COLOR_MATERIAL, 2);
1719 if (n) {
1720 n[1].e = face;
1721 n[2].e = mode;
1722 }
1723 if (ctx->ExecuteFlag) {
1724 CALL_ColorMaterial(ctx->Exec, (face, mode));
1725 }
1726 }
1727
1728
1729 static void GLAPIENTRY
1730 save_ColorTable(GLenum target, GLenum internalFormat,
1731 GLsizei width, GLenum format, GLenum type,
1732 const GLvoid * table)
1733 {
1734 GET_CURRENT_CONTEXT(ctx);
1735 if (_mesa_is_proxy_texture(target)) {
1736 /* execute immediately */
1737 CALL_ColorTable(ctx->Exec, (target, internalFormat, width,
1738 format, type, table));
1739 }
1740 else {
1741 Node *n;
1742 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1743 n = alloc_instruction(ctx, OPCODE_COLOR_TABLE, 6);
1744 if (n) {
1745 n[1].e = target;
1746 n[2].e = internalFormat;
1747 n[3].i = width;
1748 n[4].e = format;
1749 n[5].e = type;
1750 n[6].data = unpack_image(ctx, 1, width, 1, 1, format, type, table,
1751 &ctx->Unpack);
1752 }
1753 if (ctx->ExecuteFlag) {
1754 CALL_ColorTable(ctx->Exec, (target, internalFormat, width,
1755 format, type, table));
1756 }
1757 }
1758 }
1759
1760
1761
1762 static void GLAPIENTRY
1763 save_ColorTableParameterfv(GLenum target, GLenum pname,
1764 const GLfloat *params)
1765 {
1766 GET_CURRENT_CONTEXT(ctx);
1767 Node *n;
1768
1769 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1770
1771 n = alloc_instruction(ctx, OPCODE_COLOR_TABLE_PARAMETER_FV, 6);
1772 if (n) {
1773 n[1].e = target;
1774 n[2].e = pname;
1775 n[3].f = params[0];
1776 if (pname == GL_COLOR_TABLE_SGI ||
1777 pname == GL_POST_CONVOLUTION_COLOR_TABLE_SGI ||
1778 pname == GL_TEXTURE_COLOR_TABLE_SGI) {
1779 n[4].f = params[1];
1780 n[5].f = params[2];
1781 n[6].f = params[3];
1782 }
1783 }
1784
1785 if (ctx->ExecuteFlag) {
1786 CALL_ColorTableParameterfv(ctx->Exec, (target, pname, params));
1787 }
1788 }
1789
1790
1791 static void GLAPIENTRY
1792 save_ColorTableParameteriv(GLenum target, GLenum pname, const GLint *params)
1793 {
1794 GET_CURRENT_CONTEXT(ctx);
1795 Node *n;
1796
1797 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1798
1799 n = alloc_instruction(ctx, OPCODE_COLOR_TABLE_PARAMETER_IV, 6);
1800 if (n) {
1801 n[1].e = target;
1802 n[2].e = pname;
1803 n[3].i = params[0];
1804 if (pname == GL_COLOR_TABLE_SGI ||
1805 pname == GL_POST_CONVOLUTION_COLOR_TABLE_SGI ||
1806 pname == GL_TEXTURE_COLOR_TABLE_SGI) {
1807 n[4].i = params[1];
1808 n[5].i = params[2];
1809 n[6].i = params[3];
1810 }
1811 }
1812
1813 if (ctx->ExecuteFlag) {
1814 CALL_ColorTableParameteriv(ctx->Exec, (target, pname, params));
1815 }
1816 }
1817
1818
1819
1820 static void GLAPIENTRY
1821 save_ColorSubTable(GLenum target, GLsizei start, GLsizei count,
1822 GLenum format, GLenum type, const GLvoid * table)
1823 {
1824 GET_CURRENT_CONTEXT(ctx);
1825 Node *n;
1826 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1827 n = alloc_instruction(ctx, OPCODE_COLOR_SUB_TABLE, 6);
1828 if (n) {
1829 n[1].e = target;
1830 n[2].i = start;
1831 n[3].i = count;
1832 n[4].e = format;
1833 n[5].e = type;
1834 n[6].data = unpack_image(ctx, 1, count, 1, 1, format, type, table,
1835 &ctx->Unpack);
1836 }
1837 if (ctx->ExecuteFlag) {
1838 CALL_ColorSubTable(ctx->Exec,
1839 (target, start, count, format, type, table));
1840 }
1841 }
1842
1843
1844 static void GLAPIENTRY
1845 save_CopyColorSubTable(GLenum target, GLsizei start,
1846 GLint x, GLint y, GLsizei width)
1847 {
1848 GET_CURRENT_CONTEXT(ctx);
1849 Node *n;
1850
1851 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1852 n = alloc_instruction(ctx, OPCODE_COPY_COLOR_SUB_TABLE, 5);
1853 if (n) {
1854 n[1].e = target;
1855 n[2].i = start;
1856 n[3].i = x;
1857 n[4].i = y;
1858 n[5].i = width;
1859 }
1860 if (ctx->ExecuteFlag) {
1861 CALL_CopyColorSubTable(ctx->Exec, (target, start, x, y, width));
1862 }
1863 }
1864
1865
1866 static void GLAPIENTRY
1867 save_CopyColorTable(GLenum target, GLenum internalformat,
1868 GLint x, GLint y, GLsizei width)
1869 {
1870 GET_CURRENT_CONTEXT(ctx);
1871 Node *n;
1872
1873 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1874 n = alloc_instruction(ctx, OPCODE_COPY_COLOR_TABLE, 5);
1875 if (n) {
1876 n[1].e = target;
1877 n[2].e = internalformat;
1878 n[3].i = x;
1879 n[4].i = y;
1880 n[5].i = width;
1881 }
1882 if (ctx->ExecuteFlag) {
1883 CALL_CopyColorTable(ctx->Exec, (target, internalformat, x, y, width));
1884 }
1885 }
1886
1887
1888 static void GLAPIENTRY
1889 save_ConvolutionFilter1D(GLenum target, GLenum internalFormat, GLsizei width,
1890 GLenum format, GLenum type, const GLvoid * filter)
1891 {
1892 GET_CURRENT_CONTEXT(ctx);
1893 Node *n;
1894
1895 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1896
1897 n = alloc_instruction(ctx, OPCODE_CONVOLUTION_FILTER_1D, 6);
1898 if (n) {
1899 n[1].e = target;
1900 n[2].e = internalFormat;
1901 n[3].i = width;
1902 n[4].e = format;
1903 n[5].e = type;
1904 n[6].data = unpack_image(ctx, 1, width, 1, 1, format, type, filter,
1905 &ctx->Unpack);
1906 }
1907 if (ctx->ExecuteFlag) {
1908 CALL_ConvolutionFilter1D(ctx->Exec, (target, internalFormat, width,
1909 format, type, filter));
1910 }
1911 }
1912
1913
1914 static void GLAPIENTRY
1915 save_ConvolutionFilter2D(GLenum target, GLenum internalFormat,
1916 GLsizei width, GLsizei height, GLenum format,
1917 GLenum type, const GLvoid * filter)
1918 {
1919 GET_CURRENT_CONTEXT(ctx);
1920 Node *n;
1921
1922 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1923
1924 n = alloc_instruction(ctx, OPCODE_CONVOLUTION_FILTER_2D, 7);
1925 if (n) {
1926 n[1].e = target;
1927 n[2].e = internalFormat;
1928 n[3].i = width;
1929 n[4].i = height;
1930 n[5].e = format;
1931 n[6].e = type;
1932 n[7].data = unpack_image(ctx, 2, width, height, 1, format, type, filter,
1933 &ctx->Unpack);
1934 }
1935 if (ctx->ExecuteFlag) {
1936 CALL_ConvolutionFilter2D(ctx->Exec,
1937 (target, internalFormat, width, height, format,
1938 type, filter));
1939 }
1940 }
1941
1942
1943 static void GLAPIENTRY
1944 save_ConvolutionParameteri(GLenum target, GLenum pname, GLint param)
1945 {
1946 GET_CURRENT_CONTEXT(ctx);
1947 Node *n;
1948 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1949 n = alloc_instruction(ctx, OPCODE_CONVOLUTION_PARAMETER_I, 3);
1950 if (n) {
1951 n[1].e = target;
1952 n[2].e = pname;
1953 n[3].i = param;
1954 }
1955 if (ctx->ExecuteFlag) {
1956 CALL_ConvolutionParameteri(ctx->Exec, (target, pname, param));
1957 }
1958 }
1959
1960
1961 static void GLAPIENTRY
1962 save_ConvolutionParameteriv(GLenum target, GLenum pname, const GLint *params)
1963 {
1964 GET_CURRENT_CONTEXT(ctx);
1965 Node *n;
1966 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1967 n = alloc_instruction(ctx, OPCODE_CONVOLUTION_PARAMETER_IV, 6);
1968 if (n) {
1969 n[1].e = target;
1970 n[2].e = pname;
1971 n[3].i = params[0];
1972 if (pname == GL_CONVOLUTION_BORDER_COLOR ||
1973 pname == GL_CONVOLUTION_FILTER_SCALE ||
1974 pname == GL_CONVOLUTION_FILTER_BIAS) {
1975 n[4].i = params[1];
1976 n[5].i = params[2];
1977 n[6].i = params[3];
1978 }
1979 else {
1980 n[4].i = n[5].i = n[6].i = 0;
1981 }
1982 }
1983 if (ctx->ExecuteFlag) {
1984 CALL_ConvolutionParameteriv(ctx->Exec, (target, pname, params));
1985 }
1986 }
1987
1988
1989 static void GLAPIENTRY
1990 save_ConvolutionParameterf(GLenum target, GLenum pname, GLfloat param)
1991 {
1992 GET_CURRENT_CONTEXT(ctx);
1993 Node *n;
1994 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
1995 n = alloc_instruction(ctx, OPCODE_CONVOLUTION_PARAMETER_F, 3);
1996 if (n) {
1997 n[1].e = target;
1998 n[2].e = pname;
1999 n[3].f = param;
2000 }
2001 if (ctx->ExecuteFlag) {
2002 CALL_ConvolutionParameterf(ctx->Exec, (target, pname, param));
2003 }
2004 }
2005
2006
2007 static void GLAPIENTRY
2008 save_ConvolutionParameterfv(GLenum target, GLenum pname,
2009 const GLfloat *params)
2010 {
2011 GET_CURRENT_CONTEXT(ctx);
2012 Node *n;
2013 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2014 n = alloc_instruction(ctx, OPCODE_CONVOLUTION_PARAMETER_FV, 6);
2015 if (n) {
2016 n[1].e = target;
2017 n[2].e = pname;
2018 n[3].f = params[0];
2019 if (pname == GL_CONVOLUTION_BORDER_COLOR ||
2020 pname == GL_CONVOLUTION_FILTER_SCALE ||
2021 pname == GL_CONVOLUTION_FILTER_BIAS) {
2022 n[4].f = params[1];
2023 n[5].f = params[2];
2024 n[6].f = params[3];
2025 }
2026 else {
2027 n[4].f = n[5].f = n[6].f = 0.0F;
2028 }
2029 }
2030 if (ctx->ExecuteFlag) {
2031 CALL_ConvolutionParameterfv(ctx->Exec, (target, pname, params));
2032 }
2033 }
2034
2035
2036 static void GLAPIENTRY
2037 save_CopyPixels(GLint x, GLint y, GLsizei width, GLsizei height, GLenum type)
2038 {
2039 GET_CURRENT_CONTEXT(ctx);
2040 Node *n;
2041 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2042 n = alloc_instruction(ctx, OPCODE_COPY_PIXELS, 5);
2043 if (n) {
2044 n[1].i = x;
2045 n[2].i = y;
2046 n[3].i = (GLint) width;
2047 n[4].i = (GLint) height;
2048 n[5].e = type;
2049 }
2050 if (ctx->ExecuteFlag) {
2051 CALL_CopyPixels(ctx->Exec, (x, y, width, height, type));
2052 }
2053 }
2054
2055
2056
2057 static void GLAPIENTRY
2058 save_CopyTexImage1D(GLenum target, GLint level, GLenum internalformat,
2059 GLint x, GLint y, GLsizei width, GLint border)
2060 {
2061 GET_CURRENT_CONTEXT(ctx);
2062 Node *n;
2063 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2064 n = alloc_instruction(ctx, OPCODE_COPY_TEX_IMAGE1D, 7);
2065 if (n) {
2066 n[1].e = target;
2067 n[2].i = level;
2068 n[3].e = internalformat;
2069 n[4].i = x;
2070 n[5].i = y;
2071 n[6].i = width;
2072 n[7].i = border;
2073 }
2074 if (ctx->ExecuteFlag) {
2075 CALL_CopyTexImage1D(ctx->Exec, (target, level, internalformat,
2076 x, y, width, border));
2077 }
2078 }
2079
2080
2081 static void GLAPIENTRY
2082 save_CopyTexImage2D(GLenum target, GLint level,
2083 GLenum internalformat,
2084 GLint x, GLint y, GLsizei width,
2085 GLsizei height, GLint border)
2086 {
2087 GET_CURRENT_CONTEXT(ctx);
2088 Node *n;
2089 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2090 n = alloc_instruction(ctx, OPCODE_COPY_TEX_IMAGE2D, 8);
2091 if (n) {
2092 n[1].e = target;
2093 n[2].i = level;
2094 n[3].e = internalformat;
2095 n[4].i = x;
2096 n[5].i = y;
2097 n[6].i = width;
2098 n[7].i = height;
2099 n[8].i = border;
2100 }
2101 if (ctx->ExecuteFlag) {
2102 CALL_CopyTexImage2D(ctx->Exec, (target, level, internalformat,
2103 x, y, width, height, border));
2104 }
2105 }
2106
2107
2108
2109 static void GLAPIENTRY
2110 save_CopyTexSubImage1D(GLenum target, GLint level,
2111 GLint xoffset, GLint x, GLint y, GLsizei width)
2112 {
2113 GET_CURRENT_CONTEXT(ctx);
2114 Node *n;
2115 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2116 n = alloc_instruction(ctx, OPCODE_COPY_TEX_SUB_IMAGE1D, 6);
2117 if (n) {
2118 n[1].e = target;
2119 n[2].i = level;
2120 n[3].i = xoffset;
2121 n[4].i = x;
2122 n[5].i = y;
2123 n[6].i = width;
2124 }
2125 if (ctx->ExecuteFlag) {
2126 CALL_CopyTexSubImage1D(ctx->Exec,
2127 (target, level, xoffset, x, y, width));
2128 }
2129 }
2130
2131
2132 static void GLAPIENTRY
2133 save_CopyTexSubImage2D(GLenum target, GLint level,
2134 GLint xoffset, GLint yoffset,
2135 GLint x, GLint y, GLsizei width, GLint height)
2136 {
2137 GET_CURRENT_CONTEXT(ctx);
2138 Node *n;
2139 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2140 n = alloc_instruction(ctx, OPCODE_COPY_TEX_SUB_IMAGE2D, 8);
2141 if (n) {
2142 n[1].e = target;
2143 n[2].i = level;
2144 n[3].i = xoffset;
2145 n[4].i = yoffset;
2146 n[5].i = x;
2147 n[6].i = y;
2148 n[7].i = width;
2149 n[8].i = height;
2150 }
2151 if (ctx->ExecuteFlag) {
2152 CALL_CopyTexSubImage2D(ctx->Exec, (target, level, xoffset, yoffset,
2153 x, y, width, height));
2154 }
2155 }
2156
2157
2158 static void GLAPIENTRY
2159 save_CopyTexSubImage3D(GLenum target, GLint level,
2160 GLint xoffset, GLint yoffset, GLint zoffset,
2161 GLint x, GLint y, GLsizei width, GLint height)
2162 {
2163 GET_CURRENT_CONTEXT(ctx);
2164 Node *n;
2165 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2166 n = alloc_instruction(ctx, OPCODE_COPY_TEX_SUB_IMAGE3D, 9);
2167 if (n) {
2168 n[1].e = target;
2169 n[2].i = level;
2170 n[3].i = xoffset;
2171 n[4].i = yoffset;
2172 n[5].i = zoffset;
2173 n[6].i = x;
2174 n[7].i = y;
2175 n[8].i = width;
2176 n[9].i = height;
2177 }
2178 if (ctx->ExecuteFlag) {
2179 CALL_CopyTexSubImage3D(ctx->Exec, (target, level,
2180 xoffset, yoffset, zoffset,
2181 x, y, width, height));
2182 }
2183 }
2184
2185
2186 static void GLAPIENTRY
2187 save_CullFace(GLenum mode)
2188 {
2189 GET_CURRENT_CONTEXT(ctx);
2190 Node *n;
2191 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2192 n = alloc_instruction(ctx, OPCODE_CULL_FACE, 1);
2193 if (n) {
2194 n[1].e = mode;
2195 }
2196 if (ctx->ExecuteFlag) {
2197 CALL_CullFace(ctx->Exec, (mode));
2198 }
2199 }
2200
2201
2202 static void GLAPIENTRY
2203 save_DepthFunc(GLenum func)
2204 {
2205 GET_CURRENT_CONTEXT(ctx);
2206 Node *n;
2207 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2208 n = alloc_instruction(ctx, OPCODE_DEPTH_FUNC, 1);
2209 if (n) {
2210 n[1].e = func;
2211 }
2212 if (ctx->ExecuteFlag) {
2213 CALL_DepthFunc(ctx->Exec, (func));
2214 }
2215 }
2216
2217
2218 static void GLAPIENTRY
2219 save_DepthMask(GLboolean mask)
2220 {
2221 GET_CURRENT_CONTEXT(ctx);
2222 Node *n;
2223 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2224 n = alloc_instruction(ctx, OPCODE_DEPTH_MASK, 1);
2225 if (n) {
2226 n[1].b = mask;
2227 }
2228 if (ctx->ExecuteFlag) {
2229 CALL_DepthMask(ctx->Exec, (mask));
2230 }
2231 }
2232
2233
2234 static void GLAPIENTRY
2235 save_DepthRange(GLclampd nearval, GLclampd farval)
2236 {
2237 GET_CURRENT_CONTEXT(ctx);
2238 Node *n;
2239 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2240 n = alloc_instruction(ctx, OPCODE_DEPTH_RANGE, 2);
2241 if (n) {
2242 n[1].f = (GLfloat) nearval;
2243 n[2].f = (GLfloat) farval;
2244 }
2245 if (ctx->ExecuteFlag) {
2246 CALL_DepthRange(ctx->Exec, (nearval, farval));
2247 }
2248 }
2249
2250
2251 static void GLAPIENTRY
2252 save_Disable(GLenum cap)
2253 {
2254 GET_CURRENT_CONTEXT(ctx);
2255 Node *n;
2256 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2257 n = alloc_instruction(ctx, OPCODE_DISABLE, 1);
2258 if (n) {
2259 n[1].e = cap;
2260 }
2261 if (ctx->ExecuteFlag) {
2262 CALL_Disable(ctx->Exec, (cap));
2263 }
2264 }
2265
2266
2267 static void GLAPIENTRY
2268 save_DisableIndexed(GLuint index, GLenum cap)
2269 {
2270 GET_CURRENT_CONTEXT(ctx);
2271 Node *n;
2272 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2273 n = alloc_instruction(ctx, OPCODE_DISABLE_INDEXED, 2);
2274 if (n) {
2275 n[1].ui = index;
2276 n[2].e = cap;
2277 }
2278 if (ctx->ExecuteFlag) {
2279 CALL_Disablei(ctx->Exec, (index, cap));
2280 }
2281 }
2282
2283
2284 static void GLAPIENTRY
2285 save_DrawBuffer(GLenum mode)
2286 {
2287 GET_CURRENT_CONTEXT(ctx);
2288 Node *n;
2289 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2290 n = alloc_instruction(ctx, OPCODE_DRAW_BUFFER, 1);
2291 if (n) {
2292 n[1].e = mode;
2293 }
2294 if (ctx->ExecuteFlag) {
2295 CALL_DrawBuffer(ctx->Exec, (mode));
2296 }
2297 }
2298
2299
2300 static void GLAPIENTRY
2301 save_DrawPixels(GLsizei width, GLsizei height,
2302 GLenum format, GLenum type, const GLvoid * pixels)
2303 {
2304 GET_CURRENT_CONTEXT(ctx);
2305 Node *n;
2306
2307 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2308
2309 n = alloc_instruction(ctx, OPCODE_DRAW_PIXELS, 5);
2310 if (n) {
2311 n[1].i = width;
2312 n[2].i = height;
2313 n[3].e = format;
2314 n[4].e = type;
2315 n[5].data = unpack_image(ctx, 2, width, height, 1, format, type,
2316 pixels, &ctx->Unpack);
2317 }
2318 if (ctx->ExecuteFlag) {
2319 CALL_DrawPixels(ctx->Exec, (width, height, format, type, pixels));
2320 }
2321 }
2322
2323
2324
2325 static void GLAPIENTRY
2326 save_Enable(GLenum cap)
2327 {
2328 GET_CURRENT_CONTEXT(ctx);
2329 Node *n;
2330 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2331 n = alloc_instruction(ctx, OPCODE_ENABLE, 1);
2332 if (n) {
2333 n[1].e = cap;
2334 }
2335 if (ctx->ExecuteFlag) {
2336 CALL_Enable(ctx->Exec, (cap));
2337 }
2338 }
2339
2340
2341
2342 static void GLAPIENTRY
2343 save_EnableIndexed(GLuint index, GLenum cap)
2344 {
2345 GET_CURRENT_CONTEXT(ctx);
2346 Node *n;
2347 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2348 n = alloc_instruction(ctx, OPCODE_ENABLE_INDEXED, 2);
2349 if (n) {
2350 n[1].ui = index;
2351 n[2].e = cap;
2352 }
2353 if (ctx->ExecuteFlag) {
2354 CALL_Enablei(ctx->Exec, (index, cap));
2355 }
2356 }
2357
2358
2359
2360 static void GLAPIENTRY
2361 save_EvalMesh1(GLenum mode, GLint i1, GLint i2)
2362 {
2363 GET_CURRENT_CONTEXT(ctx);
2364 Node *n;
2365 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2366 n = alloc_instruction(ctx, OPCODE_EVALMESH1, 3);
2367 if (n) {
2368 n[1].e = mode;
2369 n[2].i = i1;
2370 n[3].i = i2;
2371 }
2372 if (ctx->ExecuteFlag) {
2373 CALL_EvalMesh1(ctx->Exec, (mode, i1, i2));
2374 }
2375 }
2376
2377
2378 static void GLAPIENTRY
2379 save_EvalMesh2(GLenum mode, GLint i1, GLint i2, GLint j1, GLint j2)
2380 {
2381 GET_CURRENT_CONTEXT(ctx);
2382 Node *n;
2383 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2384 n = alloc_instruction(ctx, OPCODE_EVALMESH2, 5);
2385 if (n) {
2386 n[1].e = mode;
2387 n[2].i = i1;
2388 n[3].i = i2;
2389 n[4].i = j1;
2390 n[5].i = j2;
2391 }
2392 if (ctx->ExecuteFlag) {
2393 CALL_EvalMesh2(ctx->Exec, (mode, i1, i2, j1, j2));
2394 }
2395 }
2396
2397
2398
2399
2400 static void GLAPIENTRY
2401 save_Fogfv(GLenum pname, const GLfloat *params)
2402 {
2403 GET_CURRENT_CONTEXT(ctx);
2404 Node *n;
2405 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2406 n = alloc_instruction(ctx, OPCODE_FOG, 5);
2407 if (n) {
2408 n[1].e = pname;
2409 n[2].f = params[0];
2410 n[3].f = params[1];
2411 n[4].f = params[2];
2412 n[5].f = params[3];
2413 }
2414 if (ctx->ExecuteFlag) {
2415 CALL_Fogfv(ctx->Exec, (pname, params));
2416 }
2417 }
2418
2419
2420 static void GLAPIENTRY
2421 save_Fogf(GLenum pname, GLfloat param)
2422 {
2423 GLfloat parray[4];
2424 parray[0] = param;
2425 parray[1] = parray[2] = parray[3] = 0.0F;
2426 save_Fogfv(pname, parray);
2427 }
2428
2429
2430 static void GLAPIENTRY
2431 save_Fogiv(GLenum pname, const GLint *params)
2432 {
2433 GLfloat p[4];
2434 switch (pname) {
2435 case GL_FOG_MODE:
2436 case GL_FOG_DENSITY:
2437 case GL_FOG_START:
2438 case GL_FOG_END:
2439 case GL_FOG_INDEX:
2440 p[0] = (GLfloat) *params;
2441 p[1] = 0.0f;
2442 p[2] = 0.0f;
2443 p[3] = 0.0f;
2444 break;
2445 case GL_FOG_COLOR:
2446 p[0] = INT_TO_FLOAT(params[0]);
2447 p[1] = INT_TO_FLOAT(params[1]);
2448 p[2] = INT_TO_FLOAT(params[2]);
2449 p[3] = INT_TO_FLOAT(params[3]);
2450 break;
2451 default:
2452 /* Error will be caught later in gl_Fogfv */
2453 ASSIGN_4V(p, 0.0F, 0.0F, 0.0F, 0.0F);
2454 }
2455 save_Fogfv(pname, p);
2456 }
2457
2458
2459 static void GLAPIENTRY
2460 save_Fogi(GLenum pname, GLint param)
2461 {
2462 GLint parray[4];
2463 parray[0] = param;
2464 parray[1] = parray[2] = parray[3] = 0;
2465 save_Fogiv(pname, parray);
2466 }
2467
2468
2469 static void GLAPIENTRY
2470 save_FrontFace(GLenum mode)
2471 {
2472 GET_CURRENT_CONTEXT(ctx);
2473 Node *n;
2474 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2475 n = alloc_instruction(ctx, OPCODE_FRONT_FACE, 1);
2476 if (n) {
2477 n[1].e = mode;
2478 }
2479 if (ctx->ExecuteFlag) {
2480 CALL_FrontFace(ctx->Exec, (mode));
2481 }
2482 }
2483
2484
2485 static void GLAPIENTRY
2486 save_Frustum(GLdouble left, GLdouble right,
2487 GLdouble bottom, GLdouble top, GLdouble nearval, GLdouble farval)
2488 {
2489 GET_CURRENT_CONTEXT(ctx);
2490 Node *n;
2491 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2492 n = alloc_instruction(ctx, OPCODE_FRUSTUM, 6);
2493 if (n) {
2494 n[1].f = (GLfloat) left;
2495 n[2].f = (GLfloat) right;
2496 n[3].f = (GLfloat) bottom;
2497 n[4].f = (GLfloat) top;
2498 n[5].f = (GLfloat) nearval;
2499 n[6].f = (GLfloat) farval;
2500 }
2501 if (ctx->ExecuteFlag) {
2502 CALL_Frustum(ctx->Exec, (left, right, bottom, top, nearval, farval));
2503 }
2504 }
2505
2506
2507 static void GLAPIENTRY
2508 save_Hint(GLenum target, GLenum mode)
2509 {
2510 GET_CURRENT_CONTEXT(ctx);
2511 Node *n;
2512 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2513 n = alloc_instruction(ctx, OPCODE_HINT, 2);
2514 if (n) {
2515 n[1].e = target;
2516 n[2].e = mode;
2517 }
2518 if (ctx->ExecuteFlag) {
2519 CALL_Hint(ctx->Exec, (target, mode));
2520 }
2521 }
2522
2523
2524 static void GLAPIENTRY
2525 save_Histogram(GLenum target, GLsizei width, GLenum internalFormat,
2526 GLboolean sink)
2527 {
2528 GET_CURRENT_CONTEXT(ctx);
2529 Node *n;
2530
2531 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2532 n = alloc_instruction(ctx, OPCODE_HISTOGRAM, 4);
2533 if (n) {
2534 n[1].e = target;
2535 n[2].i = width;
2536 n[3].e = internalFormat;
2537 n[4].b = sink;
2538 }
2539 if (ctx->ExecuteFlag) {
2540 CALL_Histogram(ctx->Exec, (target, width, internalFormat, sink));
2541 }
2542 }
2543
2544
2545 static void GLAPIENTRY
2546 save_IndexMask(GLuint mask)
2547 {
2548 GET_CURRENT_CONTEXT(ctx);
2549 Node *n;
2550 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2551 n = alloc_instruction(ctx, OPCODE_INDEX_MASK, 1);
2552 if (n) {
2553 n[1].ui = mask;
2554 }
2555 if (ctx->ExecuteFlag) {
2556 CALL_IndexMask(ctx->Exec, (mask));
2557 }
2558 }
2559
2560
2561 static void GLAPIENTRY
2562 save_InitNames(void)
2563 {
2564 GET_CURRENT_CONTEXT(ctx);
2565 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2566 (void) alloc_instruction(ctx, OPCODE_INIT_NAMES, 0);
2567 if (ctx->ExecuteFlag) {
2568 CALL_InitNames(ctx->Exec, ());
2569 }
2570 }
2571
2572
2573 static void GLAPIENTRY
2574 save_Lightfv(GLenum light, GLenum pname, const GLfloat *params)
2575 {
2576 GET_CURRENT_CONTEXT(ctx);
2577 Node *n;
2578 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2579 n = alloc_instruction(ctx, OPCODE_LIGHT, 6);
2580 if (n) {
2581 GLint i, nParams;
2582 n[1].e = light;
2583 n[2].e = pname;
2584 switch (pname) {
2585 case GL_AMBIENT:
2586 nParams = 4;
2587 break;
2588 case GL_DIFFUSE:
2589 nParams = 4;
2590 break;
2591 case GL_SPECULAR:
2592 nParams = 4;
2593 break;
2594 case GL_POSITION:
2595 nParams = 4;
2596 break;
2597 case GL_SPOT_DIRECTION:
2598 nParams = 3;
2599 break;
2600 case GL_SPOT_EXPONENT:
2601 nParams = 1;
2602 break;
2603 case GL_SPOT_CUTOFF:
2604 nParams = 1;
2605 break;
2606 case GL_CONSTANT_ATTENUATION:
2607 nParams = 1;
2608 break;
2609 case GL_LINEAR_ATTENUATION:
2610 nParams = 1;
2611 break;
2612 case GL_QUADRATIC_ATTENUATION:
2613 nParams = 1;
2614 break;
2615 default:
2616 nParams = 0;
2617 }
2618 for (i = 0; i < nParams; i++) {
2619 n[3 + i].f = params[i];
2620 }
2621 }
2622 if (ctx->ExecuteFlag) {
2623 CALL_Lightfv(ctx->Exec, (light, pname, params));
2624 }
2625 }
2626
2627
2628 static void GLAPIENTRY
2629 save_Lightf(GLenum light, GLenum pname, GLfloat param)
2630 {
2631 GLfloat parray[4];
2632 parray[0] = param;
2633 parray[1] = parray[2] = parray[3] = 0.0F;
2634 save_Lightfv(light, pname, parray);
2635 }
2636
2637
2638 static void GLAPIENTRY
2639 save_Lightiv(GLenum light, GLenum pname, const GLint *params)
2640 {
2641 GLfloat fparam[4];
2642 switch (pname) {
2643 case GL_AMBIENT:
2644 case GL_DIFFUSE:
2645 case GL_SPECULAR:
2646 fparam[0] = INT_TO_FLOAT(params[0]);
2647 fparam[1] = INT_TO_FLOAT(params[1]);
2648 fparam[2] = INT_TO_FLOAT(params[2]);
2649 fparam[3] = INT_TO_FLOAT(params[3]);
2650 break;
2651 case GL_POSITION:
2652 fparam[0] = (GLfloat) params[0];
2653 fparam[1] = (GLfloat) params[1];
2654 fparam[2] = (GLfloat) params[2];
2655 fparam[3] = (GLfloat) params[3];
2656 break;
2657 case GL_SPOT_DIRECTION:
2658 fparam[0] = (GLfloat) params[0];
2659 fparam[1] = (GLfloat) params[1];
2660 fparam[2] = (GLfloat) params[2];
2661 break;
2662 case GL_SPOT_EXPONENT:
2663 case GL_SPOT_CUTOFF:
2664 case GL_CONSTANT_ATTENUATION:
2665 case GL_LINEAR_ATTENUATION:
2666 case GL_QUADRATIC_ATTENUATION:
2667 fparam[0] = (GLfloat) params[0];
2668 break;
2669 default:
2670 /* error will be caught later in gl_Lightfv */
2671 ;
2672 }
2673 save_Lightfv(light, pname, fparam);
2674 }
2675
2676
2677 static void GLAPIENTRY
2678 save_Lighti(GLenum light, GLenum pname, GLint param)
2679 {
2680 GLint parray[4];
2681 parray[0] = param;
2682 parray[1] = parray[2] = parray[3] = 0;
2683 save_Lightiv(light, pname, parray);
2684 }
2685
2686
2687 static void GLAPIENTRY
2688 save_LightModelfv(GLenum pname, const GLfloat *params)
2689 {
2690 GET_CURRENT_CONTEXT(ctx);
2691 Node *n;
2692 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2693 n = alloc_instruction(ctx, OPCODE_LIGHT_MODEL, 5);
2694 if (n) {
2695 n[1].e = pname;
2696 n[2].f = params[0];
2697 n[3].f = params[1];
2698 n[4].f = params[2];
2699 n[5].f = params[3];
2700 }
2701 if (ctx->ExecuteFlag) {
2702 CALL_LightModelfv(ctx->Exec, (pname, params));
2703 }
2704 }
2705
2706
2707 static void GLAPIENTRY
2708 save_LightModelf(GLenum pname, GLfloat param)
2709 {
2710 GLfloat parray[4];
2711 parray[0] = param;
2712 parray[1] = parray[2] = parray[3] = 0.0F;
2713 save_LightModelfv(pname, parray);
2714 }
2715
2716
2717 static void GLAPIENTRY
2718 save_LightModeliv(GLenum pname, const GLint *params)
2719 {
2720 GLfloat fparam[4];
2721 switch (pname) {
2722 case GL_LIGHT_MODEL_AMBIENT:
2723 fparam[0] = INT_TO_FLOAT(params[0]);
2724 fparam[1] = INT_TO_FLOAT(params[1]);
2725 fparam[2] = INT_TO_FLOAT(params[2]);
2726 fparam[3] = INT_TO_FLOAT(params[3]);
2727 break;
2728 case GL_LIGHT_MODEL_LOCAL_VIEWER:
2729 case GL_LIGHT_MODEL_TWO_SIDE:
2730 case GL_LIGHT_MODEL_COLOR_CONTROL:
2731 fparam[0] = (GLfloat) params[0];
2732 fparam[1] = 0.0F;
2733 fparam[2] = 0.0F;
2734 fparam[3] = 0.0F;
2735 break;
2736 default:
2737 /* Error will be caught later in gl_LightModelfv */
2738 ASSIGN_4V(fparam, 0.0F, 0.0F, 0.0F, 0.0F);
2739 }
2740 save_LightModelfv(pname, fparam);
2741 }
2742
2743
2744 static void GLAPIENTRY
2745 save_LightModeli(GLenum pname, GLint param)
2746 {
2747 GLint parray[4];
2748 parray[0] = param;
2749 parray[1] = parray[2] = parray[3] = 0;
2750 save_LightModeliv(pname, parray);
2751 }
2752
2753
2754 static void GLAPIENTRY
2755 save_LineStipple(GLint factor, GLushort pattern)
2756 {
2757 GET_CURRENT_CONTEXT(ctx);
2758 Node *n;
2759 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2760 n = alloc_instruction(ctx, OPCODE_LINE_STIPPLE, 2);
2761 if (n) {
2762 n[1].i = factor;
2763 n[2].us = pattern;
2764 }
2765 if (ctx->ExecuteFlag) {
2766 CALL_LineStipple(ctx->Exec, (factor, pattern));
2767 }
2768 }
2769
2770
2771 static void GLAPIENTRY
2772 save_LineWidth(GLfloat width)
2773 {
2774 GET_CURRENT_CONTEXT(ctx);
2775 Node *n;
2776 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2777 n = alloc_instruction(ctx, OPCODE_LINE_WIDTH, 1);
2778 if (n) {
2779 n[1].f = width;
2780 }
2781 if (ctx->ExecuteFlag) {
2782 CALL_LineWidth(ctx->Exec, (width));
2783 }
2784 }
2785
2786
2787 static void GLAPIENTRY
2788 save_ListBase(GLuint base)
2789 {
2790 GET_CURRENT_CONTEXT(ctx);
2791 Node *n;
2792 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2793 n = alloc_instruction(ctx, OPCODE_LIST_BASE, 1);
2794 if (n) {
2795 n[1].ui = base;
2796 }
2797 if (ctx->ExecuteFlag) {
2798 CALL_ListBase(ctx->Exec, (base));
2799 }
2800 }
2801
2802
2803 static void GLAPIENTRY
2804 save_LoadIdentity(void)
2805 {
2806 GET_CURRENT_CONTEXT(ctx);
2807 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2808 (void) alloc_instruction(ctx, OPCODE_LOAD_IDENTITY, 0);
2809 if (ctx->ExecuteFlag) {
2810 CALL_LoadIdentity(ctx->Exec, ());
2811 }
2812 }
2813
2814
2815 static void GLAPIENTRY
2816 save_LoadMatrixf(const GLfloat * m)
2817 {
2818 GET_CURRENT_CONTEXT(ctx);
2819 Node *n;
2820 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2821 n = alloc_instruction(ctx, OPCODE_LOAD_MATRIX, 16);
2822 if (n) {
2823 GLuint i;
2824 for (i = 0; i < 16; i++) {
2825 n[1 + i].f = m[i];
2826 }
2827 }
2828 if (ctx->ExecuteFlag) {
2829 CALL_LoadMatrixf(ctx->Exec, (m));
2830 }
2831 }
2832
2833
2834 static void GLAPIENTRY
2835 save_LoadMatrixd(const GLdouble * m)
2836 {
2837 GLfloat f[16];
2838 GLint i;
2839 for (i = 0; i < 16; i++) {
2840 f[i] = (GLfloat) m[i];
2841 }
2842 save_LoadMatrixf(f);
2843 }
2844
2845
2846 static void GLAPIENTRY
2847 save_LoadName(GLuint name)
2848 {
2849 GET_CURRENT_CONTEXT(ctx);
2850 Node *n;
2851 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2852 n = alloc_instruction(ctx, OPCODE_LOAD_NAME, 1);
2853 if (n) {
2854 n[1].ui = name;
2855 }
2856 if (ctx->ExecuteFlag) {
2857 CALL_LoadName(ctx->Exec, (name));
2858 }
2859 }
2860
2861
2862 static void GLAPIENTRY
2863 save_LogicOp(GLenum opcode)
2864 {
2865 GET_CURRENT_CONTEXT(ctx);
2866 Node *n;
2867 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2868 n = alloc_instruction(ctx, OPCODE_LOGIC_OP, 1);
2869 if (n) {
2870 n[1].e = opcode;
2871 }
2872 if (ctx->ExecuteFlag) {
2873 CALL_LogicOp(ctx->Exec, (opcode));
2874 }
2875 }
2876
2877
2878 static void GLAPIENTRY
2879 save_Map1d(GLenum target, GLdouble u1, GLdouble u2, GLint stride,
2880 GLint order, const GLdouble * points)
2881 {
2882 GET_CURRENT_CONTEXT(ctx);
2883 Node *n;
2884 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2885 n = alloc_instruction(ctx, OPCODE_MAP1, 6);
2886 if (n) {
2887 GLfloat *pnts = _mesa_copy_map_points1d(target, stride, order, points);
2888 n[1].e = target;
2889 n[2].f = (GLfloat) u1;
2890 n[3].f = (GLfloat) u2;
2891 n[4].i = _mesa_evaluator_components(target); /* stride */
2892 n[5].i = order;
2893 n[6].data = (void *) pnts;
2894 }
2895 if (ctx->ExecuteFlag) {
2896 CALL_Map1d(ctx->Exec, (target, u1, u2, stride, order, points));
2897 }
2898 }
2899
2900 static void GLAPIENTRY
2901 save_Map1f(GLenum target, GLfloat u1, GLfloat u2, GLint stride,
2902 GLint order, const GLfloat * points)
2903 {
2904 GET_CURRENT_CONTEXT(ctx);
2905 Node *n;
2906 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2907 n = alloc_instruction(ctx, OPCODE_MAP1, 6);
2908 if (n) {
2909 GLfloat *pnts = _mesa_copy_map_points1f(target, stride, order, points);
2910 n[1].e = target;
2911 n[2].f = u1;
2912 n[3].f = u2;
2913 n[4].i = _mesa_evaluator_components(target); /* stride */
2914 n[5].i = order;
2915 n[6].data = (void *) pnts;
2916 }
2917 if (ctx->ExecuteFlag) {
2918 CALL_Map1f(ctx->Exec, (target, u1, u2, stride, order, points));
2919 }
2920 }
2921
2922
2923 static void GLAPIENTRY
2924 save_Map2d(GLenum target,
2925 GLdouble u1, GLdouble u2, GLint ustride, GLint uorder,
2926 GLdouble v1, GLdouble v2, GLint vstride, GLint vorder,
2927 const GLdouble * points)
2928 {
2929 GET_CURRENT_CONTEXT(ctx);
2930 Node *n;
2931 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2932 n = alloc_instruction(ctx, OPCODE_MAP2, 10);
2933 if (n) {
2934 GLfloat *pnts = _mesa_copy_map_points2d(target, ustride, uorder,
2935 vstride, vorder, points);
2936 n[1].e = target;
2937 n[2].f = (GLfloat) u1;
2938 n[3].f = (GLfloat) u2;
2939 n[4].f = (GLfloat) v1;
2940 n[5].f = (GLfloat) v2;
2941 /* XXX verify these strides are correct */
2942 n[6].i = _mesa_evaluator_components(target) * vorder; /*ustride */
2943 n[7].i = _mesa_evaluator_components(target); /*vstride */
2944 n[8].i = uorder;
2945 n[9].i = vorder;
2946 n[10].data = (void *) pnts;
2947 }
2948 if (ctx->ExecuteFlag) {
2949 CALL_Map2d(ctx->Exec, (target,
2950 u1, u2, ustride, uorder,
2951 v1, v2, vstride, vorder, points));
2952 }
2953 }
2954
2955
2956 static void GLAPIENTRY
2957 save_Map2f(GLenum target,
2958 GLfloat u1, GLfloat u2, GLint ustride, GLint uorder,
2959 GLfloat v1, GLfloat v2, GLint vstride, GLint vorder,
2960 const GLfloat * points)
2961 {
2962 GET_CURRENT_CONTEXT(ctx);
2963 Node *n;
2964 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2965 n = alloc_instruction(ctx, OPCODE_MAP2, 10);
2966 if (n) {
2967 GLfloat *pnts = _mesa_copy_map_points2f(target, ustride, uorder,
2968 vstride, vorder, points);
2969 n[1].e = target;
2970 n[2].f = u1;
2971 n[3].f = u2;
2972 n[4].f = v1;
2973 n[5].f = v2;
2974 /* XXX verify these strides are correct */
2975 n[6].i = _mesa_evaluator_components(target) * vorder; /*ustride */
2976 n[7].i = _mesa_evaluator_components(target); /*vstride */
2977 n[8].i = uorder;
2978 n[9].i = vorder;
2979 n[10].data = (void *) pnts;
2980 }
2981 if (ctx->ExecuteFlag) {
2982 CALL_Map2f(ctx->Exec, (target, u1, u2, ustride, uorder,
2983 v1, v2, vstride, vorder, points));
2984 }
2985 }
2986
2987
2988 static void GLAPIENTRY
2989 save_MapGrid1f(GLint un, GLfloat u1, GLfloat u2)
2990 {
2991 GET_CURRENT_CONTEXT(ctx);
2992 Node *n;
2993 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
2994 n = alloc_instruction(ctx, OPCODE_MAPGRID1, 3);
2995 if (n) {
2996 n[1].i = un;
2997 n[2].f = u1;
2998 n[3].f = u2;
2999 }
3000 if (ctx->ExecuteFlag) {
3001 CALL_MapGrid1f(ctx->Exec, (un, u1, u2));
3002 }
3003 }
3004
3005
3006 static void GLAPIENTRY
3007 save_MapGrid1d(GLint un, GLdouble u1, GLdouble u2)
3008 {
3009 save_MapGrid1f(un, (GLfloat) u1, (GLfloat) u2);
3010 }
3011
3012
3013 static void GLAPIENTRY
3014 save_MapGrid2f(GLint un, GLfloat u1, GLfloat u2,
3015 GLint vn, GLfloat v1, GLfloat v2)
3016 {
3017 GET_CURRENT_CONTEXT(ctx);
3018 Node *n;
3019 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3020 n = alloc_instruction(ctx, OPCODE_MAPGRID2, 6);
3021 if (n) {
3022 n[1].i = un;
3023 n[2].f = u1;
3024 n[3].f = u2;
3025 n[4].i = vn;
3026 n[5].f = v1;
3027 n[6].f = v2;
3028 }
3029 if (ctx->ExecuteFlag) {
3030 CALL_MapGrid2f(ctx->Exec, (un, u1, u2, vn, v1, v2));
3031 }
3032 }
3033
3034
3035
3036 static void GLAPIENTRY
3037 save_MapGrid2d(GLint un, GLdouble u1, GLdouble u2,
3038 GLint vn, GLdouble v1, GLdouble v2)
3039 {
3040 save_MapGrid2f(un, (GLfloat) u1, (GLfloat) u2,
3041 vn, (GLfloat) v1, (GLfloat) v2);
3042 }
3043
3044
3045 static void GLAPIENTRY
3046 save_MatrixMode(GLenum mode)
3047 {
3048 GET_CURRENT_CONTEXT(ctx);
3049 Node *n;
3050 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3051 n = alloc_instruction(ctx, OPCODE_MATRIX_MODE, 1);
3052 if (n) {
3053 n[1].e = mode;
3054 }
3055 if (ctx->ExecuteFlag) {
3056 CALL_MatrixMode(ctx->Exec, (mode));
3057 }
3058 }
3059
3060
3061 static void GLAPIENTRY
3062 save_Minmax(GLenum target, GLenum internalFormat, GLboolean sink)
3063 {
3064 GET_CURRENT_CONTEXT(ctx);
3065 Node *n;
3066
3067 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3068 n = alloc_instruction(ctx, OPCODE_MIN_MAX, 3);
3069 if (n) {
3070 n[1].e = target;
3071 n[2].e = internalFormat;
3072 n[3].b = sink;
3073 }
3074 if (ctx->ExecuteFlag) {
3075 CALL_Minmax(ctx->Exec, (target, internalFormat, sink));
3076 }
3077 }
3078
3079
3080 static void GLAPIENTRY
3081 save_MultMatrixf(const GLfloat * m)
3082 {
3083 GET_CURRENT_CONTEXT(ctx);
3084 Node *n;
3085 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3086 n = alloc_instruction(ctx, OPCODE_MULT_MATRIX, 16);
3087 if (n) {
3088 GLuint i;
3089 for (i = 0; i < 16; i++) {
3090 n[1 + i].f = m[i];
3091 }
3092 }
3093 if (ctx->ExecuteFlag) {
3094 CALL_MultMatrixf(ctx->Exec, (m));
3095 }
3096 }
3097
3098
3099 static void GLAPIENTRY
3100 save_MultMatrixd(const GLdouble * m)
3101 {
3102 GLfloat f[16];
3103 GLint i;
3104 for (i = 0; i < 16; i++) {
3105 f[i] = (GLfloat) m[i];
3106 }
3107 save_MultMatrixf(f);
3108 }
3109
3110
3111 static void GLAPIENTRY
3112 save_NewList(GLuint name, GLenum mode)
3113 {
3114 GET_CURRENT_CONTEXT(ctx);
3115 /* It's an error to call this function while building a display list */
3116 _mesa_error(ctx, GL_INVALID_OPERATION, "glNewList");
3117 (void) name;
3118 (void) mode;
3119 }
3120
3121
3122
3123 static void GLAPIENTRY
3124 save_Ortho(GLdouble left, GLdouble right,
3125 GLdouble bottom, GLdouble top, GLdouble nearval, GLdouble farval)
3126 {
3127 GET_CURRENT_CONTEXT(ctx);
3128 Node *n;
3129 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3130 n = alloc_instruction(ctx, OPCODE_ORTHO, 6);
3131 if (n) {
3132 n[1].f = (GLfloat) left;
3133 n[2].f = (GLfloat) right;
3134 n[3].f = (GLfloat) bottom;
3135 n[4].f = (GLfloat) top;
3136 n[5].f = (GLfloat) nearval;
3137 n[6].f = (GLfloat) farval;
3138 }
3139 if (ctx->ExecuteFlag) {
3140 CALL_Ortho(ctx->Exec, (left, right, bottom, top, nearval, farval));
3141 }
3142 }
3143
3144
3145 static void GLAPIENTRY
3146 save_PixelMapfv(GLenum map, GLint mapsize, const GLfloat *values)
3147 {
3148 GET_CURRENT_CONTEXT(ctx);
3149 Node *n;
3150 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3151 n = alloc_instruction(ctx, OPCODE_PIXEL_MAP, 3);
3152 if (n) {
3153 n[1].e = map;
3154 n[2].i = mapsize;
3155 n[3].data = malloc(mapsize * sizeof(GLfloat));
3156 memcpy(n[3].data, (void *) values, mapsize * sizeof(GLfloat));
3157 }
3158 if (ctx->ExecuteFlag) {
3159 CALL_PixelMapfv(ctx->Exec, (map, mapsize, values));
3160 }
3161 }
3162
3163
3164 static void GLAPIENTRY
3165 save_PixelMapuiv(GLenum map, GLint mapsize, const GLuint *values)
3166 {
3167 GLfloat fvalues[MAX_PIXEL_MAP_TABLE];
3168 GLint i;
3169 if (map == GL_PIXEL_MAP_I_TO_I || map == GL_PIXEL_MAP_S_TO_S) {
3170 for (i = 0; i < mapsize; i++) {
3171 fvalues[i] = (GLfloat) values[i];
3172 }
3173 }
3174 else {
3175 for (i = 0; i < mapsize; i++) {
3176 fvalues[i] = UINT_TO_FLOAT(values[i]);
3177 }
3178 }
3179 save_PixelMapfv(map, mapsize, fvalues);
3180 }
3181
3182
3183 static void GLAPIENTRY
3184 save_PixelMapusv(GLenum map, GLint mapsize, const GLushort *values)
3185 {
3186 GLfloat fvalues[MAX_PIXEL_MAP_TABLE];
3187 GLint i;
3188 if (map == GL_PIXEL_MAP_I_TO_I || map == GL_PIXEL_MAP_S_TO_S) {
3189 for (i = 0; i < mapsize; i++) {
3190 fvalues[i] = (GLfloat) values[i];
3191 }
3192 }
3193 else {
3194 for (i = 0; i < mapsize; i++) {
3195 fvalues[i] = USHORT_TO_FLOAT(values[i]);
3196 }
3197 }
3198 save_PixelMapfv(map, mapsize, fvalues);
3199 }
3200
3201
3202 static void GLAPIENTRY
3203 save_PixelTransferf(GLenum pname, GLfloat param)
3204 {
3205 GET_CURRENT_CONTEXT(ctx);
3206 Node *n;
3207 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3208 n = alloc_instruction(ctx, OPCODE_PIXEL_TRANSFER, 2);
3209 if (n) {
3210 n[1].e = pname;
3211 n[2].f = param;
3212 }
3213 if (ctx->ExecuteFlag) {
3214 CALL_PixelTransferf(ctx->Exec, (pname, param));
3215 }
3216 }
3217
3218
3219 static void GLAPIENTRY
3220 save_PixelTransferi(GLenum pname, GLint param)
3221 {
3222 save_PixelTransferf(pname, (GLfloat) param);
3223 }
3224
3225
3226 static void GLAPIENTRY
3227 save_PixelZoom(GLfloat xfactor, GLfloat yfactor)
3228 {
3229 GET_CURRENT_CONTEXT(ctx);
3230 Node *n;
3231 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3232 n = alloc_instruction(ctx, OPCODE_PIXEL_ZOOM, 2);
3233 if (n) {
3234 n[1].f = xfactor;
3235 n[2].f = yfactor;
3236 }
3237 if (ctx->ExecuteFlag) {
3238 CALL_PixelZoom(ctx->Exec, (xfactor, yfactor));
3239 }
3240 }
3241
3242
3243 static void GLAPIENTRY
3244 save_PointParameterfvEXT(GLenum pname, const GLfloat *params)
3245 {
3246 GET_CURRENT_CONTEXT(ctx);
3247 Node *n;
3248 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3249 n = alloc_instruction(ctx, OPCODE_POINT_PARAMETERS, 4);
3250 if (n) {
3251 n[1].e = pname;
3252 n[2].f = params[0];
3253 n[3].f = params[1];
3254 n[4].f = params[2];
3255 }
3256 if (ctx->ExecuteFlag) {
3257 CALL_PointParameterfv(ctx->Exec, (pname, params));
3258 }
3259 }
3260
3261
3262 static void GLAPIENTRY
3263 save_PointParameterfEXT(GLenum pname, GLfloat param)
3264 {
3265 GLfloat parray[3];
3266 parray[0] = param;
3267 parray[1] = parray[2] = 0.0F;
3268 save_PointParameterfvEXT(pname, parray);
3269 }
3270
3271 static void GLAPIENTRY
3272 save_PointParameteriNV(GLenum pname, GLint param)
3273 {
3274 GLfloat parray[3];
3275 parray[0] = (GLfloat) param;
3276 parray[1] = parray[2] = 0.0F;
3277 save_PointParameterfvEXT(pname, parray);
3278 }
3279
3280 static void GLAPIENTRY
3281 save_PointParameterivNV(GLenum pname, const GLint * param)
3282 {
3283 GLfloat parray[3];
3284 parray[0] = (GLfloat) param[0];
3285 parray[1] = parray[2] = 0.0F;
3286 save_PointParameterfvEXT(pname, parray);
3287 }
3288
3289
3290 static void GLAPIENTRY
3291 save_PointSize(GLfloat size)
3292 {
3293 GET_CURRENT_CONTEXT(ctx);
3294 Node *n;
3295 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3296 n = alloc_instruction(ctx, OPCODE_POINT_SIZE, 1);
3297 if (n) {
3298 n[1].f = size;
3299 }
3300 if (ctx->ExecuteFlag) {
3301 CALL_PointSize(ctx->Exec, (size));
3302 }
3303 }
3304
3305
3306 static void GLAPIENTRY
3307 save_PolygonMode(GLenum face, GLenum mode)
3308 {
3309 GET_CURRENT_CONTEXT(ctx);
3310 Node *n;
3311 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3312 n = alloc_instruction(ctx, OPCODE_POLYGON_MODE, 2);
3313 if (n) {
3314 n[1].e = face;
3315 n[2].e = mode;
3316 }
3317 if (ctx->ExecuteFlag) {
3318 CALL_PolygonMode(ctx->Exec, (face, mode));
3319 }
3320 }
3321
3322
3323 static void GLAPIENTRY
3324 save_PolygonStipple(const GLubyte * pattern)
3325 {
3326 GET_CURRENT_CONTEXT(ctx);
3327 Node *n;
3328
3329 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3330
3331 n = alloc_instruction(ctx, OPCODE_POLYGON_STIPPLE, 1);
3332 if (n) {
3333 n[1].data = unpack_image(ctx, 2, 32, 32, 1, GL_COLOR_INDEX, GL_BITMAP,
3334 pattern, &ctx->Unpack);
3335 }
3336 if (ctx->ExecuteFlag) {
3337 CALL_PolygonStipple(ctx->Exec, ((GLubyte *) pattern));
3338 }
3339 }
3340
3341
3342 static void GLAPIENTRY
3343 save_PolygonOffset(GLfloat factor, GLfloat units)
3344 {
3345 GET_CURRENT_CONTEXT(ctx);
3346 Node *n;
3347 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3348 n = alloc_instruction(ctx, OPCODE_POLYGON_OFFSET, 2);
3349 if (n) {
3350 n[1].f = factor;
3351 n[2].f = units;
3352 }
3353 if (ctx->ExecuteFlag) {
3354 CALL_PolygonOffset(ctx->Exec, (factor, units));
3355 }
3356 }
3357
3358
3359 static void GLAPIENTRY
3360 save_PolygonOffsetEXT(GLfloat factor, GLfloat bias)
3361 {
3362 GET_CURRENT_CONTEXT(ctx);
3363 /* XXX mult by DepthMaxF here??? */
3364 save_PolygonOffset(factor, ctx->DrawBuffer->_DepthMaxF * bias);
3365 }
3366
3367
3368 static void GLAPIENTRY
3369 save_PopAttrib(void)
3370 {
3371 GET_CURRENT_CONTEXT(ctx);
3372 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3373 (void) alloc_instruction(ctx, OPCODE_POP_ATTRIB, 0);
3374 if (ctx->ExecuteFlag) {
3375 CALL_PopAttrib(ctx->Exec, ());
3376 }
3377 }
3378
3379
3380 static void GLAPIENTRY
3381 save_PopMatrix(void)
3382 {
3383 GET_CURRENT_CONTEXT(ctx);
3384 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3385 (void) alloc_instruction(ctx, OPCODE_POP_MATRIX, 0);
3386 if (ctx->ExecuteFlag) {
3387 CALL_PopMatrix(ctx->Exec, ());
3388 }
3389 }
3390
3391
3392 static void GLAPIENTRY
3393 save_PopName(void)
3394 {
3395 GET_CURRENT_CONTEXT(ctx);
3396 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3397 (void) alloc_instruction(ctx, OPCODE_POP_NAME, 0);
3398 if (ctx->ExecuteFlag) {
3399 CALL_PopName(ctx->Exec, ());
3400 }
3401 }
3402
3403
3404 static void GLAPIENTRY
3405 save_PrioritizeTextures(GLsizei num, const GLuint * textures,
3406 const GLclampf * priorities)
3407 {
3408 GET_CURRENT_CONTEXT(ctx);
3409 GLint i;
3410 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3411
3412 for (i = 0; i < num; i++) {
3413 Node *n;
3414 n = alloc_instruction(ctx, OPCODE_PRIORITIZE_TEXTURE, 2);
3415 if (n) {
3416 n[1].ui = textures[i];
3417 n[2].f = priorities[i];
3418 }
3419 }
3420 if (ctx->ExecuteFlag) {
3421 CALL_PrioritizeTextures(ctx->Exec, (num, textures, priorities));
3422 }
3423 }
3424
3425
3426 static void GLAPIENTRY
3427 save_PushAttrib(GLbitfield mask)
3428 {
3429 GET_CURRENT_CONTEXT(ctx);
3430 Node *n;
3431 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3432 n = alloc_instruction(ctx, OPCODE_PUSH_ATTRIB, 1);
3433 if (n) {
3434 n[1].bf = mask;
3435 }
3436 if (ctx->ExecuteFlag) {
3437 CALL_PushAttrib(ctx->Exec, (mask));
3438 }
3439 }
3440
3441
3442 static void GLAPIENTRY
3443 save_PushMatrix(void)
3444 {
3445 GET_CURRENT_CONTEXT(ctx);
3446 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3447 (void) alloc_instruction(ctx, OPCODE_PUSH_MATRIX, 0);
3448 if (ctx->ExecuteFlag) {
3449 CALL_PushMatrix(ctx->Exec, ());
3450 }
3451 }
3452
3453
3454 static void GLAPIENTRY
3455 save_PushName(GLuint name)
3456 {
3457 GET_CURRENT_CONTEXT(ctx);
3458 Node *n;
3459 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3460 n = alloc_instruction(ctx, OPCODE_PUSH_NAME, 1);
3461 if (n) {
3462 n[1].ui = name;
3463 }
3464 if (ctx->ExecuteFlag) {
3465 CALL_PushName(ctx->Exec, (name));
3466 }
3467 }
3468
3469
3470 static void GLAPIENTRY
3471 save_RasterPos4f(GLfloat x, GLfloat y, GLfloat z, GLfloat w)
3472 {
3473 GET_CURRENT_CONTEXT(ctx);
3474 Node *n;
3475 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3476 n = alloc_instruction(ctx, OPCODE_RASTER_POS, 4);
3477 if (n) {
3478 n[1].f = x;
3479 n[2].f = y;
3480 n[3].f = z;
3481 n[4].f = w;
3482 }
3483 if (ctx->ExecuteFlag) {
3484 CALL_RasterPos4f(ctx->Exec, (x, y, z, w));
3485 }
3486 }
3487
3488 static void GLAPIENTRY
3489 save_RasterPos2d(GLdouble x, GLdouble y)
3490 {
3491 save_RasterPos4f((GLfloat) x, (GLfloat) y, 0.0F, 1.0F);
3492 }
3493
3494 static void GLAPIENTRY
3495 save_RasterPos2f(GLfloat x, GLfloat y)
3496 {
3497 save_RasterPos4f(x, y, 0.0F, 1.0F);
3498 }
3499
3500 static void GLAPIENTRY
3501 save_RasterPos2i(GLint x, GLint y)
3502 {
3503 save_RasterPos4f((GLfloat) x, (GLfloat) y, 0.0F, 1.0F);
3504 }
3505
3506 static void GLAPIENTRY
3507 save_RasterPos2s(GLshort x, GLshort y)
3508 {
3509 save_RasterPos4f(x, y, 0.0F, 1.0F);
3510 }
3511
3512 static void GLAPIENTRY
3513 save_RasterPos3d(GLdouble x, GLdouble y, GLdouble z)
3514 {
3515 save_RasterPos4f((GLfloat) x, (GLfloat) y, (GLfloat) z, 1.0F);
3516 }
3517
3518 static void GLAPIENTRY
3519 save_RasterPos3f(GLfloat x, GLfloat y, GLfloat z)
3520 {
3521 save_RasterPos4f(x, y, z, 1.0F);
3522 }
3523
3524 static void GLAPIENTRY
3525 save_RasterPos3i(GLint x, GLint y, GLint z)
3526 {
3527 save_RasterPos4f((GLfloat) x, (GLfloat) y, (GLfloat) z, 1.0F);
3528 }
3529
3530 static void GLAPIENTRY
3531 save_RasterPos3s(GLshort x, GLshort y, GLshort z)
3532 {
3533 save_RasterPos4f(x, y, z, 1.0F);
3534 }
3535
3536 static void GLAPIENTRY
3537 save_RasterPos4d(GLdouble x, GLdouble y, GLdouble z, GLdouble w)
3538 {
3539 save_RasterPos4f((GLfloat) x, (GLfloat) y, (GLfloat) z, (GLfloat) w);
3540 }
3541
3542 static void GLAPIENTRY
3543 save_RasterPos4i(GLint x, GLint y, GLint z, GLint w)
3544 {
3545 save_RasterPos4f((GLfloat) x, (GLfloat) y, (GLfloat) z, (GLfloat) w);
3546 }
3547
3548 static void GLAPIENTRY
3549 save_RasterPos4s(GLshort x, GLshort y, GLshort z, GLshort w)
3550 {
3551 save_RasterPos4f(x, y, z, w);
3552 }
3553
3554 static void GLAPIENTRY
3555 save_RasterPos2dv(const GLdouble * v)
3556 {
3557 save_RasterPos4f((GLfloat) v[0], (GLfloat) v[1], 0.0F, 1.0F);
3558 }
3559
3560 static void GLAPIENTRY
3561 save_RasterPos2fv(const GLfloat * v)
3562 {
3563 save_RasterPos4f(v[0], v[1], 0.0F, 1.0F);
3564 }
3565
3566 static void GLAPIENTRY
3567 save_RasterPos2iv(const GLint * v)
3568 {
3569 save_RasterPos4f((GLfloat) v[0], (GLfloat) v[1], 0.0F, 1.0F);
3570 }
3571
3572 static void GLAPIENTRY
3573 save_RasterPos2sv(const GLshort * v)
3574 {
3575 save_RasterPos4f(v[0], v[1], 0.0F, 1.0F);
3576 }
3577
3578 static void GLAPIENTRY
3579 save_RasterPos3dv(const GLdouble * v)
3580 {
3581 save_RasterPos4f((GLfloat) v[0], (GLfloat) v[1], (GLfloat) v[2], 1.0F);
3582 }
3583
3584 static void GLAPIENTRY
3585 save_RasterPos3fv(const GLfloat * v)
3586 {
3587 save_RasterPos4f(v[0], v[1], v[2], 1.0F);
3588 }
3589
3590 static void GLAPIENTRY
3591 save_RasterPos3iv(const GLint * v)
3592 {
3593 save_RasterPos4f((GLfloat) v[0], (GLfloat) v[1], (GLfloat) v[2], 1.0F);
3594 }
3595
3596 static void GLAPIENTRY
3597 save_RasterPos3sv(const GLshort * v)
3598 {
3599 save_RasterPos4f(v[0], v[1], v[2], 1.0F);
3600 }
3601
3602 static void GLAPIENTRY
3603 save_RasterPos4dv(const GLdouble * v)
3604 {
3605 save_RasterPos4f((GLfloat) v[0], (GLfloat) v[1],
3606 (GLfloat) v[2], (GLfloat) v[3]);
3607 }
3608
3609 static void GLAPIENTRY
3610 save_RasterPos4fv(const GLfloat * v)
3611 {
3612 save_RasterPos4f(v[0], v[1], v[2], v[3]);
3613 }
3614
3615 static void GLAPIENTRY
3616 save_RasterPos4iv(const GLint * v)
3617 {
3618 save_RasterPos4f((GLfloat) v[0], (GLfloat) v[1],
3619 (GLfloat) v[2], (GLfloat) v[3]);
3620 }
3621
3622 static void GLAPIENTRY
3623 save_RasterPos4sv(const GLshort * v)
3624 {
3625 save_RasterPos4f(v[0], v[1], v[2], v[3]);
3626 }
3627
3628
3629 static void GLAPIENTRY
3630 save_PassThrough(GLfloat token)
3631 {
3632 GET_CURRENT_CONTEXT(ctx);
3633 Node *n;
3634 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3635 n = alloc_instruction(ctx, OPCODE_PASSTHROUGH, 1);
3636 if (n) {
3637 n[1].f = token;
3638 }
3639 if (ctx->ExecuteFlag) {
3640 CALL_PassThrough(ctx->Exec, (token));
3641 }
3642 }
3643
3644
3645 static void GLAPIENTRY
3646 save_ReadBuffer(GLenum mode)
3647 {
3648 GET_CURRENT_CONTEXT(ctx);
3649 Node *n;
3650 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3651 n = alloc_instruction(ctx, OPCODE_READ_BUFFER, 1);
3652 if (n) {
3653 n[1].e = mode;
3654 }
3655 if (ctx->ExecuteFlag) {
3656 CALL_ReadBuffer(ctx->Exec, (mode));
3657 }
3658 }
3659
3660
3661 static void GLAPIENTRY
3662 save_ResetHistogram(GLenum target)
3663 {
3664 GET_CURRENT_CONTEXT(ctx);
3665 Node *n;
3666 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3667 n = alloc_instruction(ctx, OPCODE_RESET_HISTOGRAM, 1);
3668 if (n) {
3669 n[1].e = target;
3670 }
3671 if (ctx->ExecuteFlag) {
3672 CALL_ResetHistogram(ctx->Exec, (target));
3673 }
3674 }
3675
3676
3677 static void GLAPIENTRY
3678 save_ResetMinmax(GLenum target)
3679 {
3680 GET_CURRENT_CONTEXT(ctx);
3681 Node *n;
3682 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3683 n = alloc_instruction(ctx, OPCODE_RESET_MIN_MAX, 1);
3684 if (n) {
3685 n[1].e = target;
3686 }
3687 if (ctx->ExecuteFlag) {
3688 CALL_ResetMinmax(ctx->Exec, (target));
3689 }
3690 }
3691
3692
3693 static void GLAPIENTRY
3694 save_Rotatef(GLfloat angle, GLfloat x, GLfloat y, GLfloat z)
3695 {
3696 GET_CURRENT_CONTEXT(ctx);
3697 Node *n;
3698 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3699 n = alloc_instruction(ctx, OPCODE_ROTATE, 4);
3700 if (n) {
3701 n[1].f = angle;
3702 n[2].f = x;
3703 n[3].f = y;
3704 n[4].f = z;
3705 }
3706 if (ctx->ExecuteFlag) {
3707 CALL_Rotatef(ctx->Exec, (angle, x, y, z));
3708 }
3709 }
3710
3711
3712 static void GLAPIENTRY
3713 save_Rotated(GLdouble angle, GLdouble x, GLdouble y, GLdouble z)
3714 {
3715 save_Rotatef((GLfloat) angle, (GLfloat) x, (GLfloat) y, (GLfloat) z);
3716 }
3717
3718
3719 static void GLAPIENTRY
3720 save_Scalef(GLfloat x, GLfloat y, GLfloat z)
3721 {
3722 GET_CURRENT_CONTEXT(ctx);
3723 Node *n;
3724 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3725 n = alloc_instruction(ctx, OPCODE_SCALE, 3);
3726 if (n) {
3727 n[1].f = x;
3728 n[2].f = y;
3729 n[3].f = z;
3730 }
3731 if (ctx->ExecuteFlag) {
3732 CALL_Scalef(ctx->Exec, (x, y, z));
3733 }
3734 }
3735
3736
3737 static void GLAPIENTRY
3738 save_Scaled(GLdouble x, GLdouble y, GLdouble z)
3739 {
3740 save_Scalef((GLfloat) x, (GLfloat) y, (GLfloat) z);
3741 }
3742
3743
3744 static void GLAPIENTRY
3745 save_Scissor(GLint x, GLint y, GLsizei width, GLsizei height)
3746 {
3747 GET_CURRENT_CONTEXT(ctx);
3748 Node *n;
3749 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3750 n = alloc_instruction(ctx, OPCODE_SCISSOR, 4);
3751 if (n) {
3752 n[1].i = x;
3753 n[2].i = y;
3754 n[3].i = width;
3755 n[4].i = height;
3756 }
3757 if (ctx->ExecuteFlag) {
3758 CALL_Scissor(ctx->Exec, (x, y, width, height));
3759 }
3760 }
3761
3762
3763 static void GLAPIENTRY
3764 save_ShadeModel(GLenum mode)
3765 {
3766 GET_CURRENT_CONTEXT(ctx);
3767 Node *n;
3768 ASSERT_OUTSIDE_SAVE_BEGIN_END(ctx);
3769
3770 if (ctx->ExecuteFlag) {
3771 CALL_ShadeModel(ctx->Exec, (mode));
3772 }
3773
3774 /* Don't compile this call if it's a no-op.
3775 * By avoiding this state change we have a better chance of
3776 * coalescing subsequent drawing commands into one batch.
3777 */
3778 if (ctx->ListState.Current.ShadeModel == mode)
3779 return;
3780
3781 SAVE_FLUSH_VERTICES(ctx);
3782
3783 ctx->ListState.Current.ShadeModel = mode;
3784
3785 n = alloc_instruction(ctx, OPCODE_SHADE_MODEL, 1);
3786 if (n) {
3787 n[1].e = mode;
3788 }
3789 }
3790
3791
3792 static void GLAPIENTRY
3793 save_StencilFunc(GLenum func, GLint ref, GLuint mask)
3794 {
3795 GET_CURRENT_CONTEXT(ctx);
3796 Node *n;
3797 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3798 n = alloc_instruction(ctx, OPCODE_STENCIL_FUNC, 3);
3799 if (n) {
3800 n[1].e = func;
3801 n[2].i = ref;
3802 n[3].ui = mask;
3803 }
3804 if (ctx->ExecuteFlag) {
3805 CALL_StencilFunc(ctx->Exec, (func, ref, mask));
3806 }
3807 }
3808
3809
3810 static void GLAPIENTRY
3811 save_StencilMask(GLuint mask)
3812 {
3813 GET_CURRENT_CONTEXT(ctx);
3814 Node *n;
3815 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3816 n = alloc_instruction(ctx, OPCODE_STENCIL_MASK, 1);
3817 if (n) {
3818 n[1].ui = mask;
3819 }
3820 if (ctx->ExecuteFlag) {
3821 CALL_StencilMask(ctx->Exec, (mask));
3822 }
3823 }
3824
3825
3826 static void GLAPIENTRY
3827 save_StencilOp(GLenum fail, GLenum zfail, GLenum zpass)
3828 {
3829 GET_CURRENT_CONTEXT(ctx);
3830 Node *n;
3831 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3832 n = alloc_instruction(ctx, OPCODE_STENCIL_OP, 3);
3833 if (n) {
3834 n[1].e = fail;
3835 n[2].e = zfail;
3836 n[3].e = zpass;
3837 }
3838 if (ctx->ExecuteFlag) {
3839 CALL_StencilOp(ctx->Exec, (fail, zfail, zpass));
3840 }
3841 }
3842
3843
3844 static void GLAPIENTRY
3845 save_StencilFuncSeparate(GLenum face, GLenum func, GLint ref, GLuint mask)
3846 {
3847 GET_CURRENT_CONTEXT(ctx);
3848 Node *n;
3849 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3850 n = alloc_instruction(ctx, OPCODE_STENCIL_FUNC_SEPARATE, 4);
3851 if (n) {
3852 n[1].e = face;
3853 n[2].e = func;
3854 n[3].i = ref;
3855 n[4].ui = mask;
3856 }
3857 if (ctx->ExecuteFlag) {
3858 CALL_StencilFuncSeparate(ctx->Exec, (face, func, ref, mask));
3859 }
3860 }
3861
3862
3863 static void GLAPIENTRY
3864 save_StencilFuncSeparateATI(GLenum frontfunc, GLenum backfunc, GLint ref,
3865 GLuint mask)
3866 {
3867 GET_CURRENT_CONTEXT(ctx);
3868 Node *n;
3869 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3870 /* GL_FRONT */
3871 n = alloc_instruction(ctx, OPCODE_STENCIL_FUNC_SEPARATE, 4);
3872 if (n) {
3873 n[1].e = GL_FRONT;
3874 n[2].e = frontfunc;
3875 n[3].i = ref;
3876 n[4].ui = mask;
3877 }
3878 /* GL_BACK */
3879 n = alloc_instruction(ctx, OPCODE_STENCIL_FUNC_SEPARATE, 4);
3880 if (n) {
3881 n[1].e = GL_BACK;
3882 n[2].e = backfunc;
3883 n[3].i = ref;
3884 n[4].ui = mask;
3885 }
3886 if (ctx->ExecuteFlag) {
3887 CALL_StencilFuncSeparate(ctx->Exec, (GL_FRONT, frontfunc, ref, mask));
3888 CALL_StencilFuncSeparate(ctx->Exec, (GL_BACK, backfunc, ref, mask));
3889 }
3890 }
3891
3892
3893 static void GLAPIENTRY
3894 save_StencilMaskSeparate(GLenum face, GLuint mask)
3895 {
3896 GET_CURRENT_CONTEXT(ctx);
3897 Node *n;
3898 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3899 n = alloc_instruction(ctx, OPCODE_STENCIL_MASK_SEPARATE, 2);
3900 if (n) {
3901 n[1].e = face;
3902 n[2].ui = mask;
3903 }
3904 if (ctx->ExecuteFlag) {
3905 CALL_StencilMaskSeparate(ctx->Exec, (face, mask));
3906 }
3907 }
3908
3909
3910 static void GLAPIENTRY
3911 save_StencilOpSeparate(GLenum face, GLenum fail, GLenum zfail, GLenum zpass)
3912 {
3913 GET_CURRENT_CONTEXT(ctx);
3914 Node *n;
3915 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3916 n = alloc_instruction(ctx, OPCODE_STENCIL_OP_SEPARATE, 4);
3917 if (n) {
3918 n[1].e = face;
3919 n[2].e = fail;
3920 n[3].e = zfail;
3921 n[4].e = zpass;
3922 }
3923 if (ctx->ExecuteFlag) {
3924 CALL_StencilOpSeparate(ctx->Exec, (face, fail, zfail, zpass));
3925 }
3926 }
3927
3928
3929 static void GLAPIENTRY
3930 save_TexEnvfv(GLenum target, GLenum pname, const GLfloat *params)
3931 {
3932 GET_CURRENT_CONTEXT(ctx);
3933 Node *n;
3934 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3935 n = alloc_instruction(ctx, OPCODE_TEXENV, 6);
3936 if (n) {
3937 n[1].e = target;
3938 n[2].e = pname;
3939 if (pname == GL_TEXTURE_ENV_COLOR) {
3940 n[3].f = params[0];
3941 n[4].f = params[1];
3942 n[5].f = params[2];
3943 n[6].f = params[3];
3944 }
3945 else {
3946 n[3].f = params[0];
3947 n[4].f = n[5].f = n[6].f = 0.0F;
3948 }
3949 }
3950 if (ctx->ExecuteFlag) {
3951 CALL_TexEnvfv(ctx->Exec, (target, pname, params));
3952 }
3953 }
3954
3955
3956 static void GLAPIENTRY
3957 save_TexEnvf(GLenum target, GLenum pname, GLfloat param)
3958 {
3959 GLfloat parray[4];
3960 parray[0] = (GLfloat) param;
3961 parray[1] = parray[2] = parray[3] = 0.0F;
3962 save_TexEnvfv(target, pname, parray);
3963 }
3964
3965
3966 static void GLAPIENTRY
3967 save_TexEnvi(GLenum target, GLenum pname, GLint param)
3968 {
3969 GLfloat p[4];
3970 p[0] = (GLfloat) param;
3971 p[1] = p[2] = p[3] = 0.0F;
3972 save_TexEnvfv(target, pname, p);
3973 }
3974
3975
3976 static void GLAPIENTRY
3977 save_TexEnviv(GLenum target, GLenum pname, const GLint * param)
3978 {
3979 GLfloat p[4];
3980 if (pname == GL_TEXTURE_ENV_COLOR) {
3981 p[0] = INT_TO_FLOAT(param[0]);
3982 p[1] = INT_TO_FLOAT(param[1]);
3983 p[2] = INT_TO_FLOAT(param[2]);
3984 p[3] = INT_TO_FLOAT(param[3]);
3985 }
3986 else {
3987 p[0] = (GLfloat) param[0];
3988 p[1] = p[2] = p[3] = 0.0F;
3989 }
3990 save_TexEnvfv(target, pname, p);
3991 }
3992
3993
3994 static void GLAPIENTRY
3995 save_TexGenfv(GLenum coord, GLenum pname, const GLfloat *params)
3996 {
3997 GET_CURRENT_CONTEXT(ctx);
3998 Node *n;
3999 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4000 n = alloc_instruction(ctx, OPCODE_TEXGEN, 6);
4001 if (n) {
4002 n[1].e = coord;
4003 n[2].e = pname;
4004 n[3].f = params[0];
4005 n[4].f = params[1];
4006 n[5].f = params[2];
4007 n[6].f = params[3];
4008 }
4009 if (ctx->ExecuteFlag) {
4010 CALL_TexGenfv(ctx->Exec, (coord, pname, params));
4011 }
4012 }
4013
4014
4015 static void GLAPIENTRY
4016 save_TexGeniv(GLenum coord, GLenum pname, const GLint *params)
4017 {
4018 GLfloat p[4];
4019 p[0] = (GLfloat) params[0];
4020 p[1] = (GLfloat) params[1];
4021 p[2] = (GLfloat) params[2];
4022 p[3] = (GLfloat) params[3];
4023 save_TexGenfv(coord, pname, p);
4024 }
4025
4026
4027 static void GLAPIENTRY
4028 save_TexGend(GLenum coord, GLenum pname, GLdouble param)
4029 {
4030 GLfloat parray[4];
4031 parray[0] = (GLfloat) param;
4032 parray[1] = parray[2] = parray[3] = 0.0F;
4033 save_TexGenfv(coord, pname, parray);
4034 }
4035
4036
4037 static void GLAPIENTRY
4038 save_TexGendv(GLenum coord, GLenum pname, const GLdouble *params)
4039 {
4040 GLfloat p[4];
4041 p[0] = (GLfloat) params[0];
4042 p[1] = (GLfloat) params[1];
4043 p[2] = (GLfloat) params[2];
4044 p[3] = (GLfloat) params[3];
4045 save_TexGenfv(coord, pname, p);
4046 }
4047
4048
4049 static void GLAPIENTRY
4050 save_TexGenf(GLenum coord, GLenum pname, GLfloat param)
4051 {
4052 GLfloat parray[4];
4053 parray[0] = param;
4054 parray[1] = parray[2] = parray[3] = 0.0F;
4055 save_TexGenfv(coord, pname, parray);
4056 }
4057
4058
4059 static void GLAPIENTRY
4060 save_TexGeni(GLenum coord, GLenum pname, GLint param)
4061 {
4062 GLint parray[4];
4063 parray[0] = param;
4064 parray[1] = parray[2] = parray[3] = 0;
4065 save_TexGeniv(coord, pname, parray);
4066 }
4067
4068
4069 static void GLAPIENTRY
4070 save_TexParameterfv(GLenum target, GLenum pname, const GLfloat *params)
4071 {
4072 GET_CURRENT_CONTEXT(ctx);
4073 Node *n;
4074 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4075 n = alloc_instruction(ctx, OPCODE_TEXPARAMETER, 6);
4076 if (n) {
4077 n[1].e = target;
4078 n[2].e = pname;
4079 n[3].f = params[0];
4080 n[4].f = params[1];
4081 n[5].f = params[2];
4082 n[6].f = params[3];
4083 }
4084 if (ctx->ExecuteFlag) {
4085 CALL_TexParameterfv(ctx->Exec, (target, pname, params));
4086 }
4087 }
4088
4089
4090 static void GLAPIENTRY
4091 save_TexParameterf(GLenum target, GLenum pname, GLfloat param)
4092 {
4093 GLfloat parray[4];
4094 parray[0] = param;
4095 parray[1] = parray[2] = parray[3] = 0.0F;
4096 save_TexParameterfv(target, pname, parray);
4097 }
4098
4099
4100 static void GLAPIENTRY
4101 save_TexParameteri(GLenum target, GLenum pname, GLint param)
4102 {
4103 GLfloat fparam[4];
4104 fparam[0] = (GLfloat) param;
4105 fparam[1] = fparam[2] = fparam[3] = 0.0F;
4106 save_TexParameterfv(target, pname, fparam);
4107 }
4108
4109
4110 static void GLAPIENTRY
4111 save_TexParameteriv(GLenum target, GLenum pname, const GLint *params)
4112 {
4113 GLfloat fparam[4];
4114 fparam[0] = (GLfloat) params[0];
4115 fparam[1] = fparam[2] = fparam[3] = 0.0F;
4116 save_TexParameterfv(target, pname, fparam);
4117 }
4118
4119
4120 static void GLAPIENTRY
4121 save_TexImage1D(GLenum target,
4122 GLint level, GLint components,
4123 GLsizei width, GLint border,
4124 GLenum format, GLenum type, const GLvoid * pixels)
4125 {
4126 GET_CURRENT_CONTEXT(ctx);
4127 if (target == GL_PROXY_TEXTURE_1D) {
4128 /* don't compile, execute immediately */
4129 CALL_TexImage1D(ctx->Exec, (target, level, components, width,
4130 border, format, type, pixels));
4131 }
4132 else {
4133 Node *n;
4134 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4135 n = alloc_instruction(ctx, OPCODE_TEX_IMAGE1D, 8);
4136 if (n) {
4137 n[1].e = target;
4138 n[2].i = level;
4139 n[3].i = components;
4140 n[4].i = (GLint) width;
4141 n[5].i = border;
4142 n[6].e = format;
4143 n[7].e = type;
4144 n[8].data = unpack_image(ctx, 1, width, 1, 1, format, type,
4145 pixels, &ctx->Unpack);
4146 }
4147 if (ctx->ExecuteFlag) {
4148 CALL_TexImage1D(ctx->Exec, (target, level, components, width,
4149 border, format, type, pixels));
4150 }
4151 }
4152 }
4153
4154
4155 static void GLAPIENTRY
4156 save_TexImage2D(GLenum target,
4157 GLint level, GLint components,
4158 GLsizei width, GLsizei height, GLint border,
4159 GLenum format, GLenum type, const GLvoid * pixels)
4160 {
4161 GET_CURRENT_CONTEXT(ctx);
4162 if (target == GL_PROXY_TEXTURE_2D) {
4163 /* don't compile, execute immediately */
4164 CALL_TexImage2D(ctx->Exec, (target, level, components, width,
4165 height, border, format, type, pixels));
4166 }
4167 else {
4168 Node *n;
4169 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4170 n = alloc_instruction(ctx, OPCODE_TEX_IMAGE2D, 9);
4171 if (n) {
4172 n[1].e = target;
4173 n[2].i = level;
4174 n[3].i = components;
4175 n[4].i = (GLint) width;
4176 n[5].i = (GLint) height;
4177 n[6].i = border;
4178 n[7].e = format;
4179 n[8].e = type;
4180 n[9].data = unpack_image(ctx, 2, width, height, 1, format, type,
4181 pixels, &ctx->Unpack);
4182 }
4183 if (ctx->ExecuteFlag) {
4184 CALL_TexImage2D(ctx->Exec, (target, level, components, width,
4185 height, border, format, type, pixels));
4186 }
4187 }
4188 }
4189
4190
4191 static void GLAPIENTRY
4192 save_TexImage3D(GLenum target,
4193 GLint level, GLint internalFormat,
4194 GLsizei width, GLsizei height, GLsizei depth,
4195 GLint border,
4196 GLenum format, GLenum type, const GLvoid * pixels)
4197 {
4198 GET_CURRENT_CONTEXT(ctx);
4199 if (target == GL_PROXY_TEXTURE_3D) {
4200 /* don't compile, execute immediately */
4201 CALL_TexImage3D(ctx->Exec, (target, level, internalFormat, width,
4202 height, depth, border, format, type,
4203 pixels));
4204 }
4205 else {
4206 Node *n;
4207 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4208 n = alloc_instruction(ctx, OPCODE_TEX_IMAGE3D, 10);
4209 if (n) {
4210 n[1].e = target;
4211 n[2].i = level;
4212 n[3].i = (GLint) internalFormat;
4213 n[4].i = (GLint) width;
4214 n[5].i = (GLint) height;
4215 n[6].i = (GLint) depth;
4216 n[7].i = border;
4217 n[8].e = format;
4218 n[9].e = type;
4219 n[10].data = unpack_image(ctx, 3, width, height, depth, format, type,
4220 pixels, &ctx->Unpack);
4221 }
4222 if (ctx->ExecuteFlag) {
4223 CALL_TexImage3D(ctx->Exec, (target, level, internalFormat, width,
4224 height, depth, border, format, type,
4225 pixels));
4226 }
4227 }
4228 }
4229
4230
4231 static void GLAPIENTRY
4232 save_TexSubImage1D(GLenum target, GLint level, GLint xoffset,
4233 GLsizei width, GLenum format, GLenum type,
4234 const GLvoid * pixels)
4235 {
4236 GET_CURRENT_CONTEXT(ctx);
4237 Node *n;
4238
4239 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4240
4241 n = alloc_instruction(ctx, OPCODE_TEX_SUB_IMAGE1D, 7);
4242 if (n) {
4243 n[1].e = target;
4244 n[2].i = level;
4245 n[3].i = xoffset;
4246 n[4].i = (GLint) width;
4247 n[5].e = format;
4248 n[6].e = type;
4249 n[7].data = unpack_image(ctx, 1, width, 1, 1, format, type,
4250 pixels, &ctx->Unpack);
4251 }
4252 if (ctx->ExecuteFlag) {
4253 CALL_TexSubImage1D(ctx->Exec, (target, level, xoffset, width,
4254 format, type, pixels));
4255 }
4256 }
4257
4258
4259 static void GLAPIENTRY
4260 save_TexSubImage2D(GLenum target, GLint level,
4261 GLint xoffset, GLint yoffset,
4262 GLsizei width, GLsizei height,
4263 GLenum format, GLenum type, const GLvoid * pixels)
4264 {
4265 GET_CURRENT_CONTEXT(ctx);
4266 Node *n;
4267
4268 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4269
4270 n = alloc_instruction(ctx, OPCODE_TEX_SUB_IMAGE2D, 9);
4271 if (n) {
4272 n[1].e = target;
4273 n[2].i = level;
4274 n[3].i = xoffset;
4275 n[4].i = yoffset;
4276 n[5].i = (GLint) width;
4277 n[6].i = (GLint) height;
4278 n[7].e = format;
4279 n[8].e = type;
4280 n[9].data = unpack_image(ctx, 2, width, height, 1, format, type,
4281 pixels, &ctx->Unpack);
4282 }
4283 if (ctx->ExecuteFlag) {
4284 CALL_TexSubImage2D(ctx->Exec, (target, level, xoffset, yoffset,
4285 width, height, format, type, pixels));
4286 }
4287 }
4288
4289
4290 static void GLAPIENTRY
4291 save_TexSubImage3D(GLenum target, GLint level,
4292 GLint xoffset, GLint yoffset, GLint zoffset,
4293 GLsizei width, GLsizei height, GLsizei depth,
4294 GLenum format, GLenum type, const GLvoid * pixels)
4295 {
4296 GET_CURRENT_CONTEXT(ctx);
4297 Node *n;
4298
4299 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4300
4301 n = alloc_instruction(ctx, OPCODE_TEX_SUB_IMAGE3D, 11);
4302 if (n) {
4303 n[1].e = target;
4304 n[2].i = level;
4305 n[3].i = xoffset;
4306 n[4].i = yoffset;
4307 n[5].i = zoffset;
4308 n[6].i = (GLint) width;
4309 n[7].i = (GLint) height;
4310 n[8].i = (GLint) depth;
4311 n[9].e = format;
4312 n[10].e = type;
4313 n[11].data = unpack_image(ctx, 3, width, height, depth, format, type,
4314 pixels, &ctx->Unpack);
4315 }
4316 if (ctx->ExecuteFlag) {
4317 CALL_TexSubImage3D(ctx->Exec, (target, level,
4318 xoffset, yoffset, zoffset,
4319 width, height, depth, format, type,
4320 pixels));
4321 }
4322 }
4323
4324
4325 static void GLAPIENTRY
4326 save_Translatef(GLfloat x, GLfloat y, GLfloat z)
4327 {
4328 GET_CURRENT_CONTEXT(ctx);
4329 Node *n;
4330 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4331 n = alloc_instruction(ctx, OPCODE_TRANSLATE, 3);
4332 if (n) {
4333 n[1].f = x;
4334 n[2].f = y;
4335 n[3].f = z;
4336 }
4337 if (ctx->ExecuteFlag) {
4338 CALL_Translatef(ctx->Exec, (x, y, z));
4339 }
4340 }
4341
4342
4343 static void GLAPIENTRY
4344 save_Translated(GLdouble x, GLdouble y, GLdouble z)
4345 {
4346 save_Translatef((GLfloat) x, (GLfloat) y, (GLfloat) z);
4347 }
4348
4349
4350
4351 static void GLAPIENTRY
4352 save_Viewport(GLint x, GLint y, GLsizei width, GLsizei height)
4353 {
4354 GET_CURRENT_CONTEXT(ctx);
4355 Node *n;
4356 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4357 n = alloc_instruction(ctx, OPCODE_VIEWPORT, 4);
4358 if (n) {
4359 n[1].i = x;
4360 n[2].i = y;
4361 n[3].i = (GLint) width;
4362 n[4].i = (GLint) height;
4363 }
4364 if (ctx->ExecuteFlag) {
4365 CALL_Viewport(ctx->Exec, (x, y, width, height));
4366 }
4367 }
4368
4369
4370 static void GLAPIENTRY
4371 save_WindowPos4fMESA(GLfloat x, GLfloat y, GLfloat z, GLfloat w)
4372 {
4373 GET_CURRENT_CONTEXT(ctx);
4374 Node *n;
4375 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4376 n = alloc_instruction(ctx, OPCODE_WINDOW_POS, 4);
4377 if (n) {
4378 n[1].f = x;
4379 n[2].f = y;
4380 n[3].f = z;
4381 n[4].f = w;
4382 }
4383 if (ctx->ExecuteFlag) {
4384 CALL_WindowPos4fMESA(ctx->Exec, (x, y, z, w));
4385 }
4386 }
4387
4388 static void GLAPIENTRY
4389 save_WindowPos2dMESA(GLdouble x, GLdouble y)
4390 {
4391 save_WindowPos4fMESA((GLfloat) x, (GLfloat) y, 0.0F, 1.0F);
4392 }
4393
4394 static void GLAPIENTRY
4395 save_WindowPos2fMESA(GLfloat x, GLfloat y)
4396 {
4397 save_WindowPos4fMESA(x, y, 0.0F, 1.0F);
4398 }
4399
4400 static void GLAPIENTRY
4401 save_WindowPos2iMESA(GLint x, GLint y)
4402 {
4403 save_WindowPos4fMESA((GLfloat) x, (GLfloat) y, 0.0F, 1.0F);
4404 }
4405
4406 static void GLAPIENTRY
4407 save_WindowPos2sMESA(GLshort x, GLshort y)
4408 {
4409 save_WindowPos4fMESA(x, y, 0.0F, 1.0F);
4410 }
4411
4412 static void GLAPIENTRY
4413 save_WindowPos3dMESA(GLdouble x, GLdouble y, GLdouble z)
4414 {
4415 save_WindowPos4fMESA((GLfloat) x, (GLfloat) y, (GLfloat) z, 1.0F);
4416 }
4417
4418 static void GLAPIENTRY
4419 save_WindowPos3fMESA(GLfloat x, GLfloat y, GLfloat z)
4420 {
4421 save_WindowPos4fMESA(x, y, z, 1.0F);
4422 }
4423
4424 static void GLAPIENTRY
4425 save_WindowPos3iMESA(GLint x, GLint y, GLint z)
4426 {
4427 save_WindowPos4fMESA((GLfloat) x, (GLfloat) y, (GLfloat) z, 1.0F);
4428 }
4429
4430 static void GLAPIENTRY
4431 save_WindowPos3sMESA(GLshort x, GLshort y, GLshort z)
4432 {
4433 save_WindowPos4fMESA(x, y, z, 1.0F);
4434 }
4435
4436 static void GLAPIENTRY
4437 save_WindowPos4dMESA(GLdouble x, GLdouble y, GLdouble z, GLdouble w)
4438 {
4439 save_WindowPos4fMESA((GLfloat) x, (GLfloat) y, (GLfloat) z, (GLfloat) w);
4440 }
4441
4442 static void GLAPIENTRY
4443 save_WindowPos4iMESA(GLint x, GLint y, GLint z, GLint w)
4444 {
4445 save_WindowPos4fMESA((GLfloat) x, (GLfloat) y, (GLfloat) z, (GLfloat) w);
4446 }
4447
4448 static void GLAPIENTRY
4449 save_WindowPos4sMESA(GLshort x, GLshort y, GLshort z, GLshort w)
4450 {
4451 save_WindowPos4fMESA(x, y, z, w);
4452 }
4453
4454 static void GLAPIENTRY
4455 save_WindowPos2dvMESA(const GLdouble * v)
4456 {
4457 save_WindowPos4fMESA((GLfloat) v[0], (GLfloat) v[1], 0.0F, 1.0F);
4458 }
4459
4460 static void GLAPIENTRY
4461 save_WindowPos2fvMESA(const GLfloat * v)
4462 {
4463 save_WindowPos4fMESA(v[0], v[1], 0.0F, 1.0F);
4464 }
4465
4466 static void GLAPIENTRY
4467 save_WindowPos2ivMESA(const GLint * v)
4468 {
4469 save_WindowPos4fMESA((GLfloat) v[0], (GLfloat) v[1], 0.0F, 1.0F);
4470 }
4471
4472 static void GLAPIENTRY
4473 save_WindowPos2svMESA(const GLshort * v)
4474 {
4475 save_WindowPos4fMESA(v[0], v[1], 0.0F, 1.0F);
4476 }
4477
4478 static void GLAPIENTRY
4479 save_WindowPos3dvMESA(const GLdouble * v)
4480 {
4481 save_WindowPos4fMESA((GLfloat) v[0], (GLfloat) v[1], (GLfloat) v[2], 1.0F);
4482 }
4483
4484 static void GLAPIENTRY
4485 save_WindowPos3fvMESA(const GLfloat * v)
4486 {
4487 save_WindowPos4fMESA(v[0], v[1], v[2], 1.0F);
4488 }
4489
4490 static void GLAPIENTRY
4491 save_WindowPos3ivMESA(const GLint * v)
4492 {
4493 save_WindowPos4fMESA((GLfloat) v[0], (GLfloat) v[1], (GLfloat) v[2], 1.0F);
4494 }
4495
4496 static void GLAPIENTRY
4497 save_WindowPos3svMESA(const GLshort * v)
4498 {
4499 save_WindowPos4fMESA(v[0], v[1], v[2], 1.0F);
4500 }
4501
4502 static void GLAPIENTRY
4503 save_WindowPos4dvMESA(const GLdouble * v)
4504 {
4505 save_WindowPos4fMESA((GLfloat) v[0], (GLfloat) v[1],
4506 (GLfloat) v[2], (GLfloat) v[3]);
4507 }
4508
4509 static void GLAPIENTRY
4510 save_WindowPos4fvMESA(const GLfloat * v)
4511 {
4512 save_WindowPos4fMESA(v[0], v[1], v[2], v[3]);
4513 }
4514
4515 static void GLAPIENTRY
4516 save_WindowPos4ivMESA(const GLint * v)
4517 {
4518 save_WindowPos4fMESA((GLfloat) v[0], (GLfloat) v[1],
4519 (GLfloat) v[2], (GLfloat) v[3]);
4520 }
4521
4522 static void GLAPIENTRY
4523 save_WindowPos4svMESA(const GLshort * v)
4524 {
4525 save_WindowPos4fMESA(v[0], v[1], v[2], v[3]);
4526 }
4527
4528
4529
4530 /* GL_ARB_multitexture */
4531 static void GLAPIENTRY
4532 save_ActiveTextureARB(GLenum target)
4533 {
4534 GET_CURRENT_CONTEXT(ctx);
4535 Node *n;
4536 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4537 n = alloc_instruction(ctx, OPCODE_ACTIVE_TEXTURE, 1);
4538 if (n) {
4539 n[1].e = target;
4540 }
4541 if (ctx->ExecuteFlag) {
4542 CALL_ActiveTexture(ctx->Exec, (target));
4543 }
4544 }
4545
4546
4547 /* GL_ARB_transpose_matrix */
4548
4549 static void GLAPIENTRY
4550 save_LoadTransposeMatrixdARB(const GLdouble m[16])
4551 {
4552 GLfloat tm[16];
4553 _math_transposefd(tm, m);
4554 save_LoadMatrixf(tm);
4555 }
4556
4557
4558 static void GLAPIENTRY
4559 save_LoadTransposeMatrixfARB(const GLfloat m[16])
4560 {
4561 GLfloat tm[16];
4562 _math_transposef(tm, m);
4563 save_LoadMatrixf(tm);
4564 }
4565
4566
4567 static void GLAPIENTRY
4568 save_MultTransposeMatrixdARB(const GLdouble m[16])
4569 {
4570 GLfloat tm[16];
4571 _math_transposefd(tm, m);
4572 save_MultMatrixf(tm);
4573 }
4574
4575
4576 static void GLAPIENTRY
4577 save_MultTransposeMatrixfARB(const GLfloat m[16])
4578 {
4579 GLfloat tm[16];
4580 _math_transposef(tm, m);
4581 save_MultMatrixf(tm);
4582 }
4583
4584 static GLvoid *copy_data(const GLvoid *data, GLsizei size, const char *func)
4585 {
4586 GET_CURRENT_CONTEXT(ctx);
4587 GLvoid *image;
4588
4589 if (!data)
4590 return NULL;
4591
4592 image = malloc(size);
4593 if (!image) {
4594 _mesa_error(ctx, GL_OUT_OF_MEMORY, "%s", func);
4595 return NULL;
4596 }
4597 memcpy(image, data, size);
4598
4599 return image;
4600 }
4601
4602
4603 /* GL_ARB_texture_compression */
4604 static void GLAPIENTRY
4605 save_CompressedTexImage1DARB(GLenum target, GLint level,
4606 GLenum internalFormat, GLsizei width,
4607 GLint border, GLsizei imageSize,
4608 const GLvoid * data)
4609 {
4610 GET_CURRENT_CONTEXT(ctx);
4611 if (target == GL_PROXY_TEXTURE_1D) {
4612 /* don't compile, execute immediately */
4613 CALL_CompressedTexImage1D(ctx->Exec, (target, level, internalFormat,
4614 width, border, imageSize,
4615 data));
4616 }
4617 else {
4618 Node *n;
4619 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4620
4621 n = alloc_instruction(ctx, OPCODE_COMPRESSED_TEX_IMAGE_1D, 7);
4622 if (n) {
4623 n[1].e = target;
4624 n[2].i = level;
4625 n[3].e = internalFormat;
4626 n[4].i = (GLint) width;
4627 n[5].i = border;
4628 n[6].i = imageSize;
4629 n[7].data = copy_data(data, imageSize, "glCompressedTexImage1DARB");
4630 }
4631 if (ctx->ExecuteFlag) {
4632 CALL_CompressedTexImage1D(ctx->Exec,
4633 (target, level, internalFormat, width,
4634 border, imageSize, data));
4635 }
4636 }
4637 }
4638
4639
4640 static void GLAPIENTRY
4641 save_CompressedTexImage2DARB(GLenum target, GLint level,
4642 GLenum internalFormat, GLsizei width,
4643 GLsizei height, GLint border, GLsizei imageSize,
4644 const GLvoid * data)
4645 {
4646 GET_CURRENT_CONTEXT(ctx);
4647 if (target == GL_PROXY_TEXTURE_2D) {
4648 /* don't compile, execute immediately */
4649 CALL_CompressedTexImage2D(ctx->Exec, (target, level, internalFormat,
4650 width, height, border,
4651 imageSize, data));
4652 }
4653 else {
4654 Node *n;
4655 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4656
4657 n = alloc_instruction(ctx, OPCODE_COMPRESSED_TEX_IMAGE_2D, 8);
4658 if (n) {
4659 n[1].e = target;
4660 n[2].i = level;
4661 n[3].e = internalFormat;
4662 n[4].i = (GLint) width;
4663 n[5].i = (GLint) height;
4664 n[6].i = border;
4665 n[7].i = imageSize;
4666 n[8].data = copy_data(data, imageSize, "glCompressedTexImage2DARB");
4667 }
4668 if (ctx->ExecuteFlag) {
4669 CALL_CompressedTexImage2D(ctx->Exec,
4670 (target, level, internalFormat, width,
4671 height, border, imageSize, data));
4672 }
4673 }
4674 }
4675
4676
4677 static void GLAPIENTRY
4678 save_CompressedTexImage3DARB(GLenum target, GLint level,
4679 GLenum internalFormat, GLsizei width,
4680 GLsizei height, GLsizei depth, GLint border,
4681 GLsizei imageSize, const GLvoid * data)
4682 {
4683 GET_CURRENT_CONTEXT(ctx);
4684 if (target == GL_PROXY_TEXTURE_3D) {
4685 /* don't compile, execute immediately */
4686 CALL_CompressedTexImage3D(ctx->Exec, (target, level, internalFormat,
4687 width, height, depth, border,
4688 imageSize, data));
4689 }
4690 else {
4691 Node *n;
4692 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4693
4694 n = alloc_instruction(ctx, OPCODE_COMPRESSED_TEX_IMAGE_3D, 9);
4695 if (n) {
4696 n[1].e = target;
4697 n[2].i = level;
4698 n[3].e = internalFormat;
4699 n[4].i = (GLint) width;
4700 n[5].i = (GLint) height;
4701 n[6].i = (GLint) depth;
4702 n[7].i = border;
4703 n[8].i = imageSize;
4704 n[9].data = copy_data(data, imageSize, "glCompressedTexImage3DARB");
4705 }
4706 if (ctx->ExecuteFlag) {
4707 CALL_CompressedTexImage3D(ctx->Exec,
4708 (target, level, internalFormat, width,
4709 height, depth, border, imageSize,
4710 data));
4711 }
4712 }
4713 }
4714
4715
4716 static void GLAPIENTRY
4717 save_CompressedTexSubImage1DARB(GLenum target, GLint level, GLint xoffset,
4718 GLsizei width, GLenum format,
4719 GLsizei imageSize, const GLvoid * data)
4720 {
4721 Node *n;
4722 GET_CURRENT_CONTEXT(ctx);
4723 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4724
4725 n = alloc_instruction(ctx, OPCODE_COMPRESSED_TEX_SUB_IMAGE_1D, 7);
4726 if (n) {
4727 n[1].e = target;
4728 n[2].i = level;
4729 n[3].i = xoffset;
4730 n[4].i = (GLint) width;
4731 n[5].e = format;
4732 n[6].i = imageSize;
4733 n[7].data = copy_data(data, imageSize, "glCompressedTexSubImage1DARB");
4734 }
4735 if (ctx->ExecuteFlag) {
4736 CALL_CompressedTexSubImage1D(ctx->Exec, (target, level, xoffset,
4737 width, format, imageSize,
4738 data));
4739 }
4740 }
4741
4742
4743 static void GLAPIENTRY
4744 save_CompressedTexSubImage2DARB(GLenum target, GLint level, GLint xoffset,
4745 GLint yoffset, GLsizei width, GLsizei height,
4746 GLenum format, GLsizei imageSize,
4747 const GLvoid * data)
4748 {
4749 Node *n;
4750 GET_CURRENT_CONTEXT(ctx);
4751 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4752
4753 n = alloc_instruction(ctx, OPCODE_COMPRESSED_TEX_SUB_IMAGE_2D, 9);
4754 if (n) {
4755 n[1].e = target;
4756 n[2].i = level;
4757 n[3].i = xoffset;
4758 n[4].i = yoffset;
4759 n[5].i = (GLint) width;
4760 n[6].i = (GLint) height;
4761 n[7].e = format;
4762 n[8].i = imageSize;
4763 n[9].data = copy_data(data, imageSize, "glCompressedTexSubImage2DARB");
4764 }
4765 if (ctx->ExecuteFlag) {
4766 CALL_CompressedTexSubImage2D(ctx->Exec,
4767 (target, level, xoffset, yoffset, width,
4768 height, format, imageSize, data));
4769 }
4770 }
4771
4772
4773 static void GLAPIENTRY
4774 save_CompressedTexSubImage3DARB(GLenum target, GLint level, GLint xoffset,
4775 GLint yoffset, GLint zoffset, GLsizei width,
4776 GLsizei height, GLsizei depth, GLenum format,
4777 GLsizei imageSize, const GLvoid * data)
4778 {
4779 Node *n;
4780 GET_CURRENT_CONTEXT(ctx);
4781 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4782
4783 n = alloc_instruction(ctx, OPCODE_COMPRESSED_TEX_SUB_IMAGE_3D, 11);
4784 if (n) {
4785 n[1].e = target;
4786 n[2].i = level;
4787 n[3].i = xoffset;
4788 n[4].i = yoffset;
4789 n[5].i = zoffset;
4790 n[6].i = (GLint) width;
4791 n[7].i = (GLint) height;
4792 n[8].i = (GLint) depth;
4793 n[9].e = format;
4794 n[10].i = imageSize;
4795 n[11].data = copy_data(data, imageSize, "glCompressedTexSubImage3DARB");
4796 }
4797 if (ctx->ExecuteFlag) {
4798 CALL_CompressedTexSubImage3D(ctx->Exec,
4799 (target, level, xoffset, yoffset,
4800 zoffset, width, height, depth, format,
4801 imageSize, data));
4802 }
4803 }
4804
4805
4806 /* GL_ARB_multisample */
4807 static void GLAPIENTRY
4808 save_SampleCoverageARB(GLclampf value, GLboolean invert)
4809 {
4810 GET_CURRENT_CONTEXT(ctx);
4811 Node *n;
4812 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4813 n = alloc_instruction(ctx, OPCODE_SAMPLE_COVERAGE, 2);
4814 if (n) {
4815 n[1].f = value;
4816 n[2].b = invert;
4817 }
4818 if (ctx->ExecuteFlag) {
4819 CALL_SampleCoverage(ctx->Exec, (value, invert));
4820 }
4821 }
4822
4823
4824 /*
4825 * GL_NV_fragment_program
4826 */
4827 static void GLAPIENTRY
4828 save_BindProgramNV(GLenum target, GLuint id)
4829 {
4830 GET_CURRENT_CONTEXT(ctx);
4831 Node *n;
4832 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4833 n = alloc_instruction(ctx, OPCODE_BIND_PROGRAM_NV, 2);
4834 if (n) {
4835 n[1].e = target;
4836 n[2].ui = id;
4837 }
4838 if (ctx->ExecuteFlag) {
4839 CALL_BindProgramARB(ctx->Exec, (target, id));
4840 }
4841 }
4842
4843 static void GLAPIENTRY
4844 save_ProgramEnvParameter4fARB(GLenum target, GLuint index,
4845 GLfloat x, GLfloat y, GLfloat z, GLfloat w)
4846 {
4847 GET_CURRENT_CONTEXT(ctx);
4848 Node *n;
4849 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4850 n = alloc_instruction(ctx, OPCODE_PROGRAM_ENV_PARAMETER_ARB, 6);
4851 if (n) {
4852 n[1].e = target;
4853 n[2].ui = index;
4854 n[3].f = x;
4855 n[4].f = y;
4856 n[5].f = z;
4857 n[6].f = w;
4858 }
4859 if (ctx->ExecuteFlag) {
4860 CALL_ProgramEnvParameter4fARB(ctx->Exec, (target, index, x, y, z, w));
4861 }
4862 }
4863
4864
4865 static void GLAPIENTRY
4866 save_ProgramEnvParameter4fvARB(GLenum target, GLuint index,
4867 const GLfloat *params)
4868 {
4869 save_ProgramEnvParameter4fARB(target, index, params[0], params[1],
4870 params[2], params[3]);
4871 }
4872
4873
4874 static void GLAPIENTRY
4875 save_ProgramEnvParameters4fvEXT(GLenum target, GLuint index, GLsizei count,
4876 const GLfloat * params)
4877 {
4878 GET_CURRENT_CONTEXT(ctx);
4879 Node *n;
4880 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4881
4882 if (count > 0) {
4883 GLint i;
4884 const GLfloat * p = params;
4885
4886 for (i = 0 ; i < count ; i++) {
4887 n = alloc_instruction(ctx, OPCODE_PROGRAM_ENV_PARAMETER_ARB, 6);
4888 if (n) {
4889 n[1].e = target;
4890 n[2].ui = index;
4891 n[3].f = p[0];
4892 n[4].f = p[1];
4893 n[5].f = p[2];
4894 n[6].f = p[3];
4895 p += 4;
4896 }
4897 }
4898 }
4899
4900 if (ctx->ExecuteFlag) {
4901 CALL_ProgramEnvParameters4fvEXT(ctx->Exec, (target, index, count, params));
4902 }
4903 }
4904
4905
4906 static void GLAPIENTRY
4907 save_ProgramEnvParameter4dARB(GLenum target, GLuint index,
4908 GLdouble x, GLdouble y, GLdouble z, GLdouble w)
4909 {
4910 save_ProgramEnvParameter4fARB(target, index,
4911 (GLfloat) x,
4912 (GLfloat) y, (GLfloat) z, (GLfloat) w);
4913 }
4914
4915
4916 static void GLAPIENTRY
4917 save_ProgramEnvParameter4dvARB(GLenum target, GLuint index,
4918 const GLdouble *params)
4919 {
4920 save_ProgramEnvParameter4fARB(target, index,
4921 (GLfloat) params[0],
4922 (GLfloat) params[1],
4923 (GLfloat) params[2], (GLfloat) params[3]);
4924 }
4925
4926
4927 static void GLAPIENTRY
4928 save_ProgramLocalParameter4fARB(GLenum target, GLuint index,
4929 GLfloat x, GLfloat y, GLfloat z, GLfloat w)
4930 {
4931 GET_CURRENT_CONTEXT(ctx);
4932 Node *n;
4933 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4934 n = alloc_instruction(ctx, OPCODE_PROGRAM_LOCAL_PARAMETER_ARB, 6);
4935 if (n) {
4936 n[1].e = target;
4937 n[2].ui = index;
4938 n[3].f = x;
4939 n[4].f = y;
4940 n[5].f = z;
4941 n[6].f = w;
4942 }
4943 if (ctx->ExecuteFlag) {
4944 CALL_ProgramLocalParameter4fARB(ctx->Exec, (target, index, x, y, z, w));
4945 }
4946 }
4947
4948
4949 static void GLAPIENTRY
4950 save_ProgramLocalParameter4fvARB(GLenum target, GLuint index,
4951 const GLfloat *params)
4952 {
4953 GET_CURRENT_CONTEXT(ctx);
4954 Node *n;
4955 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4956 n = alloc_instruction(ctx, OPCODE_PROGRAM_LOCAL_PARAMETER_ARB, 6);
4957 if (n) {
4958 n[1].e = target;
4959 n[2].ui = index;
4960 n[3].f = params[0];
4961 n[4].f = params[1];
4962 n[5].f = params[2];
4963 n[6].f = params[3];
4964 }
4965 if (ctx->ExecuteFlag) {
4966 CALL_ProgramLocalParameter4fvARB(ctx->Exec, (target, index, params));
4967 }
4968 }
4969
4970
4971 static void GLAPIENTRY
4972 save_ProgramLocalParameters4fvEXT(GLenum target, GLuint index, GLsizei count,
4973 const GLfloat *params)
4974 {
4975 GET_CURRENT_CONTEXT(ctx);
4976 Node *n;
4977 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4978
4979 if (count > 0) {
4980 GLint i;
4981 const GLfloat * p = params;
4982
4983 for (i = 0 ; i < count ; i++) {
4984 n = alloc_instruction(ctx, OPCODE_PROGRAM_LOCAL_PARAMETER_ARB, 6);
4985 if (n) {
4986 n[1].e = target;
4987 n[2].ui = index;
4988 n[3].f = p[0];
4989 n[4].f = p[1];
4990 n[5].f = p[2];
4991 n[6].f = p[3];
4992 p += 4;
4993 }
4994 }
4995 }
4996
4997 if (ctx->ExecuteFlag) {
4998 CALL_ProgramLocalParameters4fvEXT(ctx->Exec, (target, index, count, params));
4999 }
5000 }
5001
5002
5003 static void GLAPIENTRY
5004 save_ProgramLocalParameter4dARB(GLenum target, GLuint index,
5005 GLdouble x, GLdouble y,
5006 GLdouble z, GLdouble w)
5007 {
5008 GET_CURRENT_CONTEXT(ctx);
5009 Node *n;
5010 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5011 n = alloc_instruction(ctx, OPCODE_PROGRAM_LOCAL_PARAMETER_ARB, 6);
5012 if (n) {
5013 n[1].e = target;
5014 n[2].ui = index;
5015 n[3].f = (GLfloat) x;
5016 n[4].f = (GLfloat) y;
5017 n[5].f = (GLfloat) z;
5018 n[6].f = (GLfloat) w;
5019 }
5020 if (ctx->ExecuteFlag) {
5021 CALL_ProgramLocalParameter4dARB(ctx->Exec, (target, index, x, y, z, w));
5022 }
5023 }
5024
5025
5026 static void GLAPIENTRY
5027 save_ProgramLocalParameter4dvARB(GLenum target, GLuint index,
5028 const GLdouble *params)
5029 {
5030 GET_CURRENT_CONTEXT(ctx);
5031 Node *n;
5032 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5033 n = alloc_instruction(ctx, OPCODE_PROGRAM_LOCAL_PARAMETER_ARB, 6);
5034 if (n) {
5035 n[1].e = target;
5036 n[2].ui = index;
5037 n[3].f = (GLfloat) params[0];
5038 n[4].f = (GLfloat) params[1];
5039 n[5].f = (GLfloat) params[2];
5040 n[6].f = (GLfloat) params[3];
5041 }
5042 if (ctx->ExecuteFlag) {
5043 CALL_ProgramLocalParameter4dvARB(ctx->Exec, (target, index, params));
5044 }
5045 }
5046
5047
5048 /* GL_EXT_stencil_two_side */
5049 static void GLAPIENTRY
5050 save_ActiveStencilFaceEXT(GLenum face)
5051 {
5052 GET_CURRENT_CONTEXT(ctx);
5053 Node *n;
5054 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5055 n = alloc_instruction(ctx, OPCODE_ACTIVE_STENCIL_FACE_EXT, 1);
5056 if (n) {
5057 n[1].e = face;
5058 }
5059 if (ctx->ExecuteFlag) {
5060 CALL_ActiveStencilFaceEXT(ctx->Exec, (face));
5061 }
5062 }
5063
5064
5065 /* GL_EXT_depth_bounds_test */
5066 static void GLAPIENTRY
5067 save_DepthBoundsEXT(GLclampd zmin, GLclampd zmax)
5068 {
5069 GET_CURRENT_CONTEXT(ctx);
5070 Node *n;
5071 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5072 n = alloc_instruction(ctx, OPCODE_DEPTH_BOUNDS_EXT, 2);
5073 if (n) {
5074 n[1].f = (GLfloat) zmin;
5075 n[2].f = (GLfloat) zmax;
5076 }
5077 if (ctx->ExecuteFlag) {
5078 CALL_DepthBoundsEXT(ctx->Exec, (zmin, zmax));
5079 }
5080 }
5081
5082
5083
5084 static void GLAPIENTRY
5085 save_ProgramStringARB(GLenum target, GLenum format, GLsizei len,
5086 const GLvoid * string)
5087 {
5088 GET_CURRENT_CONTEXT(ctx);
5089 Node *n;
5090
5091 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5092
5093 n = alloc_instruction(ctx, OPCODE_PROGRAM_STRING_ARB, 4);
5094 if (n) {
5095 GLubyte *programCopy = malloc(len);
5096 if (!programCopy) {
5097 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glProgramStringARB");
5098 return;
5099 }
5100 memcpy(programCopy, string, len);
5101 n[1].e = target;
5102 n[2].e = format;
5103 n[3].i = len;
5104 n[4].data = programCopy;
5105 }
5106 if (ctx->ExecuteFlag) {
5107 CALL_ProgramStringARB(ctx->Exec, (target, format, len, string));
5108 }
5109 }
5110
5111
5112 static void GLAPIENTRY
5113 save_BeginQueryARB(GLenum target, GLuint id)
5114 {
5115 GET_CURRENT_CONTEXT(ctx);
5116 Node *n;
5117 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5118 n = alloc_instruction(ctx, OPCODE_BEGIN_QUERY_ARB, 2);
5119 if (n) {
5120 n[1].e = target;
5121 n[2].ui = id;
5122 }
5123 if (ctx->ExecuteFlag) {
5124 CALL_BeginQuery(ctx->Exec, (target, id));
5125 }
5126 }
5127
5128 static void GLAPIENTRY
5129 save_EndQueryARB(GLenum target)
5130 {
5131 GET_CURRENT_CONTEXT(ctx);
5132 Node *n;
5133 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5134 n = alloc_instruction(ctx, OPCODE_END_QUERY_ARB, 1);
5135 if (n) {
5136 n[1].e = target;
5137 }
5138 if (ctx->ExecuteFlag) {
5139 CALL_EndQuery(ctx->Exec, (target));
5140 }
5141 }
5142
5143 static void GLAPIENTRY
5144 save_QueryCounter(GLuint id, GLenum target)
5145 {
5146 GET_CURRENT_CONTEXT(ctx);
5147 Node *n;
5148 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5149 n = alloc_instruction(ctx, OPCODE_QUERY_COUNTER, 2);
5150 if (n) {
5151 n[1].ui = id;
5152 n[2].e = target;
5153 }
5154 if (ctx->ExecuteFlag) {
5155 CALL_QueryCounter(ctx->Exec, (id, target));
5156 }
5157 }
5158
5159 static void GLAPIENTRY
5160 save_BeginQueryIndexed(GLenum target, GLuint index, GLuint id)
5161 {
5162 GET_CURRENT_CONTEXT(ctx);
5163 Node *n;
5164 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5165 n = alloc_instruction(ctx, OPCODE_BEGIN_QUERY_INDEXED, 3);
5166 if (n) {
5167 n[1].e = target;
5168 n[2].ui = index;
5169 n[3].ui = id;
5170 }
5171 if (ctx->ExecuteFlag) {
5172 CALL_BeginQueryIndexed(ctx->Exec, (target, index, id));
5173 }
5174 }
5175
5176 static void GLAPIENTRY
5177 save_EndQueryIndexed(GLenum target, GLuint index)
5178 {
5179 GET_CURRENT_CONTEXT(ctx);
5180 Node *n;
5181 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5182 n = alloc_instruction(ctx, OPCODE_END_QUERY_INDEXED, 2);
5183 if (n) {
5184 n[1].e = target;
5185 n[2].ui = index;
5186 }
5187 if (ctx->ExecuteFlag) {
5188 CALL_EndQueryIndexed(ctx->Exec, (target, index));
5189 }
5190 }
5191
5192
5193 static void GLAPIENTRY
5194 save_DrawBuffersARB(GLsizei count, const GLenum * buffers)
5195 {
5196 GET_CURRENT_CONTEXT(ctx);
5197 Node *n;
5198 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5199 n = alloc_instruction(ctx, OPCODE_DRAW_BUFFERS_ARB, 1 + MAX_DRAW_BUFFERS);
5200 if (n) {
5201 GLint i;
5202 n[1].i = count;
5203 if (count > MAX_DRAW_BUFFERS)
5204 count = MAX_DRAW_BUFFERS;
5205 for (i = 0; i < count; i++) {
5206 n[2 + i].e = buffers[i];
5207 }
5208 }
5209 if (ctx->ExecuteFlag) {
5210 CALL_DrawBuffers(ctx->Exec, (count, buffers));
5211 }
5212 }
5213
5214 static void GLAPIENTRY
5215 save_TexBumpParameterfvATI(GLenum pname, const GLfloat *param)
5216 {
5217 GET_CURRENT_CONTEXT(ctx);
5218 Node *n;
5219
5220 n = alloc_instruction(ctx, OPCODE_TEX_BUMP_PARAMETER_ATI, 5);
5221 if (n) {
5222 n[1].ui = pname;
5223 n[2].f = param[0];
5224 n[3].f = param[1];
5225 n[4].f = param[2];
5226 n[5].f = param[3];
5227 }
5228 if (ctx->ExecuteFlag) {
5229 CALL_TexBumpParameterfvATI(ctx->Exec, (pname, param));
5230 }
5231 }
5232
5233 static void GLAPIENTRY
5234 save_TexBumpParameterivATI(GLenum pname, const GLint *param)
5235 {
5236 GLfloat p[4];
5237 p[0] = INT_TO_FLOAT(param[0]);
5238 p[1] = INT_TO_FLOAT(param[1]);
5239 p[2] = INT_TO_FLOAT(param[2]);
5240 p[3] = INT_TO_FLOAT(param[3]);
5241 save_TexBumpParameterfvATI(pname, p);
5242 }
5243
5244 static void GLAPIENTRY
5245 save_BindFragmentShaderATI(GLuint id)
5246 {
5247 GET_CURRENT_CONTEXT(ctx);
5248 Node *n;
5249
5250 n = alloc_instruction(ctx, OPCODE_BIND_FRAGMENT_SHADER_ATI, 1);
5251 if (n) {
5252 n[1].ui = id;
5253 }
5254 if (ctx->ExecuteFlag) {
5255 CALL_BindFragmentShaderATI(ctx->Exec, (id));
5256 }
5257 }
5258
5259 static void GLAPIENTRY
5260 save_SetFragmentShaderConstantATI(GLuint dst, const GLfloat *value)
5261 {
5262 GET_CURRENT_CONTEXT(ctx);
5263 Node *n;
5264
5265 n = alloc_instruction(ctx, OPCODE_SET_FRAGMENT_SHADER_CONSTANTS_ATI, 5);
5266 if (n) {
5267 n[1].ui = dst;
5268 n[2].f = value[0];
5269 n[3].f = value[1];
5270 n[4].f = value[2];
5271 n[5].f = value[3];
5272 }
5273 if (ctx->ExecuteFlag) {
5274 CALL_SetFragmentShaderConstantATI(ctx->Exec, (dst, value));
5275 }
5276 }
5277
5278 static void GLAPIENTRY
5279 save_Attr1fNV(GLenum attr, GLfloat x)
5280 {
5281 GET_CURRENT_CONTEXT(ctx);
5282 Node *n;
5283 SAVE_FLUSH_VERTICES(ctx);
5284 n = alloc_instruction(ctx, OPCODE_ATTR_1F_NV, 2);
5285 if (n) {
5286 n[1].e = attr;
5287 n[2].f = x;
5288 }
5289
5290 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5291 ctx->ListState.ActiveAttribSize[attr] = 1;
5292 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, 0, 0, 1);
5293
5294 if (ctx->ExecuteFlag) {
5295 CALL_VertexAttrib1fNV(ctx->Exec, (attr, x));
5296 }
5297 }
5298
5299 static void GLAPIENTRY
5300 save_Attr2fNV(GLenum attr, GLfloat x, GLfloat y)
5301 {
5302 GET_CURRENT_CONTEXT(ctx);
5303 Node *n;
5304 SAVE_FLUSH_VERTICES(ctx);
5305 n = alloc_instruction(ctx, OPCODE_ATTR_2F_NV, 3);
5306 if (n) {
5307 n[1].e = attr;
5308 n[2].f = x;
5309 n[3].f = y;
5310 }
5311
5312 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5313 ctx->ListState.ActiveAttribSize[attr] = 2;
5314 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, y, 0, 1);
5315
5316 if (ctx->ExecuteFlag) {
5317 CALL_VertexAttrib2fNV(ctx->Exec, (attr, x, y));
5318 }
5319 }
5320
5321 static void GLAPIENTRY
5322 save_Attr3fNV(GLenum attr, GLfloat x, GLfloat y, GLfloat z)
5323 {
5324 GET_CURRENT_CONTEXT(ctx);
5325 Node *n;
5326 SAVE_FLUSH_VERTICES(ctx);
5327 n = alloc_instruction(ctx, OPCODE_ATTR_3F_NV, 4);
5328 if (n) {
5329 n[1].e = attr;
5330 n[2].f = x;
5331 n[3].f = y;
5332 n[4].f = z;
5333 }
5334
5335 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5336 ctx->ListState.ActiveAttribSize[attr] = 3;
5337 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, y, z, 1);
5338
5339 if (ctx->ExecuteFlag) {
5340 CALL_VertexAttrib3fNV(ctx->Exec, (attr, x, y, z));
5341 }
5342 }
5343
5344 static void GLAPIENTRY
5345 save_Attr4fNV(GLenum attr, GLfloat x, GLfloat y, GLfloat z, GLfloat w)
5346 {
5347 GET_CURRENT_CONTEXT(ctx);
5348 Node *n;
5349 SAVE_FLUSH_VERTICES(ctx);
5350 n = alloc_instruction(ctx, OPCODE_ATTR_4F_NV, 5);
5351 if (n) {
5352 n[1].e = attr;
5353 n[2].f = x;
5354 n[3].f = y;
5355 n[4].f = z;
5356 n[5].f = w;
5357 }
5358
5359 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5360 ctx->ListState.ActiveAttribSize[attr] = 4;
5361 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, y, z, w);
5362
5363 if (ctx->ExecuteFlag) {
5364 CALL_VertexAttrib4fNV(ctx->Exec, (attr, x, y, z, w));
5365 }
5366 }
5367
5368
5369 static void GLAPIENTRY
5370 save_Attr1fARB(GLenum attr, GLfloat x)
5371 {
5372 GET_CURRENT_CONTEXT(ctx);
5373 Node *n;
5374 SAVE_FLUSH_VERTICES(ctx);
5375 n = alloc_instruction(ctx, OPCODE_ATTR_1F_ARB, 2);
5376 if (n) {
5377 n[1].e = attr;
5378 n[2].f = x;
5379 }
5380
5381 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5382 ctx->ListState.ActiveAttribSize[attr] = 1;
5383 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, 0, 0, 1);
5384
5385 if (ctx->ExecuteFlag) {
5386 CALL_VertexAttrib1fARB(ctx->Exec, (attr, x));
5387 }
5388 }
5389
5390 static void GLAPIENTRY
5391 save_Attr2fARB(GLenum attr, GLfloat x, GLfloat y)
5392 {
5393 GET_CURRENT_CONTEXT(ctx);
5394 Node *n;
5395 SAVE_FLUSH_VERTICES(ctx);
5396 n = alloc_instruction(ctx, OPCODE_ATTR_2F_ARB, 3);
5397 if (n) {
5398 n[1].e = attr;
5399 n[2].f = x;
5400 n[3].f = y;
5401 }
5402
5403 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5404 ctx->ListState.ActiveAttribSize[attr] = 2;
5405 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, y, 0, 1);
5406
5407 if (ctx->ExecuteFlag) {
5408 CALL_VertexAttrib2fARB(ctx->Exec, (attr, x, y));
5409 }
5410 }
5411
5412 static void GLAPIENTRY
5413 save_Attr3fARB(GLenum attr, GLfloat x, GLfloat y, GLfloat z)
5414 {
5415 GET_CURRENT_CONTEXT(ctx);
5416 Node *n;
5417 SAVE_FLUSH_VERTICES(ctx);
5418 n = alloc_instruction(ctx, OPCODE_ATTR_3F_ARB, 4);
5419 if (n) {
5420 n[1].e = attr;
5421 n[2].f = x;
5422 n[3].f = y;
5423 n[4].f = z;
5424 }
5425
5426 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5427 ctx->ListState.ActiveAttribSize[attr] = 3;
5428 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, y, z, 1);
5429
5430 if (ctx->ExecuteFlag) {
5431 CALL_VertexAttrib3fARB(ctx->Exec, (attr, x, y, z));
5432 }
5433 }
5434
5435 static void GLAPIENTRY
5436 save_Attr4fARB(GLenum attr, GLfloat x, GLfloat y, GLfloat z, GLfloat w)
5437 {
5438 GET_CURRENT_CONTEXT(ctx);
5439 Node *n;
5440 SAVE_FLUSH_VERTICES(ctx);
5441 n = alloc_instruction(ctx, OPCODE_ATTR_4F_ARB, 5);
5442 if (n) {
5443 n[1].e = attr;
5444 n[2].f = x;
5445 n[3].f = y;
5446 n[4].f = z;
5447 n[5].f = w;
5448 }
5449
5450 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5451 ctx->ListState.ActiveAttribSize[attr] = 4;
5452 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, y, z, w);
5453
5454 if (ctx->ExecuteFlag) {
5455 CALL_VertexAttrib4fARB(ctx->Exec, (attr, x, y, z, w));
5456 }
5457 }
5458
5459
5460 static void GLAPIENTRY
5461 save_EvalCoord1f(GLfloat x)
5462 {
5463 GET_CURRENT_CONTEXT(ctx);
5464 Node *n;
5465 SAVE_FLUSH_VERTICES(ctx);
5466 n = alloc_instruction(ctx, OPCODE_EVAL_C1, 1);
5467 if (n) {
5468 n[1].f = x;
5469 }
5470 if (ctx->ExecuteFlag) {
5471 CALL_EvalCoord1f(ctx->Exec, (x));
5472 }
5473 }
5474
5475 static void GLAPIENTRY
5476 save_EvalCoord1fv(const GLfloat * v)
5477 {
5478 save_EvalCoord1f(v[0]);
5479 }
5480
5481 static void GLAPIENTRY
5482 save_EvalCoord2f(GLfloat x, GLfloat y)
5483 {
5484 GET_CURRENT_CONTEXT(ctx);
5485 Node *n;
5486 SAVE_FLUSH_VERTICES(ctx);
5487 n = alloc_instruction(ctx, OPCODE_EVAL_C2, 2);
5488 if (n) {
5489 n[1].f = x;
5490 n[2].f = y;
5491 }
5492 if (ctx->ExecuteFlag) {
5493 CALL_EvalCoord2f(ctx->Exec, (x, y));
5494 }
5495 }
5496
5497 static void GLAPIENTRY
5498 save_EvalCoord2fv(const GLfloat * v)
5499 {
5500 save_EvalCoord2f(v[0], v[1]);
5501 }
5502
5503
5504 static void GLAPIENTRY
5505 save_EvalPoint1(GLint x)
5506 {
5507 GET_CURRENT_CONTEXT(ctx);
5508 Node *n;
5509 SAVE_FLUSH_VERTICES(ctx);
5510 n = alloc_instruction(ctx, OPCODE_EVAL_P1, 1);
5511 if (n) {
5512 n[1].i = x;
5513 }
5514 if (ctx->ExecuteFlag) {
5515 CALL_EvalPoint1(ctx->Exec, (x));
5516 }
5517 }
5518
5519 static void GLAPIENTRY
5520 save_EvalPoint2(GLint x, GLint y)
5521 {
5522 GET_CURRENT_CONTEXT(ctx);
5523 Node *n;
5524 SAVE_FLUSH_VERTICES(ctx);
5525 n = alloc_instruction(ctx, OPCODE_EVAL_P2, 2);
5526 if (n) {
5527 n[1].i = x;
5528 n[2].i = y;
5529 }
5530 if (ctx->ExecuteFlag) {
5531 CALL_EvalPoint2(ctx->Exec, (x, y));
5532 }
5533 }
5534
5535 static void GLAPIENTRY
5536 save_Indexf(GLfloat x)
5537 {
5538 save_Attr1fNV(VERT_ATTRIB_COLOR_INDEX, x);
5539 }
5540
5541 static void GLAPIENTRY
5542 save_Indexfv(const GLfloat * v)
5543 {
5544 save_Attr1fNV(VERT_ATTRIB_COLOR_INDEX, v[0]);
5545 }
5546
5547 static void GLAPIENTRY
5548 save_EdgeFlag(GLboolean x)
5549 {
5550 save_Attr1fNV(VERT_ATTRIB_EDGEFLAG, x ? 1.0f : 0.0f);
5551 }
5552
5553
5554 /**
5555 * Compare 'count' elements of vectors 'a' and 'b'.
5556 * \return GL_TRUE if equal, GL_FALSE if different.
5557 */
5558 static inline GLboolean
5559 compare_vec(const GLfloat *a, const GLfloat *b, GLuint count)
5560 {
5561 return memcmp( a, b, count * sizeof(GLfloat) ) == 0;
5562 }
5563
5564
5565 /**
5566 * This glMaterial function is used for glMaterial calls that are outside
5567 * a glBegin/End pair. For glMaterial inside glBegin/End, see the VBO code.
5568 */
5569 static void GLAPIENTRY
5570 save_Materialfv(GLenum face, GLenum pname, const GLfloat * param)
5571 {
5572 GET_CURRENT_CONTEXT(ctx);
5573 Node *n;
5574 int args, i;
5575 GLuint bitmask;
5576
5577 switch (face) {
5578 case GL_BACK:
5579 case GL_FRONT:
5580 case GL_FRONT_AND_BACK:
5581 break;
5582 default:
5583 _mesa_compile_error(ctx, GL_INVALID_ENUM, "glMaterial(face)");
5584 return;
5585 }
5586
5587 switch (pname) {
5588 case GL_EMISSION:
5589 case GL_AMBIENT:
5590 case GL_DIFFUSE:
5591 case GL_SPECULAR:
5592 case GL_AMBIENT_AND_DIFFUSE:
5593 args = 4;
5594 break;
5595 case GL_SHININESS:
5596 args = 1;
5597 break;
5598 case GL_COLOR_INDEXES:
5599 args = 3;
5600 break;
5601 default:
5602 _mesa_compile_error(ctx, GL_INVALID_ENUM, "glMaterial(pname)");
5603 return;
5604 }
5605
5606 if (ctx->ExecuteFlag) {
5607 CALL_Materialfv(ctx->Exec, (face, pname, param));
5608 }
5609
5610 bitmask = _mesa_material_bitmask(ctx, face, pname, ~0, NULL);
5611
5612 /* Try to eliminate redundant statechanges. Because it is legal to
5613 * call glMaterial even inside begin/end calls, don't need to worry
5614 * about ctx->Driver.CurrentSavePrimitive here.
5615 */
5616 for (i = 0; i < MAT_ATTRIB_MAX; i++) {
5617 if (bitmask & (1 << i)) {
5618 if (ctx->ListState.ActiveMaterialSize[i] == args &&
5619 compare_vec(ctx->ListState.CurrentMaterial[i], param, args)) {
5620 /* no change in material value */
5621 bitmask &= ~(1 << i);
5622 }
5623 else {
5624 ctx->ListState.ActiveMaterialSize[i] = args;
5625 COPY_SZ_4V(ctx->ListState.CurrentMaterial[i], args, param);
5626 }
5627 }
5628 }
5629
5630 /* If this call has no effect, return early */
5631 if (bitmask == 0)
5632 return;
5633
5634 SAVE_FLUSH_VERTICES(ctx);
5635
5636 n = alloc_instruction(ctx, OPCODE_MATERIAL, 6);
5637 if (n) {
5638 n[1].e = face;
5639 n[2].e = pname;
5640 for (i = 0; i < args; i++)
5641 n[3 + i].f = param[i];
5642 }
5643 }
5644
5645 static void GLAPIENTRY
5646 save_Begin(GLenum mode)
5647 {
5648 GET_CURRENT_CONTEXT(ctx);
5649 Node *n;
5650 GLboolean error = GL_FALSE;
5651
5652 if (ctx->ExecuteFlag && !_mesa_valid_prim_mode(ctx, mode, "glBegin")) {
5653 error = GL_TRUE;
5654 }
5655 else if (ctx->Driver.CurrentSavePrimitive == PRIM_UNKNOWN) {
5656 /* Typically the first begin. This may raise an error on
5657 * playback, depending on whether CallList is issued from inside
5658 * a begin/end or not.
5659 */
5660 ctx->Driver.CurrentSavePrimitive = PRIM_INSIDE_UNKNOWN_PRIM;
5661 }
5662 else if (!_mesa_inside_dlist_begin_end(ctx)) {
5663 ctx->Driver.CurrentSavePrimitive = mode;
5664 }
5665 else {
5666 _mesa_compile_error(ctx, GL_INVALID_OPERATION, "recursive begin");
5667 error = GL_TRUE;
5668 }
5669
5670 if (!error) {
5671 /* Give the driver an opportunity to hook in an optimized
5672 * display list compiler.
5673 */
5674 if (ctx->Driver.NotifySaveBegin(ctx, mode))
5675 return;
5676
5677 SAVE_FLUSH_VERTICES(ctx);
5678 n = alloc_instruction(ctx, OPCODE_BEGIN, 1);
5679 if (n) {
5680 n[1].e = mode;
5681 }
5682 }
5683
5684 if (ctx->ExecuteFlag) {
5685 CALL_Begin(ctx->Exec, (mode));
5686 }
5687 }
5688
5689 static void GLAPIENTRY
5690 save_End(void)
5691 {
5692 GET_CURRENT_CONTEXT(ctx);
5693 SAVE_FLUSH_VERTICES(ctx);
5694 (void) alloc_instruction(ctx, OPCODE_END, 0);
5695 ctx->Driver.CurrentSavePrimitive = PRIM_OUTSIDE_BEGIN_END;
5696 if (ctx->ExecuteFlag) {
5697 CALL_End(ctx->Exec, ());
5698 }
5699 }
5700
5701 static void GLAPIENTRY
5702 save_Rectf(GLfloat a, GLfloat b, GLfloat c, GLfloat d)
5703 {
5704 GET_CURRENT_CONTEXT(ctx);
5705 Node *n;
5706 SAVE_FLUSH_VERTICES(ctx);
5707 n = alloc_instruction(ctx, OPCODE_RECTF, 4);
5708 if (n) {
5709 n[1].f = a;
5710 n[2].f = b;
5711 n[3].f = c;
5712 n[4].f = d;
5713 }
5714 if (ctx->ExecuteFlag) {
5715 CALL_Rectf(ctx->Exec, (a, b, c, d));
5716 }
5717 }
5718
5719
5720 static void GLAPIENTRY
5721 save_Vertex2f(GLfloat x, GLfloat y)
5722 {
5723 save_Attr2fNV(VERT_ATTRIB_POS, x, y);
5724 }
5725
5726 static void GLAPIENTRY
5727 save_Vertex2fv(const GLfloat * v)
5728 {
5729 save_Attr2fNV(VERT_ATTRIB_POS, v[0], v[1]);
5730 }
5731
5732 static void GLAPIENTRY
5733 save_Vertex3f(GLfloat x, GLfloat y, GLfloat z)
5734 {
5735 save_Attr3fNV(VERT_ATTRIB_POS, x, y, z);
5736 }
5737
5738 static void GLAPIENTRY
5739 save_Vertex3fv(const GLfloat * v)
5740 {
5741 save_Attr3fNV(VERT_ATTRIB_POS, v[0], v[1], v[2]);
5742 }
5743
5744 static void GLAPIENTRY
5745 save_Vertex4f(GLfloat x, GLfloat y, GLfloat z, GLfloat w)
5746 {
5747 save_Attr4fNV(VERT_ATTRIB_POS, x, y, z, w);
5748 }
5749
5750 static void GLAPIENTRY
5751 save_Vertex4fv(const GLfloat * v)
5752 {
5753 save_Attr4fNV(VERT_ATTRIB_POS, v[0], v[1], v[2], v[3]);
5754 }
5755
5756 static void GLAPIENTRY
5757 save_TexCoord1f(GLfloat x)
5758 {
5759 save_Attr1fNV(VERT_ATTRIB_TEX0, x);
5760 }
5761
5762 static void GLAPIENTRY
5763 save_TexCoord1fv(const GLfloat * v)
5764 {
5765 save_Attr1fNV(VERT_ATTRIB_TEX0, v[0]);
5766 }
5767
5768 static void GLAPIENTRY
5769 save_TexCoord2f(GLfloat x, GLfloat y)
5770 {
5771 save_Attr2fNV(VERT_ATTRIB_TEX0, x, y);
5772 }
5773
5774 static void GLAPIENTRY
5775 save_TexCoord2fv(const GLfloat * v)
5776 {
5777 save_Attr2fNV(VERT_ATTRIB_TEX0, v[0], v[1]);
5778 }
5779
5780 static void GLAPIENTRY
5781 save_TexCoord3f(GLfloat x, GLfloat y, GLfloat z)
5782 {
5783 save_Attr3fNV(VERT_ATTRIB_TEX0, x, y, z);
5784 }
5785
5786 static void GLAPIENTRY
5787 save_TexCoord3fv(const GLfloat * v)
5788 {
5789 save_Attr3fNV(VERT_ATTRIB_TEX0, v[0], v[1], v[2]);
5790 }
5791
5792 static void GLAPIENTRY
5793 save_TexCoord4f(GLfloat x, GLfloat y, GLfloat z, GLfloat w)
5794 {
5795 save_Attr4fNV(VERT_ATTRIB_TEX0, x, y, z, w);
5796 }
5797
5798 static void GLAPIENTRY
5799 save_TexCoord4fv(const GLfloat * v)
5800 {
5801 save_Attr4fNV(VERT_ATTRIB_TEX0, v[0], v[1], v[2], v[3]);
5802 }
5803
5804 static void GLAPIENTRY
5805 save_Normal3f(GLfloat x, GLfloat y, GLfloat z)
5806 {
5807 save_Attr3fNV(VERT_ATTRIB_NORMAL, x, y, z);
5808 }
5809
5810 static void GLAPIENTRY
5811 save_Normal3fv(const GLfloat * v)
5812 {
5813 save_Attr3fNV(VERT_ATTRIB_NORMAL, v[0], v[1], v[2]);
5814 }
5815
5816 static void GLAPIENTRY
5817 save_FogCoordfEXT(GLfloat x)
5818 {
5819 save_Attr1fNV(VERT_ATTRIB_FOG, x);
5820 }
5821
5822 static void GLAPIENTRY
5823 save_FogCoordfvEXT(const GLfloat * v)
5824 {
5825 save_Attr1fNV(VERT_ATTRIB_FOG, v[0]);
5826 }
5827
5828 static void GLAPIENTRY
5829 save_Color3f(GLfloat x, GLfloat y, GLfloat z)
5830 {
5831 save_Attr3fNV(VERT_ATTRIB_COLOR0, x, y, z);
5832 }
5833
5834 static void GLAPIENTRY
5835 save_Color3fv(const GLfloat * v)
5836 {
5837 save_Attr3fNV(VERT_ATTRIB_COLOR0, v[0], v[1], v[2]);
5838 }
5839
5840 static void GLAPIENTRY
5841 save_Color4f(GLfloat x, GLfloat y, GLfloat z, GLfloat w)
5842 {
5843 save_Attr4fNV(VERT_ATTRIB_COLOR0, x, y, z, w);
5844 }
5845
5846 static void GLAPIENTRY
5847 save_Color4fv(const GLfloat * v)
5848 {
5849 save_Attr4fNV(VERT_ATTRIB_COLOR0, v[0], v[1], v[2], v[3]);
5850 }
5851
5852 static void GLAPIENTRY
5853 save_SecondaryColor3fEXT(GLfloat x, GLfloat y, GLfloat z)
5854 {
5855 save_Attr3fNV(VERT_ATTRIB_COLOR1, x, y, z);
5856 }
5857
5858 static void GLAPIENTRY
5859 save_SecondaryColor3fvEXT(const GLfloat * v)
5860 {
5861 save_Attr3fNV(VERT_ATTRIB_COLOR1, v[0], v[1], v[2]);
5862 }
5863
5864
5865 /* Just call the respective ATTR for texcoord
5866 */
5867 static void GLAPIENTRY
5868 save_MultiTexCoord1f(GLenum target, GLfloat x)
5869 {
5870 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5871 save_Attr1fNV(attr, x);
5872 }
5873
5874 static void GLAPIENTRY
5875 save_MultiTexCoord1fv(GLenum target, const GLfloat * v)
5876 {
5877 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5878 save_Attr1fNV(attr, v[0]);
5879 }
5880
5881 static void GLAPIENTRY
5882 save_MultiTexCoord2f(GLenum target, GLfloat x, GLfloat y)
5883 {
5884 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5885 save_Attr2fNV(attr, x, y);
5886 }
5887
5888 static void GLAPIENTRY
5889 save_MultiTexCoord2fv(GLenum target, const GLfloat * v)
5890 {
5891 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5892 save_Attr2fNV(attr, v[0], v[1]);
5893 }
5894
5895 static void GLAPIENTRY
5896 save_MultiTexCoord3f(GLenum target, GLfloat x, GLfloat y, GLfloat z)
5897 {
5898 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5899 save_Attr3fNV(attr, x, y, z);
5900 }
5901
5902 static void GLAPIENTRY
5903 save_MultiTexCoord3fv(GLenum target, const GLfloat * v)
5904 {
5905 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5906 save_Attr3fNV(attr, v[0], v[1], v[2]);
5907 }
5908
5909 static void GLAPIENTRY
5910 save_MultiTexCoord4f(GLenum target, GLfloat x, GLfloat y,
5911 GLfloat z, GLfloat w)
5912 {
5913 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5914 save_Attr4fNV(attr, x, y, z, w);
5915 }
5916
5917 static void GLAPIENTRY
5918 save_MultiTexCoord4fv(GLenum target, const GLfloat * v)
5919 {
5920 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5921 save_Attr4fNV(attr, v[0], v[1], v[2], v[3]);
5922 }
5923
5924
5925 /**
5926 * Record a GL_INVALID_VALUE error when a invalid vertex attribute
5927 * index is found.
5928 */
5929 static void
5930 index_error(void)
5931 {
5932 GET_CURRENT_CONTEXT(ctx);
5933 _mesa_error(ctx, GL_INVALID_VALUE, "VertexAttribf(index)");
5934 }
5935
5936
5937
5938 static void GLAPIENTRY
5939 save_VertexAttrib1fARB(GLuint index, GLfloat x)
5940 {
5941 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
5942 save_Attr1fARB(index, x);
5943 else
5944 index_error();
5945 }
5946
5947 static void GLAPIENTRY
5948 save_VertexAttrib1fvARB(GLuint index, const GLfloat * v)
5949 {
5950 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
5951 save_Attr1fARB(index, v[0]);
5952 else
5953 index_error();
5954 }
5955
5956 static void GLAPIENTRY
5957 save_VertexAttrib2fARB(GLuint index, GLfloat x, GLfloat y)
5958 {
5959 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
5960 save_Attr2fARB(index, x, y);
5961 else
5962 index_error();
5963 }
5964
5965 static void GLAPIENTRY
5966 save_VertexAttrib2fvARB(GLuint index, const GLfloat * v)
5967 {
5968 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
5969 save_Attr2fARB(index, v[0], v[1]);
5970 else
5971 index_error();
5972 }
5973
5974 static void GLAPIENTRY
5975 save_VertexAttrib3fARB(GLuint index, GLfloat x, GLfloat y, GLfloat z)
5976 {
5977 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
5978 save_Attr3fARB(index, x, y, z);
5979 else
5980 index_error();
5981 }
5982
5983 static void GLAPIENTRY
5984 save_VertexAttrib3fvARB(GLuint index, const GLfloat * v)
5985 {
5986 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
5987 save_Attr3fARB(index, v[0], v[1], v[2]);
5988 else
5989 index_error();
5990 }
5991
5992 static void GLAPIENTRY
5993 save_VertexAttrib4fARB(GLuint index, GLfloat x, GLfloat y, GLfloat z,
5994 GLfloat w)
5995 {
5996 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
5997 save_Attr4fARB(index, x, y, z, w);
5998 else
5999 index_error();
6000 }
6001
6002 static void GLAPIENTRY
6003 save_VertexAttrib4fvARB(GLuint index, const GLfloat * v)
6004 {
6005 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
6006 save_Attr4fARB(index, v[0], v[1], v[2], v[3]);
6007 else
6008 index_error();
6009 }
6010
6011 static void GLAPIENTRY
6012 save_BlitFramebufferEXT(GLint srcX0, GLint srcY0, GLint srcX1, GLint srcY1,
6013 GLint dstX0, GLint dstY0, GLint dstX1, GLint dstY1,
6014 GLbitfield mask, GLenum filter)
6015 {
6016 GET_CURRENT_CONTEXT(ctx);
6017 Node *n;
6018 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6019 n = alloc_instruction(ctx, OPCODE_BLIT_FRAMEBUFFER, 10);
6020 if (n) {
6021 n[1].i = srcX0;
6022 n[2].i = srcY0;
6023 n[3].i = srcX1;
6024 n[4].i = srcY1;
6025 n[5].i = dstX0;
6026 n[6].i = dstY0;
6027 n[7].i = dstX1;
6028 n[8].i = dstY1;
6029 n[9].i = mask;
6030 n[10].e = filter;
6031 }
6032 if (ctx->ExecuteFlag) {
6033 CALL_BlitFramebuffer(ctx->Exec, (srcX0, srcY0, srcX1, srcY1,
6034 dstX0, dstY0, dstX1, dstY1,
6035 mask, filter));
6036 }
6037 }
6038
6039
6040 /** GL_EXT_provoking_vertex */
6041 static void GLAPIENTRY
6042 save_ProvokingVertexEXT(GLenum mode)
6043 {
6044 GET_CURRENT_CONTEXT(ctx);
6045 Node *n;
6046 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6047 n = alloc_instruction(ctx, OPCODE_PROVOKING_VERTEX, 1);
6048 if (n) {
6049 n[1].e = mode;
6050 }
6051 if (ctx->ExecuteFlag) {
6052 /*CALL_ProvokingVertex(ctx->Exec, (mode));*/
6053 _mesa_ProvokingVertex(mode);
6054 }
6055 }
6056
6057
6058 /** GL_EXT_transform_feedback */
6059 static void GLAPIENTRY
6060 save_BeginTransformFeedback(GLenum mode)
6061 {
6062 GET_CURRENT_CONTEXT(ctx);
6063 Node *n;
6064 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6065 n = alloc_instruction(ctx, OPCODE_BEGIN_TRANSFORM_FEEDBACK, 1);
6066 if (n) {
6067 n[1].e = mode;
6068 }
6069 if (ctx->ExecuteFlag) {
6070 CALL_BeginTransformFeedback(ctx->Exec, (mode));
6071 }
6072 }
6073
6074
6075 /** GL_EXT_transform_feedback */
6076 static void GLAPIENTRY
6077 save_EndTransformFeedback(void)
6078 {
6079 GET_CURRENT_CONTEXT(ctx);
6080 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6081 (void) alloc_instruction(ctx, OPCODE_END_TRANSFORM_FEEDBACK, 0);
6082 if (ctx->ExecuteFlag) {
6083 CALL_EndTransformFeedback(ctx->Exec, ());
6084 }
6085 }
6086
6087 static void GLAPIENTRY
6088 save_BindTransformFeedback(GLenum target, GLuint name)
6089 {
6090 GET_CURRENT_CONTEXT(ctx);
6091 Node *n;
6092 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6093 n = alloc_instruction(ctx, OPCODE_BIND_TRANSFORM_FEEDBACK, 2);
6094 if (n) {
6095 n[1].e = target;
6096 n[2].ui = name;
6097 }
6098 if (ctx->ExecuteFlag) {
6099 CALL_BindTransformFeedback(ctx->Exec, (target, name));
6100 }
6101 }
6102
6103 static void GLAPIENTRY
6104 save_PauseTransformFeedback(void)
6105 {
6106 GET_CURRENT_CONTEXT(ctx);
6107 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6108 (void) alloc_instruction(ctx, OPCODE_PAUSE_TRANSFORM_FEEDBACK, 0);
6109 if (ctx->ExecuteFlag) {
6110 CALL_PauseTransformFeedback(ctx->Exec, ());
6111 }
6112 }
6113
6114 static void GLAPIENTRY
6115 save_ResumeTransformFeedback(void)
6116 {
6117 GET_CURRENT_CONTEXT(ctx);
6118 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6119 (void) alloc_instruction(ctx, OPCODE_RESUME_TRANSFORM_FEEDBACK, 0);
6120 if (ctx->ExecuteFlag) {
6121 CALL_ResumeTransformFeedback(ctx->Exec, ());
6122 }
6123 }
6124
6125 static void GLAPIENTRY
6126 save_DrawTransformFeedback(GLenum mode, GLuint name)
6127 {
6128 GET_CURRENT_CONTEXT(ctx);
6129 Node *n;
6130 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6131 n = alloc_instruction(ctx, OPCODE_DRAW_TRANSFORM_FEEDBACK, 2);
6132 if (n) {
6133 n[1].e = mode;
6134 n[2].ui = name;
6135 }
6136 if (ctx->ExecuteFlag) {
6137 CALL_DrawTransformFeedback(ctx->Exec, (mode, name));
6138 }
6139 }
6140
6141 static void GLAPIENTRY
6142 save_DrawTransformFeedbackStream(GLenum mode, GLuint name, GLuint stream)
6143 {
6144 GET_CURRENT_CONTEXT(ctx);
6145 Node *n;
6146 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6147 n = alloc_instruction(ctx, OPCODE_DRAW_TRANSFORM_FEEDBACK_STREAM, 3);
6148 if (n) {
6149 n[1].e = mode;
6150 n[2].ui = name;
6151 n[3].ui = stream;
6152 }
6153 if (ctx->ExecuteFlag) {
6154 CALL_DrawTransformFeedbackStream(ctx->Exec, (mode, name, stream));
6155 }
6156 }
6157
6158 static void GLAPIENTRY
6159 save_DrawTransformFeedbackInstanced(GLenum mode, GLuint name,
6160 GLsizei primcount)
6161 {
6162 GET_CURRENT_CONTEXT(ctx);
6163 Node *n;
6164 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6165 n = alloc_instruction(ctx, OPCODE_DRAW_TRANSFORM_FEEDBACK_INSTANCED, 3);
6166 if (n) {
6167 n[1].e = mode;
6168 n[2].ui = name;
6169 n[3].si = primcount;
6170 }
6171 if (ctx->ExecuteFlag) {
6172 CALL_DrawTransformFeedbackInstanced(ctx->Exec, (mode, name, primcount));
6173 }
6174 }
6175
6176 static void GLAPIENTRY
6177 save_DrawTransformFeedbackStreamInstanced(GLenum mode, GLuint name,
6178 GLuint stream, GLsizei primcount)
6179 {
6180 GET_CURRENT_CONTEXT(ctx);
6181 Node *n;
6182 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6183 n = alloc_instruction(ctx, OPCODE_DRAW_TRANSFORM_FEEDBACK_STREAM_INSTANCED, 4);
6184 if (n) {
6185 n[1].e = mode;
6186 n[2].ui = name;
6187 n[3].ui = stream;
6188 n[4].si = primcount;
6189 }
6190 if (ctx->ExecuteFlag) {
6191 CALL_DrawTransformFeedbackStreamInstanced(ctx->Exec, (mode, name, stream,
6192 primcount));
6193 }
6194 }
6195
6196 /* aka UseProgram() */
6197 static void GLAPIENTRY
6198 save_UseProgramObjectARB(GLhandleARB program)
6199 {
6200 GET_CURRENT_CONTEXT(ctx);
6201 Node *n;
6202 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6203 n = alloc_instruction(ctx, OPCODE_USE_PROGRAM, 1);
6204 if (n) {
6205 n[1].ui = program;
6206 }
6207 if (ctx->ExecuteFlag) {
6208 CALL_UseProgram(ctx->Exec, (program));
6209 }
6210 }
6211
6212
6213 static void GLAPIENTRY
6214 save_Uniform1fARB(GLint location, GLfloat x)
6215 {
6216 GET_CURRENT_CONTEXT(ctx);
6217 Node *n;
6218 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6219 n = alloc_instruction(ctx, OPCODE_UNIFORM_1F, 2);
6220 if (n) {
6221 n[1].i = location;
6222 n[2].f = x;
6223 }
6224 if (ctx->ExecuteFlag) {
6225 CALL_Uniform1f(ctx->Exec, (location, x));
6226 }
6227 }
6228
6229
6230 static void GLAPIENTRY
6231 save_Uniform2fARB(GLint location, GLfloat x, GLfloat y)
6232 {
6233 GET_CURRENT_CONTEXT(ctx);
6234 Node *n;
6235 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6236 n = alloc_instruction(ctx, OPCODE_UNIFORM_2F, 3);
6237 if (n) {
6238 n[1].i = location;
6239 n[2].f = x;
6240 n[3].f = y;
6241 }
6242 if (ctx->ExecuteFlag) {
6243 CALL_Uniform2f(ctx->Exec, (location, x, y));
6244 }
6245 }
6246
6247
6248 static void GLAPIENTRY
6249 save_Uniform3fARB(GLint location, GLfloat x, GLfloat y, GLfloat z)
6250 {
6251 GET_CURRENT_CONTEXT(ctx);
6252 Node *n;
6253 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6254 n = alloc_instruction(ctx, OPCODE_UNIFORM_3F, 4);
6255 if (n) {
6256 n[1].i = location;
6257 n[2].f = x;
6258 n[3].f = y;
6259 n[4].f = z;
6260 }
6261 if (ctx->ExecuteFlag) {
6262 CALL_Uniform3f(ctx->Exec, (location, x, y, z));
6263 }
6264 }
6265
6266
6267 static void GLAPIENTRY
6268 save_Uniform4fARB(GLint location, GLfloat x, GLfloat y, GLfloat z, GLfloat w)
6269 {
6270 GET_CURRENT_CONTEXT(ctx);
6271 Node *n;
6272 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6273 n = alloc_instruction(ctx, OPCODE_UNIFORM_4F, 5);
6274 if (n) {
6275 n[1].i = location;
6276 n[2].f = x;
6277 n[3].f = y;
6278 n[4].f = z;
6279 n[5].f = w;
6280 }
6281 if (ctx->ExecuteFlag) {
6282 CALL_Uniform4f(ctx->Exec, (location, x, y, z, w));
6283 }
6284 }
6285
6286
6287 /** Return copy of memory */
6288 static void *
6289 memdup(const void *src, GLsizei bytes)
6290 {
6291 void *b = bytes >= 0 ? malloc(bytes) : NULL;
6292 if (b)
6293 memcpy(b, src, bytes);
6294 return b;
6295 }
6296
6297
6298 static void GLAPIENTRY
6299 save_Uniform1fvARB(GLint location, GLsizei count, const GLfloat *v)
6300 {
6301 GET_CURRENT_CONTEXT(ctx);
6302 Node *n;
6303 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6304 n = alloc_instruction(ctx, OPCODE_UNIFORM_1FV, 3);
6305 if (n) {
6306 n[1].i = location;
6307 n[2].i = count;
6308 n[3].data = memdup(v, count * 1 * sizeof(GLfloat));
6309 }
6310 if (ctx->ExecuteFlag) {
6311 CALL_Uniform1fv(ctx->Exec, (location, count, v));
6312 }
6313 }
6314
6315 static void GLAPIENTRY
6316 save_Uniform2fvARB(GLint location, GLsizei count, const GLfloat *v)
6317 {
6318 GET_CURRENT_CONTEXT(ctx);
6319 Node *n;
6320 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6321 n = alloc_instruction(ctx, OPCODE_UNIFORM_2FV, 3);
6322 if (n) {
6323 n[1].i = location;
6324 n[2].i = count;
6325 n[3].data = memdup(v, count * 2 * sizeof(GLfloat));
6326 }
6327 if (ctx->ExecuteFlag) {
6328 CALL_Uniform2fv(ctx->Exec, (location, count, v));
6329 }
6330 }
6331
6332 static void GLAPIENTRY
6333 save_Uniform3fvARB(GLint location, GLsizei count, const GLfloat *v)
6334 {
6335 GET_CURRENT_CONTEXT(ctx);
6336 Node *n;
6337 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6338 n = alloc_instruction(ctx, OPCODE_UNIFORM_3FV, 3);
6339 if (n) {
6340 n[1].i = location;
6341 n[2].i = count;
6342 n[3].data = memdup(v, count * 3 * sizeof(GLfloat));
6343 }
6344 if (ctx->ExecuteFlag) {
6345 CALL_Uniform3fv(ctx->Exec, (location, count, v));
6346 }
6347 }
6348
6349 static void GLAPIENTRY
6350 save_Uniform4fvARB(GLint location, GLsizei count, const GLfloat *v)
6351 {
6352 GET_CURRENT_CONTEXT(ctx);
6353 Node *n;
6354 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6355 n = alloc_instruction(ctx, OPCODE_UNIFORM_4FV, 3);
6356 if (n) {
6357 n[1].i = location;
6358 n[2].i = count;
6359 n[3].data = memdup(v, count * 4 * sizeof(GLfloat));
6360 }
6361 if (ctx->ExecuteFlag) {
6362 CALL_Uniform4fv(ctx->Exec, (location, count, v));
6363 }
6364 }
6365
6366
6367 static void GLAPIENTRY
6368 save_Uniform1iARB(GLint location, GLint x)
6369 {
6370 GET_CURRENT_CONTEXT(ctx);
6371 Node *n;
6372 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6373 n = alloc_instruction(ctx, OPCODE_UNIFORM_1I, 2);
6374 if (n) {
6375 n[1].i = location;
6376 n[2].i = x;
6377 }
6378 if (ctx->ExecuteFlag) {
6379 CALL_Uniform1i(ctx->Exec, (location, x));
6380 }
6381 }
6382
6383 static void GLAPIENTRY
6384 save_Uniform2iARB(GLint location, GLint x, GLint y)
6385 {
6386 GET_CURRENT_CONTEXT(ctx);
6387 Node *n;
6388 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6389 n = alloc_instruction(ctx, OPCODE_UNIFORM_2I, 3);
6390 if (n) {
6391 n[1].i = location;
6392 n[2].i = x;
6393 n[3].i = y;
6394 }
6395 if (ctx->ExecuteFlag) {
6396 CALL_Uniform2i(ctx->Exec, (location, x, y));
6397 }
6398 }
6399
6400 static void GLAPIENTRY
6401 save_Uniform3iARB(GLint location, GLint x, GLint y, GLint z)
6402 {
6403 GET_CURRENT_CONTEXT(ctx);
6404 Node *n;
6405 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6406 n = alloc_instruction(ctx, OPCODE_UNIFORM_3I, 4);
6407 if (n) {
6408 n[1].i = location;
6409 n[2].i = x;
6410 n[3].i = y;
6411 n[4].i = z;
6412 }
6413 if (ctx->ExecuteFlag) {
6414 CALL_Uniform3i(ctx->Exec, (location, x, y, z));
6415 }
6416 }
6417
6418 static void GLAPIENTRY
6419 save_Uniform4iARB(GLint location, GLint x, GLint y, GLint z, GLint w)
6420 {
6421 GET_CURRENT_CONTEXT(ctx);
6422 Node *n;
6423 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6424 n = alloc_instruction(ctx, OPCODE_UNIFORM_4I, 5);
6425 if (n) {
6426 n[1].i = location;
6427 n[2].i = x;
6428 n[3].i = y;
6429 n[4].i = z;
6430 n[5].i = w;
6431 }
6432 if (ctx->ExecuteFlag) {
6433 CALL_Uniform4i(ctx->Exec, (location, x, y, z, w));
6434 }
6435 }
6436
6437
6438
6439 static void GLAPIENTRY
6440 save_Uniform1ivARB(GLint location, GLsizei count, const GLint *v)
6441 {
6442 GET_CURRENT_CONTEXT(ctx);
6443 Node *n;
6444 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6445 n = alloc_instruction(ctx, OPCODE_UNIFORM_1IV, 3);
6446 if (n) {
6447 n[1].i = location;
6448 n[2].i = count;
6449 n[3].data = memdup(v, count * 1 * sizeof(GLint));
6450 }
6451 if (ctx->ExecuteFlag) {
6452 CALL_Uniform1iv(ctx->Exec, (location, count, v));
6453 }
6454 }
6455
6456 static void GLAPIENTRY
6457 save_Uniform2ivARB(GLint location, GLsizei count, const GLint *v)
6458 {
6459 GET_CURRENT_CONTEXT(ctx);
6460 Node *n;
6461 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6462 n = alloc_instruction(ctx, OPCODE_UNIFORM_2IV, 3);
6463 if (n) {
6464 n[1].i = location;
6465 n[2].i = count;
6466 n[3].data = memdup(v, count * 2 * sizeof(GLint));
6467 }
6468 if (ctx->ExecuteFlag) {
6469 CALL_Uniform2iv(ctx->Exec, (location, count, v));
6470 }
6471 }
6472
6473 static void GLAPIENTRY
6474 save_Uniform3ivARB(GLint location, GLsizei count, const GLint *v)
6475 {
6476 GET_CURRENT_CONTEXT(ctx);
6477 Node *n;
6478 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6479 n = alloc_instruction(ctx, OPCODE_UNIFORM_3IV, 3);
6480 if (n) {
6481 n[1].i = location;
6482 n[2].i = count;
6483 n[3].data = memdup(v, count * 3 * sizeof(GLint));
6484 }
6485 if (ctx->ExecuteFlag) {
6486 CALL_Uniform3iv(ctx->Exec, (location, count, v));
6487 }
6488 }
6489
6490 static void GLAPIENTRY
6491 save_Uniform4ivARB(GLint location, GLsizei count, const GLint *v)
6492 {
6493 GET_CURRENT_CONTEXT(ctx);
6494 Node *n;
6495 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6496 n = alloc_instruction(ctx, OPCODE_UNIFORM_4IV, 3);
6497 if (n) {
6498 n[1].i = location;
6499 n[2].i = count;
6500 n[3].data = memdup(v, count * 4 * sizeof(GLfloat));
6501 }
6502 if (ctx->ExecuteFlag) {
6503 CALL_Uniform4iv(ctx->Exec, (location, count, v));
6504 }
6505 }
6506
6507
6508
6509 static void GLAPIENTRY
6510 save_Uniform1ui(GLint location, GLuint x)
6511 {
6512 GET_CURRENT_CONTEXT(ctx);
6513 Node *n;
6514 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6515 n = alloc_instruction(ctx, OPCODE_UNIFORM_1UI, 2);
6516 if (n) {
6517 n[1].i = location;
6518 n[2].i = x;
6519 }
6520 if (ctx->ExecuteFlag) {
6521 /*CALL_Uniform1ui(ctx->Exec, (location, x));*/
6522 }
6523 }
6524
6525 static void GLAPIENTRY
6526 save_Uniform2ui(GLint location, GLuint x, GLuint y)
6527 {
6528 GET_CURRENT_CONTEXT(ctx);
6529 Node *n;
6530 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6531 n = alloc_instruction(ctx, OPCODE_UNIFORM_2UI, 3);
6532 if (n) {
6533 n[1].i = location;
6534 n[2].i = x;
6535 n[3].i = y;
6536 }
6537 if (ctx->ExecuteFlag) {
6538 /*CALL_Uniform2ui(ctx->Exec, (location, x, y));*/
6539 }
6540 }
6541
6542 static void GLAPIENTRY
6543 save_Uniform3ui(GLint location, GLuint x, GLuint y, GLuint z)
6544 {
6545 GET_CURRENT_CONTEXT(ctx);
6546 Node *n;
6547 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6548 n = alloc_instruction(ctx, OPCODE_UNIFORM_3UI, 4);
6549 if (n) {
6550 n[1].i = location;
6551 n[2].i = x;
6552 n[3].i = y;
6553 n[4].i = z;
6554 }
6555 if (ctx->ExecuteFlag) {
6556 /*CALL_Uniform3ui(ctx->Exec, (location, x, y, z));*/
6557 }
6558 }
6559
6560 static void GLAPIENTRY
6561 save_Uniform4ui(GLint location, GLuint x, GLuint y, GLuint z, GLuint w)
6562 {
6563 GET_CURRENT_CONTEXT(ctx);
6564 Node *n;
6565 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6566 n = alloc_instruction(ctx, OPCODE_UNIFORM_4UI, 5);
6567 if (n) {
6568 n[1].i = location;
6569 n[2].i = x;
6570 n[3].i = y;
6571 n[4].i = z;
6572 n[5].i = w;
6573 }
6574 if (ctx->ExecuteFlag) {
6575 /*CALL_Uniform4ui(ctx->Exec, (location, x, y, z, w));*/
6576 }
6577 }
6578
6579
6580
6581 static void GLAPIENTRY
6582 save_Uniform1uiv(GLint location, GLsizei count, const GLuint *v)
6583 {
6584 GET_CURRENT_CONTEXT(ctx);
6585 Node *n;
6586 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6587 n = alloc_instruction(ctx, OPCODE_UNIFORM_1UIV, 3);
6588 if (n) {
6589 n[1].i = location;
6590 n[2].i = count;
6591 n[3].data = memdup(v, count * 1 * sizeof(*v));
6592 }
6593 if (ctx->ExecuteFlag) {
6594 /*CALL_Uniform1uiv(ctx->Exec, (location, count, v));*/
6595 }
6596 }
6597
6598 static void GLAPIENTRY
6599 save_Uniform2uiv(GLint location, GLsizei count, const GLuint *v)
6600 {
6601 GET_CURRENT_CONTEXT(ctx);
6602 Node *n;
6603 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6604 n = alloc_instruction(ctx, OPCODE_UNIFORM_2UIV, 3);
6605 if (n) {
6606 n[1].i = location;
6607 n[2].i = count;
6608 n[3].data = memdup(v, count * 2 * sizeof(*v));
6609 }
6610 if (ctx->ExecuteFlag) {
6611 /*CALL_Uniform2uiv(ctx->Exec, (location, count, v));*/
6612 }
6613 }
6614
6615 static void GLAPIENTRY
6616 save_Uniform3uiv(GLint location, GLsizei count, const GLuint *v)
6617 {
6618 GET_CURRENT_CONTEXT(ctx);
6619 Node *n;
6620 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6621 n = alloc_instruction(ctx, OPCODE_UNIFORM_3UIV, 3);
6622 if (n) {
6623 n[1].i = location;
6624 n[2].i = count;
6625 n[3].data = memdup(v, count * 3 * sizeof(*v));
6626 }
6627 if (ctx->ExecuteFlag) {
6628 /*CALL_Uniform3uiv(ctx->Exec, (location, count, v));*/
6629 }
6630 }
6631
6632 static void GLAPIENTRY
6633 save_Uniform4uiv(GLint location, GLsizei count, const GLuint *v)
6634 {
6635 GET_CURRENT_CONTEXT(ctx);
6636 Node *n;
6637 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6638 n = alloc_instruction(ctx, OPCODE_UNIFORM_4UIV, 3);
6639 if (n) {
6640 n[1].i = location;
6641 n[2].i = count;
6642 n[3].data = memdup(v, count * 4 * sizeof(*v));
6643 }
6644 if (ctx->ExecuteFlag) {
6645 /*CALL_Uniform4uiv(ctx->Exec, (location, count, v));*/
6646 }
6647 }
6648
6649
6650
6651 static void GLAPIENTRY
6652 save_UniformMatrix2fvARB(GLint location, GLsizei count, GLboolean transpose,
6653 const GLfloat *m)
6654 {
6655 GET_CURRENT_CONTEXT(ctx);
6656 Node *n;
6657 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6658 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX22, 4);
6659 if (n) {
6660 n[1].i = location;
6661 n[2].i = count;
6662 n[3].b = transpose;
6663 n[4].data = memdup(m, count * 2 * 2 * sizeof(GLfloat));
6664 }
6665 if (ctx->ExecuteFlag) {
6666 CALL_UniformMatrix2fv(ctx->Exec, (location, count, transpose, m));
6667 }
6668 }
6669
6670 static void GLAPIENTRY
6671 save_UniformMatrix3fvARB(GLint location, GLsizei count, GLboolean transpose,
6672 const GLfloat *m)
6673 {
6674 GET_CURRENT_CONTEXT(ctx);
6675 Node *n;
6676 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6677 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX33, 4);
6678 if (n) {
6679 n[1].i = location;
6680 n[2].i = count;
6681 n[3].b = transpose;
6682 n[4].data = memdup(m, count * 3 * 3 * sizeof(GLfloat));
6683 }
6684 if (ctx->ExecuteFlag) {
6685 CALL_UniformMatrix3fv(ctx->Exec, (location, count, transpose, m));
6686 }
6687 }
6688
6689 static void GLAPIENTRY
6690 save_UniformMatrix4fvARB(GLint location, GLsizei count, GLboolean transpose,
6691 const GLfloat *m)
6692 {
6693 GET_CURRENT_CONTEXT(ctx);
6694 Node *n;
6695 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6696 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX44, 4);
6697 if (n) {
6698 n[1].i = location;
6699 n[2].i = count;
6700 n[3].b = transpose;
6701 n[4].data = memdup(m, count * 4 * 4 * sizeof(GLfloat));
6702 }
6703 if (ctx->ExecuteFlag) {
6704 CALL_UniformMatrix4fv(ctx->Exec, (location, count, transpose, m));
6705 }
6706 }
6707
6708
6709 static void GLAPIENTRY
6710 save_UniformMatrix2x3fv(GLint location, GLsizei count, GLboolean transpose,
6711 const GLfloat *m)
6712 {
6713 GET_CURRENT_CONTEXT(ctx);
6714 Node *n;
6715 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6716 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX23, 4);
6717 if (n) {
6718 n[1].i = location;
6719 n[2].i = count;
6720 n[3].b = transpose;
6721 n[4].data = memdup(m, count * 2 * 3 * sizeof(GLfloat));
6722 }
6723 if (ctx->ExecuteFlag) {
6724 CALL_UniformMatrix2x3fv(ctx->Exec, (location, count, transpose, m));
6725 }
6726 }
6727
6728 static void GLAPIENTRY
6729 save_UniformMatrix3x2fv(GLint location, GLsizei count, GLboolean transpose,
6730 const GLfloat *m)
6731 {
6732 GET_CURRENT_CONTEXT(ctx);
6733 Node *n;
6734 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6735 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX32, 4);
6736 if (n) {
6737 n[1].i = location;
6738 n[2].i = count;
6739 n[3].b = transpose;
6740 n[4].data = memdup(m, count * 3 * 2 * sizeof(GLfloat));
6741 }
6742 if (ctx->ExecuteFlag) {
6743 CALL_UniformMatrix3x2fv(ctx->Exec, (location, count, transpose, m));
6744 }
6745 }
6746
6747
6748 static void GLAPIENTRY
6749 save_UniformMatrix2x4fv(GLint location, GLsizei count, GLboolean transpose,
6750 const GLfloat *m)
6751 {
6752 GET_CURRENT_CONTEXT(ctx);
6753 Node *n;
6754 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6755 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX24, 4);
6756 if (n) {
6757 n[1].i = location;
6758 n[2].i = count;
6759 n[3].b = transpose;
6760 n[4].data = memdup(m, count * 2 * 4 * sizeof(GLfloat));
6761 }
6762 if (ctx->ExecuteFlag) {
6763 CALL_UniformMatrix2x4fv(ctx->Exec, (location, count, transpose, m));
6764 }
6765 }
6766
6767 static void GLAPIENTRY
6768 save_UniformMatrix4x2fv(GLint location, GLsizei count, GLboolean transpose,
6769 const GLfloat *m)
6770 {
6771 GET_CURRENT_CONTEXT(ctx);
6772 Node *n;
6773 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6774 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX42, 4);
6775 if (n) {
6776 n[1].i = location;
6777 n[2].i = count;
6778 n[3].b = transpose;
6779 n[4].data = memdup(m, count * 4 * 2 * sizeof(GLfloat));
6780 }
6781 if (ctx->ExecuteFlag) {
6782 CALL_UniformMatrix4x2fv(ctx->Exec, (location, count, transpose, m));
6783 }
6784 }
6785
6786
6787 static void GLAPIENTRY
6788 save_UniformMatrix3x4fv(GLint location, GLsizei count, GLboolean transpose,
6789 const GLfloat *m)
6790 {
6791 GET_CURRENT_CONTEXT(ctx);
6792 Node *n;
6793 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6794 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX34, 4);
6795 if (n) {
6796 n[1].i = location;
6797 n[2].i = count;
6798 n[3].b = transpose;
6799 n[4].data = memdup(m, count * 3 * 4 * sizeof(GLfloat));
6800 }
6801 if (ctx->ExecuteFlag) {
6802 CALL_UniformMatrix3x4fv(ctx->Exec, (location, count, transpose, m));
6803 }
6804 }
6805
6806 static void GLAPIENTRY
6807 save_UniformMatrix4x3fv(GLint location, GLsizei count, GLboolean transpose,
6808 const GLfloat *m)
6809 {
6810 GET_CURRENT_CONTEXT(ctx);
6811 Node *n;
6812 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6813 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX43, 4);
6814 if (n) {
6815 n[1].i = location;
6816 n[2].i = count;
6817 n[3].b = transpose;
6818 n[4].data = memdup(m, count * 4 * 3 * sizeof(GLfloat));
6819 }
6820 if (ctx->ExecuteFlag) {
6821 CALL_UniformMatrix4x3fv(ctx->Exec, (location, count, transpose, m));
6822 }
6823 }
6824
6825 static void GLAPIENTRY
6826 save_ClampColorARB(GLenum target, GLenum clamp)
6827 {
6828 GET_CURRENT_CONTEXT(ctx);
6829 Node *n;
6830 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6831 n = alloc_instruction(ctx, OPCODE_CLAMP_COLOR, 2);
6832 if (n) {
6833 n[1].e = target;
6834 n[2].e = clamp;
6835 }
6836 if (ctx->ExecuteFlag) {
6837 CALL_ClampColor(ctx->Exec, (target, clamp));
6838 }
6839 }
6840
6841 static void GLAPIENTRY
6842 save_UseShaderProgramEXT(GLenum type, GLuint program)
6843 {
6844 GET_CURRENT_CONTEXT(ctx);
6845 Node *n;
6846 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6847 n = alloc_instruction(ctx, OPCODE_USE_SHADER_PROGRAM_EXT, 2);
6848 if (n) {
6849 n[1].ui = type;
6850 n[2].ui = program;
6851 }
6852 if (ctx->ExecuteFlag) {
6853 CALL_UseShaderProgramEXT(ctx->Exec, (type, program));
6854 }
6855 }
6856
6857 static void GLAPIENTRY
6858 save_ActiveProgramEXT(GLuint program)
6859 {
6860 GET_CURRENT_CONTEXT(ctx);
6861 Node *n;
6862 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6863 n = alloc_instruction(ctx, OPCODE_ACTIVE_PROGRAM_EXT, 1);
6864 if (n) {
6865 n[1].ui = program;
6866 }
6867 if (ctx->ExecuteFlag) {
6868 CALL_ActiveProgramEXT(ctx->Exec, (program));
6869 }
6870 }
6871
6872 /** GL_EXT_texture_integer */
6873 static void GLAPIENTRY
6874 save_ClearColorIi(GLint red, GLint green, GLint blue, GLint alpha)
6875 {
6876 GET_CURRENT_CONTEXT(ctx);
6877 Node *n;
6878 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6879 n = alloc_instruction(ctx, OPCODE_CLEARCOLOR_I, 4);
6880 if (n) {
6881 n[1].i = red;
6882 n[2].i = green;
6883 n[3].i = blue;
6884 n[4].i = alpha;
6885 }
6886 if (ctx->ExecuteFlag) {
6887 CALL_ClearColorIiEXT(ctx->Exec, (red, green, blue, alpha));
6888 }
6889 }
6890
6891 /** GL_EXT_texture_integer */
6892 static void GLAPIENTRY
6893 save_ClearColorIui(GLuint red, GLuint green, GLuint blue, GLuint alpha)
6894 {
6895 GET_CURRENT_CONTEXT(ctx);
6896 Node *n;
6897 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6898 n = alloc_instruction(ctx, OPCODE_CLEARCOLOR_UI, 4);
6899 if (n) {
6900 n[1].ui = red;
6901 n[2].ui = green;
6902 n[3].ui = blue;
6903 n[4].ui = alpha;
6904 }
6905 if (ctx->ExecuteFlag) {
6906 CALL_ClearColorIuiEXT(ctx->Exec, (red, green, blue, alpha));
6907 }
6908 }
6909
6910 /** GL_EXT_texture_integer */
6911 static void GLAPIENTRY
6912 save_TexParameterIiv(GLenum target, GLenum pname, const GLint *params)
6913 {
6914 GET_CURRENT_CONTEXT(ctx);
6915 Node *n;
6916 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6917 n = alloc_instruction(ctx, OPCODE_TEXPARAMETER_I, 6);
6918 if (n) {
6919 n[1].e = target;
6920 n[2].e = pname;
6921 n[3].i = params[0];
6922 n[4].i = params[1];
6923 n[5].i = params[2];
6924 n[6].i = params[3];
6925 }
6926 if (ctx->ExecuteFlag) {
6927 CALL_TexParameterIiv(ctx->Exec, (target, pname, params));
6928 }
6929 }
6930
6931 /** GL_EXT_texture_integer */
6932 static void GLAPIENTRY
6933 save_TexParameterIuiv(GLenum target, GLenum pname, const GLuint *params)
6934 {
6935 GET_CURRENT_CONTEXT(ctx);
6936 Node *n;
6937 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6938 n = alloc_instruction(ctx, OPCODE_TEXPARAMETER_UI, 6);
6939 if (n) {
6940 n[1].e = target;
6941 n[2].e = pname;
6942 n[3].ui = params[0];
6943 n[4].ui = params[1];
6944 n[5].ui = params[2];
6945 n[6].ui = params[3];
6946 }
6947 if (ctx->ExecuteFlag) {
6948 CALL_TexParameterIuiv(ctx->Exec, (target, pname, params));
6949 }
6950 }
6951
6952 /* GL_ARB_instanced_arrays */
6953 static void GLAPIENTRY
6954 save_VertexAttribDivisor(GLuint index, GLuint divisor)
6955 {
6956 GET_CURRENT_CONTEXT(ctx);
6957 Node *n;
6958 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6959 n = alloc_instruction(ctx, OPCODE_VERTEX_ATTRIB_DIVISOR, 2);
6960 if (n) {
6961 n[1].ui = index;
6962 n[2].ui = divisor;
6963 }
6964 if (ctx->ExecuteFlag) {
6965 CALL_VertexAttribDivisor(ctx->Exec, (index, divisor));
6966 }
6967 }
6968
6969
6970 /* GL_NV_texture_barrier */
6971 static void GLAPIENTRY
6972 save_TextureBarrierNV(void)
6973 {
6974 GET_CURRENT_CONTEXT(ctx);
6975 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6976 alloc_instruction(ctx, OPCODE_TEXTURE_BARRIER_NV, 0);
6977 if (ctx->ExecuteFlag) {
6978 CALL_TextureBarrierNV(ctx->Exec, ());
6979 }
6980 }
6981
6982
6983 /* GL_ARB_sampler_objects */
6984 static void GLAPIENTRY
6985 save_BindSampler(GLuint unit, GLuint sampler)
6986 {
6987 Node *n;
6988 GET_CURRENT_CONTEXT(ctx);
6989 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6990 n = alloc_instruction(ctx, OPCODE_BIND_SAMPLER, 2);
6991 if (n) {
6992 n[1].ui = unit;
6993 n[2].ui = sampler;
6994 }
6995 if (ctx->ExecuteFlag) {
6996 CALL_BindSampler(ctx->Exec, (unit, sampler));
6997 }
6998 }
6999
7000 static void GLAPIENTRY
7001 save_SamplerParameteriv(GLuint sampler, GLenum pname, const GLint *params)
7002 {
7003 Node *n;
7004 GET_CURRENT_CONTEXT(ctx);
7005 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7006 n = alloc_instruction(ctx, OPCODE_SAMPLER_PARAMETERIV, 6);
7007 if (n) {
7008 n[1].ui = sampler;
7009 n[2].e = pname;
7010 n[3].i = params[0];
7011 if (pname == GL_TEXTURE_BORDER_COLOR) {
7012 n[4].i = params[1];
7013 n[5].i = params[2];
7014 n[6].i = params[3];
7015 }
7016 else {
7017 n[4].i = n[5].i = n[6].i = 0;
7018 }
7019 }
7020 if (ctx->ExecuteFlag) {
7021 CALL_SamplerParameteriv(ctx->Exec, (sampler, pname, params));
7022 }
7023 }
7024
7025 static void GLAPIENTRY
7026 save_SamplerParameteri(GLuint sampler, GLenum pname, GLint param)
7027 {
7028 save_SamplerParameteriv(sampler, pname, &param);
7029 }
7030
7031 static void GLAPIENTRY
7032 save_SamplerParameterfv(GLuint sampler, GLenum pname, const GLfloat *params)
7033 {
7034 Node *n;
7035 GET_CURRENT_CONTEXT(ctx);
7036 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7037 n = alloc_instruction(ctx, OPCODE_SAMPLER_PARAMETERFV, 6);
7038 if (n) {
7039 n[1].ui = sampler;
7040 n[2].e = pname;
7041 n[3].f = params[0];
7042 if (pname == GL_TEXTURE_BORDER_COLOR) {
7043 n[4].f = params[1];
7044 n[5].f = params[2];
7045 n[6].f = params[3];
7046 }
7047 else {
7048 n[4].f = n[5].f = n[6].f = 0.0F;
7049 }
7050 }
7051 if (ctx->ExecuteFlag) {
7052 CALL_SamplerParameterfv(ctx->Exec, (sampler, pname, params));
7053 }
7054 }
7055
7056 static void GLAPIENTRY
7057 save_SamplerParameterf(GLuint sampler, GLenum pname, GLfloat param)
7058 {
7059 save_SamplerParameterfv(sampler, pname, &param);
7060 }
7061
7062 static void GLAPIENTRY
7063 save_SamplerParameterIiv(GLuint sampler, GLenum pname, const GLint *params)
7064 {
7065 Node *n;
7066 GET_CURRENT_CONTEXT(ctx);
7067 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7068 n = alloc_instruction(ctx, OPCODE_SAMPLER_PARAMETERIIV, 6);
7069 if (n) {
7070 n[1].ui = sampler;
7071 n[2].e = pname;
7072 n[3].i = params[0];
7073 if (pname == GL_TEXTURE_BORDER_COLOR) {
7074 n[4].i = params[1];
7075 n[5].i = params[2];
7076 n[6].i = params[3];
7077 }
7078 else {
7079 n[4].i = n[5].i = n[6].i = 0;
7080 }
7081 }
7082 if (ctx->ExecuteFlag) {
7083 CALL_SamplerParameterIiv(ctx->Exec, (sampler, pname, params));
7084 }
7085 }
7086
7087 static void GLAPIENTRY
7088 save_SamplerParameterIuiv(GLuint sampler, GLenum pname, const GLuint *params)
7089 {
7090 Node *n;
7091 GET_CURRENT_CONTEXT(ctx);
7092 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7093 n = alloc_instruction(ctx, OPCODE_SAMPLER_PARAMETERUIV, 6);
7094 if (n) {
7095 n[1].ui = sampler;
7096 n[2].e = pname;
7097 n[3].ui = params[0];
7098 if (pname == GL_TEXTURE_BORDER_COLOR) {
7099 n[4].ui = params[1];
7100 n[5].ui = params[2];
7101 n[6].ui = params[3];
7102 }
7103 else {
7104 n[4].ui = n[5].ui = n[6].ui = 0;
7105 }
7106 }
7107 if (ctx->ExecuteFlag) {
7108 CALL_SamplerParameterIuiv(ctx->Exec, (sampler, pname, params));
7109 }
7110 }
7111
7112 /* GL_ARB_geometry_shader4 */
7113 static void GLAPIENTRY
7114 save_ProgramParameteri(GLuint program, GLenum pname, GLint value)
7115 {
7116 Node *n;
7117 GET_CURRENT_CONTEXT(ctx);
7118 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7119 n = alloc_instruction(ctx, OPCODE_PROGRAM_PARAMETERI, 3);
7120 if (n) {
7121 n[1].ui = program;
7122 n[2].e = pname;
7123 n[3].i = value;
7124 }
7125 if (ctx->ExecuteFlag) {
7126 CALL_ProgramParameteri(ctx->Exec, (program, pname, value));
7127 }
7128 }
7129
7130 static void GLAPIENTRY
7131 save_FramebufferTexture(GLenum target, GLenum attachment,
7132 GLuint texture, GLint level)
7133 {
7134 Node *n;
7135 GET_CURRENT_CONTEXT(ctx);
7136 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7137 n = alloc_instruction(ctx, OPCODE_FRAMEBUFFER_TEXTURE, 4);
7138 if (n) {
7139 n[1].e = target;
7140 n[2].e = attachment;
7141 n[3].ui = texture;
7142 n[4].i = level;
7143 }
7144 if (ctx->ExecuteFlag) {
7145 CALL_FramebufferTexture(ctx->Exec, (target, attachment, texture, level));
7146 }
7147 }
7148
7149 static void GLAPIENTRY
7150 save_FramebufferTextureFace(GLenum target, GLenum attachment,
7151 GLuint texture, GLint level, GLenum face)
7152 {
7153 Node *n;
7154 GET_CURRENT_CONTEXT(ctx);
7155 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7156 n = alloc_instruction(ctx, OPCODE_FRAMEBUFFER_TEXTURE_FACE, 5);
7157 if (n) {
7158 n[1].e = target;
7159 n[2].e = attachment;
7160 n[3].ui = texture;
7161 n[4].i = level;
7162 n[5].e = face;
7163 }
7164 if (ctx->ExecuteFlag) {
7165 CALL_FramebufferTextureFaceARB(ctx->Exec, (target, attachment, texture,
7166 level, face));
7167 }
7168 }
7169
7170
7171
7172 static void GLAPIENTRY
7173 save_WaitSync(GLsync sync, GLbitfield flags, GLuint64 timeout)
7174 {
7175 Node *n;
7176 GET_CURRENT_CONTEXT(ctx);
7177 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7178 n = alloc_instruction(ctx, OPCODE_WAIT_SYNC, 4);
7179 if (n) {
7180 union uint64_pair p;
7181 p.uint64 = timeout;
7182 n[1].data = sync;
7183 n[2].e = flags;
7184 n[3].ui = p.uint32[0];
7185 n[4].ui = p.uint32[1];
7186 }
7187 if (ctx->ExecuteFlag) {
7188 CALL_WaitSync(ctx->Exec, (sync, flags, timeout));
7189 }
7190 }
7191
7192
7193 /** GL_NV_conditional_render */
7194 static void GLAPIENTRY
7195 save_BeginConditionalRender(GLuint queryId, GLenum mode)
7196 {
7197 GET_CURRENT_CONTEXT(ctx);
7198 Node *n;
7199 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7200 n = alloc_instruction(ctx, OPCODE_BEGIN_CONDITIONAL_RENDER, 2);
7201 if (n) {
7202 n[1].i = queryId;
7203 n[2].e = mode;
7204 }
7205 if (ctx->ExecuteFlag) {
7206 CALL_BeginConditionalRender(ctx->Exec, (queryId, mode));
7207 }
7208 }
7209
7210 static void GLAPIENTRY
7211 save_EndConditionalRender(void)
7212 {
7213 GET_CURRENT_CONTEXT(ctx);
7214 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7215 alloc_instruction(ctx, OPCODE_END_CONDITIONAL_RENDER, 0);
7216 if (ctx->ExecuteFlag) {
7217 CALL_EndConditionalRender(ctx->Exec, ());
7218 }
7219 }
7220
7221 static void GLAPIENTRY
7222 save_UniformBlockBinding(GLuint prog, GLuint index, GLuint binding)
7223 {
7224 GET_CURRENT_CONTEXT(ctx);
7225 Node *n;
7226 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7227 n = alloc_instruction(ctx, OPCODE_UNIFORM_BLOCK_BINDING, 3);
7228 if (n) {
7229 n[1].ui = prog;
7230 n[2].ui = index;
7231 n[3].ui = binding;
7232 }
7233 if (ctx->ExecuteFlag) {
7234 CALL_UniformBlockBinding(ctx->Exec, (prog, index, binding));
7235 }
7236 }
7237
7238
7239 /**
7240 * Save an error-generating command into display list.
7241 *
7242 * KW: Will appear in the list before the vertex buffer containing the
7243 * command that provoked the error. I don't see this as a problem.
7244 */
7245 static void
7246 save_error(struct gl_context *ctx, GLenum error, const char *s)
7247 {
7248 Node *n;
7249 n = alloc_instruction(ctx, OPCODE_ERROR, 2);
7250 if (n) {
7251 n[1].e = error;
7252 n[2].data = (void *) s;
7253 }
7254 }
7255
7256
7257 /**
7258 * Compile an error into current display list.
7259 */
7260 void
7261 _mesa_compile_error(struct gl_context *ctx, GLenum error, const char *s)
7262 {
7263 if (ctx->CompileFlag)
7264 save_error(ctx, error, s);
7265 if (ctx->ExecuteFlag)
7266 _mesa_error(ctx, error, "%s", s);
7267 }
7268
7269
7270 /**
7271 * Test if ID names a display list.
7272 */
7273 static GLboolean
7274 islist(struct gl_context *ctx, GLuint list)
7275 {
7276 if (list > 0 && lookup_list(ctx, list)) {
7277 return GL_TRUE;
7278 }
7279 else {
7280 return GL_FALSE;
7281 }
7282 }
7283
7284
7285
7286 /**********************************************************************/
7287 /* Display list execution */
7288 /**********************************************************************/
7289
7290
7291 /*
7292 * Execute a display list. Note that the ListBase offset must have already
7293 * been added before calling this function. I.e. the list argument is
7294 * the absolute list number, not relative to ListBase.
7295 * \param list - display list number
7296 */
7297 static void
7298 execute_list(struct gl_context *ctx, GLuint list)
7299 {
7300 struct gl_display_list *dlist;
7301 Node *n;
7302 GLboolean done;
7303
7304 if (list == 0 || !islist(ctx, list))
7305 return;
7306
7307 if (ctx->ListState.CallDepth == MAX_LIST_NESTING) {
7308 /* raise an error? */
7309 return;
7310 }
7311
7312 dlist = lookup_list(ctx, list);
7313 if (!dlist)
7314 return;
7315
7316 ctx->ListState.CallDepth++;
7317
7318 if (ctx->Driver.BeginCallList)
7319 ctx->Driver.BeginCallList(ctx, dlist);
7320
7321 n = dlist->Head;
7322
7323 done = GL_FALSE;
7324 while (!done) {
7325 const OpCode opcode = n[0].opcode;
7326
7327 if (is_ext_opcode(opcode)) {
7328 n += ext_opcode_execute(ctx, n);
7329 }
7330 else {
7331 switch (opcode) {
7332 case OPCODE_ERROR:
7333 _mesa_error(ctx, n[1].e, "%s", (const char *) n[2].data);
7334 break;
7335 case OPCODE_ACCUM:
7336 CALL_Accum(ctx->Exec, (n[1].e, n[2].f));
7337 break;
7338 case OPCODE_ALPHA_FUNC:
7339 CALL_AlphaFunc(ctx->Exec, (n[1].e, n[2].f));
7340 break;
7341 case OPCODE_BIND_TEXTURE:
7342 CALL_BindTexture(ctx->Exec, (n[1].e, n[2].ui));
7343 break;
7344 case OPCODE_BITMAP:
7345 {
7346 const struct gl_pixelstore_attrib save = ctx->Unpack;
7347 ctx->Unpack = ctx->DefaultPacking;
7348 CALL_Bitmap(ctx->Exec, ((GLsizei) n[1].i, (GLsizei) n[2].i,
7349 n[3].f, n[4].f, n[5].f, n[6].f,
7350 (const GLubyte *) n[7].data));
7351 ctx->Unpack = save; /* restore */
7352 }
7353 break;
7354 case OPCODE_BLEND_COLOR:
7355 CALL_BlendColor(ctx->Exec, (n[1].f, n[2].f, n[3].f, n[4].f));
7356 break;
7357 case OPCODE_BLEND_EQUATION:
7358 CALL_BlendEquation(ctx->Exec, (n[1].e));
7359 break;
7360 case OPCODE_BLEND_EQUATION_SEPARATE:
7361 CALL_BlendEquationSeparate(ctx->Exec, (n[1].e, n[2].e));
7362 break;
7363 case OPCODE_BLEND_FUNC_SEPARATE:
7364 CALL_BlendFuncSeparate(ctx->Exec,
7365 (n[1].e, n[2].e, n[3].e, n[4].e));
7366 break;
7367
7368 case OPCODE_BLEND_FUNC_I:
7369 /* GL_ARB_draw_buffers_blend */
7370 CALL_BlendFunciARB(ctx->Exec, (n[1].ui, n[2].e, n[3].e));
7371 break;
7372 case OPCODE_BLEND_FUNC_SEPARATE_I:
7373 /* GL_ARB_draw_buffers_blend */
7374 CALL_BlendFuncSeparateiARB(ctx->Exec, (n[1].ui, n[2].e, n[3].e,
7375 n[4].e, n[5].e));
7376 break;
7377 case OPCODE_BLEND_EQUATION_I:
7378 /* GL_ARB_draw_buffers_blend */
7379 CALL_BlendEquationiARB(ctx->Exec, (n[1].ui, n[2].e));
7380 break;
7381 case OPCODE_BLEND_EQUATION_SEPARATE_I:
7382 /* GL_ARB_draw_buffers_blend */
7383 CALL_BlendEquationSeparateiARB(ctx->Exec,
7384 (n[1].ui, n[2].e, n[3].e));
7385 break;
7386
7387 case OPCODE_CALL_LIST:
7388 /* Generated by glCallList(), don't add ListBase */
7389 if (ctx->ListState.CallDepth < MAX_LIST_NESTING) {
7390 execute_list(ctx, n[1].ui);
7391 }
7392 break;
7393 case OPCODE_CALL_LIST_OFFSET:
7394 /* Generated by glCallLists() so we must add ListBase */
7395 if (n[2].b) {
7396 /* user specified a bad data type at compile time */
7397 _mesa_error(ctx, GL_INVALID_ENUM, "glCallLists(type)");
7398 }
7399 else if (ctx->ListState.CallDepth < MAX_LIST_NESTING) {
7400 GLuint list = (GLuint) (ctx->List.ListBase + n[1].i);
7401 execute_list(ctx, list);
7402 }
7403 break;
7404 case OPCODE_CLEAR:
7405 CALL_Clear(ctx->Exec, (n[1].bf));
7406 break;
7407 case OPCODE_CLEAR_BUFFER_IV:
7408 {
7409 GLint value[4];
7410 value[0] = n[3].i;
7411 value[1] = n[4].i;
7412 value[2] = n[5].i;
7413 value[3] = n[6].i;
7414 CALL_ClearBufferiv(ctx->Exec, (n[1].e, n[2].i, value));
7415 }
7416 break;
7417 case OPCODE_CLEAR_BUFFER_UIV:
7418 {
7419 GLuint value[4];
7420 value[0] = n[3].ui;
7421 value[1] = n[4].ui;
7422 value[2] = n[5].ui;
7423 value[3] = n[6].ui;
7424 CALL_ClearBufferuiv(ctx->Exec, (n[1].e, n[2].i, value));
7425 }
7426 break;
7427 case OPCODE_CLEAR_BUFFER_FV:
7428 {
7429 GLfloat value[4];
7430 value[0] = n[3].f;
7431 value[1] = n[4].f;
7432 value[2] = n[5].f;
7433 value[3] = n[6].f;
7434 CALL_ClearBufferfv(ctx->Exec, (n[1].e, n[2].i, value));
7435 }
7436 break;
7437 case OPCODE_CLEAR_BUFFER_FI:
7438 CALL_ClearBufferfi(ctx->Exec, (n[1].e, n[2].i, n[3].f, n[4].i));
7439 break;
7440 case OPCODE_CLEAR_COLOR:
7441 CALL_ClearColor(ctx->Exec, (n[1].f, n[2].f, n[3].f, n[4].f));
7442 break;
7443 case OPCODE_CLEAR_ACCUM:
7444 CALL_ClearAccum(ctx->Exec, (n[1].f, n[2].f, n[3].f, n[4].f));
7445 break;
7446 case OPCODE_CLEAR_DEPTH:
7447 CALL_ClearDepth(ctx->Exec, ((GLclampd) n[1].f));
7448 break;
7449 case OPCODE_CLEAR_INDEX:
7450 CALL_ClearIndex(ctx->Exec, ((GLfloat) n[1].ui));
7451 break;
7452 case OPCODE_CLEAR_STENCIL:
7453 CALL_ClearStencil(ctx->Exec, (n[1].i));
7454 break;
7455 case OPCODE_CLIP_PLANE:
7456 {
7457 GLdouble eq[4];
7458 eq[0] = n[2].f;
7459 eq[1] = n[3].f;
7460 eq[2] = n[4].f;
7461 eq[3] = n[5].f;
7462 CALL_ClipPlane(ctx->Exec, (n[1].e, eq));
7463 }
7464 break;
7465 case OPCODE_COLOR_MASK:
7466 CALL_ColorMask(ctx->Exec, (n[1].b, n[2].b, n[3].b, n[4].b));
7467 break;
7468 case OPCODE_COLOR_MASK_INDEXED:
7469 CALL_ColorMaski(ctx->Exec, (n[1].ui, n[2].b, n[3].b,
7470 n[4].b, n[5].b));
7471 break;
7472 case OPCODE_COLOR_MATERIAL:
7473 CALL_ColorMaterial(ctx->Exec, (n[1].e, n[2].e));
7474 break;
7475 case OPCODE_COLOR_TABLE:
7476 {
7477 const struct gl_pixelstore_attrib save = ctx->Unpack;
7478 ctx->Unpack = ctx->DefaultPacking;
7479 CALL_ColorTable(ctx->Exec, (n[1].e, n[2].e, n[3].i, n[4].e,
7480 n[5].e, n[6].data));
7481 ctx->Unpack = save; /* restore */
7482 }
7483 break;
7484 case OPCODE_COLOR_TABLE_PARAMETER_FV:
7485 {
7486 GLfloat params[4];
7487 params[0] = n[3].f;
7488 params[1] = n[4].f;
7489 params[2] = n[5].f;
7490 params[3] = n[6].f;
7491 CALL_ColorTableParameterfv(ctx->Exec,
7492 (n[1].e, n[2].e, params));
7493 }
7494 break;
7495 case OPCODE_COLOR_TABLE_PARAMETER_IV:
7496 {
7497 GLint params[4];
7498 params[0] = n[3].i;
7499 params[1] = n[4].i;
7500 params[2] = n[5].i;
7501 params[3] = n[6].i;
7502 CALL_ColorTableParameteriv(ctx->Exec,
7503 (n[1].e, n[2].e, params));
7504 }
7505 break;
7506 case OPCODE_COLOR_SUB_TABLE:
7507 {
7508 const struct gl_pixelstore_attrib save = ctx->Unpack;
7509 ctx->Unpack = ctx->DefaultPacking;
7510 CALL_ColorSubTable(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7511 n[4].e, n[5].e, n[6].data));
7512 ctx->Unpack = save; /* restore */
7513 }
7514 break;
7515 case OPCODE_CONVOLUTION_FILTER_1D:
7516 {
7517 const struct gl_pixelstore_attrib save = ctx->Unpack;
7518 ctx->Unpack = ctx->DefaultPacking;
7519 CALL_ConvolutionFilter1D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7520 n[4].e, n[5].e,
7521 n[6].data));
7522 ctx->Unpack = save; /* restore */
7523 }
7524 break;
7525 case OPCODE_CONVOLUTION_FILTER_2D:
7526 {
7527 const struct gl_pixelstore_attrib save = ctx->Unpack;
7528 ctx->Unpack = ctx->DefaultPacking;
7529 CALL_ConvolutionFilter2D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7530 n[4].i, n[5].e, n[6].e,
7531 n[7].data));
7532 ctx->Unpack = save; /* restore */
7533 }
7534 break;
7535 case OPCODE_CONVOLUTION_PARAMETER_I:
7536 CALL_ConvolutionParameteri(ctx->Exec, (n[1].e, n[2].e, n[3].i));
7537 break;
7538 case OPCODE_CONVOLUTION_PARAMETER_IV:
7539 {
7540 GLint params[4];
7541 params[0] = n[3].i;
7542 params[1] = n[4].i;
7543 params[2] = n[5].i;
7544 params[3] = n[6].i;
7545 CALL_ConvolutionParameteriv(ctx->Exec,
7546 (n[1].e, n[2].e, params));
7547 }
7548 break;
7549 case OPCODE_CONVOLUTION_PARAMETER_F:
7550 CALL_ConvolutionParameterf(ctx->Exec, (n[1].e, n[2].e, n[3].f));
7551 break;
7552 case OPCODE_CONVOLUTION_PARAMETER_FV:
7553 {
7554 GLfloat params[4];
7555 params[0] = n[3].f;
7556 params[1] = n[4].f;
7557 params[2] = n[5].f;
7558 params[3] = n[6].f;
7559 CALL_ConvolutionParameterfv(ctx->Exec,
7560 (n[1].e, n[2].e, params));
7561 }
7562 break;
7563 case OPCODE_COPY_COLOR_SUB_TABLE:
7564 CALL_CopyColorSubTable(ctx->Exec, (n[1].e, n[2].i,
7565 n[3].i, n[4].i, n[5].i));
7566 break;
7567 case OPCODE_COPY_COLOR_TABLE:
7568 CALL_CopyColorSubTable(ctx->Exec, (n[1].e, n[2].i,
7569 n[3].i, n[4].i, n[5].i));
7570 break;
7571 case OPCODE_COPY_PIXELS:
7572 CALL_CopyPixels(ctx->Exec, (n[1].i, n[2].i,
7573 (GLsizei) n[3].i, (GLsizei) n[4].i,
7574 n[5].e));
7575 break;
7576 case OPCODE_COPY_TEX_IMAGE1D:
7577 CALL_CopyTexImage1D(ctx->Exec, (n[1].e, n[2].i, n[3].e, n[4].i,
7578 n[5].i, n[6].i, n[7].i));
7579 break;
7580 case OPCODE_COPY_TEX_IMAGE2D:
7581 CALL_CopyTexImage2D(ctx->Exec, (n[1].e, n[2].i, n[3].e, n[4].i,
7582 n[5].i, n[6].i, n[7].i, n[8].i));
7583 break;
7584 case OPCODE_COPY_TEX_SUB_IMAGE1D:
7585 CALL_CopyTexSubImage1D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7586 n[4].i, n[5].i, n[6].i));
7587 break;
7588 case OPCODE_COPY_TEX_SUB_IMAGE2D:
7589 CALL_CopyTexSubImage2D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7590 n[4].i, n[5].i, n[6].i, n[7].i,
7591 n[8].i));
7592 break;
7593 case OPCODE_COPY_TEX_SUB_IMAGE3D:
7594 CALL_CopyTexSubImage3D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7595 n[4].i, n[5].i, n[6].i, n[7].i,
7596 n[8].i, n[9].i));
7597 break;
7598 case OPCODE_CULL_FACE:
7599 CALL_CullFace(ctx->Exec, (n[1].e));
7600 break;
7601 case OPCODE_DEPTH_FUNC:
7602 CALL_DepthFunc(ctx->Exec, (n[1].e));
7603 break;
7604 case OPCODE_DEPTH_MASK:
7605 CALL_DepthMask(ctx->Exec, (n[1].b));
7606 break;
7607 case OPCODE_DEPTH_RANGE:
7608 CALL_DepthRange(ctx->Exec,
7609 ((GLclampd) n[1].f, (GLclampd) n[2].f));
7610 break;
7611 case OPCODE_DISABLE:
7612 CALL_Disable(ctx->Exec, (n[1].e));
7613 break;
7614 case OPCODE_DISABLE_INDEXED:
7615 CALL_Disablei(ctx->Exec, (n[1].ui, n[2].e));
7616 break;
7617 case OPCODE_DRAW_BUFFER:
7618 CALL_DrawBuffer(ctx->Exec, (n[1].e));
7619 break;
7620 case OPCODE_DRAW_PIXELS:
7621 {
7622 const struct gl_pixelstore_attrib save = ctx->Unpack;
7623 ctx->Unpack = ctx->DefaultPacking;
7624 CALL_DrawPixels(ctx->Exec, (n[1].i, n[2].i, n[3].e, n[4].e,
7625 n[5].data));
7626 ctx->Unpack = save; /* restore */
7627 }
7628 break;
7629 case OPCODE_ENABLE:
7630 CALL_Enable(ctx->Exec, (n[1].e));
7631 break;
7632 case OPCODE_ENABLE_INDEXED:
7633 CALL_Enablei(ctx->Exec, (n[1].ui, n[2].e));
7634 break;
7635 case OPCODE_EVALMESH1:
7636 CALL_EvalMesh1(ctx->Exec, (n[1].e, n[2].i, n[3].i));
7637 break;
7638 case OPCODE_EVALMESH2:
7639 CALL_EvalMesh2(ctx->Exec,
7640 (n[1].e, n[2].i, n[3].i, n[4].i, n[5].i));
7641 break;
7642 case OPCODE_FOG:
7643 {
7644 GLfloat p[4];
7645 p[0] = n[2].f;
7646 p[1] = n[3].f;
7647 p[2] = n[4].f;
7648 p[3] = n[5].f;
7649 CALL_Fogfv(ctx->Exec, (n[1].e, p));
7650 }
7651 break;
7652 case OPCODE_FRONT_FACE:
7653 CALL_FrontFace(ctx->Exec, (n[1].e));
7654 break;
7655 case OPCODE_FRUSTUM:
7656 CALL_Frustum(ctx->Exec,
7657 (n[1].f, n[2].f, n[3].f, n[4].f, n[5].f, n[6].f));
7658 break;
7659 case OPCODE_HINT:
7660 CALL_Hint(ctx->Exec, (n[1].e, n[2].e));
7661 break;
7662 case OPCODE_HISTOGRAM:
7663 CALL_Histogram(ctx->Exec, (n[1].e, n[2].i, n[3].e, n[4].b));
7664 break;
7665 case OPCODE_INDEX_MASK:
7666 CALL_IndexMask(ctx->Exec, (n[1].ui));
7667 break;
7668 case OPCODE_INIT_NAMES:
7669 CALL_InitNames(ctx->Exec, ());
7670 break;
7671 case OPCODE_LIGHT:
7672 {
7673 GLfloat p[4];
7674 p[0] = n[3].f;
7675 p[1] = n[4].f;
7676 p[2] = n[5].f;
7677 p[3] = n[6].f;
7678 CALL_Lightfv(ctx->Exec, (n[1].e, n[2].e, p));
7679 }
7680 break;
7681 case OPCODE_LIGHT_MODEL:
7682 {
7683 GLfloat p[4];
7684 p[0] = n[2].f;
7685 p[1] = n[3].f;
7686 p[2] = n[4].f;
7687 p[3] = n[5].f;
7688 CALL_LightModelfv(ctx->Exec, (n[1].e, p));
7689 }
7690 break;
7691 case OPCODE_LINE_STIPPLE:
7692 CALL_LineStipple(ctx->Exec, (n[1].i, n[2].us));
7693 break;
7694 case OPCODE_LINE_WIDTH:
7695 CALL_LineWidth(ctx->Exec, (n[1].f));
7696 break;
7697 case OPCODE_LIST_BASE:
7698 CALL_ListBase(ctx->Exec, (n[1].ui));
7699 break;
7700 case OPCODE_LOAD_IDENTITY:
7701 CALL_LoadIdentity(ctx->Exec, ());
7702 break;
7703 case OPCODE_LOAD_MATRIX:
7704 if (sizeof(Node) == sizeof(GLfloat)) {
7705 CALL_LoadMatrixf(ctx->Exec, (&n[1].f));
7706 }
7707 else {
7708 GLfloat m[16];
7709 GLuint i;
7710 for (i = 0; i < 16; i++) {
7711 m[i] = n[1 + i].f;
7712 }
7713 CALL_LoadMatrixf(ctx->Exec, (m));
7714 }
7715 break;
7716 case OPCODE_LOAD_NAME:
7717 CALL_LoadName(ctx->Exec, (n[1].ui));
7718 break;
7719 case OPCODE_LOGIC_OP:
7720 CALL_LogicOp(ctx->Exec, (n[1].e));
7721 break;
7722 case OPCODE_MAP1:
7723 {
7724 GLenum target = n[1].e;
7725 GLint ustride = _mesa_evaluator_components(target);
7726 GLint uorder = n[5].i;
7727 GLfloat u1 = n[2].f;
7728 GLfloat u2 = n[3].f;
7729 CALL_Map1f(ctx->Exec, (target, u1, u2, ustride, uorder,
7730 (GLfloat *) n[6].data));
7731 }
7732 break;
7733 case OPCODE_MAP2:
7734 {
7735 GLenum target = n[1].e;
7736 GLfloat u1 = n[2].f;
7737 GLfloat u2 = n[3].f;
7738 GLfloat v1 = n[4].f;
7739 GLfloat v2 = n[5].f;
7740 GLint ustride = n[6].i;
7741 GLint vstride = n[7].i;
7742 GLint uorder = n[8].i;
7743 GLint vorder = n[9].i;
7744 CALL_Map2f(ctx->Exec, (target, u1, u2, ustride, uorder,
7745 v1, v2, vstride, vorder,
7746 (GLfloat *) n[10].data));
7747 }
7748 break;
7749 case OPCODE_MAPGRID1:
7750 CALL_MapGrid1f(ctx->Exec, (n[1].i, n[2].f, n[3].f));
7751 break;
7752 case OPCODE_MAPGRID2:
7753 CALL_MapGrid2f(ctx->Exec,
7754 (n[1].i, n[2].f, n[3].f, n[4].i, n[5].f, n[6].f));
7755 break;
7756 case OPCODE_MATRIX_MODE:
7757 CALL_MatrixMode(ctx->Exec, (n[1].e));
7758 break;
7759 case OPCODE_MIN_MAX:
7760 CALL_Minmax(ctx->Exec, (n[1].e, n[2].e, n[3].b));
7761 break;
7762 case OPCODE_MULT_MATRIX:
7763 if (sizeof(Node) == sizeof(GLfloat)) {
7764 CALL_MultMatrixf(ctx->Exec, (&n[1].f));
7765 }
7766 else {
7767 GLfloat m[16];
7768 GLuint i;
7769 for (i = 0; i < 16; i++) {
7770 m[i] = n[1 + i].f;
7771 }
7772 CALL_MultMatrixf(ctx->Exec, (m));
7773 }
7774 break;
7775 case OPCODE_ORTHO:
7776 CALL_Ortho(ctx->Exec,
7777 (n[1].f, n[2].f, n[3].f, n[4].f, n[5].f, n[6].f));
7778 break;
7779 case OPCODE_PASSTHROUGH:
7780 CALL_PassThrough(ctx->Exec, (n[1].f));
7781 break;
7782 case OPCODE_PIXEL_MAP:
7783 CALL_PixelMapfv(ctx->Exec,
7784 (n[1].e, n[2].i, (GLfloat *) n[3].data));
7785 break;
7786 case OPCODE_PIXEL_TRANSFER:
7787 CALL_PixelTransferf(ctx->Exec, (n[1].e, n[2].f));
7788 break;
7789 case OPCODE_PIXEL_ZOOM:
7790 CALL_PixelZoom(ctx->Exec, (n[1].f, n[2].f));
7791 break;
7792 case OPCODE_POINT_SIZE:
7793 CALL_PointSize(ctx->Exec, (n[1].f));
7794 break;
7795 case OPCODE_POINT_PARAMETERS:
7796 {
7797 GLfloat params[3];
7798 params[0] = n[2].f;
7799 params[1] = n[3].f;
7800 params[2] = n[4].f;
7801 CALL_PointParameterfv(ctx->Exec, (n[1].e, params));
7802 }
7803 break;
7804 case OPCODE_POLYGON_MODE:
7805 CALL_PolygonMode(ctx->Exec, (n[1].e, n[2].e));
7806 break;
7807 case OPCODE_POLYGON_STIPPLE:
7808 {
7809 const struct gl_pixelstore_attrib save = ctx->Unpack;
7810 ctx->Unpack = ctx->DefaultPacking;
7811 CALL_PolygonStipple(ctx->Exec, ((GLubyte *) n[1].data));
7812 ctx->Unpack = save; /* restore */
7813 }
7814 break;
7815 case OPCODE_POLYGON_OFFSET:
7816 CALL_PolygonOffset(ctx->Exec, (n[1].f, n[2].f));
7817 break;
7818 case OPCODE_POP_ATTRIB:
7819 CALL_PopAttrib(ctx->Exec, ());
7820 break;
7821 case OPCODE_POP_MATRIX:
7822 CALL_PopMatrix(ctx->Exec, ());
7823 break;
7824 case OPCODE_POP_NAME:
7825 CALL_PopName(ctx->Exec, ());
7826 break;
7827 case OPCODE_PRIORITIZE_TEXTURE:
7828 CALL_PrioritizeTextures(ctx->Exec, (1, &n[1].ui, &n[2].f));
7829 break;
7830 case OPCODE_PUSH_ATTRIB:
7831 CALL_PushAttrib(ctx->Exec, (n[1].bf));
7832 break;
7833 case OPCODE_PUSH_MATRIX:
7834 CALL_PushMatrix(ctx->Exec, ());
7835 break;
7836 case OPCODE_PUSH_NAME:
7837 CALL_PushName(ctx->Exec, (n[1].ui));
7838 break;
7839 case OPCODE_RASTER_POS:
7840 CALL_RasterPos4f(ctx->Exec, (n[1].f, n[2].f, n[3].f, n[4].f));
7841 break;
7842 case OPCODE_READ_BUFFER:
7843 CALL_ReadBuffer(ctx->Exec, (n[1].e));
7844 break;
7845 case OPCODE_RESET_HISTOGRAM:
7846 CALL_ResetHistogram(ctx->Exec, (n[1].e));
7847 break;
7848 case OPCODE_RESET_MIN_MAX:
7849 CALL_ResetMinmax(ctx->Exec, (n[1].e));
7850 break;
7851 case OPCODE_ROTATE:
7852 CALL_Rotatef(ctx->Exec, (n[1].f, n[2].f, n[3].f, n[4].f));
7853 break;
7854 case OPCODE_SCALE:
7855 CALL_Scalef(ctx->Exec, (n[1].f, n[2].f, n[3].f));
7856 break;
7857 case OPCODE_SCISSOR:
7858 CALL_Scissor(ctx->Exec, (n[1].i, n[2].i, n[3].i, n[4].i));
7859 break;
7860 case OPCODE_SHADE_MODEL:
7861 CALL_ShadeModel(ctx->Exec, (n[1].e));
7862 break;
7863 case OPCODE_PROVOKING_VERTEX:
7864 CALL_ProvokingVertex(ctx->Exec, (n[1].e));
7865 break;
7866 case OPCODE_STENCIL_FUNC:
7867 CALL_StencilFunc(ctx->Exec, (n[1].e, n[2].i, n[3].ui));
7868 break;
7869 case OPCODE_STENCIL_MASK:
7870 CALL_StencilMask(ctx->Exec, (n[1].ui));
7871 break;
7872 case OPCODE_STENCIL_OP:
7873 CALL_StencilOp(ctx->Exec, (n[1].e, n[2].e, n[3].e));
7874 break;
7875 case OPCODE_STENCIL_FUNC_SEPARATE:
7876 CALL_StencilFuncSeparate(ctx->Exec,
7877 (n[1].e, n[2].e, n[3].i, n[4].ui));
7878 break;
7879 case OPCODE_STENCIL_MASK_SEPARATE:
7880 CALL_StencilMaskSeparate(ctx->Exec, (n[1].e, n[2].ui));
7881 break;
7882 case OPCODE_STENCIL_OP_SEPARATE:
7883 CALL_StencilOpSeparate(ctx->Exec,
7884 (n[1].e, n[2].e, n[3].e, n[4].e));
7885 break;
7886 case OPCODE_TEXENV:
7887 {
7888 GLfloat params[4];
7889 params[0] = n[3].f;
7890 params[1] = n[4].f;
7891 params[2] = n[5].f;
7892 params[3] = n[6].f;
7893 CALL_TexEnvfv(ctx->Exec, (n[1].e, n[2].e, params));
7894 }
7895 break;
7896 case OPCODE_TEXGEN:
7897 {
7898 GLfloat params[4];
7899 params[0] = n[3].f;
7900 params[1] = n[4].f;
7901 params[2] = n[5].f;
7902 params[3] = n[6].f;
7903 CALL_TexGenfv(ctx->Exec, (n[1].e, n[2].e, params));
7904 }
7905 break;
7906 case OPCODE_TEXPARAMETER:
7907 {
7908 GLfloat params[4];
7909 params[0] = n[3].f;
7910 params[1] = n[4].f;
7911 params[2] = n[5].f;
7912 params[3] = n[6].f;
7913 CALL_TexParameterfv(ctx->Exec, (n[1].e, n[2].e, params));
7914 }
7915 break;
7916 case OPCODE_TEX_IMAGE1D:
7917 {
7918 const struct gl_pixelstore_attrib save = ctx->Unpack;
7919 ctx->Unpack = ctx->DefaultPacking;
7920 CALL_TexImage1D(ctx->Exec, (n[1].e, /* target */
7921 n[2].i, /* level */
7922 n[3].i, /* components */
7923 n[4].i, /* width */
7924 n[5].e, /* border */
7925 n[6].e, /* format */
7926 n[7].e, /* type */
7927 n[8].data));
7928 ctx->Unpack = save; /* restore */
7929 }
7930 break;
7931 case OPCODE_TEX_IMAGE2D:
7932 {
7933 const struct gl_pixelstore_attrib save = ctx->Unpack;
7934 ctx->Unpack = ctx->DefaultPacking;
7935 CALL_TexImage2D(ctx->Exec, (n[1].e, /* target */
7936 n[2].i, /* level */
7937 n[3].i, /* components */
7938 n[4].i, /* width */
7939 n[5].i, /* height */
7940 n[6].e, /* border */
7941 n[7].e, /* format */
7942 n[8].e, /* type */
7943 n[9].data));
7944 ctx->Unpack = save; /* restore */
7945 }
7946 break;
7947 case OPCODE_TEX_IMAGE3D:
7948 {
7949 const struct gl_pixelstore_attrib save = ctx->Unpack;
7950 ctx->Unpack = ctx->DefaultPacking;
7951 CALL_TexImage3D(ctx->Exec, (n[1].e, /* target */
7952 n[2].i, /* level */
7953 n[3].i, /* components */
7954 n[4].i, /* width */
7955 n[5].i, /* height */
7956 n[6].i, /* depth */
7957 n[7].e, /* border */
7958 n[8].e, /* format */
7959 n[9].e, /* type */
7960 n[10].data));
7961 ctx->Unpack = save; /* restore */
7962 }
7963 break;
7964 case OPCODE_TEX_SUB_IMAGE1D:
7965 {
7966 const struct gl_pixelstore_attrib save = ctx->Unpack;
7967 ctx->Unpack = ctx->DefaultPacking;
7968 CALL_TexSubImage1D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7969 n[4].i, n[5].e,
7970 n[6].e, n[7].data));
7971 ctx->Unpack = save; /* restore */
7972 }
7973 break;
7974 case OPCODE_TEX_SUB_IMAGE2D:
7975 {
7976 const struct gl_pixelstore_attrib save = ctx->Unpack;
7977 ctx->Unpack = ctx->DefaultPacking;
7978 CALL_TexSubImage2D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7979 n[4].i, n[5].e,
7980 n[6].i, n[7].e, n[8].e,
7981 n[9].data));
7982 ctx->Unpack = save; /* restore */
7983 }
7984 break;
7985 case OPCODE_TEX_SUB_IMAGE3D:
7986 {
7987 const struct gl_pixelstore_attrib save = ctx->Unpack;
7988 ctx->Unpack = ctx->DefaultPacking;
7989 CALL_TexSubImage3D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7990 n[4].i, n[5].i, n[6].i, n[7].i,
7991 n[8].i, n[9].e, n[10].e,
7992 n[11].data));
7993 ctx->Unpack = save; /* restore */
7994 }
7995 break;
7996 case OPCODE_TRANSLATE:
7997 CALL_Translatef(ctx->Exec, (n[1].f, n[2].f, n[3].f));
7998 break;
7999 case OPCODE_VIEWPORT:
8000 CALL_Viewport(ctx->Exec, (n[1].i, n[2].i,
8001 (GLsizei) n[3].i, (GLsizei) n[4].i));
8002 break;
8003 case OPCODE_WINDOW_POS:
8004 CALL_WindowPos4fMESA(ctx->Exec, (n[1].f, n[2].f, n[3].f, n[4].f));
8005 break;
8006 case OPCODE_ACTIVE_TEXTURE: /* GL_ARB_multitexture */
8007 CALL_ActiveTexture(ctx->Exec, (n[1].e));
8008 break;
8009 case OPCODE_COMPRESSED_TEX_IMAGE_1D: /* GL_ARB_texture_compression */
8010 CALL_CompressedTexImage1D(ctx->Exec, (n[1].e, n[2].i, n[3].e,
8011 n[4].i, n[5].i, n[6].i,
8012 n[7].data));
8013 break;
8014 case OPCODE_COMPRESSED_TEX_IMAGE_2D: /* GL_ARB_texture_compression */
8015 CALL_CompressedTexImage2D(ctx->Exec, (n[1].e, n[2].i, n[3].e,
8016 n[4].i, n[5].i, n[6].i,
8017 n[7].i, n[8].data));
8018 break;
8019 case OPCODE_COMPRESSED_TEX_IMAGE_3D: /* GL_ARB_texture_compression */
8020 CALL_CompressedTexImage3D(ctx->Exec, (n[1].e, n[2].i, n[3].e,
8021 n[4].i, n[5].i, n[6].i,
8022 n[7].i, n[8].i,
8023 n[9].data));
8024 break;
8025 case OPCODE_COMPRESSED_TEX_SUB_IMAGE_1D: /* GL_ARB_texture_compress */
8026 CALL_CompressedTexSubImage1D(ctx->Exec,
8027 (n[1].e, n[2].i, n[3].i, n[4].i,
8028 n[5].e, n[6].i, n[7].data));
8029 break;
8030 case OPCODE_COMPRESSED_TEX_SUB_IMAGE_2D: /* GL_ARB_texture_compress */
8031 CALL_CompressedTexSubImage2D(ctx->Exec,
8032 (n[1].e, n[2].i, n[3].i, n[4].i,
8033 n[5].i, n[6].i, n[7].e, n[8].i,
8034 n[9].data));
8035 break;
8036 case OPCODE_COMPRESSED_TEX_SUB_IMAGE_3D: /* GL_ARB_texture_compress */
8037 CALL_CompressedTexSubImage3D(ctx->Exec,
8038 (n[1].e, n[2].i, n[3].i, n[4].i,
8039 n[5].i, n[6].i, n[7].i, n[8].i,
8040 n[9].e, n[10].i, n[11].data));
8041 break;
8042 case OPCODE_SAMPLE_COVERAGE: /* GL_ARB_multisample */
8043 CALL_SampleCoverage(ctx->Exec, (n[1].f, n[2].b));
8044 break;
8045 case OPCODE_WINDOW_POS_ARB: /* GL_ARB_window_pos */
8046 CALL_WindowPos3f(ctx->Exec, (n[1].f, n[2].f, n[3].f));
8047 break;
8048 case OPCODE_BIND_PROGRAM_NV: /* GL_ARB_vertex_program */
8049 CALL_BindProgramARB(ctx->Exec, (n[1].e, n[2].ui));
8050 break;
8051 case OPCODE_PROGRAM_LOCAL_PARAMETER_ARB:
8052 CALL_ProgramLocalParameter4fARB(ctx->Exec,
8053 (n[1].e, n[2].ui, n[3].f, n[4].f,
8054 n[5].f, n[6].f));
8055 break;
8056 case OPCODE_ACTIVE_STENCIL_FACE_EXT:
8057 CALL_ActiveStencilFaceEXT(ctx->Exec, (n[1].e));
8058 break;
8059 case OPCODE_DEPTH_BOUNDS_EXT:
8060 CALL_DepthBoundsEXT(ctx->Exec, (n[1].f, n[2].f));
8061 break;
8062 case OPCODE_PROGRAM_STRING_ARB:
8063 CALL_ProgramStringARB(ctx->Exec,
8064 (n[1].e, n[2].e, n[3].i, n[4].data));
8065 break;
8066 case OPCODE_PROGRAM_ENV_PARAMETER_ARB:
8067 CALL_ProgramEnvParameter4fARB(ctx->Exec, (n[1].e, n[2].ui, n[3].f,
8068 n[4].f, n[5].f,
8069 n[6].f));
8070 break;
8071 case OPCODE_BEGIN_QUERY_ARB:
8072 CALL_BeginQuery(ctx->Exec, (n[1].e, n[2].ui));
8073 break;
8074 case OPCODE_END_QUERY_ARB:
8075 CALL_EndQuery(ctx->Exec, (n[1].e));
8076 break;
8077 case OPCODE_QUERY_COUNTER:
8078 CALL_QueryCounter(ctx->Exec, (n[1].ui, n[2].e));
8079 break;
8080 case OPCODE_BEGIN_QUERY_INDEXED:
8081 CALL_BeginQueryIndexed(ctx->Exec, (n[1].e, n[2].ui, n[3].ui));
8082 break;
8083 case OPCODE_END_QUERY_INDEXED:
8084 CALL_EndQueryIndexed(ctx->Exec, (n[1].e, n[2].ui));
8085 break;
8086 case OPCODE_DRAW_BUFFERS_ARB:
8087 {
8088 GLenum buffers[MAX_DRAW_BUFFERS];
8089 GLint i, count = MIN2(n[1].i, MAX_DRAW_BUFFERS);
8090 for (i = 0; i < count; i++)
8091 buffers[i] = n[2 + i].e;
8092 CALL_DrawBuffers(ctx->Exec, (n[1].i, buffers));
8093 }
8094 break;
8095 case OPCODE_BLIT_FRAMEBUFFER:
8096 CALL_BlitFramebuffer(ctx->Exec, (n[1].i, n[2].i, n[3].i, n[4].i,
8097 n[5].i, n[6].i, n[7].i, n[8].i,
8098 n[9].i, n[10].e));
8099 break;
8100 case OPCODE_USE_PROGRAM:
8101 CALL_UseProgram(ctx->Exec, (n[1].ui));
8102 break;
8103 case OPCODE_USE_SHADER_PROGRAM_EXT:
8104 CALL_UseShaderProgramEXT(ctx->Exec, (n[1].ui, n[2].ui));
8105 break;
8106 case OPCODE_ACTIVE_PROGRAM_EXT:
8107 CALL_ActiveProgramEXT(ctx->Exec, (n[1].ui));
8108 break;
8109 case OPCODE_UNIFORM_1F:
8110 CALL_Uniform1f(ctx->Exec, (n[1].i, n[2].f));
8111 break;
8112 case OPCODE_UNIFORM_2F:
8113 CALL_Uniform2f(ctx->Exec, (n[1].i, n[2].f, n[3].f));
8114 break;
8115 case OPCODE_UNIFORM_3F:
8116 CALL_Uniform3f(ctx->Exec, (n[1].i, n[2].f, n[3].f, n[4].f));
8117 break;
8118 case OPCODE_UNIFORM_4F:
8119 CALL_Uniform4f(ctx->Exec,
8120 (n[1].i, n[2].f, n[3].f, n[4].f, n[5].f));
8121 break;
8122 case OPCODE_UNIFORM_1FV:
8123 CALL_Uniform1fv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8124 break;
8125 case OPCODE_UNIFORM_2FV:
8126 CALL_Uniform2fv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8127 break;
8128 case OPCODE_UNIFORM_3FV:
8129 CALL_Uniform3fv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8130 break;
8131 case OPCODE_UNIFORM_4FV:
8132 CALL_Uniform4fv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8133 break;
8134 case OPCODE_UNIFORM_1I:
8135 CALL_Uniform1i(ctx->Exec, (n[1].i, n[2].i));
8136 break;
8137 case OPCODE_UNIFORM_2I:
8138 CALL_Uniform2i(ctx->Exec, (n[1].i, n[2].i, n[3].i));
8139 break;
8140 case OPCODE_UNIFORM_3I:
8141 CALL_Uniform3i(ctx->Exec, (n[1].i, n[2].i, n[3].i, n[4].i));
8142 break;
8143 case OPCODE_UNIFORM_4I:
8144 CALL_Uniform4i(ctx->Exec,
8145 (n[1].i, n[2].i, n[3].i, n[4].i, n[5].i));
8146 break;
8147 case OPCODE_UNIFORM_1IV:
8148 CALL_Uniform1iv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8149 break;
8150 case OPCODE_UNIFORM_2IV:
8151 CALL_Uniform2iv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8152 break;
8153 case OPCODE_UNIFORM_3IV:
8154 CALL_Uniform3iv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8155 break;
8156 case OPCODE_UNIFORM_4IV:
8157 CALL_Uniform4iv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8158 break;
8159 case OPCODE_UNIFORM_1UI:
8160 /*CALL_Uniform1uiARB(ctx->Exec, (n[1].i, n[2].i));*/
8161 break;
8162 case OPCODE_UNIFORM_2UI:
8163 /*CALL_Uniform2uiARB(ctx->Exec, (n[1].i, n[2].i, n[3].i));*/
8164 break;
8165 case OPCODE_UNIFORM_3UI:
8166 /*CALL_Uniform3uiARB(ctx->Exec, (n[1].i, n[2].i, n[3].i, n[4].i));*/
8167 break;
8168 case OPCODE_UNIFORM_4UI:
8169 /*CALL_Uniform4uiARB(ctx->Exec,
8170 (n[1].i, n[2].i, n[3].i, n[4].i, n[5].i));
8171 */
8172 break;
8173 case OPCODE_UNIFORM_1UIV:
8174 /*CALL_Uniform1uivARB(ctx->Exec, (n[1].i, n[2].i, n[3].data));*/
8175 break;
8176 case OPCODE_UNIFORM_2UIV:
8177 /*CALL_Uniform2uivARB(ctx->Exec, (n[1].i, n[2].i, n[3].data));*/
8178 break;
8179 case OPCODE_UNIFORM_3UIV:
8180 /*CALL_Uniform3uivARB(ctx->Exec, (n[1].i, n[2].i, n[3].data));*/
8181 break;
8182 case OPCODE_UNIFORM_4UIV:
8183 /*CALL_Uniform4uivARB(ctx->Exec, (n[1].i, n[2].i, n[3].data));*/
8184 break;
8185 case OPCODE_UNIFORM_MATRIX22:
8186 CALL_UniformMatrix2fv(ctx->Exec,
8187 (n[1].i, n[2].i, n[3].b, n[4].data));
8188 break;
8189 case OPCODE_UNIFORM_MATRIX33:
8190 CALL_UniformMatrix3fv(ctx->Exec,
8191 (n[1].i, n[2].i, n[3].b, n[4].data));
8192 break;
8193 case OPCODE_UNIFORM_MATRIX44:
8194 CALL_UniformMatrix4fv(ctx->Exec,
8195 (n[1].i, n[2].i, n[3].b, n[4].data));
8196 break;
8197 case OPCODE_UNIFORM_MATRIX23:
8198 CALL_UniformMatrix2x3fv(ctx->Exec,
8199 (n[1].i, n[2].i, n[3].b, n[4].data));
8200 break;
8201 case OPCODE_UNIFORM_MATRIX32:
8202 CALL_UniformMatrix3x2fv(ctx->Exec,
8203 (n[1].i, n[2].i, n[3].b, n[4].data));
8204 break;
8205 case OPCODE_UNIFORM_MATRIX24:
8206 CALL_UniformMatrix2x4fv(ctx->Exec,
8207 (n[1].i, n[2].i, n[3].b, n[4].data));
8208 break;
8209 case OPCODE_UNIFORM_MATRIX42:
8210 CALL_UniformMatrix4x2fv(ctx->Exec,
8211 (n[1].i, n[2].i, n[3].b, n[4].data));
8212 break;
8213 case OPCODE_UNIFORM_MATRIX34:
8214 CALL_UniformMatrix3x4fv(ctx->Exec,
8215 (n[1].i, n[2].i, n[3].b, n[4].data));
8216 break;
8217 case OPCODE_UNIFORM_MATRIX43:
8218 CALL_UniformMatrix4x3fv(ctx->Exec,
8219 (n[1].i, n[2].i, n[3].b, n[4].data));
8220 break;
8221
8222 case OPCODE_CLAMP_COLOR:
8223 CALL_ClampColor(ctx->Exec, (n[1].e, n[2].e));
8224 break;
8225
8226 case OPCODE_TEX_BUMP_PARAMETER_ATI:
8227 {
8228 GLfloat values[4];
8229 GLuint i, pname = n[1].ui;
8230
8231 for (i = 0; i < 4; i++)
8232 values[i] = n[1 + i].f;
8233 CALL_TexBumpParameterfvATI(ctx->Exec, (pname, values));
8234 }
8235 break;
8236 case OPCODE_BIND_FRAGMENT_SHADER_ATI:
8237 CALL_BindFragmentShaderATI(ctx->Exec, (n[1].i));
8238 break;
8239 case OPCODE_SET_FRAGMENT_SHADER_CONSTANTS_ATI:
8240 {
8241 GLfloat values[4];
8242 GLuint i, dst = n[1].ui;
8243
8244 for (i = 0; i < 4; i++)
8245 values[i] = n[1 + i].f;
8246 CALL_SetFragmentShaderConstantATI(ctx->Exec, (dst, values));
8247 }
8248 break;
8249 case OPCODE_ATTR_1F_NV:
8250 CALL_VertexAttrib1fNV(ctx->Exec, (n[1].e, n[2].f));
8251 break;
8252 case OPCODE_ATTR_2F_NV:
8253 /* Really shouldn't have to do this - the Node structure
8254 * is convenient, but it would be better to store the data
8255 * packed appropriately so that it can be sent directly
8256 * on. With x86_64 becoming common, this will start to
8257 * matter more.
8258 */
8259 if (sizeof(Node) == sizeof(GLfloat))
8260 CALL_VertexAttrib2fvNV(ctx->Exec, (n[1].e, &n[2].f));
8261 else
8262 CALL_VertexAttrib2fNV(ctx->Exec, (n[1].e, n[2].f, n[3].f));
8263 break;
8264 case OPCODE_ATTR_3F_NV:
8265 if (sizeof(Node) == sizeof(GLfloat))
8266 CALL_VertexAttrib3fvNV(ctx->Exec, (n[1].e, &n[2].f));
8267 else
8268 CALL_VertexAttrib3fNV(ctx->Exec, (n[1].e, n[2].f, n[3].f,
8269 n[4].f));
8270 break;
8271 case OPCODE_ATTR_4F_NV:
8272 if (sizeof(Node) == sizeof(GLfloat))
8273 CALL_VertexAttrib4fvNV(ctx->Exec, (n[1].e, &n[2].f));
8274 else
8275 CALL_VertexAttrib4fNV(ctx->Exec, (n[1].e, n[2].f, n[3].f,
8276 n[4].f, n[5].f));
8277 break;
8278 case OPCODE_ATTR_1F_ARB:
8279 CALL_VertexAttrib1fARB(ctx->Exec, (n[1].e, n[2].f));
8280 break;
8281 case OPCODE_ATTR_2F_ARB:
8282 /* Really shouldn't have to do this - the Node structure
8283 * is convenient, but it would be better to store the data
8284 * packed appropriately so that it can be sent directly
8285 * on. With x86_64 becoming common, this will start to
8286 * matter more.
8287 */
8288 if (sizeof(Node) == sizeof(GLfloat))
8289 CALL_VertexAttrib2fvARB(ctx->Exec, (n[1].e, &n[2].f));
8290 else
8291 CALL_VertexAttrib2fARB(ctx->Exec, (n[1].e, n[2].f, n[3].f));
8292 break;
8293 case OPCODE_ATTR_3F_ARB:
8294 if (sizeof(Node) == sizeof(GLfloat))
8295 CALL_VertexAttrib3fvARB(ctx->Exec, (n[1].e, &n[2].f));
8296 else
8297 CALL_VertexAttrib3fARB(ctx->Exec, (n[1].e, n[2].f, n[3].f,
8298 n[4].f));
8299 break;
8300 case OPCODE_ATTR_4F_ARB:
8301 if (sizeof(Node) == sizeof(GLfloat))
8302 CALL_VertexAttrib4fvARB(ctx->Exec, (n[1].e, &n[2].f));
8303 else
8304 CALL_VertexAttrib4fARB(ctx->Exec, (n[1].e, n[2].f, n[3].f,
8305 n[4].f, n[5].f));
8306 break;
8307 case OPCODE_MATERIAL:
8308 if (sizeof(Node) == sizeof(GLfloat))
8309 CALL_Materialfv(ctx->Exec, (n[1].e, n[2].e, &n[3].f));
8310 else {
8311 GLfloat f[4];
8312 f[0] = n[3].f;
8313 f[1] = n[4].f;
8314 f[2] = n[5].f;
8315 f[3] = n[6].f;
8316 CALL_Materialfv(ctx->Exec, (n[1].e, n[2].e, f));
8317 }
8318 break;
8319 case OPCODE_BEGIN:
8320 CALL_Begin(ctx->Exec, (n[1].e));
8321 break;
8322 case OPCODE_END:
8323 CALL_End(ctx->Exec, ());
8324 break;
8325 case OPCODE_RECTF:
8326 CALL_Rectf(ctx->Exec, (n[1].f, n[2].f, n[3].f, n[4].f));
8327 break;
8328 case OPCODE_EVAL_C1:
8329 CALL_EvalCoord1f(ctx->Exec, (n[1].f));
8330 break;
8331 case OPCODE_EVAL_C2:
8332 CALL_EvalCoord2f(ctx->Exec, (n[1].f, n[2].f));
8333 break;
8334 case OPCODE_EVAL_P1:
8335 CALL_EvalPoint1(ctx->Exec, (n[1].i));
8336 break;
8337 case OPCODE_EVAL_P2:
8338 CALL_EvalPoint2(ctx->Exec, (n[1].i, n[2].i));
8339 break;
8340
8341 /* GL_EXT_texture_integer */
8342 case OPCODE_CLEARCOLOR_I:
8343 CALL_ClearColorIiEXT(ctx->Exec, (n[1].i, n[2].i, n[3].i, n[4].i));
8344 break;
8345 case OPCODE_CLEARCOLOR_UI:
8346 CALL_ClearColorIuiEXT(ctx->Exec,
8347 (n[1].ui, n[2].ui, n[3].ui, n[4].ui));
8348 break;
8349 case OPCODE_TEXPARAMETER_I:
8350 {
8351 GLint params[4];
8352 params[0] = n[3].i;
8353 params[1] = n[4].i;
8354 params[2] = n[5].i;
8355 params[3] = n[6].i;
8356 CALL_TexParameterIiv(ctx->Exec, (n[1].e, n[2].e, params));
8357 }
8358 break;
8359 case OPCODE_TEXPARAMETER_UI:
8360 {
8361 GLuint params[4];
8362 params[0] = n[3].ui;
8363 params[1] = n[4].ui;
8364 params[2] = n[5].ui;
8365 params[3] = n[6].ui;
8366 CALL_TexParameterIuiv(ctx->Exec, (n[1].e, n[2].e, params));
8367 }
8368 break;
8369
8370 case OPCODE_VERTEX_ATTRIB_DIVISOR:
8371 /* GL_ARB_instanced_arrays */
8372 CALL_VertexAttribDivisor(ctx->Exec, (n[1].ui, n[2].ui));
8373 break;
8374
8375 case OPCODE_TEXTURE_BARRIER_NV:
8376 CALL_TextureBarrierNV(ctx->Exec, ());
8377 break;
8378
8379 /* GL_EXT/ARB_transform_feedback */
8380 case OPCODE_BEGIN_TRANSFORM_FEEDBACK:
8381 CALL_BeginTransformFeedback(ctx->Exec, (n[1].e));
8382 break;
8383 case OPCODE_END_TRANSFORM_FEEDBACK:
8384 CALL_EndTransformFeedback(ctx->Exec, ());
8385 break;
8386 case OPCODE_BIND_TRANSFORM_FEEDBACK:
8387 CALL_BindTransformFeedback(ctx->Exec, (n[1].e, n[2].ui));
8388 break;
8389 case OPCODE_PAUSE_TRANSFORM_FEEDBACK:
8390 CALL_PauseTransformFeedback(ctx->Exec, ());
8391 break;
8392 case OPCODE_RESUME_TRANSFORM_FEEDBACK:
8393 CALL_ResumeTransformFeedback(ctx->Exec, ());
8394 break;
8395 case OPCODE_DRAW_TRANSFORM_FEEDBACK:
8396 CALL_DrawTransformFeedback(ctx->Exec, (n[1].e, n[2].ui));
8397 break;
8398 case OPCODE_DRAW_TRANSFORM_FEEDBACK_STREAM:
8399 CALL_DrawTransformFeedbackStream(ctx->Exec,
8400 (n[1].e, n[2].ui, n[3].ui));
8401 break;
8402 case OPCODE_DRAW_TRANSFORM_FEEDBACK_INSTANCED:
8403 CALL_DrawTransformFeedbackInstanced(ctx->Exec,
8404 (n[1].e, n[2].ui, n[3].si));
8405 break;
8406 case OPCODE_DRAW_TRANSFORM_FEEDBACK_STREAM_INSTANCED:
8407 CALL_DrawTransformFeedbackStreamInstanced(ctx->Exec,
8408 (n[1].e, n[2].ui, n[3].ui, n[4].si));
8409 break;
8410
8411
8412 case OPCODE_BIND_SAMPLER:
8413 CALL_BindSampler(ctx->Exec, (n[1].ui, n[2].ui));
8414 break;
8415 case OPCODE_SAMPLER_PARAMETERIV:
8416 {
8417 GLint params[4];
8418 params[0] = n[3].i;
8419 params[1] = n[4].i;
8420 params[2] = n[5].i;
8421 params[3] = n[6].i;
8422 CALL_SamplerParameteriv(ctx->Exec, (n[1].ui, n[2].e, params));
8423 }
8424 break;
8425 case OPCODE_SAMPLER_PARAMETERFV:
8426 {
8427 GLfloat params[4];
8428 params[0] = n[3].f;
8429 params[1] = n[4].f;
8430 params[2] = n[5].f;
8431 params[3] = n[6].f;
8432 CALL_SamplerParameterfv(ctx->Exec, (n[1].ui, n[2].e, params));
8433 }
8434 break;
8435 case OPCODE_SAMPLER_PARAMETERIIV:
8436 {
8437 GLint params[4];
8438 params[0] = n[3].i;
8439 params[1] = n[4].i;
8440 params[2] = n[5].i;
8441 params[3] = n[6].i;
8442 CALL_SamplerParameterIiv(ctx->Exec, (n[1].ui, n[2].e, params));
8443 }
8444 break;
8445 case OPCODE_SAMPLER_PARAMETERUIV:
8446 {
8447 GLuint params[4];
8448 params[0] = n[3].ui;
8449 params[1] = n[4].ui;
8450 params[2] = n[5].ui;
8451 params[3] = n[6].ui;
8452 CALL_SamplerParameterIuiv(ctx->Exec, (n[1].ui, n[2].e, params));
8453 }
8454 break;
8455
8456 /* GL_ARB_geometry_shader4 */
8457 case OPCODE_PROGRAM_PARAMETERI:
8458 CALL_ProgramParameteri(ctx->Exec, (n[1].ui, n[2].e, n[3].i));
8459 break;
8460 case OPCODE_FRAMEBUFFER_TEXTURE:
8461 CALL_FramebufferTexture(ctx->Exec, (n[1].e, n[2].e,
8462 n[3].ui, n[4].i));
8463 break;
8464 case OPCODE_FRAMEBUFFER_TEXTURE_FACE:
8465 CALL_FramebufferTextureFaceARB(ctx->Exec, (n[1].e, n[2].e,
8466 n[3].ui, n[4].i, n[5].e));
8467 break;
8468
8469 /* GL_ARB_sync */
8470 case OPCODE_WAIT_SYNC:
8471 {
8472 union uint64_pair p;
8473 p.uint32[0] = n[3].ui;
8474 p.uint32[1] = n[4].ui;
8475 CALL_WaitSync(ctx->Exec, (n[1].data, n[2].bf, p.uint64));
8476 }
8477 break;
8478
8479 /* GL_NV_conditional_render */
8480 case OPCODE_BEGIN_CONDITIONAL_RENDER:
8481 CALL_BeginConditionalRender(ctx->Exec, (n[1].i, n[2].e));
8482 break;
8483 case OPCODE_END_CONDITIONAL_RENDER:
8484 CALL_EndConditionalRender(ctx->Exec, ());
8485 break;
8486
8487 case OPCODE_UNIFORM_BLOCK_BINDING:
8488 CALL_UniformBlockBinding(ctx->Exec, (n[1].ui, n[2].ui, n[3].ui));
8489 break;
8490
8491 case OPCODE_CONTINUE:
8492 n = (Node *) n[1].next;
8493 break;
8494 case OPCODE_END_OF_LIST:
8495 done = GL_TRUE;
8496 break;
8497 default:
8498 {
8499 char msg[1000];
8500 _mesa_snprintf(msg, sizeof(msg), "Error in execute_list: opcode=%d",
8501 (int) opcode);
8502 _mesa_problem(ctx, "%s", msg);
8503 }
8504 done = GL_TRUE;
8505 }
8506
8507 /* increment n to point to next compiled command */
8508 if (opcode != OPCODE_CONTINUE) {
8509 n += InstSize[opcode];
8510 }
8511 }
8512 }
8513
8514 if (ctx->Driver.EndCallList)
8515 ctx->Driver.EndCallList(ctx);
8516
8517 ctx->ListState.CallDepth--;
8518 }
8519
8520
8521
8522 /**********************************************************************/
8523 /* GL functions */
8524 /**********************************************************************/
8525
8526 /**
8527 * Test if a display list number is valid.
8528 */
8529 GLboolean GLAPIENTRY
8530 _mesa_IsList(GLuint list)
8531 {
8532 GET_CURRENT_CONTEXT(ctx);
8533 FLUSH_VERTICES(ctx, 0); /* must be called before assert */
8534 ASSERT_OUTSIDE_BEGIN_END_WITH_RETVAL(ctx, GL_FALSE);
8535 return islist(ctx, list);
8536 }
8537
8538
8539 /**
8540 * Delete a sequence of consecutive display lists.
8541 */
8542 void GLAPIENTRY
8543 _mesa_DeleteLists(GLuint list, GLsizei range)
8544 {
8545 GET_CURRENT_CONTEXT(ctx);
8546 GLuint i;
8547 FLUSH_VERTICES(ctx, 0); /* must be called before assert */
8548 ASSERT_OUTSIDE_BEGIN_END(ctx);
8549
8550 if (range < 0) {
8551 _mesa_error(ctx, GL_INVALID_VALUE, "glDeleteLists");
8552 return;
8553 }
8554 for (i = list; i < list + range; i++) {
8555 destroy_list(ctx, i);
8556 }
8557 }
8558
8559
8560 /**
8561 * Return a display list number, n, such that lists n through n+range-1
8562 * are free.
8563 */
8564 GLuint GLAPIENTRY
8565 _mesa_GenLists(GLsizei range)
8566 {
8567 GET_CURRENT_CONTEXT(ctx);
8568 GLuint base;
8569 FLUSH_VERTICES(ctx, 0); /* must be called before assert */
8570 ASSERT_OUTSIDE_BEGIN_END_WITH_RETVAL(ctx, 0);
8571
8572 if (range < 0) {
8573 _mesa_error(ctx, GL_INVALID_VALUE, "glGenLists");
8574 return 0;
8575 }
8576 if (range == 0) {
8577 return 0;
8578 }
8579
8580 /*
8581 * Make this an atomic operation
8582 */
8583 _glthread_LOCK_MUTEX(ctx->Shared->Mutex);
8584
8585 base = _mesa_HashFindFreeKeyBlock(ctx->Shared->DisplayList, range);
8586 if (base) {
8587 /* reserve the list IDs by with empty/dummy lists */
8588 GLint i;
8589 for (i = 0; i < range; i++) {
8590 _mesa_HashInsert(ctx->Shared->DisplayList, base + i,
8591 make_list(base + i, 1));
8592 }
8593 }
8594
8595 _glthread_UNLOCK_MUTEX(ctx->Shared->Mutex);
8596
8597 return base;
8598 }
8599
8600
8601 /**
8602 * Begin a new display list.
8603 */
8604 void GLAPIENTRY
8605 _mesa_NewList(GLuint name, GLenum mode)
8606 {
8607 GET_CURRENT_CONTEXT(ctx);
8608
8609 FLUSH_CURRENT(ctx, 0); /* must be called before assert */
8610 ASSERT_OUTSIDE_BEGIN_END(ctx);
8611
8612 if (MESA_VERBOSE & VERBOSE_API)
8613 _mesa_debug(ctx, "glNewList %u %s\n", name,
8614 _mesa_lookup_enum_by_nr(mode));
8615
8616 if (name == 0) {
8617 _mesa_error(ctx, GL_INVALID_VALUE, "glNewList");
8618 return;
8619 }
8620
8621 if (mode != GL_COMPILE && mode != GL_COMPILE_AND_EXECUTE) {
8622 _mesa_error(ctx, GL_INVALID_ENUM, "glNewList");
8623 return;
8624 }
8625
8626 if (ctx->ListState.CurrentList) {
8627 /* already compiling a display list */
8628 _mesa_error(ctx, GL_INVALID_OPERATION, "glNewList");
8629 return;
8630 }
8631
8632 ctx->CompileFlag = GL_TRUE;
8633 ctx->ExecuteFlag = (mode == GL_COMPILE_AND_EXECUTE);
8634
8635 /* Reset acumulated list state:
8636 */
8637 invalidate_saved_current_state( ctx );
8638
8639 /* Allocate new display list */
8640 ctx->ListState.CurrentList = make_list(name, BLOCK_SIZE);
8641 ctx->ListState.CurrentBlock = ctx->ListState.CurrentList->Head;
8642 ctx->ListState.CurrentPos = 0;
8643
8644 ctx->Driver.NewList(ctx, name, mode);
8645
8646 ctx->CurrentDispatch = ctx->Save;
8647 _glapi_set_dispatch(ctx->CurrentDispatch);
8648 }
8649
8650
8651 /**
8652 * End definition of current display list.
8653 */
8654 void GLAPIENTRY
8655 _mesa_EndList(void)
8656 {
8657 GET_CURRENT_CONTEXT(ctx);
8658 SAVE_FLUSH_VERTICES(ctx);
8659 FLUSH_VERTICES(ctx, 0);
8660
8661 if (MESA_VERBOSE & VERBOSE_API)
8662 _mesa_debug(ctx, "glEndList\n");
8663
8664 /* Check that a list is under construction */
8665 if (!ctx->ListState.CurrentList) {
8666 _mesa_error(ctx, GL_INVALID_OPERATION, "glEndList");
8667 return;
8668 }
8669
8670 /* Call before emitting END_OF_LIST, in case the driver wants to
8671 * emit opcodes itself.
8672 */
8673 ctx->Driver.EndList(ctx);
8674
8675 (void) alloc_instruction(ctx, OPCODE_END_OF_LIST, 0);
8676
8677 /* Destroy old list, if any */
8678 destroy_list(ctx, ctx->ListState.CurrentList->Name);
8679
8680 /* Install the new list */
8681 _mesa_HashInsert(ctx->Shared->DisplayList,
8682 ctx->ListState.CurrentList->Name,
8683 ctx->ListState.CurrentList);
8684
8685
8686 if (MESA_VERBOSE & VERBOSE_DISPLAY_LIST)
8687 mesa_print_display_list(ctx->ListState.CurrentList->Name);
8688
8689 ctx->ListState.CurrentList = NULL;
8690 ctx->ExecuteFlag = GL_TRUE;
8691 ctx->CompileFlag = GL_FALSE;
8692
8693 ctx->CurrentDispatch = ctx->Exec;
8694 _glapi_set_dispatch(ctx->CurrentDispatch);
8695 }
8696
8697
8698 void GLAPIENTRY
8699 _mesa_CallList(GLuint list)
8700 {
8701 GLboolean save_compile_flag;
8702 GET_CURRENT_CONTEXT(ctx);
8703 FLUSH_CURRENT(ctx, 0);
8704
8705 if (MESA_VERBOSE & VERBOSE_API)
8706 _mesa_debug(ctx, "glCallList %d\n", list);
8707
8708 if (list == 0) {
8709 _mesa_error(ctx, GL_INVALID_VALUE, "glCallList(list==0)");
8710 return;
8711 }
8712
8713 if (0)
8714 mesa_print_display_list( list );
8715
8716 /* VERY IMPORTANT: Save the CompileFlag status, turn it off,
8717 * execute the display list, and restore the CompileFlag.
8718 */
8719 save_compile_flag = ctx->CompileFlag;
8720 if (save_compile_flag) {
8721 ctx->CompileFlag = GL_FALSE;
8722 }
8723
8724 execute_list(ctx, list);
8725 ctx->CompileFlag = save_compile_flag;
8726
8727 /* also restore API function pointers to point to "save" versions */
8728 if (save_compile_flag) {
8729 ctx->CurrentDispatch = ctx->Save;
8730 _glapi_set_dispatch(ctx->CurrentDispatch);
8731 }
8732 }
8733
8734
8735 /**
8736 * Execute glCallLists: call multiple display lists.
8737 */
8738 void GLAPIENTRY
8739 _mesa_CallLists(GLsizei n, GLenum type, const GLvoid * lists)
8740 {
8741 GET_CURRENT_CONTEXT(ctx);
8742 GLint i;
8743 GLboolean save_compile_flag;
8744
8745 if (MESA_VERBOSE & VERBOSE_API)
8746 _mesa_debug(ctx, "glCallLists %d\n", n);
8747
8748 switch (type) {
8749 case GL_BYTE:
8750 case GL_UNSIGNED_BYTE:
8751 case GL_SHORT:
8752 case GL_UNSIGNED_SHORT:
8753 case GL_INT:
8754 case GL_UNSIGNED_INT:
8755 case GL_FLOAT:
8756 case GL_2_BYTES:
8757 case GL_3_BYTES:
8758 case GL_4_BYTES:
8759 /* OK */
8760 break;
8761 default:
8762 _mesa_error(ctx, GL_INVALID_ENUM, "glCallLists(type)");
8763 return;
8764 }
8765
8766 /* Save the CompileFlag status, turn it off, execute display list,
8767 * and restore the CompileFlag.
8768 */
8769 save_compile_flag = ctx->CompileFlag;
8770 ctx->CompileFlag = GL_FALSE;
8771
8772 for (i = 0; i < n; i++) {
8773 GLuint list = (GLuint) (ctx->List.ListBase + translate_id(i, type, lists));
8774 execute_list(ctx, list);
8775 }
8776
8777 ctx->CompileFlag = save_compile_flag;
8778
8779 /* also restore API function pointers to point to "save" versions */
8780 if (save_compile_flag) {
8781 ctx->CurrentDispatch = ctx->Save;
8782 _glapi_set_dispatch(ctx->CurrentDispatch);
8783 }
8784 }
8785
8786
8787 /**
8788 * Set the offset added to list numbers in glCallLists.
8789 */
8790 void GLAPIENTRY
8791 _mesa_ListBase(GLuint base)
8792 {
8793 GET_CURRENT_CONTEXT(ctx);
8794 FLUSH_VERTICES(ctx, 0); /* must be called before assert */
8795 ASSERT_OUTSIDE_BEGIN_END(ctx);
8796 ctx->List.ListBase = base;
8797 }
8798
8799 /**
8800 * Setup the given dispatch table to point to Mesa's display list
8801 * building functions.
8802 *
8803 * This does not include any of the tnl functions - they are
8804 * initialized from _mesa_init_api_defaults and from the active vtxfmt
8805 * struct.
8806 */
8807 void
8808 _mesa_initialize_save_table(const struct gl_context *ctx)
8809 {
8810 struct _glapi_table *table = ctx->Save;
8811 int numEntries = MAX2(_gloffset_COUNT, _glapi_get_dispatch_table_size());
8812
8813 /* Initially populate the dispatch table with the contents of the
8814 * normal-execution dispatch table. This lets us skip populating functions
8815 * that should be called directly instead of compiled into display lists.
8816 */
8817 memcpy(table, ctx->Exec, numEntries * sizeof(_glapi_proc));
8818
8819 _mesa_loopback_init_api_table(ctx, table);
8820
8821 /* GL 1.0 */
8822 SET_Accum(table, save_Accum);
8823 SET_AlphaFunc(table, save_AlphaFunc);
8824 SET_Bitmap(table, save_Bitmap);
8825 SET_BlendFunc(table, save_BlendFunc);
8826 SET_CallList(table, save_CallList);
8827 SET_CallLists(table, save_CallLists);
8828 SET_Clear(table, save_Clear);
8829 SET_ClearAccum(table, save_ClearAccum);
8830 SET_ClearColor(table, save_ClearColor);
8831 SET_ClearDepth(table, save_ClearDepth);
8832 SET_ClearIndex(table, save_ClearIndex);
8833 SET_ClearStencil(table, save_ClearStencil);
8834 SET_ClipPlane(table, save_ClipPlane);
8835 SET_ColorMask(table, save_ColorMask);
8836 SET_ColorMaski(table, save_ColorMaskIndexed);
8837 SET_ColorMaterial(table, save_ColorMaterial);
8838 SET_CopyPixels(table, save_CopyPixels);
8839 SET_CullFace(table, save_CullFace);
8840 SET_DepthFunc(table, save_DepthFunc);
8841 SET_DepthMask(table, save_DepthMask);
8842 SET_DepthRange(table, save_DepthRange);
8843 SET_Disable(table, save_Disable);
8844 SET_Disablei(table, save_DisableIndexed);
8845 SET_DrawBuffer(table, save_DrawBuffer);
8846 SET_DrawPixels(table, save_DrawPixels);
8847 SET_Enable(table, save_Enable);
8848 SET_Enablei(table, save_EnableIndexed);
8849 SET_EvalMesh1(table, save_EvalMesh1);
8850 SET_EvalMesh2(table, save_EvalMesh2);
8851 SET_Fogf(table, save_Fogf);
8852 SET_Fogfv(table, save_Fogfv);
8853 SET_Fogi(table, save_Fogi);
8854 SET_Fogiv(table, save_Fogiv);
8855 SET_FrontFace(table, save_FrontFace);
8856 SET_Frustum(table, save_Frustum);
8857 SET_Hint(table, save_Hint);
8858 SET_IndexMask(table, save_IndexMask);
8859 SET_InitNames(table, save_InitNames);
8860 SET_LightModelf(table, save_LightModelf);
8861 SET_LightModelfv(table, save_LightModelfv);
8862 SET_LightModeli(table, save_LightModeli);
8863 SET_LightModeliv(table, save_LightModeliv);
8864 SET_Lightf(table, save_Lightf);
8865 SET_Lightfv(table, save_Lightfv);
8866 SET_Lighti(table, save_Lighti);
8867 SET_Lightiv(table, save_Lightiv);
8868 SET_LineStipple(table, save_LineStipple);
8869 SET_LineWidth(table, save_LineWidth);
8870 SET_ListBase(table, save_ListBase);
8871 SET_LoadIdentity(table, save_LoadIdentity);
8872 SET_LoadMatrixd(table, save_LoadMatrixd);
8873 SET_LoadMatrixf(table, save_LoadMatrixf);
8874 SET_LoadName(table, save_LoadName);
8875 SET_LogicOp(table, save_LogicOp);
8876 SET_Map1d(table, save_Map1d);
8877 SET_Map1f(table, save_Map1f);
8878 SET_Map2d(table, save_Map2d);
8879 SET_Map2f(table, save_Map2f);
8880 SET_MapGrid1d(table, save_MapGrid1d);
8881 SET_MapGrid1f(table, save_MapGrid1f);
8882 SET_MapGrid2d(table, save_MapGrid2d);
8883 SET_MapGrid2f(table, save_MapGrid2f);
8884 SET_MatrixMode(table, save_MatrixMode);
8885 SET_MultMatrixd(table, save_MultMatrixd);
8886 SET_MultMatrixf(table, save_MultMatrixf);
8887 SET_NewList(table, save_NewList);
8888 SET_Ortho(table, save_Ortho);
8889 SET_PassThrough(table, save_PassThrough);
8890 SET_PixelMapfv(table, save_PixelMapfv);
8891 SET_PixelMapuiv(table, save_PixelMapuiv);
8892 SET_PixelMapusv(table, save_PixelMapusv);
8893 SET_PixelTransferf(table, save_PixelTransferf);
8894 SET_PixelTransferi(table, save_PixelTransferi);
8895 SET_PixelZoom(table, save_PixelZoom);
8896 SET_PointSize(table, save_PointSize);
8897 SET_PolygonMode(table, save_PolygonMode);
8898 SET_PolygonOffset(table, save_PolygonOffset);
8899 SET_PolygonStipple(table, save_PolygonStipple);
8900 SET_PopAttrib(table, save_PopAttrib);
8901 SET_PopMatrix(table, save_PopMatrix);
8902 SET_PopName(table, save_PopName);
8903 SET_PushAttrib(table, save_PushAttrib);
8904 SET_PushMatrix(table, save_PushMatrix);
8905 SET_PushName(table, save_PushName);
8906 SET_RasterPos2d(table, save_RasterPos2d);
8907 SET_RasterPos2dv(table, save_RasterPos2dv);
8908 SET_RasterPos2f(table, save_RasterPos2f);
8909 SET_RasterPos2fv(table, save_RasterPos2fv);
8910 SET_RasterPos2i(table, save_RasterPos2i);
8911 SET_RasterPos2iv(table, save_RasterPos2iv);
8912 SET_RasterPos2s(table, save_RasterPos2s);
8913 SET_RasterPos2sv(table, save_RasterPos2sv);
8914 SET_RasterPos3d(table, save_RasterPos3d);
8915 SET_RasterPos3dv(table, save_RasterPos3dv);
8916 SET_RasterPos3f(table, save_RasterPos3f);
8917 SET_RasterPos3fv(table, save_RasterPos3fv);
8918 SET_RasterPos3i(table, save_RasterPos3i);
8919 SET_RasterPos3iv(table, save_RasterPos3iv);
8920 SET_RasterPos3s(table, save_RasterPos3s);
8921 SET_RasterPos3sv(table, save_RasterPos3sv);
8922 SET_RasterPos4d(table, save_RasterPos4d);
8923 SET_RasterPos4dv(table, save_RasterPos4dv);
8924 SET_RasterPos4f(table, save_RasterPos4f);
8925 SET_RasterPos4fv(table, save_RasterPos4fv);
8926 SET_RasterPos4i(table, save_RasterPos4i);
8927 SET_RasterPos4iv(table, save_RasterPos4iv);
8928 SET_RasterPos4s(table, save_RasterPos4s);
8929 SET_RasterPos4sv(table, save_RasterPos4sv);
8930 SET_ReadBuffer(table, save_ReadBuffer);
8931 SET_Rotated(table, save_Rotated);
8932 SET_Rotatef(table, save_Rotatef);
8933 SET_Scaled(table, save_Scaled);
8934 SET_Scalef(table, save_Scalef);
8935 SET_Scissor(table, save_Scissor);
8936 SET_ShadeModel(table, save_ShadeModel);
8937 SET_StencilFunc(table, save_StencilFunc);
8938 SET_StencilMask(table, save_StencilMask);
8939 SET_StencilOp(table, save_StencilOp);
8940 SET_TexEnvf(table, save_TexEnvf);
8941 SET_TexEnvfv(table, save_TexEnvfv);
8942 SET_TexEnvi(table, save_TexEnvi);
8943 SET_TexEnviv(table, save_TexEnviv);
8944 SET_TexGend(table, save_TexGend);
8945 SET_TexGendv(table, save_TexGendv);
8946 SET_TexGenf(table, save_TexGenf);
8947 SET_TexGenfv(table, save_TexGenfv);
8948 SET_TexGeni(table, save_TexGeni);
8949 SET_TexGeniv(table, save_TexGeniv);
8950 SET_TexImage1D(table, save_TexImage1D);
8951 SET_TexImage2D(table, save_TexImage2D);
8952 SET_TexParameterf(table, save_TexParameterf);
8953 SET_TexParameterfv(table, save_TexParameterfv);
8954 SET_TexParameteri(table, save_TexParameteri);
8955 SET_TexParameteriv(table, save_TexParameteriv);
8956 SET_Translated(table, save_Translated);
8957 SET_Translatef(table, save_Translatef);
8958 SET_Viewport(table, save_Viewport);
8959
8960 /* GL 1.1 */
8961 SET_BindTexture(table, save_BindTexture);
8962 SET_CopyTexImage1D(table, save_CopyTexImage1D);
8963 SET_CopyTexImage2D(table, save_CopyTexImage2D);
8964 SET_CopyTexSubImage1D(table, save_CopyTexSubImage1D);
8965 SET_CopyTexSubImage2D(table, save_CopyTexSubImage2D);
8966 SET_PrioritizeTextures(table, save_PrioritizeTextures);
8967 SET_TexSubImage1D(table, save_TexSubImage1D);
8968 SET_TexSubImage2D(table, save_TexSubImage2D);
8969
8970 /* GL 1.2 */
8971 SET_CopyTexSubImage3D(table, save_CopyTexSubImage3D);
8972 SET_TexImage3D(table, save_TexImage3D);
8973 SET_TexSubImage3D(table, save_TexSubImage3D);
8974
8975 /* GL 2.0 */
8976 SET_StencilFuncSeparate(table, save_StencilFuncSeparate);
8977 SET_StencilMaskSeparate(table, save_StencilMaskSeparate);
8978 SET_StencilOpSeparate(table, save_StencilOpSeparate);
8979
8980 /* ATI_separate_stencil */
8981 SET_StencilFuncSeparateATI(table, save_StencilFuncSeparateATI);
8982
8983 /* GL_ARB_imaging */
8984 /* Not all are supported */
8985 SET_BlendColor(table, save_BlendColor);
8986 SET_BlendEquation(table, save_BlendEquation);
8987 SET_ColorSubTable(table, save_ColorSubTable);
8988 SET_ColorTable(table, save_ColorTable);
8989 SET_ColorTableParameterfv(table, save_ColorTableParameterfv);
8990 SET_ColorTableParameteriv(table, save_ColorTableParameteriv);
8991 SET_ConvolutionFilter1D(table, save_ConvolutionFilter1D);
8992 SET_ConvolutionFilter2D(table, save_ConvolutionFilter2D);
8993 SET_ConvolutionParameterf(table, save_ConvolutionParameterf);
8994 SET_ConvolutionParameterfv(table, save_ConvolutionParameterfv);
8995 SET_ConvolutionParameteri(table, save_ConvolutionParameteri);
8996 SET_ConvolutionParameteriv(table, save_ConvolutionParameteriv);
8997 SET_CopyColorSubTable(table, save_CopyColorSubTable);
8998 SET_CopyColorTable(table, save_CopyColorTable);
8999 SET_Histogram(table, save_Histogram);
9000 SET_Minmax(table, save_Minmax);
9001 SET_ResetHistogram(table, save_ResetHistogram);
9002 SET_ResetMinmax(table, save_ResetMinmax);
9003
9004 /* 2. GL_EXT_blend_color */
9005 #if 0
9006 SET_BlendColorEXT(table, save_BlendColorEXT);
9007 #endif
9008
9009 /* 3. GL_EXT_polygon_offset */
9010 SET_PolygonOffsetEXT(table, save_PolygonOffsetEXT);
9011
9012 /* 6. GL_EXT_texture3d */
9013 #if 0
9014 SET_CopyTexSubImage3DEXT(table, save_CopyTexSubImage3D);
9015 SET_TexImage3DEXT(table, save_TexImage3DEXT);
9016 SET_TexSubImage3DEXT(table, save_TexSubImage3D);
9017 #endif
9018
9019 /* 14. GL_SGI_color_table */
9020 #if 0
9021 SET_ColorTableSGI(table, save_ColorTable);
9022 SET_ColorSubTableSGI(table, save_ColorSubTable);
9023 #endif
9024
9025 /* 37. GL_EXT_blend_minmax */
9026 #if 0
9027 SET_BlendEquationEXT(table, save_BlendEquationEXT);
9028 #endif
9029
9030 /* 54. GL_EXT_point_parameters */
9031 SET_PointParameterf(table, save_PointParameterfEXT);
9032 SET_PointParameterfv(table, save_PointParameterfvEXT);
9033
9034 /* 173. GL_EXT_blend_func_separate */
9035 SET_BlendFuncSeparate(table, save_BlendFuncSeparateEXT);
9036
9037 /* 197. GL_MESA_window_pos */
9038 SET_WindowPos2d(table, save_WindowPos2dMESA);
9039 SET_WindowPos2dv(table, save_WindowPos2dvMESA);
9040 SET_WindowPos2f(table, save_WindowPos2fMESA);
9041 SET_WindowPos2fv(table, save_WindowPos2fvMESA);
9042 SET_WindowPos2i(table, save_WindowPos2iMESA);
9043 SET_WindowPos2iv(table, save_WindowPos2ivMESA);
9044 SET_WindowPos2s(table, save_WindowPos2sMESA);
9045 SET_WindowPos2sv(table, save_WindowPos2svMESA);
9046 SET_WindowPos3d(table, save_WindowPos3dMESA);
9047 SET_WindowPos3dv(table, save_WindowPos3dvMESA);
9048 SET_WindowPos3f(table, save_WindowPos3fMESA);
9049 SET_WindowPos3fv(table, save_WindowPos3fvMESA);
9050 SET_WindowPos3i(table, save_WindowPos3iMESA);
9051 SET_WindowPos3iv(table, save_WindowPos3ivMESA);
9052 SET_WindowPos3s(table, save_WindowPos3sMESA);
9053 SET_WindowPos3sv(table, save_WindowPos3svMESA);
9054 SET_WindowPos4dMESA(table, save_WindowPos4dMESA);
9055 SET_WindowPos4dvMESA(table, save_WindowPos4dvMESA);
9056 SET_WindowPos4fMESA(table, save_WindowPos4fMESA);
9057 SET_WindowPos4fvMESA(table, save_WindowPos4fvMESA);
9058 SET_WindowPos4iMESA(table, save_WindowPos4iMESA);
9059 SET_WindowPos4ivMESA(table, save_WindowPos4ivMESA);
9060 SET_WindowPos4sMESA(table, save_WindowPos4sMESA);
9061 SET_WindowPos4svMESA(table, save_WindowPos4svMESA);
9062
9063 /* 233. GL_NV_vertex_program */
9064 /* The following commands DO NOT go into display lists:
9065 * AreProgramsResidentNV, IsProgramNV, GenProgramsNV, DeleteProgramsNV,
9066 * VertexAttribPointerNV, GetProgram*, GetVertexAttrib*
9067 */
9068 SET_BindProgramARB(table, save_BindProgramNV);
9069
9070 /* 244. GL_ATI_envmap_bumpmap */
9071 SET_TexBumpParameterivATI(table, save_TexBumpParameterivATI);
9072 SET_TexBumpParameterfvATI(table, save_TexBumpParameterfvATI);
9073
9074 /* 245. GL_ATI_fragment_shader */
9075 SET_BindFragmentShaderATI(table, save_BindFragmentShaderATI);
9076 SET_SetFragmentShaderConstantATI(table, save_SetFragmentShaderConstantATI);
9077
9078 /* 262. GL_NV_point_sprite */
9079 SET_PointParameteri(table, save_PointParameteriNV);
9080 SET_PointParameteriv(table, save_PointParameterivNV);
9081
9082 /* 268. GL_EXT_stencil_two_side */
9083 SET_ActiveStencilFaceEXT(table, save_ActiveStencilFaceEXT);
9084
9085 /* ???. GL_EXT_depth_bounds_test */
9086 SET_DepthBoundsEXT(table, save_DepthBoundsEXT);
9087
9088 /* ARB 1. GL_ARB_multitexture */
9089 SET_ActiveTexture(table, save_ActiveTextureARB);
9090
9091 /* ARB 3. GL_ARB_transpose_matrix */
9092 SET_LoadTransposeMatrixd(table, save_LoadTransposeMatrixdARB);
9093 SET_LoadTransposeMatrixf(table, save_LoadTransposeMatrixfARB);
9094 SET_MultTransposeMatrixd(table, save_MultTransposeMatrixdARB);
9095 SET_MultTransposeMatrixf(table, save_MultTransposeMatrixfARB);
9096
9097 /* ARB 5. GL_ARB_multisample */
9098 SET_SampleCoverage(table, save_SampleCoverageARB);
9099
9100 /* ARB 12. GL_ARB_texture_compression */
9101 SET_CompressedTexImage3D(table, save_CompressedTexImage3DARB);
9102 SET_CompressedTexImage2D(table, save_CompressedTexImage2DARB);
9103 SET_CompressedTexImage1D(table, save_CompressedTexImage1DARB);
9104 SET_CompressedTexSubImage3D(table, save_CompressedTexSubImage3DARB);
9105 SET_CompressedTexSubImage2D(table, save_CompressedTexSubImage2DARB);
9106 SET_CompressedTexSubImage1D(table, save_CompressedTexSubImage1DARB);
9107
9108 /* ARB 14. GL_ARB_point_parameters */
9109 /* aliased with EXT_point_parameters functions */
9110
9111 /* ARB 25. GL_ARB_window_pos */
9112 /* aliased with MESA_window_pos functions */
9113
9114 /* ARB 26. GL_ARB_vertex_program */
9115 /* ARB 27. GL_ARB_fragment_program */
9116 /* glVertexAttrib* functions alias the NV ones, handled elsewhere */
9117 SET_ProgramStringARB(table, save_ProgramStringARB);
9118 SET_BindProgramARB(table, save_BindProgramNV);
9119 SET_ProgramEnvParameter4dARB(table, save_ProgramEnvParameter4dARB);
9120 SET_ProgramEnvParameter4dvARB(table, save_ProgramEnvParameter4dvARB);
9121 SET_ProgramEnvParameter4fARB(table, save_ProgramEnvParameter4fARB);
9122 SET_ProgramEnvParameter4fvARB(table, save_ProgramEnvParameter4fvARB);
9123 SET_ProgramLocalParameter4dARB(table, save_ProgramLocalParameter4dARB);
9124 SET_ProgramLocalParameter4dvARB(table, save_ProgramLocalParameter4dvARB);
9125 SET_ProgramLocalParameter4fARB(table, save_ProgramLocalParameter4fARB);
9126 SET_ProgramLocalParameter4fvARB(table, save_ProgramLocalParameter4fvARB);
9127
9128 SET_BeginQuery(table, save_BeginQueryARB);
9129 SET_EndQuery(table, save_EndQueryARB);
9130 SET_QueryCounter(table, save_QueryCounter);
9131
9132 SET_DrawBuffers(table, save_DrawBuffersARB);
9133
9134 SET_BlitFramebuffer(table, save_BlitFramebufferEXT);
9135
9136 SET_UseProgram(table, save_UseProgramObjectARB);
9137 SET_Uniform1f(table, save_Uniform1fARB);
9138 SET_Uniform2f(table, save_Uniform2fARB);
9139 SET_Uniform3f(table, save_Uniform3fARB);
9140 SET_Uniform4f(table, save_Uniform4fARB);
9141 SET_Uniform1fv(table, save_Uniform1fvARB);
9142 SET_Uniform2fv(table, save_Uniform2fvARB);
9143 SET_Uniform3fv(table, save_Uniform3fvARB);
9144 SET_Uniform4fv(table, save_Uniform4fvARB);
9145 SET_Uniform1i(table, save_Uniform1iARB);
9146 SET_Uniform2i(table, save_Uniform2iARB);
9147 SET_Uniform3i(table, save_Uniform3iARB);
9148 SET_Uniform4i(table, save_Uniform4iARB);
9149 SET_Uniform1iv(table, save_Uniform1ivARB);
9150 SET_Uniform2iv(table, save_Uniform2ivARB);
9151 SET_Uniform3iv(table, save_Uniform3ivARB);
9152 SET_Uniform4iv(table, save_Uniform4ivARB);
9153 SET_UniformMatrix2fv(table, save_UniformMatrix2fvARB);
9154 SET_UniformMatrix3fv(table, save_UniformMatrix3fvARB);
9155 SET_UniformMatrix4fv(table, save_UniformMatrix4fvARB);
9156 SET_UniformMatrix2x3fv(table, save_UniformMatrix2x3fv);
9157 SET_UniformMatrix3x2fv(table, save_UniformMatrix3x2fv);
9158 SET_UniformMatrix2x4fv(table, save_UniformMatrix2x4fv);
9159 SET_UniformMatrix4x2fv(table, save_UniformMatrix4x2fv);
9160 SET_UniformMatrix3x4fv(table, save_UniformMatrix3x4fv);
9161 SET_UniformMatrix4x3fv(table, save_UniformMatrix4x3fv);
9162
9163 /* 299. GL_EXT_blend_equation_separate */
9164 SET_BlendEquationSeparate(table, save_BlendEquationSeparateEXT);
9165
9166 /* GL_EXT_gpu_program_parameters */
9167 SET_ProgramEnvParameters4fvEXT(table, save_ProgramEnvParameters4fvEXT);
9168 SET_ProgramLocalParameters4fvEXT(table, save_ProgramLocalParameters4fvEXT);
9169
9170 /* 364. GL_EXT_provoking_vertex */
9171 SET_ProvokingVertex(table, save_ProvokingVertexEXT);
9172
9173 /* GL_EXT_texture_integer */
9174 SET_ClearColorIiEXT(table, save_ClearColorIi);
9175 SET_ClearColorIuiEXT(table, save_ClearColorIui);
9176 SET_TexParameterIiv(table, save_TexParameterIiv);
9177 SET_TexParameterIuiv(table, save_TexParameterIuiv);
9178
9179 /* 377. GL_EXT_separate_shader_objects */
9180 SET_UseShaderProgramEXT(table, save_UseShaderProgramEXT);
9181 SET_ActiveProgramEXT(table, save_ActiveProgramEXT);
9182
9183 /* GL_ARB_color_buffer_float */
9184 SET_ClampColor(table, save_ClampColorARB);
9185
9186 /* GL 3.0 */
9187 SET_ClearBufferiv(table, save_ClearBufferiv);
9188 SET_ClearBufferuiv(table, save_ClearBufferuiv);
9189 SET_ClearBufferfv(table, save_ClearBufferfv);
9190 SET_ClearBufferfi(table, save_ClearBufferfi);
9191 #if 0
9192 SET_Uniform1ui(table, save_Uniform1ui);
9193 SET_Uniform2ui(table, save_Uniform2ui);
9194 SET_Uniform3ui(table, save_Uniform3ui);
9195 SET_Uniform4ui(table, save_Uniform4ui);
9196 SET_Uniform1uiv(table, save_Uniform1uiv);
9197 SET_Uniform2uiv(table, save_Uniform2uiv);
9198 SET_Uniform3uiv(table, save_Uniform3uiv);
9199 SET_Uniform4uiv(table, save_Uniform4uiv);
9200 #else
9201 (void) save_Uniform1ui;
9202 (void) save_Uniform2ui;
9203 (void) save_Uniform3ui;
9204 (void) save_Uniform4ui;
9205 (void) save_Uniform1uiv;
9206 (void) save_Uniform2uiv;
9207 (void) save_Uniform3uiv;
9208 (void) save_Uniform4uiv;
9209 #endif
9210
9211 /* These are: */
9212 SET_BeginTransformFeedback(table, save_BeginTransformFeedback);
9213 SET_EndTransformFeedback(table, save_EndTransformFeedback);
9214 SET_BindTransformFeedback(table, save_BindTransformFeedback);
9215 SET_PauseTransformFeedback(table, save_PauseTransformFeedback);
9216 SET_ResumeTransformFeedback(table, save_ResumeTransformFeedback);
9217 SET_DrawTransformFeedback(table, save_DrawTransformFeedback);
9218 SET_DrawTransformFeedbackStream(table, save_DrawTransformFeedbackStream);
9219 SET_DrawTransformFeedbackInstanced(table,
9220 save_DrawTransformFeedbackInstanced);
9221 SET_DrawTransformFeedbackStreamInstanced(table,
9222 save_DrawTransformFeedbackStreamInstanced);
9223 SET_BeginQueryIndexed(table, save_BeginQueryIndexed);
9224 SET_EndQueryIndexed(table, save_EndQueryIndexed);
9225
9226 /* GL_ARB_instanced_arrays */
9227 SET_VertexAttribDivisor(table, save_VertexAttribDivisor);
9228
9229 /* GL_NV_texture_barrier */
9230 SET_TextureBarrierNV(table, save_TextureBarrierNV);
9231
9232 SET_BindSampler(table, save_BindSampler);
9233 SET_SamplerParameteri(table, save_SamplerParameteri);
9234 SET_SamplerParameterf(table, save_SamplerParameterf);
9235 SET_SamplerParameteriv(table, save_SamplerParameteriv);
9236 SET_SamplerParameterfv(table, save_SamplerParameterfv);
9237 SET_SamplerParameterIiv(table, save_SamplerParameterIiv);
9238 SET_SamplerParameterIuiv(table, save_SamplerParameterIuiv);
9239
9240 /* GL_ARB_draw_buffer_blend */
9241 SET_BlendFunciARB(table, save_BlendFunci);
9242 SET_BlendFuncSeparateiARB(table, save_BlendFuncSeparatei);
9243 SET_BlendEquationiARB(table, save_BlendEquationi);
9244 SET_BlendEquationSeparateiARB(table, save_BlendEquationSeparatei);
9245
9246 /* GL_ARB_geometry_shader4 */
9247 SET_ProgramParameteri(table, save_ProgramParameteri);
9248 SET_FramebufferTexture(table, save_FramebufferTexture);
9249 SET_FramebufferTextureFaceARB(table, save_FramebufferTextureFace);
9250
9251 /* GL_NV_conditional_render */
9252 SET_BeginConditionalRender(table, save_BeginConditionalRender);
9253 SET_EndConditionalRender(table, save_EndConditionalRender);
9254
9255 /* GL_ARB_sync */
9256 SET_WaitSync(table, save_WaitSync);
9257
9258 /* GL_ARB_uniform_buffer_object */
9259 SET_UniformBlockBinding(table, save_UniformBlockBinding);
9260 }
9261
9262
9263
9264 static const char *
9265 enum_string(GLenum k)
9266 {
9267 return _mesa_lookup_enum_by_nr(k);
9268 }
9269
9270
9271 /**
9272 * Print the commands in a display list. For debugging only.
9273 * TODO: many commands aren't handled yet.
9274 */
9275 static void GLAPIENTRY
9276 print_list(struct gl_context *ctx, GLuint list)
9277 {
9278 struct gl_display_list *dlist;
9279 Node *n;
9280 GLboolean done;
9281
9282 if (!islist(ctx, list)) {
9283 printf("%u is not a display list ID\n", list);
9284 return;
9285 }
9286
9287 dlist = lookup_list(ctx, list);
9288 if (!dlist)
9289 return;
9290
9291 n = dlist->Head;
9292
9293 printf("START-LIST %u, address %p\n", list, (void *) n);
9294
9295 done = n ? GL_FALSE : GL_TRUE;
9296 while (!done) {
9297 const OpCode opcode = n[0].opcode;
9298
9299 if (is_ext_opcode(opcode)) {
9300 n += ext_opcode_print(ctx, n);
9301 }
9302 else {
9303 switch (opcode) {
9304 case OPCODE_ACCUM:
9305 printf("Accum %s %g\n", enum_string(n[1].e), n[2].f);
9306 break;
9307 case OPCODE_BITMAP:
9308 printf("Bitmap %d %d %g %g %g %g %p\n", n[1].i, n[2].i,
9309 n[3].f, n[4].f, n[5].f, n[6].f, (void *) n[7].data);
9310 break;
9311 case OPCODE_CALL_LIST:
9312 printf("CallList %d\n", (int) n[1].ui);
9313 break;
9314 case OPCODE_CALL_LIST_OFFSET:
9315 printf("CallList %d + offset %u = %u\n", (int) n[1].ui,
9316 ctx->List.ListBase, ctx->List.ListBase + n[1].ui);
9317 break;
9318 case OPCODE_COLOR_TABLE_PARAMETER_FV:
9319 printf("ColorTableParameterfv %s %s %f %f %f %f\n",
9320 enum_string(n[1].e), enum_string(n[2].e),
9321 n[3].f, n[4].f, n[5].f, n[6].f);
9322 break;
9323 case OPCODE_COLOR_TABLE_PARAMETER_IV:
9324 printf("ColorTableParameteriv %s %s %d %d %d %d\n",
9325 enum_string(n[1].e), enum_string(n[2].e),
9326 n[3].i, n[4].i, n[5].i, n[6].i);
9327 break;
9328 case OPCODE_DISABLE:
9329 printf("Disable %s\n", enum_string(n[1].e));
9330 break;
9331 case OPCODE_ENABLE:
9332 printf("Enable %s\n", enum_string(n[1].e));
9333 break;
9334 case OPCODE_FRUSTUM:
9335 printf("Frustum %g %g %g %g %g %g\n",
9336 n[1].f, n[2].f, n[3].f, n[4].f, n[5].f, n[6].f);
9337 break;
9338 case OPCODE_LINE_STIPPLE:
9339 printf("LineStipple %d %x\n", n[1].i, (int) n[2].us);
9340 break;
9341 case OPCODE_LOAD_IDENTITY:
9342 printf("LoadIdentity\n");
9343 break;
9344 case OPCODE_LOAD_MATRIX:
9345 printf("LoadMatrix\n");
9346 printf(" %8f %8f %8f %8f\n",
9347 n[1].f, n[5].f, n[9].f, n[13].f);
9348 printf(" %8f %8f %8f %8f\n",
9349 n[2].f, n[6].f, n[10].f, n[14].f);
9350 printf(" %8f %8f %8f %8f\n",
9351 n[3].f, n[7].f, n[11].f, n[15].f);
9352 printf(" %8f %8f %8f %8f\n",
9353 n[4].f, n[8].f, n[12].f, n[16].f);
9354 break;
9355 case OPCODE_MULT_MATRIX:
9356 printf("MultMatrix (or Rotate)\n");
9357 printf(" %8f %8f %8f %8f\n",
9358 n[1].f, n[5].f, n[9].f, n[13].f);
9359 printf(" %8f %8f %8f %8f\n",
9360 n[2].f, n[6].f, n[10].f, n[14].f);
9361 printf(" %8f %8f %8f %8f\n",
9362 n[3].f, n[7].f, n[11].f, n[15].f);
9363 printf(" %8f %8f %8f %8f\n",
9364 n[4].f, n[8].f, n[12].f, n[16].f);
9365 break;
9366 case OPCODE_ORTHO:
9367 printf("Ortho %g %g %g %g %g %g\n",
9368 n[1].f, n[2].f, n[3].f, n[4].f, n[5].f, n[6].f);
9369 break;
9370 case OPCODE_POP_ATTRIB:
9371 printf("PopAttrib\n");
9372 break;
9373 case OPCODE_POP_MATRIX:
9374 printf("PopMatrix\n");
9375 break;
9376 case OPCODE_POP_NAME:
9377 printf("PopName\n");
9378 break;
9379 case OPCODE_PUSH_ATTRIB:
9380 printf("PushAttrib %x\n", n[1].bf);
9381 break;
9382 case OPCODE_PUSH_MATRIX:
9383 printf("PushMatrix\n");
9384 break;
9385 case OPCODE_PUSH_NAME:
9386 printf("PushName %d\n", (int) n[1].ui);
9387 break;
9388 case OPCODE_RASTER_POS:
9389 printf("RasterPos %g %g %g %g\n",
9390 n[1].f, n[2].f, n[3].f, n[4].f);
9391 break;
9392 case OPCODE_ROTATE:
9393 printf("Rotate %g %g %g %g\n",
9394 n[1].f, n[2].f, n[3].f, n[4].f);
9395 break;
9396 case OPCODE_SCALE:
9397 printf("Scale %g %g %g\n", n[1].f, n[2].f, n[3].f);
9398 break;
9399 case OPCODE_TRANSLATE:
9400 printf("Translate %g %g %g\n", n[1].f, n[2].f, n[3].f);
9401 break;
9402 case OPCODE_BIND_TEXTURE:
9403 printf("BindTexture %s %d\n",
9404 _mesa_lookup_enum_by_nr(n[1].ui), n[2].ui);
9405 break;
9406 case OPCODE_SHADE_MODEL:
9407 printf("ShadeModel %s\n", _mesa_lookup_enum_by_nr(n[1].ui));
9408 break;
9409 case OPCODE_MAP1:
9410 printf("Map1 %s %.3f %.3f %d %d\n",
9411 _mesa_lookup_enum_by_nr(n[1].ui),
9412 n[2].f, n[3].f, n[4].i, n[5].i);
9413 break;
9414 case OPCODE_MAP2:
9415 printf("Map2 %s %.3f %.3f %.3f %.3f %d %d %d %d\n",
9416 _mesa_lookup_enum_by_nr(n[1].ui),
9417 n[2].f, n[3].f, n[4].f, n[5].f,
9418 n[6].i, n[7].i, n[8].i, n[9].i);
9419 break;
9420 case OPCODE_MAPGRID1:
9421 printf("MapGrid1 %d %.3f %.3f\n", n[1].i, n[2].f, n[3].f);
9422 break;
9423 case OPCODE_MAPGRID2:
9424 printf("MapGrid2 %d %.3f %.3f, %d %.3f %.3f\n",
9425 n[1].i, n[2].f, n[3].f, n[4].i, n[5].f, n[6].f);
9426 break;
9427 case OPCODE_EVALMESH1:
9428 printf("EvalMesh1 %d %d\n", n[1].i, n[2].i);
9429 break;
9430 case OPCODE_EVALMESH2:
9431 printf("EvalMesh2 %d %d %d %d\n",
9432 n[1].i, n[2].i, n[3].i, n[4].i);
9433 break;
9434
9435 case OPCODE_ATTR_1F_NV:
9436 printf("ATTR_1F_NV attr %d: %f\n", n[1].i, n[2].f);
9437 break;
9438 case OPCODE_ATTR_2F_NV:
9439 printf("ATTR_2F_NV attr %d: %f %f\n",
9440 n[1].i, n[2].f, n[3].f);
9441 break;
9442 case OPCODE_ATTR_3F_NV:
9443 printf("ATTR_3F_NV attr %d: %f %f %f\n",
9444 n[1].i, n[2].f, n[3].f, n[4].f);
9445 break;
9446 case OPCODE_ATTR_4F_NV:
9447 printf("ATTR_4F_NV attr %d: %f %f %f %f\n",
9448 n[1].i, n[2].f, n[3].f, n[4].f, n[5].f);
9449 break;
9450 case OPCODE_ATTR_1F_ARB:
9451 printf("ATTR_1F_ARB attr %d: %f\n", n[1].i, n[2].f);
9452 break;
9453 case OPCODE_ATTR_2F_ARB:
9454 printf("ATTR_2F_ARB attr %d: %f %f\n",
9455 n[1].i, n[2].f, n[3].f);
9456 break;
9457 case OPCODE_ATTR_3F_ARB:
9458 printf("ATTR_3F_ARB attr %d: %f %f %f\n",
9459 n[1].i, n[2].f, n[3].f, n[4].f);
9460 break;
9461 case OPCODE_ATTR_4F_ARB:
9462 printf("ATTR_4F_ARB attr %d: %f %f %f %f\n",
9463 n[1].i, n[2].f, n[3].f, n[4].f, n[5].f);
9464 break;
9465
9466 case OPCODE_MATERIAL:
9467 printf("MATERIAL %x %x: %f %f %f %f\n",
9468 n[1].i, n[2].i, n[3].f, n[4].f, n[5].f, n[6].f);
9469 break;
9470 case OPCODE_BEGIN:
9471 printf("BEGIN %x\n", n[1].i);
9472 break;
9473 case OPCODE_END:
9474 printf("END\n");
9475 break;
9476 case OPCODE_RECTF:
9477 printf("RECTF %f %f %f %f\n", n[1].f, n[2].f, n[3].f,
9478 n[4].f);
9479 break;
9480 case OPCODE_EVAL_C1:
9481 printf("EVAL_C1 %f\n", n[1].f);
9482 break;
9483 case OPCODE_EVAL_C2:
9484 printf("EVAL_C2 %f %f\n", n[1].f, n[2].f);
9485 break;
9486 case OPCODE_EVAL_P1:
9487 printf("EVAL_P1 %d\n", n[1].i);
9488 break;
9489 case OPCODE_EVAL_P2:
9490 printf("EVAL_P2 %d %d\n", n[1].i, n[2].i);
9491 break;
9492
9493 case OPCODE_PROVOKING_VERTEX:
9494 printf("ProvokingVertex %s\n",
9495 _mesa_lookup_enum_by_nr(n[1].ui));
9496 break;
9497
9498 /*
9499 * meta opcodes/commands
9500 */
9501 case OPCODE_ERROR:
9502 printf("Error: %s %s\n",
9503 enum_string(n[1].e), (const char *) n[2].data);
9504 break;
9505 case OPCODE_CONTINUE:
9506 printf("DISPLAY-LIST-CONTINUE\n");
9507 n = (Node *) n[1].next;
9508 break;
9509 case OPCODE_END_OF_LIST:
9510 printf("END-LIST %u\n", list);
9511 done = GL_TRUE;
9512 break;
9513 default:
9514 if (opcode < 0 || opcode > OPCODE_END_OF_LIST) {
9515 printf
9516 ("ERROR IN DISPLAY LIST: opcode = %d, address = %p\n",
9517 opcode, (void *) n);
9518 return;
9519 }
9520 else {
9521 printf("command %d, %u operands\n", opcode,
9522 InstSize[opcode]);
9523 }
9524 }
9525 /* increment n to point to next compiled command */
9526 if (opcode != OPCODE_CONTINUE) {
9527 n += InstSize[opcode];
9528 }
9529 }
9530 }
9531 }
9532
9533
9534
9535 /**
9536 * Clients may call this function to help debug display list problems.
9537 * This function is _ONLY_FOR_DEBUGGING_PURPOSES_. It may be removed,
9538 * changed, or break in the future without notice.
9539 */
9540 void
9541 mesa_print_display_list(GLuint list)
9542 {
9543 GET_CURRENT_CONTEXT(ctx);
9544 print_list(ctx, list);
9545 }
9546
9547
9548 /**********************************************************************/
9549 /***** Initialization *****/
9550 /**********************************************************************/
9551
9552 static void
9553 save_vtxfmt_init(GLvertexformat * vfmt)
9554 {
9555 _MESA_INIT_ARRAYELT_VTXFMT(vfmt, _ae_);
9556
9557 vfmt->Begin = save_Begin;
9558
9559 _MESA_INIT_DLIST_VTXFMT(vfmt, save_);
9560
9561 vfmt->Color3f = save_Color3f;
9562 vfmt->Color3fv = save_Color3fv;
9563 vfmt->Color4f = save_Color4f;
9564 vfmt->Color4fv = save_Color4fv;
9565 vfmt->EdgeFlag = save_EdgeFlag;
9566 vfmt->End = save_End;
9567
9568 _MESA_INIT_EVAL_VTXFMT(vfmt, save_);
9569
9570 vfmt->FogCoordfEXT = save_FogCoordfEXT;
9571 vfmt->FogCoordfvEXT = save_FogCoordfvEXT;
9572 vfmt->Indexf = save_Indexf;
9573 vfmt->Indexfv = save_Indexfv;
9574 vfmt->Materialfv = save_Materialfv;
9575 vfmt->MultiTexCoord1fARB = save_MultiTexCoord1f;
9576 vfmt->MultiTexCoord1fvARB = save_MultiTexCoord1fv;
9577 vfmt->MultiTexCoord2fARB = save_MultiTexCoord2f;
9578 vfmt->MultiTexCoord2fvARB = save_MultiTexCoord2fv;
9579 vfmt->MultiTexCoord3fARB = save_MultiTexCoord3f;
9580 vfmt->MultiTexCoord3fvARB = save_MultiTexCoord3fv;
9581 vfmt->MultiTexCoord4fARB = save_MultiTexCoord4f;
9582 vfmt->MultiTexCoord4fvARB = save_MultiTexCoord4fv;
9583 vfmt->Normal3f = save_Normal3f;
9584 vfmt->Normal3fv = save_Normal3fv;
9585 vfmt->SecondaryColor3fEXT = save_SecondaryColor3fEXT;
9586 vfmt->SecondaryColor3fvEXT = save_SecondaryColor3fvEXT;
9587 vfmt->TexCoord1f = save_TexCoord1f;
9588 vfmt->TexCoord1fv = save_TexCoord1fv;
9589 vfmt->TexCoord2f = save_TexCoord2f;
9590 vfmt->TexCoord2fv = save_TexCoord2fv;
9591 vfmt->TexCoord3f = save_TexCoord3f;
9592 vfmt->TexCoord3fv = save_TexCoord3fv;
9593 vfmt->TexCoord4f = save_TexCoord4f;
9594 vfmt->TexCoord4fv = save_TexCoord4fv;
9595 vfmt->Vertex2f = save_Vertex2f;
9596 vfmt->Vertex2fv = save_Vertex2fv;
9597 vfmt->Vertex3f = save_Vertex3f;
9598 vfmt->Vertex3fv = save_Vertex3fv;
9599 vfmt->Vertex4f = save_Vertex4f;
9600 vfmt->Vertex4fv = save_Vertex4fv;
9601 vfmt->VertexAttrib1fARB = save_VertexAttrib1fARB;
9602 vfmt->VertexAttrib1fvARB = save_VertexAttrib1fvARB;
9603 vfmt->VertexAttrib2fARB = save_VertexAttrib2fARB;
9604 vfmt->VertexAttrib2fvARB = save_VertexAttrib2fvARB;
9605 vfmt->VertexAttrib3fARB = save_VertexAttrib3fARB;
9606 vfmt->VertexAttrib3fvARB = save_VertexAttrib3fvARB;
9607 vfmt->VertexAttrib4fARB = save_VertexAttrib4fARB;
9608 vfmt->VertexAttrib4fvARB = save_VertexAttrib4fvARB;
9609
9610 vfmt->Rectf = save_Rectf;
9611
9612 /* GL_ARB_draw_instanced */
9613 vfmt->DrawArraysInstanced = save_DrawArraysInstancedARB;
9614 vfmt->DrawElementsInstanced = save_DrawElementsInstancedARB;
9615
9616 /* GL_ARB_draw_elements_base_vertex */
9617 vfmt->DrawElementsInstancedBaseVertex = save_DrawElementsInstancedBaseVertexARB;
9618
9619 /* GL_ARB_base_instance */
9620 vfmt->DrawArraysInstancedBaseInstance = save_DrawArraysInstancedBaseInstance;
9621 vfmt->DrawElementsInstancedBaseInstance = save_DrawElementsInstancedBaseInstance;
9622 vfmt->DrawElementsInstancedBaseVertexBaseInstance = save_DrawElementsInstancedBaseVertexBaseInstance;
9623
9624 /* The driver is required to implement these as
9625 * 1) They can probably do a better job.
9626 * 2) A lot of new mechanisms would have to be added to this module
9627 * to support it. That code would probably never get used,
9628 * because of (1).
9629 */
9630 #if 0
9631 vfmt->DrawArrays = 0;
9632 vfmt->DrawElements = 0;
9633 vfmt->DrawRangeElements = 0;
9634 vfmt->MultiDrawElemementsEXT = 0;
9635 vfmt->DrawElementsBaseVertex = 0;
9636 vfmt->DrawRangeElementsBaseVertex = 0;
9637 vfmt->MultiDrawElemementsBaseVertex = 0;
9638 #endif
9639 }
9640
9641
9642 void
9643 _mesa_install_dlist_vtxfmt(struct _glapi_table *disp,
9644 const GLvertexformat *vfmt)
9645 {
9646 SET_CallList(disp, vfmt->CallList);
9647 SET_CallLists(disp, vfmt->CallLists);
9648 }
9649
9650
9651 /**
9652 * Initialize display list state for given context.
9653 */
9654 void
9655 _mesa_init_display_list(struct gl_context *ctx)
9656 {
9657 static GLboolean tableInitialized = GL_FALSE;
9658
9659 /* zero-out the instruction size table, just once */
9660 if (!tableInitialized) {
9661 memset(InstSize, 0, sizeof(InstSize));
9662 tableInitialized = GL_TRUE;
9663 }
9664
9665 /* extension info */
9666 ctx->ListExt = CALLOC_STRUCT(gl_list_extensions);
9667
9668 /* Display list */
9669 ctx->ListState.CallDepth = 0;
9670 ctx->ExecuteFlag = GL_TRUE;
9671 ctx->CompileFlag = GL_FALSE;
9672 ctx->ListState.CurrentBlock = NULL;
9673 ctx->ListState.CurrentPos = 0;
9674
9675 /* Display List group */
9676 ctx->List.ListBase = 0;
9677
9678 save_vtxfmt_init(&ctx->ListState.ListVtxfmt);
9679 }
9680
9681
9682 void
9683 _mesa_free_display_list_data(struct gl_context *ctx)
9684 {
9685 free(ctx->ListExt);
9686 ctx->ListExt = NULL;
9687 }