static void showglslinfo(GLenum type, GLuint obj, const char *name, const char **parts = NULL, int numparts = 0)
{
GLint length = 0;
if(type) glGetShaderiv_(obj, GL_INFO_LOG_LENGTH, &length);
else glGetProgramiv_(obj, GL_INFO_LOG_LENGTH, &length);
if(length > 1)
{
conoutf(CON_ERROR, "GLSL ERROR (%s:%s)", type == GL_VERTEX_SHADER ? "VS" : (type == GL_FRAGMENT_SHADER ? "FS" : "PROG"), name);
FILE *l = getlogfile();
if(l)
{
GLchar *log = new GLchar[length];
if(type) glGetShaderInfoLog_(obj, length, &length, log);
else glGetProgramInfoLog_(obj, length, &length, log);
fprintf(l, "%s\n", log);
bool partlines = log[0] != '0';
int line = 0;
loopi(numparts)
{
const char *part = parts[i];
int startline = line;
while(*part)
{
const char *next = strchr(part, '\n');
if(++line > 1000) goto done;
if(partlines) fprintf(l, "%d(%d): ", i, line - startline); else fprintf(l, "%d: ", line);
fwrite(part, 1, next ? next - part + 1 : strlen(part), l);
if(!next) { fputc('\n', l); break; }
part = next + 1;
}
}
done:
delete[] log;
}
}
GLAPI void APIENTRY glGetProgramiv(
GLuint program,
GLenum pname,
GLint* params)
{
glGetProgramiv_(program, pname, params);
}