glcaps.c
1
2
3
4
5
6
#ifdef _WINDOWS
#define WIN32_LEAN_AND_MEAN 1
#include <windows.h>
#endif
#include <stdio.h>
7
#define GL_GLEXT_LEGACY 1
8
9
10
11
#include "GL/gl.h"
#include "GL/glext.h"
#include "SDL.h"
12
13
14
15
#ifndef WINGDIAPI
#define WINGDIAPI
#endif
16
typedef WINGDIAPI void (APIENTRYP PFNGLGETINTEGERVPROC) (GLenum pname, GLint *params);
17
18
typedef WINGDIAPI const GLubyte * (APIENTRYP PFNGLGETSTRINGPROC) (GLenum name);
19
20
21
22
23
24
25
26
27
28
29
30
31
32
#ifndef GL_MAX_VERTEX_BINDABLE_UNIFORMS_EXT
#define GL_MAX_VERTEX_BINDABLE_UNIFORMS_EXT 0x8DE2
#endif
#ifndef GL_MAX_FRAGMENT_BINDABLE_UNIFORMS_EXT
#define GL_MAX_FRAGMENT_BINDABLE_UNIFORMS_EXT 0x8DE3
#endif
#ifndef GL_MAX_GEOMETRY_BINDABLE_UNIFORMS_EXT
#define GL_MAX_GEOMETRY_BINDABLE_UNIFORMS_EXT 0x8DE4
#endif
#ifndef GL_MAX_BINDABLE_UNIFORM_SIZE_EXT
#define GL_MAX_BINDABLE_UNIFORM_SIZE_EXT 0x8DED
#endif
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
int main(int argc, char **argv)
{
GLint val = 0;
SDL_Init(SDL_INIT_VIDEO);
SDL_GL_LoadLibrary(NULL);
SDL_SetVideoMode(640, 480, 0, SDL_OPENGL);
PFNGLGETSTRINGPROC pglGetString = (PFNGLGETSTRINGPROC) SDL_GL_GetProcAddress("glGetString");
PFNGLGETINTEGERVPROC pglGetIntegerv = (PFNGLGETINTEGERVPROC) SDL_GL_GetProcAddress("glGetIntegerv");
PFNGLGETPROGRAMIVARBPROC pglGetProgramivARB = (PFNGLGETPROGRAMIVARBPROC) SDL_GL_GetProcAddress("glGetProgramivARB");
printf("Basic strings...\n\n");
#define getval(x) printf(#x ": %s\n", pglGetString(x))
getval(GL_RENDERER);
getval(GL_VERSION);
getval(GL_VENDOR);
#undef getval
printf("\nExtensions...\n\n");
const GLubyte *ext = pglGetString(GL_EXTENSIONS);
while (*ext)
{
fputc((*ext == ' ') ? '\n' : ((int) *ext), stdout);
ext++;
} // while
ext--;
if (*ext != ' ')
printf("\n");
printf("\nARB1 values...\n\n");
if (pglGetProgramivARB == NULL)
printf(" (unsupported.)\n");
else
{
#define getval(x) \
val = -1; \
pglGetProgramivARB(GL_VERTEX_PROGRAM_ARB, x, &val); \
printf(#x ": %d\n", (int) val);
getval(GL_MAX_PROGRAM_INSTRUCTIONS_ARB);
getval(GL_MAX_PROGRAM_NATIVE_INSTRUCTIONS_ARB);
getval(GL_MAX_PROGRAM_TEMPORARIES_ARB);
getval(GL_MAX_PROGRAM_NATIVE_TEMPORARIES_ARB);
getval(GL_MAX_PROGRAM_PARAMETERS_ARB);
getval(GL_MAX_PROGRAM_NATIVE_PARAMETERS_ARB);
getval(GL_MAX_PROGRAM_ATTRIBS_ARB);
getval(GL_MAX_PROGRAM_NATIVE_ATTRIBS_ARB);
getval(GL_MAX_PROGRAM_ADDRESS_REGISTERS_ARB);
getval(GL_MAX_PROGRAM_NATIVE_ADDRESS_REGISTERS_ARB);
getval(GL_MAX_PROGRAM_LOCAL_PARAMETERS_ARB);
getval(GL_MAX_PROGRAM_ENV_PARAMETERS_ARB);
getval(GL_MAX_PROGRAM_PARAMETERS_ARB);
#undef getval
} // else
printf("\nGLSL values...\n\n");
#define getval(x) \
val = -1; \
pglGetIntegerv(x, &val); \
printf(#x ": %d\n", (int) val);
getval(GL_MAX_VERTEX_UNIFORM_COMPONENTS_ARB);
getval(GL_MAX_FRAGMENT_UNIFORM_COMPONENTS_ARB);
105
106
107
108
109
110
getval(GL_MAX_VARYING_FLOATS_ARB);
getval(GL_MAX_VERTEX_ATTRIBS_ARB);
getval(GL_MAX_TEXTURE_IMAGE_UNITS_ARB);
getval(GL_MAX_VERTEX_TEXTURE_IMAGE_UNITS_ARB);
getval(GL_MAX_COMBINED_TEXTURE_IMAGE_UNITS_ARB);
getval(GL_MAX_TEXTURE_COORDS_ARB);
112
113
114
115
116
117
118
printf("\nGL_EXT_bindable_uniform values...\n\n");
getval(GL_MAX_VERTEX_BINDABLE_UNIFORMS_EXT);
getval(GL_MAX_FRAGMENT_BINDABLE_UNIFORMS_EXT);
getval(GL_MAX_GEOMETRY_BINDABLE_UNIFORMS_EXT);
getval(GL_MAX_BINDABLE_UNIFORM_SIZE_EXT);
119
120
121
122
123
124
125
#undef getval
SDL_Quit();
printf("\n");
return 0;
}