/*
* 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->Saturate = GL_FALSE;
/* The only 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_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 <optionSequence>
* 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;
}
}
return 0;
}