2 * Mesa 3-D graphics library
4 * Copyright (C) 1999-2008 Brian Paul All Rights Reserved.
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:
13 * The above copyright notice and this permission notice shall be included
14 * in all copies or substantial portions of the Software.
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.
25 #define DEBUG_PARSING 0
28 * \file arbprogparse.c
29 * ARB_*_program parser core
34 Notes on program parameters, etc.
36 The instructions we emit will use six kinds of source registers:
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
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.
54 #include "main/glheader.h"
55 #include "main/imports.h"
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"
68 _mesa_parse_arb_fragment_program(struct gl_context
* ctx
, GLenum target
,
69 const GLvoid
*str
, GLsizei len
,
70 struct gl_fragment_program
*program
)
72 struct gl_program prog
;
73 struct asm_parser_state state
;
76 assert(target
== GL_FRAGMENT_PROGRAM_ARB
);
78 memset(&prog
, 0, sizeof(prog
));
79 memset(&state
, 0, sizeof(state
));
82 if (!_mesa_parse_arb_program(ctx
, target
, (const GLubyte
*) str
, len
,
84 /* Error in the program. Just return. */
88 free(program
->Base
.String
);
90 /* Copy the relevant contents of the arb_program struct into the
91 * fragment_program struct.
93 program
->Base
.String
= prog
.String
;
94 program
->Base
.NumInstructions
= prog
.NumInstructions
;
95 program
->Base
.NumTemporaries
= prog
.NumTemporaries
;
96 program
->Base
.NumParameters
= prog
.NumParameters
;
97 program
->Base
.NumAttributes
= prog
.NumAttributes
;
98 program
->Base
.NumAddressRegs
= prog
.NumAddressRegs
;
99 program
->Base
.NumNativeInstructions
= prog
.NumNativeInstructions
;
100 program
->Base
.NumNativeTemporaries
= prog
.NumNativeTemporaries
;
101 program
->Base
.NumNativeParameters
= prog
.NumNativeParameters
;
102 program
->Base
.NumNativeAttributes
= prog
.NumNativeAttributes
;
103 program
->Base
.NumNativeAddressRegs
= prog
.NumNativeAddressRegs
;
104 program
->Base
.NumAluInstructions
= prog
.NumAluInstructions
;
105 program
->Base
.NumTexInstructions
= prog
.NumTexInstructions
;
106 program
->Base
.NumTexIndirections
= prog
.NumTexIndirections
;
107 program
->Base
.NumNativeAluInstructions
= prog
.NumAluInstructions
;
108 program
->Base
.NumNativeTexInstructions
= prog
.NumTexInstructions
;
109 program
->Base
.NumNativeTexIndirections
= prog
.NumTexIndirections
;
110 program
->Base
.InputsRead
= prog
.InputsRead
;
111 program
->Base
.OutputsWritten
= prog
.OutputsWritten
;
112 program
->Base
.IndirectRegisterFiles
= prog
.IndirectRegisterFiles
;
113 for (i
= 0; i
< MAX_TEXTURE_IMAGE_UNITS
; i
++) {
114 program
->Base
.TexturesUsed
[i
] = prog
.TexturesUsed
[i
];
115 if (prog
.TexturesUsed
[i
])
116 program
->Base
.SamplersUsed
|= (1 << i
);
118 program
->Base
.ShadowSamplers
= prog
.ShadowSamplers
;
119 program
->OriginUpperLeft
= state
.option
.OriginUpperLeft
;
120 program
->PixelCenterInteger
= state
.option
.PixelCenterInteger
;
122 program
->UsesKill
= state
.fragment
.UsesKill
;
123 program
->UsesDFdy
= state
.fragment
.UsesDFdy
;
125 free(program
->Base
.Instructions
);
126 program
->Base
.Instructions
= prog
.Instructions
;
128 if (program
->Base
.Parameters
)
129 _mesa_free_parameter_list(program
->Base
.Parameters
);
130 program
->Base
.Parameters
= prog
.Parameters
;
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.
137 if (state
.option
.Fog
!= OPTION_NONE
) {
138 static const GLenum fog_modes
[4] = {
139 GL_NONE
, GL_EXP
, GL_EXP2
, GL_LINEAR
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
145 _mesa_append_fog_code(ctx
, program
, fog_modes
[state
.option
.Fog
], GL_TRUE
);
149 printf("____________Fragment program %u ________\n", program
->Base
.Id
);
150 _mesa_print_program(&program
->Base
);
157 * Parse the vertex program string. If success, update the given
158 * vertex_program object with the new program. Else, leave the vertex_program
162 _mesa_parse_arb_vertex_program(struct gl_context
*ctx
, GLenum target
,
163 const GLvoid
*str
, GLsizei len
,
164 struct gl_vertex_program
*program
)
166 struct gl_program prog
;
167 struct asm_parser_state state
;
169 assert(target
== GL_VERTEX_PROGRAM_ARB
);
171 memset(&prog
, 0, sizeof(prog
));
172 memset(&state
, 0, sizeof(state
));
175 if (!_mesa_parse_arb_program(ctx
, target
, (const GLubyte
*) str
, len
,
177 _mesa_error(ctx
, GL_INVALID_OPERATION
, "glProgramString(bad program)");
181 if ((ctx
->_Shader
->Flags
& GLSL_NO_OPT
) == 0)
182 _mesa_optimize_program(ctx
, &prog
);
184 free(program
->Base
.String
);
186 /* Copy the relevant contents of the arb_program struct into the
187 * vertex_program struct.
189 program
->Base
.String
= prog
.String
;
190 program
->Base
.NumInstructions
= prog
.NumInstructions
;
191 program
->Base
.NumTemporaries
= prog
.NumTemporaries
;
192 program
->Base
.NumParameters
= prog
.NumParameters
;
193 program
->Base
.NumAttributes
= prog
.NumAttributes
;
194 program
->Base
.NumAddressRegs
= prog
.NumAddressRegs
;
195 program
->Base
.NumNativeInstructions
= prog
.NumNativeInstructions
;
196 program
->Base
.NumNativeTemporaries
= prog
.NumNativeTemporaries
;
197 program
->Base
.NumNativeParameters
= prog
.NumNativeParameters
;
198 program
->Base
.NumNativeAttributes
= prog
.NumNativeAttributes
;
199 program
->Base
.NumNativeAddressRegs
= prog
.NumNativeAddressRegs
;
200 program
->Base
.InputsRead
= prog
.InputsRead
;
201 program
->Base
.OutputsWritten
= prog
.OutputsWritten
;
202 program
->Base
.IndirectRegisterFiles
= prog
.IndirectRegisterFiles
;
203 program
->IsPositionInvariant
= (state
.option
.PositionInvariant
)
204 ? GL_TRUE
: GL_FALSE
;
206 free(program
->Base
.Instructions
);
207 program
->Base
.Instructions
= prog
.Instructions
;
209 if (program
->Base
.Parameters
)
210 _mesa_free_parameter_list(program
->Base
.Parameters
);
211 program
->Base
.Parameters
= prog
.Parameters
;
214 printf("____________Vertex program %u __________\n", program
->Base
.Id
);
215 _mesa_print_program(&program
->Base
);