// Project64 - A Nintendo 64 emulator // https://www.pj64-emu.com/ // Copyright(C) 2001-2021 Project64 // Copyright(C) 2003-2009 Sergey 'Gonetz' Lipski // Copyright(C) 2002 Dave2001 // GNU/GPLv2 licensed: https://gnu.org/licenses/gpl-2.0.html #include #ifdef _WIN32 #include #else // _WIN32 #include #include #endif // _WIN32 #include #include #include #include "glitchmain.h" #include 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; static gfxCmpFnc_t 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" // TODO: 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]; // (Comment by 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, nullptr); 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, nullptr); free(fragment_shader); glCompileShaderARB(fragment_shader_object); vertex_shader_object = glCreateShaderObjectARB(GL_VERTEX_SHADER_ARB); glShaderSourceARB(vertex_shader_object, 1, &vertex_shader, nullptr); 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 GFX_COMBINE_OTHER_ITERATED: strcat(fragment_shader_chroma, "float alpha = gl_Color.a; \n"); break; case GFX_COMBINE_OTHER_TEXTURE: strcat(fragment_shader_chroma, "float alpha = ctexture1.a; \n"); break; case GFX_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 GFX_COMBINE_OTHER_ITERATED: strcat(fragment_shader_chroma, "vec4 color = vec4(vec3(gl_Color),alpha); \n"); break; case GFX_COMBINE_OTHER_TEXTURE: strcat(fragment_shader_chroma, "vec4 color = vec4(vec3(ctexture1),alpha); \n"); break; case GFX_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 = nullptr; 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 != nullptr) 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, nullptr); 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 = nullptr; 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"); } void gfxConstantColorValue(gfxColor_t value) { WriteTrace(TraceGlitch, TraceDebug, "value: %d", value); switch (lfb_color_fmt) { case GFX_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 GFX_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, "gfxConstantColorValue: 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("gfxConstantColorValue"); } int setOtherColorSource(int other) { switch (other) { case GFX_COMBINE_OTHER_ITERATED: return GL_PRIMARY_COLOR_ARB; break; case GFX_COMBINE_OTHER_TEXTURE: return GL_PREVIOUS_ARB; break; case GFX_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 GFX_COMBINE_LOCAL_ITERATED: return GL_PRIMARY_COLOR_ARB; break; case GFX_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 GFX_COMBINE_OTHER_ITERATED: strcat(fragment_shader_color_combiner, "vec4 color_other = gl_Color; \n"); break; case GFX_COMBINE_OTHER_TEXTURE: strcat(fragment_shader_color_combiner, "vec4 color_other = ctexture1; \n"); break; case GFX_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 GFX_COMBINE_LOCAL_ITERATED: strcat(fragment_shader_color_combiner, "vec4 color_local = gl_Color; \n"); break; case GFX_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 GFX_COMBINE_FACTOR_ZERO: strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(0.0); \n"); break; case GFX_COMBINE_FACTOR_LOCAL: if (need_local) writeGLSLColorLocal(local); strcat(fragment_shader_color_combiner, "vec4 color_factor = color_local; \n"); break; case GFX_COMBINE_FACTOR_OTHER_ALPHA: if (need_other) writeGLSLColorOther(other); strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(color_other.a); \n"); break; case GFX_COMBINE_FACTOR_LOCAL_ALPHA: if (need_local) writeGLSLColorLocal(local); strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(color_local.a); \n"); break; case GFX_COMBINE_FACTOR_TEXTURE_ALPHA: strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(ctexture1.a); \n"); break; case GFX_COMBINE_FACTOR_TEXTURE_RGB: strcat(fragment_shader_color_combiner, "vec4 color_factor = ctexture1; \n"); break; case GFX_COMBINE_FACTOR_ONE: strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(1.0); \n"); break; case GFX_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 GFX_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 GFX_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 GFX_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); } } void gfxColorCombine(gfxCombineFunction_t function, gfxCombineFactor_t factor, gfxCombineLocal_t local, gfxCombineOther_t other, bool invert) { WriteTrace(TraceGlitch, 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 GFX_COMBINE_FUNCTION_ZERO: strcat(fragment_shader_color_combiner, "gl_FragColor = vec4(0.0); \n"); break; case GFX_COMBINE_FUNCTION_LOCAL: writeGLSLColorLocal(local); strcat(fragment_shader_color_combiner, "gl_FragColor = color_local; \n"); break; case GFX_COMBINE_FUNCTION_LOCAL_ALPHA: writeGLSLColorLocal(local); strcat(fragment_shader_color_combiner, "gl_FragColor = vec4(color_local.a); \n"); break; case GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_COMBINE_OTHER_ITERATED: return GL_PRIMARY_COLOR_ARB; break; case GFX_COMBINE_OTHER_TEXTURE: return GL_PREVIOUS_ARB; break; case GFX_COMBINE_OTHER_CONSTANT: return GL_CONSTANT_ARB; break; default: WriteTrace(TraceGlitch, TraceWarning, "Unknown other alpha source : %x", other); } return 0; } int setLocalAlphaSource(int local) { switch (local) { case GFX_COMBINE_LOCAL_ITERATED: return GL_PRIMARY_COLOR_ARB; break; case GFX_COMBINE_LOCAL_CONSTANT: return GL_CONSTANT_ARB; break; default: WriteTrace(TraceGlitch, TraceWarning, "Unknown local alpha source : %x", local); } return 0; } void writeGLSLAlphaOther(int other) { switch (other) { case GFX_COMBINE_OTHER_ITERATED: strcat(fragment_shader_alpha_combiner, "float alpha_other = gl_Color.a; \n"); break; case GFX_COMBINE_OTHER_TEXTURE: strcat(fragment_shader_alpha_combiner, "float alpha_other = ctexture1.a; \n"); break; case GFX_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 GFX_COMBINE_LOCAL_ITERATED: strcat(fragment_shader_alpha_combiner, "float alpha_local = gl_Color.a; \n"); break; case GFX_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 GFX_COMBINE_FACTOR_ZERO: strcat(fragment_shader_alpha_combiner, "float alpha_factor = 0.0; \n"); break; case GFX_COMBINE_FACTOR_LOCAL: if (need_local) writeGLSLAlphaLocal(local); strcat(fragment_shader_alpha_combiner, "float alpha_factor = alpha_local; \n"); break; case GFX_COMBINE_FACTOR_OTHER_ALPHA: if (need_other) writeGLSLAlphaOther(other); strcat(fragment_shader_alpha_combiner, "float alpha_factor = alpha_other; \n"); break; case GFX_COMBINE_FACTOR_LOCAL_ALPHA: if (need_local) writeGLSLAlphaLocal(local); strcat(fragment_shader_alpha_combiner, "float alpha_factor = alpha_local; \n"); break; case GFX_COMBINE_FACTOR_TEXTURE_ALPHA: strcat(fragment_shader_alpha_combiner, "float alpha_factor = ctexture1.a; \n"); break; case GFX_COMBINE_FACTOR_ONE: strcat(fragment_shader_alpha_combiner, "float alpha_factor = 1.0; \n"); break; case GFX_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 GFX_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 GFX_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 GFX_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); } } void gfxAlphaCombine(gfxCombineFunction_t function, gfxCombineFactor_t factor, gfxCombineLocal_t local, gfxCombineOther_t other, bool invert) { WriteTrace(TraceGlitch, 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 GFX_COMBINE_FUNCTION_ZERO: strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = 0.0; \n"); break; case GFX_COMBINE_FUNCTION_LOCAL: writeGLSLAlphaLocal(local); strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_local; \n"); break; case GFX_COMBINE_FUNCTION_LOCAL_ALPHA: writeGLSLAlphaLocal(local); strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_local; \n"); break; case GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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); } } void gfxTexCombine(gfxChipID_t tmu, gfxCombineFunction_t rgb_function, gfxCombineFactor_t rgb_factor, gfxCombineFunction_t alpha_function, gfxCombineFactor_t alpha_factor, bool rgb_invert, bool alpha_invert) { WriteTrace(TraceGlitch, 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 == GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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; } void gfxAlphaBlendFunction(gfxAlphaBlendFnc_t rgb_sf, gfxAlphaBlendFnc_t rgb_df, gfxAlphaBlendFnc_t alpha_sf, gfxAlphaBlendFnc_t alpha_df) { int sfactorRGB = 0, dfactorRGB = 0, sfactorAlpha = 0, dfactorAlpha = 0; WriteTrace(TraceGlitch, 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 GFX_BLEND_ZERO: sfactorRGB = GL_ZERO; break; case GFX_BLEND_SRC_ALPHA: sfactorRGB = GL_SRC_ALPHA; break; case GFX_BLEND_ONE: sfactorRGB = GL_ONE; break; case GFX_BLEND_ONE_MINUS_SRC_ALPHA: sfactorRGB = GL_ONE_MINUS_SRC_ALPHA; break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxAlphaBlendFunction: rgb_sf = %x", rgb_sf); } switch (rgb_df) { case GFX_BLEND_ZERO: dfactorRGB = GL_ZERO; break; case GFX_BLEND_SRC_ALPHA: dfactorRGB = GL_SRC_ALPHA; break; case GFX_BLEND_ONE: dfactorRGB = GL_ONE; break; case GFX_BLEND_ONE_MINUS_SRC_ALPHA: dfactorRGB = GL_ONE_MINUS_SRC_ALPHA; break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxAlphaBlendFunction: rgb_df = %x", rgb_df); } switch (alpha_sf) { case GFX_BLEND_ZERO: sfactorAlpha = GL_ZERO; break; case GFX_BLEND_ONE: sfactorAlpha = GL_ONE; break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxAlphaBlendFunction: alpha_sf = %x", alpha_sf); } switch (alpha_df) { case GFX_BLEND_ZERO: dfactorAlpha = GL_ZERO; break; case GFX_BLEND_ONE: dfactorAlpha = GL_ONE; break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxAlphaBlendFunction: alpha_df = %x", alpha_df); } glEnable(GL_BLEND); if (blend_func_separate_support) glBlendFuncSeparateEXT(sfactorRGB, dfactorRGB, sfactorAlpha, dfactorAlpha); else glBlendFunc(sfactorRGB, dfactorRGB); grDisplayGLError("gfxAlphaBlendFunction"); } void gfxAlphaTestReferenceValue(gfxAlpha_t value) { WriteTrace(TraceGlitch, TraceDebug, "Value: %d", value); alpha_ref = value; gfxAlphaTestFunction(alpha_func); } void gfxAlphaTestFunction(gfxCmpFnc_t function) { WriteTrace(TraceGlitch, TraceDebug, "Function: %d", function); alpha_func = function; switch (function) { case GFX_CMP_GREATER: glAlphaFunc(GL_GREATER, alpha_ref / 255.0f); break; case GFX_CMP_GEQUAL: glAlphaFunc(GL_GEQUAL, alpha_ref / 255.0f); break; case GFX_CMP_ALWAYS: glAlphaFunc(GL_ALWAYS, alpha_ref / 255.0f); glDisable(GL_ALPHA_TEST); grDisplayGLError("gfxAlphaTestFunction :: GFX_CMP_ALWAYS"); return; break; default: WriteTrace(TraceGlitch, TraceWarning, "Unknown function: %x", function); } glEnable(GL_ALPHA_TEST); grDisplayGLError("gfxAlphaTestFunction"); } // Fog void gfxFogMode(gfxFogMode_t mode) { WriteTrace(TraceGlitch, TraceDebug, "Mode: %d", mode); switch (mode) { case GFX_FOG_DISABLE: glDisable(GL_FOG); fog_enabled = 0; break; case GFX_FOG_WITH_TABLE_ON_Q: glEnable(GL_FOG); glFogi(GL_FOG_COORDINATE_SOURCE_EXT, GL_FOG_COORDINATE_EXT); fog_enabled = 1; break; case GFX_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("gfxFogMode"); } void gfxFogGenerateLinear(float nearZ, float farZ) { WriteTrace(TraceGlitch, 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("gfxFogGenerateLinear"); } void gfxFogColorValue(gfxColor_t fogcolor) { float color[4]; WriteTrace(TraceGlitch, TraceDebug, "fogcolor: %x", fogcolor); switch (lfb_color_fmt) { case GFX_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 GFX_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 void gfxChromakeyMode(gfxChromakeyMode_t mode) { WriteTrace(TraceGlitch, TraceDebug, "Mode: %d", mode); switch (mode) { case GFX_CHROMAKEY_DISABLE: chroma_enabled = 0; break; case GFX_CHROMAKEY_ENABLE: chroma_enabled = 1; break; default: WriteTrace(TraceGlitch, TraceWarning, "Unknown mode : %x", mode); } need_to_compile = 1; } void gfxChromakeyValue(gfxColor_t value) { WriteTrace(TraceGlitch, TraceDebug, "Value: %d", value); int chroma_color_location; switch (lfb_color_fmt) { case GFX_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 GFX_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, "gfxChromakeyValue: 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("gfxChromakeyValue"); } 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"); } void gfxStippleMode(gfxStippleMode_t mode) { WriteTrace(TraceGlitch, TraceDebug, "Mode: %d", mode); switch (mode) { case GFX_STIPPLE_DISABLE: dither_enabled = 0; glActiveTextureARB(GL_TEXTURE2_ARB); glDisable(GL_TEXTURE_2D); break; case GFX_STIPPLE_PATTERN: setPattern(); dither_enabled = 1; glActiveTextureARB(GL_TEXTURE2_ARB); glEnable(GL_TEXTURE_2D); break; case GFX_STIPPLE_ROTATE: setPattern(); dither_enabled = 1; glActiveTextureARB(GL_TEXTURE2_ARB); glEnable(GL_TEXTURE_2D); break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxStippleMode:%x", mode); } need_to_compile = 1; grDisplayGLError("gfxStippleMode"); } void gfxColorCombineExt(gfxCCUColor_t a, gfxCombineMode_t a_mode, gfxCCUColor_t b, gfxCombineMode_t b_mode, gfxCCUColor_t c, bool c_invert, gfxCCUColor_t d, bool d_invert, uint32_t shift, bool invert) { WriteTrace(TraceGlitch, 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, "gfxColorCombineExt: Inverted result"); if (shift) WriteTrace(TraceGlitch, TraceWarning, "gfxColorCombineExt: 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 GFX_CMBX_ZERO: strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(0.0); \n"); break; case GFX_CMBX_TEXTURE_ALPHA: strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(ctexture1.a); \n"); break; case GFX_CMBX_CONSTANT_ALPHA: strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(constant_color.a); \n"); break; case GFX_CMBX_CONSTANT_COLOR: strcat(fragment_shader_color_combiner, "vec4 cs_a = constant_color; \n"); break; case GFX_CMBX_ITALPHA: strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(gl_Color.a); \n"); break; case GFX_CMBX_ITRGB: strcat(fragment_shader_color_combiner, "vec4 cs_a = gl_Color; \n"); break; case GFX_CMBX_TEXTURE_RGB: strcat(fragment_shader_color_combiner, "vec4 cs_a = ctexture1; \n"); break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxColorCombineExt: a = %x", a); strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(0.0); \n"); } switch (a_mode) { case GFX_FUNC_MODE_ZERO: strcat(fragment_shader_color_combiner, "vec4 c_a = vec4(0.0); \n"); break; case GFX_FUNC_MODE_X: strcat(fragment_shader_color_combiner, "vec4 c_a = cs_a; \n"); break; case GFX_FUNC_MODE_ONE_MINUS_X: strcat(fragment_shader_color_combiner, "vec4 c_a = vec4(1.0) - cs_a; \n"); break; case GFX_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 GFX_CMBX_ZERO: strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(0.0); \n"); break; case GFX_CMBX_TEXTURE_ALPHA: strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(ctexture1.a); \n"); break; case GFX_CMBX_CONSTANT_ALPHA: strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(constant_color.a); \n"); break; case GFX_CMBX_CONSTANT_COLOR: strcat(fragment_shader_color_combiner, "vec4 cs_b = constant_color; \n"); break; case GFX_CMBX_ITALPHA: strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(gl_Color.a); \n"); break; case GFX_CMBX_ITRGB: strcat(fragment_shader_color_combiner, "vec4 cs_b = gl_Color; \n"); break; case GFX_CMBX_TEXTURE_RGB: strcat(fragment_shader_color_combiner, "vec4 cs_b = ctexture1; \n"); break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxColorCombineExt: b = %x", b); strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(0.0); \n"); } switch (b_mode) { case GFX_FUNC_MODE_ZERO: strcat(fragment_shader_color_combiner, "vec4 c_b = vec4(0.0); \n"); break; case GFX_FUNC_MODE_X: strcat(fragment_shader_color_combiner, "vec4 c_b = cs_b; \n"); break; case GFX_FUNC_MODE_ONE_MINUS_X: strcat(fragment_shader_color_combiner, "vec4 c_b = vec4(1.0) - cs_b; \n"); break; case GFX_FUNC_MODE_NEGATIVE_X: strcat(fragment_shader_color_combiner, "vec4 c_b = -cs_b; \n"); break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxColorCombineExt: b_mode = %x", b_mode); strcat(fragment_shader_color_combiner, "vec4 c_b = vec4(0.0); \n"); } switch (c) { case GFX_CMBX_ZERO: strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(0.0); \n"); break; case GFX_CMBX_TEXTURE_ALPHA: strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(ctexture1.a); \n"); break; case GFX_CMBX_ALOCAL: strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(c_b.a); \n"); break; case GFX_CMBX_AOTHER: strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(c_a.a); \n"); break; case GFX_CMBX_B: strcat(fragment_shader_color_combiner, "vec4 c_c = cs_b; \n"); break; case GFX_CMBX_CONSTANT_ALPHA: strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(constant_color.a); \n"); break; case GFX_CMBX_CONSTANT_COLOR: strcat(fragment_shader_color_combiner, "vec4 c_c = constant_color; \n"); break; case GFX_CMBX_ITALPHA: strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(gl_Color.a); \n"); break; case GFX_CMBX_ITRGB: strcat(fragment_shader_color_combiner, "vec4 c_c = gl_Color; \n"); break; case GFX_CMBX_TEXTURE_RGB: strcat(fragment_shader_color_combiner, "vec4 c_c = ctexture1; \n"); break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxColorCombineExt : 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 GFX_CMBX_ZERO: strcat(fragment_shader_color_combiner, "vec4 c_d = vec4(0.0); \n"); break; case GFX_CMBX_ALOCAL: strcat(fragment_shader_color_combiner, "vec4 c_d = vec4(c_b.a); \n"); break; case GFX_CMBX_B: strcat(fragment_shader_color_combiner, "vec4 c_d = cs_b; \n"); break; case GFX_CMBX_TEXTURE_RGB: strcat(fragment_shader_color_combiner, "vec4 c_d = ctexture1; \n"); break; case GFX_CMBX_ITRGB: strcat(fragment_shader_color_combiner, "vec4 c_d = gl_Color; \n"); break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxColorCombineExt: 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; } void gfxAlphaCombineExt(gfxACUColor_t a, gfxCombineMode_t a_mode, gfxACUColor_t b, gfxCombineMode_t b_mode, gfxACUColor_t c, bool c_invert, gfxACUColor_t d, bool d_invert, uint32_t shift, bool invert) { WriteTrace(TraceGlitch, 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, "gfxAlphaCombineExt: Inverted result"); if (shift) WriteTrace(TraceGlitch, TraceWarning, "gfxAlphaCombineExt: 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 GFX_CMBX_ZERO: strcat(fragment_shader_alpha_combiner, "float as_a = 0.0; \n"); break; case GFX_CMBX_TEXTURE_ALPHA: strcat(fragment_shader_alpha_combiner, "float as_a = ctexture1.a; \n"); break; case GFX_CMBX_CONSTANT_ALPHA: strcat(fragment_shader_alpha_combiner, "float as_a = constant_color.a; \n"); break; case GFX_CMBX_ITALPHA: strcat(fragment_shader_alpha_combiner, "float as_a = gl_Color.a; \n"); break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxAlphaCombineExt: a = %x", a); strcat(fragment_shader_alpha_combiner, "float as_a = 0.0; \n"); } switch (a_mode) { case GFX_FUNC_MODE_ZERO: strcat(fragment_shader_alpha_combiner, "float a_a = 0.0; \n"); break; case GFX_FUNC_MODE_X: strcat(fragment_shader_alpha_combiner, "float a_a = as_a; \n"); break; case GFX_FUNC_MODE_ONE_MINUS_X: strcat(fragment_shader_alpha_combiner, "float a_a = 1.0 - as_a; \n"); break; case GFX_FUNC_MODE_NEGATIVE_X: strcat(fragment_shader_alpha_combiner, "float a_a = -as_a; \n"); break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxAlphaCombineExt: a_mode = %x", a_mode); strcat(fragment_shader_alpha_combiner, "float a_a = 0.0; \n"); } switch (b) { case GFX_CMBX_ZERO: strcat(fragment_shader_alpha_combiner, "float as_b = 0.0; \n"); break; case GFX_CMBX_TEXTURE_ALPHA: strcat(fragment_shader_alpha_combiner, "float as_b = ctexture1.a; \n"); break; case GFX_CMBX_CONSTANT_ALPHA: strcat(fragment_shader_alpha_combiner, "float as_b = constant_color.a; \n"); break; case GFX_CMBX_ITALPHA: strcat(fragment_shader_alpha_combiner, "float as_b = gl_Color.a; \n"); break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxAlphaCombineExt: b = %x", b); strcat(fragment_shader_alpha_combiner, "float as_b = 0.0; \n"); } switch (b_mode) { case GFX_FUNC_MODE_ZERO: strcat(fragment_shader_alpha_combiner, "float a_b = 0.0; \n"); break; case GFX_FUNC_MODE_X: strcat(fragment_shader_alpha_combiner, "float a_b = as_b; \n"); break; case GFX_FUNC_MODE_ONE_MINUS_X: strcat(fragment_shader_alpha_combiner, "float a_b = 1.0 - as_b; \n"); break; case GFX_FUNC_MODE_NEGATIVE_X: strcat(fragment_shader_alpha_combiner, "float a_b = -as_b; \n"); break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxAlphaCombineExt: b_mode = %x", b_mode); strcat(fragment_shader_alpha_combiner, "float a_b = 0.0; \n"); } switch (c) { case GFX_CMBX_ZERO: strcat(fragment_shader_alpha_combiner, "float a_c = 0.0; \n"); break; case GFX_CMBX_TEXTURE_ALPHA: strcat(fragment_shader_alpha_combiner, "float a_c = ctexture1.a; \n"); break; case GFX_CMBX_ALOCAL: strcat(fragment_shader_alpha_combiner, "float a_c = as_b; \n"); break; case GFX_CMBX_AOTHER: strcat(fragment_shader_alpha_combiner, "float a_c = as_a; \n"); break; case GFX_CMBX_B: strcat(fragment_shader_alpha_combiner, "float a_c = as_b; \n"); break; case GFX_CMBX_CONSTANT_ALPHA: strcat(fragment_shader_alpha_combiner, "float a_c = constant_color.a; \n"); break; case GFX_CMBX_ITALPHA: strcat(fragment_shader_alpha_combiner, "float a_c = gl_Color.a; \n"); break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxAlphaCombineExt: 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 GFX_CMBX_ZERO: strcat(fragment_shader_alpha_combiner, "float a_d = 0.0; \n"); break; case GFX_CMBX_TEXTURE_ALPHA: strcat(fragment_shader_alpha_combiner, "float a_d = ctexture1.a; \n"); break; case GFX_CMBX_ALOCAL: strcat(fragment_shader_alpha_combiner, "float a_d = as_b; \n"); break; case GFX_CMBX_B: strcat(fragment_shader_alpha_combiner, "float a_d = as_b; \n"); break; default: WriteTrace(TraceGlitch, TraceWarning, "gfxAlphaCombineExt: 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; } void gfxTexColorCombineExt(gfxChipID_t tmu, gfxTCCUColor_t a, gfxCombineMode_t a_mode, gfxTCCUColor_t b, gfxCombineMode_t b_mode, gfxTCCUColor_t c, bool c_invert, gfxTCCUColor_t d, bool d_invert, uint32_t shift, bool invert) { int num_tex; WriteTrace(TraceGlitch, 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, "gfxTexColorCombineExt: Inverted result"); if (shift) WriteTrace(TraceGlitch, TraceWarning, "gfxTexColorCombineExt: Shift = %d", shift); if (tmu == GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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, "gfxTexColorCombineExt: 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 GFX_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 GFX_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 GFX_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 GFX_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, "gfxTexColorCombineExt: 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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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, "gfxTexColorCombineExt: 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 GFX_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 GFX_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 GFX_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 GFX_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, "gfxTexColorCombineExt: 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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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, "gfxTexColorCombineExt: 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 GFX_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 GFX_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 GFX_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 GFX_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, "gfxTexColorCombineExt: 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; } void gfxTexAlphaCombineExt(gfxChipID_t tmu, gfxTACUColor_t a, gfxCombineMode_t a_mode, gfxTACUColor_t b, gfxCombineMode_t b_mode, gfxTACUColor_t c, bool c_invert, gfxTACUColor_t d, bool d_invert, uint32_t shift, bool invert) { int num_tex; WriteTrace(TraceGlitch, 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, "gfxTexAlphaCombineExt: Inverted result"); if (shift) WriteTrace(TraceGlitch, TraceWarning, "gfxTexAlphaCombineExt: Shift = %d", shift); if (tmu == GFX_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 GFX_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 GFX_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 GFX_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 GFX_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, "gfxTexAlphaCombineExt: 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 GFX_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 GFX_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 GFX_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 GFX_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, "gfxTexAlphaCombineExt: 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 GFX_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 GFX_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 GFX_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 GFX_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, "gfxTexAlphaCombineExt: 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 GFX_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 GFX_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 GFX_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 GFX_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, "gfxTexAlphaCombineExt: 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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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, "gfxTexAlphaCombineExt: 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 GFX_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 GFX_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 GFX_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 GFX_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 GFX_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, "gfxTexAlphaCombineExt: 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; } void gfxConstantColorValueExt(gfxChipID_t tmu, gfxColor_t value) { int num_tex; WriteTrace(TraceGlitch, TraceDebug, "tmu: %d value: %d", tmu, value); if (tmu == GFX_TMU0) num_tex = 1; else num_tex = 0; switch (lfb_color_fmt) { case GFX_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 GFX_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, "gfxConstantColorValue: 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("gfxConstantColorValueExt"); }