mesa: Support glGetString(GL_SHADING_LANGUAGE_VERSION) for >= 1.40.
[mesa.git] / src / mesa / main / getstring.c
1 /*
2 * Mesa 3-D graphics library
3 * Version: 7.1
4 *
5 * Copyright (C) 1999-2008 Brian Paul All Rights Reserved.
6 *
7 * Permission is hereby granted, free of charge, to any person obtaining a
8 * copy of this software and associated documentation files (the "Software"),
9 * to deal in the Software without restriction, including without limitation
10 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
11 * and/or sell copies of the Software, and to permit persons to whom the
12 * Software is furnished to do so, subject to the following conditions:
13 *
14 * The above copyright notice and this permission notice shall be included
15 * in all copies or substantial portions of the Software.
16 *
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
18 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
20 * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
21 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
22 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
23 */
24
25
26
27 #include "glheader.h"
28 #include "context.h"
29 #include "get.h"
30 #include "enums.h"
31 #include "extensions.h"
32 #include "mfeatures.h"
33 #include "mtypes.h"
34
35
36 /**
37 * Return the string for a glGetString(GL_SHADING_LANGUAGE_VERSION) query.
38 */
39 static const GLubyte *
40 shading_language_version(struct gl_context *ctx)
41 {
42 switch (ctx->API) {
43 case API_OPENGL:
44 case API_OPENGL_CORE:
45 if (!ctx->Extensions.ARB_shader_objects) {
46 _mesa_error(ctx, GL_INVALID_ENUM, "glGetString");
47 return (const GLubyte *) 0;
48 }
49
50 switch (ctx->Const.GLSLVersion) {
51 case 110:
52 return (const GLubyte *) "1.10";
53 case 120:
54 return (const GLubyte *) "1.20";
55 case 130:
56 return (const GLubyte *) "1.30";
57 case 140:
58 return (const GLubyte *) "1.40";
59 case 150:
60 return (const GLubyte *) "1.50";
61 case 330:
62 return (const GLubyte *) "3.30";
63 case 400:
64 return (const GLubyte *) "4.00";
65 case 410:
66 return (const GLubyte *) "4.10";
67 case 420:
68 return (const GLubyte *) "4.20";
69 default:
70 _mesa_problem(ctx,
71 "Invalid GLSL version in shading_language_version()");
72 return (const GLubyte *) 0;
73 }
74 break;
75
76 case API_OPENGLES2:
77 return (const GLubyte *) "OpenGL ES GLSL ES 1.0.16";
78
79 case API_OPENGLES:
80 /* fall-through */
81
82 default:
83 _mesa_problem(ctx, "Unexpected API value in shading_language_version()");
84 return (const GLubyte *) 0;
85 }
86 }
87
88
89 /**
90 * Query string-valued state. The return value should _not_ be freed by
91 * the caller.
92 *
93 * \param name the state variable to query.
94 *
95 * \sa glGetString().
96 *
97 * Tries to get the string from dd_function_table::GetString, otherwise returns
98 * the hardcoded strings.
99 */
100 const GLubyte * GLAPIENTRY
101 _mesa_GetString( GLenum name )
102 {
103 GET_CURRENT_CONTEXT(ctx);
104 static const char *vendor = "Brian Paul";
105 static const char *renderer = "Mesa";
106
107 if (!ctx)
108 return NULL;
109
110 ASSERT_OUTSIDE_BEGIN_END_WITH_RETVAL(ctx, NULL);
111
112 /* this is a required driver function */
113 assert(ctx->Driver.GetString);
114 {
115 /* Give the driver the chance to handle this query */
116 const GLubyte *str = (*ctx->Driver.GetString)(ctx, name);
117 if (str)
118 return str;
119 }
120
121 switch (name) {
122 case GL_VENDOR:
123 return (const GLubyte *) vendor;
124 case GL_RENDERER:
125 return (const GLubyte *) renderer;
126 case GL_VERSION:
127 return (const GLubyte *) ctx->VersionString;
128 case GL_EXTENSIONS:
129 return (const GLubyte *) ctx->Extensions.String;
130 #if FEATURE_ARB_shading_language_100 || FEATURE_ES2
131 case GL_SHADING_LANGUAGE_VERSION:
132 return shading_language_version(ctx);
133 #endif
134 #if FEATURE_NV_fragment_program || FEATURE_ARB_fragment_program || \
135 FEATURE_NV_vertex_program || FEATURE_ARB_vertex_program
136 case GL_PROGRAM_ERROR_STRING_NV:
137 if (ctx->Extensions.NV_fragment_program ||
138 ctx->Extensions.ARB_fragment_program ||
139 ctx->Extensions.NV_vertex_program ||
140 ctx->Extensions.ARB_vertex_program) {
141 return (const GLubyte *) ctx->Program.ErrorString;
142 }
143 /* FALL-THROUGH */
144 #endif
145 default:
146 _mesa_error( ctx, GL_INVALID_ENUM, "glGetString" );
147 return (const GLubyte *) 0;
148 }
149 }
150
151
152 /**
153 * GL3
154 */
155 const GLubyte * GLAPIENTRY
156 _mesa_GetStringi(GLenum name, GLuint index)
157 {
158 GET_CURRENT_CONTEXT(ctx);
159
160 if (!ctx)
161 return NULL;
162
163 ASSERT_OUTSIDE_BEGIN_END_WITH_RETVAL(ctx, NULL);
164
165 switch (name) {
166 case GL_EXTENSIONS:
167 if (index >= _mesa_get_extension_count(ctx)) {
168 _mesa_error(ctx, GL_INVALID_VALUE, "glGetStringi(index=%u)", index);
169 return (const GLubyte *) 0;
170 }
171 return _mesa_get_enabled_extension(ctx, index);
172 default:
173 _mesa_error( ctx, GL_INVALID_ENUM, "glGetString" );
174 return (const GLubyte *) 0;
175 }
176 }
177
178
179
180 /**
181 * Return pointer-valued state, such as a vertex array pointer.
182 *
183 * \param pname names state to be queried
184 * \param params returns the pointer value
185 *
186 * \sa glGetPointerv().
187 *
188 * Tries to get the specified pointer via dd_function_table::GetPointerv,
189 * otherwise gets the specified pointer from the current context.
190 */
191 void GLAPIENTRY
192 _mesa_GetPointerv( GLenum pname, GLvoid **params )
193 {
194 GET_CURRENT_CONTEXT(ctx);
195 const GLuint clientUnit = ctx->Array.ActiveTexture;
196 ASSERT_OUTSIDE_BEGIN_END(ctx);
197
198 if (!params)
199 return;
200
201 if (MESA_VERBOSE & VERBOSE_API)
202 _mesa_debug(ctx, "glGetPointerv %s\n", _mesa_lookup_enum_by_nr(pname));
203
204 switch (pname) {
205 case GL_VERTEX_ARRAY_POINTER:
206 *params = (GLvoid *) ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_POS].Ptr;
207 break;
208 case GL_NORMAL_ARRAY_POINTER:
209 *params = (GLvoid *) ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_NORMAL].Ptr;
210 break;
211 case GL_COLOR_ARRAY_POINTER:
212 *params = (GLvoid *) ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_COLOR0].Ptr;
213 break;
214 case GL_SECONDARY_COLOR_ARRAY_POINTER_EXT:
215 *params = (GLvoid *) ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_COLOR1].Ptr;
216 break;
217 case GL_FOG_COORDINATE_ARRAY_POINTER_EXT:
218 *params = (GLvoid *) ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_FOG].Ptr;
219 break;
220 case GL_INDEX_ARRAY_POINTER:
221 *params = (GLvoid *) ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_COLOR_INDEX].Ptr;
222 break;
223 case GL_TEXTURE_COORD_ARRAY_POINTER:
224 *params = (GLvoid *) ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_TEX(clientUnit)].Ptr;
225 break;
226 case GL_EDGE_FLAG_ARRAY_POINTER:
227 *params = (GLvoid *) ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_EDGEFLAG].Ptr;
228 break;
229 case GL_FEEDBACK_BUFFER_POINTER:
230 *params = ctx->Feedback.Buffer;
231 break;
232 case GL_SELECTION_BUFFER_POINTER:
233 *params = ctx->Select.Buffer;
234 break;
235 #if FEATURE_point_size_array
236 case GL_POINT_SIZE_ARRAY_POINTER_OES:
237 *params = (GLvoid *) ctx->Array.ArrayObj->VertexAttrib[VERT_ATTRIB_POINT_SIZE].Ptr;
238 break;
239 #endif
240 case GL_DEBUG_CALLBACK_FUNCTION_ARB:
241 *params = (GLvoid *) ctx->Debug.Callback;
242 break;
243 case GL_DEBUG_CALLBACK_USER_PARAM_ARB:
244 *params = ctx->Debug.CallbackData;
245 break;
246 default:
247 _mesa_error( ctx, GL_INVALID_ENUM, "glGetPointerv" );
248 return;
249 }
250 }
251
252
253 /**
254 * Returns the current GL error code, or GL_NO_ERROR.
255 * \return current error code
256 *
257 * Returns __struct gl_contextRec::ErrorValue.
258 */
259 GLenum GLAPIENTRY
260 _mesa_GetError( void )
261 {
262 GET_CURRENT_CONTEXT(ctx);
263 GLenum e = ctx->ErrorValue;
264 ASSERT_OUTSIDE_BEGIN_END_WITH_RETVAL(ctx, 0);
265
266 if (MESA_VERBOSE & VERBOSE_API)
267 _mesa_debug(ctx, "glGetError <-- %s\n", _mesa_lookup_enum_by_nr(e));
268
269 ctx->ErrorValue = (GLenum) GL_NO_ERROR;
270 ctx->ErrorDebugCount = 0;
271 return e;
272 }
273
274 /**
275 * Returns an error code specified by GL_ARB_robustness, or GL_NO_ERROR.
276 * \return current context status
277 */
278 GLenum GLAPIENTRY
279 _mesa_GetGraphicsResetStatusARB( void )
280 {
281 GET_CURRENT_CONTEXT(ctx);
282 GLenum status = ctx->ResetStatus;
283
284 if (MESA_VERBOSE & VERBOSE_API)
285 _mesa_debug(ctx, "glGetGraphicsResetStatusARB"
286 "(always returns GL_NO_ERROR)\n");
287
288 return status;
289 }