projects / mesa.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
mesa: Remove exec thunks from the dlist.c module.
[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 * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
22 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
23 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
24 */
25
26
27 /**
28 * \file dlist.c
29 * Display lists management functions.
30 */
31
32 #include "glheader.h"
33 #include "imports.h"
34 #include "api_arrayelt.h"
35 #include "api_exec.h"
36 #include "api_loopback.h"
37 #include "api_validate.h"
38 #include "atifragshader.h"
39 #include "config.h"
40 #include "mfeatures.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 <= GL_POLYGON || \
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 <= GL_POLYGON || \
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 if (ctx->ListState.Current.ShadeModel == mode)
3775 return;
3776
3777 SAVE_FLUSH_VERTICES(ctx);
3778
3779 /* Only save the value if we know the statechange will take effect:
3780 */
3781 if (ctx->Driver.CurrentSavePrimitive == PRIM_OUTSIDE_BEGIN_END)
3782 ctx->ListState.Current.ShadeModel = mode;
3783
3784 n = alloc_instruction(ctx, OPCODE_SHADE_MODEL, 1);
3785 if (n) {
3786 n[1].e = mode;
3787 }
3788 }
3789
3790
3791 static void GLAPIENTRY
3792 save_StencilFunc(GLenum func, GLint ref, GLuint mask)
3793 {
3794 GET_CURRENT_CONTEXT(ctx);
3795 Node *n;
3796 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3797 n = alloc_instruction(ctx, OPCODE_STENCIL_FUNC, 3);
3798 if (n) {
3799 n[1].e = func;
3800 n[2].i = ref;
3801 n[3].ui = mask;
3802 }
3803 if (ctx->ExecuteFlag) {
3804 CALL_StencilFunc(ctx->Exec, (func, ref, mask));
3805 }
3806 }
3807
3808
3809 static void GLAPIENTRY
3810 save_StencilMask(GLuint mask)
3811 {
3812 GET_CURRENT_CONTEXT(ctx);
3813 Node *n;
3814 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3815 n = alloc_instruction(ctx, OPCODE_STENCIL_MASK, 1);
3816 if (n) {
3817 n[1].ui = mask;
3818 }
3819 if (ctx->ExecuteFlag) {
3820 CALL_StencilMask(ctx->Exec, (mask));
3821 }
3822 }
3823
3824
3825 static void GLAPIENTRY
3826 save_StencilOp(GLenum fail, GLenum zfail, GLenum zpass)
3827 {
3828 GET_CURRENT_CONTEXT(ctx);
3829 Node *n;
3830 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3831 n = alloc_instruction(ctx, OPCODE_STENCIL_OP, 3);
3832 if (n) {
3833 n[1].e = fail;
3834 n[2].e = zfail;
3835 n[3].e = zpass;
3836 }
3837 if (ctx->ExecuteFlag) {
3838 CALL_StencilOp(ctx->Exec, (fail, zfail, zpass));
3839 }
3840 }
3841
3842
3843 static void GLAPIENTRY
3844 save_StencilFuncSeparate(GLenum face, GLenum func, GLint ref, GLuint mask)
3845 {
3846 GET_CURRENT_CONTEXT(ctx);
3847 Node *n;
3848 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3849 n = alloc_instruction(ctx, OPCODE_STENCIL_FUNC_SEPARATE, 4);
3850 if (n) {
3851 n[1].e = face;
3852 n[2].e = func;
3853 n[3].i = ref;
3854 n[4].ui = mask;
3855 }
3856 if (ctx->ExecuteFlag) {
3857 CALL_StencilFuncSeparate(ctx->Exec, (face, func, ref, mask));
3858 }
3859 }
3860
3861
3862 static void GLAPIENTRY
3863 save_StencilFuncSeparateATI(GLenum frontfunc, GLenum backfunc, GLint ref,
3864 GLuint mask)
3865 {
3866 GET_CURRENT_CONTEXT(ctx);
3867 Node *n;
3868 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3869 /* GL_FRONT */
3870 n = alloc_instruction(ctx, OPCODE_STENCIL_FUNC_SEPARATE, 4);
3871 if (n) {
3872 n[1].e = GL_FRONT;
3873 n[2].e = frontfunc;
3874 n[3].i = ref;
3875 n[4].ui = mask;
3876 }
3877 /* GL_BACK */
3878 n = alloc_instruction(ctx, OPCODE_STENCIL_FUNC_SEPARATE, 4);
3879 if (n) {
3880 n[1].e = GL_BACK;
3881 n[2].e = backfunc;
3882 n[3].i = ref;
3883 n[4].ui = mask;
3884 }
3885 if (ctx->ExecuteFlag) {
3886 CALL_StencilFuncSeparate(ctx->Exec, (GL_FRONT, frontfunc, ref, mask));
3887 CALL_StencilFuncSeparate(ctx->Exec, (GL_BACK, backfunc, ref, mask));
3888 }
3889 }
3890
3891
3892 static void GLAPIENTRY
3893 save_StencilMaskSeparate(GLenum face, GLuint mask)
3894 {
3895 GET_CURRENT_CONTEXT(ctx);
3896 Node *n;
3897 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3898 n = alloc_instruction(ctx, OPCODE_STENCIL_MASK_SEPARATE, 2);
3899 if (n) {
3900 n[1].e = face;
3901 n[2].ui = mask;
3902 }
3903 if (ctx->ExecuteFlag) {
3904 CALL_StencilMaskSeparate(ctx->Exec, (face, mask));
3905 }
3906 }
3907
3908
3909 static void GLAPIENTRY
3910 save_StencilOpSeparate(GLenum face, GLenum fail, GLenum zfail, GLenum zpass)
3911 {
3912 GET_CURRENT_CONTEXT(ctx);
3913 Node *n;
3914 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3915 n = alloc_instruction(ctx, OPCODE_STENCIL_OP_SEPARATE, 4);
3916 if (n) {
3917 n[1].e = face;
3918 n[2].e = fail;
3919 n[3].e = zfail;
3920 n[4].e = zpass;
3921 }
3922 if (ctx->ExecuteFlag) {
3923 CALL_StencilOpSeparate(ctx->Exec, (face, fail, zfail, zpass));
3924 }
3925 }
3926
3927
3928 static void GLAPIENTRY
3929 save_TexEnvfv(GLenum target, GLenum pname, const GLfloat *params)
3930 {
3931 GET_CURRENT_CONTEXT(ctx);
3932 Node *n;
3933 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3934 n = alloc_instruction(ctx, OPCODE_TEXENV, 6);
3935 if (n) {
3936 n[1].e = target;
3937 n[2].e = pname;
3938 if (pname == GL_TEXTURE_ENV_COLOR) {
3939 n[3].f = params[0];
3940 n[4].f = params[1];
3941 n[5].f = params[2];
3942 n[6].f = params[3];
3943 }
3944 else {
3945 n[3].f = params[0];
3946 n[4].f = n[5].f = n[6].f = 0.0F;
3947 }
3948 }
3949 if (ctx->ExecuteFlag) {
3950 CALL_TexEnvfv(ctx->Exec, (target, pname, params));
3951 }
3952 }
3953
3954
3955 static void GLAPIENTRY
3956 save_TexEnvf(GLenum target, GLenum pname, GLfloat param)
3957 {
3958 GLfloat parray[4];
3959 parray[0] = (GLfloat) param;
3960 parray[1] = parray[2] = parray[3] = 0.0F;
3961 save_TexEnvfv(target, pname, parray);
3962 }
3963
3964
3965 static void GLAPIENTRY
3966 save_TexEnvi(GLenum target, GLenum pname, GLint param)
3967 {
3968 GLfloat p[4];
3969 p[0] = (GLfloat) param;
3970 p[1] = p[2] = p[3] = 0.0F;
3971 save_TexEnvfv(target, pname, p);
3972 }
3973
3974
3975 static void GLAPIENTRY
3976 save_TexEnviv(GLenum target, GLenum pname, const GLint * param)
3977 {
3978 GLfloat p[4];
3979 if (pname == GL_TEXTURE_ENV_COLOR) {
3980 p[0] = INT_TO_FLOAT(param[0]);
3981 p[1] = INT_TO_FLOAT(param[1]);
3982 p[2] = INT_TO_FLOAT(param[2]);
3983 p[3] = INT_TO_FLOAT(param[3]);
3984 }
3985 else {
3986 p[0] = (GLfloat) param[0];
3987 p[1] = p[2] = p[3] = 0.0F;
3988 }
3989 save_TexEnvfv(target, pname, p);
3990 }
3991
3992
3993 static void GLAPIENTRY
3994 save_TexGenfv(GLenum coord, GLenum pname, const GLfloat *params)
3995 {
3996 GET_CURRENT_CONTEXT(ctx);
3997 Node *n;
3998 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
3999 n = alloc_instruction(ctx, OPCODE_TEXGEN, 6);
4000 if (n) {
4001 n[1].e = coord;
4002 n[2].e = pname;
4003 n[3].f = params[0];
4004 n[4].f = params[1];
4005 n[5].f = params[2];
4006 n[6].f = params[3];
4007 }
4008 if (ctx->ExecuteFlag) {
4009 CALL_TexGenfv(ctx->Exec, (coord, pname, params));
4010 }
4011 }
4012
4013
4014 static void GLAPIENTRY
4015 save_TexGeniv(GLenum coord, GLenum pname, const GLint *params)
4016 {
4017 GLfloat p[4];
4018 p[0] = (GLfloat) params[0];
4019 p[1] = (GLfloat) params[1];
4020 p[2] = (GLfloat) params[2];
4021 p[3] = (GLfloat) params[3];
4022 save_TexGenfv(coord, pname, p);
4023 }
4024
4025
4026 static void GLAPIENTRY
4027 save_TexGend(GLenum coord, GLenum pname, GLdouble param)
4028 {
4029 GLfloat parray[4];
4030 parray[0] = (GLfloat) param;
4031 parray[1] = parray[2] = parray[3] = 0.0F;
4032 save_TexGenfv(coord, pname, parray);
4033 }
4034
4035
4036 static void GLAPIENTRY
4037 save_TexGendv(GLenum coord, GLenum pname, const GLdouble *params)
4038 {
4039 GLfloat p[4];
4040 p[0] = (GLfloat) params[0];
4041 p[1] = (GLfloat) params[1];
4042 p[2] = (GLfloat) params[2];
4043 p[3] = (GLfloat) params[3];
4044 save_TexGenfv(coord, pname, p);
4045 }
4046
4047
4048 static void GLAPIENTRY
4049 save_TexGenf(GLenum coord, GLenum pname, GLfloat param)
4050 {
4051 GLfloat parray[4];
4052 parray[0] = param;
4053 parray[1] = parray[2] = parray[3] = 0.0F;
4054 save_TexGenfv(coord, pname, parray);
4055 }
4056
4057
4058 static void GLAPIENTRY
4059 save_TexGeni(GLenum coord, GLenum pname, GLint param)
4060 {
4061 GLint parray[4];
4062 parray[0] = param;
4063 parray[1] = parray[2] = parray[3] = 0;
4064 save_TexGeniv(coord, pname, parray);
4065 }
4066
4067
4068 static void GLAPIENTRY
4069 save_TexParameterfv(GLenum target, GLenum pname, const GLfloat *params)
4070 {
4071 GET_CURRENT_CONTEXT(ctx);
4072 Node *n;
4073 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4074 n = alloc_instruction(ctx, OPCODE_TEXPARAMETER, 6);
4075 if (n) {
4076 n[1].e = target;
4077 n[2].e = pname;
4078 n[3].f = params[0];
4079 n[4].f = params[1];
4080 n[5].f = params[2];
4081 n[6].f = params[3];
4082 }
4083 if (ctx->ExecuteFlag) {
4084 CALL_TexParameterfv(ctx->Exec, (target, pname, params));
4085 }
4086 }
4087
4088
4089 static void GLAPIENTRY
4090 save_TexParameterf(GLenum target, GLenum pname, GLfloat param)
4091 {
4092 GLfloat parray[4];
4093 parray[0] = param;
4094 parray[1] = parray[2] = parray[3] = 0.0F;
4095 save_TexParameterfv(target, pname, parray);
4096 }
4097
4098
4099 static void GLAPIENTRY
4100 save_TexParameteri(GLenum target, GLenum pname, GLint param)
4101 {
4102 GLfloat fparam[4];
4103 fparam[0] = (GLfloat) param;
4104 fparam[1] = fparam[2] = fparam[3] = 0.0F;
4105 save_TexParameterfv(target, pname, fparam);
4106 }
4107
4108
4109 static void GLAPIENTRY
4110 save_TexParameteriv(GLenum target, GLenum pname, const GLint *params)
4111 {
4112 GLfloat fparam[4];
4113 fparam[0] = (GLfloat) params[0];
4114 fparam[1] = fparam[2] = fparam[3] = 0.0F;
4115 save_TexParameterfv(target, pname, fparam);
4116 }
4117
4118
4119 static void GLAPIENTRY
4120 save_TexImage1D(GLenum target,
4121 GLint level, GLint components,
4122 GLsizei width, GLint border,
4123 GLenum format, GLenum type, const GLvoid * pixels)
4124 {
4125 GET_CURRENT_CONTEXT(ctx);
4126 if (target == GL_PROXY_TEXTURE_1D) {
4127 /* don't compile, execute immediately */
4128 CALL_TexImage1D(ctx->Exec, (target, level, components, width,
4129 border, format, type, pixels));
4130 }
4131 else {
4132 Node *n;
4133 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4134 n = alloc_instruction(ctx, OPCODE_TEX_IMAGE1D, 8);
4135 if (n) {
4136 n[1].e = target;
4137 n[2].i = level;
4138 n[3].i = components;
4139 n[4].i = (GLint) width;
4140 n[5].i = border;
4141 n[6].e = format;
4142 n[7].e = type;
4143 n[8].data = unpack_image(ctx, 1, width, 1, 1, format, type,
4144 pixels, &ctx->Unpack);
4145 }
4146 if (ctx->ExecuteFlag) {
4147 CALL_TexImage1D(ctx->Exec, (target, level, components, width,
4148 border, format, type, pixels));
4149 }
4150 }
4151 }
4152
4153
4154 static void GLAPIENTRY
4155 save_TexImage2D(GLenum target,
4156 GLint level, GLint components,
4157 GLsizei width, GLsizei height, GLint border,
4158 GLenum format, GLenum type, const GLvoid * pixels)
4159 {
4160 GET_CURRENT_CONTEXT(ctx);
4161 if (target == GL_PROXY_TEXTURE_2D) {
4162 /* don't compile, execute immediately */
4163 CALL_TexImage2D(ctx->Exec, (target, level, components, width,
4164 height, border, format, type, pixels));
4165 }
4166 else {
4167 Node *n;
4168 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4169 n = alloc_instruction(ctx, OPCODE_TEX_IMAGE2D, 9);
4170 if (n) {
4171 n[1].e = target;
4172 n[2].i = level;
4173 n[3].i = components;
4174 n[4].i = (GLint) width;
4175 n[5].i = (GLint) height;
4176 n[6].i = border;
4177 n[7].e = format;
4178 n[8].e = type;
4179 n[9].data = unpack_image(ctx, 2, width, height, 1, format, type,
4180 pixels, &ctx->Unpack);
4181 }
4182 if (ctx->ExecuteFlag) {
4183 CALL_TexImage2D(ctx->Exec, (target, level, components, width,
4184 height, border, format, type, pixels));
4185 }
4186 }
4187 }
4188
4189
4190 static void GLAPIENTRY
4191 save_TexImage3D(GLenum target,
4192 GLint level, GLint internalFormat,
4193 GLsizei width, GLsizei height, GLsizei depth,
4194 GLint border,
4195 GLenum format, GLenum type, const GLvoid * pixels)
4196 {
4197 GET_CURRENT_CONTEXT(ctx);
4198 if (target == GL_PROXY_TEXTURE_3D) {
4199 /* don't compile, execute immediately */
4200 CALL_TexImage3D(ctx->Exec, (target, level, internalFormat, width,
4201 height, depth, border, format, type,
4202 pixels));
4203 }
4204 else {
4205 Node *n;
4206 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4207 n = alloc_instruction(ctx, OPCODE_TEX_IMAGE3D, 10);
4208 if (n) {
4209 n[1].e = target;
4210 n[2].i = level;
4211 n[3].i = (GLint) internalFormat;
4212 n[4].i = (GLint) width;
4213 n[5].i = (GLint) height;
4214 n[6].i = (GLint) depth;
4215 n[7].i = border;
4216 n[8].e = format;
4217 n[9].e = type;
4218 n[10].data = unpack_image(ctx, 3, width, height, depth, format, type,
4219 pixels, &ctx->Unpack);
4220 }
4221 if (ctx->ExecuteFlag) {
4222 CALL_TexImage3D(ctx->Exec, (target, level, internalFormat, width,
4223 height, depth, border, format, type,
4224 pixels));
4225 }
4226 }
4227 }
4228
4229
4230 static void GLAPIENTRY
4231 save_TexSubImage1D(GLenum target, GLint level, GLint xoffset,
4232 GLsizei width, GLenum format, GLenum type,
4233 const GLvoid * pixels)
4234 {
4235 GET_CURRENT_CONTEXT(ctx);
4236 Node *n;
4237
4238 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4239
4240 n = alloc_instruction(ctx, OPCODE_TEX_SUB_IMAGE1D, 7);
4241 if (n) {
4242 n[1].e = target;
4243 n[2].i = level;
4244 n[3].i = xoffset;
4245 n[4].i = (GLint) width;
4246 n[5].e = format;
4247 n[6].e = type;
4248 n[7].data = unpack_image(ctx, 1, width, 1, 1, format, type,
4249 pixels, &ctx->Unpack);
4250 }
4251 if (ctx->ExecuteFlag) {
4252 CALL_TexSubImage1D(ctx->Exec, (target, level, xoffset, width,
4253 format, type, pixels));
4254 }
4255 }
4256
4257
4258 static void GLAPIENTRY
4259 save_TexSubImage2D(GLenum target, GLint level,
4260 GLint xoffset, GLint yoffset,
4261 GLsizei width, GLsizei height,
4262 GLenum format, GLenum type, const GLvoid * pixels)
4263 {
4264 GET_CURRENT_CONTEXT(ctx);
4265 Node *n;
4266
4267 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4268
4269 n = alloc_instruction(ctx, OPCODE_TEX_SUB_IMAGE2D, 9);
4270 if (n) {
4271 n[1].e = target;
4272 n[2].i = level;
4273 n[3].i = xoffset;
4274 n[4].i = yoffset;
4275 n[5].i = (GLint) width;
4276 n[6].i = (GLint) height;
4277 n[7].e = format;
4278 n[8].e = type;
4279 n[9].data = unpack_image(ctx, 2, width, height, 1, format, type,
4280 pixels, &ctx->Unpack);
4281 }
4282 if (ctx->ExecuteFlag) {
4283 CALL_TexSubImage2D(ctx->Exec, (target, level, xoffset, yoffset,
4284 width, height, format, type, pixels));
4285 }
4286 }
4287
4288
4289 static void GLAPIENTRY
4290 save_TexSubImage3D(GLenum target, GLint level,
4291 GLint xoffset, GLint yoffset, GLint zoffset,
4292 GLsizei width, GLsizei height, GLsizei depth,
4293 GLenum format, GLenum type, const GLvoid * pixels)
4294 {
4295 GET_CURRENT_CONTEXT(ctx);
4296 Node *n;
4297
4298 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4299
4300 n = alloc_instruction(ctx, OPCODE_TEX_SUB_IMAGE3D, 11);
4301 if (n) {
4302 n[1].e = target;
4303 n[2].i = level;
4304 n[3].i = xoffset;
4305 n[4].i = yoffset;
4306 n[5].i = zoffset;
4307 n[6].i = (GLint) width;
4308 n[7].i = (GLint) height;
4309 n[8].i = (GLint) depth;
4310 n[9].e = format;
4311 n[10].e = type;
4312 n[11].data = unpack_image(ctx, 3, width, height, depth, format, type,
4313 pixels, &ctx->Unpack);
4314 }
4315 if (ctx->ExecuteFlag) {
4316 CALL_TexSubImage3D(ctx->Exec, (target, level,
4317 xoffset, yoffset, zoffset,
4318 width, height, depth, format, type,
4319 pixels));
4320 }
4321 }
4322
4323
4324 static void GLAPIENTRY
4325 save_Translatef(GLfloat x, GLfloat y, GLfloat z)
4326 {
4327 GET_CURRENT_CONTEXT(ctx);
4328 Node *n;
4329 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4330 n = alloc_instruction(ctx, OPCODE_TRANSLATE, 3);
4331 if (n) {
4332 n[1].f = x;
4333 n[2].f = y;
4334 n[3].f = z;
4335 }
4336 if (ctx->ExecuteFlag) {
4337 CALL_Translatef(ctx->Exec, (x, y, z));
4338 }
4339 }
4340
4341
4342 static void GLAPIENTRY
4343 save_Translated(GLdouble x, GLdouble y, GLdouble z)
4344 {
4345 save_Translatef((GLfloat) x, (GLfloat) y, (GLfloat) z);
4346 }
4347
4348
4349
4350 static void GLAPIENTRY
4351 save_Viewport(GLint x, GLint y, GLsizei width, GLsizei height)
4352 {
4353 GET_CURRENT_CONTEXT(ctx);
4354 Node *n;
4355 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4356 n = alloc_instruction(ctx, OPCODE_VIEWPORT, 4);
4357 if (n) {
4358 n[1].i = x;
4359 n[2].i = y;
4360 n[3].i = (GLint) width;
4361 n[4].i = (GLint) height;
4362 }
4363 if (ctx->ExecuteFlag) {
4364 CALL_Viewport(ctx->Exec, (x, y, width, height));
4365 }
4366 }
4367
4368
4369 static void GLAPIENTRY
4370 save_WindowPos4fMESA(GLfloat x, GLfloat y, GLfloat z, GLfloat w)
4371 {
4372 GET_CURRENT_CONTEXT(ctx);
4373 Node *n;
4374 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4375 n = alloc_instruction(ctx, OPCODE_WINDOW_POS, 4);
4376 if (n) {
4377 n[1].f = x;
4378 n[2].f = y;
4379 n[3].f = z;
4380 n[4].f = w;
4381 }
4382 if (ctx->ExecuteFlag) {
4383 CALL_WindowPos4fMESA(ctx->Exec, (x, y, z, w));
4384 }
4385 }
4386
4387 static void GLAPIENTRY
4388 save_WindowPos2dMESA(GLdouble x, GLdouble y)
4389 {
4390 save_WindowPos4fMESA((GLfloat) x, (GLfloat) y, 0.0F, 1.0F);
4391 }
4392
4393 static void GLAPIENTRY
4394 save_WindowPos2fMESA(GLfloat x, GLfloat y)
4395 {
4396 save_WindowPos4fMESA(x, y, 0.0F, 1.0F);
4397 }
4398
4399 static void GLAPIENTRY
4400 save_WindowPos2iMESA(GLint x, GLint y)
4401 {
4402 save_WindowPos4fMESA((GLfloat) x, (GLfloat) y, 0.0F, 1.0F);
4403 }
4404
4405 static void GLAPIENTRY
4406 save_WindowPos2sMESA(GLshort x, GLshort y)
4407 {
4408 save_WindowPos4fMESA(x, y, 0.0F, 1.0F);
4409 }
4410
4411 static void GLAPIENTRY
4412 save_WindowPos3dMESA(GLdouble x, GLdouble y, GLdouble z)
4413 {
4414 save_WindowPos4fMESA((GLfloat) x, (GLfloat) y, (GLfloat) z, 1.0F);
4415 }
4416
4417 static void GLAPIENTRY
4418 save_WindowPos3fMESA(GLfloat x, GLfloat y, GLfloat z)
4419 {
4420 save_WindowPos4fMESA(x, y, z, 1.0F);
4421 }
4422
4423 static void GLAPIENTRY
4424 save_WindowPos3iMESA(GLint x, GLint y, GLint z)
4425 {
4426 save_WindowPos4fMESA((GLfloat) x, (GLfloat) y, (GLfloat) z, 1.0F);
4427 }
4428
4429 static void GLAPIENTRY
4430 save_WindowPos3sMESA(GLshort x, GLshort y, GLshort z)
4431 {
4432 save_WindowPos4fMESA(x, y, z, 1.0F);
4433 }
4434
4435 static void GLAPIENTRY
4436 save_WindowPos4dMESA(GLdouble x, GLdouble y, GLdouble z, GLdouble w)
4437 {
4438 save_WindowPos4fMESA((GLfloat) x, (GLfloat) y, (GLfloat) z, (GLfloat) w);
4439 }
4440
4441 static void GLAPIENTRY
4442 save_WindowPos4iMESA(GLint x, GLint y, GLint z, GLint w)
4443 {
4444 save_WindowPos4fMESA((GLfloat) x, (GLfloat) y, (GLfloat) z, (GLfloat) w);
4445 }
4446
4447 static void GLAPIENTRY
4448 save_WindowPos4sMESA(GLshort x, GLshort y, GLshort z, GLshort w)
4449 {
4450 save_WindowPos4fMESA(x, y, z, w);
4451 }
4452
4453 static void GLAPIENTRY
4454 save_WindowPos2dvMESA(const GLdouble * v)
4455 {
4456 save_WindowPos4fMESA((GLfloat) v[0], (GLfloat) v[1], 0.0F, 1.0F);
4457 }
4458
4459 static void GLAPIENTRY
4460 save_WindowPos2fvMESA(const GLfloat * v)
4461 {
4462 save_WindowPos4fMESA(v[0], v[1], 0.0F, 1.0F);
4463 }
4464
4465 static void GLAPIENTRY
4466 save_WindowPos2ivMESA(const GLint * v)
4467 {
4468 save_WindowPos4fMESA((GLfloat) v[0], (GLfloat) v[1], 0.0F, 1.0F);
4469 }
4470
4471 static void GLAPIENTRY
4472 save_WindowPos2svMESA(const GLshort * v)
4473 {
4474 save_WindowPos4fMESA(v[0], v[1], 0.0F, 1.0F);
4475 }
4476
4477 static void GLAPIENTRY
4478 save_WindowPos3dvMESA(const GLdouble * v)
4479 {
4480 save_WindowPos4fMESA((GLfloat) v[0], (GLfloat) v[1], (GLfloat) v[2], 1.0F);
4481 }
4482
4483 static void GLAPIENTRY
4484 save_WindowPos3fvMESA(const GLfloat * v)
4485 {
4486 save_WindowPos4fMESA(v[0], v[1], v[2], 1.0F);
4487 }
4488
4489 static void GLAPIENTRY
4490 save_WindowPos3ivMESA(const GLint * v)
4491 {
4492 save_WindowPos4fMESA((GLfloat) v[0], (GLfloat) v[1], (GLfloat) v[2], 1.0F);
4493 }
4494
4495 static void GLAPIENTRY
4496 save_WindowPos3svMESA(const GLshort * v)
4497 {
4498 save_WindowPos4fMESA(v[0], v[1], v[2], 1.0F);
4499 }
4500
4501 static void GLAPIENTRY
4502 save_WindowPos4dvMESA(const GLdouble * v)
4503 {
4504 save_WindowPos4fMESA((GLfloat) v[0], (GLfloat) v[1],
4505 (GLfloat) v[2], (GLfloat) v[3]);
4506 }
4507
4508 static void GLAPIENTRY
4509 save_WindowPos4fvMESA(const GLfloat * v)
4510 {
4511 save_WindowPos4fMESA(v[0], v[1], v[2], v[3]);
4512 }
4513
4514 static void GLAPIENTRY
4515 save_WindowPos4ivMESA(const GLint * v)
4516 {
4517 save_WindowPos4fMESA((GLfloat) v[0], (GLfloat) v[1],
4518 (GLfloat) v[2], (GLfloat) v[3]);
4519 }
4520
4521 static void GLAPIENTRY
4522 save_WindowPos4svMESA(const GLshort * v)
4523 {
4524 save_WindowPos4fMESA(v[0], v[1], v[2], v[3]);
4525 }
4526
4527
4528
4529 /* GL_ARB_multitexture */
4530 static void GLAPIENTRY
4531 save_ActiveTextureARB(GLenum target)
4532 {
4533 GET_CURRENT_CONTEXT(ctx);
4534 Node *n;
4535 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4536 n = alloc_instruction(ctx, OPCODE_ACTIVE_TEXTURE, 1);
4537 if (n) {
4538 n[1].e = target;
4539 }
4540 if (ctx->ExecuteFlag) {
4541 CALL_ActiveTexture(ctx->Exec, (target));
4542 }
4543 }
4544
4545
4546 /* GL_ARB_transpose_matrix */
4547
4548 static void GLAPIENTRY
4549 save_LoadTransposeMatrixdARB(const GLdouble m[16])
4550 {
4551 GLfloat tm[16];
4552 _math_transposefd(tm, m);
4553 save_LoadMatrixf(tm);
4554 }
4555
4556
4557 static void GLAPIENTRY
4558 save_LoadTransposeMatrixfARB(const GLfloat m[16])
4559 {
4560 GLfloat tm[16];
4561 _math_transposef(tm, m);
4562 save_LoadMatrixf(tm);
4563 }
4564
4565
4566 static void GLAPIENTRY
4567 save_MultTransposeMatrixdARB(const GLdouble m[16])
4568 {
4569 GLfloat tm[16];
4570 _math_transposefd(tm, m);
4571 save_MultMatrixf(tm);
4572 }
4573
4574
4575 static void GLAPIENTRY
4576 save_MultTransposeMatrixfARB(const GLfloat m[16])
4577 {
4578 GLfloat tm[16];
4579 _math_transposef(tm, m);
4580 save_MultMatrixf(tm);
4581 }
4582
4583 static GLvoid *copy_data(const GLvoid *data, GLsizei size, const char *func)
4584 {
4585 GET_CURRENT_CONTEXT(ctx);
4586 GLvoid *image;
4587
4588 if (!data)
4589 return NULL;
4590
4591 image = malloc(size);
4592 if (!image) {
4593 _mesa_error(ctx, GL_OUT_OF_MEMORY, "%s", func);
4594 return NULL;
4595 }
4596 memcpy(image, data, size);
4597
4598 return image;
4599 }
4600
4601
4602 /* GL_ARB_texture_compression */
4603 static void GLAPIENTRY
4604 save_CompressedTexImage1DARB(GLenum target, GLint level,
4605 GLenum internalFormat, GLsizei width,
4606 GLint border, GLsizei imageSize,
4607 const GLvoid * data)
4608 {
4609 GET_CURRENT_CONTEXT(ctx);
4610 if (target == GL_PROXY_TEXTURE_1D) {
4611 /* don't compile, execute immediately */
4612 CALL_CompressedTexImage1D(ctx->Exec, (target, level, internalFormat,
4613 width, border, imageSize,
4614 data));
4615 }
4616 else {
4617 Node *n;
4618 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4619
4620 n = alloc_instruction(ctx, OPCODE_COMPRESSED_TEX_IMAGE_1D, 7);
4621 if (n) {
4622 n[1].e = target;
4623 n[2].i = level;
4624 n[3].e = internalFormat;
4625 n[4].i = (GLint) width;
4626 n[5].i = border;
4627 n[6].i = imageSize;
4628 n[7].data = copy_data(data, imageSize, "glCompressedTexImage1DARB");
4629 }
4630 if (ctx->ExecuteFlag) {
4631 CALL_CompressedTexImage1D(ctx->Exec,
4632 (target, level, internalFormat, width,
4633 border, imageSize, data));
4634 }
4635 }
4636 }
4637
4638
4639 static void GLAPIENTRY
4640 save_CompressedTexImage2DARB(GLenum target, GLint level,
4641 GLenum internalFormat, GLsizei width,
4642 GLsizei height, GLint border, GLsizei imageSize,
4643 const GLvoid * data)
4644 {
4645 GET_CURRENT_CONTEXT(ctx);
4646 if (target == GL_PROXY_TEXTURE_2D) {
4647 /* don't compile, execute immediately */
4648 CALL_CompressedTexImage2D(ctx->Exec, (target, level, internalFormat,
4649 width, height, border,
4650 imageSize, data));
4651 }
4652 else {
4653 Node *n;
4654 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4655
4656 n = alloc_instruction(ctx, OPCODE_COMPRESSED_TEX_IMAGE_2D, 8);
4657 if (n) {
4658 n[1].e = target;
4659 n[2].i = level;
4660 n[3].e = internalFormat;
4661 n[4].i = (GLint) width;
4662 n[5].i = (GLint) height;
4663 n[6].i = border;
4664 n[7].i = imageSize;
4665 n[8].data = copy_data(data, imageSize, "glCompressedTexImage2DARB");
4666 }
4667 if (ctx->ExecuteFlag) {
4668 CALL_CompressedTexImage2D(ctx->Exec,
4669 (target, level, internalFormat, width,
4670 height, border, imageSize, data));
4671 }
4672 }
4673 }
4674
4675
4676 static void GLAPIENTRY
4677 save_CompressedTexImage3DARB(GLenum target, GLint level,
4678 GLenum internalFormat, GLsizei width,
4679 GLsizei height, GLsizei depth, GLint border,
4680 GLsizei imageSize, const GLvoid * data)
4681 {
4682 GET_CURRENT_CONTEXT(ctx);
4683 if (target == GL_PROXY_TEXTURE_3D) {
4684 /* don't compile, execute immediately */
4685 CALL_CompressedTexImage3D(ctx->Exec, (target, level, internalFormat,
4686 width, height, depth, border,
4687 imageSize, data));
4688 }
4689 else {
4690 Node *n;
4691 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4692
4693 n = alloc_instruction(ctx, OPCODE_COMPRESSED_TEX_IMAGE_3D, 9);
4694 if (n) {
4695 n[1].e = target;
4696 n[2].i = level;
4697 n[3].e = internalFormat;
4698 n[4].i = (GLint) width;
4699 n[5].i = (GLint) height;
4700 n[6].i = (GLint) depth;
4701 n[7].i = border;
4702 n[8].i = imageSize;
4703 n[9].data = copy_data(data, imageSize, "glCompressedTexImage3DARB");
4704 }
4705 if (ctx->ExecuteFlag) {
4706 CALL_CompressedTexImage3D(ctx->Exec,
4707 (target, level, internalFormat, width,
4708 height, depth, border, imageSize,
4709 data));
4710 }
4711 }
4712 }
4713
4714
4715 static void GLAPIENTRY
4716 save_CompressedTexSubImage1DARB(GLenum target, GLint level, GLint xoffset,
4717 GLsizei width, GLenum format,
4718 GLsizei imageSize, const GLvoid * data)
4719 {
4720 Node *n;
4721 GET_CURRENT_CONTEXT(ctx);
4722 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4723
4724 n = alloc_instruction(ctx, OPCODE_COMPRESSED_TEX_SUB_IMAGE_1D, 7);
4725 if (n) {
4726 n[1].e = target;
4727 n[2].i = level;
4728 n[3].i = xoffset;
4729 n[4].i = (GLint) width;
4730 n[5].e = format;
4731 n[6].i = imageSize;
4732 n[7].data = copy_data(data, imageSize, "glCompressedTexSubImage1DARB");
4733 }
4734 if (ctx->ExecuteFlag) {
4735 CALL_CompressedTexSubImage1D(ctx->Exec, (target, level, xoffset,
4736 width, format, imageSize,
4737 data));
4738 }
4739 }
4740
4741
4742 static void GLAPIENTRY
4743 save_CompressedTexSubImage2DARB(GLenum target, GLint level, GLint xoffset,
4744 GLint yoffset, GLsizei width, GLsizei height,
4745 GLenum format, GLsizei imageSize,
4746 const GLvoid * data)
4747 {
4748 Node *n;
4749 GET_CURRENT_CONTEXT(ctx);
4750 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4751
4752 n = alloc_instruction(ctx, OPCODE_COMPRESSED_TEX_SUB_IMAGE_2D, 9);
4753 if (n) {
4754 n[1].e = target;
4755 n[2].i = level;
4756 n[3].i = xoffset;
4757 n[4].i = yoffset;
4758 n[5].i = (GLint) width;
4759 n[6].i = (GLint) height;
4760 n[7].e = format;
4761 n[8].i = imageSize;
4762 n[9].data = copy_data(data, imageSize, "glCompressedTexSubImage2DARB");
4763 }
4764 if (ctx->ExecuteFlag) {
4765 CALL_CompressedTexSubImage2D(ctx->Exec,
4766 (target, level, xoffset, yoffset, width,
4767 height, format, imageSize, data));
4768 }
4769 }
4770
4771
4772 static void GLAPIENTRY
4773 save_CompressedTexSubImage3DARB(GLenum target, GLint level, GLint xoffset,
4774 GLint yoffset, GLint zoffset, GLsizei width,
4775 GLsizei height, GLsizei depth, GLenum format,
4776 GLsizei imageSize, const GLvoid * data)
4777 {
4778 Node *n;
4779 GET_CURRENT_CONTEXT(ctx);
4780 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4781
4782 n = alloc_instruction(ctx, OPCODE_COMPRESSED_TEX_SUB_IMAGE_3D, 11);
4783 if (n) {
4784 n[1].e = target;
4785 n[2].i = level;
4786 n[3].i = xoffset;
4787 n[4].i = yoffset;
4788 n[5].i = zoffset;
4789 n[6].i = (GLint) width;
4790 n[7].i = (GLint) height;
4791 n[8].i = (GLint) depth;
4792 n[9].e = format;
4793 n[10].i = imageSize;
4794 n[11].data = copy_data(data, imageSize, "glCompressedTexSubImage3DARB");
4795 }
4796 if (ctx->ExecuteFlag) {
4797 CALL_CompressedTexSubImage3D(ctx->Exec,
4798 (target, level, xoffset, yoffset,
4799 zoffset, width, height, depth, format,
4800 imageSize, data));
4801 }
4802 }
4803
4804
4805 /* GL_ARB_multisample */
4806 static void GLAPIENTRY
4807 save_SampleCoverageARB(GLclampf value, GLboolean invert)
4808 {
4809 GET_CURRENT_CONTEXT(ctx);
4810 Node *n;
4811 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4812 n = alloc_instruction(ctx, OPCODE_SAMPLE_COVERAGE, 2);
4813 if (n) {
4814 n[1].f = value;
4815 n[2].b = invert;
4816 }
4817 if (ctx->ExecuteFlag) {
4818 CALL_SampleCoverage(ctx->Exec, (value, invert));
4819 }
4820 }
4821
4822
4823 /*
4824 * GL_NV_fragment_program
4825 */
4826 static void GLAPIENTRY
4827 save_BindProgramNV(GLenum target, GLuint id)
4828 {
4829 GET_CURRENT_CONTEXT(ctx);
4830 Node *n;
4831 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4832 n = alloc_instruction(ctx, OPCODE_BIND_PROGRAM_NV, 2);
4833 if (n) {
4834 n[1].e = target;
4835 n[2].ui = id;
4836 }
4837 if (ctx->ExecuteFlag) {
4838 CALL_BindProgramARB(ctx->Exec, (target, id));
4839 }
4840 }
4841
4842 static void GLAPIENTRY
4843 save_ProgramEnvParameter4fARB(GLenum target, GLuint index,
4844 GLfloat x, GLfloat y, GLfloat z, GLfloat w)
4845 {
4846 GET_CURRENT_CONTEXT(ctx);
4847 Node *n;
4848 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4849 n = alloc_instruction(ctx, OPCODE_PROGRAM_ENV_PARAMETER_ARB, 6);
4850 if (n) {
4851 n[1].e = target;
4852 n[2].ui = index;
4853 n[3].f = x;
4854 n[4].f = y;
4855 n[5].f = z;
4856 n[6].f = w;
4857 }
4858 if (ctx->ExecuteFlag) {
4859 CALL_ProgramEnvParameter4fARB(ctx->Exec, (target, index, x, y, z, w));
4860 }
4861 }
4862
4863
4864 static void GLAPIENTRY
4865 save_ProgramEnvParameter4fvARB(GLenum target, GLuint index,
4866 const GLfloat *params)
4867 {
4868 save_ProgramEnvParameter4fARB(target, index, params[0], params[1],
4869 params[2], params[3]);
4870 }
4871
4872
4873 static void GLAPIENTRY
4874 save_ProgramEnvParameters4fvEXT(GLenum target, GLuint index, GLsizei count,
4875 const GLfloat * params)
4876 {
4877 GET_CURRENT_CONTEXT(ctx);
4878 Node *n;
4879 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4880
4881 if (count > 0) {
4882 GLint i;
4883 const GLfloat * p = params;
4884
4885 for (i = 0 ; i < count ; i++) {
4886 n = alloc_instruction(ctx, OPCODE_PROGRAM_ENV_PARAMETER_ARB, 6);
4887 if (n) {
4888 n[1].e = target;
4889 n[2].ui = index;
4890 n[3].f = p[0];
4891 n[4].f = p[1];
4892 n[5].f = p[2];
4893 n[6].f = p[3];
4894 p += 4;
4895 }
4896 }
4897 }
4898
4899 if (ctx->ExecuteFlag) {
4900 CALL_ProgramEnvParameters4fvEXT(ctx->Exec, (target, index, count, params));
4901 }
4902 }
4903
4904
4905 static void GLAPIENTRY
4906 save_ProgramEnvParameter4dARB(GLenum target, GLuint index,
4907 GLdouble x, GLdouble y, GLdouble z, GLdouble w)
4908 {
4909 save_ProgramEnvParameter4fARB(target, index,
4910 (GLfloat) x,
4911 (GLfloat) y, (GLfloat) z, (GLfloat) w);
4912 }
4913
4914
4915 static void GLAPIENTRY
4916 save_ProgramEnvParameter4dvARB(GLenum target, GLuint index,
4917 const GLdouble *params)
4918 {
4919 save_ProgramEnvParameter4fARB(target, index,
4920 (GLfloat) params[0],
4921 (GLfloat) params[1],
4922 (GLfloat) params[2], (GLfloat) params[3]);
4923 }
4924
4925
4926 static void GLAPIENTRY
4927 save_ProgramLocalParameter4fARB(GLenum target, GLuint index,
4928 GLfloat x, GLfloat y, GLfloat z, GLfloat w)
4929 {
4930 GET_CURRENT_CONTEXT(ctx);
4931 Node *n;
4932 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4933 n = alloc_instruction(ctx, OPCODE_PROGRAM_LOCAL_PARAMETER_ARB, 6);
4934 if (n) {
4935 n[1].e = target;
4936 n[2].ui = index;
4937 n[3].f = x;
4938 n[4].f = y;
4939 n[5].f = z;
4940 n[6].f = w;
4941 }
4942 if (ctx->ExecuteFlag) {
4943 CALL_ProgramLocalParameter4fARB(ctx->Exec, (target, index, x, y, z, w));
4944 }
4945 }
4946
4947
4948 static void GLAPIENTRY
4949 save_ProgramLocalParameter4fvARB(GLenum target, GLuint index,
4950 const GLfloat *params)
4951 {
4952 GET_CURRENT_CONTEXT(ctx);
4953 Node *n;
4954 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4955 n = alloc_instruction(ctx, OPCODE_PROGRAM_LOCAL_PARAMETER_ARB, 6);
4956 if (n) {
4957 n[1].e = target;
4958 n[2].ui = index;
4959 n[3].f = params[0];
4960 n[4].f = params[1];
4961 n[5].f = params[2];
4962 n[6].f = params[3];
4963 }
4964 if (ctx->ExecuteFlag) {
4965 CALL_ProgramLocalParameter4fvARB(ctx->Exec, (target, index, params));
4966 }
4967 }
4968
4969
4970 static void GLAPIENTRY
4971 save_ProgramLocalParameters4fvEXT(GLenum target, GLuint index, GLsizei count,
4972 const GLfloat *params)
4973 {
4974 GET_CURRENT_CONTEXT(ctx);
4975 Node *n;
4976 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
4977
4978 if (count > 0) {
4979 GLint i;
4980 const GLfloat * p = params;
4981
4982 for (i = 0 ; i < count ; i++) {
4983 n = alloc_instruction(ctx, OPCODE_PROGRAM_LOCAL_PARAMETER_ARB, 6);
4984 if (n) {
4985 n[1].e = target;
4986 n[2].ui = index;
4987 n[3].f = p[0];
4988 n[4].f = p[1];
4989 n[5].f = p[2];
4990 n[6].f = p[3];
4991 p += 4;
4992 }
4993 }
4994 }
4995
4996 if (ctx->ExecuteFlag) {
4997 CALL_ProgramLocalParameters4fvEXT(ctx->Exec, (target, index, count, params));
4998 }
4999 }
5000
5001
5002 static void GLAPIENTRY
5003 save_ProgramLocalParameter4dARB(GLenum target, GLuint index,
5004 GLdouble x, GLdouble y,
5005 GLdouble z, GLdouble w)
5006 {
5007 GET_CURRENT_CONTEXT(ctx);
5008 Node *n;
5009 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5010 n = alloc_instruction(ctx, OPCODE_PROGRAM_LOCAL_PARAMETER_ARB, 6);
5011 if (n) {
5012 n[1].e = target;
5013 n[2].ui = index;
5014 n[3].f = (GLfloat) x;
5015 n[4].f = (GLfloat) y;
5016 n[5].f = (GLfloat) z;
5017 n[6].f = (GLfloat) w;
5018 }
5019 if (ctx->ExecuteFlag) {
5020 CALL_ProgramLocalParameter4dARB(ctx->Exec, (target, index, x, y, z, w));
5021 }
5022 }
5023
5024
5025 static void GLAPIENTRY
5026 save_ProgramLocalParameter4dvARB(GLenum target, GLuint index,
5027 const GLdouble *params)
5028 {
5029 GET_CURRENT_CONTEXT(ctx);
5030 Node *n;
5031 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5032 n = alloc_instruction(ctx, OPCODE_PROGRAM_LOCAL_PARAMETER_ARB, 6);
5033 if (n) {
5034 n[1].e = target;
5035 n[2].ui = index;
5036 n[3].f = (GLfloat) params[0];
5037 n[4].f = (GLfloat) params[1];
5038 n[5].f = (GLfloat) params[2];
5039 n[6].f = (GLfloat) params[3];
5040 }
5041 if (ctx->ExecuteFlag) {
5042 CALL_ProgramLocalParameter4dvARB(ctx->Exec, (target, index, params));
5043 }
5044 }
5045
5046
5047 /* GL_EXT_stencil_two_side */
5048 static void GLAPIENTRY
5049 save_ActiveStencilFaceEXT(GLenum face)
5050 {
5051 GET_CURRENT_CONTEXT(ctx);
5052 Node *n;
5053 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5054 n = alloc_instruction(ctx, OPCODE_ACTIVE_STENCIL_FACE_EXT, 1);
5055 if (n) {
5056 n[1].e = face;
5057 }
5058 if (ctx->ExecuteFlag) {
5059 CALL_ActiveStencilFaceEXT(ctx->Exec, (face));
5060 }
5061 }
5062
5063
5064 /* GL_EXT_depth_bounds_test */
5065 static void GLAPIENTRY
5066 save_DepthBoundsEXT(GLclampd zmin, GLclampd zmax)
5067 {
5068 GET_CURRENT_CONTEXT(ctx);
5069 Node *n;
5070 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5071 n = alloc_instruction(ctx, OPCODE_DEPTH_BOUNDS_EXT, 2);
5072 if (n) {
5073 n[1].f = (GLfloat) zmin;
5074 n[2].f = (GLfloat) zmax;
5075 }
5076 if (ctx->ExecuteFlag) {
5077 CALL_DepthBoundsEXT(ctx->Exec, (zmin, zmax));
5078 }
5079 }
5080
5081
5082
5083 static void GLAPIENTRY
5084 save_ProgramStringARB(GLenum target, GLenum format, GLsizei len,
5085 const GLvoid * string)
5086 {
5087 GET_CURRENT_CONTEXT(ctx);
5088 Node *n;
5089
5090 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5091
5092 n = alloc_instruction(ctx, OPCODE_PROGRAM_STRING_ARB, 4);
5093 if (n) {
5094 GLubyte *programCopy = malloc(len);
5095 if (!programCopy) {
5096 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glProgramStringARB");
5097 return;
5098 }
5099 memcpy(programCopy, string, len);
5100 n[1].e = target;
5101 n[2].e = format;
5102 n[3].i = len;
5103 n[4].data = programCopy;
5104 }
5105 if (ctx->ExecuteFlag) {
5106 CALL_ProgramStringARB(ctx->Exec, (target, format, len, string));
5107 }
5108 }
5109
5110
5111 static void GLAPIENTRY
5112 save_BeginQueryARB(GLenum target, GLuint id)
5113 {
5114 GET_CURRENT_CONTEXT(ctx);
5115 Node *n;
5116 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5117 n = alloc_instruction(ctx, OPCODE_BEGIN_QUERY_ARB, 2);
5118 if (n) {
5119 n[1].e = target;
5120 n[2].ui = id;
5121 }
5122 if (ctx->ExecuteFlag) {
5123 CALL_BeginQuery(ctx->Exec, (target, id));
5124 }
5125 }
5126
5127 static void GLAPIENTRY
5128 save_EndQueryARB(GLenum target)
5129 {
5130 GET_CURRENT_CONTEXT(ctx);
5131 Node *n;
5132 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5133 n = alloc_instruction(ctx, OPCODE_END_QUERY_ARB, 1);
5134 if (n) {
5135 n[1].e = target;
5136 }
5137 if (ctx->ExecuteFlag) {
5138 CALL_EndQuery(ctx->Exec, (target));
5139 }
5140 }
5141
5142 static void GLAPIENTRY
5143 save_QueryCounter(GLuint id, GLenum target)
5144 {
5145 GET_CURRENT_CONTEXT(ctx);
5146 Node *n;
5147 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5148 n = alloc_instruction(ctx, OPCODE_QUERY_COUNTER, 2);
5149 if (n) {
5150 n[1].ui = id;
5151 n[2].e = target;
5152 }
5153 if (ctx->ExecuteFlag) {
5154 CALL_QueryCounter(ctx->Exec, (id, target));
5155 }
5156 }
5157
5158 static void GLAPIENTRY
5159 save_BeginQueryIndexed(GLenum target, GLuint index, GLuint id)
5160 {
5161 GET_CURRENT_CONTEXT(ctx);
5162 Node *n;
5163 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5164 n = alloc_instruction(ctx, OPCODE_BEGIN_QUERY_INDEXED, 3);
5165 if (n) {
5166 n[1].e = target;
5167 n[2].ui = index;
5168 n[3].ui = id;
5169 }
5170 if (ctx->ExecuteFlag) {
5171 CALL_BeginQueryIndexed(ctx->Exec, (target, index, id));
5172 }
5173 }
5174
5175 static void GLAPIENTRY
5176 save_EndQueryIndexed(GLenum target, GLuint index)
5177 {
5178 GET_CURRENT_CONTEXT(ctx);
5179 Node *n;
5180 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5181 n = alloc_instruction(ctx, OPCODE_END_QUERY_INDEXED, 2);
5182 if (n) {
5183 n[1].e = target;
5184 n[2].ui = index;
5185 }
5186 if (ctx->ExecuteFlag) {
5187 CALL_EndQueryIndexed(ctx->Exec, (target, index));
5188 }
5189 }
5190
5191
5192 static void GLAPIENTRY
5193 save_DrawBuffersARB(GLsizei count, const GLenum * buffers)
5194 {
5195 GET_CURRENT_CONTEXT(ctx);
5196 Node *n;
5197 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
5198 n = alloc_instruction(ctx, OPCODE_DRAW_BUFFERS_ARB, 1 + MAX_DRAW_BUFFERS);
5199 if (n) {
5200 GLint i;
5201 n[1].i = count;
5202 if (count > MAX_DRAW_BUFFERS)
5203 count = MAX_DRAW_BUFFERS;
5204 for (i = 0; i < count; i++) {
5205 n[2 + i].e = buffers[i];
5206 }
5207 }
5208 if (ctx->ExecuteFlag) {
5209 CALL_DrawBuffers(ctx->Exec, (count, buffers));
5210 }
5211 }
5212
5213 static void GLAPIENTRY
5214 save_TexBumpParameterfvATI(GLenum pname, const GLfloat *param)
5215 {
5216 GET_CURRENT_CONTEXT(ctx);
5217 Node *n;
5218
5219 n = alloc_instruction(ctx, OPCODE_TEX_BUMP_PARAMETER_ATI, 5);
5220 if (n) {
5221 n[1].ui = pname;
5222 n[2].f = param[0];
5223 n[3].f = param[1];
5224 n[4].f = param[2];
5225 n[5].f = param[3];
5226 }
5227 if (ctx->ExecuteFlag) {
5228 CALL_TexBumpParameterfvATI(ctx->Exec, (pname, param));
5229 }
5230 }
5231
5232 static void GLAPIENTRY
5233 save_TexBumpParameterivATI(GLenum pname, const GLint *param)
5234 {
5235 GLfloat p[4];
5236 p[0] = INT_TO_FLOAT(param[0]);
5237 p[1] = INT_TO_FLOAT(param[1]);
5238 p[2] = INT_TO_FLOAT(param[2]);
5239 p[3] = INT_TO_FLOAT(param[3]);
5240 save_TexBumpParameterfvATI(pname, p);
5241 }
5242
5243 static void GLAPIENTRY
5244 save_BindFragmentShaderATI(GLuint id)
5245 {
5246 GET_CURRENT_CONTEXT(ctx);
5247 Node *n;
5248
5249 n = alloc_instruction(ctx, OPCODE_BIND_FRAGMENT_SHADER_ATI, 1);
5250 if (n) {
5251 n[1].ui = id;
5252 }
5253 if (ctx->ExecuteFlag) {
5254 CALL_BindFragmentShaderATI(ctx->Exec, (id));
5255 }
5256 }
5257
5258 static void GLAPIENTRY
5259 save_SetFragmentShaderConstantATI(GLuint dst, const GLfloat *value)
5260 {
5261 GET_CURRENT_CONTEXT(ctx);
5262 Node *n;
5263
5264 n = alloc_instruction(ctx, OPCODE_SET_FRAGMENT_SHADER_CONSTANTS_ATI, 5);
5265 if (n) {
5266 n[1].ui = dst;
5267 n[2].f = value[0];
5268 n[3].f = value[1];
5269 n[4].f = value[2];
5270 n[5].f = value[3];
5271 }
5272 if (ctx->ExecuteFlag) {
5273 CALL_SetFragmentShaderConstantATI(ctx->Exec, (dst, value));
5274 }
5275 }
5276
5277 static void GLAPIENTRY
5278 save_Attr1fNV(GLenum attr, GLfloat x)
5279 {
5280 GET_CURRENT_CONTEXT(ctx);
5281 Node *n;
5282 SAVE_FLUSH_VERTICES(ctx);
5283 n = alloc_instruction(ctx, OPCODE_ATTR_1F_NV, 2);
5284 if (n) {
5285 n[1].e = attr;
5286 n[2].f = x;
5287 }
5288
5289 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5290 ctx->ListState.ActiveAttribSize[attr] = 1;
5291 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, 0, 0, 1);
5292
5293 if (ctx->ExecuteFlag) {
5294 CALL_VertexAttrib1fNV(ctx->Exec, (attr, x));
5295 }
5296 }
5297
5298 static void GLAPIENTRY
5299 save_Attr2fNV(GLenum attr, GLfloat x, GLfloat y)
5300 {
5301 GET_CURRENT_CONTEXT(ctx);
5302 Node *n;
5303 SAVE_FLUSH_VERTICES(ctx);
5304 n = alloc_instruction(ctx, OPCODE_ATTR_2F_NV, 3);
5305 if (n) {
5306 n[1].e = attr;
5307 n[2].f = x;
5308 n[3].f = y;
5309 }
5310
5311 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5312 ctx->ListState.ActiveAttribSize[attr] = 2;
5313 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, y, 0, 1);
5314
5315 if (ctx->ExecuteFlag) {
5316 CALL_VertexAttrib2fNV(ctx->Exec, (attr, x, y));
5317 }
5318 }
5319
5320 static void GLAPIENTRY
5321 save_Attr3fNV(GLenum attr, GLfloat x, GLfloat y, GLfloat z)
5322 {
5323 GET_CURRENT_CONTEXT(ctx);
5324 Node *n;
5325 SAVE_FLUSH_VERTICES(ctx);
5326 n = alloc_instruction(ctx, OPCODE_ATTR_3F_NV, 4);
5327 if (n) {
5328 n[1].e = attr;
5329 n[2].f = x;
5330 n[3].f = y;
5331 n[4].f = z;
5332 }
5333
5334 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5335 ctx->ListState.ActiveAttribSize[attr] = 3;
5336 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, y, z, 1);
5337
5338 if (ctx->ExecuteFlag) {
5339 CALL_VertexAttrib3fNV(ctx->Exec, (attr, x, y, z));
5340 }
5341 }
5342
5343 static void GLAPIENTRY
5344 save_Attr4fNV(GLenum attr, GLfloat x, GLfloat y, GLfloat z, GLfloat w)
5345 {
5346 GET_CURRENT_CONTEXT(ctx);
5347 Node *n;
5348 SAVE_FLUSH_VERTICES(ctx);
5349 n = alloc_instruction(ctx, OPCODE_ATTR_4F_NV, 5);
5350 if (n) {
5351 n[1].e = attr;
5352 n[2].f = x;
5353 n[3].f = y;
5354 n[4].f = z;
5355 n[5].f = w;
5356 }
5357
5358 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5359 ctx->ListState.ActiveAttribSize[attr] = 4;
5360 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, y, z, w);
5361
5362 if (ctx->ExecuteFlag) {
5363 CALL_VertexAttrib4fNV(ctx->Exec, (attr, x, y, z, w));
5364 }
5365 }
5366
5367
5368 static void GLAPIENTRY
5369 save_Attr1fARB(GLenum attr, GLfloat x)
5370 {
5371 GET_CURRENT_CONTEXT(ctx);
5372 Node *n;
5373 SAVE_FLUSH_VERTICES(ctx);
5374 n = alloc_instruction(ctx, OPCODE_ATTR_1F_ARB, 2);
5375 if (n) {
5376 n[1].e = attr;
5377 n[2].f = x;
5378 }
5379
5380 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5381 ctx->ListState.ActiveAttribSize[attr] = 1;
5382 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, 0, 0, 1);
5383
5384 if (ctx->ExecuteFlag) {
5385 CALL_VertexAttrib1fARB(ctx->Exec, (attr, x));
5386 }
5387 }
5388
5389 static void GLAPIENTRY
5390 save_Attr2fARB(GLenum attr, GLfloat x, GLfloat y)
5391 {
5392 GET_CURRENT_CONTEXT(ctx);
5393 Node *n;
5394 SAVE_FLUSH_VERTICES(ctx);
5395 n = alloc_instruction(ctx, OPCODE_ATTR_2F_ARB, 3);
5396 if (n) {
5397 n[1].e = attr;
5398 n[2].f = x;
5399 n[3].f = y;
5400 }
5401
5402 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5403 ctx->ListState.ActiveAttribSize[attr] = 2;
5404 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, y, 0, 1);
5405
5406 if (ctx->ExecuteFlag) {
5407 CALL_VertexAttrib2fARB(ctx->Exec, (attr, x, y));
5408 }
5409 }
5410
5411 static void GLAPIENTRY
5412 save_Attr3fARB(GLenum attr, GLfloat x, GLfloat y, GLfloat z)
5413 {
5414 GET_CURRENT_CONTEXT(ctx);
5415 Node *n;
5416 SAVE_FLUSH_VERTICES(ctx);
5417 n = alloc_instruction(ctx, OPCODE_ATTR_3F_ARB, 4);
5418 if (n) {
5419 n[1].e = attr;
5420 n[2].f = x;
5421 n[3].f = y;
5422 n[4].f = z;
5423 }
5424
5425 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5426 ctx->ListState.ActiveAttribSize[attr] = 3;
5427 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, y, z, 1);
5428
5429 if (ctx->ExecuteFlag) {
5430 CALL_VertexAttrib3fARB(ctx->Exec, (attr, x, y, z));
5431 }
5432 }
5433
5434 static void GLAPIENTRY
5435 save_Attr4fARB(GLenum attr, GLfloat x, GLfloat y, GLfloat z, GLfloat w)
5436 {
5437 GET_CURRENT_CONTEXT(ctx);
5438 Node *n;
5439 SAVE_FLUSH_VERTICES(ctx);
5440 n = alloc_instruction(ctx, OPCODE_ATTR_4F_ARB, 5);
5441 if (n) {
5442 n[1].e = attr;
5443 n[2].f = x;
5444 n[3].f = y;
5445 n[4].f = z;
5446 n[5].f = w;
5447 }
5448
5449 ASSERT(attr < MAX_VERTEX_GENERIC_ATTRIBS);
5450 ctx->ListState.ActiveAttribSize[attr] = 4;
5451 ASSIGN_4V(ctx->ListState.CurrentAttrib[attr], x, y, z, w);
5452
5453 if (ctx->ExecuteFlag) {
5454 CALL_VertexAttrib4fARB(ctx->Exec, (attr, x, y, z, w));
5455 }
5456 }
5457
5458
5459 static void GLAPIENTRY
5460 save_EvalCoord1f(GLfloat x)
5461 {
5462 GET_CURRENT_CONTEXT(ctx);
5463 Node *n;
5464 SAVE_FLUSH_VERTICES(ctx);
5465 n = alloc_instruction(ctx, OPCODE_EVAL_C1, 1);
5466 if (n) {
5467 n[1].f = x;
5468 }
5469 if (ctx->ExecuteFlag) {
5470 CALL_EvalCoord1f(ctx->Exec, (x));
5471 }
5472 }
5473
5474 static void GLAPIENTRY
5475 save_EvalCoord1fv(const GLfloat * v)
5476 {
5477 save_EvalCoord1f(v[0]);
5478 }
5479
5480 static void GLAPIENTRY
5481 save_EvalCoord2f(GLfloat x, GLfloat y)
5482 {
5483 GET_CURRENT_CONTEXT(ctx);
5484 Node *n;
5485 SAVE_FLUSH_VERTICES(ctx);
5486 n = alloc_instruction(ctx, OPCODE_EVAL_C2, 2);
5487 if (n) {
5488 n[1].f = x;
5489 n[2].f = y;
5490 }
5491 if (ctx->ExecuteFlag) {
5492 CALL_EvalCoord2f(ctx->Exec, (x, y));
5493 }
5494 }
5495
5496 static void GLAPIENTRY
5497 save_EvalCoord2fv(const GLfloat * v)
5498 {
5499 save_EvalCoord2f(v[0], v[1]);
5500 }
5501
5502
5503 static void GLAPIENTRY
5504 save_EvalPoint1(GLint x)
5505 {
5506 GET_CURRENT_CONTEXT(ctx);
5507 Node *n;
5508 SAVE_FLUSH_VERTICES(ctx);
5509 n = alloc_instruction(ctx, OPCODE_EVAL_P1, 1);
5510 if (n) {
5511 n[1].i = x;
5512 }
5513 if (ctx->ExecuteFlag) {
5514 CALL_EvalPoint1(ctx->Exec, (x));
5515 }
5516 }
5517
5518 static void GLAPIENTRY
5519 save_EvalPoint2(GLint x, GLint y)
5520 {
5521 GET_CURRENT_CONTEXT(ctx);
5522 Node *n;
5523 SAVE_FLUSH_VERTICES(ctx);
5524 n = alloc_instruction(ctx, OPCODE_EVAL_P2, 2);
5525 if (n) {
5526 n[1].i = x;
5527 n[2].i = y;
5528 }
5529 if (ctx->ExecuteFlag) {
5530 CALL_EvalPoint2(ctx->Exec, (x, y));
5531 }
5532 }
5533
5534 static void GLAPIENTRY
5535 save_Indexf(GLfloat x)
5536 {
5537 save_Attr1fNV(VERT_ATTRIB_COLOR_INDEX, x);
5538 }
5539
5540 static void GLAPIENTRY
5541 save_Indexfv(const GLfloat * v)
5542 {
5543 save_Attr1fNV(VERT_ATTRIB_COLOR_INDEX, v[0]);
5544 }
5545
5546 static void GLAPIENTRY
5547 save_EdgeFlag(GLboolean x)
5548 {
5549 save_Attr1fNV(VERT_ATTRIB_EDGEFLAG, x ? 1.0f : 0.0f);
5550 }
5551
5552
5553 /**
5554 * Compare 'count' elements of vectors 'a' and 'b'.
5555 * \return GL_TRUE if equal, GL_FALSE if different.
5556 */
5557 static inline GLboolean
5558 compare_vec(const GLfloat *a, const GLfloat *b, GLuint count)
5559 {
5560 return memcmp( a, b, count * sizeof(GLfloat) ) == 0;
5561 }
5562
5563
5564 /**
5565 * This glMaterial function is used for glMaterial calls that are outside
5566 * a glBegin/End pair. For glMaterial inside glBegin/End, see the VBO code.
5567 */
5568 static void GLAPIENTRY
5569 save_Materialfv(GLenum face, GLenum pname, const GLfloat * param)
5570 {
5571 GET_CURRENT_CONTEXT(ctx);
5572 Node *n;
5573 int args, i;
5574 GLuint bitmask;
5575
5576 switch (face) {
5577 case GL_BACK:
5578 case GL_FRONT:
5579 case GL_FRONT_AND_BACK:
5580 break;
5581 default:
5582 _mesa_compile_error(ctx, GL_INVALID_ENUM, "glMaterial(face)");
5583 return;
5584 }
5585
5586 switch (pname) {
5587 case GL_EMISSION:
5588 case GL_AMBIENT:
5589 case GL_DIFFUSE:
5590 case GL_SPECULAR:
5591 case GL_AMBIENT_AND_DIFFUSE:
5592 args = 4;
5593 break;
5594 case GL_SHININESS:
5595 args = 1;
5596 break;
5597 case GL_COLOR_INDEXES:
5598 args = 3;
5599 break;
5600 default:
5601 _mesa_compile_error(ctx, GL_INVALID_ENUM, "glMaterial(pname)");
5602 return;
5603 }
5604
5605 if (ctx->ExecuteFlag) {
5606 CALL_Materialfv(ctx->Exec, (face, pname, param));
5607 }
5608
5609 bitmask = _mesa_material_bitmask(ctx, face, pname, ~0, NULL);
5610
5611 /* Try to eliminate redundant statechanges. Because it is legal to
5612 * call glMaterial even inside begin/end calls, don't need to worry
5613 * about ctx->Driver.CurrentSavePrimitive here.
5614 */
5615 for (i = 0; i < MAT_ATTRIB_MAX; i++) {
5616 if (bitmask & (1 << i)) {
5617 if (ctx->ListState.ActiveMaterialSize[i] == args &&
5618 compare_vec(ctx->ListState.CurrentMaterial[i], param, args)) {
5619 /* no change in material value */
5620 bitmask &= ~(1 << i);
5621 }
5622 else {
5623 ctx->ListState.ActiveMaterialSize[i] = args;
5624 COPY_SZ_4V(ctx->ListState.CurrentMaterial[i], args, param);
5625 }
5626 }
5627 }
5628
5629 /* If this call has no effect, return early */
5630 if (bitmask == 0)
5631 return;
5632
5633 SAVE_FLUSH_VERTICES(ctx);
5634
5635 n = alloc_instruction(ctx, OPCODE_MATERIAL, 6);
5636 if (n) {
5637 n[1].e = face;
5638 n[2].e = pname;
5639 for (i = 0; i < args; i++)
5640 n[3 + i].f = param[i];
5641 }
5642 }
5643
5644 static void GLAPIENTRY
5645 save_Begin(GLenum mode)
5646 {
5647 GET_CURRENT_CONTEXT(ctx);
5648 Node *n;
5649 GLboolean error = GL_FALSE;
5650
5651 if (ctx->ExecuteFlag && !_mesa_valid_prim_mode(ctx, mode, "glBegin")) {
5652 error = GL_TRUE;
5653 }
5654 else if (ctx->Driver.CurrentSavePrimitive == PRIM_UNKNOWN) {
5655 /* Typically the first begin. This may raise an error on
5656 * playback, depending on whether CallList is issued from inside
5657 * a begin/end or not.
5658 */
5659 ctx->Driver.CurrentSavePrimitive = PRIM_INSIDE_UNKNOWN_PRIM;
5660 }
5661 else if (ctx->Driver.CurrentSavePrimitive == PRIM_OUTSIDE_BEGIN_END) {
5662 ctx->Driver.CurrentSavePrimitive = mode;
5663 }
5664 else {
5665 _mesa_compile_error(ctx, GL_INVALID_OPERATION, "recursive begin");
5666 error = GL_TRUE;
5667 }
5668
5669 if (!error) {
5670 /* Give the driver an opportunity to hook in an optimized
5671 * display list compiler.
5672 */
5673 if (ctx->Driver.NotifySaveBegin(ctx, mode))
5674 return;
5675
5676 SAVE_FLUSH_VERTICES(ctx);
5677 n = alloc_instruction(ctx, OPCODE_BEGIN, 1);
5678 if (n) {
5679 n[1].e = mode;
5680 }
5681 }
5682
5683 if (ctx->ExecuteFlag) {
5684 CALL_Begin(ctx->Exec, (mode));
5685 }
5686 }
5687
5688 static void GLAPIENTRY
5689 save_End(void)
5690 {
5691 GET_CURRENT_CONTEXT(ctx);
5692 SAVE_FLUSH_VERTICES(ctx);
5693 (void) alloc_instruction(ctx, OPCODE_END, 0);
5694 ctx->Driver.CurrentSavePrimitive = PRIM_OUTSIDE_BEGIN_END;
5695 if (ctx->ExecuteFlag) {
5696 CALL_End(ctx->Exec, ());
5697 }
5698 }
5699
5700 static void GLAPIENTRY
5701 save_Rectf(GLfloat a, GLfloat b, GLfloat c, GLfloat d)
5702 {
5703 GET_CURRENT_CONTEXT(ctx);
5704 Node *n;
5705 SAVE_FLUSH_VERTICES(ctx);
5706 n = alloc_instruction(ctx, OPCODE_RECTF, 4);
5707 if (n) {
5708 n[1].f = a;
5709 n[2].f = b;
5710 n[3].f = c;
5711 n[4].f = d;
5712 }
5713 if (ctx->ExecuteFlag) {
5714 CALL_Rectf(ctx->Exec, (a, b, c, d));
5715 }
5716 }
5717
5718
5719 static void GLAPIENTRY
5720 save_Vertex2f(GLfloat x, GLfloat y)
5721 {
5722 save_Attr2fNV(VERT_ATTRIB_POS, x, y);
5723 }
5724
5725 static void GLAPIENTRY
5726 save_Vertex2fv(const GLfloat * v)
5727 {
5728 save_Attr2fNV(VERT_ATTRIB_POS, v[0], v[1]);
5729 }
5730
5731 static void GLAPIENTRY
5732 save_Vertex3f(GLfloat x, GLfloat y, GLfloat z)
5733 {
5734 save_Attr3fNV(VERT_ATTRIB_POS, x, y, z);
5735 }
5736
5737 static void GLAPIENTRY
5738 save_Vertex3fv(const GLfloat * v)
5739 {
5740 save_Attr3fNV(VERT_ATTRIB_POS, v[0], v[1], v[2]);
5741 }
5742
5743 static void GLAPIENTRY
5744 save_Vertex4f(GLfloat x, GLfloat y, GLfloat z, GLfloat w)
5745 {
5746 save_Attr4fNV(VERT_ATTRIB_POS, x, y, z, w);
5747 }
5748
5749 static void GLAPIENTRY
5750 save_Vertex4fv(const GLfloat * v)
5751 {
5752 save_Attr4fNV(VERT_ATTRIB_POS, v[0], v[1], v[2], v[3]);
5753 }
5754
5755 static void GLAPIENTRY
5756 save_TexCoord1f(GLfloat x)
5757 {
5758 save_Attr1fNV(VERT_ATTRIB_TEX0, x);
5759 }
5760
5761 static void GLAPIENTRY
5762 save_TexCoord1fv(const GLfloat * v)
5763 {
5764 save_Attr1fNV(VERT_ATTRIB_TEX0, v[0]);
5765 }
5766
5767 static void GLAPIENTRY
5768 save_TexCoord2f(GLfloat x, GLfloat y)
5769 {
5770 save_Attr2fNV(VERT_ATTRIB_TEX0, x, y);
5771 }
5772
5773 static void GLAPIENTRY
5774 save_TexCoord2fv(const GLfloat * v)
5775 {
5776 save_Attr2fNV(VERT_ATTRIB_TEX0, v[0], v[1]);
5777 }
5778
5779 static void GLAPIENTRY
5780 save_TexCoord3f(GLfloat x, GLfloat y, GLfloat z)
5781 {
5782 save_Attr3fNV(VERT_ATTRIB_TEX0, x, y, z);
5783 }
5784
5785 static void GLAPIENTRY
5786 save_TexCoord3fv(const GLfloat * v)
5787 {
5788 save_Attr3fNV(VERT_ATTRIB_TEX0, v[0], v[1], v[2]);
5789 }
5790
5791 static void GLAPIENTRY
5792 save_TexCoord4f(GLfloat x, GLfloat y, GLfloat z, GLfloat w)
5793 {
5794 save_Attr4fNV(VERT_ATTRIB_TEX0, x, y, z, w);
5795 }
5796
5797 static void GLAPIENTRY
5798 save_TexCoord4fv(const GLfloat * v)
5799 {
5800 save_Attr4fNV(VERT_ATTRIB_TEX0, v[0], v[1], v[2], v[3]);
5801 }
5802
5803 static void GLAPIENTRY
5804 save_Normal3f(GLfloat x, GLfloat y, GLfloat z)
5805 {
5806 save_Attr3fNV(VERT_ATTRIB_NORMAL, x, y, z);
5807 }
5808
5809 static void GLAPIENTRY
5810 save_Normal3fv(const GLfloat * v)
5811 {
5812 save_Attr3fNV(VERT_ATTRIB_NORMAL, v[0], v[1], v[2]);
5813 }
5814
5815 static void GLAPIENTRY
5816 save_FogCoordfEXT(GLfloat x)
5817 {
5818 save_Attr1fNV(VERT_ATTRIB_FOG, x);
5819 }
5820
5821 static void GLAPIENTRY
5822 save_FogCoordfvEXT(const GLfloat * v)
5823 {
5824 save_Attr1fNV(VERT_ATTRIB_FOG, v[0]);
5825 }
5826
5827 static void GLAPIENTRY
5828 save_Color3f(GLfloat x, GLfloat y, GLfloat z)
5829 {
5830 save_Attr3fNV(VERT_ATTRIB_COLOR0, x, y, z);
5831 }
5832
5833 static void GLAPIENTRY
5834 save_Color3fv(const GLfloat * v)
5835 {
5836 save_Attr3fNV(VERT_ATTRIB_COLOR0, v[0], v[1], v[2]);
5837 }
5838
5839 static void GLAPIENTRY
5840 save_Color4f(GLfloat x, GLfloat y, GLfloat z, GLfloat w)
5841 {
5842 save_Attr4fNV(VERT_ATTRIB_COLOR0, x, y, z, w);
5843 }
5844
5845 static void GLAPIENTRY
5846 save_Color4fv(const GLfloat * v)
5847 {
5848 save_Attr4fNV(VERT_ATTRIB_COLOR0, v[0], v[1], v[2], v[3]);
5849 }
5850
5851 static void GLAPIENTRY
5852 save_SecondaryColor3fEXT(GLfloat x, GLfloat y, GLfloat z)
5853 {
5854 save_Attr3fNV(VERT_ATTRIB_COLOR1, x, y, z);
5855 }
5856
5857 static void GLAPIENTRY
5858 save_SecondaryColor3fvEXT(const GLfloat * v)
5859 {
5860 save_Attr3fNV(VERT_ATTRIB_COLOR1, v[0], v[1], v[2]);
5861 }
5862
5863
5864 /* Just call the respective ATTR for texcoord
5865 */
5866 static void GLAPIENTRY
5867 save_MultiTexCoord1f(GLenum target, GLfloat x)
5868 {
5869 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5870 save_Attr1fNV(attr, x);
5871 }
5872
5873 static void GLAPIENTRY
5874 save_MultiTexCoord1fv(GLenum target, const GLfloat * v)
5875 {
5876 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5877 save_Attr1fNV(attr, v[0]);
5878 }
5879
5880 static void GLAPIENTRY
5881 save_MultiTexCoord2f(GLenum target, GLfloat x, GLfloat y)
5882 {
5883 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5884 save_Attr2fNV(attr, x, y);
5885 }
5886
5887 static void GLAPIENTRY
5888 save_MultiTexCoord2fv(GLenum target, const GLfloat * v)
5889 {
5890 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5891 save_Attr2fNV(attr, v[0], v[1]);
5892 }
5893
5894 static void GLAPIENTRY
5895 save_MultiTexCoord3f(GLenum target, GLfloat x, GLfloat y, GLfloat z)
5896 {
5897 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5898 save_Attr3fNV(attr, x, y, z);
5899 }
5900
5901 static void GLAPIENTRY
5902 save_MultiTexCoord3fv(GLenum target, const GLfloat * v)
5903 {
5904 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5905 save_Attr3fNV(attr, v[0], v[1], v[2]);
5906 }
5907
5908 static void GLAPIENTRY
5909 save_MultiTexCoord4f(GLenum target, GLfloat x, GLfloat y,
5910 GLfloat z, GLfloat w)
5911 {
5912 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5913 save_Attr4fNV(attr, x, y, z, w);
5914 }
5915
5916 static void GLAPIENTRY
5917 save_MultiTexCoord4fv(GLenum target, const GLfloat * v)
5918 {
5919 GLuint attr = (target & 0x7) + VERT_ATTRIB_TEX0;
5920 save_Attr4fNV(attr, v[0], v[1], v[2], v[3]);
5921 }
5922
5923
5924 /**
5925 * Record a GL_INVALID_VALUE error when a invalid vertex attribute
5926 * index is found.
5927 */
5928 static void
5929 index_error(void)
5930 {
5931 GET_CURRENT_CONTEXT(ctx);
5932 _mesa_error(ctx, GL_INVALID_VALUE, "VertexAttribf(index)");
5933 }
5934
5935
5936
5937 static void GLAPIENTRY
5938 save_VertexAttrib1fARB(GLuint index, GLfloat x)
5939 {
5940 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
5941 save_Attr1fARB(index, x);
5942 else
5943 index_error();
5944 }
5945
5946 static void GLAPIENTRY
5947 save_VertexAttrib1fvARB(GLuint index, const GLfloat * v)
5948 {
5949 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
5950 save_Attr1fARB(index, v[0]);
5951 else
5952 index_error();
5953 }
5954
5955 static void GLAPIENTRY
5956 save_VertexAttrib2fARB(GLuint index, GLfloat x, GLfloat y)
5957 {
5958 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
5959 save_Attr2fARB(index, x, y);
5960 else
5961 index_error();
5962 }
5963
5964 static void GLAPIENTRY
5965 save_VertexAttrib2fvARB(GLuint index, const GLfloat * v)
5966 {
5967 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
5968 save_Attr2fARB(index, v[0], v[1]);
5969 else
5970 index_error();
5971 }
5972
5973 static void GLAPIENTRY
5974 save_VertexAttrib3fARB(GLuint index, GLfloat x, GLfloat y, GLfloat z)
5975 {
5976 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
5977 save_Attr3fARB(index, x, y, z);
5978 else
5979 index_error();
5980 }
5981
5982 static void GLAPIENTRY
5983 save_VertexAttrib3fvARB(GLuint index, const GLfloat * v)
5984 {
5985 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
5986 save_Attr3fARB(index, v[0], v[1], v[2]);
5987 else
5988 index_error();
5989 }
5990
5991 static void GLAPIENTRY
5992 save_VertexAttrib4fARB(GLuint index, GLfloat x, GLfloat y, GLfloat z,
5993 GLfloat w)
5994 {
5995 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
5996 save_Attr4fARB(index, x, y, z, w);
5997 else
5998 index_error();
5999 }
6000
6001 static void GLAPIENTRY
6002 save_VertexAttrib4fvARB(GLuint index, const GLfloat * v)
6003 {
6004 if (index < MAX_VERTEX_GENERIC_ATTRIBS)
6005 save_Attr4fARB(index, v[0], v[1], v[2], v[3]);
6006 else
6007 index_error();
6008 }
6009
6010 static void GLAPIENTRY
6011 save_BlitFramebufferEXT(GLint srcX0, GLint srcY0, GLint srcX1, GLint srcY1,
6012 GLint dstX0, GLint dstY0, GLint dstX1, GLint dstY1,
6013 GLbitfield mask, GLenum filter)
6014 {
6015 GET_CURRENT_CONTEXT(ctx);
6016 Node *n;
6017 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6018 n = alloc_instruction(ctx, OPCODE_BLIT_FRAMEBUFFER, 10);
6019 if (n) {
6020 n[1].i = srcX0;
6021 n[2].i = srcY0;
6022 n[3].i = srcX1;
6023 n[4].i = srcY1;
6024 n[5].i = dstX0;
6025 n[6].i = dstY0;
6026 n[7].i = dstX1;
6027 n[8].i = dstY1;
6028 n[9].i = mask;
6029 n[10].e = filter;
6030 }
6031 if (ctx->ExecuteFlag) {
6032 CALL_BlitFramebuffer(ctx->Exec, (srcX0, srcY0, srcX1, srcY1,
6033 dstX0, dstY0, dstX1, dstY1,
6034 mask, filter));
6035 }
6036 }
6037
6038
6039 /** GL_EXT_provoking_vertex */
6040 static void GLAPIENTRY
6041 save_ProvokingVertexEXT(GLenum mode)
6042 {
6043 GET_CURRENT_CONTEXT(ctx);
6044 Node *n;
6045 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6046 n = alloc_instruction(ctx, OPCODE_PROVOKING_VERTEX, 1);
6047 if (n) {
6048 n[1].e = mode;
6049 }
6050 if (ctx->ExecuteFlag) {
6051 /*CALL_ProvokingVertex(ctx->Exec, (mode));*/
6052 _mesa_ProvokingVertex(mode);
6053 }
6054 }
6055
6056
6057 /** GL_EXT_transform_feedback */
6058 static void GLAPIENTRY
6059 save_BeginTransformFeedback(GLenum mode)
6060 {
6061 GET_CURRENT_CONTEXT(ctx);
6062 Node *n;
6063 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6064 n = alloc_instruction(ctx, OPCODE_BEGIN_TRANSFORM_FEEDBACK, 1);
6065 if (n) {
6066 n[1].e = mode;
6067 }
6068 if (ctx->ExecuteFlag) {
6069 CALL_BeginTransformFeedback(ctx->Exec, (mode));
6070 }
6071 }
6072
6073
6074 /** GL_EXT_transform_feedback */
6075 static void GLAPIENTRY
6076 save_EndTransformFeedback(void)
6077 {
6078 GET_CURRENT_CONTEXT(ctx);
6079 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6080 (void) alloc_instruction(ctx, OPCODE_END_TRANSFORM_FEEDBACK, 0);
6081 if (ctx->ExecuteFlag) {
6082 CALL_EndTransformFeedback(ctx->Exec, ());
6083 }
6084 }
6085
6086 static void GLAPIENTRY
6087 save_BindTransformFeedback(GLenum target, GLuint name)
6088 {
6089 GET_CURRENT_CONTEXT(ctx);
6090 Node *n;
6091 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6092 n = alloc_instruction(ctx, OPCODE_BIND_TRANSFORM_FEEDBACK, 2);
6093 if (n) {
6094 n[1].e = target;
6095 n[2].ui = name;
6096 }
6097 if (ctx->ExecuteFlag) {
6098 CALL_BindTransformFeedback(ctx->Exec, (target, name));
6099 }
6100 }
6101
6102 static void GLAPIENTRY
6103 save_PauseTransformFeedback(void)
6104 {
6105 GET_CURRENT_CONTEXT(ctx);
6106 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6107 (void) alloc_instruction(ctx, OPCODE_PAUSE_TRANSFORM_FEEDBACK, 0);
6108 if (ctx->ExecuteFlag) {
6109 CALL_PauseTransformFeedback(ctx->Exec, ());
6110 }
6111 }
6112
6113 static void GLAPIENTRY
6114 save_ResumeTransformFeedback(void)
6115 {
6116 GET_CURRENT_CONTEXT(ctx);
6117 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6118 (void) alloc_instruction(ctx, OPCODE_RESUME_TRANSFORM_FEEDBACK, 0);
6119 if (ctx->ExecuteFlag) {
6120 CALL_ResumeTransformFeedback(ctx->Exec, ());
6121 }
6122 }
6123
6124 static void GLAPIENTRY
6125 save_DrawTransformFeedback(GLenum mode, GLuint name)
6126 {
6127 GET_CURRENT_CONTEXT(ctx);
6128 Node *n;
6129 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6130 n = alloc_instruction(ctx, OPCODE_DRAW_TRANSFORM_FEEDBACK, 2);
6131 if (n) {
6132 n[1].e = mode;
6133 n[2].ui = name;
6134 }
6135 if (ctx->ExecuteFlag) {
6136 CALL_DrawTransformFeedback(ctx->Exec, (mode, name));
6137 }
6138 }
6139
6140 static void GLAPIENTRY
6141 save_DrawTransformFeedbackStream(GLenum mode, GLuint name, GLuint stream)
6142 {
6143 GET_CURRENT_CONTEXT(ctx);
6144 Node *n;
6145 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6146 n = alloc_instruction(ctx, OPCODE_DRAW_TRANSFORM_FEEDBACK_STREAM, 3);
6147 if (n) {
6148 n[1].e = mode;
6149 n[2].ui = name;
6150 n[3].ui = stream;
6151 }
6152 if (ctx->ExecuteFlag) {
6153 CALL_DrawTransformFeedbackStream(ctx->Exec, (mode, name, stream));
6154 }
6155 }
6156
6157 static void GLAPIENTRY
6158 save_DrawTransformFeedbackInstanced(GLenum mode, GLuint name,
6159 GLsizei primcount)
6160 {
6161 GET_CURRENT_CONTEXT(ctx);
6162 Node *n;
6163 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6164 n = alloc_instruction(ctx, OPCODE_DRAW_TRANSFORM_FEEDBACK_INSTANCED, 3);
6165 if (n) {
6166 n[1].e = mode;
6167 n[2].ui = name;
6168 n[3].si = primcount;
6169 }
6170 if (ctx->ExecuteFlag) {
6171 CALL_DrawTransformFeedbackInstanced(ctx->Exec, (mode, name, primcount));
6172 }
6173 }
6174
6175 static void GLAPIENTRY
6176 save_DrawTransformFeedbackStreamInstanced(GLenum mode, GLuint name,
6177 GLuint stream, GLsizei primcount)
6178 {
6179 GET_CURRENT_CONTEXT(ctx);
6180 Node *n;
6181 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6182 n = alloc_instruction(ctx, OPCODE_DRAW_TRANSFORM_FEEDBACK_STREAM_INSTANCED, 4);
6183 if (n) {
6184 n[1].e = mode;
6185 n[2].ui = name;
6186 n[3].ui = stream;
6187 n[4].si = primcount;
6188 }
6189 if (ctx->ExecuteFlag) {
6190 CALL_DrawTransformFeedbackStreamInstanced(ctx->Exec, (mode, name, stream,
6191 primcount));
6192 }
6193 }
6194
6195 /* aka UseProgram() */
6196 static void GLAPIENTRY
6197 save_UseProgramObjectARB(GLhandleARB program)
6198 {
6199 GET_CURRENT_CONTEXT(ctx);
6200 Node *n;
6201 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6202 n = alloc_instruction(ctx, OPCODE_USE_PROGRAM, 1);
6203 if (n) {
6204 n[1].ui = program;
6205 }
6206 if (ctx->ExecuteFlag) {
6207 CALL_UseProgram(ctx->Exec, (program));
6208 }
6209 }
6210
6211
6212 static void GLAPIENTRY
6213 save_Uniform1fARB(GLint location, GLfloat x)
6214 {
6215 GET_CURRENT_CONTEXT(ctx);
6216 Node *n;
6217 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6218 n = alloc_instruction(ctx, OPCODE_UNIFORM_1F, 2);
6219 if (n) {
6220 n[1].i = location;
6221 n[2].f = x;
6222 }
6223 if (ctx->ExecuteFlag) {
6224 CALL_Uniform1f(ctx->Exec, (location, x));
6225 }
6226 }
6227
6228
6229 static void GLAPIENTRY
6230 save_Uniform2fARB(GLint location, GLfloat x, GLfloat y)
6231 {
6232 GET_CURRENT_CONTEXT(ctx);
6233 Node *n;
6234 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6235 n = alloc_instruction(ctx, OPCODE_UNIFORM_2F, 3);
6236 if (n) {
6237 n[1].i = location;
6238 n[2].f = x;
6239 n[3].f = y;
6240 }
6241 if (ctx->ExecuteFlag) {
6242 CALL_Uniform2f(ctx->Exec, (location, x, y));
6243 }
6244 }
6245
6246
6247 static void GLAPIENTRY
6248 save_Uniform3fARB(GLint location, GLfloat x, GLfloat y, GLfloat z)
6249 {
6250 GET_CURRENT_CONTEXT(ctx);
6251 Node *n;
6252 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6253 n = alloc_instruction(ctx, OPCODE_UNIFORM_3F, 4);
6254 if (n) {
6255 n[1].i = location;
6256 n[2].f = x;
6257 n[3].f = y;
6258 n[4].f = z;
6259 }
6260 if (ctx->ExecuteFlag) {
6261 CALL_Uniform3f(ctx->Exec, (location, x, y, z));
6262 }
6263 }
6264
6265
6266 static void GLAPIENTRY
6267 save_Uniform4fARB(GLint location, GLfloat x, GLfloat y, GLfloat z, GLfloat w)
6268 {
6269 GET_CURRENT_CONTEXT(ctx);
6270 Node *n;
6271 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6272 n = alloc_instruction(ctx, OPCODE_UNIFORM_4F, 5);
6273 if (n) {
6274 n[1].i = location;
6275 n[2].f = x;
6276 n[3].f = y;
6277 n[4].f = z;
6278 n[5].f = w;
6279 }
6280 if (ctx->ExecuteFlag) {
6281 CALL_Uniform4f(ctx->Exec, (location, x, y, z, w));
6282 }
6283 }
6284
6285
6286 /** Return copy of memory */
6287 static void *
6288 memdup(const void *src, GLsizei bytes)
6289 {
6290 void *b = bytes >= 0 ? malloc(bytes) : NULL;
6291 if (b)
6292 memcpy(b, src, bytes);
6293 return b;
6294 }
6295
6296
6297 static void GLAPIENTRY
6298 save_Uniform1fvARB(GLint location, GLsizei count, const GLfloat *v)
6299 {
6300 GET_CURRENT_CONTEXT(ctx);
6301 Node *n;
6302 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6303 n = alloc_instruction(ctx, OPCODE_UNIFORM_1FV, 3);
6304 if (n) {
6305 n[1].i = location;
6306 n[2].i = count;
6307 n[3].data = memdup(v, count * 1 * sizeof(GLfloat));
6308 }
6309 if (ctx->ExecuteFlag) {
6310 CALL_Uniform1fv(ctx->Exec, (location, count, v));
6311 }
6312 }
6313
6314 static void GLAPIENTRY
6315 save_Uniform2fvARB(GLint location, GLsizei count, const GLfloat *v)
6316 {
6317 GET_CURRENT_CONTEXT(ctx);
6318 Node *n;
6319 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6320 n = alloc_instruction(ctx, OPCODE_UNIFORM_2FV, 3);
6321 if (n) {
6322 n[1].i = location;
6323 n[2].i = count;
6324 n[3].data = memdup(v, count * 2 * sizeof(GLfloat));
6325 }
6326 if (ctx->ExecuteFlag) {
6327 CALL_Uniform2fv(ctx->Exec, (location, count, v));
6328 }
6329 }
6330
6331 static void GLAPIENTRY
6332 save_Uniform3fvARB(GLint location, GLsizei count, const GLfloat *v)
6333 {
6334 GET_CURRENT_CONTEXT(ctx);
6335 Node *n;
6336 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6337 n = alloc_instruction(ctx, OPCODE_UNIFORM_3FV, 3);
6338 if (n) {
6339 n[1].i = location;
6340 n[2].i = count;
6341 n[3].data = memdup(v, count * 3 * sizeof(GLfloat));
6342 }
6343 if (ctx->ExecuteFlag) {
6344 CALL_Uniform3fv(ctx->Exec, (location, count, v));
6345 }
6346 }
6347
6348 static void GLAPIENTRY
6349 save_Uniform4fvARB(GLint location, GLsizei count, const GLfloat *v)
6350 {
6351 GET_CURRENT_CONTEXT(ctx);
6352 Node *n;
6353 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6354 n = alloc_instruction(ctx, OPCODE_UNIFORM_4FV, 3);
6355 if (n) {
6356 n[1].i = location;
6357 n[2].i = count;
6358 n[3].data = memdup(v, count * 4 * sizeof(GLfloat));
6359 }
6360 if (ctx->ExecuteFlag) {
6361 CALL_Uniform4fv(ctx->Exec, (location, count, v));
6362 }
6363 }
6364
6365
6366 static void GLAPIENTRY
6367 save_Uniform1iARB(GLint location, GLint x)
6368 {
6369 GET_CURRENT_CONTEXT(ctx);
6370 Node *n;
6371 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6372 n = alloc_instruction(ctx, OPCODE_UNIFORM_1I, 2);
6373 if (n) {
6374 n[1].i = location;
6375 n[2].i = x;
6376 }
6377 if (ctx->ExecuteFlag) {
6378 CALL_Uniform1i(ctx->Exec, (location, x));
6379 }
6380 }
6381
6382 static void GLAPIENTRY
6383 save_Uniform2iARB(GLint location, GLint x, GLint y)
6384 {
6385 GET_CURRENT_CONTEXT(ctx);
6386 Node *n;
6387 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6388 n = alloc_instruction(ctx, OPCODE_UNIFORM_2I, 3);
6389 if (n) {
6390 n[1].i = location;
6391 n[2].i = x;
6392 n[3].i = y;
6393 }
6394 if (ctx->ExecuteFlag) {
6395 CALL_Uniform2i(ctx->Exec, (location, x, y));
6396 }
6397 }
6398
6399 static void GLAPIENTRY
6400 save_Uniform3iARB(GLint location, GLint x, GLint y, GLint z)
6401 {
6402 GET_CURRENT_CONTEXT(ctx);
6403 Node *n;
6404 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6405 n = alloc_instruction(ctx, OPCODE_UNIFORM_3I, 4);
6406 if (n) {
6407 n[1].i = location;
6408 n[2].i = x;
6409 n[3].i = y;
6410 n[4].i = z;
6411 }
6412 if (ctx->ExecuteFlag) {
6413 CALL_Uniform3i(ctx->Exec, (location, x, y, z));
6414 }
6415 }
6416
6417 static void GLAPIENTRY
6418 save_Uniform4iARB(GLint location, GLint x, GLint y, GLint z, GLint w)
6419 {
6420 GET_CURRENT_CONTEXT(ctx);
6421 Node *n;
6422 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6423 n = alloc_instruction(ctx, OPCODE_UNIFORM_4I, 5);
6424 if (n) {
6425 n[1].i = location;
6426 n[2].i = x;
6427 n[3].i = y;
6428 n[4].i = z;
6429 n[5].i = w;
6430 }
6431 if (ctx->ExecuteFlag) {
6432 CALL_Uniform4i(ctx->Exec, (location, x, y, z, w));
6433 }
6434 }
6435
6436
6437
6438 static void GLAPIENTRY
6439 save_Uniform1ivARB(GLint location, GLsizei count, const GLint *v)
6440 {
6441 GET_CURRENT_CONTEXT(ctx);
6442 Node *n;
6443 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6444 n = alloc_instruction(ctx, OPCODE_UNIFORM_1IV, 3);
6445 if (n) {
6446 n[1].i = location;
6447 n[2].i = count;
6448 n[3].data = memdup(v, count * 1 * sizeof(GLint));
6449 }
6450 if (ctx->ExecuteFlag) {
6451 CALL_Uniform1iv(ctx->Exec, (location, count, v));
6452 }
6453 }
6454
6455 static void GLAPIENTRY
6456 save_Uniform2ivARB(GLint location, GLsizei count, const GLint *v)
6457 {
6458 GET_CURRENT_CONTEXT(ctx);
6459 Node *n;
6460 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6461 n = alloc_instruction(ctx, OPCODE_UNIFORM_2IV, 3);
6462 if (n) {
6463 n[1].i = location;
6464 n[2].i = count;
6465 n[3].data = memdup(v, count * 2 * sizeof(GLint));
6466 }
6467 if (ctx->ExecuteFlag) {
6468 CALL_Uniform2iv(ctx->Exec, (location, count, v));
6469 }
6470 }
6471
6472 static void GLAPIENTRY
6473 save_Uniform3ivARB(GLint location, GLsizei count, const GLint *v)
6474 {
6475 GET_CURRENT_CONTEXT(ctx);
6476 Node *n;
6477 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6478 n = alloc_instruction(ctx, OPCODE_UNIFORM_3IV, 3);
6479 if (n) {
6480 n[1].i = location;
6481 n[2].i = count;
6482 n[3].data = memdup(v, count * 3 * sizeof(GLint));
6483 }
6484 if (ctx->ExecuteFlag) {
6485 CALL_Uniform3iv(ctx->Exec, (location, count, v));
6486 }
6487 }
6488
6489 static void GLAPIENTRY
6490 save_Uniform4ivARB(GLint location, GLsizei count, const GLint *v)
6491 {
6492 GET_CURRENT_CONTEXT(ctx);
6493 Node *n;
6494 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6495 n = alloc_instruction(ctx, OPCODE_UNIFORM_4IV, 3);
6496 if (n) {
6497 n[1].i = location;
6498 n[2].i = count;
6499 n[3].data = memdup(v, count * 4 * sizeof(GLfloat));
6500 }
6501 if (ctx->ExecuteFlag) {
6502 CALL_Uniform4iv(ctx->Exec, (location, count, v));
6503 }
6504 }
6505
6506
6507
6508 static void GLAPIENTRY
6509 save_Uniform1ui(GLint location, GLuint x)
6510 {
6511 GET_CURRENT_CONTEXT(ctx);
6512 Node *n;
6513 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6514 n = alloc_instruction(ctx, OPCODE_UNIFORM_1UI, 2);
6515 if (n) {
6516 n[1].i = location;
6517 n[2].i = x;
6518 }
6519 if (ctx->ExecuteFlag) {
6520 /*CALL_Uniform1ui(ctx->Exec, (location, x));*/
6521 }
6522 }
6523
6524 static void GLAPIENTRY
6525 save_Uniform2ui(GLint location, GLuint x, GLuint y)
6526 {
6527 GET_CURRENT_CONTEXT(ctx);
6528 Node *n;
6529 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6530 n = alloc_instruction(ctx, OPCODE_UNIFORM_2UI, 3);
6531 if (n) {
6532 n[1].i = location;
6533 n[2].i = x;
6534 n[3].i = y;
6535 }
6536 if (ctx->ExecuteFlag) {
6537 /*CALL_Uniform2ui(ctx->Exec, (location, x, y));*/
6538 }
6539 }
6540
6541 static void GLAPIENTRY
6542 save_Uniform3ui(GLint location, GLuint x, GLuint y, GLuint z)
6543 {
6544 GET_CURRENT_CONTEXT(ctx);
6545 Node *n;
6546 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6547 n = alloc_instruction(ctx, OPCODE_UNIFORM_3UI, 4);
6548 if (n) {
6549 n[1].i = location;
6550 n[2].i = x;
6551 n[3].i = y;
6552 n[4].i = z;
6553 }
6554 if (ctx->ExecuteFlag) {
6555 /*CALL_Uniform3ui(ctx->Exec, (location, x, y, z));*/
6556 }
6557 }
6558
6559 static void GLAPIENTRY
6560 save_Uniform4ui(GLint location, GLuint x, GLuint y, GLuint z, GLuint w)
6561 {
6562 GET_CURRENT_CONTEXT(ctx);
6563 Node *n;
6564 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6565 n = alloc_instruction(ctx, OPCODE_UNIFORM_4UI, 5);
6566 if (n) {
6567 n[1].i = location;
6568 n[2].i = x;
6569 n[3].i = y;
6570 n[4].i = z;
6571 n[5].i = w;
6572 }
6573 if (ctx->ExecuteFlag) {
6574 /*CALL_Uniform4ui(ctx->Exec, (location, x, y, z, w));*/
6575 }
6576 }
6577
6578
6579
6580 static void GLAPIENTRY
6581 save_Uniform1uiv(GLint location, GLsizei count, const GLuint *v)
6582 {
6583 GET_CURRENT_CONTEXT(ctx);
6584 Node *n;
6585 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6586 n = alloc_instruction(ctx, OPCODE_UNIFORM_1UIV, 3);
6587 if (n) {
6588 n[1].i = location;
6589 n[2].i = count;
6590 n[3].data = memdup(v, count * 1 * sizeof(*v));
6591 }
6592 if (ctx->ExecuteFlag) {
6593 /*CALL_Uniform1uiv(ctx->Exec, (location, count, v));*/
6594 }
6595 }
6596
6597 static void GLAPIENTRY
6598 save_Uniform2uiv(GLint location, GLsizei count, const GLuint *v)
6599 {
6600 GET_CURRENT_CONTEXT(ctx);
6601 Node *n;
6602 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6603 n = alloc_instruction(ctx, OPCODE_UNIFORM_2UIV, 3);
6604 if (n) {
6605 n[1].i = location;
6606 n[2].i = count;
6607 n[3].data = memdup(v, count * 2 * sizeof(*v));
6608 }
6609 if (ctx->ExecuteFlag) {
6610 /*CALL_Uniform2uiv(ctx->Exec, (location, count, v));*/
6611 }
6612 }
6613
6614 static void GLAPIENTRY
6615 save_Uniform3uiv(GLint location, GLsizei count, const GLuint *v)
6616 {
6617 GET_CURRENT_CONTEXT(ctx);
6618 Node *n;
6619 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6620 n = alloc_instruction(ctx, OPCODE_UNIFORM_3UIV, 3);
6621 if (n) {
6622 n[1].i = location;
6623 n[2].i = count;
6624 n[3].data = memdup(v, count * 3 * sizeof(*v));
6625 }
6626 if (ctx->ExecuteFlag) {
6627 /*CALL_Uniform3uiv(ctx->Exec, (location, count, v));*/
6628 }
6629 }
6630
6631 static void GLAPIENTRY
6632 save_Uniform4uiv(GLint location, GLsizei count, const GLuint *v)
6633 {
6634 GET_CURRENT_CONTEXT(ctx);
6635 Node *n;
6636 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6637 n = alloc_instruction(ctx, OPCODE_UNIFORM_4UIV, 3);
6638 if (n) {
6639 n[1].i = location;
6640 n[2].i = count;
6641 n[3].data = memdup(v, count * 4 * sizeof(*v));
6642 }
6643 if (ctx->ExecuteFlag) {
6644 /*CALL_Uniform4uiv(ctx->Exec, (location, count, v));*/
6645 }
6646 }
6647
6648
6649
6650 static void GLAPIENTRY
6651 save_UniformMatrix2fvARB(GLint location, GLsizei count, GLboolean transpose,
6652 const GLfloat *m)
6653 {
6654 GET_CURRENT_CONTEXT(ctx);
6655 Node *n;
6656 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6657 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX22, 4);
6658 if (n) {
6659 n[1].i = location;
6660 n[2].i = count;
6661 n[3].b = transpose;
6662 n[4].data = memdup(m, count * 2 * 2 * sizeof(GLfloat));
6663 }
6664 if (ctx->ExecuteFlag) {
6665 CALL_UniformMatrix2fv(ctx->Exec, (location, count, transpose, m));
6666 }
6667 }
6668
6669 static void GLAPIENTRY
6670 save_UniformMatrix3fvARB(GLint location, GLsizei count, GLboolean transpose,
6671 const GLfloat *m)
6672 {
6673 GET_CURRENT_CONTEXT(ctx);
6674 Node *n;
6675 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6676 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX33, 4);
6677 if (n) {
6678 n[1].i = location;
6679 n[2].i = count;
6680 n[3].b = transpose;
6681 n[4].data = memdup(m, count * 3 * 3 * sizeof(GLfloat));
6682 }
6683 if (ctx->ExecuteFlag) {
6684 CALL_UniformMatrix3fv(ctx->Exec, (location, count, transpose, m));
6685 }
6686 }
6687
6688 static void GLAPIENTRY
6689 save_UniformMatrix4fvARB(GLint location, GLsizei count, GLboolean transpose,
6690 const GLfloat *m)
6691 {
6692 GET_CURRENT_CONTEXT(ctx);
6693 Node *n;
6694 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6695 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX44, 4);
6696 if (n) {
6697 n[1].i = location;
6698 n[2].i = count;
6699 n[3].b = transpose;
6700 n[4].data = memdup(m, count * 4 * 4 * sizeof(GLfloat));
6701 }
6702 if (ctx->ExecuteFlag) {
6703 CALL_UniformMatrix4fv(ctx->Exec, (location, count, transpose, m));
6704 }
6705 }
6706
6707
6708 static void GLAPIENTRY
6709 save_UniformMatrix2x3fv(GLint location, GLsizei count, GLboolean transpose,
6710 const GLfloat *m)
6711 {
6712 GET_CURRENT_CONTEXT(ctx);
6713 Node *n;
6714 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6715 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX23, 4);
6716 if (n) {
6717 n[1].i = location;
6718 n[2].i = count;
6719 n[3].b = transpose;
6720 n[4].data = memdup(m, count * 2 * 3 * sizeof(GLfloat));
6721 }
6722 if (ctx->ExecuteFlag) {
6723 CALL_UniformMatrix2x3fv(ctx->Exec, (location, count, transpose, m));
6724 }
6725 }
6726
6727 static void GLAPIENTRY
6728 save_UniformMatrix3x2fv(GLint location, GLsizei count, GLboolean transpose,
6729 const GLfloat *m)
6730 {
6731 GET_CURRENT_CONTEXT(ctx);
6732 Node *n;
6733 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6734 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX32, 4);
6735 if (n) {
6736 n[1].i = location;
6737 n[2].i = count;
6738 n[3].b = transpose;
6739 n[4].data = memdup(m, count * 3 * 2 * sizeof(GLfloat));
6740 }
6741 if (ctx->ExecuteFlag) {
6742 CALL_UniformMatrix3x2fv(ctx->Exec, (location, count, transpose, m));
6743 }
6744 }
6745
6746
6747 static void GLAPIENTRY
6748 save_UniformMatrix2x4fv(GLint location, GLsizei count, GLboolean transpose,
6749 const GLfloat *m)
6750 {
6751 GET_CURRENT_CONTEXT(ctx);
6752 Node *n;
6753 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6754 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX24, 4);
6755 if (n) {
6756 n[1].i = location;
6757 n[2].i = count;
6758 n[3].b = transpose;
6759 n[4].data = memdup(m, count * 2 * 4 * sizeof(GLfloat));
6760 }
6761 if (ctx->ExecuteFlag) {
6762 CALL_UniformMatrix2x4fv(ctx->Exec, (location, count, transpose, m));
6763 }
6764 }
6765
6766 static void GLAPIENTRY
6767 save_UniformMatrix4x2fv(GLint location, GLsizei count, GLboolean transpose,
6768 const GLfloat *m)
6769 {
6770 GET_CURRENT_CONTEXT(ctx);
6771 Node *n;
6772 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6773 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX42, 4);
6774 if (n) {
6775 n[1].i = location;
6776 n[2].i = count;
6777 n[3].b = transpose;
6778 n[4].data = memdup(m, count * 4 * 2 * sizeof(GLfloat));
6779 }
6780 if (ctx->ExecuteFlag) {
6781 CALL_UniformMatrix4x2fv(ctx->Exec, (location, count, transpose, m));
6782 }
6783 }
6784
6785
6786 static void GLAPIENTRY
6787 save_UniformMatrix3x4fv(GLint location, GLsizei count, GLboolean transpose,
6788 const GLfloat *m)
6789 {
6790 GET_CURRENT_CONTEXT(ctx);
6791 Node *n;
6792 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6793 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX34, 4);
6794 if (n) {
6795 n[1].i = location;
6796 n[2].i = count;
6797 n[3].b = transpose;
6798 n[4].data = memdup(m, count * 3 * 4 * sizeof(GLfloat));
6799 }
6800 if (ctx->ExecuteFlag) {
6801 CALL_UniformMatrix3x4fv(ctx->Exec, (location, count, transpose, m));
6802 }
6803 }
6804
6805 static void GLAPIENTRY
6806 save_UniformMatrix4x3fv(GLint location, GLsizei count, GLboolean transpose,
6807 const GLfloat *m)
6808 {
6809 GET_CURRENT_CONTEXT(ctx);
6810 Node *n;
6811 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6812 n = alloc_instruction(ctx, OPCODE_UNIFORM_MATRIX43, 4);
6813 if (n) {
6814 n[1].i = location;
6815 n[2].i = count;
6816 n[3].b = transpose;
6817 n[4].data = memdup(m, count * 4 * 3 * sizeof(GLfloat));
6818 }
6819 if (ctx->ExecuteFlag) {
6820 CALL_UniformMatrix4x3fv(ctx->Exec, (location, count, transpose, m));
6821 }
6822 }
6823
6824 static void GLAPIENTRY
6825 save_ClampColorARB(GLenum target, GLenum clamp)
6826 {
6827 GET_CURRENT_CONTEXT(ctx);
6828 Node *n;
6829 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6830 n = alloc_instruction(ctx, OPCODE_CLAMP_COLOR, 2);
6831 if (n) {
6832 n[1].e = target;
6833 n[2].e = clamp;
6834 }
6835 if (ctx->ExecuteFlag) {
6836 CALL_ClampColor(ctx->Exec, (target, clamp));
6837 }
6838 }
6839
6840 static void GLAPIENTRY
6841 save_UseShaderProgramEXT(GLenum type, GLuint program)
6842 {
6843 GET_CURRENT_CONTEXT(ctx);
6844 Node *n;
6845 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6846 n = alloc_instruction(ctx, OPCODE_USE_SHADER_PROGRAM_EXT, 2);
6847 if (n) {
6848 n[1].ui = type;
6849 n[2].ui = program;
6850 }
6851 if (ctx->ExecuteFlag) {
6852 CALL_UseShaderProgramEXT(ctx->Exec, (type, program));
6853 }
6854 }
6855
6856 static void GLAPIENTRY
6857 save_ActiveProgramEXT(GLuint program)
6858 {
6859 GET_CURRENT_CONTEXT(ctx);
6860 Node *n;
6861 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6862 n = alloc_instruction(ctx, OPCODE_ACTIVE_PROGRAM_EXT, 1);
6863 if (n) {
6864 n[1].ui = program;
6865 }
6866 if (ctx->ExecuteFlag) {
6867 CALL_ActiveProgramEXT(ctx->Exec, (program));
6868 }
6869 }
6870
6871 /** GL_EXT_texture_integer */
6872 static void GLAPIENTRY
6873 save_ClearColorIi(GLint red, GLint green, GLint blue, GLint alpha)
6874 {
6875 GET_CURRENT_CONTEXT(ctx);
6876 Node *n;
6877 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6878 n = alloc_instruction(ctx, OPCODE_CLEARCOLOR_I, 4);
6879 if (n) {
6880 n[1].i = red;
6881 n[2].i = green;
6882 n[3].i = blue;
6883 n[4].i = alpha;
6884 }
6885 if (ctx->ExecuteFlag) {
6886 CALL_ClearColorIiEXT(ctx->Exec, (red, green, blue, alpha));
6887 }
6888 }
6889
6890 /** GL_EXT_texture_integer */
6891 static void GLAPIENTRY
6892 save_ClearColorIui(GLuint red, GLuint green, GLuint blue, GLuint alpha)
6893 {
6894 GET_CURRENT_CONTEXT(ctx);
6895 Node *n;
6896 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6897 n = alloc_instruction(ctx, OPCODE_CLEARCOLOR_UI, 4);
6898 if (n) {
6899 n[1].ui = red;
6900 n[2].ui = green;
6901 n[3].ui = blue;
6902 n[4].ui = alpha;
6903 }
6904 if (ctx->ExecuteFlag) {
6905 CALL_ClearColorIuiEXT(ctx->Exec, (red, green, blue, alpha));
6906 }
6907 }
6908
6909 /** GL_EXT_texture_integer */
6910 static void GLAPIENTRY
6911 save_TexParameterIiv(GLenum target, GLenum pname, const GLint *params)
6912 {
6913 GET_CURRENT_CONTEXT(ctx);
6914 Node *n;
6915 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6916 n = alloc_instruction(ctx, OPCODE_TEXPARAMETER_I, 6);
6917 if (n) {
6918 n[1].e = target;
6919 n[2].e = pname;
6920 n[3].i = params[0];
6921 n[4].i = params[1];
6922 n[5].i = params[2];
6923 n[6].i = params[3];
6924 }
6925 if (ctx->ExecuteFlag) {
6926 CALL_TexParameterIiv(ctx->Exec, (target, pname, params));
6927 }
6928 }
6929
6930 /** GL_EXT_texture_integer */
6931 static void GLAPIENTRY
6932 save_TexParameterIuiv(GLenum target, GLenum pname, const GLuint *params)
6933 {
6934 GET_CURRENT_CONTEXT(ctx);
6935 Node *n;
6936 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6937 n = alloc_instruction(ctx, OPCODE_TEXPARAMETER_UI, 6);
6938 if (n) {
6939 n[1].e = target;
6940 n[2].e = pname;
6941 n[3].ui = params[0];
6942 n[4].ui = params[1];
6943 n[5].ui = params[2];
6944 n[6].ui = params[3];
6945 }
6946 if (ctx->ExecuteFlag) {
6947 CALL_TexParameterIuiv(ctx->Exec, (target, pname, params));
6948 }
6949 }
6950
6951 /* GL_ARB_instanced_arrays */
6952 static void GLAPIENTRY
6953 save_VertexAttribDivisor(GLuint index, GLuint divisor)
6954 {
6955 GET_CURRENT_CONTEXT(ctx);
6956 Node *n;
6957 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6958 n = alloc_instruction(ctx, OPCODE_VERTEX_ATTRIB_DIVISOR, 2);
6959 if (n) {
6960 n[1].ui = index;
6961 n[2].ui = divisor;
6962 }
6963 if (ctx->ExecuteFlag) {
6964 CALL_VertexAttribDivisor(ctx->Exec, (index, divisor));
6965 }
6966 }
6967
6968
6969 /* GL_NV_texture_barrier */
6970 static void GLAPIENTRY
6971 save_TextureBarrierNV(void)
6972 {
6973 GET_CURRENT_CONTEXT(ctx);
6974 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6975 alloc_instruction(ctx, OPCODE_TEXTURE_BARRIER_NV, 0);
6976 if (ctx->ExecuteFlag) {
6977 CALL_TextureBarrierNV(ctx->Exec, ());
6978 }
6979 }
6980
6981
6982 /* GL_ARB_sampler_objects */
6983 static void GLAPIENTRY
6984 save_BindSampler(GLuint unit, GLuint sampler)
6985 {
6986 Node *n;
6987 GET_CURRENT_CONTEXT(ctx);
6988 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
6989 n = alloc_instruction(ctx, OPCODE_BIND_SAMPLER, 2);
6990 if (n) {
6991 n[1].ui = unit;
6992 n[2].ui = sampler;
6993 }
6994 if (ctx->ExecuteFlag) {
6995 CALL_BindSampler(ctx->Exec, (unit, sampler));
6996 }
6997 }
6998
6999 static void GLAPIENTRY
7000 save_SamplerParameteriv(GLuint sampler, GLenum pname, const GLint *params)
7001 {
7002 Node *n;
7003 GET_CURRENT_CONTEXT(ctx);
7004 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7005 n = alloc_instruction(ctx, OPCODE_SAMPLER_PARAMETERIV, 6);
7006 if (n) {
7007 n[1].ui = sampler;
7008 n[2].e = pname;
7009 n[3].i = params[0];
7010 if (pname == GL_TEXTURE_BORDER_COLOR) {
7011 n[4].i = params[1];
7012 n[5].i = params[2];
7013 n[6].i = params[3];
7014 }
7015 else {
7016 n[4].i = n[5].i = n[6].i = 0;
7017 }
7018 }
7019 if (ctx->ExecuteFlag) {
7020 CALL_SamplerParameteriv(ctx->Exec, (sampler, pname, params));
7021 }
7022 }
7023
7024 static void GLAPIENTRY
7025 save_SamplerParameteri(GLuint sampler, GLenum pname, GLint param)
7026 {
7027 save_SamplerParameteriv(sampler, pname, &param);
7028 }
7029
7030 static void GLAPIENTRY
7031 save_SamplerParameterfv(GLuint sampler, GLenum pname, const GLfloat *params)
7032 {
7033 Node *n;
7034 GET_CURRENT_CONTEXT(ctx);
7035 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7036 n = alloc_instruction(ctx, OPCODE_SAMPLER_PARAMETERFV, 6);
7037 if (n) {
7038 n[1].ui = sampler;
7039 n[2].e = pname;
7040 n[3].f = params[0];
7041 if (pname == GL_TEXTURE_BORDER_COLOR) {
7042 n[4].f = params[1];
7043 n[5].f = params[2];
7044 n[6].f = params[3];
7045 }
7046 else {
7047 n[4].f = n[5].f = n[6].f = 0.0F;
7048 }
7049 }
7050 if (ctx->ExecuteFlag) {
7051 CALL_SamplerParameterfv(ctx->Exec, (sampler, pname, params));
7052 }
7053 }
7054
7055 static void GLAPIENTRY
7056 save_SamplerParameterf(GLuint sampler, GLenum pname, GLfloat param)
7057 {
7058 save_SamplerParameterfv(sampler, pname, &param);
7059 }
7060
7061 static void GLAPIENTRY
7062 save_SamplerParameterIiv(GLuint sampler, GLenum pname, const GLint *params)
7063 {
7064 Node *n;
7065 GET_CURRENT_CONTEXT(ctx);
7066 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7067 n = alloc_instruction(ctx, OPCODE_SAMPLER_PARAMETERIIV, 6);
7068 if (n) {
7069 n[1].ui = sampler;
7070 n[2].e = pname;
7071 n[3].i = params[0];
7072 if (pname == GL_TEXTURE_BORDER_COLOR) {
7073 n[4].i = params[1];
7074 n[5].i = params[2];
7075 n[6].i = params[3];
7076 }
7077 else {
7078 n[4].i = n[5].i = n[6].i = 0;
7079 }
7080 }
7081 if (ctx->ExecuteFlag) {
7082 CALL_SamplerParameterIiv(ctx->Exec, (sampler, pname, params));
7083 }
7084 }
7085
7086 static void GLAPIENTRY
7087 save_SamplerParameterIuiv(GLuint sampler, GLenum pname, const GLuint *params)
7088 {
7089 Node *n;
7090 GET_CURRENT_CONTEXT(ctx);
7091 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7092 n = alloc_instruction(ctx, OPCODE_SAMPLER_PARAMETERUIV, 6);
7093 if (n) {
7094 n[1].ui = sampler;
7095 n[2].e = pname;
7096 n[3].ui = params[0];
7097 if (pname == GL_TEXTURE_BORDER_COLOR) {
7098 n[4].ui = params[1];
7099 n[5].ui = params[2];
7100 n[6].ui = params[3];
7101 }
7102 else {
7103 n[4].ui = n[5].ui = n[6].ui = 0;
7104 }
7105 }
7106 if (ctx->ExecuteFlag) {
7107 CALL_SamplerParameterIuiv(ctx->Exec, (sampler, pname, params));
7108 }
7109 }
7110
7111 /* GL_ARB_geometry_shader4 */
7112 static void GLAPIENTRY
7113 save_ProgramParameteri(GLuint program, GLenum pname, GLint value)
7114 {
7115 Node *n;
7116 GET_CURRENT_CONTEXT(ctx);
7117 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7118 n = alloc_instruction(ctx, OPCODE_PROGRAM_PARAMETERI, 3);
7119 if (n) {
7120 n[1].ui = program;
7121 n[2].e = pname;
7122 n[3].i = value;
7123 }
7124 if (ctx->ExecuteFlag) {
7125 CALL_ProgramParameteri(ctx->Exec, (program, pname, value));
7126 }
7127 }
7128
7129 static void GLAPIENTRY
7130 save_FramebufferTexture(GLenum target, GLenum attachment,
7131 GLuint texture, GLint level)
7132 {
7133 Node *n;
7134 GET_CURRENT_CONTEXT(ctx);
7135 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7136 n = alloc_instruction(ctx, OPCODE_FRAMEBUFFER_TEXTURE, 4);
7137 if (n) {
7138 n[1].e = target;
7139 n[2].e = attachment;
7140 n[3].ui = texture;
7141 n[4].i = level;
7142 }
7143 if (ctx->ExecuteFlag) {
7144 CALL_FramebufferTexture(ctx->Exec, (target, attachment, texture, level));
7145 }
7146 }
7147
7148 static void GLAPIENTRY
7149 save_FramebufferTextureFace(GLenum target, GLenum attachment,
7150 GLuint texture, GLint level, GLenum face)
7151 {
7152 Node *n;
7153 GET_CURRENT_CONTEXT(ctx);
7154 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7155 n = alloc_instruction(ctx, OPCODE_FRAMEBUFFER_TEXTURE_FACE, 5);
7156 if (n) {
7157 n[1].e = target;
7158 n[2].e = attachment;
7159 n[3].ui = texture;
7160 n[4].i = level;
7161 n[5].e = face;
7162 }
7163 if (ctx->ExecuteFlag) {
7164 CALL_FramebufferTextureFaceARB(ctx->Exec, (target, attachment, texture,
7165 level, face));
7166 }
7167 }
7168
7169
7170
7171 static void GLAPIENTRY
7172 save_WaitSync(GLsync sync, GLbitfield flags, GLuint64 timeout)
7173 {
7174 Node *n;
7175 GET_CURRENT_CONTEXT(ctx);
7176 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7177 n = alloc_instruction(ctx, OPCODE_WAIT_SYNC, 4);
7178 if (n) {
7179 union uint64_pair p;
7180 p.uint64 = timeout;
7181 n[1].data = sync;
7182 n[2].e = flags;
7183 n[3].ui = p.uint32[0];
7184 n[4].ui = p.uint32[1];
7185 }
7186 if (ctx->ExecuteFlag) {
7187 CALL_WaitSync(ctx->Exec, (sync, flags, timeout));
7188 }
7189 }
7190
7191
7192 /** GL_NV_conditional_render */
7193 static void GLAPIENTRY
7194 save_BeginConditionalRender(GLuint queryId, GLenum mode)
7195 {
7196 GET_CURRENT_CONTEXT(ctx);
7197 Node *n;
7198 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7199 n = alloc_instruction(ctx, OPCODE_BEGIN_CONDITIONAL_RENDER, 2);
7200 if (n) {
7201 n[1].i = queryId;
7202 n[2].e = mode;
7203 }
7204 if (ctx->ExecuteFlag) {
7205 CALL_BeginConditionalRender(ctx->Exec, (queryId, mode));
7206 }
7207 }
7208
7209 static void GLAPIENTRY
7210 save_EndConditionalRender(void)
7211 {
7212 GET_CURRENT_CONTEXT(ctx);
7213 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7214 alloc_instruction(ctx, OPCODE_END_CONDITIONAL_RENDER, 0);
7215 if (ctx->ExecuteFlag) {
7216 CALL_EndConditionalRender(ctx->Exec, ());
7217 }
7218 }
7219
7220 static void GLAPIENTRY
7221 save_UniformBlockBinding(GLuint prog, GLuint index, GLuint binding)
7222 {
7223 GET_CURRENT_CONTEXT(ctx);
7224 Node *n;
7225 ASSERT_OUTSIDE_SAVE_BEGIN_END_AND_FLUSH(ctx);
7226 n = alloc_instruction(ctx, OPCODE_UNIFORM_BLOCK_BINDING, 3);
7227 if (n) {
7228 n[1].ui = prog;
7229 n[2].ui = index;
7230 n[3].ui = binding;
7231 }
7232 if (ctx->ExecuteFlag) {
7233 CALL_UniformBlockBinding(ctx->Exec, (prog, index, binding));
7234 }
7235 }
7236
7237
7238 /**
7239 * Save an error-generating command into display list.
7240 *
7241 * KW: Will appear in the list before the vertex buffer containing the
7242 * command that provoked the error. I don't see this as a problem.
7243 */
7244 static void
7245 save_error(struct gl_context *ctx, GLenum error, const char *s)
7246 {
7247 Node *n;
7248 n = alloc_instruction(ctx, OPCODE_ERROR, 2);
7249 if (n) {
7250 n[1].e = error;
7251 n[2].data = (void *) s;
7252 }
7253 }
7254
7255
7256 /**
7257 * Compile an error into current display list.
7258 */
7259 void
7260 _mesa_compile_error(struct gl_context *ctx, GLenum error, const char *s)
7261 {
7262 if (ctx->CompileFlag)
7263 save_error(ctx, error, s);
7264 if (ctx->ExecuteFlag)
7265 _mesa_error(ctx, error, "%s", s);
7266 }
7267
7268
7269 /**
7270 * Test if ID names a display list.
7271 */
7272 static GLboolean
7273 islist(struct gl_context *ctx, GLuint list)
7274 {
7275 if (list > 0 && lookup_list(ctx, list)) {
7276 return GL_TRUE;
7277 }
7278 else {
7279 return GL_FALSE;
7280 }
7281 }
7282
7283
7284
7285 /**********************************************************************/
7286 /* Display list execution */
7287 /**********************************************************************/
7288
7289
7290 /*
7291 * Execute a display list. Note that the ListBase offset must have already
7292 * been added before calling this function. I.e. the list argument is
7293 * the absolute list number, not relative to ListBase.
7294 * \param list - display list number
7295 */
7296 static void
7297 execute_list(struct gl_context *ctx, GLuint list)
7298 {
7299 struct gl_display_list *dlist;
7300 Node *n;
7301 GLboolean done;
7302
7303 if (list == 0 || !islist(ctx, list))
7304 return;
7305
7306 if (ctx->ListState.CallDepth == MAX_LIST_NESTING) {
7307 /* raise an error? */
7308 return;
7309 }
7310
7311 dlist = lookup_list(ctx, list);
7312 if (!dlist)
7313 return;
7314
7315 ctx->ListState.CallDepth++;
7316
7317 if (ctx->Driver.BeginCallList)
7318 ctx->Driver.BeginCallList(ctx, dlist);
7319
7320 n = dlist->Head;
7321
7322 done = GL_FALSE;
7323 while (!done) {
7324 const OpCode opcode = n[0].opcode;
7325
7326 if (is_ext_opcode(opcode)) {
7327 n += ext_opcode_execute(ctx, n);
7328 }
7329 else {
7330 switch (opcode) {
7331 case OPCODE_ERROR:
7332 _mesa_error(ctx, n[1].e, "%s", (const char *) n[2].data);
7333 break;
7334 case OPCODE_ACCUM:
7335 CALL_Accum(ctx->Exec, (n[1].e, n[2].f));
7336 break;
7337 case OPCODE_ALPHA_FUNC:
7338 CALL_AlphaFunc(ctx->Exec, (n[1].e, n[2].f));
7339 break;
7340 case OPCODE_BIND_TEXTURE:
7341 CALL_BindTexture(ctx->Exec, (n[1].e, n[2].ui));
7342 break;
7343 case OPCODE_BITMAP:
7344 {
7345 const struct gl_pixelstore_attrib save = ctx->Unpack;
7346 ctx->Unpack = ctx->DefaultPacking;
7347 CALL_Bitmap(ctx->Exec, ((GLsizei) n[1].i, (GLsizei) n[2].i,
7348 n[3].f, n[4].f, n[5].f, n[6].f,
7349 (const GLubyte *) n[7].data));
7350 ctx->Unpack = save; /* restore */
7351 }
7352 break;
7353 case OPCODE_BLEND_COLOR:
7354 CALL_BlendColor(ctx->Exec, (n[1].f, n[2].f, n[3].f, n[4].f));
7355 break;
7356 case OPCODE_BLEND_EQUATION:
7357 CALL_BlendEquation(ctx->Exec, (n[1].e));
7358 break;
7359 case OPCODE_BLEND_EQUATION_SEPARATE:
7360 CALL_BlendEquationSeparate(ctx->Exec, (n[1].e, n[2].e));
7361 break;
7362 case OPCODE_BLEND_FUNC_SEPARATE:
7363 CALL_BlendFuncSeparate(ctx->Exec,
7364 (n[1].e, n[2].e, n[3].e, n[4].e));
7365 break;
7366
7367 case OPCODE_BLEND_FUNC_I:
7368 /* GL_ARB_draw_buffers_blend */
7369 CALL_BlendFunciARB(ctx->Exec, (n[1].ui, n[2].e, n[3].e));
7370 break;
7371 case OPCODE_BLEND_FUNC_SEPARATE_I:
7372 /* GL_ARB_draw_buffers_blend */
7373 CALL_BlendFuncSeparateiARB(ctx->Exec, (n[1].ui, n[2].e, n[3].e,
7374 n[4].e, n[5].e));
7375 break;
7376 case OPCODE_BLEND_EQUATION_I:
7377 /* GL_ARB_draw_buffers_blend */
7378 CALL_BlendEquationiARB(ctx->Exec, (n[1].ui, n[2].e));
7379 break;
7380 case OPCODE_BLEND_EQUATION_SEPARATE_I:
7381 /* GL_ARB_draw_buffers_blend */
7382 CALL_BlendEquationSeparateiARB(ctx->Exec,
7383 (n[1].ui, n[2].e, n[3].e));
7384 break;
7385
7386 case OPCODE_CALL_LIST:
7387 /* Generated by glCallList(), don't add ListBase */
7388 if (ctx->ListState.CallDepth < MAX_LIST_NESTING) {
7389 execute_list(ctx, n[1].ui);
7390 }
7391 break;
7392 case OPCODE_CALL_LIST_OFFSET:
7393 /* Generated by glCallLists() so we must add ListBase */
7394 if (n[2].b) {
7395 /* user specified a bad data type at compile time */
7396 _mesa_error(ctx, GL_INVALID_ENUM, "glCallLists(type)");
7397 }
7398 else if (ctx->ListState.CallDepth < MAX_LIST_NESTING) {
7399 GLuint list = (GLuint) (ctx->List.ListBase + n[1].i);
7400 execute_list(ctx, list);
7401 }
7402 break;
7403 case OPCODE_CLEAR:
7404 CALL_Clear(ctx->Exec, (n[1].bf));
7405 break;
7406 case OPCODE_CLEAR_BUFFER_IV:
7407 {
7408 GLint value[4];
7409 value[0] = n[3].i;
7410 value[1] = n[4].i;
7411 value[2] = n[5].i;
7412 value[3] = n[6].i;
7413 CALL_ClearBufferiv(ctx->Exec, (n[1].e, n[2].i, value));
7414 }
7415 break;
7416 case OPCODE_CLEAR_BUFFER_UIV:
7417 {
7418 GLuint value[4];
7419 value[0] = n[3].ui;
7420 value[1] = n[4].ui;
7421 value[2] = n[5].ui;
7422 value[3] = n[6].ui;
7423 CALL_ClearBufferuiv(ctx->Exec, (n[1].e, n[2].i, value));
7424 }
7425 break;
7426 case OPCODE_CLEAR_BUFFER_FV:
7427 {
7428 GLfloat value[4];
7429 value[0] = n[3].f;
7430 value[1] = n[4].f;
7431 value[2] = n[5].f;
7432 value[3] = n[6].f;
7433 CALL_ClearBufferfv(ctx->Exec, (n[1].e, n[2].i, value));
7434 }
7435 break;
7436 case OPCODE_CLEAR_BUFFER_FI:
7437 CALL_ClearBufferfi(ctx->Exec, (n[1].e, n[2].i, n[3].f, n[4].i));
7438 break;
7439 case OPCODE_CLEAR_COLOR:
7440 CALL_ClearColor(ctx->Exec, (n[1].f, n[2].f, n[3].f, n[4].f));
7441 break;
7442 case OPCODE_CLEAR_ACCUM:
7443 CALL_ClearAccum(ctx->Exec, (n[1].f, n[2].f, n[3].f, n[4].f));
7444 break;
7445 case OPCODE_CLEAR_DEPTH:
7446 CALL_ClearDepth(ctx->Exec, ((GLclampd) n[1].f));
7447 break;
7448 case OPCODE_CLEAR_INDEX:
7449 CALL_ClearIndex(ctx->Exec, ((GLfloat) n[1].ui));
7450 break;
7451 case OPCODE_CLEAR_STENCIL:
7452 CALL_ClearStencil(ctx->Exec, (n[1].i));
7453 break;
7454 case OPCODE_CLIP_PLANE:
7455 {
7456 GLdouble eq[4];
7457 eq[0] = n[2].f;
7458 eq[1] = n[3].f;
7459 eq[2] = n[4].f;
7460 eq[3] = n[5].f;
7461 CALL_ClipPlane(ctx->Exec, (n[1].e, eq));
7462 }
7463 break;
7464 case OPCODE_COLOR_MASK:
7465 CALL_ColorMask(ctx->Exec, (n[1].b, n[2].b, n[3].b, n[4].b));
7466 break;
7467 case OPCODE_COLOR_MASK_INDEXED:
7468 CALL_ColorMaski(ctx->Exec, (n[1].ui, n[2].b, n[3].b,
7469 n[4].b, n[5].b));
7470 break;
7471 case OPCODE_COLOR_MATERIAL:
7472 CALL_ColorMaterial(ctx->Exec, (n[1].e, n[2].e));
7473 break;
7474 case OPCODE_COLOR_TABLE:
7475 {
7476 const struct gl_pixelstore_attrib save = ctx->Unpack;
7477 ctx->Unpack = ctx->DefaultPacking;
7478 CALL_ColorTable(ctx->Exec, (n[1].e, n[2].e, n[3].i, n[4].e,
7479 n[5].e, n[6].data));
7480 ctx->Unpack = save; /* restore */
7481 }
7482 break;
7483 case OPCODE_COLOR_TABLE_PARAMETER_FV:
7484 {
7485 GLfloat params[4];
7486 params[0] = n[3].f;
7487 params[1] = n[4].f;
7488 params[2] = n[5].f;
7489 params[3] = n[6].f;
7490 CALL_ColorTableParameterfv(ctx->Exec,
7491 (n[1].e, n[2].e, params));
7492 }
7493 break;
7494 case OPCODE_COLOR_TABLE_PARAMETER_IV:
7495 {
7496 GLint params[4];
7497 params[0] = n[3].i;
7498 params[1] = n[4].i;
7499 params[2] = n[5].i;
7500 params[3] = n[6].i;
7501 CALL_ColorTableParameteriv(ctx->Exec,
7502 (n[1].e, n[2].e, params));
7503 }
7504 break;
7505 case OPCODE_COLOR_SUB_TABLE:
7506 {
7507 const struct gl_pixelstore_attrib save = ctx->Unpack;
7508 ctx->Unpack = ctx->DefaultPacking;
7509 CALL_ColorSubTable(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7510 n[4].e, n[5].e, n[6].data));
7511 ctx->Unpack = save; /* restore */
7512 }
7513 break;
7514 case OPCODE_CONVOLUTION_FILTER_1D:
7515 {
7516 const struct gl_pixelstore_attrib save = ctx->Unpack;
7517 ctx->Unpack = ctx->DefaultPacking;
7518 CALL_ConvolutionFilter1D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7519 n[4].e, n[5].e,
7520 n[6].data));
7521 ctx->Unpack = save; /* restore */
7522 }
7523 break;
7524 case OPCODE_CONVOLUTION_FILTER_2D:
7525 {
7526 const struct gl_pixelstore_attrib save = ctx->Unpack;
7527 ctx->Unpack = ctx->DefaultPacking;
7528 CALL_ConvolutionFilter2D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7529 n[4].i, n[5].e, n[6].e,
7530 n[7].data));
7531 ctx->Unpack = save; /* restore */
7532 }
7533 break;
7534 case OPCODE_CONVOLUTION_PARAMETER_I:
7535 CALL_ConvolutionParameteri(ctx->Exec, (n[1].e, n[2].e, n[3].i));
7536 break;
7537 case OPCODE_CONVOLUTION_PARAMETER_IV:
7538 {
7539 GLint params[4];
7540 params[0] = n[3].i;
7541 params[1] = n[4].i;
7542 params[2] = n[5].i;
7543 params[3] = n[6].i;
7544 CALL_ConvolutionParameteriv(ctx->Exec,
7545 (n[1].e, n[2].e, params));
7546 }
7547 break;
7548 case OPCODE_CONVOLUTION_PARAMETER_F:
7549 CALL_ConvolutionParameterf(ctx->Exec, (n[1].e, n[2].e, n[3].f));
7550 break;
7551 case OPCODE_CONVOLUTION_PARAMETER_FV:
7552 {
7553 GLfloat params[4];
7554 params[0] = n[3].f;
7555 params[1] = n[4].f;
7556 params[2] = n[5].f;
7557 params[3] = n[6].f;
7558 CALL_ConvolutionParameterfv(ctx->Exec,
7559 (n[1].e, n[2].e, params));
7560 }
7561 break;
7562 case OPCODE_COPY_COLOR_SUB_TABLE:
7563 CALL_CopyColorSubTable(ctx->Exec, (n[1].e, n[2].i,
7564 n[3].i, n[4].i, n[5].i));
7565 break;
7566 case OPCODE_COPY_COLOR_TABLE:
7567 CALL_CopyColorSubTable(ctx->Exec, (n[1].e, n[2].i,
7568 n[3].i, n[4].i, n[5].i));
7569 break;
7570 case OPCODE_COPY_PIXELS:
7571 CALL_CopyPixels(ctx->Exec, (n[1].i, n[2].i,
7572 (GLsizei) n[3].i, (GLsizei) n[4].i,
7573 n[5].e));
7574 break;
7575 case OPCODE_COPY_TEX_IMAGE1D:
7576 CALL_CopyTexImage1D(ctx->Exec, (n[1].e, n[2].i, n[3].e, n[4].i,
7577 n[5].i, n[6].i, n[7].i));
7578 break;
7579 case OPCODE_COPY_TEX_IMAGE2D:
7580 CALL_CopyTexImage2D(ctx->Exec, (n[1].e, n[2].i, n[3].e, n[4].i,
7581 n[5].i, n[6].i, n[7].i, n[8].i));
7582 break;
7583 case OPCODE_COPY_TEX_SUB_IMAGE1D:
7584 CALL_CopyTexSubImage1D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7585 n[4].i, n[5].i, n[6].i));
7586 break;
7587 case OPCODE_COPY_TEX_SUB_IMAGE2D:
7588 CALL_CopyTexSubImage2D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7589 n[4].i, n[5].i, n[6].i, n[7].i,
7590 n[8].i));
7591 break;
7592 case OPCODE_COPY_TEX_SUB_IMAGE3D:
7593 CALL_CopyTexSubImage3D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7594 n[4].i, n[5].i, n[6].i, n[7].i,
7595 n[8].i, n[9].i));
7596 break;
7597 case OPCODE_CULL_FACE:
7598 CALL_CullFace(ctx->Exec, (n[1].e));
7599 break;
7600 case OPCODE_DEPTH_FUNC:
7601 CALL_DepthFunc(ctx->Exec, (n[1].e));
7602 break;
7603 case OPCODE_DEPTH_MASK:
7604 CALL_DepthMask(ctx->Exec, (n[1].b));
7605 break;
7606 case OPCODE_DEPTH_RANGE:
7607 CALL_DepthRange(ctx->Exec,
7608 ((GLclampd) n[1].f, (GLclampd) n[2].f));
7609 break;
7610 case OPCODE_DISABLE:
7611 CALL_Disable(ctx->Exec, (n[1].e));
7612 break;
7613 case OPCODE_DISABLE_INDEXED:
7614 CALL_Disablei(ctx->Exec, (n[1].ui, n[2].e));
7615 break;
7616 case OPCODE_DRAW_BUFFER:
7617 CALL_DrawBuffer(ctx->Exec, (n[1].e));
7618 break;
7619 case OPCODE_DRAW_PIXELS:
7620 {
7621 const struct gl_pixelstore_attrib save = ctx->Unpack;
7622 ctx->Unpack = ctx->DefaultPacking;
7623 CALL_DrawPixels(ctx->Exec, (n[1].i, n[2].i, n[3].e, n[4].e,
7624 n[5].data));
7625 ctx->Unpack = save; /* restore */
7626 }
7627 break;
7628 case OPCODE_ENABLE:
7629 CALL_Enable(ctx->Exec, (n[1].e));
7630 break;
7631 case OPCODE_ENABLE_INDEXED:
7632 CALL_Enablei(ctx->Exec, (n[1].ui, n[2].e));
7633 break;
7634 case OPCODE_EVALMESH1:
7635 CALL_EvalMesh1(ctx->Exec, (n[1].e, n[2].i, n[3].i));
7636 break;
7637 case OPCODE_EVALMESH2:
7638 CALL_EvalMesh2(ctx->Exec,
7639 (n[1].e, n[2].i, n[3].i, n[4].i, n[5].i));
7640 break;
7641 case OPCODE_FOG:
7642 {
7643 GLfloat p[4];
7644 p[0] = n[2].f;
7645 p[1] = n[3].f;
7646 p[2] = n[4].f;
7647 p[3] = n[5].f;
7648 CALL_Fogfv(ctx->Exec, (n[1].e, p));
7649 }
7650 break;
7651 case OPCODE_FRONT_FACE:
7652 CALL_FrontFace(ctx->Exec, (n[1].e));
7653 break;
7654 case OPCODE_FRUSTUM:
7655 CALL_Frustum(ctx->Exec,
7656 (n[1].f, n[2].f, n[3].f, n[4].f, n[5].f, n[6].f));
7657 break;
7658 case OPCODE_HINT:
7659 CALL_Hint(ctx->Exec, (n[1].e, n[2].e));
7660 break;
7661 case OPCODE_HISTOGRAM:
7662 CALL_Histogram(ctx->Exec, (n[1].e, n[2].i, n[3].e, n[4].b));
7663 break;
7664 case OPCODE_INDEX_MASK:
7665 CALL_IndexMask(ctx->Exec, (n[1].ui));
7666 break;
7667 case OPCODE_INIT_NAMES:
7668 CALL_InitNames(ctx->Exec, ());
7669 break;
7670 case OPCODE_LIGHT:
7671 {
7672 GLfloat p[4];
7673 p[0] = n[3].f;
7674 p[1] = n[4].f;
7675 p[2] = n[5].f;
7676 p[3] = n[6].f;
7677 CALL_Lightfv(ctx->Exec, (n[1].e, n[2].e, p));
7678 }
7679 break;
7680 case OPCODE_LIGHT_MODEL:
7681 {
7682 GLfloat p[4];
7683 p[0] = n[2].f;
7684 p[1] = n[3].f;
7685 p[2] = n[4].f;
7686 p[3] = n[5].f;
7687 CALL_LightModelfv(ctx->Exec, (n[1].e, p));
7688 }
7689 break;
7690 case OPCODE_LINE_STIPPLE:
7691 CALL_LineStipple(ctx->Exec, (n[1].i, n[2].us));
7692 break;
7693 case OPCODE_LINE_WIDTH:
7694 CALL_LineWidth(ctx->Exec, (n[1].f));
7695 break;
7696 case OPCODE_LIST_BASE:
7697 CALL_ListBase(ctx->Exec, (n[1].ui));
7698 break;
7699 case OPCODE_LOAD_IDENTITY:
7700 CALL_LoadIdentity(ctx->Exec, ());
7701 break;
7702 case OPCODE_LOAD_MATRIX:
7703 if (sizeof(Node) == sizeof(GLfloat)) {
7704 CALL_LoadMatrixf(ctx->Exec, (&n[1].f));
7705 }
7706 else {
7707 GLfloat m[16];
7708 GLuint i;
7709 for (i = 0; i < 16; i++) {
7710 m[i] = n[1 + i].f;
7711 }
7712 CALL_LoadMatrixf(ctx->Exec, (m));
7713 }
7714 break;
7715 case OPCODE_LOAD_NAME:
7716 CALL_LoadName(ctx->Exec, (n[1].ui));
7717 break;
7718 case OPCODE_LOGIC_OP:
7719 CALL_LogicOp(ctx->Exec, (n[1].e));
7720 break;
7721 case OPCODE_MAP1:
7722 {
7723 GLenum target = n[1].e;
7724 GLint ustride = _mesa_evaluator_components(target);
7725 GLint uorder = n[5].i;
7726 GLfloat u1 = n[2].f;
7727 GLfloat u2 = n[3].f;
7728 CALL_Map1f(ctx->Exec, (target, u1, u2, ustride, uorder,
7729 (GLfloat *) n[6].data));
7730 }
7731 break;
7732 case OPCODE_MAP2:
7733 {
7734 GLenum target = n[1].e;
7735 GLfloat u1 = n[2].f;
7736 GLfloat u2 = n[3].f;
7737 GLfloat v1 = n[4].f;
7738 GLfloat v2 = n[5].f;
7739 GLint ustride = n[6].i;
7740 GLint vstride = n[7].i;
7741 GLint uorder = n[8].i;
7742 GLint vorder = n[9].i;
7743 CALL_Map2f(ctx->Exec, (target, u1, u2, ustride, uorder,
7744 v1, v2, vstride, vorder,
7745 (GLfloat *) n[10].data));
7746 }
7747 break;
7748 case OPCODE_MAPGRID1:
7749 CALL_MapGrid1f(ctx->Exec, (n[1].i, n[2].f, n[3].f));
7750 break;
7751 case OPCODE_MAPGRID2:
7752 CALL_MapGrid2f(ctx->Exec,
7753 (n[1].i, n[2].f, n[3].f, n[4].i, n[5].f, n[6].f));
7754 break;
7755 case OPCODE_MATRIX_MODE:
7756 CALL_MatrixMode(ctx->Exec, (n[1].e));
7757 break;
7758 case OPCODE_MIN_MAX:
7759 CALL_Minmax(ctx->Exec, (n[1].e, n[2].e, n[3].b));
7760 break;
7761 case OPCODE_MULT_MATRIX:
7762 if (sizeof(Node) == sizeof(GLfloat)) {
7763 CALL_MultMatrixf(ctx->Exec, (&n[1].f));
7764 }
7765 else {
7766 GLfloat m[16];
7767 GLuint i;
7768 for (i = 0; i < 16; i++) {
7769 m[i] = n[1 + i].f;
7770 }
7771 CALL_MultMatrixf(ctx->Exec, (m));
7772 }
7773 break;
7774 case OPCODE_ORTHO:
7775 CALL_Ortho(ctx->Exec,
7776 (n[1].f, n[2].f, n[3].f, n[4].f, n[5].f, n[6].f));
7777 break;
7778 case OPCODE_PASSTHROUGH:
7779 CALL_PassThrough(ctx->Exec, (n[1].f));
7780 break;
7781 case OPCODE_PIXEL_MAP:
7782 CALL_PixelMapfv(ctx->Exec,
7783 (n[1].e, n[2].i, (GLfloat *) n[3].data));
7784 break;
7785 case OPCODE_PIXEL_TRANSFER:
7786 CALL_PixelTransferf(ctx->Exec, (n[1].e, n[2].f));
7787 break;
7788 case OPCODE_PIXEL_ZOOM:
7789 CALL_PixelZoom(ctx->Exec, (n[1].f, n[2].f));
7790 break;
7791 case OPCODE_POINT_SIZE:
7792 CALL_PointSize(ctx->Exec, (n[1].f));
7793 break;
7794 case OPCODE_POINT_PARAMETERS:
7795 {
7796 GLfloat params[3];
7797 params[0] = n[2].f;
7798 params[1] = n[3].f;
7799 params[2] = n[4].f;
7800 CALL_PointParameterfv(ctx->Exec, (n[1].e, params));
7801 }
7802 break;
7803 case OPCODE_POLYGON_MODE:
7804 CALL_PolygonMode(ctx->Exec, (n[1].e, n[2].e));
7805 break;
7806 case OPCODE_POLYGON_STIPPLE:
7807 {
7808 const struct gl_pixelstore_attrib save = ctx->Unpack;
7809 ctx->Unpack = ctx->DefaultPacking;
7810 CALL_PolygonStipple(ctx->Exec, ((GLubyte *) n[1].data));
7811 ctx->Unpack = save; /* restore */
7812 }
7813 break;
7814 case OPCODE_POLYGON_OFFSET:
7815 CALL_PolygonOffset(ctx->Exec, (n[1].f, n[2].f));
7816 break;
7817 case OPCODE_POP_ATTRIB:
7818 CALL_PopAttrib(ctx->Exec, ());
7819 break;
7820 case OPCODE_POP_MATRIX:
7821 CALL_PopMatrix(ctx->Exec, ());
7822 break;
7823 case OPCODE_POP_NAME:
7824 CALL_PopName(ctx->Exec, ());
7825 break;
7826 case OPCODE_PRIORITIZE_TEXTURE:
7827 CALL_PrioritizeTextures(ctx->Exec, (1, &n[1].ui, &n[2].f));
7828 break;
7829 case OPCODE_PUSH_ATTRIB:
7830 CALL_PushAttrib(ctx->Exec, (n[1].bf));
7831 break;
7832 case OPCODE_PUSH_MATRIX:
7833 CALL_PushMatrix(ctx->Exec, ());
7834 break;
7835 case OPCODE_PUSH_NAME:
7836 CALL_PushName(ctx->Exec, (n[1].ui));
7837 break;
7838 case OPCODE_RASTER_POS:
7839 CALL_RasterPos4f(ctx->Exec, (n[1].f, n[2].f, n[3].f, n[4].f));
7840 break;
7841 case OPCODE_READ_BUFFER:
7842 CALL_ReadBuffer(ctx->Exec, (n[1].e));
7843 break;
7844 case OPCODE_RESET_HISTOGRAM:
7845 CALL_ResetHistogram(ctx->Exec, (n[1].e));
7846 break;
7847 case OPCODE_RESET_MIN_MAX:
7848 CALL_ResetMinmax(ctx->Exec, (n[1].e));
7849 break;
7850 case OPCODE_ROTATE:
7851 CALL_Rotatef(ctx->Exec, (n[1].f, n[2].f, n[3].f, n[4].f));
7852 break;
7853 case OPCODE_SCALE:
7854 CALL_Scalef(ctx->Exec, (n[1].f, n[2].f, n[3].f));
7855 break;
7856 case OPCODE_SCISSOR:
7857 CALL_Scissor(ctx->Exec, (n[1].i, n[2].i, n[3].i, n[4].i));
7858 break;
7859 case OPCODE_SHADE_MODEL:
7860 CALL_ShadeModel(ctx->Exec, (n[1].e));
7861 break;
7862 case OPCODE_PROVOKING_VERTEX:
7863 CALL_ProvokingVertex(ctx->Exec, (n[1].e));
7864 break;
7865 case OPCODE_STENCIL_FUNC:
7866 CALL_StencilFunc(ctx->Exec, (n[1].e, n[2].i, n[3].ui));
7867 break;
7868 case OPCODE_STENCIL_MASK:
7869 CALL_StencilMask(ctx->Exec, (n[1].ui));
7870 break;
7871 case OPCODE_STENCIL_OP:
7872 CALL_StencilOp(ctx->Exec, (n[1].e, n[2].e, n[3].e));
7873 break;
7874 case OPCODE_STENCIL_FUNC_SEPARATE:
7875 CALL_StencilFuncSeparate(ctx->Exec,
7876 (n[1].e, n[2].e, n[3].i, n[4].ui));
7877 break;
7878 case OPCODE_STENCIL_MASK_SEPARATE:
7879 CALL_StencilMaskSeparate(ctx->Exec, (n[1].e, n[2].ui));
7880 break;
7881 case OPCODE_STENCIL_OP_SEPARATE:
7882 CALL_StencilOpSeparate(ctx->Exec,
7883 (n[1].e, n[2].e, n[3].e, n[4].e));
7884 break;
7885 case OPCODE_TEXENV:
7886 {
7887 GLfloat params[4];
7888 params[0] = n[3].f;
7889 params[1] = n[4].f;
7890 params[2] = n[5].f;
7891 params[3] = n[6].f;
7892 CALL_TexEnvfv(ctx->Exec, (n[1].e, n[2].e, params));
7893 }
7894 break;
7895 case OPCODE_TEXGEN:
7896 {
7897 GLfloat params[4];
7898 params[0] = n[3].f;
7899 params[1] = n[4].f;
7900 params[2] = n[5].f;
7901 params[3] = n[6].f;
7902 CALL_TexGenfv(ctx->Exec, (n[1].e, n[2].e, params));
7903 }
7904 break;
7905 case OPCODE_TEXPARAMETER:
7906 {
7907 GLfloat params[4];
7908 params[0] = n[3].f;
7909 params[1] = n[4].f;
7910 params[2] = n[5].f;
7911 params[3] = n[6].f;
7912 CALL_TexParameterfv(ctx->Exec, (n[1].e, n[2].e, params));
7913 }
7914 break;
7915 case OPCODE_TEX_IMAGE1D:
7916 {
7917 const struct gl_pixelstore_attrib save = ctx->Unpack;
7918 ctx->Unpack = ctx->DefaultPacking;
7919 CALL_TexImage1D(ctx->Exec, (n[1].e, /* target */
7920 n[2].i, /* level */
7921 n[3].i, /* components */
7922 n[4].i, /* width */
7923 n[5].e, /* border */
7924 n[6].e, /* format */
7925 n[7].e, /* type */
7926 n[8].data));
7927 ctx->Unpack = save; /* restore */
7928 }
7929 break;
7930 case OPCODE_TEX_IMAGE2D:
7931 {
7932 const struct gl_pixelstore_attrib save = ctx->Unpack;
7933 ctx->Unpack = ctx->DefaultPacking;
7934 CALL_TexImage2D(ctx->Exec, (n[1].e, /* target */
7935 n[2].i, /* level */
7936 n[3].i, /* components */
7937 n[4].i, /* width */
7938 n[5].i, /* height */
7939 n[6].e, /* border */
7940 n[7].e, /* format */
7941 n[8].e, /* type */
7942 n[9].data));
7943 ctx->Unpack = save; /* restore */
7944 }
7945 break;
7946 case OPCODE_TEX_IMAGE3D:
7947 {
7948 const struct gl_pixelstore_attrib save = ctx->Unpack;
7949 ctx->Unpack = ctx->DefaultPacking;
7950 CALL_TexImage3D(ctx->Exec, (n[1].e, /* target */
7951 n[2].i, /* level */
7952 n[3].i, /* components */
7953 n[4].i, /* width */
7954 n[5].i, /* height */
7955 n[6].i, /* depth */
7956 n[7].e, /* border */
7957 n[8].e, /* format */
7958 n[9].e, /* type */
7959 n[10].data));
7960 ctx->Unpack = save; /* restore */
7961 }
7962 break;
7963 case OPCODE_TEX_SUB_IMAGE1D:
7964 {
7965 const struct gl_pixelstore_attrib save = ctx->Unpack;
7966 ctx->Unpack = ctx->DefaultPacking;
7967 CALL_TexSubImage1D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7968 n[4].i, n[5].e,
7969 n[6].e, n[7].data));
7970 ctx->Unpack = save; /* restore */
7971 }
7972 break;
7973 case OPCODE_TEX_SUB_IMAGE2D:
7974 {
7975 const struct gl_pixelstore_attrib save = ctx->Unpack;
7976 ctx->Unpack = ctx->DefaultPacking;
7977 CALL_TexSubImage2D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7978 n[4].i, n[5].e,
7979 n[6].i, n[7].e, n[8].e,
7980 n[9].data));
7981 ctx->Unpack = save; /* restore */
7982 }
7983 break;
7984 case OPCODE_TEX_SUB_IMAGE3D:
7985 {
7986 const struct gl_pixelstore_attrib save = ctx->Unpack;
7987 ctx->Unpack = ctx->DefaultPacking;
7988 CALL_TexSubImage3D(ctx->Exec, (n[1].e, n[2].i, n[3].i,
7989 n[4].i, n[5].i, n[6].i, n[7].i,
7990 n[8].i, n[9].e, n[10].e,
7991 n[11].data));
7992 ctx->Unpack = save; /* restore */
7993 }
7994 break;
7995 case OPCODE_TRANSLATE:
7996 CALL_Translatef(ctx->Exec, (n[1].f, n[2].f, n[3].f));
7997 break;
7998 case OPCODE_VIEWPORT:
7999 CALL_Viewport(ctx->Exec, (n[1].i, n[2].i,
8000 (GLsizei) n[3].i, (GLsizei) n[4].i));
8001 break;
8002 case OPCODE_WINDOW_POS:
8003 CALL_WindowPos4fMESA(ctx->Exec, (n[1].f, n[2].f, n[3].f, n[4].f));
8004 break;
8005 case OPCODE_ACTIVE_TEXTURE: /* GL_ARB_multitexture */
8006 CALL_ActiveTexture(ctx->Exec, (n[1].e));
8007 break;
8008 case OPCODE_COMPRESSED_TEX_IMAGE_1D: /* GL_ARB_texture_compression */
8009 CALL_CompressedTexImage1D(ctx->Exec, (n[1].e, n[2].i, n[3].e,
8010 n[4].i, n[5].i, n[6].i,
8011 n[7].data));
8012 break;
8013 case OPCODE_COMPRESSED_TEX_IMAGE_2D: /* GL_ARB_texture_compression */
8014 CALL_CompressedTexImage2D(ctx->Exec, (n[1].e, n[2].i, n[3].e,
8015 n[4].i, n[5].i, n[6].i,
8016 n[7].i, n[8].data));
8017 break;
8018 case OPCODE_COMPRESSED_TEX_IMAGE_3D: /* GL_ARB_texture_compression */
8019 CALL_CompressedTexImage3D(ctx->Exec, (n[1].e, n[2].i, n[3].e,
8020 n[4].i, n[5].i, n[6].i,
8021 n[7].i, n[8].i,
8022 n[9].data));
8023 break;
8024 case OPCODE_COMPRESSED_TEX_SUB_IMAGE_1D: /* GL_ARB_texture_compress */
8025 CALL_CompressedTexSubImage1D(ctx->Exec,
8026 (n[1].e, n[2].i, n[3].i, n[4].i,
8027 n[5].e, n[6].i, n[7].data));
8028 break;
8029 case OPCODE_COMPRESSED_TEX_SUB_IMAGE_2D: /* GL_ARB_texture_compress */
8030 CALL_CompressedTexSubImage2D(ctx->Exec,
8031 (n[1].e, n[2].i, n[3].i, n[4].i,
8032 n[5].i, n[6].i, n[7].e, n[8].i,
8033 n[9].data));
8034 break;
8035 case OPCODE_COMPRESSED_TEX_SUB_IMAGE_3D: /* GL_ARB_texture_compress */
8036 CALL_CompressedTexSubImage3D(ctx->Exec,
8037 (n[1].e, n[2].i, n[3].i, n[4].i,
8038 n[5].i, n[6].i, n[7].i, n[8].i,
8039 n[9].e, n[10].i, n[11].data));
8040 break;
8041 case OPCODE_SAMPLE_COVERAGE: /* GL_ARB_multisample */
8042 CALL_SampleCoverage(ctx->Exec, (n[1].f, n[2].b));
8043 break;
8044 case OPCODE_WINDOW_POS_ARB: /* GL_ARB_window_pos */
8045 CALL_WindowPos3f(ctx->Exec, (n[1].f, n[2].f, n[3].f));
8046 break;
8047 case OPCODE_BIND_PROGRAM_NV: /* GL_ARB_vertex_program */
8048 CALL_BindProgramARB(ctx->Exec, (n[1].e, n[2].ui));
8049 break;
8050 case OPCODE_PROGRAM_LOCAL_PARAMETER_ARB:
8051 CALL_ProgramLocalParameter4fARB(ctx->Exec,
8052 (n[1].e, n[2].ui, n[3].f, n[4].f,
8053 n[5].f, n[6].f));
8054 break;
8055 case OPCODE_ACTIVE_STENCIL_FACE_EXT:
8056 CALL_ActiveStencilFaceEXT(ctx->Exec, (n[1].e));
8057 break;
8058 case OPCODE_DEPTH_BOUNDS_EXT:
8059 CALL_DepthBoundsEXT(ctx->Exec, (n[1].f, n[2].f));
8060 break;
8061 case OPCODE_PROGRAM_STRING_ARB:
8062 CALL_ProgramStringARB(ctx->Exec,
8063 (n[1].e, n[2].e, n[3].i, n[4].data));
8064 break;
8065 case OPCODE_PROGRAM_ENV_PARAMETER_ARB:
8066 CALL_ProgramEnvParameter4fARB(ctx->Exec, (n[1].e, n[2].ui, n[3].f,
8067 n[4].f, n[5].f,
8068 n[6].f));
8069 break;
8070 case OPCODE_BEGIN_QUERY_ARB:
8071 CALL_BeginQuery(ctx->Exec, (n[1].e, n[2].ui));
8072 break;
8073 case OPCODE_END_QUERY_ARB:
8074 CALL_EndQuery(ctx->Exec, (n[1].e));
8075 break;
8076 case OPCODE_QUERY_COUNTER:
8077 CALL_QueryCounter(ctx->Exec, (n[1].ui, n[2].e));
8078 break;
8079 case OPCODE_BEGIN_QUERY_INDEXED:
8080 CALL_BeginQueryIndexed(ctx->Exec, (n[1].e, n[2].ui, n[3].ui));
8081 break;
8082 case OPCODE_END_QUERY_INDEXED:
8083 CALL_EndQueryIndexed(ctx->Exec, (n[1].e, n[2].ui));
8084 break;
8085 case OPCODE_DRAW_BUFFERS_ARB:
8086 {
8087 GLenum buffers[MAX_DRAW_BUFFERS];
8088 GLint i, count = MIN2(n[1].i, MAX_DRAW_BUFFERS);
8089 for (i = 0; i < count; i++)
8090 buffers[i] = n[2 + i].e;
8091 CALL_DrawBuffers(ctx->Exec, (n[1].i, buffers));
8092 }
8093 break;
8094 case OPCODE_BLIT_FRAMEBUFFER:
8095 CALL_BlitFramebuffer(ctx->Exec, (n[1].i, n[2].i, n[3].i, n[4].i,
8096 n[5].i, n[6].i, n[7].i, n[8].i,
8097 n[9].i, n[10].e));
8098 break;
8099 case OPCODE_USE_PROGRAM:
8100 CALL_UseProgram(ctx->Exec, (n[1].ui));
8101 break;
8102 case OPCODE_USE_SHADER_PROGRAM_EXT:
8103 CALL_UseShaderProgramEXT(ctx->Exec, (n[1].ui, n[2].ui));
8104 break;
8105 case OPCODE_ACTIVE_PROGRAM_EXT:
8106 CALL_ActiveProgramEXT(ctx->Exec, (n[1].ui));
8107 break;
8108 case OPCODE_UNIFORM_1F:
8109 CALL_Uniform1f(ctx->Exec, (n[1].i, n[2].f));
8110 break;
8111 case OPCODE_UNIFORM_2F:
8112 CALL_Uniform2f(ctx->Exec, (n[1].i, n[2].f, n[3].f));
8113 break;
8114 case OPCODE_UNIFORM_3F:
8115 CALL_Uniform3f(ctx->Exec, (n[1].i, n[2].f, n[3].f, n[4].f));
8116 break;
8117 case OPCODE_UNIFORM_4F:
8118 CALL_Uniform4f(ctx->Exec,
8119 (n[1].i, n[2].f, n[3].f, n[4].f, n[5].f));
8120 break;
8121 case OPCODE_UNIFORM_1FV:
8122 CALL_Uniform1fv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8123 break;
8124 case OPCODE_UNIFORM_2FV:
8125 CALL_Uniform2fv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8126 break;
8127 case OPCODE_UNIFORM_3FV:
8128 CALL_Uniform3fv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8129 break;
8130 case OPCODE_UNIFORM_4FV:
8131 CALL_Uniform4fv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8132 break;
8133 case OPCODE_UNIFORM_1I:
8134 CALL_Uniform1i(ctx->Exec, (n[1].i, n[2].i));
8135 break;
8136 case OPCODE_UNIFORM_2I:
8137 CALL_Uniform2i(ctx->Exec, (n[1].i, n[2].i, n[3].i));
8138 break;
8139 case OPCODE_UNIFORM_3I:
8140 CALL_Uniform3i(ctx->Exec, (n[1].i, n[2].i, n[3].i, n[4].i));
8141 break;
8142 case OPCODE_UNIFORM_4I:
8143 CALL_Uniform4i(ctx->Exec,
8144 (n[1].i, n[2].i, n[3].i, n[4].i, n[5].i));
8145 break;
8146 case OPCODE_UNIFORM_1IV:
8147 CALL_Uniform1iv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8148 break;
8149 case OPCODE_UNIFORM_2IV:
8150 CALL_Uniform2iv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8151 break;
8152 case OPCODE_UNIFORM_3IV:
8153 CALL_Uniform3iv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8154 break;
8155 case OPCODE_UNIFORM_4IV:
8156 CALL_Uniform4iv(ctx->Exec, (n[1].i, n[2].i, n[3].data));
8157 break;
8158 case OPCODE_UNIFORM_1UI:
8159 /*CALL_Uniform1uiARB(ctx->Exec, (n[1].i, n[2].i));*/
8160 break;
8161 case OPCODE_UNIFORM_2UI:
8162 /*CALL_Uniform2uiARB(ctx->Exec, (n[1].i, n[2].i, n[3].i));*/
8163 break;
8164 case OPCODE_UNIFORM_3UI:
8165 /*CALL_Uniform3uiARB(ctx->Exec, (n[1].i, n[2].i, n[3].i, n[4].i));*/
8166 break;
8167 case OPCODE_UNIFORM_4UI:
8168 /*CALL_Uniform4uiARB(ctx->Exec,
8169 (n[1].i, n[2].i, n[3].i, n[4].i, n[5].i));
8170 */
8171 break;
8172 case OPCODE_UNIFORM_1UIV:
8173 /*CALL_Uniform1uivARB(ctx->Exec, (n[1].i, n[2].i, n[3].data));*/
8174 break;
8175 case OPCODE_UNIFORM_2UIV:
8176 /*CALL_Uniform2uivARB(ctx->Exec, (n[1].i, n[2].i, n[3].data));*/
8177 break;
8178 case OPCODE_UNIFORM_3UIV:
8179 /*CALL_Uniform3uivARB(ctx->Exec, (n[1].i, n[2].i, n[3].data));*/
8180 break;
8181 case OPCODE_UNIFORM_4UIV:
8182 /*CALL_Uniform4uivARB(ctx->Exec, (n[1].i, n[2].i, n[3].data));*/
8183 break;
8184 case OPCODE_UNIFORM_MATRIX22:
8185 CALL_UniformMatrix2fv(ctx->Exec,
8186 (n[1].i, n[2].i, n[3].b, n[4].data));
8187 break;
8188 case OPCODE_UNIFORM_MATRIX33:
8189 CALL_UniformMatrix3fv(ctx->Exec,
8190 (n[1].i, n[2].i, n[3].b, n[4].data));
8191 break;
8192 case OPCODE_UNIFORM_MATRIX44:
8193 CALL_UniformMatrix4fv(ctx->Exec,
8194 (n[1].i, n[2].i, n[3].b, n[4].data));
8195 break;
8196 case OPCODE_UNIFORM_MATRIX23:
8197 CALL_UniformMatrix2x3fv(ctx->Exec,
8198 (n[1].i, n[2].i, n[3].b, n[4].data));
8199 break;
8200 case OPCODE_UNIFORM_MATRIX32:
8201 CALL_UniformMatrix3x2fv(ctx->Exec,
8202 (n[1].i, n[2].i, n[3].b, n[4].data));
8203 break;
8204 case OPCODE_UNIFORM_MATRIX24:
8205 CALL_UniformMatrix2x4fv(ctx->Exec,
8206 (n[1].i, n[2].i, n[3].b, n[4].data));
8207 break;
8208 case OPCODE_UNIFORM_MATRIX42:
8209 CALL_UniformMatrix4x2fv(ctx->Exec,
8210 (n[1].i, n[2].i, n[3].b, n[4].data));
8211 break;
8212 case OPCODE_UNIFORM_MATRIX34:
8213 CALL_UniformMatrix3x4fv(ctx->Exec,
8214 (n[1].i, n[2].i, n[3].b, n[4].data));
8215 break;
8216 case OPCODE_UNIFORM_MATRIX43:
8217 CALL_UniformMatrix4x3fv(ctx->Exec,
8218 (n[1].i, n[2].i, n[3].b, n[4].data));
8219 break;
8220
8221 case OPCODE_CLAMP_COLOR:
8222 CALL_ClampColor(ctx->Exec, (n[1].e, n[2].e));
8223 break;
8224
8225 case OPCODE_TEX_BUMP_PARAMETER_ATI:
8226 {
8227 GLfloat values[4];
8228 GLuint i, pname = n[1].ui;
8229
8230 for (i = 0; i < 4; i++)
8231 values[i] = n[1 + i].f;
8232 CALL_TexBumpParameterfvATI(ctx->Exec, (pname, values));
8233 }
8234 break;
8235 case OPCODE_BIND_FRAGMENT_SHADER_ATI:
8236 CALL_BindFragmentShaderATI(ctx->Exec, (n[1].i));
8237 break;
8238 case OPCODE_SET_FRAGMENT_SHADER_CONSTANTS_ATI:
8239 {
8240 GLfloat values[4];
8241 GLuint i, dst = n[1].ui;
8242
8243 for (i = 0; i < 4; i++)
8244 values[i] = n[1 + i].f;
8245 CALL_SetFragmentShaderConstantATI(ctx->Exec, (dst, values));
8246 }
8247 break;
8248 case OPCODE_ATTR_1F_NV:
8249 CALL_VertexAttrib1fNV(ctx->Exec, (n[1].e, n[2].f));
8250 break;
8251 case OPCODE_ATTR_2F_NV:
8252 /* Really shouldn't have to do this - the Node structure
8253 * is convenient, but it would be better to store the data
8254 * packed appropriately so that it can be sent directly
8255 * on. With x86_64 becoming common, this will start to
8256 * matter more.
8257 */
8258 if (sizeof(Node) == sizeof(GLfloat))
8259 CALL_VertexAttrib2fvNV(ctx->Exec, (n[1].e, &n[2].f));
8260 else
8261 CALL_VertexAttrib2fNV(ctx->Exec, (n[1].e, n[2].f, n[3].f));
8262 break;
8263 case OPCODE_ATTR_3F_NV:
8264 if (sizeof(Node) == sizeof(GLfloat))
8265 CALL_VertexAttrib3fvNV(ctx->Exec, (n[1].e, &n[2].f));
8266 else
8267 CALL_VertexAttrib3fNV(ctx->Exec, (n[1].e, n[2].f, n[3].f,
8268 n[4].f));
8269 break;
8270 case OPCODE_ATTR_4F_NV:
8271 if (sizeof(Node) == sizeof(GLfloat))
8272 CALL_VertexAttrib4fvNV(ctx->Exec, (n[1].e, &n[2].f));
8273 else
8274 CALL_VertexAttrib4fNV(ctx->Exec, (n[1].e, n[2].f, n[3].f,
8275 n[4].f, n[5].f));
8276 break;
8277 case OPCODE_ATTR_1F_ARB:
8278 CALL_VertexAttrib1fARB(ctx->Exec, (n[1].e, n[2].f));
8279 break;
8280 case OPCODE_ATTR_2F_ARB:
8281 /* Really shouldn't have to do this - the Node structure
8282 * is convenient, but it would be better to store the data
8283 * packed appropriately so that it can be sent directly
8284 * on. With x86_64 becoming common, this will start to
8285 * matter more.
8286 */
8287 if (sizeof(Node) == sizeof(GLfloat))
8288 CALL_VertexAttrib2fvARB(ctx->Exec, (n[1].e, &n[2].f));
8289 else
8290 CALL_VertexAttrib2fARB(ctx->Exec, (n[1].e, n[2].f, n[3].f));
8291 break;
8292 case OPCODE_ATTR_3F_ARB:
8293 if (sizeof(Node) == sizeof(GLfloat))
8294 CALL_VertexAttrib3fvARB(ctx->Exec, (n[1].e, &n[2].f));
8295 else
8296 CALL_VertexAttrib3fARB(ctx->Exec, (n[1].e, n[2].f, n[3].f,
8297 n[4].f));
8298 break;
8299 case OPCODE_ATTR_4F_ARB:
8300 if (sizeof(Node) == sizeof(GLfloat))
8301 CALL_VertexAttrib4fvARB(ctx->Exec, (n[1].e, &n[2].f));
8302 else
8303 CALL_VertexAttrib4fARB(ctx->Exec, (n[1].e, n[2].f, n[3].f,
8304 n[4].f, n[5].f));
8305 break;
8306 case OPCODE_MATERIAL:
8307 if (sizeof(Node) == sizeof(GLfloat))
8308 CALL_Materialfv(ctx->Exec, (n[1].e, n[2].e, &n[3].f));
8309 else {
8310 GLfloat f[4];
8311 f[0] = n[3].f;
8312 f[1] = n[4].f;
8313 f[2] = n[5].f;
8314 f[3] = n[6].f;
8315 CALL_Materialfv(ctx->Exec, (n[1].e, n[2].e, f));
8316 }
8317 break;
8318 case OPCODE_BEGIN:
8319 CALL_Begin(ctx->Exec, (n[1].e));
8320 break;
8321 case OPCODE_END:
8322 CALL_End(ctx->Exec, ());
8323 break;
8324 case OPCODE_RECTF:
8325 CALL_Rectf(ctx->Exec, (n[1].f, n[2].f, n[3].f, n[4].f));
8326 break;
8327 case OPCODE_EVAL_C1:
8328 CALL_EvalCoord1f(ctx->Exec, (n[1].f));
8329 break;
8330 case OPCODE_EVAL_C2:
8331 CALL_EvalCoord2f(ctx->Exec, (n[1].f, n[2].f));
8332 break;
8333 case OPCODE_EVAL_P1:
8334 CALL_EvalPoint1(ctx->Exec, (n[1].i));
8335 break;
8336 case OPCODE_EVAL_P2:
8337 CALL_EvalPoint2(ctx->Exec, (n[1].i, n[2].i));
8338 break;
8339
8340 /* GL_EXT_texture_integer */
8341 case OPCODE_CLEARCOLOR_I:
8342 CALL_ClearColorIiEXT(ctx->Exec, (n[1].i, n[2].i, n[3].i, n[4].i));
8343 break;
8344 case OPCODE_CLEARCOLOR_UI:
8345 CALL_ClearColorIuiEXT(ctx->Exec,
8346 (n[1].ui, n[2].ui, n[3].ui, n[4].ui));
8347 break;
8348 case OPCODE_TEXPARAMETER_I:
8349 {
8350 GLint params[4];
8351 params[0] = n[3].i;
8352 params[1] = n[4].i;
8353 params[2] = n[5].i;
8354 params[3] = n[6].i;
8355 CALL_TexParameterIiv(ctx->Exec, (n[1].e, n[2].e, params));
8356 }
8357 break;
8358 case OPCODE_TEXPARAMETER_UI:
8359 {
8360 GLuint params[4];
8361 params[0] = n[3].ui;
8362 params[1] = n[4].ui;
8363 params[2] = n[5].ui;
8364 params[3] = n[6].ui;
8365 CALL_TexParameterIuiv(ctx->Exec, (n[1].e, n[2].e, params));
8366 }
8367 break;
8368
8369 case OPCODE_VERTEX_ATTRIB_DIVISOR:
8370 /* GL_ARB_instanced_arrays */
8371 CALL_VertexAttribDivisor(ctx->Exec, (n[1].ui, n[2].ui));
8372 break;
8373
8374 case OPCODE_TEXTURE_BARRIER_NV:
8375 CALL_TextureBarrierNV(ctx->Exec, ());
8376 break;
8377
8378 /* GL_EXT/ARB_transform_feedback */
8379 case OPCODE_BEGIN_TRANSFORM_FEEDBACK:
8380 CALL_BeginTransformFeedback(ctx->Exec, (n[1].e));
8381 break;
8382 case OPCODE_END_TRANSFORM_FEEDBACK:
8383 CALL_EndTransformFeedback(ctx->Exec, ());
8384 break;
8385 case OPCODE_BIND_TRANSFORM_FEEDBACK:
8386 CALL_BindTransformFeedback(ctx->Exec, (n[1].e, n[2].ui));
8387 break;
8388 case OPCODE_PAUSE_TRANSFORM_FEEDBACK:
8389 CALL_PauseTransformFeedback(ctx->Exec, ());
8390 break;
8391 case OPCODE_RESUME_TRANSFORM_FEEDBACK:
8392 CALL_ResumeTransformFeedback(ctx->Exec, ());
8393 break;
8394 case OPCODE_DRAW_TRANSFORM_FEEDBACK:
8395 CALL_DrawTransformFeedback(ctx->Exec, (n[1].e, n[2].ui));
8396 break;
8397 case OPCODE_DRAW_TRANSFORM_FEEDBACK_STREAM:
8398 CALL_DrawTransformFeedbackStream(ctx->Exec,
8399 (n[1].e, n[2].ui, n[3].ui));
8400 break;
8401 case OPCODE_DRAW_TRANSFORM_FEEDBACK_INSTANCED:
8402 CALL_DrawTransformFeedbackInstanced(ctx->Exec,
8403 (n[1].e, n[2].ui, n[3].si));
8404 break;
8405 case OPCODE_DRAW_TRANSFORM_FEEDBACK_STREAM_INSTANCED:
8406 CALL_DrawTransformFeedbackStreamInstanced(ctx->Exec,
8407 (n[1].e, n[2].ui, n[3].ui, n[4].si));
8408 break;
8409
8410
8411 case OPCODE_BIND_SAMPLER:
8412 CALL_BindSampler(ctx->Exec, (n[1].ui, n[2].ui));
8413 break;
8414 case OPCODE_SAMPLER_PARAMETERIV:
8415 {
8416 GLint params[4];
8417 params[0] = n[3].i;
8418 params[1] = n[4].i;
8419 params[2] = n[5].i;
8420 params[3] = n[6].i;
8421 CALL_SamplerParameteriv(ctx->Exec, (n[1].ui, n[2].e, params));
8422 }
8423 break;
8424 case OPCODE_SAMPLER_PARAMETERFV:
8425 {
8426 GLfloat params[4];
8427 params[0] = n[3].f;
8428 params[1] = n[4].f;
8429 params[2] = n[5].f;
8430 params[3] = n[6].f;
8431 CALL_SamplerParameterfv(ctx->Exec, (n[1].ui, n[2].e, params));
8432 }
8433 break;
8434 case OPCODE_SAMPLER_PARAMETERIIV:
8435 {
8436 GLint params[4];
8437 params[0] = n[3].i;
8438 params[1] = n[4].i;
8439 params[2] = n[5].i;
8440 params[3] = n[6].i;
8441 CALL_SamplerParameterIiv(ctx->Exec, (n[1].ui, n[2].e, params));
8442 }
8443 break;
8444 case OPCODE_SAMPLER_PARAMETERUIV:
8445 {
8446 GLuint params[4];
8447 params[0] = n[3].ui;
8448 params[1] = n[4].ui;
8449 params[2] = n[5].ui;
8450 params[3] = n[6].ui;
8451 CALL_SamplerParameterIuiv(ctx->Exec, (n[1].ui, n[2].e, params));
8452 }
8453 break;
8454
8455 /* GL_ARB_geometry_shader4 */
8456 case OPCODE_PROGRAM_PARAMETERI:
8457 CALL_ProgramParameteri(ctx->Exec, (n[1].ui, n[2].e, n[3].i));
8458 break;
8459 case OPCODE_FRAMEBUFFER_TEXTURE:
8460 CALL_FramebufferTexture(ctx->Exec, (n[1].e, n[2].e,
8461 n[3].ui, n[4].i));
8462 break;
8463 case OPCODE_FRAMEBUFFER_TEXTURE_FACE:
8464 CALL_FramebufferTextureFaceARB(ctx->Exec, (n[1].e, n[2].e,
8465 n[3].ui, n[4].i, n[5].e));
8466 break;
8467
8468 /* GL_ARB_sync */
8469 case OPCODE_WAIT_SYNC:
8470 {
8471 union uint64_pair p;
8472 p.uint32[0] = n[3].ui;
8473 p.uint32[1] = n[4].ui;
8474 CALL_WaitSync(ctx->Exec, (n[1].data, n[2].bf, p.uint64));
8475 }
8476 break;
8477
8478 /* GL_NV_conditional_render */
8479 case OPCODE_BEGIN_CONDITIONAL_RENDER:
8480 CALL_BeginConditionalRender(ctx->Exec, (n[1].i, n[2].e));
8481 break;
8482 case OPCODE_END_CONDITIONAL_RENDER:
8483 CALL_EndConditionalRender(ctx->Exec, ());
8484 break;
8485
8486 case OPCODE_UNIFORM_BLOCK_BINDING:
8487 CALL_UniformBlockBinding(ctx->Exec, (n[1].ui, n[2].ui, n[3].ui));
8488 break;
8489
8490 case OPCODE_CONTINUE:
8491 n = (Node *) n[1].next;
8492 break;
8493 case OPCODE_END_OF_LIST:
8494 done = GL_TRUE;
8495 break;
8496 default:
8497 {
8498 char msg[1000];
8499 _mesa_snprintf(msg, sizeof(msg), "Error in execute_list: opcode=%d",
8500 (int) opcode);
8501 _mesa_problem(ctx, "%s", msg);
8502 }
8503 done = GL_TRUE;
8504 }
8505
8506 /* increment n to point to next compiled command */
8507 if (opcode != OPCODE_CONTINUE) {
8508 n += InstSize[opcode];
8509 }
8510 }
8511 }
8512
8513 if (ctx->Driver.EndCallList)
8514 ctx->Driver.EndCallList(ctx);
8515
8516 ctx->ListState.CallDepth--;
8517 }
8518
8519
8520
8521 /**********************************************************************/
8522 /* GL functions */
8523 /**********************************************************************/
8524
8525 /**
8526 * Test if a display list number is valid.
8527 */
8528 GLboolean GLAPIENTRY
8529 _mesa_IsList(GLuint list)
8530 {
8531 GET_CURRENT_CONTEXT(ctx);
8532 FLUSH_VERTICES(ctx, 0); /* must be called before assert */
8533 ASSERT_OUTSIDE_BEGIN_END_WITH_RETVAL(ctx, GL_FALSE);
8534 return islist(ctx, list);
8535 }
8536
8537
8538 /**
8539 * Delete a sequence of consecutive display lists.
8540 */
8541 void GLAPIENTRY
8542 _mesa_DeleteLists(GLuint list, GLsizei range)
8543 {
8544 GET_CURRENT_CONTEXT(ctx);
8545 GLuint i;
8546 FLUSH_VERTICES(ctx, 0); /* must be called before assert */
8547 ASSERT_OUTSIDE_BEGIN_END(ctx);
8548
8549 if (range < 0) {
8550 _mesa_error(ctx, GL_INVALID_VALUE, "glDeleteLists");
8551 return;
8552 }
8553 for (i = list; i < list + range; i++) {
8554 destroy_list(ctx, i);
8555 }
8556 }
8557
8558
8559 /**
8560 * Return a display list number, n, such that lists n through n+range-1
8561 * are free.
8562 */
8563 GLuint GLAPIENTRY
8564 _mesa_GenLists(GLsizei range)
8565 {
8566 GET_CURRENT_CONTEXT(ctx);
8567 GLuint base;
8568 FLUSH_VERTICES(ctx, 0); /* must be called before assert */
8569 ASSERT_OUTSIDE_BEGIN_END_WITH_RETVAL(ctx, 0);
8570
8571 if (range < 0) {
8572 _mesa_error(ctx, GL_INVALID_VALUE, "glGenLists");
8573 return 0;
8574 }
8575 if (range == 0) {
8576 return 0;
8577 }
8578
8579 /*
8580 * Make this an atomic operation
8581 */
8582 _glthread_LOCK_MUTEX(ctx->Shared->Mutex);
8583
8584 base = _mesa_HashFindFreeKeyBlock(ctx->Shared->DisplayList, range);
8585 if (base) {
8586 /* reserve the list IDs by with empty/dummy lists */
8587 GLint i;
8588 for (i = 0; i < range; i++) {
8589 _mesa_HashInsert(ctx->Shared->DisplayList, base + i,
8590 make_list(base + i, 1));
8591 }
8592 }
8593
8594 _glthread_UNLOCK_MUTEX(ctx->Shared->Mutex);
8595
8596 return base;
8597 }
8598
8599
8600 /**
8601 * Begin a new display list.
8602 */
8603 void GLAPIENTRY
8604 _mesa_NewList(GLuint name, GLenum mode)
8605 {
8606 GET_CURRENT_CONTEXT(ctx);
8607
8608 FLUSH_CURRENT(ctx, 0); /* must be called before assert */
8609 ASSERT_OUTSIDE_BEGIN_END(ctx);
8610
8611 if (MESA_VERBOSE & VERBOSE_API)
8612 _mesa_debug(ctx, "glNewList %u %s\n", name,
8613 _mesa_lookup_enum_by_nr(mode));
8614
8615 if (name == 0) {
8616 _mesa_error(ctx, GL_INVALID_VALUE, "glNewList");
8617 return;
8618 }
8619
8620 if (mode != GL_COMPILE && mode != GL_COMPILE_AND_EXECUTE) {
8621 _mesa_error(ctx, GL_INVALID_ENUM, "glNewList");
8622 return;
8623 }
8624
8625 if (ctx->ListState.CurrentList) {
8626 /* already compiling a display list */
8627 _mesa_error(ctx, GL_INVALID_OPERATION, "glNewList");
8628 return;
8629 }
8630
8631 ctx->CompileFlag = GL_TRUE;
8632 ctx->ExecuteFlag = (mode == GL_COMPILE_AND_EXECUTE);
8633
8634 /* Reset acumulated list state:
8635 */
8636 invalidate_saved_current_state( ctx );
8637
8638 /* Allocate new display list */
8639 ctx->ListState.CurrentList = make_list(name, BLOCK_SIZE);
8640 ctx->ListState.CurrentBlock = ctx->ListState.CurrentList->Head;
8641 ctx->ListState.CurrentPos = 0;
8642
8643 ctx->Driver.NewList(ctx, name, mode);
8644
8645 ctx->CurrentDispatch = ctx->Save;
8646 _glapi_set_dispatch(ctx->CurrentDispatch);
8647 }
8648
8649
8650 /**
8651 * End definition of current display list.
8652 */
8653 void GLAPIENTRY
8654 _mesa_EndList(void)
8655 {
8656 GET_CURRENT_CONTEXT(ctx);
8657 SAVE_FLUSH_VERTICES(ctx);
8658 FLUSH_VERTICES(ctx, 0);
8659
8660 if (MESA_VERBOSE & VERBOSE_API)
8661 _mesa_debug(ctx, "glEndList\n");
8662
8663 /* Check that a list is under construction */
8664 if (!ctx->ListState.CurrentList) {
8665 _mesa_error(ctx, GL_INVALID_OPERATION, "glEndList");
8666 return;
8667 }
8668
8669 /* Call before emitting END_OF_LIST, in case the driver wants to
8670 * emit opcodes itself.
8671 */
8672 ctx->Driver.EndList(ctx);
8673
8674 (void) alloc_instruction(ctx, OPCODE_END_OF_LIST, 0);
8675
8676 /* Destroy old list, if any */
8677 destroy_list(ctx, ctx->ListState.CurrentList->Name);
8678
8679 /* Install the new list */
8680 _mesa_HashInsert(ctx->Shared->DisplayList,
8681 ctx->ListState.CurrentList->Name,
8682 ctx->ListState.CurrentList);
8683
8684
8685 if (MESA_VERBOSE & VERBOSE_DISPLAY_LIST)
8686 mesa_print_display_list(ctx->ListState.CurrentList->Name);
8687
8688 ctx->ListState.CurrentList = NULL;
8689 ctx->ExecuteFlag = GL_TRUE;
8690 ctx->CompileFlag = GL_FALSE;
8691
8692 ctx->CurrentDispatch = ctx->Exec;
8693 _glapi_set_dispatch(ctx->CurrentDispatch);
8694 }
8695
8696
8697 void GLAPIENTRY
8698 _mesa_CallList(GLuint list)
8699 {
8700 GLboolean save_compile_flag;
8701 GET_CURRENT_CONTEXT(ctx);
8702 FLUSH_CURRENT(ctx, 0);
8703
8704 if (MESA_VERBOSE & VERBOSE_API)
8705 _mesa_debug(ctx, "glCallList %d\n", list);
8706
8707 if (list == 0) {
8708 _mesa_error(ctx, GL_INVALID_VALUE, "glCallList(list==0)");
8709 return;
8710 }
8711
8712 if (0)
8713 mesa_print_display_list( list );
8714
8715 /* VERY IMPORTANT: Save the CompileFlag status, turn it off,
8716 * execute the display list, and restore the CompileFlag.
8717 */
8718 save_compile_flag = ctx->CompileFlag;
8719 if (save_compile_flag) {
8720 ctx->CompileFlag = GL_FALSE;
8721 }
8722
8723 execute_list(ctx, list);
8724 ctx->CompileFlag = save_compile_flag;
8725
8726 /* also restore API function pointers to point to "save" versions */
8727 if (save_compile_flag) {
8728 ctx->CurrentDispatch = ctx->Save;
8729 _glapi_set_dispatch(ctx->CurrentDispatch);
8730 }
8731 }
8732
8733
8734 /**
8735 * Execute glCallLists: call multiple display lists.
8736 */
8737 void GLAPIENTRY
8738 _mesa_CallLists(GLsizei n, GLenum type, const GLvoid * lists)
8739 {
8740 GET_CURRENT_CONTEXT(ctx);
8741 GLint i;
8742 GLboolean save_compile_flag;
8743
8744 if (MESA_VERBOSE & VERBOSE_API)
8745 _mesa_debug(ctx, "glCallLists %d\n", n);
8746
8747 switch (type) {
8748 case GL_BYTE:
8749 case GL_UNSIGNED_BYTE:
8750 case GL_SHORT:
8751 case GL_UNSIGNED_SHORT:
8752 case GL_INT:
8753 case GL_UNSIGNED_INT:
8754 case GL_FLOAT:
8755 case GL_2_BYTES:
8756 case GL_3_BYTES:
8757 case GL_4_BYTES:
8758 /* OK */
8759 break;
8760 default:
8761 _mesa_error(ctx, GL_INVALID_ENUM, "glCallLists(type)");
8762 return;
8763 }
8764
8765 /* Save the CompileFlag status, turn it off, execute display list,
8766 * and restore the CompileFlag.
8767 */
8768 save_compile_flag = ctx->CompileFlag;
8769 ctx->CompileFlag = GL_FALSE;
8770
8771 for (i = 0; i < n; i++) {
8772 GLuint list = (GLuint) (ctx->List.ListBase + translate_id(i, type, lists));
8773 execute_list(ctx, list);
8774 }
8775
8776 ctx->CompileFlag = save_compile_flag;
8777
8778 /* also restore API function pointers to point to "save" versions */
8779 if (save_compile_flag) {
8780 ctx->CurrentDispatch = ctx->Save;
8781 _glapi_set_dispatch(ctx->CurrentDispatch);
8782 }
8783 }
8784
8785
8786 /**
8787 * Set the offset added to list numbers in glCallLists.
8788 */
8789 void GLAPIENTRY
8790 _mesa_ListBase(GLuint base)
8791 {
8792 GET_CURRENT_CONTEXT(ctx);
8793 FLUSH_VERTICES(ctx, 0); /* must be called before assert */
8794 ASSERT_OUTSIDE_BEGIN_END(ctx);
8795 ctx->List.ListBase = base;
8796 }
8797
8798 /**
8799 * Setup the given dispatch table to point to Mesa's display list
8800 * building functions.
8801 *
8802 * This does not include any of the tnl functions - they are
8803 * initialized from _mesa_init_api_defaults and from the active vtxfmt
8804 * struct.
8805 */
8806 void
8807 _mesa_initialize_save_table(const struct gl_context *ctx)
8808 {
8809 struct _glapi_table *table = ctx->Save;
8810 int numEntries = MAX2(_gloffset_COUNT, _glapi_get_dispatch_table_size());
8811
8812 /* Initially populate the dispatch table with the contents of the
8813 * normal-execution dispatch table. This lets us skip populating functions
8814 * that should be called directly instead of compiled into display lists.
8815 */
8816 memcpy(table, ctx->Exec, numEntries * sizeof(_glapi_proc));
8817
8818 _mesa_loopback_init_api_table(ctx, table);
8819
8820 /* GL 1.0 */
8821 SET_Accum(table, save_Accum);
8822 SET_AlphaFunc(table, save_AlphaFunc);
8823 SET_Bitmap(table, save_Bitmap);
8824 SET_BlendFunc(table, save_BlendFunc);
8825 SET_CallList(table, save_CallList);
8826 SET_CallLists(table, save_CallLists);
8827 SET_Clear(table, save_Clear);
8828 SET_ClearAccum(table, save_ClearAccum);
8829 SET_ClearColor(table, save_ClearColor);
8830 SET_ClearDepth(table, save_ClearDepth);
8831 SET_ClearIndex(table, save_ClearIndex);
8832 SET_ClearStencil(table, save_ClearStencil);
8833 SET_ClipPlane(table, save_ClipPlane);
8834 SET_ColorMask(table, save_ColorMask);
8835 SET_ColorMaski(table, save_ColorMaskIndexed);
8836 SET_ColorMaterial(table, save_ColorMaterial);
8837 SET_CopyPixels(table, save_CopyPixels);
8838 SET_CullFace(table, save_CullFace);
8839 SET_DepthFunc(table, save_DepthFunc);
8840 SET_DepthMask(table, save_DepthMask);
8841 SET_DepthRange(table, save_DepthRange);
8842 SET_Disable(table, save_Disable);
8843 SET_Disablei(table, save_DisableIndexed);
8844 SET_DrawBuffer(table, save_DrawBuffer);
8845 SET_DrawPixels(table, save_DrawPixels);
8846 SET_Enable(table, save_Enable);
8847 SET_Enablei(table, save_EnableIndexed);
8848 SET_EvalMesh1(table, save_EvalMesh1);
8849 SET_EvalMesh2(table, save_EvalMesh2);
8850 SET_Fogf(table, save_Fogf);
8851 SET_Fogfv(table, save_Fogfv);
8852 SET_Fogi(table, save_Fogi);
8853 SET_Fogiv(table, save_Fogiv);
8854 SET_FrontFace(table, save_FrontFace);
8855 SET_Frustum(table, save_Frustum);
8856 SET_Hint(table, save_Hint);
8857 SET_IndexMask(table, save_IndexMask);
8858 SET_InitNames(table, save_InitNames);
8859 SET_LightModelf(table, save_LightModelf);
8860 SET_LightModelfv(table, save_LightModelfv);
8861 SET_LightModeli(table, save_LightModeli);
8862 SET_LightModeliv(table, save_LightModeliv);
8863 SET_Lightf(table, save_Lightf);
8864 SET_Lightfv(table, save_Lightfv);
8865 SET_Lighti(table, save_Lighti);
8866 SET_Lightiv(table, save_Lightiv);
8867 SET_LineStipple(table, save_LineStipple);
8868 SET_LineWidth(table, save_LineWidth);
8869 SET_ListBase(table, save_ListBase);
8870 SET_LoadIdentity(table, save_LoadIdentity);
8871 SET_LoadMatrixd(table, save_LoadMatrixd);
8872 SET_LoadMatrixf(table, save_LoadMatrixf);
8873 SET_LoadName(table, save_LoadName);
8874 SET_LogicOp(table, save_LogicOp);
8875 SET_Map1d(table, save_Map1d);
8876 SET_Map1f(table, save_Map1f);
8877 SET_Map2d(table, save_Map2d);
8878 SET_Map2f(table, save_Map2f);
8879 SET_MapGrid1d(table, save_MapGrid1d);
8880 SET_MapGrid1f(table, save_MapGrid1f);
8881 SET_MapGrid2d(table, save_MapGrid2d);
8882 SET_MapGrid2f(table, save_MapGrid2f);
8883 SET_MatrixMode(table, save_MatrixMode);
8884 SET_MultMatrixd(table, save_MultMatrixd);
8885 SET_MultMatrixf(table, save_MultMatrixf);
8886 SET_NewList(table, save_NewList);
8887 SET_Ortho(table, save_Ortho);
8888 SET_PassThrough(table, save_PassThrough);
8889 SET_PixelMapfv(table, save_PixelMapfv);
8890 SET_PixelMapuiv(table, save_PixelMapuiv);
8891 SET_PixelMapusv(table, save_PixelMapusv);
8892 SET_PixelTransferf(table, save_PixelTransferf);
8893 SET_PixelTransferi(table, save_PixelTransferi);
8894 SET_PixelZoom(table, save_PixelZoom);
8895 SET_PointSize(table, save_PointSize);
8896 SET_PolygonMode(table, save_PolygonMode);
8897 SET_PolygonOffset(table, save_PolygonOffset);
8898 SET_PolygonStipple(table, save_PolygonStipple);
8899 SET_PopAttrib(table, save_PopAttrib);
8900 SET_PopMatrix(table, save_PopMatrix);
8901 SET_PopName(table, save_PopName);
8902 SET_PushAttrib(table, save_PushAttrib);
8903 SET_PushMatrix(table, save_PushMatrix);
8904 SET_PushName(table, save_PushName);
8905 SET_RasterPos2d(table, save_RasterPos2d);
8906 SET_RasterPos2dv(table, save_RasterPos2dv);
8907 SET_RasterPos2f(table, save_RasterPos2f);
8908 SET_RasterPos2fv(table, save_RasterPos2fv);
8909 SET_RasterPos2i(table, save_RasterPos2i);
8910 SET_RasterPos2iv(table, save_RasterPos2iv);
8911 SET_RasterPos2s(table, save_RasterPos2s);
8912 SET_RasterPos2sv(table, save_RasterPos2sv);
8913 SET_RasterPos3d(table, save_RasterPos3d);
8914 SET_RasterPos3dv(table, save_RasterPos3dv);
8915 SET_RasterPos3f(table, save_RasterPos3f);
8916 SET_RasterPos3fv(table, save_RasterPos3fv);
8917 SET_RasterPos3i(table, save_RasterPos3i);
8918 SET_RasterPos3iv(table, save_RasterPos3iv);
8919 SET_RasterPos3s(table, save_RasterPos3s);
8920 SET_RasterPos3sv(table, save_RasterPos3sv);
8921 SET_RasterPos4d(table, save_RasterPos4d);
8922 SET_RasterPos4dv(table, save_RasterPos4dv);
8923 SET_RasterPos4f(table, save_RasterPos4f);
8924 SET_RasterPos4fv(table, save_RasterPos4fv);
8925 SET_RasterPos4i(table, save_RasterPos4i);
8926 SET_RasterPos4iv(table, save_RasterPos4iv);
8927 SET_RasterPos4s(table, save_RasterPos4s);
8928 SET_RasterPos4sv(table, save_RasterPos4sv);
8929 SET_ReadBuffer(table, save_ReadBuffer);
8930 SET_Rotated(table, save_Rotated);
8931 SET_Rotatef(table, save_Rotatef);
8932 SET_Scaled(table, save_Scaled);
8933 SET_Scalef(table, save_Scalef);
8934 SET_Scissor(table, save_Scissor);
8935 SET_ShadeModel(table, save_ShadeModel);
8936 SET_StencilFunc(table, save_StencilFunc);
8937 SET_StencilMask(table, save_StencilMask);
8938 SET_StencilOp(table, save_StencilOp);
8939 SET_TexEnvf(table, save_TexEnvf);
8940 SET_TexEnvfv(table, save_TexEnvfv);
8941 SET_TexEnvi(table, save_TexEnvi);
8942 SET_TexEnviv(table, save_TexEnviv);
8943 SET_TexGend(table, save_TexGend);
8944 SET_TexGendv(table, save_TexGendv);
8945 SET_TexGenf(table, save_TexGenf);
8946 SET_TexGenfv(table, save_TexGenfv);
8947 SET_TexGeni(table, save_TexGeni);
8948 SET_TexGeniv(table, save_TexGeniv);
8949 SET_TexImage1D(table, save_TexImage1D);
8950 SET_TexImage2D(table, save_TexImage2D);
8951 SET_TexParameterf(table, save_TexParameterf);
8952 SET_TexParameterfv(table, save_TexParameterfv);
8953 SET_TexParameteri(table, save_TexParameteri);
8954 SET_TexParameteriv(table, save_TexParameteriv);
8955 SET_Translated(table, save_Translated);
8956 SET_Translatef(table, save_Translatef);
8957 SET_Viewport(table, save_Viewport);
8958
8959 /* GL 1.1 */
8960 SET_BindTexture(table, save_BindTexture);
8961 SET_CopyTexImage1D(table, save_CopyTexImage1D);
8962 SET_CopyTexImage2D(table, save_CopyTexImage2D);
8963 SET_CopyTexSubImage1D(table, save_CopyTexSubImage1D);
8964 SET_CopyTexSubImage2D(table, save_CopyTexSubImage2D);
8965 SET_PrioritizeTextures(table, save_PrioritizeTextures);
8966 SET_TexSubImage1D(table, save_TexSubImage1D);
8967 SET_TexSubImage2D(table, save_TexSubImage2D);
8968
8969 /* GL 1.2 */
8970 SET_CopyTexSubImage3D(table, save_CopyTexSubImage3D);
8971 SET_TexImage3D(table, save_TexImage3D);
8972 SET_TexSubImage3D(table, save_TexSubImage3D);
8973
8974 /* GL 2.0 */
8975 SET_StencilFuncSeparate(table, save_StencilFuncSeparate);
8976 SET_StencilMaskSeparate(table, save_StencilMaskSeparate);
8977 SET_StencilOpSeparate(table, save_StencilOpSeparate);
8978
8979 /* ATI_separate_stencil */
8980 SET_StencilFuncSeparateATI(table, save_StencilFuncSeparateATI);
8981
8982 /* GL_ARB_imaging */
8983 /* Not all are supported */
8984 SET_BlendColor(table, save_BlendColor);
8985 SET_BlendEquation(table, save_BlendEquation);
8986 SET_ColorSubTable(table, save_ColorSubTable);
8987 SET_ColorTable(table, save_ColorTable);
8988 SET_ColorTableParameterfv(table, save_ColorTableParameterfv);
8989 SET_ColorTableParameteriv(table, save_ColorTableParameteriv);
8990 SET_ConvolutionFilter1D(table, save_ConvolutionFilter1D);
8991 SET_ConvolutionFilter2D(table, save_ConvolutionFilter2D);
8992 SET_ConvolutionParameterf(table, save_ConvolutionParameterf);
8993 SET_ConvolutionParameterfv(table, save_ConvolutionParameterfv);
8994 SET_ConvolutionParameteri(table, save_ConvolutionParameteri);
8995 SET_ConvolutionParameteriv(table, save_ConvolutionParameteriv);
8996 SET_CopyColorSubTable(table, save_CopyColorSubTable);
8997 SET_CopyColorTable(table, save_CopyColorTable);
8998 SET_Histogram(table, save_Histogram);
8999 SET_Minmax(table, save_Minmax);
9000 SET_ResetHistogram(table, save_ResetHistogram);
9001 SET_ResetMinmax(table, save_ResetMinmax);
9002
9003 /* 2. GL_EXT_blend_color */
9004 #if 0
9005 SET_BlendColorEXT(table, save_BlendColorEXT);
9006 #endif
9007
9008 /* 3. GL_EXT_polygon_offset */
9009 SET_PolygonOffsetEXT(table, save_PolygonOffsetEXT);
9010
9011 /* 6. GL_EXT_texture3d */
9012 #if 0
9013 SET_CopyTexSubImage3DEXT(table, save_CopyTexSubImage3D);
9014 SET_TexImage3DEXT(table, save_TexImage3DEXT);
9015 SET_TexSubImage3DEXT(table, save_TexSubImage3D);
9016 #endif
9017
9018 /* 14. GL_SGI_color_table */
9019 #if 0
9020 SET_ColorTableSGI(table, save_ColorTable);
9021 SET_ColorSubTableSGI(table, save_ColorSubTable);
9022 #endif
9023
9024 /* 37. GL_EXT_blend_minmax */
9025 #if 0
9026 SET_BlendEquationEXT(table, save_BlendEquationEXT);
9027 #endif
9028
9029 /* 54. GL_EXT_point_parameters */
9030 SET_PointParameterf(table, save_PointParameterfEXT);
9031 SET_PointParameterfv(table, save_PointParameterfvEXT);
9032
9033 /* 173. GL_EXT_blend_func_separate */
9034 SET_BlendFuncSeparate(table, save_BlendFuncSeparateEXT);
9035
9036 /* 197. GL_MESA_window_pos */
9037 SET_WindowPos2d(table, save_WindowPos2dMESA);
9038 SET_WindowPos2dv(table, save_WindowPos2dvMESA);
9039 SET_WindowPos2f(table, save_WindowPos2fMESA);
9040 SET_WindowPos2fv(table, save_WindowPos2fvMESA);
9041 SET_WindowPos2i(table, save_WindowPos2iMESA);
9042 SET_WindowPos2iv(table, save_WindowPos2ivMESA);
9043 SET_WindowPos2s(table, save_WindowPos2sMESA);
9044 SET_WindowPos2sv(table, save_WindowPos2svMESA);
9045 SET_WindowPos3d(table, save_WindowPos3dMESA);
9046 SET_WindowPos3dv(table, save_WindowPos3dvMESA);
9047 SET_WindowPos3f(table, save_WindowPos3fMESA);
9048 SET_WindowPos3fv(table, save_WindowPos3fvMESA);
9049 SET_WindowPos3i(table, save_WindowPos3iMESA);
9050 SET_WindowPos3iv(table, save_WindowPos3ivMESA);
9051 SET_WindowPos3s(table, save_WindowPos3sMESA);
9052 SET_WindowPos3sv(table, save_WindowPos3svMESA);
9053 SET_WindowPos4dMESA(table, save_WindowPos4dMESA);
9054 SET_WindowPos4dvMESA(table, save_WindowPos4dvMESA);
9055 SET_WindowPos4fMESA(table, save_WindowPos4fMESA);
9056 SET_WindowPos4fvMESA(table, save_WindowPos4fvMESA);
9057 SET_WindowPos4iMESA(table, save_WindowPos4iMESA);
9058 SET_WindowPos4ivMESA(table, save_WindowPos4ivMESA);
9059 SET_WindowPos4sMESA(table, save_WindowPos4sMESA);
9060 SET_WindowPos4svMESA(table, save_WindowPos4svMESA);
9061
9062 /* 233. GL_NV_vertex_program */
9063 /* The following commands DO NOT go into display lists:
9064 * AreProgramsResidentNV, IsProgramNV, GenProgramsNV, DeleteProgramsNV,
9065 * VertexAttribPointerNV, GetProgram*, GetVertexAttrib*
9066 */
9067 SET_BindProgramARB(table, save_BindProgramNV);
9068
9069 /* 244. GL_ATI_envmap_bumpmap */
9070 SET_TexBumpParameterivATI(table, save_TexBumpParameterivATI);
9071 SET_TexBumpParameterfvATI(table, save_TexBumpParameterfvATI);
9072
9073 /* 245. GL_ATI_fragment_shader */
9074 SET_BindFragmentShaderATI(table, save_BindFragmentShaderATI);
9075 SET_SetFragmentShaderConstantATI(table, save_SetFragmentShaderConstantATI);
9076
9077 /* 262. GL_NV_point_sprite */
9078 SET_PointParameteri(table, save_PointParameteriNV);
9079 SET_PointParameteriv(table, save_PointParameterivNV);
9080
9081 /* 268. GL_EXT_stencil_two_side */
9082 SET_ActiveStencilFaceEXT(table, save_ActiveStencilFaceEXT);
9083
9084 /* ???. GL_EXT_depth_bounds_test */
9085 SET_DepthBoundsEXT(table, save_DepthBoundsEXT);
9086
9087 /* ARB 1. GL_ARB_multitexture */
9088 SET_ActiveTexture(table, save_ActiveTextureARB);
9089
9090 /* ARB 3. GL_ARB_transpose_matrix */
9091 SET_LoadTransposeMatrixd(table, save_LoadTransposeMatrixdARB);
9092 SET_LoadTransposeMatrixf(table, save_LoadTransposeMatrixfARB);
9093 SET_MultTransposeMatrixd(table, save_MultTransposeMatrixdARB);
9094 SET_MultTransposeMatrixf(table, save_MultTransposeMatrixfARB);
9095
9096 /* ARB 5. GL_ARB_multisample */
9097 SET_SampleCoverage(table, save_SampleCoverageARB);
9098
9099 /* ARB 12. GL_ARB_texture_compression */
9100 SET_CompressedTexImage3D(table, save_CompressedTexImage3DARB);
9101 SET_CompressedTexImage2D(table, save_CompressedTexImage2DARB);
9102 SET_CompressedTexImage1D(table, save_CompressedTexImage1DARB);
9103 SET_CompressedTexSubImage3D(table, save_CompressedTexSubImage3DARB);
9104 SET_CompressedTexSubImage2D(table, save_CompressedTexSubImage2DARB);
9105 SET_CompressedTexSubImage1D(table, save_CompressedTexSubImage1DARB);
9106
9107 /* ARB 14. GL_ARB_point_parameters */
9108 /* aliased with EXT_point_parameters functions */
9109
9110 /* ARB 25. GL_ARB_window_pos */
9111 /* aliased with MESA_window_pos functions */
9112
9113 /* ARB 26. GL_ARB_vertex_program */
9114 /* ARB 27. GL_ARB_fragment_program */
9115 /* glVertexAttrib* functions alias the NV ones, handled elsewhere */
9116 SET_ProgramStringARB(table, save_ProgramStringARB);
9117 SET_BindProgramARB(table, save_BindProgramNV);
9118 SET_ProgramEnvParameter4dARB(table, save_ProgramEnvParameter4dARB);
9119 SET_ProgramEnvParameter4dvARB(table, save_ProgramEnvParameter4dvARB);
9120 SET_ProgramEnvParameter4fARB(table, save_ProgramEnvParameter4fARB);
9121 SET_ProgramEnvParameter4fvARB(table, save_ProgramEnvParameter4fvARB);
9122 SET_ProgramLocalParameter4dARB(table, save_ProgramLocalParameter4dARB);
9123 SET_ProgramLocalParameter4dvARB(table, save_ProgramLocalParameter4dvARB);
9124 SET_ProgramLocalParameter4fARB(table, save_ProgramLocalParameter4fARB);
9125 SET_ProgramLocalParameter4fvARB(table, save_ProgramLocalParameter4fvARB);
9126
9127 SET_BeginQuery(table, save_BeginQueryARB);
9128 SET_EndQuery(table, save_EndQueryARB);
9129 SET_QueryCounter(table, save_QueryCounter);
9130
9131 SET_DrawBuffers(table, save_DrawBuffersARB);
9132
9133 SET_BlitFramebuffer(table, save_BlitFramebufferEXT);
9134
9135 SET_UseProgram(table, save_UseProgramObjectARB);
9136 SET_Uniform1f(table, save_Uniform1fARB);
9137 SET_Uniform2f(table, save_Uniform2fARB);
9138 SET_Uniform3f(table, save_Uniform3fARB);
9139 SET_Uniform4f(table, save_Uniform4fARB);
9140 SET_Uniform1fv(table, save_Uniform1fvARB);
9141 SET_Uniform2fv(table, save_Uniform2fvARB);
9142 SET_Uniform3fv(table, save_Uniform3fvARB);
9143 SET_Uniform4fv(table, save_Uniform4fvARB);
9144 SET_Uniform1i(table, save_Uniform1iARB);
9145 SET_Uniform2i(table, save_Uniform2iARB);
9146 SET_Uniform3i(table, save_Uniform3iARB);
9147 SET_Uniform4i(table, save_Uniform4iARB);
9148 SET_Uniform1iv(table, save_Uniform1ivARB);
9149 SET_Uniform2iv(table, save_Uniform2ivARB);
9150 SET_Uniform3iv(table, save_Uniform3ivARB);
9151 SET_Uniform4iv(table, save_Uniform4ivARB);
9152 SET_UniformMatrix2fv(table, save_UniformMatrix2fvARB);
9153 SET_UniformMatrix3fv(table, save_UniformMatrix3fvARB);
9154 SET_UniformMatrix4fv(table, save_UniformMatrix4fvARB);
9155 SET_UniformMatrix2x3fv(table, save_UniformMatrix2x3fv);
9156 SET_UniformMatrix3x2fv(table, save_UniformMatrix3x2fv);
9157 SET_UniformMatrix2x4fv(table, save_UniformMatrix2x4fv);
9158 SET_UniformMatrix4x2fv(table, save_UniformMatrix4x2fv);
9159 SET_UniformMatrix3x4fv(table, save_UniformMatrix3x4fv);
9160 SET_UniformMatrix4x3fv(table, save_UniformMatrix4x3fv);
9161
9162 /* 299. GL_EXT_blend_equation_separate */
9163 SET_BlendEquationSeparate(table, save_BlendEquationSeparateEXT);
9164
9165 /* GL_EXT_gpu_program_parameters */
9166 SET_ProgramEnvParameters4fvEXT(table, save_ProgramEnvParameters4fvEXT);
9167 SET_ProgramLocalParameters4fvEXT(table, save_ProgramLocalParameters4fvEXT);
9168
9169 /* 364. GL_EXT_provoking_vertex */
9170 SET_ProvokingVertex(table, save_ProvokingVertexEXT);
9171
9172 /* GL_EXT_texture_integer */
9173 SET_ClearColorIiEXT(table, save_ClearColorIi);
9174 SET_ClearColorIuiEXT(table, save_ClearColorIui);
9175 SET_TexParameterIiv(table, save_TexParameterIiv);
9176 SET_TexParameterIuiv(table, save_TexParameterIuiv);
9177
9178 /* 377. GL_EXT_separate_shader_objects */
9179 SET_UseShaderProgramEXT(table, save_UseShaderProgramEXT);
9180 SET_ActiveProgramEXT(table, save_ActiveProgramEXT);
9181
9182 /* GL_ARB_color_buffer_float */
9183 SET_ClampColor(table, save_ClampColorARB);
9184
9185 /* GL 3.0 */
9186 SET_ClearBufferiv(table, save_ClearBufferiv);
9187 SET_ClearBufferuiv(table, save_ClearBufferuiv);
9188 SET_ClearBufferfv(table, save_ClearBufferfv);
9189 SET_ClearBufferfi(table, save_ClearBufferfi);
9190 #if 0
9191 SET_Uniform1ui(table, save_Uniform1ui);
9192 SET_Uniform2ui(table, save_Uniform2ui);
9193 SET_Uniform3ui(table, save_Uniform3ui);
9194 SET_Uniform4ui(table, save_Uniform4ui);
9195 SET_Uniform1uiv(table, save_Uniform1uiv);
9196 SET_Uniform2uiv(table, save_Uniform2uiv);
9197 SET_Uniform3uiv(table, save_Uniform3uiv);
9198 SET_Uniform4uiv(table, save_Uniform4uiv);
9199 #else
9200 (void) save_Uniform1ui;
9201 (void) save_Uniform2ui;
9202 (void) save_Uniform3ui;
9203 (void) save_Uniform4ui;
9204 (void) save_Uniform1uiv;
9205 (void) save_Uniform2uiv;
9206 (void) save_Uniform3uiv;
9207 (void) save_Uniform4uiv;
9208 #endif
9209
9210 /* These are: */
9211 SET_BeginTransformFeedback(table, save_BeginTransformFeedback);
9212 SET_EndTransformFeedback(table, save_EndTransformFeedback);
9213 SET_BindTransformFeedback(table, save_BindTransformFeedback);
9214 SET_PauseTransformFeedback(table, save_PauseTransformFeedback);
9215 SET_ResumeTransformFeedback(table, save_ResumeTransformFeedback);
9216 SET_DrawTransformFeedback(table, save_DrawTransformFeedback);
9217 SET_DrawTransformFeedbackStream(table, save_DrawTransformFeedbackStream);
9218 SET_DrawTransformFeedbackInstanced(table,
9219 save_DrawTransformFeedbackInstanced);
9220 SET_DrawTransformFeedbackStreamInstanced(table,
9221 save_DrawTransformFeedbackStreamInstanced);
9222 SET_BeginQueryIndexed(table, save_BeginQueryIndexed);
9223 SET_EndQueryIndexed(table, save_EndQueryIndexed);
9224
9225 /* GL_ARB_instanced_arrays */
9226 SET_VertexAttribDivisor(table, save_VertexAttribDivisor);
9227
9228 /* GL_NV_texture_barrier */
9229 SET_TextureBarrierNV(table, save_TextureBarrierNV);
9230
9231 SET_BindSampler(table, save_BindSampler);
9232 SET_SamplerParameteri(table, save_SamplerParameteri);
9233 SET_SamplerParameterf(table, save_SamplerParameterf);
9234 SET_SamplerParameteriv(table, save_SamplerParameteriv);
9235 SET_SamplerParameterfv(table, save_SamplerParameterfv);
9236 SET_SamplerParameterIiv(table, save_SamplerParameterIiv);
9237 SET_SamplerParameterIuiv(table, save_SamplerParameterIuiv);
9238
9239 /* GL_ARB_draw_buffer_blend */
9240 SET_BlendFunciARB(table, save_BlendFunci);
9241 SET_BlendFuncSeparateiARB(table, save_BlendFuncSeparatei);
9242 SET_BlendEquationiARB(table, save_BlendEquationi);
9243 SET_BlendEquationSeparateiARB(table, save_BlendEquationSeparatei);
9244
9245 /* GL_ARB_geometry_shader4 */
9246 SET_ProgramParameteri(table, save_ProgramParameteri);
9247 SET_FramebufferTexture(table, save_FramebufferTexture);
9248 SET_FramebufferTextureFaceARB(table, save_FramebufferTextureFace);
9249
9250 /* GL_NV_conditional_render */
9251 SET_BeginConditionalRender(table, save_BeginConditionalRender);
9252 SET_EndConditionalRender(table, save_EndConditionalRender);
9253
9254 /* GL_ARB_sync */
9255 SET_WaitSync(table, save_WaitSync);
9256
9257 /* GL_ARB_uniform_buffer_object */
9258 SET_UniformBlockBinding(table, save_UniformBlockBinding);
9259 }
9260
9261
9262
9263 static const char *
9264 enum_string(GLenum k)
9265 {
9266 return _mesa_lookup_enum_by_nr(k);
9267 }
9268
9269
9270 /**
9271 * Print the commands in a display list. For debugging only.
9272 * TODO: many commands aren't handled yet.
9273 */
9274 static void GLAPIENTRY
9275 print_list(struct gl_context *ctx, GLuint list)
9276 {
9277 struct gl_display_list *dlist;
9278 Node *n;
9279 GLboolean done;
9280
9281 if (!islist(ctx, list)) {
9282 printf("%u is not a display list ID\n", list);
9283 return;
9284 }
9285
9286 dlist = lookup_list(ctx, list);
9287 if (!dlist)
9288 return;
9289
9290 n = dlist->Head;
9291
9292 printf("START-LIST %u, address %p\n", list, (void *) n);
9293
9294 done = n ? GL_FALSE : GL_TRUE;
9295 while (!done) {
9296 const OpCode opcode = n[0].opcode;
9297
9298 if (is_ext_opcode(opcode)) {
9299 n += ext_opcode_print(ctx, n);
9300 }
9301 else {
9302 switch (opcode) {
9303 case OPCODE_ACCUM:
9304 printf("Accum %s %g\n", enum_string(n[1].e), n[2].f);
9305 break;
9306 case OPCODE_BITMAP:
9307 printf("Bitmap %d %d %g %g %g %g %p\n", n[1].i, n[2].i,
9308 n[3].f, n[4].f, n[5].f, n[6].f, (void *) n[7].data);
9309 break;
9310 case OPCODE_CALL_LIST:
9311 printf("CallList %d\n", (int) n[1].ui);
9312 break;
9313 case OPCODE_CALL_LIST_OFFSET:
9314 printf("CallList %d + offset %u = %u\n", (int) n[1].ui,
9315 ctx->List.ListBase, ctx->List.ListBase + n[1].ui);
9316 break;
9317 case OPCODE_COLOR_TABLE_PARAMETER_FV:
9318 printf("ColorTableParameterfv %s %s %f %f %f %f\n",
9319 enum_string(n[1].e), enum_string(n[2].e),
9320 n[3].f, n[4].f, n[5].f, n[6].f);
9321 break;
9322 case OPCODE_COLOR_TABLE_PARAMETER_IV:
9323 printf("ColorTableParameteriv %s %s %d %d %d %d\n",
9324 enum_string(n[1].e), enum_string(n[2].e),
9325 n[3].i, n[4].i, n[5].i, n[6].i);
9326 break;
9327 case OPCODE_DISABLE:
9328 printf("Disable %s\n", enum_string(n[1].e));
9329 break;
9330 case OPCODE_ENABLE:
9331 printf("Enable %s\n", enum_string(n[1].e));
9332 break;
9333 case OPCODE_FRUSTUM:
9334 printf("Frustum %g %g %g %g %g %g\n",
9335 n[1].f, n[2].f, n[3].f, n[4].f, n[5].f, n[6].f);
9336 break;
9337 case OPCODE_LINE_STIPPLE:
9338 printf("LineStipple %d %x\n", n[1].i, (int) n[2].us);
9339 break;
9340 case OPCODE_LOAD_IDENTITY:
9341 printf("LoadIdentity\n");
9342 break;
9343 case OPCODE_LOAD_MATRIX:
9344 printf("LoadMatrix\n");
9345 printf(" %8f %8f %8f %8f\n",
9346 n[1].f, n[5].f, n[9].f, n[13].f);
9347 printf(" %8f %8f %8f %8f\n",
9348 n[2].f, n[6].f, n[10].f, n[14].f);
9349 printf(" %8f %8f %8f %8f\n",
9350 n[3].f, n[7].f, n[11].f, n[15].f);
9351 printf(" %8f %8f %8f %8f\n",
9352 n[4].f, n[8].f, n[12].f, n[16].f);
9353 break;
9354 case OPCODE_MULT_MATRIX:
9355 printf("MultMatrix (or Rotate)\n");
9356 printf(" %8f %8f %8f %8f\n",
9357 n[1].f, n[5].f, n[9].f, n[13].f);
9358 printf(" %8f %8f %8f %8f\n",
9359 n[2].f, n[6].f, n[10].f, n[14].f);
9360 printf(" %8f %8f %8f %8f\n",
9361 n[3].f, n[7].f, n[11].f, n[15].f);
9362 printf(" %8f %8f %8f %8f\n",
9363 n[4].f, n[8].f, n[12].f, n[16].f);
9364 break;
9365 case OPCODE_ORTHO:
9366 printf("Ortho %g %g %g %g %g %g\n",
9367 n[1].f, n[2].f, n[3].f, n[4].f, n[5].f, n[6].f);
9368 break;
9369 case OPCODE_POP_ATTRIB:
9370 printf("PopAttrib\n");
9371 break;
9372 case OPCODE_POP_MATRIX:
9373 printf("PopMatrix\n");
9374 break;
9375 case OPCODE_POP_NAME:
9376 printf("PopName\n");
9377 break;
9378 case OPCODE_PUSH_ATTRIB:
9379 printf("PushAttrib %x\n", n[1].bf);
9380 break;
9381 case OPCODE_PUSH_MATRIX:
9382 printf("PushMatrix\n");
9383 break;
9384 case OPCODE_PUSH_NAME:
9385 printf("PushName %d\n", (int) n[1].ui);
9386 break;
9387 case OPCODE_RASTER_POS:
9388 printf("RasterPos %g %g %g %g\n",
9389 n[1].f, n[2].f, n[3].f, n[4].f);
9390 break;
9391 case OPCODE_ROTATE:
9392 printf("Rotate %g %g %g %g\n",
9393 n[1].f, n[2].f, n[3].f, n[4].f);
9394 break;
9395 case OPCODE_SCALE:
9396 printf("Scale %g %g %g\n", n[1].f, n[2].f, n[3].f);
9397 break;
9398 case OPCODE_TRANSLATE:
9399 printf("Translate %g %g %g\n", n[1].f, n[2].f, n[3].f);
9400 break;
9401 case OPCODE_BIND_TEXTURE:
9402 printf("BindTexture %s %d\n",
9403 _mesa_lookup_enum_by_nr(n[1].ui), n[2].ui);
9404 break;
9405 case OPCODE_SHADE_MODEL:
9406 printf("ShadeModel %s\n", _mesa_lookup_enum_by_nr(n[1].ui));
9407 break;
9408 case OPCODE_MAP1:
9409 printf("Map1 %s %.3f %.3f %d %d\n",
9410 _mesa_lookup_enum_by_nr(n[1].ui),
9411 n[2].f, n[3].f, n[4].i, n[5].i);
9412 break;
9413 case OPCODE_MAP2:
9414 printf("Map2 %s %.3f %.3f %.3f %.3f %d %d %d %d\n",
9415 _mesa_lookup_enum_by_nr(n[1].ui),
9416 n[2].f, n[3].f, n[4].f, n[5].f,
9417 n[6].i, n[7].i, n[8].i, n[9].i);
9418 break;
9419 case OPCODE_MAPGRID1:
9420 printf("MapGrid1 %d %.3f %.3f\n", n[1].i, n[2].f, n[3].f);
9421 break;
9422 case OPCODE_MAPGRID2:
9423 printf("MapGrid2 %d %.3f %.3f, %d %.3f %.3f\n",
9424 n[1].i, n[2].f, n[3].f, n[4].i, n[5].f, n[6].f);
9425 break;
9426 case OPCODE_EVALMESH1:
9427 printf("EvalMesh1 %d %d\n", n[1].i, n[2].i);
9428 break;
9429 case OPCODE_EVALMESH2:
9430 printf("EvalMesh2 %d %d %d %d\n",
9431 n[1].i, n[2].i, n[3].i, n[4].i);
9432 break;
9433
9434 case OPCODE_ATTR_1F_NV:
9435 printf("ATTR_1F_NV attr %d: %f\n", n[1].i, n[2].f);
9436 break;
9437 case OPCODE_ATTR_2F_NV:
9438 printf("ATTR_2F_NV attr %d: %f %f\n",
9439 n[1].i, n[2].f, n[3].f);
9440 break;
9441 case OPCODE_ATTR_3F_NV:
9442 printf("ATTR_3F_NV attr %d: %f %f %f\n",
9443 n[1].i, n[2].f, n[3].f, n[4].f);
9444 break;
9445 case OPCODE_ATTR_4F_NV:
9446 printf("ATTR_4F_NV attr %d: %f %f %f %f\n",
9447 n[1].i, n[2].f, n[3].f, n[4].f, n[5].f);
9448 break;
9449 case OPCODE_ATTR_1F_ARB:
9450 printf("ATTR_1F_ARB attr %d: %f\n", n[1].i, n[2].f);
9451 break;
9452 case OPCODE_ATTR_2F_ARB:
9453 printf("ATTR_2F_ARB attr %d: %f %f\n",
9454 n[1].i, n[2].f, n[3].f);
9455 break;
9456 case OPCODE_ATTR_3F_ARB:
9457 printf("ATTR_3F_ARB attr %d: %f %f %f\n",
9458 n[1].i, n[2].f, n[3].f, n[4].f);
9459 break;
9460 case OPCODE_ATTR_4F_ARB:
9461 printf("ATTR_4F_ARB attr %d: %f %f %f %f\n",
9462 n[1].i, n[2].f, n[3].f, n[4].f, n[5].f);
9463 break;
9464
9465 case OPCODE_MATERIAL:
9466 printf("MATERIAL %x %x: %f %f %f %f\n",
9467 n[1].i, n[2].i, n[3].f, n[4].f, n[5].f, n[6].f);
9468 break;
9469 case OPCODE_BEGIN:
9470 printf("BEGIN %x\n", n[1].i);
9471 break;
9472 case OPCODE_END:
9473 printf("END\n");
9474 break;
9475 case OPCODE_RECTF:
9476 printf("RECTF %f %f %f %f\n", n[1].f, n[2].f, n[3].f,
9477 n[4].f);
9478 break;
9479 case OPCODE_EVAL_C1:
9480 printf("EVAL_C1 %f\n", n[1].f);
9481 break;
9482 case OPCODE_EVAL_C2:
9483 printf("EVAL_C2 %f %f\n", n[1].f, n[2].f);
9484 break;
9485 case OPCODE_EVAL_P1:
9486 printf("EVAL_P1 %d\n", n[1].i);
9487 break;
9488 case OPCODE_EVAL_P2:
9489 printf("EVAL_P2 %d %d\n", n[1].i, n[2].i);
9490 break;
9491
9492 case OPCODE_PROVOKING_VERTEX:
9493 printf("ProvokingVertex %s\n",
9494 _mesa_lookup_enum_by_nr(n[1].ui));
9495 break;
9496
9497 /*
9498 * meta opcodes/commands
9499 */
9500 case OPCODE_ERROR:
9501 printf("Error: %s %s\n",
9502 enum_string(n[1].e), (const char *) n[2].data);
9503 break;
9504 case OPCODE_CONTINUE:
9505 printf("DISPLAY-LIST-CONTINUE\n");
9506 n = (Node *) n[1].next;
9507 break;
9508 case OPCODE_END_OF_LIST:
9509 printf("END-LIST %u\n", list);
9510 done = GL_TRUE;
9511 break;
9512 default:
9513 if (opcode < 0 || opcode > OPCODE_END_OF_LIST) {
9514 printf
9515 ("ERROR IN DISPLAY LIST: opcode = %d, address = %p\n",
9516 opcode, (void *) n);
9517 return;
9518 }
9519 else {
9520 printf("command %d, %u operands\n", opcode,
9521 InstSize[opcode]);
9522 }
9523 }
9524 /* increment n to point to next compiled command */
9525 if (opcode != OPCODE_CONTINUE) {
9526 n += InstSize[opcode];
9527 }
9528 }
9529 }
9530 }
9531
9532
9533
9534 /**
9535 * Clients may call this function to help debug display list problems.
9536 * This function is _ONLY_FOR_DEBUGGING_PURPOSES_. It may be removed,
9537 * changed, or break in the future without notice.
9538 */
9539 void
9540 mesa_print_display_list(GLuint list)
9541 {
9542 GET_CURRENT_CONTEXT(ctx);
9543 print_list(ctx, list);
9544 }
9545
9546
9547 /**********************************************************************/
9548 /***** Initialization *****/
9549 /**********************************************************************/
9550
9551 void
9552 _mesa_save_vtxfmt_init(GLvertexformat * vfmt)
9553 {
9554 _MESA_INIT_ARRAYELT_VTXFMT(vfmt, _ae_);
9555
9556 vfmt->Begin = save_Begin;
9557
9558 _MESA_INIT_DLIST_VTXFMT(vfmt, save_);
9559
9560 vfmt->Color3f = save_Color3f;
9561 vfmt->Color3fv = save_Color3fv;
9562 vfmt->Color4f = save_Color4f;
9563 vfmt->Color4fv = save_Color4fv;
9564 vfmt->EdgeFlag = save_EdgeFlag;
9565 vfmt->End = save_End;
9566
9567 _MESA_INIT_EVAL_VTXFMT(vfmt, save_);
9568
9569 vfmt->FogCoordfEXT = save_FogCoordfEXT;
9570 vfmt->FogCoordfvEXT = save_FogCoordfvEXT;
9571 vfmt->Indexf = save_Indexf;
9572 vfmt->Indexfv = save_Indexfv;
9573 vfmt->Materialfv = save_Materialfv;
9574 vfmt->MultiTexCoord1fARB = save_MultiTexCoord1f;
9575 vfmt->MultiTexCoord1fvARB = save_MultiTexCoord1fv;
9576 vfmt->MultiTexCoord2fARB = save_MultiTexCoord2f;
9577 vfmt->MultiTexCoord2fvARB = save_MultiTexCoord2fv;
9578 vfmt->MultiTexCoord3fARB = save_MultiTexCoord3f;
9579 vfmt->MultiTexCoord3fvARB = save_MultiTexCoord3fv;
9580 vfmt->MultiTexCoord4fARB = save_MultiTexCoord4f;
9581 vfmt->MultiTexCoord4fvARB = save_MultiTexCoord4fv;
9582 vfmt->Normal3f = save_Normal3f;
9583 vfmt->Normal3fv = save_Normal3fv;
9584 vfmt->SecondaryColor3fEXT = save_SecondaryColor3fEXT;
9585 vfmt->SecondaryColor3fvEXT = save_SecondaryColor3fvEXT;
9586 vfmt->TexCoord1f = save_TexCoord1f;
9587 vfmt->TexCoord1fv = save_TexCoord1fv;
9588 vfmt->TexCoord2f = save_TexCoord2f;
9589 vfmt->TexCoord2fv = save_TexCoord2fv;
9590 vfmt->TexCoord3f = save_TexCoord3f;
9591 vfmt->TexCoord3fv = save_TexCoord3fv;
9592 vfmt->TexCoord4f = save_TexCoord4f;
9593 vfmt->TexCoord4fv = save_TexCoord4fv;
9594 vfmt->Vertex2f = save_Vertex2f;
9595 vfmt->Vertex2fv = save_Vertex2fv;
9596 vfmt->Vertex3f = save_Vertex3f;
9597 vfmt->Vertex3fv = save_Vertex3fv;
9598 vfmt->Vertex4f = save_Vertex4f;
9599 vfmt->Vertex4fv = save_Vertex4fv;
9600 vfmt->VertexAttrib1fARB = save_VertexAttrib1fARB;
9601 vfmt->VertexAttrib1fvARB = save_VertexAttrib1fvARB;
9602 vfmt->VertexAttrib2fARB = save_VertexAttrib2fARB;
9603 vfmt->VertexAttrib2fvARB = save_VertexAttrib2fvARB;
9604 vfmt->VertexAttrib3fARB = save_VertexAttrib3fARB;
9605 vfmt->VertexAttrib3fvARB = save_VertexAttrib3fvARB;
9606 vfmt->VertexAttrib4fARB = save_VertexAttrib4fARB;
9607 vfmt->VertexAttrib4fvARB = save_VertexAttrib4fvARB;
9608
9609 vfmt->Rectf = save_Rectf;
9610
9611 /* GL_ARB_draw_instanced */
9612 vfmt->DrawArraysInstanced = save_DrawArraysInstancedARB;
9613 vfmt->DrawElementsInstanced = save_DrawElementsInstancedARB;
9614
9615 /* GL_ARB_draw_elements_base_vertex */
9616 vfmt->DrawElementsInstancedBaseVertex = save_DrawElementsInstancedBaseVertexARB;
9617
9618 /* GL_ARB_base_instance */
9619 vfmt->DrawArraysInstancedBaseInstance = save_DrawArraysInstancedBaseInstance;
9620 vfmt->DrawElementsInstancedBaseInstance = save_DrawElementsInstancedBaseInstance;
9621 vfmt->DrawElementsInstancedBaseVertexBaseInstance = save_DrawElementsInstancedBaseVertexBaseInstance;
9622
9623 /* The driver is required to implement these as
9624 * 1) They can probably do a better job.
9625 * 2) A lot of new mechanisms would have to be added to this module
9626 * to support it. That code would probably never get used,
9627 * because of (1).
9628 */
9629 #if 0
9630 vfmt->DrawArrays = 0;
9631 vfmt->DrawElements = 0;
9632 vfmt->DrawRangeElements = 0;
9633 vfmt->MultiDrawElemementsEXT = 0;
9634 vfmt->DrawElementsBaseVertex = 0;
9635 vfmt->DrawRangeElementsBaseVertex = 0;
9636 vfmt->MultiDrawElemementsBaseVertex = 0;
9637 #endif
9638 }
9639
9640
9641 void
9642 _mesa_install_dlist_vtxfmt(struct _glapi_table *disp,
9643 const GLvertexformat *vfmt)
9644 {
9645 SET_CallList(disp, vfmt->CallList);
9646 SET_CallLists(disp, vfmt->CallLists);
9647 }
9648
9649
9650 /**
9651 * Initialize display list state for given context.
9652 */
9653 void
9654 _mesa_init_display_list(struct gl_context *ctx)
9655 {
9656 static GLboolean tableInitialized = GL_FALSE;
9657
9658 /* zero-out the instruction size table, just once */
9659 if (!tableInitialized) {
9660 memset(InstSize, 0, sizeof(InstSize));
9661 tableInitialized = GL_TRUE;
9662 }
9663
9664 /* extension info */
9665 ctx->ListExt = CALLOC_STRUCT(gl_list_extensions);
9666
9667 /* Display list */
9668 ctx->ListState.CallDepth = 0;
9669 ctx->ExecuteFlag = GL_TRUE;
9670 ctx->CompileFlag = GL_FALSE;
9671 ctx->ListState.CurrentBlock = NULL;
9672 ctx->ListState.CurrentPos = 0;
9673
9674 /* Display List group */
9675 ctx->List.ListBase = 0;
9676
9677 _mesa_save_vtxfmt_init(&ctx->ListState.ListVtxfmt);
9678 }
9679
9680
9681 void
9682 _mesa_free_display_list_data(struct gl_context *ctx)
9683 {
9684 free(ctx->ListExt);
9685 ctx->ListExt = NULL;
9686 }