1 /**************************************************************************
3 * Copyright 2003 Tungsten Graphics, Inc., Cedar Park, Texas.
6 * Permission is hereby granted, free of charge, to any person obtaining a
7 * copy of this software and associated documentation files (the
8 * "Software"), to deal in the Software without restriction, including
9 * without limitation the rights to use, copy, modify, merge, publish,
10 * distribute, sub license, and/or sell copies of the Software, and to
11 * permit persons to whom the Software is furnished to do so, subject to
12 * the following conditions:
14 * The above copyright notice and this permission notice (including the
15 * next paragraph) shall be included in all copies or substantial portions
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
19 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
20 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
21 * IN NO EVENT SHALL TUNGSTEN GRAPHICS AND/OR ITS SUPPLIERS BE LIABLE FOR
22 * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
23 * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
24 * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
26 **************************************************************************/
30 * Keith Whitwell <keith@tungstengraphics.com>
33 #include "main/glheader.h"
34 #include "main/macros.h"
35 #include "main/enums.h"
36 #include "main/shaderapi.h"
37 #include "program/prog_instruction.h"
38 #include "program/program.h"
40 #include "cso_cache/cso_context.h"
41 #include "draw/draw_context.h"
43 #include "st_context.h"
44 #include "st_program.h"
45 #include "st_mesa_to_tgsi.h"
46 #include "st_cb_program.h"
47 #include "st_glsl_to_tgsi.h"
52 * Called via ctx->Driver.BindProgram() to bind an ARB vertex or
56 st_bind_program(struct gl_context
*ctx
, GLenum target
, struct gl_program
*prog
)
58 struct st_context
*st
= st_context(ctx
);
61 case GL_VERTEX_PROGRAM_ARB
:
62 st
->dirty
.st
|= ST_NEW_VERTEX_PROGRAM
;
64 case GL_FRAGMENT_PROGRAM_ARB
:
65 st
->dirty
.st
|= ST_NEW_FRAGMENT_PROGRAM
;
67 case MESA_GEOMETRY_PROGRAM
:
68 st
->dirty
.st
|= ST_NEW_GEOMETRY_PROGRAM
;
75 * Called via ctx->Driver.UseProgram() to bind a linked GLSL program
76 * (vertex shader + fragment shader).
79 st_use_program(struct gl_context
*ctx
, struct gl_shader_program
*shProg
)
81 struct st_context
*st
= st_context(ctx
);
83 st
->dirty
.st
|= ST_NEW_FRAGMENT_PROGRAM
;
84 st
->dirty
.st
|= ST_NEW_VERTEX_PROGRAM
;
85 st
->dirty
.st
|= ST_NEW_GEOMETRY_PROGRAM
;
90 * Called via ctx->Driver.NewProgram() to allocate a new vertex or
93 static struct gl_program
*
94 st_new_program(struct gl_context
*ctx
, GLenum target
, GLuint id
)
97 case GL_VERTEX_PROGRAM_ARB
: {
98 struct st_vertex_program
*prog
= ST_CALLOC_STRUCT(st_vertex_program
);
99 return _mesa_init_vertex_program(ctx
, &prog
->Base
, target
, id
);
102 case GL_FRAGMENT_PROGRAM_ARB
: {
103 struct st_fragment_program
*prog
= ST_CALLOC_STRUCT(st_fragment_program
);
104 return _mesa_init_fragment_program(ctx
, &prog
->Base
, target
, id
);
107 case MESA_GEOMETRY_PROGRAM
: {
108 struct st_geometry_program
*prog
= ST_CALLOC_STRUCT(st_geometry_program
);
109 return _mesa_init_geometry_program(ctx
, &prog
->Base
, target
, id
);
120 * Called via ctx->Driver.DeleteProgram()
123 st_delete_program(struct gl_context
*ctx
, struct gl_program
*prog
)
125 struct st_context
*st
= st_context(ctx
);
127 switch( prog
->Target
) {
128 case GL_VERTEX_PROGRAM_ARB
:
130 struct st_vertex_program
*stvp
= (struct st_vertex_program
*) prog
;
131 st_release_vp_variants( st
, stvp
);
133 if (stvp
->glsl_to_tgsi
)
134 free_glsl_to_tgsi_visitor(stvp
->glsl_to_tgsi
);
137 case MESA_GEOMETRY_PROGRAM
:
139 struct st_geometry_program
*stgp
=
140 (struct st_geometry_program
*) prog
;
142 st_release_gp_variants(st
, stgp
);
144 if (stgp
->glsl_to_tgsi
)
145 free_glsl_to_tgsi_visitor(stgp
->glsl_to_tgsi
);
147 if (stgp
->tgsi
.tokens
) {
148 st_free_tokens((void *) stgp
->tgsi
.tokens
);
149 stgp
->tgsi
.tokens
= NULL
;
153 case GL_FRAGMENT_PROGRAM_ARB
:
155 struct st_fragment_program
*stfp
=
156 (struct st_fragment_program
*) prog
;
158 st_release_fp_variants(st
, stfp
);
160 if (stfp
->glsl_to_tgsi
)
161 free_glsl_to_tgsi_visitor(stfp
->glsl_to_tgsi
);
165 assert(0); /* problem */
168 /* delete base class */
169 _mesa_delete_program( ctx
, prog
);
174 * Called via ctx->Driver.IsProgramNative()
177 st_is_program_native(struct gl_context
*ctx
,
179 struct gl_program
*prog
)
186 * Called via ctx->Driver.ProgramStringNotify()
187 * Called when the program's text/code is changed. We have to free
188 * all shader variants and corresponding gallium shaders when this happens.
191 st_program_string_notify( struct gl_context
*ctx
,
193 struct gl_program
*prog
)
195 struct st_context
*st
= st_context(ctx
);
197 if (target
== GL_FRAGMENT_PROGRAM_ARB
) {
198 struct st_fragment_program
*stfp
= (struct st_fragment_program
*) prog
;
200 st_release_fp_variants(st
, stfp
);
203 st
->dirty
.st
|= ST_NEW_FRAGMENT_PROGRAM
;
205 else if (target
== MESA_GEOMETRY_PROGRAM
) {
206 struct st_geometry_program
*stgp
= (struct st_geometry_program
*) prog
;
208 st_release_gp_variants(st
, stgp
);
210 if (stgp
->tgsi
.tokens
) {
211 st_free_tokens((void *) stgp
->tgsi
.tokens
);
212 stgp
->tgsi
.tokens
= NULL
;
216 st
->dirty
.st
|= ST_NEW_GEOMETRY_PROGRAM
;
218 else if (target
== GL_VERTEX_PROGRAM_ARB
) {
219 struct st_vertex_program
*stvp
= (struct st_vertex_program
*) prog
;
221 st_release_vp_variants( st
, stvp
);
224 st
->dirty
.st
|= ST_NEW_VERTEX_PROGRAM
;
227 /* XXX check if program is legal, within limits */
233 * Plug in the program and shader-related device driver functions.
236 st_init_program_functions(struct dd_function_table
*functions
)
238 functions
->BindProgram
= st_bind_program
;
239 functions
->UseProgram
= st_use_program
;
240 functions
->NewProgram
= st_new_program
;
241 functions
->DeleteProgram
= st_delete_program
;
242 functions
->IsProgramNative
= st_is_program_native
;
243 functions
->ProgramStringNotify
= st_program_string_notify
;
245 functions
->NewShader
= st_new_shader
;
246 functions
->NewShaderProgram
= st_new_shader_program
;
247 functions
->LinkShader
= st_link_shader
;