2 * Mesa 3-D graphics library
5 * Copyright (C) 1999-2008 Brian Paul All Rights Reserved.
7 * Permission is hereby granted, free of charge, to any person obtaining a
8 * copy of this software and associated documentation files (the "Software"),
9 * to deal in the Software without restriction, including without limitation
10 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
11 * and/or sell copies of the Software, and to permit persons to whom the
12 * Software is furnished to do so, subject to the following conditions:
14 * The above copyright notice and this permission notice shall be included
15 * in all copies or substantial portions of the Software.
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
18 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
20 * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
21 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
22 * CONNECTION WITH THE SOFTWARE OR THE USE OR 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/macros.h"
58 #include "main/mtypes.h"
59 #include "shader/grammar/grammar_mesa.h"
60 #include "arbprogparse.h"
62 #include "programopt.h"
63 #include "prog_parameter.h"
64 #include "prog_statevars.h"
65 #include "prog_instruction.h"
66 #include "program_parser.h"
70 _mesa_parse_arb_fragment_program(GLcontext
* ctx
, GLenum target
,
71 const GLvoid
*str
, GLsizei len
,
72 struct gl_fragment_program
*program
)
74 struct gl_program prog
;
75 struct asm_parser_state state
;
78 ASSERT(target
== GL_FRAGMENT_PROGRAM_ARB
);
80 memset(&prog
, 0, sizeof(prog
));
81 memset(&state
, 0, sizeof(state
));
84 if (!_mesa_parse_arb_program(ctx
, target
, (const GLubyte
*) str
, len
,
86 /* Error in the program. Just return. */
90 if (program
->Base
.String
!= NULL
)
91 _mesa_free(program
->Base
.String
);
93 /* Copy the relevant contents of the arb_program struct into the
94 * fragment_program struct.
96 program
->Base
.String
= prog
.String
;
97 program
->Base
.NumInstructions
= prog
.NumInstructions
;
98 program
->Base
.NumTemporaries
= prog
.NumTemporaries
;
99 program
->Base
.NumParameters
= prog
.NumParameters
;
100 program
->Base
.NumAttributes
= prog
.NumAttributes
;
101 program
->Base
.NumAddressRegs
= prog
.NumAddressRegs
;
102 program
->Base
.NumNativeInstructions
= prog
.NumNativeInstructions
;
103 program
->Base
.NumNativeTemporaries
= prog
.NumNativeTemporaries
;
104 program
->Base
.NumNativeParameters
= prog
.NumNativeParameters
;
105 program
->Base
.NumNativeAttributes
= prog
.NumNativeAttributes
;
106 program
->Base
.NumNativeAddressRegs
= prog
.NumNativeAddressRegs
;
107 program
->Base
.NumAluInstructions
= prog
.NumAluInstructions
;
108 program
->Base
.NumTexInstructions
= prog
.NumTexInstructions
;
109 program
->Base
.NumTexIndirections
= prog
.NumTexIndirections
;
110 program
->Base
.NumNativeAluInstructions
= prog
.NumAluInstructions
;
111 program
->Base
.NumNativeTexInstructions
= prog
.NumTexInstructions
;
112 program
->Base
.NumNativeTexIndirections
= prog
.NumTexIndirections
;
113 program
->Base
.InputsRead
= prog
.InputsRead
;
114 program
->Base
.OutputsWritten
= prog
.OutputsWritten
;
115 for (i
= 0; i
< MAX_TEXTURE_IMAGE_UNITS
; i
++) {
116 program
->Base
.TexturesUsed
[i
] = prog
.TexturesUsed
[i
];
117 if (prog
.TexturesUsed
[i
])
118 program
->Base
.SamplersUsed
|= (1 << i
);
120 program
->Base
.ShadowSamplers
= prog
.ShadowSamplers
;
121 switch (state
.option
.Fog
) {
122 case OPTION_FOG_EXP
: program
->FogOption
= GL_EXP
; break;
123 case OPTION_FOG_EXP2
: program
->FogOption
= GL_EXP2
; break;
124 case OPTION_FOG_LINEAR
: program
->FogOption
= GL_LINEAR
; break;
125 default: program
->FogOption
= GL_NONE
; break;
128 program
->UsesKill
= state
.fragment
.UsesKill
;
130 if (program
->FogOption
)
131 program
->Base
.InputsRead
|= FRAG_BIT_FOGC
;
133 if (program
->Base
.Instructions
)
134 _mesa_free(program
->Base
.Instructions
);
135 program
->Base
.Instructions
= prog
.Instructions
;
137 if (program
->Base
.Parameters
)
138 _mesa_free_parameter_list(program
->Base
.Parameters
);
139 program
->Base
.Parameters
= prog
.Parameters
;
141 /* Append fog instructions now if the program has "OPTION ARB_fog_exp"
142 * or similar. We used to leave this up to drivers, but it appears
143 * there's no hardware that wants to do fog in a discrete stage separate
144 * from the fragment shader.
146 if (program
->FogOption
!= GL_NONE
) {
147 _mesa_append_fog_code(ctx
, program
);
148 program
->FogOption
= GL_NONE
;
152 _mesa_printf("____________Fragment program %u ________\n", program
->Base
.Id
);
153 _mesa_print_program(&program
->Base
);
160 * Parse the vertex program string. If success, update the given
161 * vertex_program object with the new program. Else, leave the vertex_program
165 _mesa_parse_arb_vertex_program(GLcontext
*ctx
, GLenum target
,
166 const GLvoid
*str
, GLsizei len
,
167 struct gl_vertex_program
*program
)
169 struct gl_program prog
;
170 struct asm_parser_state state
;
172 ASSERT(target
== GL_VERTEX_PROGRAM_ARB
);
174 memset(&prog
, 0, sizeof(prog
));
175 memset(&state
, 0, sizeof(state
));
178 if (!_mesa_parse_arb_program(ctx
, target
, (const GLubyte
*) str
, len
,
180 _mesa_error(ctx
, GL_INVALID_OPERATION
, "glProgramString(bad program)");
184 if (program
->Base
.String
!= NULL
)
185 _mesa_free(program
->Base
.String
);
187 /* Copy the relevant contents of the arb_program struct into the
188 * vertex_program struct.
190 program
->Base
.String
= prog
.String
;
191 program
->Base
.NumInstructions
= prog
.NumInstructions
;
192 program
->Base
.NumTemporaries
= prog
.NumTemporaries
;
193 program
->Base
.NumParameters
= prog
.NumParameters
;
194 program
->Base
.NumAttributes
= prog
.NumAttributes
;
195 program
->Base
.NumAddressRegs
= prog
.NumAddressRegs
;
196 program
->Base
.NumNativeInstructions
= prog
.NumNativeInstructions
;
197 program
->Base
.NumNativeTemporaries
= prog
.NumNativeTemporaries
;
198 program
->Base
.NumNativeParameters
= prog
.NumNativeParameters
;
199 program
->Base
.NumNativeAttributes
= prog
.NumNativeAttributes
;
200 program
->Base
.NumNativeAddressRegs
= prog
.NumNativeAddressRegs
;
201 program
->Base
.InputsRead
= prog
.InputsRead
;
202 program
->Base
.OutputsWritten
= prog
.OutputsWritten
;
203 program
->IsPositionInvariant
= (state
.option
.PositionInvariant
)
204 ? GL_TRUE
: GL_FALSE
;
206 if (program
->Base
.Instructions
)
207 _mesa_free(program
->Base
.Instructions
);
208 program
->Base
.Instructions
= prog
.Instructions
;
210 if (program
->Base
.Parameters
)
211 _mesa_free_parameter_list(program
->Base
.Parameters
);
212 program
->Base
.Parameters
= prog
.Parameters
;
215 _mesa_printf("____________Vertex program %u __________\n", program
->Base
.Id
);
216 _mesa_print_program(&program
->Base
);