2002-03-07 21:50:41 +00:00
|
|
|
/* $Id: glapi.c,v 1.61 2002/03/07 21:50:41 brianp Exp $ */
|
1999-11-11 01:22:25 +00:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Mesa 3-D graphics library
|
2002-03-07 21:50:41 +00:00
|
|
|
* Version: 4.1
|
1999-11-11 01:22:25 +00:00
|
|
|
*
|
2002-03-07 21:50:41 +00:00
|
|
|
* Copyright (C) 1999-2002 Brian Paul All Rights Reserved.
|
1999-11-11 01:22:25 +00:00
|
|
|
*
|
|
|
|
* Permission is hereby granted, free of charge, to any person obtaining a
|
|
|
|
* copy of this software and associated documentation files (the "Software"),
|
|
|
|
* to deal in the Software without restriction, including without limitation
|
|
|
|
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
|
|
|
|
* and/or sell copies of the Software, and to permit persons to whom the
|
|
|
|
* Software is furnished to do so, subject to the following conditions:
|
|
|
|
*
|
|
|
|
* The above copyright notice and this permission notice shall be included
|
|
|
|
* in all copies or substantial portions of the Software.
|
|
|
|
*
|
|
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
|
|
|
|
* OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
|
|
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
|
|
|
* BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
|
|
|
|
* AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
|
|
|
|
* CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
1999-11-25 18:17:04 +00:00
|
|
|
/*
|
|
|
|
* This file manages the OpenGL API dispatch layer.
|
|
|
|
* The dispatch table (struct _glapi_table) is basically just a list
|
|
|
|
* of function pointers.
|
|
|
|
* There are functions to set/get the current dispatch table for the
|
|
|
|
* current thread and to manage registration/dispatch of dynamically
|
|
|
|
* added extension functions.
|
2000-01-28 19:03:33 +00:00
|
|
|
*
|
|
|
|
* It's intended that this file and the other glapi*.[ch] files are
|
|
|
|
* flexible enough to be reused in several places: XFree86, DRI-
|
|
|
|
* based libGL.so, and perhaps the SGI SI.
|
|
|
|
*
|
|
|
|
* There are no dependencies on Mesa in this code.
|
2001-01-23 23:35:47 +00:00
|
|
|
*
|
|
|
|
* Versions (API changes):
|
|
|
|
* 2000/02/23 - original version for Mesa 3.3 and XFree86 4.0
|
|
|
|
* 2001/01/16 - added dispatch override feature for Mesa 3.5
|
1999-11-25 18:17:04 +00:00
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
|
|
|
2000-02-10 21:27:48 +00:00
|
|
|
#include "glheader.h"
|
1999-11-11 01:22:25 +00:00
|
|
|
#include "glapi.h"
|
1999-12-16 12:38:11 +00:00
|
|
|
#include "glapioffsets.h"
|
|
|
|
#include "glapitable.h"
|
2000-01-28 19:03:33 +00:00
|
|
|
#include "glthread.h"
|
1999-12-16 17:31:59 +00:00
|
|
|
|
2001-03-28 18:19:58 +01:00
|
|
|
/***** BEGIN NO-OP DISPATCH *****/
|
|
|
|
|
|
|
|
static GLboolean WarnFlag = GL_FALSE;
|
|
|
|
|
|
|
|
void
|
|
|
|
_glapi_noop_enable_warnings(GLboolean enable)
|
|
|
|
{
|
|
|
|
WarnFlag = enable;
|
|
|
|
}
|
|
|
|
|
|
|
|
static GLboolean
|
|
|
|
warn(void)
|
|
|
|
{
|
|
|
|
if (WarnFlag || getenv("MESA_DEBUG") || getenv("LIBGL_DEBUG"))
|
|
|
|
return GL_TRUE;
|
|
|
|
else
|
|
|
|
return GL_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
#define KEYWORD1 static
|
|
|
|
#define KEYWORD2
|
|
|
|
#define NAME(func) NoOp##func
|
|
|
|
|
|
|
|
#define F stderr
|
|
|
|
|
|
|
|
#define DISPATCH(func, args, msg) \
|
|
|
|
if (warn()) { \
|
|
|
|
fprintf(stderr, "GL User Error: calling "); \
|
|
|
|
fprintf msg; \
|
|
|
|
fprintf(stderr, " without a current context\n"); \
|
|
|
|
}
|
|
|
|
|
|
|
|
#define RETURN_DISPATCH(func, args, msg) \
|
|
|
|
if (warn()) { \
|
|
|
|
fprintf(stderr, "GL User Error: calling "); \
|
|
|
|
fprintf msg; \
|
|
|
|
fprintf(stderr, " without a current context\n"); \
|
|
|
|
} \
|
|
|
|
return 0
|
|
|
|
|
|
|
|
#define DISPATCH_TABLE_NAME __glapi_noop_table
|
|
|
|
#define UNUSED_TABLE_NAME __usused_noop_functions
|
|
|
|
|
|
|
|
#define TABLE_ENTRY(name) (void *) NoOp##name
|
|
|
|
|
|
|
|
static int NoOpUnused(void)
|
|
|
|
{
|
|
|
|
if (warn()) {
|
|
|
|
fprintf(stderr, "GL User Error: calling extension function without a current context\n");
|
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
#include "glapitemp.h"
|
|
|
|
|
|
|
|
/***** END NO-OP DISPATCH *****/
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/***** BEGIN THREAD-SAFE DISPATCH *****/
|
|
|
|
/* if we support thread-safety, build a special dispatch table for use
|
|
|
|
* in thread-safety mode (ThreadSafe == GL_TRUE). Each entry in the
|
|
|
|
* dispatch table will call _glthread_GetTSD() to get the actual dispatch
|
|
|
|
* table bound to the current thread, then jump through that table.
|
|
|
|
*/
|
1999-12-15 15:02:30 +00:00
|
|
|
|
|
|
|
#if defined(THREADS)
|
1999-12-16 17:31:59 +00:00
|
|
|
|
2001-03-28 18:19:58 +01:00
|
|
|
static GLboolean ThreadSafe = GL_FALSE; /* In thread-safe mode? */
|
|
|
|
static _glthread_TSD DispatchTSD; /* Per-thread dispatch pointer */
|
|
|
|
static _glthread_TSD RealDispatchTSD; /* only when using override */
|
|
|
|
static _glthread_TSD ContextTSD; /* Per-thread context pointer */
|
|
|
|
|
|
|
|
|
|
|
|
#define KEYWORD1 static
|
|
|
|
#define KEYWORD2 GLAPIENTRY
|
|
|
|
#define NAME(func) _ts_##func
|
|
|
|
|
|
|
|
#define DISPATCH(FUNC, ARGS, MESSAGE) \
|
|
|
|
struct _glapi_table *dispatch; \
|
|
|
|
dispatch = (struct _glapi_table *) _glthread_GetTSD(&DispatchTSD); \
|
|
|
|
if (!dispatch) \
|
|
|
|
dispatch = (struct _glapi_table *) __glapi_noop_table; \
|
|
|
|
(dispatch->FUNC) ARGS
|
|
|
|
|
|
|
|
#define RETURN_DISPATCH(FUNC, ARGS, MESSAGE) \
|
|
|
|
struct _glapi_table *dispatch; \
|
|
|
|
dispatch = (struct _glapi_table *) _glthread_GetTSD(&DispatchTSD); \
|
|
|
|
if (!dispatch) \
|
|
|
|
dispatch = (struct _glapi_table *) __glapi_noop_table; \
|
|
|
|
return (dispatch->FUNC) ARGS
|
|
|
|
|
|
|
|
#define DISPATCH_TABLE_NAME __glapi_threadsafe_table
|
|
|
|
#define UNUSED_TABLE_NAME __usused_threadsafe_functions
|
|
|
|
|
|
|
|
#define TABLE_ENTRY(name) (void *) _ts_##name
|
2000-01-07 07:30:13 +00:00
|
|
|
|
2001-03-28 18:19:58 +01:00
|
|
|
static int _ts_Unused(void)
|
|
|
|
{
|
|
|
|
return 0;
|
|
|
|
}
|
1999-12-16 17:31:59 +00:00
|
|
|
|
2001-03-28 18:19:58 +01:00
|
|
|
#include "glapitemp.h"
|
1999-12-17 14:51:28 +00:00
|
|
|
|
1999-12-15 15:02:30 +00:00
|
|
|
#endif
|
1999-11-11 01:22:25 +00:00
|
|
|
|
2001-03-28 18:19:58 +01:00
|
|
|
/***** END THREAD-SAFE DISPATCH *****/
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
struct _glapi_table *_glapi_Dispatch = (struct _glapi_table *) __glapi_noop_table;
|
|
|
|
struct _glapi_table *_glapi_RealDispatch = (struct _glapi_table *) __glapi_noop_table;
|
|
|
|
|
|
|
|
/* Used when thread safety disabled */
|
|
|
|
void *_glapi_Context = NULL;
|
1999-11-11 01:22:25 +00:00
|
|
|
|
|
|
|
|
1999-12-16 17:31:59 +00:00
|
|
|
static GLuint MaxDispatchOffset = sizeof(struct _glapi_table) / sizeof(void *) - 1;
|
|
|
|
static GLboolean GetSizeCalled = GL_FALSE;
|
|
|
|
|
2001-01-23 23:35:47 +00:00
|
|
|
static GLboolean DispatchOverride = GL_FALSE;
|
|
|
|
|
|
|
|
|
2001-03-28 18:19:58 +01:00
|
|
|
/* strdup() is actually not a standard ANSI C or POSIX routine.
|
|
|
|
* Irix will not define it if ANSI mode is in effect.
|
|
|
|
*/
|
|
|
|
static char *
|
|
|
|
str_dup(const char *str)
|
2000-03-27 22:13:58 +01:00
|
|
|
{
|
2000-03-29 19:46:11 +01:00
|
|
|
char *copy;
|
|
|
|
copy = (char*) malloc(strlen(str) + 1);
|
|
|
|
if (!copy)
|
|
|
|
return NULL;
|
|
|
|
strcpy(copy, str);
|
|
|
|
return copy;
|
2000-03-27 22:13:58 +01:00
|
|
|
}
|
|
|
|
|
1999-12-16 17:31:59 +00:00
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* We should call this periodically from a function such as glXMakeCurrent
|
2002-03-07 21:50:41 +00:00
|
|
|
* in order to test if multiple threads are being used.
|
1999-12-16 17:31:59 +00:00
|
|
|
*/
|
|
|
|
void
|
|
|
|
_glapi_check_multithread(void)
|
|
|
|
{
|
|
|
|
#if defined(THREADS)
|
2000-01-05 04:36:17 +00:00
|
|
|
if (!ThreadSafe) {
|
1999-12-16 17:31:59 +00:00
|
|
|
static unsigned long knownID;
|
|
|
|
static GLboolean firstCall = GL_TRUE;
|
|
|
|
if (firstCall) {
|
|
|
|
knownID = _glthread_GetID();
|
|
|
|
firstCall = GL_FALSE;
|
|
|
|
}
|
|
|
|
else if (knownID != _glthread_GetID()) {
|
2000-01-05 04:36:17 +00:00
|
|
|
ThreadSafe = GL_TRUE;
|
1999-12-16 17:31:59 +00:00
|
|
|
}
|
|
|
|
}
|
2000-01-05 04:36:17 +00:00
|
|
|
if (ThreadSafe) {
|
1999-12-16 17:31:59 +00:00
|
|
|
/* make sure that this thread's dispatch pointer isn't null */
|
|
|
|
if (!_glapi_get_dispatch()) {
|
|
|
|
_glapi_set_dispatch(NULL);
|
|
|
|
}
|
1999-12-15 15:02:30 +00:00
|
|
|
}
|
1999-12-16 17:31:59 +00:00
|
|
|
#endif
|
|
|
|
}
|
1999-12-15 15:02:30 +00:00
|
|
|
|
1999-11-11 01:22:25 +00:00
|
|
|
|
|
|
|
|
1999-12-17 14:51:28 +00:00
|
|
|
/*
|
|
|
|
* Set the current context pointer for this thread.
|
|
|
|
* The context pointer is an opaque type which should be cast to
|
|
|
|
* void from the real context pointer type.
|
|
|
|
*/
|
|
|
|
void
|
2000-01-28 20:17:42 +00:00
|
|
|
_glapi_set_context(void *context)
|
1999-12-17 14:51:28 +00:00
|
|
|
{
|
|
|
|
#if defined(THREADS)
|
2000-02-10 21:27:48 +00:00
|
|
|
_glthread_SetTSD(&ContextTSD, context);
|
2000-01-05 04:36:17 +00:00
|
|
|
if (ThreadSafe)
|
2000-01-28 20:17:42 +00:00
|
|
|
_glapi_Context = NULL;
|
1999-12-17 14:51:28 +00:00
|
|
|
else
|
2000-01-28 20:17:42 +00:00
|
|
|
_glapi_Context = context;
|
1999-12-17 14:51:28 +00:00
|
|
|
#else
|
2000-01-28 20:17:42 +00:00
|
|
|
_glapi_Context = context;
|
1999-12-17 14:51:28 +00:00
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Get the current context pointer for this thread.
|
|
|
|
* The context pointer is an opaque type which should be cast from
|
|
|
|
* void to the real context pointer type.
|
|
|
|
*/
|
|
|
|
void *
|
2000-01-28 20:17:42 +00:00
|
|
|
_glapi_get_context(void)
|
1999-12-17 14:51:28 +00:00
|
|
|
{
|
|
|
|
#if defined(THREADS)
|
2000-01-05 04:36:17 +00:00
|
|
|
if (ThreadSafe) {
|
1999-12-17 14:51:28 +00:00
|
|
|
return _glthread_GetTSD(&ContextTSD);
|
|
|
|
}
|
|
|
|
else {
|
2000-01-28 20:17:42 +00:00
|
|
|
return _glapi_Context;
|
1999-12-17 14:51:28 +00:00
|
|
|
}
|
|
|
|
#else
|
2000-01-28 20:17:42 +00:00
|
|
|
return _glapi_Context;
|
1999-12-17 14:51:28 +00:00
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
1999-11-19 22:33:50 +00:00
|
|
|
/*
|
|
|
|
* Set the global or per-thread dispatch table pointer.
|
|
|
|
*/
|
|
|
|
void
|
|
|
|
_glapi_set_dispatch(struct _glapi_table *dispatch)
|
1999-11-11 01:22:25 +00:00
|
|
|
{
|
1999-11-19 22:33:50 +00:00
|
|
|
if (!dispatch) {
|
|
|
|
/* use the no-op functions */
|
2000-02-24 22:14:04 +00:00
|
|
|
dispatch = (struct _glapi_table *) __glapi_noop_table;
|
1999-11-19 22:33:50 +00:00
|
|
|
}
|
|
|
|
#ifdef DEBUG
|
|
|
|
else {
|
|
|
|
_glapi_check_table(dispatch);
|
|
|
|
}
|
|
|
|
#endif
|
1999-11-11 01:22:25 +00:00
|
|
|
|
1999-11-19 22:33:50 +00:00
|
|
|
#if defined(THREADS)
|
2001-01-23 23:35:47 +00:00
|
|
|
if (DispatchOverride) {
|
|
|
|
_glthread_SetTSD(&RealDispatchTSD, (void *) dispatch);
|
2000-09-05 21:17:37 +01:00
|
|
|
if (ThreadSafe)
|
2001-03-28 18:19:58 +01:00
|
|
|
_glapi_RealDispatch = (struct _glapi_table*) __glapi_threadsafe_table;
|
2000-09-05 21:17:37 +01:00
|
|
|
else
|
2001-01-23 23:35:47 +00:00
|
|
|
_glapi_RealDispatch = dispatch;
|
2000-09-26 16:27:20 +01:00
|
|
|
}
|
|
|
|
else {
|
2001-01-23 23:35:47 +00:00
|
|
|
/* normal operation */
|
2000-09-26 16:27:20 +01:00
|
|
|
_glthread_SetTSD(&DispatchTSD, (void *) dispatch);
|
2000-09-05 21:17:37 +01:00
|
|
|
if (ThreadSafe)
|
2001-03-28 18:19:58 +01:00
|
|
|
_glapi_Dispatch = (struct _glapi_table *) __glapi_threadsafe_table;
|
2000-09-05 21:17:37 +01:00
|
|
|
else
|
|
|
|
_glapi_Dispatch = dispatch;
|
|
|
|
}
|
|
|
|
#else /*THREADS*/
|
2001-01-23 23:35:47 +00:00
|
|
|
if (DispatchOverride) {
|
|
|
|
_glapi_RealDispatch = dispatch;
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
_glapi_Dispatch = dispatch;
|
|
|
|
}
|
2000-09-05 21:17:37 +01:00
|
|
|
#endif /*THREADS*/
|
1999-11-11 01:22:25 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
1999-12-16 17:31:59 +00:00
|
|
|
|
1999-11-19 22:33:50 +00:00
|
|
|
/*
|
1999-12-16 17:31:59 +00:00
|
|
|
* Return pointer to current dispatch table for calling thread.
|
1999-11-19 22:33:50 +00:00
|
|
|
*/
|
|
|
|
struct _glapi_table *
|
|
|
|
_glapi_get_dispatch(void)
|
1999-11-11 01:22:25 +00:00
|
|
|
{
|
1999-11-19 22:33:50 +00:00
|
|
|
#if defined(THREADS)
|
2000-01-05 04:36:17 +00:00
|
|
|
if (ThreadSafe) {
|
2001-01-23 23:35:47 +00:00
|
|
|
if (DispatchOverride) {
|
|
|
|
return (struct _glapi_table *) _glthread_GetTSD(&RealDispatchTSD);
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
return (struct _glapi_table *) _glthread_GetTSD(&DispatchTSD);
|
|
|
|
}
|
1999-12-16 17:31:59 +00:00
|
|
|
}
|
1999-12-17 12:20:23 +00:00
|
|
|
else {
|
2001-01-23 23:35:47 +00:00
|
|
|
if (DispatchOverride) {
|
|
|
|
assert(_glapi_RealDispatch);
|
|
|
|
return _glapi_RealDispatch;
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
assert(_glapi_Dispatch);
|
|
|
|
return _glapi_Dispatch;
|
|
|
|
}
|
1999-12-17 12:20:23 +00:00
|
|
|
}
|
1999-11-19 22:33:50 +00:00
|
|
|
#else
|
2000-01-17 19:28:31 +00:00
|
|
|
return _glapi_Dispatch;
|
1999-11-19 22:33:50 +00:00
|
|
|
#endif
|
1999-11-11 01:22:25 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2001-01-23 23:35:47 +00:00
|
|
|
/*
|
|
|
|
* Notes on dispatch overrride:
|
|
|
|
*
|
|
|
|
* Dispatch override allows an external agent to hook into the GL dispatch
|
|
|
|
* mechanism before execution goes into the core rendering library. For
|
|
|
|
* example, a trace mechanism would insert itself as an overrider, print
|
|
|
|
* logging info for each GL function, then dispatch to the real GL function.
|
|
|
|
*
|
|
|
|
* libGLS (GL Stream library) is another agent that might use override.
|
|
|
|
*
|
|
|
|
* We don't allow more than one layer of overriding at this time.
|
|
|
|
* In the future we may allow nested/layered override. In that case
|
|
|
|
* _glapi_begin_dispatch_override() will return an override layer,
|
|
|
|
* _glapi_end_dispatch_override(layer) will remove an override layer
|
|
|
|
* and _glapi_get_override_dispatch(layer) will return the dispatch
|
|
|
|
* table for a given override layer. layer = 0 will be the "real"
|
|
|
|
* dispatch table.
|
|
|
|
*/
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Return: dispatch override layer number.
|
|
|
|
*/
|
|
|
|
int
|
|
|
|
_glapi_begin_dispatch_override(struct _glapi_table *override)
|
2000-09-05 21:17:37 +01:00
|
|
|
{
|
2001-01-23 23:35:47 +00:00
|
|
|
struct _glapi_table *real = _glapi_get_dispatch();
|
|
|
|
|
|
|
|
assert(!DispatchOverride); /* can't nest at this time */
|
|
|
|
DispatchOverride = GL_TRUE;
|
|
|
|
|
|
|
|
_glapi_set_dispatch(real);
|
2000-09-05 21:17:37 +01:00
|
|
|
|
|
|
|
#if defined(THREADS)
|
2001-01-23 23:35:47 +00:00
|
|
|
_glthread_SetTSD(&DispatchTSD, (void *) override);
|
|
|
|
if (ThreadSafe)
|
2001-03-28 18:19:58 +01:00
|
|
|
_glapi_Dispatch = (struct _glapi_table *) __glapi_threadsafe_table;
|
2001-01-23 23:35:47 +00:00
|
|
|
else
|
|
|
|
_glapi_Dispatch = override;
|
|
|
|
#else
|
|
|
|
_glapi_Dispatch = override;
|
|
|
|
#endif
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
void
|
|
|
|
_glapi_end_dispatch_override(int layer)
|
|
|
|
{
|
|
|
|
struct _glapi_table *real = _glapi_get_dispatch();
|
|
|
|
(void) layer;
|
|
|
|
DispatchOverride = GL_FALSE;
|
|
|
|
_glapi_set_dispatch(real);
|
|
|
|
/* the rest of this isn't needed, just play it safe */
|
|
|
|
#if defined(THREADS)
|
|
|
|
_glthread_SetTSD(&RealDispatchTSD, NULL);
|
|
|
|
#endif
|
|
|
|
_glapi_RealDispatch = NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
struct _glapi_table *
|
|
|
|
_glapi_get_override_dispatch(int layer)
|
|
|
|
{
|
|
|
|
if (layer == 0) {
|
|
|
|
return _glapi_get_dispatch();
|
2000-09-05 21:17:37 +01:00
|
|
|
}
|
|
|
|
else {
|
2001-01-23 23:35:47 +00:00
|
|
|
if (DispatchOverride) {
|
|
|
|
#if defined(THREADS)
|
|
|
|
return (struct _glapi_table *) _glthread_GetTSD(&DispatchTSD);
|
2000-09-05 21:17:37 +01:00
|
|
|
#else
|
2001-01-23 23:35:47 +00:00
|
|
|
return _glapi_Dispatch;
|
2000-09-05 21:17:37 +01:00
|
|
|
#endif
|
2001-01-23 23:35:47 +00:00
|
|
|
}
|
|
|
|
else {
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
}
|
2000-09-05 21:17:37 +01:00
|
|
|
}
|
2001-01-23 23:35:47 +00:00
|
|
|
|
2000-09-05 21:17:37 +01:00
|
|
|
|
1999-11-27 21:30:40 +00:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Return size of dispatch table struct as number of functions (or
|
|
|
|
* slots).
|
|
|
|
*/
|
|
|
|
GLuint
|
|
|
|
_glapi_get_dispatch_table_size(void)
|
|
|
|
{
|
1999-12-15 15:02:30 +00:00
|
|
|
/* return sizeof(struct _glapi_table) / sizeof(void *);*/
|
|
|
|
GetSizeCalled = GL_TRUE;
|
|
|
|
return MaxDispatchOffset + 1;
|
1999-11-27 21:30:40 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
1999-11-19 22:33:50 +00:00
|
|
|
/*
|
|
|
|
* Get API dispatcher version string.
|
|
|
|
*/
|
|
|
|
const char *
|
|
|
|
_glapi_get_version(void)
|
1999-11-11 01:22:25 +00:00
|
|
|
{
|
2001-01-23 23:35:47 +00:00
|
|
|
return "20010116"; /* YYYYMMDD */
|
1999-11-11 01:22:25 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2000-03-19 01:10:11 +00:00
|
|
|
struct name_address_offset {
|
|
|
|
const char *Name;
|
|
|
|
GLvoid *Address;
|
|
|
|
GLuint Offset;
|
|
|
|
};
|
|
|
|
|
1999-12-16 12:38:11 +00:00
|
|
|
|
2001-11-18 22:48:11 +00:00
|
|
|
/* The code in this file is auto-generated */
|
|
|
|
#include "glprocs.h"
|
2000-03-19 01:10:11 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Return dispatch table offset of the named static (built-in) function.
|
|
|
|
* Return -1 if function not found.
|
|
|
|
*/
|
|
|
|
static GLint
|
|
|
|
get_static_proc_offset(const char *funcName)
|
|
|
|
{
|
|
|
|
GLuint i;
|
|
|
|
for (i = 0; static_functions[i].Name; i++) {
|
|
|
|
if (strcmp(static_functions[i].Name, funcName) == 0) {
|
2001-09-14 03:48:53 +01:00
|
|
|
return static_functions[i].Offset;
|
2000-03-19 01:10:11 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Return dispatch function address the named static (built-in) function.
|
|
|
|
* Return NULL if function not found.
|
|
|
|
*/
|
|
|
|
static GLvoid *
|
|
|
|
get_static_proc_address(const char *funcName)
|
|
|
|
{
|
2000-10-19 21:13:12 +01:00
|
|
|
GLint i;
|
|
|
|
for (i = 0; static_functions[i].Name; i++) {
|
|
|
|
if (strcmp(static_functions[i].Name, funcName) == 0) {
|
|
|
|
return static_functions[i].Address;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return NULL;
|
2000-03-19 01:10:11 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/**********************************************************************
|
|
|
|
* Extension function management.
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
|
|
#define MAX_EXTENSION_FUNCS 1000
|
|
|
|
|
|
|
|
static struct name_address_offset ExtEntryTable[MAX_EXTENSION_FUNCS];
|
|
|
|
static GLuint NumExtEntryPoints = 0;
|
|
|
|
|
2001-06-06 23:55:28 +01:00
|
|
|
#ifdef USE_SPARC_ASM
|
|
|
|
extern void __glapi_sparc_icache_flush(unsigned int *);
|
|
|
|
#endif
|
2000-03-19 01:10:11 +00:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Generate a dispatch function (entrypoint) which jumps through
|
|
|
|
* the given slot number (offset) in the current dispatch table.
|
|
|
|
* We need assembly language in order to accomplish this.
|
|
|
|
*/
|
|
|
|
static void *
|
|
|
|
generate_entrypoint(GLuint functionOffset)
|
|
|
|
{
|
|
|
|
#if defined(USE_X86_ASM)
|
|
|
|
/*
|
|
|
|
* This x86 code contributed by Josh Vanderhoof.
|
|
|
|
*
|
|
|
|
* 0: a1 10 32 54 76 movl __glapi_Dispatch,%eax
|
|
|
|
* 00 01 02 03 04
|
|
|
|
* 5: 85 c0 testl %eax,%eax
|
|
|
|
* 05 06
|
|
|
|
* 7: 74 06 je f <entrypoint+0xf>
|
|
|
|
* 07 08
|
|
|
|
* 9: ff a0 10 32 54 76 jmp *0x76543210(%eax)
|
|
|
|
* 09 0a 0b 0c 0d 0e
|
|
|
|
* f: e8 fc ff ff ff call __glapi_get_dispatch
|
|
|
|
* 0f 10 11 12 13
|
|
|
|
* 14: ff a0 10 32 54 76 jmp *0x76543210(%eax)
|
|
|
|
* 14 15 16 17 18 19
|
|
|
|
*/
|
|
|
|
static const unsigned char temp[] = {
|
|
|
|
0xa1, 0x00, 0x00, 0x00, 0x00,
|
|
|
|
0x85, 0xc0,
|
|
|
|
0x74, 0x06,
|
|
|
|
0xff, 0xa0, 0x00, 0x00, 0x00, 0x00,
|
|
|
|
0xe8, 0x00, 0x00, 0x00, 0x00,
|
|
|
|
0xff, 0xa0, 0x00, 0x00, 0x00, 0x00
|
|
|
|
};
|
|
|
|
unsigned char *code = malloc(sizeof(temp));
|
|
|
|
unsigned int next_insn;
|
|
|
|
if (code) {
|
|
|
|
memcpy(code, temp, sizeof(temp));
|
|
|
|
|
|
|
|
*(unsigned int *)(code + 0x01) = (unsigned int)&_glapi_Dispatch;
|
|
|
|
*(unsigned int *)(code + 0x0b) = (unsigned int)functionOffset * 4;
|
|
|
|
next_insn = (unsigned int)(code + 0x14);
|
|
|
|
*(unsigned int *)(code + 0x10) = (unsigned int)_glapi_get_dispatch - next_insn;
|
|
|
|
*(unsigned int *)(code + 0x16) = (unsigned int)functionOffset * 4;
|
|
|
|
}
|
|
|
|
return code;
|
2001-06-06 00:54:00 +01:00
|
|
|
#elif defined(USE_SPARC_ASM)
|
|
|
|
|
|
|
|
#ifdef __sparc_v9__
|
|
|
|
static const unsigned int insn_template[] = {
|
|
|
|
0x05000000, /* sethi %uhi(_glapi_Dispatch), %g2 */
|
|
|
|
0x03000000, /* sethi %hi(_glapi_Dispatch), %g1 */
|
|
|
|
0x8410a000, /* or %g2, %ulo(_glapi_Dispatch), %g2 */
|
|
|
|
0x82106000, /* or %g1, %lo(_glapi_Dispatch), %g1 */
|
|
|
|
0x8528b020, /* sllx %g2, 32, %g2 */
|
|
|
|
0xc2584002, /* ldx [%g1 + %g2], %g1 */
|
|
|
|
0x05000000, /* sethi %hi(8 * glapioffset), %g2 */
|
|
|
|
0x8410a000, /* or %g2, %lo(8 * glapioffset), %g2 */
|
|
|
|
0xc6584002, /* ldx [%g1 + %g2], %g3 */
|
|
|
|
0x81c0c000, /* jmpl %g3, %g0 */
|
|
|
|
0x01000000 /* nop */
|
|
|
|
};
|
|
|
|
#else
|
|
|
|
static const unsigned int insn_template[] = {
|
|
|
|
0x03000000, /* sethi %hi(_glapi_Dispatch), %g1 */
|
|
|
|
0xc2006000, /* ld [%g1 + %lo(_glapi_Dispatch)], %g1 */
|
|
|
|
0xc6006000, /* ld [%g1 + %lo(4*glapioffset)], %g3 */
|
|
|
|
0x81c0c000, /* jmpl %g3, %g0 */
|
|
|
|
0x01000000 /* nop */
|
|
|
|
};
|
|
|
|
#endif
|
|
|
|
unsigned int *code = malloc(sizeof(insn_template));
|
|
|
|
unsigned long glapi_addr = (unsigned long) &_glapi_Dispatch;
|
|
|
|
if (code) {
|
|
|
|
memcpy(code, insn_template, sizeof(insn_template));
|
|
|
|
|
|
|
|
#ifdef __sparc_v9__
|
|
|
|
code[0] |= (glapi_addr >> (32 + 10));
|
|
|
|
code[1] |= ((glapi_addr & 0xffffffff) >> 10);
|
2001-06-06 23:55:28 +01:00
|
|
|
__glapi_sparc_icache_flush(&code[0]);
|
2001-06-06 00:54:00 +01:00
|
|
|
code[2] |= ((glapi_addr >> 32) & ((1 << 10) - 1));
|
|
|
|
code[3] |= (glapi_addr & ((1 << 10) - 1));
|
2001-06-06 23:55:28 +01:00
|
|
|
__glapi_sparc_icache_flush(&code[2]);
|
2001-06-06 00:54:00 +01:00
|
|
|
code[6] |= ((functionOffset * 8) >> 10);
|
|
|
|
code[7] |= ((functionOffset * 8) & ((1 << 10) - 1));
|
2001-06-06 23:55:28 +01:00
|
|
|
__glapi_sparc_icache_flush(&code[6]);
|
2001-06-06 00:54:00 +01:00
|
|
|
#else
|
|
|
|
code[0] |= (glapi_addr >> 10);
|
|
|
|
code[1] |= (glapi_addr & ((1 << 10) - 1));
|
2001-06-06 23:55:28 +01:00
|
|
|
__glapi_sparc_icache_flush(&code[0]);
|
2001-06-06 00:54:00 +01:00
|
|
|
code[2] |= (functionOffset * 4);
|
2001-06-06 23:55:28 +01:00
|
|
|
__glapi_sparc_icache_flush(&code[2]);
|
2001-06-06 00:54:00 +01:00
|
|
|
#endif
|
|
|
|
}
|
|
|
|
return code;
|
2000-03-19 01:10:11 +00:00
|
|
|
#else
|
|
|
|
return NULL;
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Add a new extension function entrypoint.
|
|
|
|
* Return: GL_TRUE = success or GL_FALSE = failure
|
|
|
|
*/
|
|
|
|
GLboolean
|
|
|
|
_glapi_add_entrypoint(const char *funcName, GLuint offset)
|
|
|
|
{
|
|
|
|
/* first check if the named function is already statically present */
|
|
|
|
{
|
|
|
|
GLint index = get_static_proc_offset(funcName);
|
|
|
|
if (index >= 0) {
|
2001-03-07 05:06:11 +00:00
|
|
|
return (GLboolean) ((GLuint) index == offset); /* bad offset! */
|
2000-03-19 01:10:11 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
{
|
|
|
|
/* make sure this offset/name pair is legal */
|
|
|
|
const char *name = _glapi_get_proc_name(offset);
|
|
|
|
if (name && strcmp(name, funcName) != 0)
|
|
|
|
return GL_FALSE; /* bad name! */
|
|
|
|
}
|
|
|
|
|
|
|
|
{
|
|
|
|
/* be sure index and name match known data */
|
|
|
|
GLuint i;
|
|
|
|
for (i = 0; i < NumExtEntryPoints; i++) {
|
|
|
|
if (strcmp(ExtEntryTable[i].Name, funcName) == 0) {
|
|
|
|
/* function already registered with api */
|
|
|
|
if (ExtEntryTable[i].Offset == offset) {
|
|
|
|
return GL_TRUE; /* offsets match */
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
return GL_FALSE; /* bad offset! */
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2000-05-24 18:53:30 +01:00
|
|
|
/* Make sure we don't try to add a new entrypoint after someone
|
|
|
|
* has already called _glapi_get_dispatch_table_size()! If that's
|
|
|
|
* happened the caller's information would become out of date.
|
|
|
|
*/
|
|
|
|
if (GetSizeCalled)
|
|
|
|
return GL_FALSE;
|
|
|
|
|
2000-03-19 01:10:11 +00:00
|
|
|
/* make sure we have space */
|
|
|
|
if (NumExtEntryPoints >= MAX_EXTENSION_FUNCS) {
|
|
|
|
return GL_FALSE;
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
void *entrypoint = generate_entrypoint(offset);
|
|
|
|
if (!entrypoint)
|
|
|
|
return GL_FALSE;
|
|
|
|
|
2000-03-29 19:46:11 +01:00
|
|
|
ExtEntryTable[NumExtEntryPoints].Name = str_dup(funcName);
|
2000-03-19 01:10:11 +00:00
|
|
|
ExtEntryTable[NumExtEntryPoints].Offset = offset;
|
|
|
|
ExtEntryTable[NumExtEntryPoints].Address = entrypoint;
|
|
|
|
NumExtEntryPoints++;
|
|
|
|
|
|
|
|
if (offset > MaxDispatchOffset)
|
|
|
|
MaxDispatchOffset = offset;
|
|
|
|
|
|
|
|
return GL_TRUE; /* success */
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/* should never get here, but play it safe */
|
|
|
|
return GL_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#if 0000 /* prototype code for dynamic extension slot allocation */
|
|
|
|
|
|
|
|
static int NextFreeOffset = 409; /*XXX*/
|
|
|
|
#define MAX_DISPATCH_TABLE_SIZE 1000
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Dynamically allocate a dispatch slot for an extension entrypoint
|
|
|
|
* and generate the assembly language dispatch stub.
|
|
|
|
* Return the dispatch offset for the function or -1 if no room or error.
|
|
|
|
*/
|
|
|
|
GLint
|
|
|
|
_glapi_add_entrypoint2(const char *funcName)
|
|
|
|
{
|
|
|
|
int offset;
|
|
|
|
|
|
|
|
/* first see if extension func is already known */
|
|
|
|
offset = _glapi_get_proc_offset(funcName);
|
|
|
|
if (offset >= 0)
|
|
|
|
return offset;
|
|
|
|
|
|
|
|
if (NumExtEntryPoints < MAX_EXTENSION_FUNCS
|
|
|
|
&& NextFreeOffset < MAX_DISPATCH_TABLE_SIZE) {
|
|
|
|
void *entryPoint;
|
|
|
|
offset = NextFreeOffset;
|
|
|
|
entryPoint = generate_entrypoint(offset);
|
|
|
|
if (entryPoint) {
|
|
|
|
NextFreeOffset++;
|
2000-03-29 19:46:11 +01:00
|
|
|
ExtEntryTable[NumExtEntryPoints].Name = str_dup(funcName);
|
2000-03-19 01:10:11 +00:00
|
|
|
ExtEntryTable[NumExtEntryPoints].Offset = offset;
|
|
|
|
ExtEntryTable[NumExtEntryPoints].Address = entryPoint;
|
|
|
|
NumExtEntryPoints++;
|
|
|
|
return offset;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
2000-01-07 07:30:13 +00:00
|
|
|
#endif
|
1999-12-16 12:38:11 +00:00
|
|
|
|
|
|
|
|
1999-12-15 12:52:31 +00:00
|
|
|
|
2000-03-19 01:10:11 +00:00
|
|
|
/*
|
|
|
|
* Return offset of entrypoint for named function within dispatch table.
|
|
|
|
*/
|
|
|
|
GLint
|
|
|
|
_glapi_get_proc_offset(const char *funcName)
|
|
|
|
{
|
|
|
|
/* search extension functions first */
|
2001-03-07 05:06:11 +00:00
|
|
|
GLuint i;
|
2000-03-19 01:10:11 +00:00
|
|
|
for (i = 0; i < NumExtEntryPoints; i++) {
|
|
|
|
if (strcmp(ExtEntryTable[i].Name, funcName) == 0) {
|
|
|
|
return ExtEntryTable[i].Offset;
|
|
|
|
}
|
|
|
|
}
|
2000-02-24 22:14:04 +00:00
|
|
|
|
2000-03-19 01:10:11 +00:00
|
|
|
/* search static functions */
|
|
|
|
return get_static_proc_offset(funcName);
|
|
|
|
}
|
2000-02-24 22:14:04 +00:00
|
|
|
|
1999-12-15 12:52:31 +00:00
|
|
|
|
1999-11-27 21:30:40 +00:00
|
|
|
|
2000-03-19 01:10:11 +00:00
|
|
|
/*
|
|
|
|
* Return entrypoint for named function.
|
|
|
|
*/
|
|
|
|
const GLvoid *
|
|
|
|
_glapi_get_proc_address(const char *funcName)
|
|
|
|
{
|
|
|
|
/* search extension functions first */
|
2001-03-07 05:06:11 +00:00
|
|
|
GLuint i;
|
2000-03-19 01:10:11 +00:00
|
|
|
for (i = 0; i < NumExtEntryPoints; i++) {
|
|
|
|
if (strcmp(ExtEntryTable[i].Name, funcName) == 0) {
|
|
|
|
return ExtEntryTable[i].Address;
|
|
|
|
}
|
|
|
|
}
|
1999-11-27 21:30:40 +00:00
|
|
|
|
2000-03-19 01:10:11 +00:00
|
|
|
/* search static functions */
|
|
|
|
return get_static_proc_address(funcName);
|
|
|
|
}
|
2000-02-24 22:14:04 +00:00
|
|
|
|
|
|
|
|
1999-11-11 01:22:25 +00:00
|
|
|
|
2000-03-19 01:10:11 +00:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Return the name of the function at the given dispatch offset.
|
|
|
|
* This is only intended for debugging.
|
|
|
|
*/
|
|
|
|
const char *
|
|
|
|
_glapi_get_proc_name(GLuint offset)
|
|
|
|
{
|
|
|
|
const GLuint n = sizeof(static_functions) / sizeof(struct name_address_offset);
|
|
|
|
GLuint i;
|
|
|
|
for (i = 0; i < n; i++) {
|
|
|
|
if (static_functions[i].Offset == offset)
|
|
|
|
return static_functions[i].Name;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* search added extension functions */
|
|
|
|
for (i = 0; i < NumExtEntryPoints; i++) {
|
|
|
|
if (ExtEntryTable[i].Offset == offset) {
|
|
|
|
return ExtEntryTable[i].Name;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Make sure there are no NULL pointers in the given dispatch table.
|
2002-03-07 21:50:41 +00:00
|
|
|
* Intended for debugging purposes.
|
2000-03-19 01:10:11 +00:00
|
|
|
*/
|
|
|
|
void
|
|
|
|
_glapi_check_table(const struct _glapi_table *table)
|
|
|
|
{
|
2002-03-07 21:50:41 +00:00
|
|
|
#ifdef DEBUG
|
2000-03-19 01:10:11 +00:00
|
|
|
const GLuint entries = _glapi_get_dispatch_table_size();
|
|
|
|
const void **tab = (const void **) table;
|
|
|
|
GLuint i;
|
|
|
|
for (i = 1; i < entries; i++) {
|
|
|
|
assert(tab[i]);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Do some spot checks to be sure that the dispatch table
|
|
|
|
* slots are assigned correctly.
|
|
|
|
*/
|
|
|
|
{
|
|
|
|
GLuint BeginOffset = _glapi_get_proc_offset("glBegin");
|
|
|
|
char *BeginFunc = (char*) &table->Begin;
|
|
|
|
GLuint offset = (BeginFunc - (char *) table) / sizeof(void *);
|
|
|
|
assert(BeginOffset == _gloffset_Begin);
|
|
|
|
assert(BeginOffset == offset);
|
|
|
|
}
|
|
|
|
{
|
|
|
|
GLuint viewportOffset = _glapi_get_proc_offset("glViewport");
|
|
|
|
char *viewportFunc = (char*) &table->Viewport;
|
|
|
|
GLuint offset = (viewportFunc - (char *) table) / sizeof(void *);
|
|
|
|
assert(viewportOffset == _gloffset_Viewport);
|
|
|
|
assert(viewportOffset == offset);
|
|
|
|
}
|
|
|
|
{
|
|
|
|
GLuint VertexPointerOffset = _glapi_get_proc_offset("glVertexPointer");
|
|
|
|
char *VertexPointerFunc = (char*) &table->VertexPointer;
|
|
|
|
GLuint offset = (VertexPointerFunc - (char *) table) / sizeof(void *);
|
|
|
|
assert(VertexPointerOffset == _gloffset_VertexPointer);
|
|
|
|
assert(VertexPointerOffset == offset);
|
|
|
|
}
|
|
|
|
{
|
|
|
|
GLuint ResetMinMaxOffset = _glapi_get_proc_offset("glResetMinmax");
|
|
|
|
char *ResetMinMaxFunc = (char*) &table->ResetMinmax;
|
|
|
|
GLuint offset = (ResetMinMaxFunc - (char *) table) / sizeof(void *);
|
|
|
|
assert(ResetMinMaxOffset == _gloffset_ResetMinmax);
|
|
|
|
assert(ResetMinMaxOffset == offset);
|
|
|
|
}
|
|
|
|
{
|
|
|
|
GLuint blendColorOffset = _glapi_get_proc_offset("glBlendColor");
|
|
|
|
char *blendColorFunc = (char*) &table->BlendColor;
|
|
|
|
GLuint offset = (blendColorFunc - (char *) table) / sizeof(void *);
|
|
|
|
assert(blendColorOffset == _gloffset_BlendColor);
|
|
|
|
assert(blendColorOffset == offset);
|
|
|
|
}
|
|
|
|
{
|
|
|
|
GLuint istextureOffset = _glapi_get_proc_offset("glIsTextureEXT");
|
|
|
|
char *istextureFunc = (char*) &table->IsTextureEXT;
|
|
|
|
GLuint offset = (istextureFunc - (char *) table) / sizeof(void *);
|
|
|
|
assert(istextureOffset == _gloffset_IsTextureEXT);
|
|
|
|
assert(istextureOffset == offset);
|
|
|
|
}
|
2000-10-27 19:31:21 +01:00
|
|
|
{
|
|
|
|
GLuint secondaryColor3fOffset = _glapi_get_proc_offset("glSecondaryColor3fEXT");
|
|
|
|
char *secondaryColor3fFunc = (char*) &table->SecondaryColor3fEXT;
|
|
|
|
GLuint offset = (secondaryColor3fFunc - (char *) table) / sizeof(void *);
|
|
|
|
assert(secondaryColor3fOffset == _gloffset_SecondaryColor3fEXT);
|
|
|
|
assert(secondaryColor3fOffset == offset);
|
|
|
|
assert(_glapi_get_proc_address("glSecondaryColor3fEXT") == (void *) &glSecondaryColor3fEXT);
|
|
|
|
}
|
2000-01-07 07:30:13 +00:00
|
|
|
#endif
|
2000-03-19 01:10:11 +00:00
|
|
|
}
|