2 * Mesa 3-D graphics library
5 * Copyright (C) 1999-2008 Brian Paul All Rights Reserved.
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:
14 * The above copyright notice and this permission notice shall be included
15 * in all copies or substantial portions of the Software.
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.
31 #include "extensions.h"
36 * Return the string for a glGetString(GL_SHADING_LANGUAGE_VERSION) query.
38 static const GLubyte
*
39 shading_language_version(struct gl_context
*ctx
)
43 if (!ctx
->Extensions
.ARB_shader_objects
) {
44 _mesa_error(ctx
, GL_INVALID_ENUM
, "glGetString");
45 return (const GLubyte
*) 0;
48 switch (ctx
->Const
.GLSLVersion
) {
50 return (const GLubyte
*) "1.10";
52 return (const GLubyte
*) "1.20";
54 return (const GLubyte
*) "1.30";
57 "Invalid GLSL version in shading_language_version()");
58 return (const GLubyte
*) 0;
63 return (const GLubyte
*) "OpenGL ES GLSL ES 1.0.16";
69 _mesa_problem(ctx
, "Unexpected API value in shading_language_version()");
70 return (const GLubyte
*) 0;
76 * Query string-valued state. The return value should _not_ be freed by
79 * \param name the state variable to query.
83 * Tries to get the string from dd_function_table::GetString, otherwise returns
84 * the hardcoded strings.
86 const GLubyte
* GLAPIENTRY
87 _mesa_GetString( GLenum name
)
89 GET_CURRENT_CONTEXT(ctx
);
90 static const char *vendor
= "Brian Paul";
91 static const char *renderer
= "Mesa";
96 ASSERT_OUTSIDE_BEGIN_END_WITH_RETVAL(ctx
, NULL
);
98 /* this is a required driver function */
99 assert(ctx
->Driver
.GetString
);
101 /* Give the driver the chance to handle this query */
102 const GLubyte
*str
= (*ctx
->Driver
.GetString
)(ctx
, name
);
109 return (const GLubyte
*) vendor
;
111 return (const GLubyte
*) renderer
;
113 return (const GLubyte
*) ctx
->VersionString
;
115 return (const GLubyte
*) ctx
->Extensions
.String
;
116 #if FEATURE_ARB_shading_language_100 || FEATURE_ES2
117 case GL_SHADING_LANGUAGE_VERSION
:
118 return shading_language_version(ctx
);
120 #if FEATURE_NV_fragment_program || FEATURE_ARB_fragment_program || \
121 FEATURE_NV_vertex_program || FEATURE_ARB_vertex_program
122 case GL_PROGRAM_ERROR_STRING_NV
:
123 if (ctx
->Extensions
.NV_fragment_program
||
124 ctx
->Extensions
.ARB_fragment_program
||
125 ctx
->Extensions
.NV_vertex_program
||
126 ctx
->Extensions
.ARB_vertex_program
) {
127 return (const GLubyte
*) ctx
->Program
.ErrorString
;
132 _mesa_error( ctx
, GL_INVALID_ENUM
, "glGetString" );
133 return (const GLubyte
*) 0;
141 const GLubyte
* GLAPIENTRY
142 _mesa_GetStringi(GLenum name
, GLuint index
)
144 GET_CURRENT_CONTEXT(ctx
);
149 ASSERT_OUTSIDE_BEGIN_END_WITH_RETVAL(ctx
, NULL
);
153 if (index
>= _mesa_get_extension_count(ctx
)) {
154 _mesa_error(ctx
, GL_INVALID_VALUE
, "glGetStringi(index=%u)", index
);
155 return (const GLubyte
*) 0;
157 return _mesa_get_enabled_extension(ctx
, index
);
159 _mesa_error( ctx
, GL_INVALID_ENUM
, "glGetString" );
160 return (const GLubyte
*) 0;
167 * Return pointer-valued state, such as a vertex array pointer.
169 * \param pname names state to be queried
170 * \param params returns the pointer value
172 * \sa glGetPointerv().
174 * Tries to get the specified pointer via dd_function_table::GetPointerv,
175 * otherwise gets the specified pointer from the current context.
178 _mesa_GetPointerv( GLenum pname
, GLvoid
**params
)
180 GET_CURRENT_CONTEXT(ctx
);
181 const GLuint clientUnit
= ctx
->Array
.ActiveTexture
;
182 ASSERT_OUTSIDE_BEGIN_END(ctx
);
187 if (MESA_VERBOSE
& VERBOSE_API
)
188 _mesa_debug(ctx
, "glGetPointerv %s\n", _mesa_lookup_enum_by_nr(pname
));
191 case GL_VERTEX_ARRAY_POINTER
:
192 *params
= (GLvoid
*) ctx
->Array
.ArrayObj
->Vertex
.Ptr
;
194 case GL_NORMAL_ARRAY_POINTER
:
195 *params
= (GLvoid
*) ctx
->Array
.ArrayObj
->Normal
.Ptr
;
197 case GL_COLOR_ARRAY_POINTER
:
198 *params
= (GLvoid
*) ctx
->Array
.ArrayObj
->Color
.Ptr
;
200 case GL_SECONDARY_COLOR_ARRAY_POINTER_EXT
:
201 *params
= (GLvoid
*) ctx
->Array
.ArrayObj
->SecondaryColor
.Ptr
;
203 case GL_FOG_COORDINATE_ARRAY_POINTER_EXT
:
204 *params
= (GLvoid
*) ctx
->Array
.ArrayObj
->FogCoord
.Ptr
;
206 case GL_INDEX_ARRAY_POINTER
:
207 *params
= (GLvoid
*) ctx
->Array
.ArrayObj
->Index
.Ptr
;
209 case GL_TEXTURE_COORD_ARRAY_POINTER
:
210 *params
= (GLvoid
*) ctx
->Array
.ArrayObj
->TexCoord
[clientUnit
].Ptr
;
212 case GL_EDGE_FLAG_ARRAY_POINTER
:
213 *params
= (GLvoid
*) ctx
->Array
.ArrayObj
->EdgeFlag
.Ptr
;
215 case GL_FEEDBACK_BUFFER_POINTER
:
216 *params
= ctx
->Feedback
.Buffer
;
218 case GL_SELECTION_BUFFER_POINTER
:
219 *params
= ctx
->Select
.Buffer
;
221 #if FEATURE_point_size_array
222 case GL_POINT_SIZE_ARRAY_POINTER_OES
:
223 *params
= (GLvoid
*) ctx
->Array
.ArrayObj
->PointSize
.Ptr
;
227 _mesa_error( ctx
, GL_INVALID_ENUM
, "glGetPointerv" );
234 * Returns the current GL error code, or GL_NO_ERROR.
235 * \return current error code
237 * Returns __struct gl_contextRec::ErrorValue.
240 _mesa_GetError( void )
242 GET_CURRENT_CONTEXT(ctx
);
243 GLenum e
= ctx
->ErrorValue
;
244 ASSERT_OUTSIDE_BEGIN_END_WITH_RETVAL(ctx
, 0);
246 if (MESA_VERBOSE
& VERBOSE_API
)
247 _mesa_debug(ctx
, "glGetError <-- %s\n", _mesa_lookup_enum_by_nr(e
));
249 ctx
->ErrorValue
= (GLenum
) GL_NO_ERROR
;
250 ctx
->ErrorDebugCount
= 0;