This file is indexed.

/usr/share/psychtoolbox-3/PsychOpenGL/PsychGLSLShaders/ClutBlitShader.frag.txt is in psychtoolbox-3-common 3.0.11.20131230.dfsg1-1build1.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below.

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
/* ClutBlitShader.frag -- Brute force CLUT animation.
 * Shader for application of a color lookup table to a texture image.
 * Reads each texels color index from red/luminance channel of texture
 * 'Image', does a index -> color lookup in lookup table texture 'clut'.
 * Assigns looked up color RGB to output fragment color RGB. Copies alpha
 * channels value unmodified.
 * This shader is used by moglClutBlit.m to implement CLUT animation caps.
 *
 * (w)2006 by Mario Kleiner. Licensed under MIT license.
*/

#extension GL_ARB_texture_rectangle : enable

uniform sampler2DRect Image;
uniform sampler2DRect clut;

void main()
{
    vec4 incolor = texture2DRect(Image, gl_TexCoord[0].st);
    float index = incolor.r * 255.0 + 0.5;
    gl_FragColor.rgb = texture2DRect(clut, vec2(index, 0)).rgb;
    gl_FragColor.a = incolor.a;
}