project64/Source/Glitch64/OGLcombiner.cpp

2775 lines
106 KiB
C++

#ifdef _WIN32
#include <windows.h>
#else // _WIN32
#include <string.h>
#include <stdlib.h>
#endif // _WIN32
#include <math.h>
#include <stdio.h>
#include <stdlib.h>
#include "glide.h"
#include "glitchmain.h"
#include <Glide64/trace.h>
static int fct[4], source0[4], operand0[4], source1[4], operand1[4], source2[4], operand2[4];
static int fcta[4], sourcea0[4], operanda0[4], sourcea1[4], operanda1[4], sourcea2[4], operanda2[4];
static int alpha_ref, alpha_func;
float texture_env_color[4];
float ccolor0[4];
float ccolor1[4];
static float chroma_color[4];
int fog_enabled;
static int chroma_enabled;
static int chroma_other_color;
static int chroma_other_alpha;
static int dither_enabled;
int blackandwhite0;
int blackandwhite1;
#ifdef _WIN32
static float farF;
static float nearF;
#endif // _WIN32
int need_lambda[2];
float lambda_color[2][4];
// shaders variables
int need_to_compile;
static GLhandleARB fragment_shader_object;
static GLhandleARB fragment_depth_shader_object;
static GLhandleARB vertex_shader_object;
static GLhandleARB program_object_default;
static GLhandleARB program_object_depth;
static GLhandleARB program_object;
static int constant_color_location;
static int ccolor0_location;
static int ccolor1_location;
static int first_color = 1;
static int first_alpha = 1;
static int first_texture0 = 1;
static int first_texture1 = 1;
static int tex0_combiner_ext = 0;
static int tex1_combiner_ext = 0;
static int c_combiner_ext = 0;
static int a_combiner_ext = 0;
static const char* fragment_shader_header =
"uniform sampler2D texture0; \n"
"uniform sampler2D texture1; \n"
"uniform sampler2D ditherTex; \n"
"uniform vec4 constant_color; \n"
"uniform vec4 ccolor0; \n"
"uniform vec4 ccolor1; \n"
"uniform vec4 chroma_color; \n"
"uniform float lambda; \n"
"varying vec4 fogValue; \n"
" \n"
"void test_chroma(vec4 ctexture1); \n"
" \n"
" \n"
"void main() \n"
"{ \n"
;
// using gl_FragCoord is terribly slow on ATI and varying variables don't work for some unknown
// reason, so we use the unused components of the texture2 coordinates
static const char* fragment_shader_dither =
" float dithx = (gl_TexCoord[2].b + 1.0)*0.5*1000.0; \n"
" float dithy = (gl_TexCoord[2].a + 1.0)*0.5*1000.0; \n"
" if(texture2D(ditherTex, vec2((dithx-32.0*floor(dithx/32.0))/32.0, \n"
" (dithy-32.0*floor(dithy/32.0))/32.0)).a > 0.5) discard; \n"
;
static const char* fragment_shader_default =
" gl_FragColor = texture2D(texture0, vec2(gl_TexCoord[0])); \n"
;
static const char* fragment_shader_readtex0color =
" vec4 readtex0 = texture2D(texture0, vec2(gl_TexCoord[0])); \n"
;
static const char* fragment_shader_readtex0bw =
" vec4 readtex0 = texture2D(texture0, vec2(gl_TexCoord[0])); \n"
" readtex0 = vec4(vec3(readtex0.b), \n"
" readtex0.r + readtex0.g * 8.0 / 256.0); \n"
;
static const char* fragment_shader_readtex0bw_2 =
" vec4 readtex0 = vec4(dot(texture2D(texture0, vec2(gl_TexCoord[0])), vec4(1.0/3, 1.0/3, 1.0/3, 0))); \n"
;
static const char* fragment_shader_readtex1color =
" vec4 readtex1 = texture2D(texture1, vec2(gl_TexCoord[1])); \n"
;
static const char* fragment_shader_readtex1bw =
" vec4 readtex1 = texture2D(texture1, vec2(gl_TexCoord[1])); \n"
" readtex1 = vec4(vec3(readtex1.b), \n"
" readtex1.r + readtex1.g * 8.0 / 256.0); \n"
;
static const char* fragment_shader_readtex1bw_2 =
" vec4 readtex1 = vec4(dot(texture2D(texture1, vec2(gl_TexCoord[1])), vec4(1.0/3, 1.0/3, 1.0/3, 0))); \n"
;
static const char* fragment_shader_fog =
" float fog; \n"
" fog = gl_TexCoord[0].b; \n"
" gl_FragColor = vec4(mix(gl_Fog.color.rgb, gl_FragColor.rgb, fog), gl_FragColor.a); \n"
;
static const char* fragment_shader_end =
"} \n"
;
static const char* vertex_shader =
"varying vec4 fogValue; \n"
" \n"
"void main() \n"
"{ \n"
" gl_Position = ftransform(); \n"
" gl_FrontColor = gl_Color; \n"
" gl_TexCoord[0] = gl_MultiTexCoord0; \n"
" gl_TexCoord[1] = gl_MultiTexCoord1; \n"
" float f = (gl_Fog.end - gl_SecondaryColor.r) * gl_Fog.scale; \n" // fog value passed through secondary color (workaround ATI bug)
" f = clamp(f, 0.0, 1.0); \n"
" gl_TexCoord[0].b = f; \n" // various data passed through
" gl_TexCoord[2].b = gl_Vertex.x; \n" // texture coordinates
" gl_TexCoord[2].a = gl_Vertex.y; \n" // again it is the only way
"} \n" // i've found to get it working fast with ATI drivers
;
static char fragment_shader_color_combiner[1024];
static char fragment_shader_alpha_combiner[1024];
static char fragment_shader_texture1[1024];
static char fragment_shader_texture0[1024];
static char fragment_shader_chroma[1024];
static char shader_log[2048];
void updateCombiner(int i)
{
glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_COMBINE_ARB);
glTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_RGB_ARB, fct[i]);
glTexEnvi(GL_TEXTURE_ENV, GL_SOURCE0_RGB_ARB, source0[i]);
glTexEnvi(GL_TEXTURE_ENV, GL_OPERAND0_RGB_ARB, operand0[i]);
glTexEnvi(GL_TEXTURE_ENV, GL_SOURCE1_RGB_ARB, source1[i]);
glTexEnvi(GL_TEXTURE_ENV, GL_OPERAND1_RGB_ARB, operand1[i]);
glTexEnvi(GL_TEXTURE_ENV, GL_SOURCE2_RGB_ARB, source2[i]);
glTexEnvi(GL_TEXTURE_ENV, GL_OPERAND2_RGB_ARB, operand2[i]);
grDisplayGLError("updateCombiner");
}
void updateCombinera(int i)
{
glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_COMBINE_ARB);
glTexEnvi(GL_TEXTURE_ENV, GL_COMBINE_ALPHA_ARB, fcta[i]);
glTexEnvi(GL_TEXTURE_ENV, GL_SOURCE0_ALPHA_ARB, sourcea0[i]);
glTexEnvi(GL_TEXTURE_ENV, GL_OPERAND0_ALPHA_ARB, operanda0[i]);
glTexEnvi(GL_TEXTURE_ENV, GL_SOURCE1_ALPHA_ARB, sourcea1[i]);
glTexEnvi(GL_TEXTURE_ENV, GL_OPERAND1_ALPHA_ARB, operanda1[i]);
glTexEnvi(GL_TEXTURE_ENV, GL_SOURCE2_ALPHA_ARB, sourcea2[i]);
glTexEnvi(GL_TEXTURE_ENV, GL_OPERAND2_ALPHA_ARB, operanda2[i]);
grDisplayGLError("updateCombinera");
}
void init_combiner()
{
int texture[4] = { 0, 0, 0, 0 };
glActiveTextureARB(GL_TEXTURE0_ARB);
glEnable(GL_TEXTURE_2D);
// creating a fake texture
glBindTexture(GL_TEXTURE_2D, default_texture);
glTexImage2D(GL_TEXTURE_2D, 0, 3, 2, 2, 0, GL_RGBA, GL_UNSIGNED_BYTE, texture);
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
glActiveTextureARB(GL_TEXTURE1_ARB);
glBindTexture(GL_TEXTURE_2D, default_texture);
glEnable(GL_TEXTURE_2D);
int texture0_location;
int texture1_location;
char *fragment_shader;
int log_length;
// depth shader
fragment_depth_shader_object = glCreateShaderObjectARB(GL_FRAGMENT_SHADER_ARB);
char s[128];
// ZIGGY convert a 565 texture into depth component
sprintf(s, "gl_FragDepth = dot(texture2D(texture0, vec2(gl_TexCoord[0])), vec4(31*64*32, 63*32, 31, 0))*%g + %g; \n", zscale / 2 / 65535.0, 1 - zscale / 2);
fragment_shader = (char*)malloc(strlen(fragment_shader_header) +
strlen(s) +
strlen(fragment_shader_end) + 1);
strcpy(fragment_shader, fragment_shader_header);
strcat(fragment_shader, s);
strcat(fragment_shader, fragment_shader_end);
glShaderSourceARB(fragment_depth_shader_object, 1, (const GLcharARB**)&fragment_shader, NULL);
free(fragment_shader);
glCompileShaderARB(fragment_depth_shader_object);
// default shader
fragment_shader_object = glCreateShaderObjectARB(GL_FRAGMENT_SHADER_ARB);
fragment_shader = (char*)malloc(strlen(fragment_shader_header) +
strlen(fragment_shader_default) +
strlen(fragment_shader_end) + 1);
strcpy(fragment_shader, fragment_shader_header);
strcat(fragment_shader, fragment_shader_default);
strcat(fragment_shader, fragment_shader_end);
glShaderSourceARB(fragment_shader_object, 1, (const GLcharARB**)&fragment_shader, NULL);
free(fragment_shader);
glCompileShaderARB(fragment_shader_object);
vertex_shader_object = glCreateShaderObjectARB(GL_VERTEX_SHADER_ARB);
glShaderSourceARB(vertex_shader_object, 1, &vertex_shader, NULL);
glCompileShaderARB(vertex_shader_object);
// depth program
program_object = glCreateProgramObjectARB();
program_object_depth = program_object;
glAttachObjectARB(program_object, fragment_depth_shader_object);
glAttachObjectARB(program_object, vertex_shader_object);
glLinkProgramARB(program_object);
glUseProgramObjectARB(program_object);
glGetObjectParameterivARB(program_object, GL_OBJECT_LINK_STATUS_ARB, &log_length);
if (!log_length)
{
glGetInfoLogARB(fragment_shader_object, 2048, &log_length, shader_log);
if (log_length) WriteTrace(TraceGlitch, TraceWarning, shader_log);
glGetInfoLogARB(vertex_shader_object, 2048, &log_length, shader_log);
if (log_length) WriteTrace(TraceGlitch, TraceWarning, shader_log);
glGetInfoLogARB(program_object, 2048, &log_length, shader_log);
if (log_length) WriteTrace(TraceGlitch, TraceWarning, shader_log);
}
texture0_location = glGetUniformLocationARB(program_object, "texture0");
texture1_location = glGetUniformLocationARB(program_object, "texture1");
glUniform1iARB(texture0_location, 0);
glUniform1iARB(texture1_location, 1);
// default program
program_object = glCreateProgramObjectARB();
program_object_default = program_object;
glAttachObjectARB(program_object, fragment_shader_object);
glAttachObjectARB(program_object, vertex_shader_object);
glLinkProgramARB(program_object);
glUseProgramObjectARB(program_object);
glGetObjectParameterivARB(program_object, GL_OBJECT_LINK_STATUS_ARB, &log_length);
if (!log_length)
{
glGetInfoLogARB(fragment_shader_object, 2048, &log_length, shader_log);
if (log_length) WriteTrace(TraceGlitch, TraceWarning, shader_log);
glGetInfoLogARB(vertex_shader_object, 2048, &log_length, shader_log);
if (log_length) WriteTrace(TraceGlitch, TraceWarning, shader_log);
glGetInfoLogARB(program_object, 2048, &log_length, shader_log);
if (log_length) WriteTrace(TraceGlitch, TraceWarning, shader_log);
}
texture0_location = glGetUniformLocationARB(program_object, "texture0");
texture1_location = glGetUniformLocationARB(program_object, "texture1");
glUniform1iARB(texture0_location, 0);
glUniform1iARB(texture1_location, 1);
strcpy(fragment_shader_color_combiner, "");
strcpy(fragment_shader_alpha_combiner, "");
strcpy(fragment_shader_texture1, "vec4 ctexture1 = texture2D(texture0, vec2(gl_TexCoord[0])); \n");
strcpy(fragment_shader_texture0, "");
first_color = 1;
first_alpha = 1;
first_texture0 = 1;
first_texture1 = 1;
need_to_compile = 0;
fog_enabled = 0;
chroma_enabled = 0;
dither_enabled = 0;
blackandwhite0 = 0;
blackandwhite1 = 0;
grDisplayGLError("init_combiner");
}
void compile_chroma_shader()
{
strcpy(fragment_shader_chroma, "\nvoid test_chroma(vec4 ctexture1)\n{\n");
switch (chroma_other_alpha)
{
case GR_COMBINE_OTHER_ITERATED:
strcat(fragment_shader_chroma, "float alpha = gl_Color.a; \n");
break;
case GR_COMBINE_OTHER_TEXTURE:
strcat(fragment_shader_chroma, "float alpha = ctexture1.a; \n");
break;
case GR_COMBINE_OTHER_CONSTANT:
strcat(fragment_shader_chroma, "float alpha = constant_color.a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown compile_choma_shader_alpha : %x", chroma_other_alpha);
}
switch (chroma_other_color)
{
case GR_COMBINE_OTHER_ITERATED:
strcat(fragment_shader_chroma, "vec4 color = vec4(vec3(gl_Color),alpha); \n");
break;
case GR_COMBINE_OTHER_TEXTURE:
strcat(fragment_shader_chroma, "vec4 color = vec4(vec3(ctexture1),alpha); \n");
break;
case GR_COMBINE_OTHER_CONSTANT:
strcat(fragment_shader_chroma, "vec4 color = vec4(vec3(constant_color),alpha); \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown compile_choma_shader_alpha : %x", chroma_other_color);
}
strcat(fragment_shader_chroma, "if (color.rgb == chroma_color.rgb) discard; \n");
strcat(fragment_shader_chroma, "}");
grDisplayGLError("compile_chroma_shader");
}
typedef struct _shader_program_key
{
int color_combiner;
int alpha_combiner;
int texture0_combiner;
int texture1_combiner;
int texture0_combinera;
int texture1_combinera;
int fog_enabled;
int chroma_enabled;
int dither_enabled;
int blackandwhite0;
int blackandwhite1;
GLhandleARB fragment_shader_object;
GLhandleARB program_object;
} shader_program_key;
static shader_program_key* shader_programs = NULL;
static int number_of_programs = 0;
static int color_combiner_key;
static int alpha_combiner_key;
static int texture0_combiner_key;
static int texture1_combiner_key;
static int texture0_combinera_key;
static int texture1_combinera_key;
void compile_shader()
{
int texture0_location;
int texture1_location;
int ditherTex_location;
char *fragment_shader;
int i;
int chroma_color_location;
int log_length;
need_to_compile = 0;
for (i = 0; i < number_of_programs; i++)
{
if (shader_programs[i].color_combiner == color_combiner_key &&
shader_programs[i].alpha_combiner == alpha_combiner_key &&
shader_programs[i].texture0_combiner == texture0_combiner_key &&
shader_programs[i].texture1_combiner == texture1_combiner_key &&
shader_programs[i].texture0_combinera == texture0_combinera_key &&
shader_programs[i].texture1_combinera == texture1_combinera_key &&
shader_programs[i].fog_enabled == fog_enabled &&
shader_programs[i].chroma_enabled == chroma_enabled &&
shader_programs[i].dither_enabled == dither_enabled &&
shader_programs[i].blackandwhite0 == blackandwhite0 &&
shader_programs[i].blackandwhite1 == blackandwhite1)
{
program_object = shader_programs[i].program_object;
glUseProgramObjectARB(program_object);
texture0_location = glGetUniformLocationARB(program_object, "texture0");
texture1_location = glGetUniformLocationARB(program_object, "texture1");
glUniform1iARB(texture0_location, 0);
glUniform1iARB(texture1_location, 1);
constant_color_location = glGetUniformLocationARB(program_object, "constant_color");
glUniform4fARB(constant_color_location, texture_env_color[0], texture_env_color[1],
texture_env_color[2], texture_env_color[3]);
ccolor0_location = glGetUniformLocationARB(program_object, "ccolor0");
glUniform4fARB(ccolor0_location, ccolor0[0], ccolor0[1], ccolor0[2], ccolor0[3]);
ccolor1_location = glGetUniformLocationARB(program_object, "ccolor1");
glUniform4fARB(ccolor1_location, ccolor1[0], ccolor1[1], ccolor1[2], ccolor1[3]);
chroma_color_location = glGetUniformLocationARB(program_object, "chroma_color");
glUniform4fARB(chroma_color_location, chroma_color[0], chroma_color[1],
chroma_color[2], chroma_color[3]);
if (dither_enabled)
{
ditherTex_location = glGetUniformLocationARB(program_object, "ditherTex");
glUniform1iARB(ditherTex_location, 2);
}
set_lambda();
return;
}
}
if (shader_programs != NULL)
shader_programs = (shader_program_key*)realloc(shader_programs, (number_of_programs + 1)*sizeof(shader_program_key));
else
shader_programs = (shader_program_key*)malloc(sizeof(shader_program_key));
//printf("number of shaders %d\n", number_of_programs);
shader_programs[number_of_programs].color_combiner = color_combiner_key;
shader_programs[number_of_programs].alpha_combiner = alpha_combiner_key;
shader_programs[number_of_programs].texture0_combiner = texture0_combiner_key;
shader_programs[number_of_programs].texture1_combiner = texture1_combiner_key;
shader_programs[number_of_programs].texture0_combinera = texture0_combinera_key;
shader_programs[number_of_programs].texture1_combinera = texture1_combinera_key;
shader_programs[number_of_programs].fog_enabled = fog_enabled;
shader_programs[number_of_programs].chroma_enabled = chroma_enabled;
shader_programs[number_of_programs].dither_enabled = dither_enabled;
shader_programs[number_of_programs].blackandwhite0 = blackandwhite0;
shader_programs[number_of_programs].blackandwhite1 = blackandwhite1;
if (chroma_enabled)
{
strcat(fragment_shader_texture1, "test_chroma(ctexture1); \n");
compile_chroma_shader();
}
fragment_shader = (char*)malloc(4096);
strcpy(fragment_shader, fragment_shader_header);
if (dither_enabled) strcat(fragment_shader, fragment_shader_dither);
switch (blackandwhite0) {
case 1: strcat(fragment_shader, fragment_shader_readtex0bw); break;
case 2: strcat(fragment_shader, fragment_shader_readtex0bw_2); break;
default: strcat(fragment_shader, fragment_shader_readtex0color);
}
switch (blackandwhite1) {
case 1: strcat(fragment_shader, fragment_shader_readtex1bw); break;
case 2: strcat(fragment_shader, fragment_shader_readtex1bw_2); break;
default: strcat(fragment_shader, fragment_shader_readtex1color);
}
strcat(fragment_shader, fragment_shader_texture0);
strcat(fragment_shader, fragment_shader_texture1);
strcat(fragment_shader, fragment_shader_color_combiner);
strcat(fragment_shader, fragment_shader_alpha_combiner);
if (fog_enabled) strcat(fragment_shader, fragment_shader_fog);
strcat(fragment_shader, fragment_shader_end);
if (chroma_enabled) strcat(fragment_shader, fragment_shader_chroma);
shader_programs[number_of_programs].fragment_shader_object = glCreateShaderObjectARB(GL_FRAGMENT_SHADER_ARB);
glShaderSourceARB(shader_programs[number_of_programs].fragment_shader_object, 1, (const GLcharARB**)&fragment_shader, NULL);
free(fragment_shader);
glCompileShaderARB(shader_programs[number_of_programs].fragment_shader_object);
program_object = glCreateProgramObjectARB();
shader_programs[number_of_programs].program_object = program_object;
glAttachObjectARB(program_object, shader_programs[number_of_programs].fragment_shader_object);
glAttachObjectARB(program_object, vertex_shader_object);
glLinkProgramARB(program_object);
glUseProgramObjectARB(program_object);
glGetObjectParameterivARB(program_object, GL_OBJECT_LINK_STATUS_ARB, &log_length);
if (!log_length)
{
glGetInfoLogARB(shader_programs[number_of_programs].fragment_shader_object,
2048, &log_length, shader_log);
if (log_length) WriteTrace(TraceGlitch, TraceWarning, shader_log);
glGetInfoLogARB(vertex_shader_object, 2048, &log_length, shader_log);
if (log_length) WriteTrace(TraceGlitch, TraceWarning, shader_log);
glGetInfoLogARB(program_object,
2048, &log_length, shader_log);
if (log_length) WriteTrace(TraceGlitch, TraceWarning, shader_log);
}
texture0_location = glGetUniformLocationARB(program_object, "texture0");
texture1_location = glGetUniformLocationARB(program_object, "texture1");
glUniform1iARB(texture0_location, 0);
glUniform1iARB(texture1_location, 1);
constant_color_location = glGetUniformLocationARB(program_object, "constant_color");
glUniform4fARB(constant_color_location, texture_env_color[0], texture_env_color[1],
texture_env_color[2], texture_env_color[3]);
ccolor0_location = glGetUniformLocationARB(program_object, "ccolor0");
glUniform4fARB(ccolor0_location, ccolor0[0], ccolor0[1], ccolor0[2], ccolor0[3]);
ccolor1_location = glGetUniformLocationARB(program_object, "ccolor1");
glUniform4fARB(ccolor1_location, ccolor1[0], ccolor1[1], ccolor1[2], ccolor1[3]);
chroma_color_location = glGetUniformLocationARB(program_object, "chroma_color");
glUniform4fARB(chroma_color_location, chroma_color[0], chroma_color[1],
chroma_color[2], chroma_color[3]);
if (dither_enabled)
{
ditherTex_location = glGetUniformLocationARB(program_object, "ditherTex");
glUniform1iARB(ditherTex_location, 2);
}
set_lambda();
number_of_programs++;
grDisplayGLError("compile_shader");
}
void free_combiners()
{
free(shader_programs);
shader_programs = NULL;
number_of_programs = 0;
}
void set_copy_shader()
{
int texture0_location;
glUseProgramObjectARB(program_object_default);
texture0_location = glGetUniformLocationARB(program_object, "texture0");
glUniform1iARB(texture0_location, 0);
grDisplayGLError("set_copy_shader");
}
void set_depth_shader()
{
int texture0_location;
glUseProgramObjectARB(program_object_depth);
texture0_location = glGetUniformLocationARB(program_object, "texture0");
glUniform1iARB(texture0_location, 0);
grDisplayGLError("set_depth_shader");
}
void set_lambda()
{
int lambda_location = glGetUniformLocationARB(program_object, "lambda");
glUniform1fARB(lambda_location, lambda);
grDisplayGLError("set_lambda");
}
FX_ENTRY void FX_CALL
grConstantColorValue(GrColor_t value)
{
WriteTrace(TraceResolution, TraceDebug, "value: %d", value);
switch (lfb_color_fmt)
{
case GR_COLORFORMAT_ARGB:
texture_env_color[3] = ((value >> 24) & 0xFF) / 255.0f;
texture_env_color[0] = ((value >> 16) & 0xFF) / 255.0f;
texture_env_color[1] = ((value >> 8) & 0xFF) / 255.0f;
texture_env_color[2] = (value & 0xFF) / 255.0f;
break;
case GR_COLORFORMAT_RGBA:
texture_env_color[0] = ((value >> 24) & 0xFF) / 255.0f;
texture_env_color[1] = ((value >> 16) & 0xFF) / 255.0f;
texture_env_color[2] = ((value >> 8) & 0xFF) / 255.0f;
texture_env_color[3] = (value & 0xFF) / 255.0f;
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grConstantColorValue: unknown color format : %x", lfb_color_fmt);
}
constant_color_location = glGetUniformLocationARB(program_object, "constant_color");
glUniform4fARB(constant_color_location, texture_env_color[0], texture_env_color[1],
texture_env_color[2], texture_env_color[3]);
grDisplayGLError("grConstantColorValue");
}
int setOtherColorSource(int other)
{
switch (other)
{
case GR_COMBINE_OTHER_ITERATED:
return GL_PRIMARY_COLOR_ARB;
break;
case GR_COMBINE_OTHER_TEXTURE:
return GL_PREVIOUS_ARB;
break;
case GR_COMBINE_OTHER_CONSTANT:
return GL_CONSTANT_ARB;
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown other color source : %x", other);
}
return 0;
}
int setLocalColorSource(int local)
{
switch (local)
{
case GR_COMBINE_LOCAL_ITERATED:
return GL_PRIMARY_COLOR_ARB;
break;
case GR_COMBINE_LOCAL_CONSTANT:
return GL_CONSTANT_ARB;
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown local color source : %x", local);
}
return 0;
}
void writeGLSLColorOther(int other)
{
switch (other)
{
case GR_COMBINE_OTHER_ITERATED:
strcat(fragment_shader_color_combiner, "vec4 color_other = gl_Color; \n");
break;
case GR_COMBINE_OTHER_TEXTURE:
strcat(fragment_shader_color_combiner, "vec4 color_other = ctexture1; \n");
break;
case GR_COMBINE_OTHER_CONSTANT:
strcat(fragment_shader_color_combiner, "vec4 color_other = constant_color; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown writeGLSLColorOther : %x", other);
}
}
void writeGLSLColorLocal(int local)
{
switch (local)
{
case GR_COMBINE_LOCAL_ITERATED:
strcat(fragment_shader_color_combiner, "vec4 color_local = gl_Color; \n");
break;
case GR_COMBINE_LOCAL_CONSTANT:
strcat(fragment_shader_color_combiner, "vec4 color_local = constant_color; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown writeGLSLColorLocal : %x", local);
}
}
void writeGLSLColorFactor(int factor, int local, int need_local, int other, int need_other)
{
switch (factor)
{
case GR_COMBINE_FACTOR_ZERO:
strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(0.0); \n");
break;
case GR_COMBINE_FACTOR_LOCAL:
if (need_local) writeGLSLColorLocal(local);
strcat(fragment_shader_color_combiner, "vec4 color_factor = color_local; \n");
break;
case GR_COMBINE_FACTOR_OTHER_ALPHA:
if (need_other) writeGLSLColorOther(other);
strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(color_other.a); \n");
break;
case GR_COMBINE_FACTOR_LOCAL_ALPHA:
if (need_local) writeGLSLColorLocal(local);
strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(color_local.a); \n");
break;
case GR_COMBINE_FACTOR_TEXTURE_ALPHA:
strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(ctexture1.a); \n");
break;
case GR_COMBINE_FACTOR_TEXTURE_RGB:
strcat(fragment_shader_color_combiner, "vec4 color_factor = ctexture1; \n");
break;
case GR_COMBINE_FACTOR_ONE:
strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(1.0); \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL:
if (need_local) writeGLSLColorLocal(local);
strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(1.0) - color_local; \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_OTHER_ALPHA:
if (need_other) writeGLSLColorOther(other);
strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(1.0) - vec4(color_other.a); \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL_ALPHA:
if (need_local) writeGLSLColorLocal(local);
strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(1.0) - vec4(color_local.a); \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_TEXTURE_ALPHA:
strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(1.0) - vec4(ctexture1.a); \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown writeGLSLColorFactor : %x", factor);
}
}
FX_ENTRY void FX_CALL
grColorCombine(
GrCombineFunction_t function, GrCombineFactor_t factor,
GrCombineLocal_t local, GrCombineOther_t other,
FxBool invert)
{
WriteTrace(TraceResolution, TraceDebug, "function: %d factor: %d local: %d other: %d invert: %d", function, factor, local, other, invert);
static int last_function = 0;
static int last_factor = 0;
static int last_local = 0;
static int last_other = 0;
if (last_function == function && last_factor == factor &&
last_local == local && last_other == other && first_color == 0 && !c_combiner_ext) return;
first_color = 0;
c_combiner_ext = 0;
last_function = function;
last_factor = factor;
last_local = local;
last_other = other;
if (invert) WriteTrace(TraceGlitch, TraceWarning, "inverted result");
color_combiner_key = function | (factor << 4) | (local << 8) | (other << 10);
chroma_other_color = other;
strcpy(fragment_shader_color_combiner, "");
switch (function)
{
case GR_COMBINE_FUNCTION_ZERO:
strcat(fragment_shader_color_combiner, "gl_FragColor = vec4(0.0); \n");
break;
case GR_COMBINE_FUNCTION_LOCAL:
writeGLSLColorLocal(local);
strcat(fragment_shader_color_combiner, "gl_FragColor = color_local; \n");
break;
case GR_COMBINE_FUNCTION_LOCAL_ALPHA:
writeGLSLColorLocal(local);
strcat(fragment_shader_color_combiner, "gl_FragColor = vec4(color_local.a); \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER:
writeGLSLColorOther(other);
writeGLSLColorFactor(factor, local, 1, other, 0);
strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * color_other; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL:
writeGLSLColorLocal(local);
writeGLSLColorOther(other);
writeGLSLColorFactor(factor, local, 0, other, 0);
strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * color_other + color_local; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL_ALPHA:
writeGLSLColorLocal(local);
writeGLSLColorOther(other);
writeGLSLColorFactor(factor, local, 0, other, 0);
strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * color_other + vec4(color_local.a); \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL:
writeGLSLColorLocal(local);
writeGLSLColorOther(other);
writeGLSLColorFactor(factor, local, 0, other, 0);
strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * (color_other - color_local); \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL:
writeGLSLColorLocal(local);
writeGLSLColorOther(other);
writeGLSLColorFactor(factor, local, 0, other, 0);
strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * (color_other - color_local) + color_local; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL_ALPHA:
writeGLSLColorLocal(local);
writeGLSLColorOther(other);
writeGLSLColorFactor(factor, local, 0, other, 0);
strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * (color_other - color_local) + vec4(color_local.a); \n");
break;
case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL:
writeGLSLColorLocal(local);
writeGLSLColorFactor(factor, local, 0, other, 1);
strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * (-color_local) + color_local; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL_ALPHA:
writeGLSLColorLocal(local);
writeGLSLColorFactor(factor, local, 0, other, 1);
strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * (-color_local) + vec4(color_local.a); \n");
break;
default:
strcpy(fragment_shader_color_combiner, fragment_shader_default);
WriteTrace(TraceGlitch, TraceWarning, "unknown function : %x", function);
}
//compile_shader();
need_to_compile = 1;
}
int setOtherAlphaSource(int other)
{
switch (other)
{
case GR_COMBINE_OTHER_ITERATED:
return GL_PRIMARY_COLOR_ARB;
break;
case GR_COMBINE_OTHER_TEXTURE:
return GL_PREVIOUS_ARB;
break;
case GR_COMBINE_OTHER_CONSTANT:
return GL_CONSTANT_ARB;
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknwown other alpha source : %x", other);
}
return 0;
}
int setLocalAlphaSource(int local)
{
switch (local)
{
case GR_COMBINE_LOCAL_ITERATED:
return GL_PRIMARY_COLOR_ARB;
break;
case GR_COMBINE_LOCAL_CONSTANT:
return GL_CONSTANT_ARB;
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknwown local alpha source : %x", local);
}
return 0;
}
void writeGLSLAlphaOther(int other)
{
switch (other)
{
case GR_COMBINE_OTHER_ITERATED:
strcat(fragment_shader_alpha_combiner, "float alpha_other = gl_Color.a; \n");
break;
case GR_COMBINE_OTHER_TEXTURE:
strcat(fragment_shader_alpha_combiner, "float alpha_other = ctexture1.a; \n");
break;
case GR_COMBINE_OTHER_CONSTANT:
strcat(fragment_shader_alpha_combiner, "float alpha_other = constant_color.a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown writeGLSLAlphaOther : %x", other);
}
}
void writeGLSLAlphaLocal(int local)
{
switch (local)
{
case GR_COMBINE_LOCAL_ITERATED:
strcat(fragment_shader_alpha_combiner, "float alpha_local = gl_Color.a; \n");
break;
case GR_COMBINE_LOCAL_CONSTANT:
strcat(fragment_shader_alpha_combiner, "float alpha_local = constant_color.a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown writeGLSLAlphaLocal : %x", local);
}
}
void writeGLSLAlphaFactor(int factor, int local, int need_local, int other, int need_other)
{
switch (factor)
{
case GR_COMBINE_FACTOR_ZERO:
strcat(fragment_shader_alpha_combiner, "float alpha_factor = 0.0; \n");
break;
case GR_COMBINE_FACTOR_LOCAL:
if (need_local) writeGLSLAlphaLocal(local);
strcat(fragment_shader_alpha_combiner, "float alpha_factor = alpha_local; \n");
break;
case GR_COMBINE_FACTOR_OTHER_ALPHA:
if (need_other) writeGLSLAlphaOther(other);
strcat(fragment_shader_alpha_combiner, "float alpha_factor = alpha_other; \n");
break;
case GR_COMBINE_FACTOR_LOCAL_ALPHA:
if (need_local) writeGLSLAlphaLocal(local);
strcat(fragment_shader_alpha_combiner, "float alpha_factor = alpha_local; \n");
break;
case GR_COMBINE_FACTOR_TEXTURE_ALPHA:
strcat(fragment_shader_alpha_combiner, "float alpha_factor = ctexture1.a; \n");
break;
case GR_COMBINE_FACTOR_ONE:
strcat(fragment_shader_alpha_combiner, "float alpha_factor = 1.0; \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL:
if (need_local) writeGLSLAlphaLocal(local);
strcat(fragment_shader_alpha_combiner, "float alpha_factor = 1.0 - alpha_local; \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_OTHER_ALPHA:
if (need_other) writeGLSLAlphaOther(other);
strcat(fragment_shader_alpha_combiner, "float alpha_factor = 1.0 - alpha_other; \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL_ALPHA:
if (need_local) writeGLSLAlphaLocal(local);
strcat(fragment_shader_alpha_combiner, "float alpha_factor = 1.0 - alpha_local; \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_TEXTURE_ALPHA:
strcat(fragment_shader_alpha_combiner, "float alpha_factor = 1.0 - ctexture1.a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown writeGLSLAlphaFactor : %x", factor);
}
}
FX_ENTRY void FX_CALL
grAlphaCombine(
GrCombineFunction_t function, GrCombineFactor_t factor,
GrCombineLocal_t local, GrCombineOther_t other,
FxBool invert
)
{
WriteTrace(TraceResolution, TraceDebug, "function: %d factor: %d local: %d other: %d invert: %d", function, factor, local, other, invert);
static int last_function = 0;
static int last_factor = 0;
static int last_local = 0;
static int last_other = 0;
if (last_function == function && last_factor == factor &&
last_local == local && last_other == other && first_alpha == 0 && !a_combiner_ext) return;
first_alpha = 0;
a_combiner_ext = 0;
last_function = function;
last_factor = factor;
last_local = local;
last_other = other;
if (invert) WriteTrace(TraceGlitch, TraceWarning, "inverted result");
alpha_combiner_key = function | (factor << 4) | (local << 8) | (other << 10);
chroma_other_alpha = other;
strcpy(fragment_shader_alpha_combiner, "");
switch (function)
{
case GR_COMBINE_FUNCTION_ZERO:
strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = 0.0; \n");
break;
case GR_COMBINE_FUNCTION_LOCAL:
writeGLSLAlphaLocal(local);
strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_local; \n");
break;
case GR_COMBINE_FUNCTION_LOCAL_ALPHA:
writeGLSLAlphaLocal(local);
strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_local; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER:
writeGLSLAlphaOther(other);
writeGLSLAlphaFactor(factor, local, 1, other, 0);
strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * alpha_other; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL:
writeGLSLAlphaLocal(local);
writeGLSLAlphaOther(other);
writeGLSLAlphaFactor(factor, local, 0, other, 0);
strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * alpha_other + alpha_local; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL_ALPHA:
writeGLSLAlphaLocal(local);
writeGLSLAlphaOther(other);
writeGLSLAlphaFactor(factor, local, 0, other, 0);
strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * alpha_other + alpha_local; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL:
writeGLSLAlphaLocal(local);
writeGLSLAlphaOther(other);
writeGLSLAlphaFactor(factor, local, 0, other, 0);
strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * (alpha_other - alpha_local); \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL:
writeGLSLAlphaLocal(local);
writeGLSLAlphaOther(other);
writeGLSLAlphaFactor(factor, local, 0, other, 0);
strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * (alpha_other - alpha_local) + alpha_local; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL_ALPHA:
writeGLSLAlphaLocal(local);
writeGLSLAlphaOther(other);
writeGLSLAlphaFactor(factor, local, 0, other, 0);
strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * (alpha_other - alpha_local) + alpha_local; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL:
writeGLSLAlphaLocal(local);
writeGLSLAlphaFactor(factor, local, 0, other, 1);
strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * (-alpha_local) + alpha_local; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL_ALPHA:
writeGLSLAlphaLocal(local);
writeGLSLAlphaFactor(factor, local, 0, other, 1);
strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * (-alpha_local) + alpha_local; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown function : %x", function);
}
//compile_shader();
need_to_compile = 1;
}
void writeGLSLTextureColorFactor(int num_tex, int factor)
{
switch (factor)
{
case GR_COMBINE_FACTOR_ZERO:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(0.0); \n");
break;
case GR_COMBINE_FACTOR_LOCAL:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 texture0_color_factor = readtex0; \n");
else
strcat(fragment_shader_texture1, "vec4 texture1_color_factor = readtex1; \n");
break;
case GR_COMBINE_FACTOR_OTHER_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(ctexture0.a); \n");
break;
case GR_COMBINE_FACTOR_LOCAL_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(readtex0.a); \n");
else
strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(readtex1.a); \n");
break;
case GR_COMBINE_FACTOR_DETAIL_FACTOR:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(lambda); \n");
else
strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(lambda); \n");
break;
case GR_COMBINE_FACTOR_ONE:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(1.0); \n");
else
strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(1.0); \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(1.0) - readtex0; \n");
else
strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(1.0) - readtex1; \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_OTHER_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(1.0) - vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(1.0) - vec4(ctexture0.a); \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(1.0) - vec4(readtex0.a); \n");
else
strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(1.0) - vec4(readtex1.a); \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_DETAIL_FACTOR:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(1.0) - vec4(lambda); \n");
else
strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(1.0) - vec4(lambda); \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown writeGLSLTextureColorFactor : %x", factor);
}
}
void writeGLSLTextureAlphaFactor(int num_tex, int factor)
{
switch (factor)
{
case GR_COMBINE_FACTOR_ZERO:
if (num_tex == 0)
strcat(fragment_shader_texture0, "float texture0_alpha_factor = 0.0; \n");
else
strcat(fragment_shader_texture1, "float texture1_alpha_factor = 0.0; \n");
break;
case GR_COMBINE_FACTOR_LOCAL:
if (num_tex == 0)
strcat(fragment_shader_texture0, "float texture0_alpha_factor = readtex0.a; \n");
else
strcat(fragment_shader_texture1, "float texture1_alpha_factor = readtex1.a; \n");
break;
case GR_COMBINE_FACTOR_OTHER_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "float texture0_alpha_factor = 0.0; \n");
else
strcat(fragment_shader_texture1, "float texture1_alpha_factor = ctexture0.a; \n");
break;
case GR_COMBINE_FACTOR_LOCAL_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "float texture0_alpha_factor = readtex0.a; \n");
else
strcat(fragment_shader_texture1, "float texture1_alpha_factor = readtex1.a; \n");
break;
case GR_COMBINE_FACTOR_DETAIL_FACTOR:
if (num_tex == 0)
strcat(fragment_shader_texture0, "float texture0_alpha_factor = lambda; \n");
else
strcat(fragment_shader_texture1, "float texture1_alpha_factor = lambda; \n");
break;
case GR_COMBINE_FACTOR_ONE:
if (num_tex == 0)
strcat(fragment_shader_texture0, "float texture0_alpha_factor = 1.0; \n");
else
strcat(fragment_shader_texture1, "float texture1_alpha_factor = 1.0; \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL:
if (num_tex == 0)
strcat(fragment_shader_texture0, "float texture0_alpha_factor = 1.0 - readtex0.a; \n");
else
strcat(fragment_shader_texture1, "float texture1_alpha_factor = 1.0 - readtex1.a; \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_OTHER_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "float texture0_alpha_factor = 1.0 - 0.0; \n");
else
strcat(fragment_shader_texture1, "float texture1_alpha_factor = 1.0 - ctexture0.a; \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "float texture0_alpha_factor = 1.0 - readtex0.a; \n");
else
strcat(fragment_shader_texture1, "float texture1_alpha_factor = 1.0 - readtex1.a; \n");
break;
case GR_COMBINE_FACTOR_ONE_MINUS_DETAIL_FACTOR:
if (num_tex == 0)
strcat(fragment_shader_texture0, "float texture0_alpha_factor = 1.0 - lambda; \n");
else
strcat(fragment_shader_texture1, "float texture1_alpha_factor = 1.0 - lambda; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown writeGLSLTextureAlphaFactor : %x", factor);
}
}
FX_ENTRY void FX_CALL
grTexCombine(
GrChipID_t tmu,
GrCombineFunction_t rgb_function,
GrCombineFactor_t rgb_factor,
GrCombineFunction_t alpha_function,
GrCombineFactor_t alpha_factor,
FxBool rgb_invert,
FxBool alpha_invert
)
{
WriteTrace(TraceResolution, TraceDebug, "tmu: %d rgb_function: %d rgb_factor: %d alpha_function: %d alpha_factor: %d rgb_invert: %d alpha_invert: %d", tmu, rgb_function, rgb_factor, alpha_function, alpha_factor, rgb_invert, alpha_invert);
int num_tex;
if (tmu == GR_TMU0) num_tex = 1;
else num_tex = 0;
if (num_tex == 0)
{
static int last_function = 0;
static int last_factor = 0;
static int last_afunction = 0;
static int last_afactor = 0;
static int last_rgb_invert = 0;
if (last_function == rgb_function && last_factor == rgb_factor &&
last_afunction == alpha_function && last_afactor == alpha_factor &&
last_rgb_invert == rgb_invert && first_texture0 == 0 && !tex0_combiner_ext) return;
first_texture0 = 0;
tex0_combiner_ext = 0;
last_function = rgb_function;
last_factor = rgb_factor;
last_afunction = alpha_function;
last_afactor = alpha_factor;
last_rgb_invert = rgb_invert;
texture0_combiner_key = rgb_function | (rgb_factor << 4) |
(alpha_function << 8) | (alpha_factor << 12) |
(rgb_invert << 16);
texture0_combinera_key = 0;
strcpy(fragment_shader_texture0, "");
}
else
{
static int last_function = 0;
static int last_factor = 0;
static int last_afunction = 0;
static int last_afactor = 0;
static int last_rgb_invert = 0;
if (last_function == rgb_function && last_factor == rgb_factor &&
last_afunction == alpha_function && last_afactor == alpha_factor &&
last_rgb_invert == rgb_invert && first_texture1 == 0 && !tex1_combiner_ext) return;
first_texture1 = 0;
tex1_combiner_ext = 0;
last_function = rgb_function;
last_factor = rgb_factor;
last_afunction = alpha_function;
last_afactor = alpha_factor;
last_rgb_invert = rgb_invert;
texture1_combiner_key = rgb_function | (rgb_factor << 4) |
(alpha_function << 8) | (alpha_factor << 12) |
(rgb_invert << 16);
texture1_combinera_key = 0;
strcpy(fragment_shader_texture1, "");
}
switch (rgb_function)
{
case GR_COMBINE_FUNCTION_ZERO:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctexture0 = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctexture1 = vec4(0.0); \n");
break;
case GR_COMBINE_FUNCTION_LOCAL:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctexture0 = readtex0; \n");
else
strcat(fragment_shader_texture1, "vec4 ctexture1 = readtex1; \n");
break;
case GR_COMBINE_FUNCTION_LOCAL_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctexture0 = vec4(readtex0.a); \n");
else
strcat(fragment_shader_texture1, "vec4 ctexture1 = vec4(readtex1.a); \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER:
writeGLSLTextureColorFactor(num_tex, rgb_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * ctexture0; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL:
writeGLSLTextureColorFactor(num_tex, rgb_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * vec4(0.0) + readtex0; \n");
else
strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * ctexture0 + readtex1; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL_ALPHA:
writeGLSLTextureColorFactor(num_tex, rgb_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * vec4(0.0) + vec4(readtex0.a); \n");
else
strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * ctexture0 + vec4(readtex1.a); \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL:
writeGLSLTextureColorFactor(num_tex, rgb_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * (vec4(0.0) - readtex0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * (ctexture0 - readtex1); \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL:
writeGLSLTextureColorFactor(num_tex, rgb_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * (vec4(0.0) - readtex0) + readtex0; \n");
else
strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * (ctexture0 - readtex1) + readtex1; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL_ALPHA:
writeGLSLTextureColorFactor(num_tex, rgb_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * (vec4(0.0) - readtex0) + vec4(readtex0.a); \n");
else
strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * (ctexture0 - readtex1) + vec4(readtex1.a); \n");
break;
case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL:
writeGLSLTextureColorFactor(num_tex, rgb_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * (-readtex0) + readtex0; \n");
else
strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * (-readtex1) + readtex1; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL_ALPHA:
writeGLSLTextureColorFactor(num_tex, rgb_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * (-readtex0) + vec4(readtex0.a); \n");
else
strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * (-readtex1) + vec4(readtex1.a); \n");
break;
default:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctexture0 = readtex0; \n");
else
strcat(fragment_shader_texture1, "vec4 ctexture1 = readtex1; \n");
WriteTrace(TraceGlitch, TraceWarning, "grTextCombine : unknown rgb function : %x", rgb_function);
}
if (rgb_invert)
{
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0 = vec4(1.0) - ctexture0; \n");
else
strcat(fragment_shader_texture1, "ctexture1 = vec4(1.0) - ctexture1; \n");
}
switch (alpha_function)
{
case GR_COMBINE_FACTOR_ZERO:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0.a = 0.0; \n");
else
strcat(fragment_shader_texture1, "ctexture1.a = 0.0; \n");
break;
case GR_COMBINE_FUNCTION_LOCAL:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0.a = readtex0.a; \n");
else
strcat(fragment_shader_texture1, "ctexture1.a = readtex1.a; \n");
break;
case GR_COMBINE_FUNCTION_LOCAL_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0.a = readtex0.a; \n");
else
strcat(fragment_shader_texture1, "ctexture1.a = readtex1.a; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER:
writeGLSLTextureAlphaFactor(num_tex, alpha_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * 0.0; \n");
else
strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * ctexture0.a; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL:
writeGLSLTextureAlphaFactor(num_tex, alpha_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * 0.0 + readtex0.a; \n");
else
strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * ctexture0.a + readtex1.a; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL_ALPHA:
writeGLSLTextureAlphaFactor(num_tex, alpha_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * 0.0 + readtex0.a; \n");
else
strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * ctexture0.a + readtex1.a; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL:
writeGLSLTextureAlphaFactor(num_tex, alpha_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * (0.0 - readtex0.a); \n");
else
strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * (ctexture0.a - readtex1.a); \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL:
writeGLSLTextureAlphaFactor(num_tex, alpha_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * (0.0 - readtex0.a) + readtex0.a; \n");
else
strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * (ctexture0.a - readtex1.a) + readtex1.a; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL_ALPHA:
writeGLSLTextureAlphaFactor(num_tex, alpha_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * (0.0 - readtex0.a) + readtex0.a; \n");
else
strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * (ctexture0.a - readtex1.a) + readtex1.a; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL:
writeGLSLTextureAlphaFactor(num_tex, alpha_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * (-readtex0.a) + readtex0.a; \n");
else
strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * (-readtex1.a) + readtex1.a; \n");
break;
case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL_ALPHA:
writeGLSLTextureAlphaFactor(num_tex, alpha_factor);
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * (-readtex0.a) + readtex0.a; \n");
else
strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * (-readtex1.a) + readtex1.a; \n");
break;
default:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0.a = readtex0.a; \n");
else
strcat(fragment_shader_texture1, "ctexture1.a = ctexture0.a; \n");
WriteTrace(TraceGlitch, TraceWarning, "grTextCombine : unknown alpha function : %x", alpha_function);
}
if (alpha_invert)
{
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0.a = 1.0 - ctexture0.a; \n");
else
strcat(fragment_shader_texture1, "ctexture1.a = 1.0 - ctexture1.a; \n");
}
need_to_compile = 1;
}
FX_ENTRY void FX_CALL
grAlphaBlendFunction(
GrAlphaBlendFnc_t rgb_sf, GrAlphaBlendFnc_t rgb_df,
GrAlphaBlendFnc_t alpha_sf, GrAlphaBlendFnc_t alpha_df
)
{
int sfactorRGB = 0, dfactorRGB = 0, sfactorAlpha = 0, dfactorAlpha = 0;
WriteTrace(TraceResolution, TraceDebug, "rgb_sf: %d rgb_df: %d alpha_sf: %d alpha_df: %d", rgb_sf, rgb_df, alpha_sf, alpha_df);
switch (rgb_sf)
{
case GR_BLEND_ZERO:
sfactorRGB = GL_ZERO;
break;
case GR_BLEND_SRC_ALPHA:
sfactorRGB = GL_SRC_ALPHA;
break;
case GR_BLEND_ONE:
sfactorRGB = GL_ONE;
break;
case GR_BLEND_ONE_MINUS_SRC_ALPHA:
sfactorRGB = GL_ONE_MINUS_SRC_ALPHA;
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grAlphaBlendFunction : rgb_sf = %x", rgb_sf);
}
switch (rgb_df)
{
case GR_BLEND_ZERO:
dfactorRGB = GL_ZERO;
break;
case GR_BLEND_SRC_ALPHA:
dfactorRGB = GL_SRC_ALPHA;
break;
case GR_BLEND_ONE:
dfactorRGB = GL_ONE;
break;
case GR_BLEND_ONE_MINUS_SRC_ALPHA:
dfactorRGB = GL_ONE_MINUS_SRC_ALPHA;
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grAlphaBlendFunction : rgb_df = %x", rgb_df);
}
switch (alpha_sf)
{
case GR_BLEND_ZERO:
sfactorAlpha = GL_ZERO;
break;
case GR_BLEND_ONE:
sfactorAlpha = GL_ONE;
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grAlphaBlendFunction : alpha_sf = %x", alpha_sf);
}
switch (alpha_df)
{
case GR_BLEND_ZERO:
dfactorAlpha = GL_ZERO;
break;
case GR_BLEND_ONE:
dfactorAlpha = GL_ONE;
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grAlphaBlendFunction : alpha_df = %x", alpha_df);
}
glEnable(GL_BLEND);
if (blend_func_separate_support)
glBlendFuncSeparateEXT(sfactorRGB, dfactorRGB, sfactorAlpha, dfactorAlpha);
else
glBlendFunc(sfactorRGB, dfactorRGB);
grDisplayGLError("grAlphaBlendFunction");
}
FX_ENTRY void FX_CALL
grAlphaTestReferenceValue(GrAlpha_t value)
{
WriteTrace(TraceResolution, TraceDebug, "value: %d", value);
alpha_ref = value;
grAlphaTestFunction(alpha_func);
}
FX_ENTRY void FX_CALL
grAlphaTestFunction(GrCmpFnc_t function)
{
WriteTrace(TraceResolution, TraceDebug, "function: %d", function);
alpha_func = function;
switch (function)
{
case GR_CMP_GREATER:
glAlphaFunc(GL_GREATER, alpha_ref / 255.0f);
break;
case GR_CMP_GEQUAL:
glAlphaFunc(GL_GEQUAL, alpha_ref / 255.0f);
break;
case GR_CMP_ALWAYS:
glAlphaFunc(GL_ALWAYS, alpha_ref / 255.0f);
glDisable(GL_ALPHA_TEST);
grDisplayGLError("grAlphaTestFunction :: GR_CMP_ALWAYS");
return;
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown function : %x", function);
}
glEnable(GL_ALPHA_TEST);
grDisplayGLError("grAlphaTestFunction");
}
// fog
FX_ENTRY void FX_CALL
grFogMode(GrFogMode_t mode)
{
WriteTrace(TraceResolution, TraceDebug, "mode: %d", mode);
switch (mode)
{
case GR_FOG_DISABLE:
glDisable(GL_FOG);
fog_enabled = 0;
break;
case GR_FOG_WITH_TABLE_ON_Q:
glEnable(GL_FOG);
glFogi(GL_FOG_COORDINATE_SOURCE_EXT, GL_FOG_COORDINATE_EXT);
fog_enabled = 1;
break;
case GR_FOG_WITH_TABLE_ON_FOGCOORD_EXT:
glEnable(GL_FOG);
glFogi(GL_FOG_COORDINATE_SOURCE_EXT, GL_FOG_COORDINATE_EXT);
fog_enabled = 2;
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown mode : %x", mode);
}
need_to_compile = 1;
grDisplayGLError("grFogMode");
}
FX_ENTRY float FX_CALL
guFogTableIndexToW(int i)
{
WriteTrace(TraceResolution, TraceDebug, "i: %d", i);
return (float)(pow(2.0, 3.0 + (double)(i >> 2)) / (8 - (i & 3)));
}
FX_ENTRY void FX_CALL
guFogGenerateLinear(GrFog_t * /*fogtable*/,
float nearZ, float farZ)
{
WriteTrace(TraceResolution, TraceDebug, "nearZ: %f farZ: %f", nearZ, farZ);
glFogi(GL_FOG_MODE, GL_LINEAR);
glFogi(GL_FOG_COORDINATE_SOURCE_EXT, GL_FOG_COORDINATE_EXT);
glFogf(GL_FOG_START, nearZ / 255.0f);
glFogf(GL_FOG_END, farZ / 255.0f);
grDisplayGLError("guFogGenerateLinear");
}
FX_ENTRY void FX_CALL
grFogTable(const GrFog_t /*ft */[])
{
WriteTrace(TraceResolution, TraceDebug, "-");
}
FX_ENTRY void FX_CALL
grFogColorValue(GrColor_t fogcolor)
{
float color[4];
WriteTrace(TraceResolution, TraceDebug, "fogcolor: %x", fogcolor);
switch (lfb_color_fmt)
{
case GR_COLORFORMAT_ARGB:
color[3] = ((fogcolor >> 24) & 0xFF) / 255.0f;
color[0] = ((fogcolor >> 16) & 0xFF) / 255.0f;
color[1] = ((fogcolor >> 8) & 0xFF) / 255.0f;
color[2] = (fogcolor & 0xFF) / 255.0f;
break;
case GR_COLORFORMAT_RGBA:
color[0] = ((fogcolor >> 24) & 0xFF) / 255.0f;
color[1] = ((fogcolor >> 16) & 0xFF) / 255.0f;
color[2] = ((fogcolor >> 8) & 0xFF) / 255.0f;
color[3] = (fogcolor & 0xFF) / 255.0f;
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown color format : %x", lfb_color_fmt);
}
glFogfv(GL_FOG_COLOR, color);
grDisplayGLError("glFogfv");
}
// chroma
FX_ENTRY void FX_CALL
grChromakeyMode(GrChromakeyMode_t mode)
{
WriteTrace(TraceResolution, TraceDebug, "mode: %d", mode);
switch (mode)
{
case GR_CHROMAKEY_DISABLE:
chroma_enabled = 0;
break;
case GR_CHROMAKEY_ENABLE:
chroma_enabled = 1;
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "unknown mode : %x", mode);
}
need_to_compile = 1;
}
FX_ENTRY void FX_CALL
grChromakeyValue(GrColor_t value)
{
WriteTrace(TraceResolution, TraceDebug, "value: %d", value);
int chroma_color_location;
switch (lfb_color_fmt)
{
case GR_COLORFORMAT_ARGB:
chroma_color[3] = 1.0;//((value >> 24) & 0xFF) / 255.0f;
chroma_color[0] = ((value >> 16) & 0xFF) / 255.0f;
chroma_color[1] = ((value >> 8) & 0xFF) / 255.0f;
chroma_color[2] = (value & 0xFF) / 255.0f;
break;
case GR_COLORFORMAT_RGBA:
chroma_color[0] = ((value >> 24) & 0xFF) / 255.0f;
chroma_color[1] = ((value >> 16) & 0xFF) / 255.0f;
chroma_color[2] = ((value >> 8) & 0xFF) / 255.0f;
chroma_color[3] = 1.0;//(value & 0xFF) / 255.0f;
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grChromakeyValue: unknown color format : %x", lfb_color_fmt);
}
chroma_color_location = glGetUniformLocationARB(program_object, "chroma_color");
glUniform4fARB(chroma_color_location, chroma_color[0], chroma_color[1],
chroma_color[2], chroma_color[3]);
grDisplayGLError("grChromakeyValue");
}
static void setPattern()
{
int i;
GLubyte stip[32 * 4];
for (i = 0; i < 32; i++)
{
unsigned int val = rand() << 17 | (rand() & 1) << 16 | rand() << 1 | rand() & 1;
stip[i * 4 + 0] = (val >> 24) & 0xFF;
stip[i * 4 + 1] = (val >> 16) & 0xFF;
stip[i * 4 + 2] = (val >> 8) & 0xFF;
stip[i * 4 + 3] = val & 0xFF;
}
GLubyte texture[32 * 32 * 4];
for (i = 0; i < 32; i++)
{
int j;
for (j = 0; j < 4; j++)
{
texture[(i * 32 + j * 8 + 0) * 4 + 3] = ((stip[i * 4 + j] >> 7) & 1) ? 255 : 0;
texture[(i * 32 + j * 8 + 1) * 4 + 3] = ((stip[i * 4 + j] >> 6) & 1) ? 255 : 0;
texture[(i * 32 + j * 8 + 2) * 4 + 3] = ((stip[i * 4 + j] >> 5) & 1) ? 255 : 0;
texture[(i * 32 + j * 8 + 3) * 4 + 3] = ((stip[i * 4 + j] >> 4) & 1) ? 255 : 0;
texture[(i * 32 + j * 8 + 4) * 4 + 3] = ((stip[i * 4 + j] >> 3) & 1) ? 255 : 0;
texture[(i * 32 + j * 8 + 5) * 4 + 3] = ((stip[i * 4 + j] >> 2) & 1) ? 255 : 0;
texture[(i * 32 + j * 8 + 6) * 4 + 3] = ((stip[i * 4 + j] >> 1) & 1) ? 255 : 0;
texture[(i * 32 + j * 8 + 7) * 4 + 3] = ((stip[i * 4 + j] >> 0) & 1) ? 255 : 0;
}
}
glActiveTextureARB(GL_TEXTURE2_ARB);
glEnable(GL_TEXTURE_2D);
glBindTexture(GL_TEXTURE_2D, 33 * 1024 * 1024);
glTexImage2D(GL_TEXTURE_2D, 0, 4, 32, 32, 0, GL_RGBA, GL_UNSIGNED_BYTE, texture);
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
glDisable(GL_TEXTURE_2D);
grDisplayGLError("setPattern");
}
FX_ENTRY void FX_CALL
grStipplePattern(
GrStipplePattern_t stipple)
{
WriteTrace(TraceResolution, TraceDebug, "value: %x", stipple);
srand(stipple);
setPattern();
}
FX_ENTRY void FX_CALL
grStippleMode(GrStippleMode_t mode)
{
WriteTrace(TraceResolution, TraceDebug, "mode: %d", mode);
switch (mode)
{
case GR_STIPPLE_DISABLE:
dither_enabled = 0;
glActiveTextureARB(GL_TEXTURE2_ARB);
glDisable(GL_TEXTURE_2D);
break;
case GR_STIPPLE_PATTERN:
setPattern();
dither_enabled = 1;
glActiveTextureARB(GL_TEXTURE2_ARB);
glEnable(GL_TEXTURE_2D);
break;
case GR_STIPPLE_ROTATE:
setPattern();
dither_enabled = 1;
glActiveTextureARB(GL_TEXTURE2_ARB);
glEnable(GL_TEXTURE_2D);
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grStippleMode:%x", mode);
}
need_to_compile = 1;
grDisplayGLError("grStippleMode");
}
FX_ENTRY void FX_CALL
grColorCombineExt(GrCCUColor_t a, GrCombineMode_t a_mode,
GrCCUColor_t b, GrCombineMode_t b_mode,
GrCCUColor_t c, FxBool c_invert,
GrCCUColor_t d, FxBool d_invert,
FxU32 shift, FxBool invert)
{
WriteTrace(TraceResolution, TraceDebug, "a: %d a_mode: %d b: %d b_mode: %d c: %d c_invert: %d d: %d d_invert: %d shift: %d invert: %d", a, a_mode, b, b_mode, c, c_invert, d, d_invert, shift, invert);
if (invert) WriteTrace(TraceGlitch, TraceWarning, "grColorCombineExt : inverted result");
if (shift) WriteTrace(TraceGlitch, TraceWarning, "grColorCombineExt : shift = %d", shift);
color_combiner_key = 0x80000000 | (a & 0x1F) | ((a_mode & 3) << 5) |
((b & 0x1F) << 7) | ((b_mode & 3) << 12) |
((c & 0x1F) << 14) | ((c_invert & 1) << 19) |
((d & 0x1F) << 20) | ((d_invert & 1) << 25);
c_combiner_ext = 1;
strcpy(fragment_shader_color_combiner, "");
switch (a)
{
case GR_CMBX_ZERO:
strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(0.0); \n");
break;
case GR_CMBX_TEXTURE_ALPHA:
strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(ctexture1.a); \n");
break;
case GR_CMBX_CONSTANT_ALPHA:
strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(constant_color.a); \n");
break;
case GR_CMBX_CONSTANT_COLOR:
strcat(fragment_shader_color_combiner, "vec4 cs_a = constant_color; \n");
break;
case GR_CMBX_ITALPHA:
strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(gl_Color.a); \n");
break;
case GR_CMBX_ITRGB:
strcat(fragment_shader_color_combiner, "vec4 cs_a = gl_Color; \n");
break;
case GR_CMBX_TEXTURE_RGB:
strcat(fragment_shader_color_combiner, "vec4 cs_a = ctexture1; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grColorCombineExt : a = %x", a);
strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(0.0); \n");
}
switch (a_mode)
{
case GR_FUNC_MODE_ZERO:
strcat(fragment_shader_color_combiner, "vec4 c_a = vec4(0.0); \n");
break;
case GR_FUNC_MODE_X:
strcat(fragment_shader_color_combiner, "vec4 c_a = cs_a; \n");
break;
case GR_FUNC_MODE_ONE_MINUS_X:
strcat(fragment_shader_color_combiner, "vec4 c_a = vec4(1.0) - cs_a; \n");
break;
case GR_FUNC_MODE_NEGATIVE_X:
strcat(fragment_shader_color_combiner, "vec4 c_a = -cs_a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "a_mode = %x", a_mode);
strcat(fragment_shader_color_combiner, "vec4 c_a = vec4(0.0); \n");
}
switch (b)
{
case GR_CMBX_ZERO:
strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(0.0); \n");
break;
case GR_CMBX_TEXTURE_ALPHA:
strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(ctexture1.a); \n");
break;
case GR_CMBX_CONSTANT_ALPHA:
strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(constant_color.a); \n");
break;
case GR_CMBX_CONSTANT_COLOR:
strcat(fragment_shader_color_combiner, "vec4 cs_b = constant_color; \n");
break;
case GR_CMBX_ITALPHA:
strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(gl_Color.a); \n");
break;
case GR_CMBX_ITRGB:
strcat(fragment_shader_color_combiner, "vec4 cs_b = gl_Color; \n");
break;
case GR_CMBX_TEXTURE_RGB:
strcat(fragment_shader_color_combiner, "vec4 cs_b = ctexture1; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grColorCombineExt : b = %x", b);
strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(0.0); \n");
}
switch (b_mode)
{
case GR_FUNC_MODE_ZERO:
strcat(fragment_shader_color_combiner, "vec4 c_b = vec4(0.0); \n");
break;
case GR_FUNC_MODE_X:
strcat(fragment_shader_color_combiner, "vec4 c_b = cs_b; \n");
break;
case GR_FUNC_MODE_ONE_MINUS_X:
strcat(fragment_shader_color_combiner, "vec4 c_b = vec4(1.0) - cs_b; \n");
break;
case GR_FUNC_MODE_NEGATIVE_X:
strcat(fragment_shader_color_combiner, "vec4 c_b = -cs_b; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grColorCombineExt : b_mode = %x", b_mode);
strcat(fragment_shader_color_combiner, "vec4 c_b = vec4(0.0); \n");
}
switch (c)
{
case GR_CMBX_ZERO:
strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(0.0); \n");
break;
case GR_CMBX_TEXTURE_ALPHA:
strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(ctexture1.a); \n");
break;
case GR_CMBX_ALOCAL:
strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(c_b.a); \n");
break;
case GR_CMBX_AOTHER:
strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(c_a.a); \n");
break;
case GR_CMBX_B:
strcat(fragment_shader_color_combiner, "vec4 c_c = cs_b; \n");
break;
case GR_CMBX_CONSTANT_ALPHA:
strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(constant_color.a); \n");
break;
case GR_CMBX_CONSTANT_COLOR:
strcat(fragment_shader_color_combiner, "vec4 c_c = constant_color; \n");
break;
case GR_CMBX_ITALPHA:
strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(gl_Color.a); \n");
break;
case GR_CMBX_ITRGB:
strcat(fragment_shader_color_combiner, "vec4 c_c = gl_Color; \n");
break;
case GR_CMBX_TEXTURE_RGB:
strcat(fragment_shader_color_combiner, "vec4 c_c = ctexture1; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grColorCombineExt : c = %x", c);
strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(0.0); \n");
}
if (c_invert)
strcat(fragment_shader_color_combiner, "c_c = vec4(1.0) - c_c; \n");
switch (d)
{
case GR_CMBX_ZERO:
strcat(fragment_shader_color_combiner, "vec4 c_d = vec4(0.0); \n");
break;
case GR_CMBX_ALOCAL:
strcat(fragment_shader_color_combiner, "vec4 c_d = vec4(c_b.a); \n");
break;
case GR_CMBX_B:
strcat(fragment_shader_color_combiner, "vec4 c_d = cs_b; \n");
break;
case GR_CMBX_TEXTURE_RGB:
strcat(fragment_shader_color_combiner, "vec4 c_d = ctexture1; \n");
break;
case GR_CMBX_ITRGB:
strcat(fragment_shader_color_combiner, "vec4 c_d = gl_Color; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grColorCombineExt : d = %x", d);
strcat(fragment_shader_color_combiner, "vec4 c_d = vec4(0.0); \n");
}
if (d_invert)
strcat(fragment_shader_color_combiner, "c_d = vec4(1.0) - c_d; \n");
strcat(fragment_shader_color_combiner, "gl_FragColor = (c_a + c_b) * c_c + c_d; \n");
need_to_compile = 1;
}
FX_ENTRY void FX_CALL
grAlphaCombineExt(GrACUColor_t a, GrCombineMode_t a_mode,
GrACUColor_t b, GrCombineMode_t b_mode,
GrACUColor_t c, FxBool c_invert,
GrACUColor_t d, FxBool d_invert,
FxU32 shift, FxBool invert)
{
WriteTrace(TraceResolution, TraceDebug, "a: %d a_mode: %d b: %d b_mode: %d c: %d c_invert: %d d: %d d_invert: %d shift: %d invert: %d", a, a_mode, b, b_mode, c, c_invert, d, d_invert, shift, invert);
if (invert) WriteTrace(TraceGlitch, TraceWarning, "grAlphaCombineExt : inverted result");
if (shift) WriteTrace(TraceGlitch, TraceWarning, "grAlphaCombineExt : shift = %d", shift);
alpha_combiner_key = 0x80000000 | (a & 0x1F) | ((a_mode & 3) << 5) |
((b & 0x1F) << 7) | ((b_mode & 3) << 12) |
((c & 0x1F) << 14) | ((c_invert & 1) << 19) |
((d & 0x1F) << 20) | ((d_invert & 1) << 25);
a_combiner_ext = 1;
strcpy(fragment_shader_alpha_combiner, "");
switch (a)
{
case GR_CMBX_ZERO:
strcat(fragment_shader_alpha_combiner, "float as_a = 0.0; \n");
break;
case GR_CMBX_TEXTURE_ALPHA:
strcat(fragment_shader_alpha_combiner, "float as_a = ctexture1.a; \n");
break;
case GR_CMBX_CONSTANT_ALPHA:
strcat(fragment_shader_alpha_combiner, "float as_a = constant_color.a; \n");
break;
case GR_CMBX_ITALPHA:
strcat(fragment_shader_alpha_combiner, "float as_a = gl_Color.a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grAlphaCombineExt : a = %x", a);
strcat(fragment_shader_alpha_combiner, "float as_a = 0.0; \n");
}
switch (a_mode)
{
case GR_FUNC_MODE_ZERO:
strcat(fragment_shader_alpha_combiner, "float a_a = 0.0; \n");
break;
case GR_FUNC_MODE_X:
strcat(fragment_shader_alpha_combiner, "float a_a = as_a; \n");
break;
case GR_FUNC_MODE_ONE_MINUS_X:
strcat(fragment_shader_alpha_combiner, "float a_a = 1.0 - as_a; \n");
break;
case GR_FUNC_MODE_NEGATIVE_X:
strcat(fragment_shader_alpha_combiner, "float a_a = -as_a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grAlphaCombineExt : a_mode = %x", a_mode);
strcat(fragment_shader_alpha_combiner, "float a_a = 0.0; \n");
}
switch (b)
{
case GR_CMBX_ZERO:
strcat(fragment_shader_alpha_combiner, "float as_b = 0.0; \n");
break;
case GR_CMBX_TEXTURE_ALPHA:
strcat(fragment_shader_alpha_combiner, "float as_b = ctexture1.a; \n");
break;
case GR_CMBX_CONSTANT_ALPHA:
strcat(fragment_shader_alpha_combiner, "float as_b = constant_color.a; \n");
break;
case GR_CMBX_ITALPHA:
strcat(fragment_shader_alpha_combiner, "float as_b = gl_Color.a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grAlphaCombineExt : b = %x", b);
strcat(fragment_shader_alpha_combiner, "float as_b = 0.0; \n");
}
switch (b_mode)
{
case GR_FUNC_MODE_ZERO:
strcat(fragment_shader_alpha_combiner, "float a_b = 0.0; \n");
break;
case GR_FUNC_MODE_X:
strcat(fragment_shader_alpha_combiner, "float a_b = as_b; \n");
break;
case GR_FUNC_MODE_ONE_MINUS_X:
strcat(fragment_shader_alpha_combiner, "float a_b = 1.0 - as_b; \n");
break;
case GR_FUNC_MODE_NEGATIVE_X:
strcat(fragment_shader_alpha_combiner, "float a_b = -as_b; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grAlphaCombineExt : b_mode = %x", b_mode);
strcat(fragment_shader_alpha_combiner, "float a_b = 0.0; \n");
}
switch (c)
{
case GR_CMBX_ZERO:
strcat(fragment_shader_alpha_combiner, "float a_c = 0.0; \n");
break;
case GR_CMBX_TEXTURE_ALPHA:
strcat(fragment_shader_alpha_combiner, "float a_c = ctexture1.a; \n");
break;
case GR_CMBX_ALOCAL:
strcat(fragment_shader_alpha_combiner, "float a_c = as_b; \n");
break;
case GR_CMBX_AOTHER:
strcat(fragment_shader_alpha_combiner, "float a_c = as_a; \n");
break;
case GR_CMBX_B:
strcat(fragment_shader_alpha_combiner, "float a_c = as_b; \n");
break;
case GR_CMBX_CONSTANT_ALPHA:
strcat(fragment_shader_alpha_combiner, "float a_c = constant_color.a; \n");
break;
case GR_CMBX_ITALPHA:
strcat(fragment_shader_alpha_combiner, "float a_c = gl_Color.a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grAlphaCombineExt : c = %x", c);
strcat(fragment_shader_alpha_combiner, "float a_c = 0.0; \n");
}
if (c_invert)
strcat(fragment_shader_alpha_combiner, "a_c = 1.0 - a_c; \n");
switch (d)
{
case GR_CMBX_ZERO:
strcat(fragment_shader_alpha_combiner, "float a_d = 0.0; \n");
break;
case GR_CMBX_TEXTURE_ALPHA:
strcat(fragment_shader_alpha_combiner, "float a_d = ctexture1.a; \n");
break;
case GR_CMBX_ALOCAL:
strcat(fragment_shader_alpha_combiner, "float a_d = as_b; \n");
break;
case GR_CMBX_B:
strcat(fragment_shader_alpha_combiner, "float a_d = as_b; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grAlphaCombineExt : d = %x", d);
strcat(fragment_shader_alpha_combiner, "float a_d = 0.0; \n");
}
if (d_invert)
strcat(fragment_shader_alpha_combiner, "a_d = 1.0 - a_d; \n");
strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = (a_a + a_b) * a_c + a_d; \n");
need_to_compile = 1;
}
FX_ENTRY void FX_CALL
grTexColorCombineExt(GrChipID_t tmu,
GrTCCUColor_t a, GrCombineMode_t a_mode,
GrTCCUColor_t b, GrCombineMode_t b_mode,
GrTCCUColor_t c, FxBool c_invert,
GrTCCUColor_t d, FxBool d_invert,
FxU32 shift, FxBool invert)
{
int num_tex;
WriteTrace(TraceResolution, TraceDebug, "tmu: %d a: %d a_mode: %d b: %d b_mode: %d c: %d c_invert: %d d: %d d_invert: %d shift: %d invert: %d", tmu, a, a_mode, b, b_mode, c, c_invert, d, d_invert, shift, invert);
if (invert) WriteTrace(TraceGlitch, TraceWarning, "grTexColorCombineExt : inverted result");
if (shift) WriteTrace(TraceGlitch, TraceWarning, "grTexColorCombineExt : shift = %d", shift);
if (tmu == GR_TMU0) num_tex = 1;
else num_tex = 0;
if (num_tex == 0)
{
texture0_combiner_key = 0x80000000 | (a & 0x1F) | ((a_mode & 3) << 5) |
((b & 0x1F) << 7) | ((b_mode & 3) << 12) |
((c & 0x1F) << 14) | ((c_invert & 1) << 19) |
((d & 0x1F) << 20) | ((d_invert & 1) << 25);
tex0_combiner_ext = 1;
strcpy(fragment_shader_texture0, "");
}
else
{
texture1_combiner_key = 0x80000000 | (a & 0x1F) | ((a_mode & 3) << 5) |
((b & 0x1F) << 7) | ((b_mode & 3) << 12) |
((c & 0x1F) << 14) | ((c_invert & 1) << 19) |
((d & 0x1F) << 20) | ((d_invert & 1) << 25);
tex1_combiner_ext = 1;
strcpy(fragment_shader_texture1, "");
}
switch (a)
{
case GR_CMBX_ZERO:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_a = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_a = vec4(0.0); \n");
break;
case GR_CMBX_ITALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_a = vec4(gl_Color.a); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_a = vec4(gl_Color.a); \n");
break;
case GR_CMBX_ITRGB:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_a = gl_Color; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_a = gl_Color; \n");
break;
case GR_CMBX_LOCAL_TEXTURE_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_a = vec4(readtex0.a); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_a = vec4(readtex1.a); \n");
break;
case GR_CMBX_LOCAL_TEXTURE_RGB:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_a = readtex0; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_a = readtex1; \n");
break;
case GR_CMBX_OTHER_TEXTURE_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_a = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_a = vec4(ctexture0.a); \n");
break;
case GR_CMBX_OTHER_TEXTURE_RGB:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_a = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_a = ctexture0; \n");
break;
case GR_CMBX_TMU_CCOLOR:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_a = ccolor0; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_a = ccolor1; \n");
break;
case GR_CMBX_TMU_CALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_a = vec4(ccolor0.a); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_a = vec4(ccolor1.a); \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grTexColorCombineExt : a = %x", a);
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_a = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_a = vec4(0.0); \n");
}
switch (a_mode)
{
case GR_FUNC_MODE_ZERO:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_a = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_a = vec4(0.0); \n");
break;
case GR_FUNC_MODE_X:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_a = ctex0s_a; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_a = ctex1s_a; \n");
break;
case GR_FUNC_MODE_ONE_MINUS_X:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_a = vec4(1.0) - ctex0s_a; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_a = vec4(1.0) - ctex1s_a; \n");
break;
case GR_FUNC_MODE_NEGATIVE_X:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_a = -ctex0s_a; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_a = -ctex1s_a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grTexColorCombineExt : a_mode = %x", a_mode);
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_a = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_a = vec4(0.0); \n");
}
switch (b)
{
case GR_CMBX_ZERO:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_b = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_b = vec4(0.0); \n");
break;
case GR_CMBX_ITALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_b = vec4(gl_Color.a); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_b = vec4(gl_Color.a); \n");
break;
case GR_CMBX_ITRGB:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_b = gl_Color; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_b = gl_Color; \n");
break;
case GR_CMBX_LOCAL_TEXTURE_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_b = vec4(readtex0.a); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_b = vec4(readtex1.a); \n");
break;
case GR_CMBX_LOCAL_TEXTURE_RGB:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_b = readtex0; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_b = readtex1; \n");
break;
case GR_CMBX_OTHER_TEXTURE_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_b = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_b = vec4(ctexture0.a); \n");
break;
case GR_CMBX_OTHER_TEXTURE_RGB:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_b = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_b = ctexture0; \n");
break;
case GR_CMBX_TMU_CALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_b = vec4(ccolor0.a); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_b = vec4(ccolor1.a); \n");
break;
case GR_CMBX_TMU_CCOLOR:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_b = ccolor0; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_b = ccolor1; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grTexColorCombineExt : b = %x", b);
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0s_b = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1s_b = vec4(0.0); \n");
}
switch (b_mode)
{
case GR_FUNC_MODE_ZERO:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_b = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_b = vec4(0.0); \n");
break;
case GR_FUNC_MODE_X:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_b = ctex0s_b; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_b = ctex1s_b; \n");
break;
case GR_FUNC_MODE_ONE_MINUS_X:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_b = vec4(1.0) - ctex0s_b; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_b = vec4(1.0) - ctex1s_b; \n");
break;
case GR_FUNC_MODE_NEGATIVE_X:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_b = -ctex0s_b; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_b = -ctex1s_b; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grTexColorCombineExt : b_mode = %x", b_mode);
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_b = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_b = vec4(0.0); \n");
}
switch (c)
{
case GR_CMBX_ZERO:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_c = vec4(0.0); \n");
break;
case GR_CMBX_B:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_c = ctex0s_b; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_c = ctex1s_b; \n");
break;
case GR_CMBX_DETAIL_FACTOR:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(lambda); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_c = vec4(lambda); \n");
break;
case GR_CMBX_ITRGB:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_c = gl_Color; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_c = gl_Color; \n");
break;
case GR_CMBX_ITALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(gl_Color.a); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_c = vec4(gl_Color.a); \n");
break;
case GR_CMBX_LOCAL_TEXTURE_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(readtex0.a); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_c = vec4(readtex1.a); \n");
break;
case GR_CMBX_LOCAL_TEXTURE_RGB:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_c = readtex0; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_c = readtex1; \n");
break;
case GR_CMBX_OTHER_TEXTURE_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_c = vec4(ctexture0.a); \n");
break;
case GR_CMBX_OTHER_TEXTURE_RGB:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_c = ctexture0; \n");
break;
case GR_CMBX_TMU_CALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(ccolor0.a); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_c = vec4(ccolor1.a); \n");
break;
case GR_CMBX_TMU_CCOLOR:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_c = ccolor0; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_c = ccolor1; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grTexColorCombineExt : c = %x", c);
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_c = vec4(0.0); \n");
}
if (c_invert)
{
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_c = vec4(1.0) - ctex0_c; \n");
else
strcat(fragment_shader_texture1, "ctex1_c = vec4(1.0) - ctex1_c; \n");
}
switch (d)
{
case GR_CMBX_ZERO:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_d = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_d = vec4(0.0); \n");
break;
case GR_CMBX_B:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_d = ctex0s_b; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_d = ctex1s_b; \n");
break;
case GR_CMBX_ITRGB:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_d = gl_Color; \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_d = gl_Color; \n");
break;
case GR_CMBX_LOCAL_TEXTURE_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_d = vec4(readtex0.a); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_d = vec4(readtex1.a); \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grTexColorCombineExt : d = %x", d);
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctex0_d = vec4(0.0); \n");
else
strcat(fragment_shader_texture1, "vec4 ctex1_d = vec4(0.0); \n");
}
if (d_invert)
{
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_d = vec4(1.0) - ctex0_d; \n");
else
strcat(fragment_shader_texture1, "ctex1_d = vec4(1.0) - ctex1_d; \n");
}
if (num_tex == 0)
strcat(fragment_shader_texture0, "vec4 ctexture0 = (ctex0_a + ctex0_b) * ctex0_c + ctex0_d; \n");
else
strcat(fragment_shader_texture1, "vec4 ctexture1 = (ctex1_a + ctex1_b) * ctex1_c + ctex1_d; \n");
need_to_compile = 1;
}
FX_ENTRY void FX_CALL
grTexAlphaCombineExt(GrChipID_t tmu,
GrTACUColor_t a, GrCombineMode_t a_mode,
GrTACUColor_t b, GrCombineMode_t b_mode,
GrTACUColor_t c, FxBool c_invert,
GrTACUColor_t d, FxBool d_invert,
FxU32 shift, FxBool invert)
{
int num_tex;
WriteTrace(TraceResolution, TraceDebug, "tmu: %d a: %d a_mode: %d b: %d b_mode: %d c: %d c_invert: %d d: %d d_invert: %d shift, invert: %d", tmu, a, a_mode, b, b_mode, c, c_invert, d, d_invert, shift, invert);
if (invert) WriteTrace(TraceGlitch, TraceWarning, "grTexAlphaCombineExt : inverted result");
if (shift) WriteTrace(TraceGlitch, TraceWarning, "grTexAlphaCombineExt : shift = %d", shift);
if (tmu == GR_TMU0) num_tex = 1;
else num_tex = 0;
if (num_tex == 0)
{
texture0_combinera_key = 0x80000000 | (a & 0x1F) | ((a_mode & 3) << 5) |
((b & 0x1F) << 7) | ((b_mode & 3) << 12) |
((c & 0x1F) << 14) | ((c_invert & 1) << 19) |
((d & 0x1F) << 20) | ((d_invert & 1) << 25);
}
else
{
texture1_combinera_key = 0x80000000 | (a & 0x1F) | ((a_mode & 3) << 5) |
((b & 0x1F) << 7) | ((b_mode & 3) << 12) |
((c & 0x1F) << 14) | ((c_invert & 1) << 19) |
((d & 0x1F) << 20) | ((d_invert & 1) << 25);
}
switch (a)
{
case GR_CMBX_ITALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0s_a.a = gl_Color.a; \n");
else
strcat(fragment_shader_texture1, "ctex1s_a.a = gl_Color.a; \n");
break;
case GR_CMBX_LOCAL_TEXTURE_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0s_a.a = readtex0.a; \n");
else
strcat(fragment_shader_texture1, "ctex1s_a.a = readtex1.a; \n");
break;
case GR_CMBX_OTHER_TEXTURE_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0s_a.a = 0.0; \n");
else
strcat(fragment_shader_texture1, "ctex1s_a.a = ctexture0.a; \n");
break;
case GR_CMBX_TMU_CALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0s_a.a = ccolor0.a; \n");
else
strcat(fragment_shader_texture1, "ctex1s_a.a = ccolor1.a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grTexAlphaCombineExt : a = %x", a);
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0s_a.a = 0.0; \n");
else
strcat(fragment_shader_texture1, "ctex1s_a.a = 0.0; \n");
}
switch (a_mode)
{
case GR_FUNC_MODE_ZERO:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_a.a = 0.0; \n");
else
strcat(fragment_shader_texture1, "ctex1_a.a = 0.0; \n");
break;
case GR_FUNC_MODE_X:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_a.a = ctex0s_a.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_a.a = ctex1s_a.a; \n");
break;
case GR_FUNC_MODE_ONE_MINUS_X:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_a.a = 1.0 - ctex0s_a.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_a.a = 1.0 - ctex1s_a.a; \n");
break;
case GR_FUNC_MODE_NEGATIVE_X:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_a.a = -ctex0s_a.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_a.a = -ctex1s_a.a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grTexAlphaCombineExt : a_mode = %x", a_mode);
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_a.a = 0.0; \n");
else
strcat(fragment_shader_texture1, "ctex1_a.a = 0.0; \n");
}
switch (b)
{
case GR_CMBX_ITALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0s_b.a = gl_Color.a; \n");
else
strcat(fragment_shader_texture1, "ctex1s_b.a = gl_Color.a; \n");
break;
case GR_CMBX_LOCAL_TEXTURE_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0s_b.a = readtex0.a; \n");
else
strcat(fragment_shader_texture1, "ctex1s_b.a = readtex1.a; \n");
break;
case GR_CMBX_OTHER_TEXTURE_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0s_b.a = 0.0; \n");
else
strcat(fragment_shader_texture1, "ctex1s_b.a = ctexture0.a; \n");
break;
case GR_CMBX_TMU_CALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0s_b.a = ccolor0.a; \n");
else
strcat(fragment_shader_texture1, "ctex1s_b.a = ccolor1.a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grTexAlphaCombineExt : b = %x", b);
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0s_b.a = 0.0; \n");
else
strcat(fragment_shader_texture1, "ctex1s_b.a = 0.0; \n");
}
switch (b_mode)
{
case GR_FUNC_MODE_ZERO:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_b.a = 0.0; \n");
else
strcat(fragment_shader_texture1, "ctex1_b.a = 0.0; \n");
break;
case GR_FUNC_MODE_X:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_b.a = ctex0s_b.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_b.a = ctex1s_b.a; \n");
break;
case GR_FUNC_MODE_ONE_MINUS_X:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_b.a = 1.0 - ctex0s_b.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_b.a = 1.0 - ctex1s_b.a; \n");
break;
case GR_FUNC_MODE_NEGATIVE_X:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_b.a = -ctex0s_b.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_b.a = -ctex1s_b.a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grTexAlphaCombineExt : b_mode = %x", b_mode);
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_b.a = 0.0; \n");
else
strcat(fragment_shader_texture1, "ctex1_b.a = 0.0; \n");
}
switch (c)
{
case GR_CMBX_ZERO:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_c.a = 0.0; \n");
else
strcat(fragment_shader_texture1, "ctex1_c.a = 0.0; \n");
break;
case GR_CMBX_B:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_c.a = ctex0s_b.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_c.a = ctex1s_b.a; \n");
break;
case GR_CMBX_DETAIL_FACTOR:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_c.a = lambda; \n");
else
strcat(fragment_shader_texture1, "ctex1_c.a = lambda; \n");
break;
case GR_CMBX_ITALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_c.a = gl_Color.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_c.a = gl_Color.a; \n");
break;
case GR_CMBX_LOCAL_TEXTURE_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_c.a = readtex0.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_c.a = readtex1.a; \n");
break;
case GR_CMBX_OTHER_TEXTURE_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_c.a = 0.0; \n");
else
strcat(fragment_shader_texture1, "ctex1_c.a = ctexture0.a; \n");
break;
case GR_CMBX_TMU_CALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_c.a = ccolor0.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_c.a = ccolor1.a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grTexAlphaCombineExt : c = %x", c);
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_c.a = 0.0; \n");
else
strcat(fragment_shader_texture1, "ctex1_c.a = 0.0; \n");
}
if (c_invert)
{
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_c.a = 1.0 - ctex0_c.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_c.a = 1.0 - ctex1_c.a; \n");
}
switch (d)
{
case GR_CMBX_ZERO:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_d.a = 0.0; \n");
else
strcat(fragment_shader_texture1, "ctex1_d.a = 0.0; \n");
break;
case GR_CMBX_B:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_d.a = ctex0s_b.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_d.a = ctex1s_b.a; \n");
break;
case GR_CMBX_ITALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_d.a = gl_Color.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_d.a = gl_Color.a; \n");
break;
case GR_CMBX_ITRGB:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_d.a = gl_Color.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_d.a = gl_Color.a; \n");
break;
case GR_CMBX_LOCAL_TEXTURE_ALPHA:
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_d.a = readtex0.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_d.a = readtex1.a; \n");
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grTexAlphaCombineExt : d = %x", d);
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_d.a = 0.0; \n");
else
strcat(fragment_shader_texture1, "ctex1_d.a = 0.0; \n");
}
if (d_invert)
{
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctex0_d.a = 1.0 - ctex0_d.a; \n");
else
strcat(fragment_shader_texture1, "ctex1_d.a = 1.0 - ctex1_d.a; \n");
}
if (num_tex == 0)
strcat(fragment_shader_texture0, "ctexture0.a = (ctex0_a.a + ctex0_b.a) * ctex0_c.a + ctex0_d.a; \n");
else
strcat(fragment_shader_texture1, "ctexture1.a = (ctex1_a.a + ctex1_b.a) * ctex1_c.a + ctex1_d.a; \n");
need_to_compile = 1;
}
FX_ENTRY void FX_CALL
grConstantColorValueExt(GrChipID_t tmu,
GrColor_t value)
{
int num_tex;
WriteTrace(TraceResolution, TraceDebug, "tmu: %d value: %d", tmu, value);
if (tmu == GR_TMU0) num_tex = 1;
else num_tex = 0;
switch (lfb_color_fmt)
{
case GR_COLORFORMAT_ARGB:
if (num_tex == 0)
{
ccolor0[3] = ((value >> 24) & 0xFF) / 255.0f;
ccolor0[0] = ((value >> 16) & 0xFF) / 255.0f;
ccolor0[1] = ((value >> 8) & 0xFF) / 255.0f;
ccolor0[2] = (value & 0xFF) / 255.0f;
}
else
{
ccolor1[3] = ((value >> 24) & 0xFF) / 255.0f;
ccolor1[0] = ((value >> 16) & 0xFF) / 255.0f;
ccolor1[1] = ((value >> 8) & 0xFF) / 255.0f;
ccolor1[2] = (value & 0xFF) / 255.0f;
}
break;
case GR_COLORFORMAT_RGBA:
if (num_tex == 0)
{
ccolor0[0] = ((value >> 24) & 0xFF) / 255.0f;
ccolor0[1] = ((value >> 16) & 0xFF) / 255.0f;
ccolor0[2] = ((value >> 8) & 0xFF) / 255.0f;
ccolor0[3] = (value & 0xFF) / 255.0f;
}
else
{
ccolor1[0] = ((value >> 24) & 0xFF) / 255.0f;
ccolor1[1] = ((value >> 16) & 0xFF) / 255.0f;
ccolor1[2] = ((value >> 8) & 0xFF) / 255.0f;
ccolor1[3] = (value & 0xFF) / 255.0f;
}
break;
default:
WriteTrace(TraceGlitch, TraceWarning, "grConstantColorValue: unknown color format : %x", lfb_color_fmt);
}
if (num_tex == 0)
{
ccolor0_location = glGetUniformLocationARB(program_object, "ccolor0");
glUniform4fARB(ccolor0_location, ccolor0[0], ccolor0[1], ccolor0[2], ccolor0[3]);
}
else
{
ccolor1_location = glGetUniformLocationARB(program_object, "ccolor1");
glUniform4fARB(ccolor1_location, ccolor1[0], ccolor1[1], ccolor1[2], ccolor1[3]);
}
grDisplayGLError("grConstantColorValueExt");
}