2 * Copyright (C) 2008-2009 Advanced Micro Devices, Inc.
4 * Permission is hereby granted, free of charge, to any person obtaining a
5 * copy of this software and associated documentation files (the "Software"),
6 * to deal in the Software without restriction, including without limitation
7 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
8 * and/or sell copies of the Software, and to permit persons to whom the
9 * Software is furnished to do so, subject to the following conditions:
11 * The above copyright notice and this permission notice shall be included
12 * in all copies or substantial portions of the Software.
14 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
15 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
16 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
17 * THE COPYRIGHT HOLDER(S) BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
18 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
19 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
24 * Richard Li <RichardZ.Li@amd.com>, <richardradeon@gmail.com>
29 #include "main/glheader.h"
30 #include "main/imports.h"
32 #include "shader/program.h"
35 #include "r600_context.h"
36 #include "r600_emit.h"
38 #include "r700_oglprog.h"
39 #include "r700_fragprog.h"
40 #include "r700_vertprog.h"
43 static void freeVertProgCache(GLcontext
*ctx
, struct r700_vertex_program_cont
*cache
)
45 struct r700_vertex_program
*tmp
, *vp
= cache
->progs
;
49 /* Release DMA region */
50 r600DeleteShader(ctx
, vp
->shaderbo
);
52 Clean_Up_Assembler(&(vp
->r700AsmCode
));
53 Clean_Up_Shader(&(vp
->r700Shader
));
55 _mesa_reference_vertprog(ctx
, &vp
->mesa_program
, NULL
);
61 static struct gl_program
*r700NewProgram(GLcontext
* ctx
,
65 struct gl_program
*pProgram
= NULL
;
67 struct r700_vertex_program_cont
*vpc
;
68 struct r700_fragment_program
*fp
;
70 radeon_print(RADEON_SHADER
, RADEON_VERBOSE
,
71 "%s %u, %u\n", __func__
, target
, id
);
75 case GL_VERTEX_STATE_PROGRAM_NV
:
76 case GL_VERTEX_PROGRAM_ARB
:
77 vpc
= CALLOC_STRUCT(r700_vertex_program_cont
);
78 pProgram
= _mesa_init_vertex_program(ctx
,
83 case GL_FRAGMENT_PROGRAM_NV
:
84 case GL_FRAGMENT_PROGRAM_ARB
:
85 fp
= CALLOC_STRUCT(r700_fragment_program
);
86 pProgram
= _mesa_init_fragment_program(ctx
,
90 fp
->translated
= GL_FALSE
;
91 fp
->loaded
= GL_FALSE
;
97 _mesa_problem(ctx
, "Bad target in r700NewProgram");
103 static void r700DeleteProgram(GLcontext
* ctx
, struct gl_program
*prog
)
105 struct r700_vertex_program_cont
*vpc
= (struct r700_vertex_program_cont
*)prog
;
106 struct r700_fragment_program
* fp
;
108 radeon_print(RADEON_SHADER
, RADEON_VERBOSE
,
109 "%s %p\n", __func__
, prog
);
111 switch (prog
->Target
)
113 case GL_VERTEX_STATE_PROGRAM_NV
:
114 case GL_VERTEX_PROGRAM_ARB
:
115 freeVertProgCache(ctx
, vpc
);
117 case GL_FRAGMENT_PROGRAM_NV
:
118 case GL_FRAGMENT_PROGRAM_ARB
:
119 fp
= (struct r700_fragment_program
*)prog
;
120 /* Release DMA region */
122 r600DeleteShader(ctx
, fp
->shaderbo
);
125 Clean_Up_Assembler(&(fp
->r700AsmCode
));
126 Clean_Up_Shader(&(fp
->r700Shader
));
129 _mesa_problem(ctx
, "Bad target in r700NewProgram");
132 _mesa_delete_program(ctx
, prog
);
136 r700ProgramStringNotify(GLcontext
* ctx
, GLenum target
, struct gl_program
*prog
)
138 struct r700_vertex_program_cont
*vpc
= (struct r700_vertex_program_cont
*)prog
;
139 struct r700_fragment_program
* fp
= (struct r700_fragment_program
*)prog
;
142 case GL_VERTEX_PROGRAM_ARB
:
143 freeVertProgCache(ctx
, vpc
);
146 case GL_FRAGMENT_PROGRAM_ARB
:
147 r600DeleteShader(ctx
, fp
->shaderbo
);
148 Clean_Up_Assembler(&(fp
->r700AsmCode
));
149 Clean_Up_Shader(&(fp
->r700Shader
));
150 fp
->translated
= GL_FALSE
;
151 fp
->loaded
= GL_FALSE
;
158 static GLboolean
r700IsProgramNative(GLcontext
* ctx
, GLenum target
, struct gl_program
*prog
)
164 void r700InitShaderFuncs(struct dd_function_table
*functions
)
166 functions
->NewProgram
= r700NewProgram
;
167 functions
->DeleteProgram
= r700DeleteProgram
;
168 functions
->ProgramStringNotify
= r700ProgramStringNotify
;
169 functions
->IsProgramNative
= r700IsProgramNative
;