/* * 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 #include "main/mtypes.h" #include "prog_instruction.h" #include "program_parser.h" /** * Extra assembly-level parser routines * * \author Ian Romanick */ 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->Saturate = GL_FALSE; 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->Saturate = GL_TRUE; 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) { unsigned fog_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 (strcmp(option, "exp") == 0) { fog_option = OPTION_FOG_EXP; } else if (strcmp(option, "exp2") == 0) { fog_option = OPTION_FOG_EXP2; } else if (strcmp(option, "linear") == 0) { fog_option = OPTION_FOG_LINEAR; } else { /* invalid option */ return 0; } if (state->option.Fog == OPTION_NONE) { state->option.Fog = fog_option; return 1; } /* The ARB_fragment_program specification instructs us to handle * redundant options in two seemingly contradictory ways: * * Section 3.11.4.5.1 says: * "Only one fog application option may be specified by any given * fragment program. A fragment program that specifies more than one * of the program options "ARB_fog_exp", "ARB_fog_exp2", and * "ARB_fog_linear", will fail to load." * * Issue 27 says: * "The three mandatory options are ARB_fog_exp, ARB_fog_exp2, and * ARB_fog_linear. As these options are mutually exclusive by * nature, specifying more than one is not useful. If more than one * is specified, the last one encountered in the * will be the one to actually modify the execution environment." * * We choose to allow programs to specify the same OPTION redundantly, * but fail to load programs that specify contradictory options. */ return state->option.Fog == fog_option ? 1 : 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; }