2 * Copyright 2009 Maciej Cencora <m.cencora@gmail.com>
6 * Permission is hereby granted, free of charge, to any person obtaining
7 * a 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, sublicense, 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
16 * portions of the Software.
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
19 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
20 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
21 * IN NO EVENT SHALL THE COPYRIGHT OWNER(S) AND/OR ITS SUPPLIERS BE
22 * LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
23 * OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
24 * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
28 #include "main/glheader.h"
30 #include "program/program.h"
32 #include "r300_context.h"
33 #include "r300_fragprog_common.h"
35 static void freeFragProgCache(struct gl_context
*ctx
, struct r300_fragment_program_cont
*cache
)
37 struct r300_fragment_program
*tmp
, *fp
= cache
->progs
;
41 rc_constants_destroy(&fp
->code
.constants
);
47 static void freeVertProgCache(struct gl_context
*ctx
, struct r300_vertex_program_cont
*cache
)
49 struct r300_vertex_program
*tmp
, *vp
= cache
->progs
;
53 rc_constants_destroy(&vp
->code
.constants
);
54 _mesa_reference_vertprog(ctx
, &vp
->Base
, NULL
);
60 static struct gl_program
*r300NewProgram(struct gl_context
* ctx
, GLenum target
,
63 struct r300_vertex_program_cont
*vp
;
64 struct r300_fragment_program_cont
*fp
;
67 case GL_VERTEX_STATE_PROGRAM_NV
:
68 case GL_VERTEX_PROGRAM_ARB
:
69 vp
= CALLOC_STRUCT(r300_vertex_program_cont
);
70 return _mesa_init_vertex_program(ctx
, &vp
->mesa_program
, target
, id
);
72 case GL_FRAGMENT_PROGRAM_NV
:
73 case GL_FRAGMENT_PROGRAM_ARB
:
74 fp
= CALLOC_STRUCT(r300_fragment_program_cont
);
75 return _mesa_init_fragment_program(ctx
, &fp
->Base
, target
, id
);
78 _mesa_problem(ctx
, "Bad target in r300NewProgram");
84 static void r300DeleteProgram(struct gl_context
* ctx
, struct gl_program
*prog
)
86 struct r300_vertex_program_cont
*vp
= (struct r300_vertex_program_cont
*)prog
;
87 struct r300_fragment_program_cont
*fp
= (struct r300_fragment_program_cont
*)prog
;
89 switch (prog
->Target
) {
90 case GL_VERTEX_PROGRAM_ARB
:
91 freeVertProgCache(ctx
, vp
);
93 case GL_FRAGMENT_PROGRAM_ARB
:
94 freeFragProgCache(ctx
, fp
);
98 _mesa_delete_program(ctx
, prog
);
102 r300ProgramStringNotify(struct gl_context
* ctx
, GLenum target
, struct gl_program
*prog
)
104 struct r300_vertex_program_cont
*vp
= (struct r300_vertex_program_cont
*)prog
;
105 struct r300_fragment_program_cont
*fp
= (struct r300_fragment_program_cont
*)prog
;
108 case GL_VERTEX_PROGRAM_ARB
:
109 freeVertProgCache(ctx
, vp
);
112 case GL_FRAGMENT_PROGRAM_ARB
:
113 freeFragProgCache(ctx
, fp
);
118 /* need this for tcl fallbacks */
119 (void) _tnl_program_string(ctx
, target
, prog
);
121 /* XXX check if program is legal, within limits */
126 r300IsProgramNative(struct gl_context
* ctx
, GLenum target
, struct gl_program
*prog
)
128 if (target
== GL_FRAGMENT_PROGRAM_ARB
) {
129 struct r300_fragment_program
*fp
= r300SelectAndTranslateFragmentShader(ctx
);
133 struct r300_vertex_program
*vp
= r300SelectAndTranslateVertexShader(ctx
);
139 void r300InitShaderFuncs(struct dd_function_table
*functions
)
141 functions
->NewProgram
= r300NewProgram
;
142 functions
->DeleteProgram
= r300DeleteProgram
;
143 functions
->ProgramStringNotify
= r300ProgramStringNotify
;
144 functions
->IsProgramNative
= r300IsProgramNative
;