| /* |
| * Copyright © 2009 Intel Corporation |
| * |
| * Permission is hereby granted, free of charge, to any person obtaining a |
| * copy of this software and associated documentation files (the "Software"), |
| * to deal in the Software without restriction, including without limitation |
| * the rights to use, copy, modify, merge, publish, distribute, sublicense, |
| * and/or sell copies of the Software, and to permit persons to whom the |
| * Software is furnished to do so, subject to the following conditions: |
| * |
| * The above copyright notice and this permission notice (including the next |
| * paragraph) shall be included in all copies or substantial portions of the |
| * Software. |
| * |
| * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
| * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
| * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL |
| * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
| * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING |
| * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER |
| * DEALINGS IN THE SOFTWARE. |
| */ |
| |
| #include <string.h> |
| #include "main/mtypes.h" |
| #include "prog_instruction.h" |
| #include "program_parser.h" |
| |
| |
| /** |
| * Extra assembly-level parser routines |
| * |
| * \author Ian Romanick <ian.d.romanick@intel.com> |
| */ |
| |
| int |
| _mesa_parse_instruction_suffix(const struct asm_parser_state *state, |
| const char *suffix, |
| struct prog_instruction *inst) |
| { |
| inst->CondUpdate = 0; |
| inst->CondDst = 0; |
| inst->SaturateMode = SATURATE_OFF; |
| inst->Precision = FLOAT32; |
| |
| |
| /* The first possible suffix element is the precision specifier from |
| * NV_fragment_program_option. |
| */ |
| if (state->option.NV_fragment) { |
| switch (suffix[0]) { |
| case 'H': |
| inst->Precision = FLOAT16; |
| suffix++; |
| break; |
| case 'R': |
| inst->Precision = FLOAT32; |
| suffix++; |
| break; |
| case 'X': |
| inst->Precision = FIXED12; |
| suffix++; |
| break; |
| default: |
| break; |
| } |
| } |
| |
| /* The next possible suffix element is the condition code modifier selection |
| * from NV_fragment_program_option. |
| */ |
| if (state->option.NV_fragment) { |
| if (suffix[0] == 'C') { |
| inst->CondUpdate = 1; |
| suffix++; |
| } |
| } |
| |
| |
| /* The final possible suffix element is the saturation selector from |
| * ARB_fragment_program. |
| */ |
| if (state->mode == ARB_fragment) { |
| if (strcmp(suffix, "_SAT") == 0) { |
| inst->SaturateMode = SATURATE_ZERO_ONE; |
| suffix += 4; |
| } |
| } |
| |
| |
| /* It is an error for all of the suffix string not to be consumed. |
| */ |
| return suffix[0] == '\0'; |
| } |
| |
| |
| int |
| _mesa_parse_cc(const char *s) |
| { |
| int cond = 0; |
| |
| switch (s[0]) { |
| case 'E': |
| if (s[1] == 'Q') { |
| cond = COND_EQ; |
| } |
| break; |
| |
| case 'F': |
| if (s[1] == 'L') { |
| cond = COND_FL; |
| } |
| break; |
| |
| case 'G': |
| if (s[1] == 'E') { |
| cond = COND_GE; |
| } else if (s[1] == 'T') { |
| cond = COND_GT; |
| } |
| break; |
| |
| case 'L': |
| if (s[1] == 'E') { |
| cond = COND_LE; |
| } else if (s[1] == 'T') { |
| cond = COND_LT; |
| } |
| break; |
| |
| case 'N': |
| if (s[1] == 'E') { |
| cond = COND_NE; |
| } |
| break; |
| |
| case 'T': |
| if (s[1] == 'R') { |
| cond = COND_TR; |
| } |
| break; |
| |
| default: |
| break; |
| } |
| |
| return ((cond == 0) || (s[2] != '\0')) ? 0 : cond; |
| } |
| |
| |
| int |
| _mesa_ARBvp_parse_option(struct asm_parser_state *state, const char *option) |
| { |
| if (strcmp(option, "ARB_position_invariant") == 0) { |
| state->option.PositionInvariant = 1; |
| return 1; |
| } |
| |
| return 0; |
| } |
| |
| |
| int |
| _mesa_ARBfp_parse_option(struct asm_parser_state *state, const char *option) |
| { |
| /* All of the options currently supported start with "ARB_". The code is |
| * currently structured with nested if-statements because eventually options |
| * that start with "NV_" will be supported. This structure will result in |
| * less churn when those options are added. |
| */ |
| if (strncmp(option, "ARB_", 4) == 0) { |
| /* Advance the pointer past the "ARB_" prefix. |
| */ |
| option += 4; |
| |
| |
| if (strncmp(option, "fog_", 4) == 0) { |
| option += 4; |
| |
| if (state->option.Fog == OPTION_NONE) { |
| if (strcmp(option, "exp") == 0) { |
| state->option.Fog = OPTION_FOG_EXP; |
| return 1; |
| } else if (strcmp(option, "exp2") == 0) { |
| state->option.Fog = OPTION_FOG_EXP2; |
| return 1; |
| } else if (strcmp(option, "linear") == 0) { |
| state->option.Fog = OPTION_FOG_LINEAR; |
| return 1; |
| } |
| } |
| |
| return 0; |
| } else if (strncmp(option, "precision_hint_", 15) == 0) { |
| option += 15; |
| |
| /* The ARB_fragment_program spec, 3.11.4.5.2 says: |
| * |
| * "Only one precision control option may be specified by any given |
| * fragment program. A fragment program that specifies both the |
| * "ARB_precision_hint_fastest" and "ARB_precision_hint_nicest" |
| * program options will fail to load. |
| */ |
| |
| if (strcmp(option, "nicest") == 0 && state->option.PrecisionHint != OPTION_FASTEST) { |
| state->option.PrecisionHint = OPTION_NICEST; |
| return 1; |
| } else if (strcmp(option, "fastest") == 0 && state->option.PrecisionHint != OPTION_NICEST) { |
| state->option.PrecisionHint = OPTION_FASTEST; |
| return 1; |
| } |
| |
| return 0; |
| } else if (strcmp(option, "draw_buffers") == 0) { |
| /* Don't need to check extension availability because all Mesa-based |
| * drivers support GL_ARB_draw_buffers. |
| */ |
| state->option.DrawBuffers = 1; |
| return 1; |
| } else if (strcmp(option, "fragment_program_shadow") == 0) { |
| if (state->ctx->Extensions.ARB_fragment_program_shadow) { |
| state->option.Shadow = 1; |
| return 1; |
| } |
| } else if (strncmp(option, "fragment_coord_", 15) == 0) { |
| option += 15; |
| if (state->ctx->Extensions.ARB_fragment_coord_conventions) { |
| if (strcmp(option, "origin_upper_left") == 0) { |
| state->option.OriginUpperLeft = 1; |
| return 1; |
| } |
| else if (strcmp(option, "pixel_center_integer") == 0) { |
| state->option.PixelCenterInteger = 1; |
| return 1; |
| } |
| } |
| } |
| } else if (strncmp(option, "ATI_", 4) == 0) { |
| option += 4; |
| |
| if (strcmp(option, "draw_buffers") == 0) { |
| /* Don't need to check extension availability because all Mesa-based |
| * drivers support GL_ATI_draw_buffers. |
| */ |
| state->option.DrawBuffers = 1; |
| return 1; |
| } |
| } else if (strncmp(option, "NV_fragment_program", 19) == 0) { |
| option += 19; |
| |
| /* Other NV_fragment_program strings may be supported later. |
| */ |
| if (option[0] == '\0') { |
| if (state->ctx->Extensions.NV_fragment_program_option) { |
| state->option.NV_fragment = 1; |
| return 1; |
| } |
| } |
| } |
| |
| return 0; |
| } |