2 * Copyright © 2009 Intel Corporation
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 (including the next
12 * paragraph) shall be included in all copies or substantial portions of the
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
18 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
21 * DEALINGS IN THE SOFTWARE.
25 #include "main/mtypes.h"
26 #include "prog_instruction.h"
27 #include "program_parser.h"
31 * Extra assembly-level parser routines
33 * \author Ian Romanick <ian.d.romanick@intel.com>
37 _mesa_parse_instruction_suffix(const struct asm_parser_state
*state
,
39 struct prog_instruction
*inst
)
41 inst
->Saturate
= GL_FALSE
;
43 /* The only possible suffix element is the saturation selector from
44 * ARB_fragment_program.
46 if (state
->mode
== ARB_fragment
) {
47 if (strcmp(suffix
, "_SAT") == 0) {
48 inst
->Saturate
= GL_TRUE
;
53 /* It is an error for all of the suffix string not to be consumed.
55 return suffix
[0] == '\0';
60 _mesa_ARBvp_parse_option(struct asm_parser_state
*state
, const char *option
)
62 if (strcmp(option
, "ARB_position_invariant") == 0) {
63 state
->option
.PositionInvariant
= 1;
72 _mesa_ARBfp_parse_option(struct asm_parser_state
*state
, const char *option
)
76 /* All of the options currently supported start with "ARB_". The code is
77 * currently structured with nested if-statements because eventually options
78 * that start with "NV_" will be supported. This structure will result in
79 * less churn when those options are added.
81 if (strncmp(option
, "ARB_", 4) == 0) {
82 /* Advance the pointer past the "ARB_" prefix.
86 if (strncmp(option
, "fog_", 4) == 0) {
89 if (strcmp(option
, "exp") == 0) {
90 fog_option
= OPTION_FOG_EXP
;
91 } else if (strcmp(option
, "exp2") == 0) {
92 fog_option
= OPTION_FOG_EXP2
;
93 } else if (strcmp(option
, "linear") == 0) {
94 fog_option
= OPTION_FOG_LINEAR
;
100 if (state
->option
.Fog
== OPTION_NONE
) {
101 state
->option
.Fog
= fog_option
;
105 /* The ARB_fragment_program specification instructs us to handle
106 * redundant options in two seemingly contradictory ways:
108 * Section 3.11.4.5.1 says:
109 * "Only one fog application option may be specified by any given
110 * fragment program. A fragment program that specifies more than one
111 * of the program options "ARB_fog_exp", "ARB_fog_exp2", and
112 * "ARB_fog_linear", will fail to load."
115 * "The three mandatory options are ARB_fog_exp, ARB_fog_exp2, and
116 * ARB_fog_linear. As these options are mutually exclusive by
117 * nature, specifying more than one is not useful. If more than one
118 * is specified, the last one encountered in the <optionSequence>
119 * will be the one to actually modify the execution environment."
121 * We choose to allow programs to specify the same OPTION redundantly,
122 * but fail to load programs that specify contradictory options.
124 return state
->option
.Fog
== fog_option
? 1 : 0;
125 } else if (strncmp(option
, "precision_hint_", 15) == 0) {
128 /* The ARB_fragment_program spec, 3.11.4.5.2 says:
130 * "Only one precision control option may be specified by any given
131 * fragment program. A fragment program that specifies both the
132 * "ARB_precision_hint_fastest" and "ARB_precision_hint_nicest"
133 * program options will fail to load.
136 if (strcmp(option
, "nicest") == 0 &&
137 state
->option
.PrecisionHint
!= OPTION_FASTEST
) {
138 state
->option
.PrecisionHint
= OPTION_NICEST
;
140 } else if (strcmp(option
, "fastest") == 0 &&
141 state
->option
.PrecisionHint
!= OPTION_NICEST
) {
142 state
->option
.PrecisionHint
= OPTION_FASTEST
;
147 } else if (strcmp(option
, "draw_buffers") == 0) {
148 /* Don't need to check extension availability because all Mesa-based
149 * drivers support GL_ARB_draw_buffers.
151 state
->option
.DrawBuffers
= 1;
153 } else if (strcmp(option
, "fragment_program_shadow") == 0) {
154 if (state
->ctx
->Extensions
.ARB_fragment_program_shadow
) {
155 state
->option
.Shadow
= 1;
158 } else if (strncmp(option
, "fragment_coord_", 15) == 0) {
160 if (state
->ctx
->Extensions
.ARB_fragment_coord_conventions
) {
161 if (strcmp(option
, "origin_upper_left") == 0) {
162 state
->option
.OriginUpperLeft
= 1;
165 else if (strcmp(option
, "pixel_center_integer") == 0) {
166 state
->option
.PixelCenterInteger
= 1;
171 } else if (strncmp(option
, "ATI_", 4) == 0) {
174 if (strcmp(option
, "draw_buffers") == 0) {
175 /* Don't need to check extension availability because all Mesa-based
176 * drivers support GL_ATI_draw_buffers.
178 state
->option
.DrawBuffers
= 1;