1 /*
2 * Mesa 3-D graphics library
3 *
4 * Copyright (C) 1999-2008 Brian Paul 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 OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
20 * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
21 * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
22 * OTHER DEALINGS IN THE SOFTWARE.
23 */
24
25 #define DEBUG_PARSING 0
26
27 /**
28 * \file arbprogparse.c
29 * ARB_*_program parser core
30 * \author Karl Rasche
31 */
32
33 /**
34 Notes on program parameters, etc.
35
36 The instructions we emit will use six kinds of source registers:
37
38 PROGRAM_INPUT - input registers
39 PROGRAM_TEMPORARY - temp registers
40 PROGRAM_ADDRESS - address/indirect register
41 PROGRAM_SAMPLER - texture sampler
42 PROGRAM_CONSTANT - indexes into program->Parameters, a known constant/literal
43 PROGRAM_STATE_VAR - indexes into program->Parameters, and may actually be:
44 + a state variable, like "state.fog.color", or
45 + a pointer to a "program.local[k]" parameter, or
46 + a pointer to a "program.env[k]" parameter
47
48 Basically, all the program.local[] and program.env[] values will get mapped
49 into the unified gl_program->Parameters array. This solves the problem of
50 having three separate program parameter arrays.
51 */
52
53
54 #include "main/glheader.h"
55
56 #include "main/context.h"
57 #include "main/mtypes.h"
58 #include "arbprogparse.h"
59 #include "programopt.h"
60 #include "prog_parameter.h"
61 #include "prog_statevars.h"
62 #include "prog_instruction.h"
63 #include "prog_optimize.h"
64 #include "program_parser.h"
65
66
67 void
_mesa_parse_arb_fragment_program(struct gl_context * ctx,GLenum target,const GLvoid * str,GLsizei len,struct gl_program * program)68 _mesa_parse_arb_fragment_program(struct gl_context* ctx, GLenum target,
69 const GLvoid *str, GLsizei len,
70 struct gl_program *program)
71 {
72 struct gl_program prog;
73 struct asm_parser_state state;
74 GLuint i;
75
76 assert(target == GL_FRAGMENT_PROGRAM_ARB);
77
78 memset(&prog, 0, sizeof(prog));
79 memset(&state, 0, sizeof(state));
80 state.prog = &prog;
81 state.mem_ctx = program;
82
83 if (!_mesa_parse_arb_program(ctx, target, (const GLubyte*) str, len,
84 &state)) {
85 /* Error in the program. Just return. */
86 return;
87 }
88
89 ralloc_free(program->String);
90
91 /* Copy the relevant contents of the arb_program struct into the
92 * fragment_program struct.
93 */
94 program->String = prog.String;
95 program->arb.NumInstructions = prog.arb.NumInstructions;
96 program->arb.NumTemporaries = prog.arb.NumTemporaries;
97 program->arb.NumParameters = prog.arb.NumParameters;
98 program->arb.NumAttributes = prog.arb.NumAttributes;
99 program->arb.NumAddressRegs = prog.arb.NumAddressRegs;
100 program->arb.NumNativeInstructions = prog.arb.NumNativeInstructions;
101 program->arb.NumNativeTemporaries = prog.arb.NumNativeTemporaries;
102 program->arb.NumNativeParameters = prog.arb.NumNativeParameters;
103 program->arb.NumNativeAttributes = prog.arb.NumNativeAttributes;
104 program->arb.NumNativeAddressRegs = prog.arb.NumNativeAddressRegs;
105 program->arb.NumAluInstructions = prog.arb.NumAluInstructions;
106 program->arb.NumTexInstructions = prog.arb.NumTexInstructions;
107 program->arb.NumTexIndirections = prog.arb.NumTexIndirections;
108 program->arb.NumNativeAluInstructions = prog.arb.NumAluInstructions;
109 program->arb.NumNativeTexInstructions = prog.arb.NumTexInstructions;
110 program->arb.NumNativeTexIndirections = prog.arb.NumTexIndirections;
111 program->info.inputs_read = prog.info.inputs_read;
112 program->info.outputs_written = prog.info.outputs_written;
113 program->arb.IndirectRegisterFiles = prog.arb.IndirectRegisterFiles;
114 for (i = 0; i < MAX_TEXTURE_IMAGE_UNITS; i++) {
115 program->TexturesUsed[i] = prog.TexturesUsed[i];
116 if (prog.TexturesUsed[i])
117 program->SamplersUsed |= (1 << i);
118 }
119 program->ShadowSamplers = prog.ShadowSamplers;
120 program->info.fs.origin_upper_left = state.option.OriginUpperLeft;
121 program->info.fs.pixel_center_integer = state.option.PixelCenterInteger;
122
123 program->info.fs.uses_discard = state.fragment.UsesKill;
124
125 ralloc_free(program->arb.Instructions);
126 program->arb.Instructions = prog.arb.Instructions;
127
128 if (program->Parameters)
129 _mesa_free_parameter_list(program->Parameters);
130 program->Parameters = prog.Parameters;
131
132 /* Append fog instructions now if the program has "OPTION ARB_fog_exp"
133 * or similar. We used to leave this up to drivers, but it appears
134 * there's no hardware that wants to do fog in a discrete stage separate
135 * from the fragment shader.
136 */
137 if (state.option.Fog != OPTION_NONE) {
138 static const GLenum fog_modes[4] = {
139 GL_NONE, GL_EXP, GL_EXP2, GL_LINEAR
140 };
141
142 /* XXX: we should somehow recompile this to remove clamping if disabled
143 * On the ATI driver, this is unclampled if fragment clamping is disabled
144 */
145 _mesa_append_fog_code(ctx, program, fog_modes[state.option.Fog], GL_TRUE);
146 }
147
148 #if DEBUG_FP
149 printf("____________Fragment program %u ________\n", program->Id);
150 _mesa_print_program(&program->Base);
151 #endif
152 }
153
154
155
156 /**
157 * Parse the vertex program string. If success, update the given
158 * vertex_program object with the new program. Else, leave the vertex_program
159 * object unchanged.
160 */
161 void
_mesa_parse_arb_vertex_program(struct gl_context * ctx,GLenum target,const GLvoid * str,GLsizei len,struct gl_program * program)162 _mesa_parse_arb_vertex_program(struct gl_context *ctx, GLenum target,
163 const GLvoid *str, GLsizei len,
164 struct gl_program *program)
165 {
166 struct gl_program prog;
167 struct asm_parser_state state;
168
169 assert(target == GL_VERTEX_PROGRAM_ARB);
170
171 memset(&prog, 0, sizeof(prog));
172 memset(&state, 0, sizeof(state));
173 state.prog = &prog;
174 state.mem_ctx = program;
175
176 if (!_mesa_parse_arb_program(ctx, target, (const GLubyte*) str, len,
177 &state)) {
178 _mesa_error(ctx, GL_INVALID_OPERATION, "glProgramString(bad program)");
179 return;
180 }
181
182 _mesa_optimize_program(&prog, program);
183
184 ralloc_free(program->String);
185
186 /* Copy the relevant contents of the arb_program struct into the
187 * vertex_program struct.
188 */
189 program->String = prog.String;
190 program->arb.NumInstructions = prog.arb.NumInstructions;
191 program->arb.NumTemporaries = prog.arb.NumTemporaries;
192 program->arb.NumParameters = prog.arb.NumParameters;
193 program->arb.NumAttributes = prog.arb.NumAttributes;
194 program->arb.NumAddressRegs = prog.arb.NumAddressRegs;
195 program->arb.NumNativeInstructions = prog.arb.NumNativeInstructions;
196 program->arb.NumNativeTemporaries = prog.arb.NumNativeTemporaries;
197 program->arb.NumNativeParameters = prog.arb.NumNativeParameters;
198 program->arb.NumNativeAttributes = prog.arb.NumNativeAttributes;
199 program->arb.NumNativeAddressRegs = prog.arb.NumNativeAddressRegs;
200 program->info.inputs_read = prog.info.inputs_read;
201 program->info.outputs_written = prog.info.outputs_written;
202 program->arb.IndirectRegisterFiles = prog.arb.IndirectRegisterFiles;
203 program->arb.IsPositionInvariant = (state.option.PositionInvariant)
204 ? GL_TRUE : GL_FALSE;
205
206 ralloc_free(program->arb.Instructions);
207 program->arb.Instructions = prog.arb.Instructions;
208
209 if (program->Parameters)
210 _mesa_free_parameter_list(program->Parameters);
211 program->Parameters = prog.Parameters;
212
213 #if DEBUG_VP
214 printf("____________Vertex program %u __________\n", program->Id);
215 _mesa_print_program(program);
216 #endif
217 }
218