Go to most recent revision | Details | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
4358 | Serge | 1 | /* |
2 | * Copyright © 2009 Intel Corporation |
||
3 | * |
||
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: |
||
10 | * |
||
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 |
||
13 | * Software. |
||
14 | * |
||
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. |
||
22 | */ |
||
23 | |||
24 | #include |
||
25 | #include "main/mtypes.h" |
||
26 | #include "prog_instruction.h" |
||
27 | #include "program_parser.h" |
||
28 | |||
29 | |||
30 | /** |
||
31 | * Extra assembly-level parser routines |
||
32 | * |
||
33 | * \author Ian Romanick |
||
34 | */ |
||
35 | |||
36 | int |
||
37 | _mesa_parse_instruction_suffix(const struct asm_parser_state *state, |
||
38 | const char *suffix, |
||
39 | struct prog_instruction *inst) |
||
40 | { |
||
41 | inst->CondUpdate = 0; |
||
42 | inst->CondDst = 0; |
||
43 | inst->SaturateMode = SATURATE_OFF; |
||
44 | inst->Precision = FLOAT32; |
||
45 | |||
46 | |||
47 | /* The first possible suffix element is the precision specifier from |
||
48 | * NV_fragment_program_option. |
||
49 | */ |
||
50 | if (state->option.NV_fragment) { |
||
51 | switch (suffix[0]) { |
||
52 | case 'H': |
||
53 | inst->Precision = FLOAT16; |
||
54 | suffix++; |
||
55 | break; |
||
56 | case 'R': |
||
57 | inst->Precision = FLOAT32; |
||
58 | suffix++; |
||
59 | break; |
||
60 | case 'X': |
||
61 | inst->Precision = FIXED12; |
||
62 | suffix++; |
||
63 | break; |
||
64 | default: |
||
65 | break; |
||
66 | } |
||
67 | } |
||
68 | |||
69 | /* The next possible suffix element is the condition code modifier selection |
||
70 | * from NV_fragment_program_option. |
||
71 | */ |
||
72 | if (state->option.NV_fragment) { |
||
73 | if (suffix[0] == 'C') { |
||
74 | inst->CondUpdate = 1; |
||
75 | suffix++; |
||
76 | } |
||
77 | } |
||
78 | |||
79 | |||
80 | /* The final possible suffix element is the saturation selector from |
||
81 | * ARB_fragment_program. |
||
82 | */ |
||
83 | if (state->mode == ARB_fragment) { |
||
84 | if (strcmp(suffix, "_SAT") == 0) { |
||
85 | inst->SaturateMode = SATURATE_ZERO_ONE; |
||
86 | suffix += 4; |
||
87 | } |
||
88 | } |
||
89 | |||
90 | |||
91 | /* It is an error for all of the suffix string not to be consumed. |
||
92 | */ |
||
93 | return suffix[0] == '\0'; |
||
94 | } |
||
95 | |||
96 | |||
97 | int |
||
98 | _mesa_parse_cc(const char *s) |
||
99 | { |
||
100 | int cond = 0; |
||
101 | |||
102 | switch (s[0]) { |
||
103 | case 'E': |
||
104 | if (s[1] == 'Q') { |
||
105 | cond = COND_EQ; |
||
106 | } |
||
107 | break; |
||
108 | |||
109 | case 'F': |
||
110 | if (s[1] == 'L') { |
||
111 | cond = COND_FL; |
||
112 | } |
||
113 | break; |
||
114 | |||
115 | case 'G': |
||
116 | if (s[1] == 'E') { |
||
117 | cond = COND_GE; |
||
118 | } else if (s[1] == 'T') { |
||
119 | cond = COND_GT; |
||
120 | } |
||
121 | break; |
||
122 | |||
123 | case 'L': |
||
124 | if (s[1] == 'E') { |
||
125 | cond = COND_LE; |
||
126 | } else if (s[1] == 'T') { |
||
127 | cond = COND_LT; |
||
128 | } |
||
129 | break; |
||
130 | |||
131 | case 'N': |
||
132 | if (s[1] == 'E') { |
||
133 | cond = COND_NE; |
||
134 | } |
||
135 | break; |
||
136 | |||
137 | case 'T': |
||
138 | if (s[1] == 'R') { |
||
139 | cond = COND_TR; |
||
140 | } |
||
141 | break; |
||
142 | |||
143 | default: |
||
144 | break; |
||
145 | } |
||
146 | |||
147 | return ((cond == 0) || (s[2] != '\0')) ? 0 : cond; |
||
148 | } |
||
149 | |||
150 | |||
151 | int |
||
152 | _mesa_ARBvp_parse_option(struct asm_parser_state *state, const char *option) |
||
153 | { |
||
154 | if (strcmp(option, "ARB_position_invariant") == 0) { |
||
155 | state->option.PositionInvariant = 1; |
||
156 | return 1; |
||
157 | } |
||
158 | |||
159 | return 0; |
||
160 | } |
||
161 | |||
162 | |||
163 | int |
||
164 | _mesa_ARBfp_parse_option(struct asm_parser_state *state, const char *option) |
||
165 | { |
||
166 | /* All of the options currently supported start with "ARB_". The code is |
||
167 | * currently structured with nested if-statements because eventually options |
||
168 | * that start with "NV_" will be supported. This structure will result in |
||
169 | * less churn when those options are added. |
||
170 | */ |
||
171 | if (strncmp(option, "ARB_", 4) == 0) { |
||
172 | /* Advance the pointer past the "ARB_" prefix. |
||
173 | */ |
||
174 | option += 4; |
||
175 | |||
176 | |||
177 | if (strncmp(option, "fog_", 4) == 0) { |
||
178 | option += 4; |
||
179 | |||
180 | if (state->option.Fog == OPTION_NONE) { |
||
181 | if (strcmp(option, "exp") == 0) { |
||
182 | state->option.Fog = OPTION_FOG_EXP; |
||
183 | return 1; |
||
184 | } else if (strcmp(option, "exp2") == 0) { |
||
185 | state->option.Fog = OPTION_FOG_EXP2; |
||
186 | return 1; |
||
187 | } else if (strcmp(option, "linear") == 0) { |
||
188 | state->option.Fog = OPTION_FOG_LINEAR; |
||
189 | return 1; |
||
190 | } |
||
191 | } |
||
192 | |||
193 | return 0; |
||
194 | } else if (strncmp(option, "precision_hint_", 15) == 0) { |
||
195 | option += 15; |
||
196 | |||
197 | /* The ARB_fragment_program spec, 3.11.4.5.2 says: |
||
198 | * |
||
199 | * "Only one precision control option may be specified by any given |
||
200 | * fragment program. A fragment program that specifies both the |
||
201 | * "ARB_precision_hint_fastest" and "ARB_precision_hint_nicest" |
||
202 | * program options will fail to load. |
||
203 | */ |
||
204 | |||
205 | if (strcmp(option, "nicest") == 0 && state->option.PrecisionHint != OPTION_FASTEST) { |
||
206 | state->option.PrecisionHint = OPTION_NICEST; |
||
207 | return 1; |
||
208 | } else if (strcmp(option, "fastest") == 0 && state->option.PrecisionHint != OPTION_NICEST) { |
||
209 | state->option.PrecisionHint = OPTION_FASTEST; |
||
210 | return 1; |
||
211 | } |
||
212 | |||
213 | return 0; |
||
214 | } else if (strcmp(option, "draw_buffers") == 0) { |
||
215 | /* Don't need to check extension availability because all Mesa-based |
||
216 | * drivers support GL_ARB_draw_buffers. |
||
217 | */ |
||
218 | state->option.DrawBuffers = 1; |
||
219 | return 1; |
||
220 | } else if (strcmp(option, "fragment_program_shadow") == 0) { |
||
221 | if (state->ctx->Extensions.ARB_fragment_program_shadow) { |
||
222 | state->option.Shadow = 1; |
||
223 | return 1; |
||
224 | } |
||
225 | } else if (strncmp(option, "fragment_coord_", 15) == 0) { |
||
226 | option += 15; |
||
227 | if (state->ctx->Extensions.ARB_fragment_coord_conventions) { |
||
228 | if (strcmp(option, "origin_upper_left") == 0) { |
||
229 | state->option.OriginUpperLeft = 1; |
||
230 | return 1; |
||
231 | } |
||
232 | else if (strcmp(option, "pixel_center_integer") == 0) { |
||
233 | state->option.PixelCenterInteger = 1; |
||
234 | return 1; |
||
235 | } |
||
236 | } |
||
237 | } |
||
238 | } else if (strncmp(option, "ATI_", 4) == 0) { |
||
239 | option += 4; |
||
240 | |||
241 | if (strcmp(option, "draw_buffers") == 0) { |
||
242 | /* Don't need to check extension availability because all Mesa-based |
||
243 | * drivers support GL_ATI_draw_buffers. |
||
244 | */ |
||
245 | state->option.DrawBuffers = 1; |
||
246 | return 1; |
||
247 | } |
||
248 | } else if (strncmp(option, "NV_fragment_program", 19) == 0) { |
||
249 | option += 19; |
||
250 | |||
251 | /* Other NV_fragment_program strings may be supported later. |
||
252 | */ |
||
253 | if (option[0] == '\0') { |
||
254 | if (state->ctx->Extensions.NV_fragment_program_option) { |
||
255 | state->option.NV_fragment = 1; |
||
256 | return 1; |
||
257 | } |
||
258 | } |
||
259 | } else if (strncmp(option, "MESA_", 5) == 0) { |
||
260 | option += 5; |
||
261 | |||
262 | if (strcmp(option, "texture_array") == 0) { |
||
263 | if (state->ctx->Extensions.MESA_texture_array) { |
||
264 | state->option.TexArray = 1; |
||
265 | return 1; |
||
266 | } |
||
267 | } |
||
268 | } |
||
269 | |||
270 | return 0; |
||
271 | } |