Fixed GLES support (partially), PSP still not working

src/duskgl/display/shader/shaderunlitgl.c

@@ -47,6 +47,9 @@
 
     // Set texture type
     if(texture->format == TEXTURE_FORMAT_PALETTE) {
+      glUniform1i(locType, 2);
+      errorChain(errorGLCheck());
+
       shaderParamGetLocationGL(shader, "u_ColorCount", &locColorCount);
       glUniform1i(locColorCount, texture->palette->count);
       errorChain(errorGLCheck());
@@ -75,7 +78,24 @@
   shaderdefinition_t SHADER_UNLIT_DEFINITION = {
     .vert =
       #ifdef DUSK_OPENGL_ES
-
+        "#version 300 es\n"
+        "precision mediump float;\n"
+        // Attributes
+        "layout(location = 0) in vec3 a_Pos;\n"
+        "layout(location = 1) in vec2 a_TexCoord;\n"
+        "layout(location = 2) in vec4 a_Color;\n"
+        // Uniforms
+        "uniform mat4 u_Proj;\n"
+        "uniform mat4 u_View;\n"
+        "uniform mat4 u_Model;\n"
+        // Vertex shader outputs
+        "out vec4 v_Color;\n"
+        "out vec2 v_TexCoord;\n"
+        "void main() {\n"
+        "  gl_Position = u_Proj * u_View * u_Model * vec4(a_Pos, 1.0);\n"
+        "  v_Color = a_Color;\n"
+        "  v_TexCoord = a_TexCoord;\n"
+        "}\n",
       #else
         "#version 330 core\n"
         // Attributes
@@ -97,7 +117,36 @@
       #endif
     .frag =
       #ifdef DUSK_OPENGL_ES
-
+        "#version 300 es\n"
+        "precision mediump float;\n"
+        // Uniforms
+        "uniform sampler2D u_Texture;\n"
+        "uniform int u_TextureType;\n"
+        "uniform vec4 u_Colors[256];\n"// For paletted textures.
+        "uniform int u_ColorCount;\n"
+        // Fragment shader inputs
+        "in vec4 v_Color;\n"
+        "in vec2 v_TexCoord;\n"
+        // Fragment shader output
+        "out vec4 FragColor;\n"
+        "void main() {\n"
+        "  if(u_TextureType == 0) {\n"// No texture
+        "    FragColor = v_Color;\n"
+        "    return;\n"
+        "  }\n"
+        "  if(u_TextureType == 1) {\n"// Regular texture
+        "    FragColor = texture(u_Texture, v_TexCoord) * v_Color;\n"
+        "    return;\n"
+        "  }\n"
+        "  if(u_TextureType == 2) {\n"// Paletted texture
+        "    vec4 texColor = texture(u_Texture, v_TexCoord);\n"
+        "    int index = int(floor(texColor.r * 255.0));\n"
+        "    vec4 paletteColor = u_Colors[index];\n"
+        "    FragColor = paletteColor;\n"
+        "    return;\n"
+        "  }\n"
+        "  FragColor = v_Color;\n"// Unknown texture type?
+        "}\n",
       #else
         "#version 330 core\n"
         // Uniforms