Tizen 2.1 base
[sdk/emulator/qemu.git] / gl / mesa / src / mesa / main / transformfeedback.c
1 /*
2  * Mesa 3-D graphics library
3  *
4  * Copyright (C) 2010  VMware, Inc.  All Rights Reserved.
5  *
6  * Permission is hereby granted, free of charge, to any person obtaining a
7  * copy of this software and associated documentation files (the "Software"),
8  * to deal in the Software without restriction, including without limitation
9  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
10  * and/or sell copies of the Software, and to permit persons to whom the
11  * Software is furnished to do so, subject to the following conditions:
12  *
13  * The above copyright notice and this permission notice shall be included
14  * in all copies or substantial portions of the Software.
15  *
16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
17  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
19  * THE AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
20  * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
21  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
22  */
23
24
25 /*
26  * Vertex transform feedback support.
27  *
28  * Authors:
29  *   Brian Paul
30  */
31
32
33 #include "buffers.h"
34 #include "bufferobj.h"
35 #include "context.h"
36 #include "hash.h"
37 #include "mfeatures.h"
38 #include "mtypes.h"
39 #include "transformfeedback.h"
40 #include "shaderapi.h"
41 #include "shaderobj.h"
42 #include "main/dispatch.h"
43
44 #include "program/prog_parameter.h"
45
46
47 #if FEATURE_EXT_transform_feedback
48
49
50 /**
51  * Do reference counting of transform feedback buffers.
52  */
53 static void
54 reference_transform_feedback_object(struct gl_transform_feedback_object **ptr,
55                                     struct gl_transform_feedback_object *obj)
56 {
57    if (*ptr == obj)
58       return;
59
60    if (*ptr) {
61       /* Unreference the old object */
62       struct gl_transform_feedback_object *oldObj = *ptr;
63
64       ASSERT(oldObj->RefCount > 0);
65       oldObj->RefCount--;
66
67       if (oldObj->RefCount == 0) {
68          GET_CURRENT_CONTEXT(ctx);
69          if (ctx)
70             ctx->Driver.DeleteTransformFeedback(ctx, oldObj);
71       }
72
73       *ptr = NULL;
74    }
75    ASSERT(!*ptr);
76
77    if (obj) {
78       /* reference new object */
79       if (obj->RefCount == 0) {
80          _mesa_problem(NULL, "referencing deleted transform feedback object");
81          *ptr = NULL;
82       }
83       else {
84          obj->RefCount++;
85          *ptr = obj;
86       }
87    }
88 }
89
90
91 /**
92  * Check if the given primitive mode (as in glBegin(mode)) is compatible
93  * with the current transform feedback mode (if it's enabled).
94  * This is to be called from glBegin(), glDrawArrays(), glDrawElements(), etc.
95  *
96  * \return GL_TRUE if the mode is OK, GL_FALSE otherwise.
97  */
98 GLboolean
99 _mesa_validate_primitive_mode(struct gl_context *ctx, GLenum mode)
100 {
101    if (ctx->TransformFeedback.CurrentObject->Active &&
102        !ctx->TransformFeedback.CurrentObject->Paused) {
103       switch (mode) {
104       case GL_POINTS:
105          return ctx->TransformFeedback.Mode == GL_POINTS;
106       case GL_LINES:
107       case GL_LINE_STRIP:
108       case GL_LINE_LOOP:
109          return ctx->TransformFeedback.Mode == GL_LINES;
110       default:
111          return ctx->TransformFeedback.Mode == GL_TRIANGLES;
112       }
113    }
114    return GL_TRUE;
115 }
116
117
118 /**
119  * Check that all the buffer objects currently bound for transform
120  * feedback actually exist.  Raise a GL_INVALID_OPERATION error if
121  * any buffers are missing.
122  * \return GL_TRUE for success, GL_FALSE if error
123  */
124 GLboolean
125 _mesa_validate_transform_feedback_buffers(struct gl_context *ctx)
126 {
127    /* XXX to do */
128    return GL_TRUE;
129 }
130
131
132
133 /**
134  * Per-context init for transform feedback.
135  */
136 void
137 _mesa_init_transform_feedback(struct gl_context *ctx)
138 {
139    /* core mesa expects this, even a dummy one, to be available */
140    ASSERT(ctx->Driver.NewTransformFeedback);
141
142    ctx->TransformFeedback.DefaultObject =
143       ctx->Driver.NewTransformFeedback(ctx, 0);
144
145    assert(ctx->TransformFeedback.DefaultObject->RefCount == 1);
146
147    reference_transform_feedback_object(&ctx->TransformFeedback.CurrentObject,
148                                        ctx->TransformFeedback.DefaultObject);
149
150    assert(ctx->TransformFeedback.DefaultObject->RefCount == 2);
151
152    ctx->TransformFeedback.Objects = _mesa_NewHashTable();
153
154    _mesa_reference_buffer_object(ctx,
155                                  &ctx->TransformFeedback.CurrentBuffer,
156                                  ctx->Shared->NullBufferObj);
157 }
158
159
160
161 /**
162  * Callback for _mesa_HashDeleteAll().
163  */
164 static void
165 delete_cb(GLuint key, void *data, void *userData)
166 {
167    struct gl_context *ctx = (struct gl_context *) userData;
168    struct gl_transform_feedback_object *obj =
169       (struct gl_transform_feedback_object *) data;
170
171    ctx->Driver.DeleteTransformFeedback(ctx, obj);
172 }
173
174
175 /**
176  * Per-context free/clean-up for transform feedback.
177  */
178 void
179 _mesa_free_transform_feedback(struct gl_context *ctx)
180 {
181    /* core mesa expects this, even a dummy one, to be available */
182    ASSERT(ctx->Driver.NewTransformFeedback);
183
184    _mesa_reference_buffer_object(ctx,
185                                  &ctx->TransformFeedback.CurrentBuffer,
186                                  NULL);
187
188    /* Delete all feedback objects */
189    _mesa_HashDeleteAll(ctx->TransformFeedback.Objects, delete_cb, ctx);
190    _mesa_DeleteHashTable(ctx->TransformFeedback.Objects);
191
192    /* Delete the default feedback object */
193    assert(ctx->Driver.DeleteTransformFeedback);
194    ctx->Driver.DeleteTransformFeedback(ctx,
195                                        ctx->TransformFeedback.DefaultObject);
196
197    ctx->TransformFeedback.CurrentObject = NULL;
198 }
199
200
201 #else /* FEATURE_EXT_transform_feedback */
202
203 /* forward declarations */
204 static struct gl_transform_feedback_object *
205 new_transform_feedback(struct gl_context *ctx, GLuint name);
206
207 static void
208 delete_transform_feedback(struct gl_context *ctx,
209                           struct gl_transform_feedback_object *obj);
210
211 /* dummy per-context init/clean-up for transform feedback */
212 void
213 _mesa_init_transform_feedback(struct gl_context *ctx)
214 {
215    ctx->TransformFeedback.DefaultObject = new_transform_feedback(ctx, 0);
216    ctx->TransformFeedback.CurrentObject = ctx->TransformFeedback.DefaultObject;
217    _mesa_reference_buffer_object(ctx,
218                                  &ctx->TransformFeedback.CurrentBuffer,
219                                  ctx->Shared->NullBufferObj);
220 }
221
222 void
223 _mesa_free_transform_feedback(struct gl_context *ctx)
224 {
225    _mesa_reference_buffer_object(ctx,
226                                  &ctx->TransformFeedback.CurrentBuffer,
227                                  NULL);
228    ctx->TransformFeedback.CurrentObject = NULL;
229    delete_transform_feedback(ctx, ctx->TransformFeedback.DefaultObject);
230 }
231
232 #endif /* FEATURE_EXT_transform_feedback */
233
234
235 /** Default fallback for ctx->Driver.NewTransformFeedback() */
236 static struct gl_transform_feedback_object *
237 new_transform_feedback(struct gl_context *ctx, GLuint name)
238 {
239    struct gl_transform_feedback_object *obj;
240    obj = CALLOC_STRUCT(gl_transform_feedback_object);
241    if (obj) {
242       obj->Name = name;
243       obj->RefCount = 1;
244    }
245    return obj;
246 }
247
248 /** Default fallback for ctx->Driver.DeleteTransformFeedback() */
249 static void
250 delete_transform_feedback(struct gl_context *ctx,
251                           struct gl_transform_feedback_object *obj)
252 {
253    GLuint i;
254
255    for (i = 0; i < Elements(obj->Buffers); i++) {
256       _mesa_reference_buffer_object(ctx, &obj->Buffers[i], NULL);
257    }
258
259    free(obj);
260 }
261
262
263 #if FEATURE_EXT_transform_feedback
264
265
266 /** Default fallback for ctx->Driver.BeginTransformFeedback() */
267 static void
268 begin_transform_feedback(struct gl_context *ctx, GLenum mode,
269                          struct gl_transform_feedback_object *obj)
270 {
271    /* nop */
272 }
273
274 /** Default fallback for ctx->Driver.EndTransformFeedback() */
275 static void
276 end_transform_feedback(struct gl_context *ctx,
277                        struct gl_transform_feedback_object *obj)
278 {
279    /* nop */
280 }
281
282 /** Default fallback for ctx->Driver.PauseTransformFeedback() */
283 static void
284 pause_transform_feedback(struct gl_context *ctx,
285                          struct gl_transform_feedback_object *obj)
286 {
287    /* nop */
288 }
289
290 /** Default fallback for ctx->Driver.ResumeTransformFeedback() */
291 static void
292 resume_transform_feedback(struct gl_context *ctx,
293                           struct gl_transform_feedback_object *obj)
294 {
295    /* nop */
296 }
297
298
299 /**
300  * Plug in default device driver functions for transform feedback.
301  * Most drivers will override some/all of these.
302  */
303 void
304 _mesa_init_transform_feedback_functions(struct dd_function_table *driver)
305 {
306    driver->NewTransformFeedback = new_transform_feedback;
307    driver->DeleteTransformFeedback = delete_transform_feedback;
308    driver->BeginTransformFeedback = begin_transform_feedback;
309    driver->EndTransformFeedback = end_transform_feedback;
310    driver->PauseTransformFeedback = pause_transform_feedback;
311    driver->ResumeTransformFeedback = resume_transform_feedback;
312 }
313
314
315 void
316 _mesa_init_transform_feedback_dispatch(struct _glapi_table *disp)
317 {
318    /* EXT_transform_feedback */
319    SET_BeginTransformFeedbackEXT(disp, _mesa_BeginTransformFeedback);
320    SET_EndTransformFeedbackEXT(disp, _mesa_EndTransformFeedback);
321    SET_BindBufferRangeEXT(disp, _mesa_BindBufferRange);
322    SET_BindBufferBaseEXT(disp, _mesa_BindBufferBase);
323    SET_BindBufferOffsetEXT(disp, _mesa_BindBufferOffsetEXT);
324    SET_TransformFeedbackVaryingsEXT(disp, _mesa_TransformFeedbackVaryings);
325    SET_GetTransformFeedbackVaryingEXT(disp, _mesa_GetTransformFeedbackVarying);
326    /* ARB_transform_feedback2 */
327    SET_BindTransformFeedback(disp, _mesa_BindTransformFeedback);
328    SET_DeleteTransformFeedbacks(disp, _mesa_DeleteTransformFeedbacks);
329    SET_GenTransformFeedbacks(disp, _mesa_GenTransformFeedbacks);
330    SET_IsTransformFeedback(disp, _mesa_IsTransformFeedback);
331    SET_PauseTransformFeedback(disp, _mesa_PauseTransformFeedback);
332    SET_ResumeTransformFeedback(disp, _mesa_ResumeTransformFeedback);
333 }
334
335
336 /**
337  ** Begin API functions
338  **/
339
340
341 void GLAPIENTRY
342 _mesa_BeginTransformFeedback(GLenum mode)
343 {
344    struct gl_transform_feedback_object *obj;
345    struct gl_transform_feedback_info *info;
346    int i;
347    GET_CURRENT_CONTEXT(ctx);
348
349    obj = ctx->TransformFeedback.CurrentObject;
350
351    if (ctx->Shader.CurrentVertexProgram == NULL) {
352       _mesa_error(ctx, GL_INVALID_OPERATION,
353                   "glBeginTransformFeedback(no program active)");
354       return;
355    }
356
357    info = &ctx->Shader.CurrentVertexProgram->LinkedTransformFeedback;
358
359    if (info->NumOutputs == 0) {
360       _mesa_error(ctx, GL_INVALID_OPERATION,
361                   "glBeginTransformFeedback(no varyings to record)");
362       return;
363    }
364
365    switch (mode) {
366    case GL_POINTS:
367    case GL_LINES:
368    case GL_TRIANGLES:
369       /* legal */
370       break;
371    default:
372       _mesa_error(ctx, GL_INVALID_ENUM, "glBeginTransformFeedback(mode)");
373       return;
374    }
375
376    if (obj->Active) {
377       _mesa_error(ctx, GL_INVALID_OPERATION,
378                   "glBeginTransformFeedback(already active)");
379       return;
380    }
381
382    for (i = 0; i < info->NumBuffers; ++i) {
383       if (obj->BufferNames[i] == 0) {
384          _mesa_error(ctx, GL_INVALID_OPERATION,
385                      "glBeginTransformFeedback(binding point %d does not have "
386                      "a buffer object bound)", i);
387          return;
388       }
389    }
390
391    FLUSH_VERTICES(ctx, _NEW_TRANSFORM_FEEDBACK);
392    obj->Active = GL_TRUE;
393    ctx->TransformFeedback.Mode = mode;
394
395    assert(ctx->Driver.BeginTransformFeedback);
396    ctx->Driver.BeginTransformFeedback(ctx, mode, obj);
397 }
398
399
400 void GLAPIENTRY
401 _mesa_EndTransformFeedback(void)
402 {
403    struct gl_transform_feedback_object *obj;
404    GET_CURRENT_CONTEXT(ctx);
405
406    obj = ctx->TransformFeedback.CurrentObject;
407
408    if (!obj->Active) {
409       _mesa_error(ctx, GL_INVALID_OPERATION,
410                   "glEndTransformFeedback(not active)");
411       return;
412    }
413
414    FLUSH_VERTICES(ctx, _NEW_TRANSFORM_FEEDBACK);
415    ctx->TransformFeedback.CurrentObject->Active = GL_FALSE;
416    ctx->TransformFeedback.CurrentObject->Paused = GL_FALSE;
417    ctx->TransformFeedback.CurrentObject->EndedAnytime = GL_TRUE;
418
419    assert(ctx->Driver.EndTransformFeedback);
420    ctx->Driver.EndTransformFeedback(ctx, obj);
421 }
422
423
424 /**
425  * Helper used by BindBufferRange() and BindBufferBase().
426  */
427 static void
428 bind_buffer_range(struct gl_context *ctx, GLuint index,
429                   struct gl_buffer_object *bufObj,
430                   GLintptr offset, GLsizeiptr size)
431 {
432    struct gl_transform_feedback_object *obj =
433       ctx->TransformFeedback.CurrentObject;
434
435    /* Note: no need to FLUSH_VERTICES or flag _NEW_TRANSFORM_FEEDBACK, because
436     * transform feedback buffers can't be changed while transform feedback is
437     * active.
438     */
439
440    /* The general binding point */
441    _mesa_reference_buffer_object(ctx,
442                                  &ctx->TransformFeedback.CurrentBuffer,
443                                  bufObj);
444
445    /* The per-attribute binding point */
446    _mesa_reference_buffer_object(ctx,
447                                  &obj->Buffers[index],
448                                  bufObj);
449
450    obj->BufferNames[index] = bufObj->Name;
451
452    obj->Offset[index] = offset;
453    obj->Size[index] = size;
454 }
455
456
457 /**
458  * Specify a buffer object to receive vertex shader results.  Plus,
459  * specify the starting offset to place the results, and max size.
460  */
461 void GLAPIENTRY
462 _mesa_BindBufferRange(GLenum target, GLuint index,
463                       GLuint buffer, GLintptr offset, GLsizeiptr size)
464 {
465    struct gl_transform_feedback_object *obj;
466    struct gl_buffer_object *bufObj;
467    GET_CURRENT_CONTEXT(ctx);
468
469    if (target != GL_TRANSFORM_FEEDBACK_BUFFER) {
470       _mesa_error(ctx, GL_INVALID_ENUM, "glBindBufferRange(target)");
471       return;
472    }
473
474    obj = ctx->TransformFeedback.CurrentObject;
475
476    if (obj->Active) {
477       _mesa_error(ctx, GL_INVALID_OPERATION,
478                   "glBindBufferRange(transform feedback active)");
479       return;
480    }
481
482    if (index >= ctx->Const.MaxTransformFeedbackSeparateAttribs) {
483       _mesa_error(ctx, GL_INVALID_VALUE, "glBindBufferRange(index=%d)", index);
484       return;
485    }
486
487    if ((size <= 0) || (size & 0x3)) {
488       /* must be positive and multiple of four */
489       _mesa_error(ctx, GL_INVALID_VALUE, "glBindBufferRange(size=%d)", (int) size);
490       return;
491    }  
492
493    if (offset & 0x3) {
494       /* must be multiple of four */
495       _mesa_error(ctx, GL_INVALID_VALUE,
496                   "glBindBufferRange(offset=%d)", (int) offset);
497       return;
498    }  
499
500    bufObj = _mesa_lookup_bufferobj(ctx, buffer);
501    if (!bufObj) {
502       _mesa_error(ctx, GL_INVALID_OPERATION,
503                   "glBindBufferRange(invalid buffer=%u)", buffer);
504       return;
505    }
506
507    if (offset + size > bufObj->Size) {
508       _mesa_error(ctx, GL_INVALID_VALUE,
509                   "glBindBufferRange(offset + size %d > buffer size %d)",
510                   (int) (offset + size), (int) (bufObj->Size));
511       return;
512    }  
513
514    bind_buffer_range(ctx, index, bufObj, offset, size);
515 }
516
517
518 /**
519  * Specify a buffer object to receive vertex shader results.
520  * As above, but start at offset = 0.
521  */
522 void GLAPIENTRY
523 _mesa_BindBufferBase(GLenum target, GLuint index, GLuint buffer)
524 {
525    struct gl_transform_feedback_object *obj;
526    struct gl_buffer_object *bufObj;
527    GLsizeiptr size;
528    GET_CURRENT_CONTEXT(ctx);
529
530    if (target != GL_TRANSFORM_FEEDBACK_BUFFER) {
531       _mesa_error(ctx, GL_INVALID_ENUM, "glBindBufferBase(target)");
532       return;
533    }
534
535    obj = ctx->TransformFeedback.CurrentObject;
536
537    if (obj->Active) {
538       _mesa_error(ctx, GL_INVALID_OPERATION,
539                   "glBindBufferBase(transform feedback active)");
540       return;
541    }
542
543    if (index >= ctx->Const.MaxTransformFeedbackSeparateAttribs) {
544       _mesa_error(ctx, GL_INVALID_VALUE, "glBindBufferBase(index=%d)", index);
545       return;
546    }
547
548    bufObj = _mesa_lookup_bufferobj(ctx, buffer);
549    if (!bufObj) {
550       _mesa_error(ctx, GL_INVALID_OPERATION,
551                   "glBindBufferBase(invalid buffer=%u)", buffer);
552       return;
553    }
554
555    /* default size is the buffer size rounded down to nearest
556     * multiple of four.
557     */
558    size = bufObj->Size & ~0x3;
559
560    bind_buffer_range(ctx, index, bufObj, 0, size);
561 }
562
563
564 /**
565  * Specify a buffer object to receive vertex shader results, plus the
566  * offset in the buffer to start placing results.
567  * This function is part of GL_EXT_transform_feedback, but not GL3.
568  */
569 void GLAPIENTRY
570 _mesa_BindBufferOffsetEXT(GLenum target, GLuint index, GLuint buffer,
571                           GLintptr offset)
572 {
573    struct gl_transform_feedback_object *obj;
574    struct gl_buffer_object *bufObj;
575    GET_CURRENT_CONTEXT(ctx);
576    GLsizeiptr size;
577
578    if (target != GL_TRANSFORM_FEEDBACK_BUFFER) {
579       _mesa_error(ctx, GL_INVALID_ENUM, "glBindBufferOffsetEXT(target)");
580       return;
581    }
582
583    obj = ctx->TransformFeedback.CurrentObject;
584
585    if (obj->Active) {
586       _mesa_error(ctx, GL_INVALID_OPERATION,
587                   "glBindBufferOffsetEXT(transform feedback active)");
588       return;
589    }
590
591    if (index >= ctx->Const.MaxTransformFeedbackSeparateAttribs) {
592       _mesa_error(ctx, GL_INVALID_VALUE,
593                   "glBindBufferOffsetEXT(index=%d)", index);
594       return;
595    }
596
597    if (offset & 0x3) {
598       /* must be multiple of four */
599       _mesa_error(ctx, GL_INVALID_VALUE,
600                   "glBindBufferOffsetEXT(offset=%d)", (int) offset);
601       return;
602    }
603
604    bufObj = _mesa_lookup_bufferobj(ctx, buffer);
605    if (!bufObj) {
606       _mesa_error(ctx, GL_INVALID_OPERATION,
607                   "glBindBufferOffsetEXT(invalid buffer=%u)", buffer);
608       return;
609    }
610
611    /* default size is the buffer size rounded down to nearest
612     * multiple of four.
613     */
614    size = (bufObj->Size - offset) & ~0x3;
615
616    bind_buffer_range(ctx, index, bufObj, offset, size);
617 }
618
619
620 /**
621  * This function specifies the vertex shader outputs to be written
622  * to the feedback buffer(s), and in what order.
623  */
624 void GLAPIENTRY
625 _mesa_TransformFeedbackVaryings(GLuint program, GLsizei count,
626                                 const GLchar **varyings, GLenum bufferMode)
627 {
628    struct gl_shader_program *shProg;
629    GLuint i;
630    GET_CURRENT_CONTEXT(ctx);
631
632    switch (bufferMode) {
633    case GL_INTERLEAVED_ATTRIBS:
634       break;
635    case GL_SEPARATE_ATTRIBS:
636       break;
637    default:
638       _mesa_error(ctx, GL_INVALID_ENUM,
639                   "glTransformFeedbackVaryings(bufferMode)");
640       return;
641    }
642
643    if (count < 0 ||
644        (bufferMode == GL_SEPARATE_ATTRIBS &&
645         (GLuint) count > ctx->Const.MaxTransformFeedbackSeparateAttribs)) {
646       _mesa_error(ctx, GL_INVALID_VALUE,
647                   "glTransformFeedbackVaryings(count=%d)", count);
648       return;
649    }
650
651    shProg = _mesa_lookup_shader_program(ctx, program);
652    if (!shProg) {
653       _mesa_error(ctx, GL_INVALID_VALUE,
654                   "glTransformFeedbackVaryings(program=%u)", program);
655       return;
656    }
657
658    /* free existing varyings, if any */
659    for (i = 0; i < shProg->TransformFeedback.NumVarying; i++) {
660       free(shProg->TransformFeedback.VaryingNames[i]);
661    }
662    free(shProg->TransformFeedback.VaryingNames);
663
664    /* allocate new memory for varying names */
665    shProg->TransformFeedback.VaryingNames =
666       (GLchar **) malloc(count * sizeof(GLchar *));
667
668    if (!shProg->TransformFeedback.VaryingNames) {
669       _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTransformFeedbackVaryings()");
670       return;
671    }
672
673    /* Save the new names and the count */
674    for (i = 0; i < (GLuint) count; i++) {
675       shProg->TransformFeedback.VaryingNames[i] = _mesa_strdup(varyings[i]);
676    }
677    shProg->TransformFeedback.NumVarying = count;
678
679    shProg->TransformFeedback.BufferMode = bufferMode;
680
681    /* No need to set _NEW_TRANSFORM_FEEDBACK (or invoke FLUSH_VERTICES) since
682     * the varyings won't be used until shader link time.
683     */
684 }
685
686
687 /**
688  * Get info about the vertex shader's outputs which are to be written
689  * to the feedback buffer(s).
690  */
691 void GLAPIENTRY
692 _mesa_GetTransformFeedbackVarying(GLuint program, GLuint index,
693                                   GLsizei bufSize, GLsizei *length,
694                                   GLsizei *size, GLenum *type, GLchar *name)
695 {
696    const struct gl_shader_program *shProg;
697    const struct gl_transform_feedback_info *linked_xfb_info;
698    GET_CURRENT_CONTEXT(ctx);
699
700    shProg = _mesa_lookup_shader_program(ctx, program);
701    if (!shProg) {
702       _mesa_error(ctx, GL_INVALID_VALUE,
703                   "glGetTransformFeedbackVaryings(program=%u)", program);
704       return;
705    }
706
707    linked_xfb_info = &shProg->LinkedTransformFeedback;
708    if (index >= linked_xfb_info->NumVarying) {
709       _mesa_error(ctx, GL_INVALID_VALUE,
710                   "glGetTransformFeedbackVaryings(index=%u)", index);
711       return;
712    }
713
714    /* return the varying's name and length */
715    _mesa_copy_string(name, bufSize, length,
716                      linked_xfb_info->Varyings[index].Name);
717
718    /* return the datatype and value's size (in datatype units) */
719    if (type)
720       *type = linked_xfb_info->Varyings[index].Type;
721    if (size)
722       *size = linked_xfb_info->Varyings[index].Size;
723 }
724
725
726
727 struct gl_transform_feedback_object *
728 _mesa_lookup_transform_feedback_object(struct gl_context *ctx, GLuint name)
729 {
730    if (name == 0) {
731       return ctx->TransformFeedback.DefaultObject;
732    }
733    else
734       return (struct gl_transform_feedback_object *)
735          _mesa_HashLookup(ctx->TransformFeedback.Objects, name);
736 }
737
738
739 /**
740  * Create new transform feedback objects.   Transform feedback objects
741  * encapsulate the state related to transform feedback to allow quickly
742  * switching state (and drawing the results, below).
743  * Part of GL_ARB_transform_feedback2.
744  */
745 void GLAPIENTRY
746 _mesa_GenTransformFeedbacks(GLsizei n, GLuint *names)
747 {
748    GLuint first;
749    GET_CURRENT_CONTEXT(ctx);
750
751    ASSERT_OUTSIDE_BEGIN_END(ctx);
752
753    if (n < 0) {
754       _mesa_error(ctx, GL_INVALID_VALUE, "glGenTransformFeedbacks(n < 0)");
755       return;
756    }
757
758    if (!names)
759       return;
760
761    /* we don't need contiguous IDs, but this might be faster */
762    first = _mesa_HashFindFreeKeyBlock(ctx->TransformFeedback.Objects, n);
763    if (first) {
764       GLsizei i;
765       for (i = 0; i < n; i++) {
766          struct gl_transform_feedback_object *obj
767             = ctx->Driver.NewTransformFeedback(ctx, first + i);
768          if (!obj) {
769             _mesa_error(ctx, GL_OUT_OF_MEMORY, "glGenTransformFeedbacks");
770             return;
771          }
772          names[i] = first + i;
773          _mesa_HashInsert(ctx->TransformFeedback.Objects, first + i, obj);
774       }
775    }
776    else {
777       _mesa_error(ctx, GL_OUT_OF_MEMORY, "glGenTransformFeedbacks");
778    }
779 }
780
781
782 /**
783  * Is the given ID a transform feedback object?
784  * Part of GL_ARB_transform_feedback2.
785  */
786 GLboolean GLAPIENTRY
787 _mesa_IsTransformFeedback(GLuint name)
788 {
789    GET_CURRENT_CONTEXT(ctx);
790
791    ASSERT_OUTSIDE_BEGIN_END_WITH_RETVAL(ctx, GL_FALSE);
792
793    if (name && _mesa_lookup_transform_feedback_object(ctx, name))
794       return GL_TRUE;
795    else
796       return GL_FALSE;
797 }
798
799
800 /**
801  * Bind the given transform feedback object.
802  * Part of GL_ARB_transform_feedback2.
803  */
804 void GLAPIENTRY
805 _mesa_BindTransformFeedback(GLenum target, GLuint name)
806 {
807    struct gl_transform_feedback_object *obj;
808    GET_CURRENT_CONTEXT(ctx);
809
810    if (target != GL_TRANSFORM_FEEDBACK) {
811       _mesa_error(ctx, GL_INVALID_ENUM, "glBindTransformFeedback(target)");
812       return;
813    }
814
815    if (ctx->TransformFeedback.CurrentObject->Active &&
816        !ctx->TransformFeedback.CurrentObject->Paused) {
817       _mesa_error(ctx, GL_INVALID_OPERATION,
818               "glBindTransformFeedback(transform is active, or not paused)");
819       return;
820    }
821
822    obj = _mesa_lookup_transform_feedback_object(ctx, name);
823    if (!obj) {
824       _mesa_error(ctx, GL_INVALID_OPERATION,
825                   "glBindTransformFeedback(name=%u)", name);
826       return;
827    }
828
829    reference_transform_feedback_object(&ctx->TransformFeedback.CurrentObject,
830                                        obj);
831 }
832
833
834 /**
835  * Delete the given transform feedback objects.
836  * Part of GL_ARB_transform_feedback2.
837  */
838 void GLAPIENTRY
839 _mesa_DeleteTransformFeedbacks(GLsizei n, const GLuint *names)
840 {
841    GLint i;
842    GET_CURRENT_CONTEXT(ctx);
843
844    ASSERT_OUTSIDE_BEGIN_END(ctx);
845
846    if (n < 0) {
847       _mesa_error(ctx, GL_INVALID_VALUE, "glDeleteTransformFeedbacks(n < 0)");
848       return;
849    }
850
851    if (!names)
852       return;
853
854    for (i = 0; i < n; i++) {
855       if (names[i] > 0) {
856          struct gl_transform_feedback_object *obj
857             = _mesa_lookup_transform_feedback_object(ctx, names[i]);
858          if (obj) {
859             if (obj->Active) {
860                _mesa_error(ctx, GL_INVALID_OPERATION,
861                            "glDeleteTransformFeedbacks(object %u is active)",
862                            names[i]);
863                return;
864             }
865             _mesa_HashRemove(ctx->TransformFeedback.Objects, names[i]);
866             /* unref, but object may not be deleted until later */
867             reference_transform_feedback_object(&obj, NULL);
868          }
869       }
870    }
871 }
872
873
874 /**
875  * Pause transform feedback.
876  * Part of GL_ARB_transform_feedback2.
877  */
878 void GLAPIENTRY
879 _mesa_PauseTransformFeedback(void)
880 {
881    struct gl_transform_feedback_object *obj;
882    GET_CURRENT_CONTEXT(ctx);
883
884    obj = ctx->TransformFeedback.CurrentObject;
885
886    if (!obj->Active || obj->Paused) {
887       _mesa_error(ctx, GL_INVALID_OPERATION,
888            "glPauseTransformFeedback(feedback not active or already paused)");
889       return;
890    }
891
892    FLUSH_VERTICES(ctx, _NEW_TRANSFORM_FEEDBACK);
893    obj->Paused = GL_TRUE;
894
895    assert(ctx->Driver.PauseTransformFeedback);
896    ctx->Driver.PauseTransformFeedback(ctx, obj);
897 }
898
899
900 /**
901  * Resume transform feedback.
902  * Part of GL_ARB_transform_feedback2.
903  */
904 void GLAPIENTRY
905 _mesa_ResumeTransformFeedback(void)
906 {
907    struct gl_transform_feedback_object *obj;
908    GET_CURRENT_CONTEXT(ctx);
909
910    obj = ctx->TransformFeedback.CurrentObject;
911
912    if (!obj->Active || !obj->Paused) {
913       _mesa_error(ctx, GL_INVALID_OPERATION,
914                "glResumeTransformFeedback(feedback not active or not paused)");
915       return;
916    }
917
918    FLUSH_VERTICES(ctx, _NEW_TRANSFORM_FEEDBACK);
919    obj->Paused = GL_FALSE;
920
921    assert(ctx->Driver.ResumeTransformFeedback);
922    ctx->Driver.ResumeTransformFeedback(ctx, obj);
923 }
924
925 #endif /* FEATURE_EXT_transform_feedback */