minor patches from David Dawes
[mesa.git] / src / mesa / glapi / glapi.c
1 /* $Id: glapi.c,v 1.61 2002/03/07 21:50:41 brianp Exp $ */
2
3 /*
4 * Mesa 3-D graphics library
5 * Version: 4.1
6 *
7 * Copyright (C) 1999-2002 Brian Paul All Rights Reserved.
8 *
9 * Permission is hereby granted, free of charge, to any person obtaining a
10 * copy of this software and associated documentation files (the "Software"),
11 * to deal in the Software without restriction, including without limitation
12 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
13 * and/or sell copies of the Software, and to permit persons to whom the
14 * Software is furnished to do so, subject to the following conditions:
15 *
16 * The above copyright notice and this permission notice shall be included
17 * in all copies or substantial portions of the Software.
18 *
19 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
20 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
21 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
22 * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
23 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
24 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
25 */
26
27
28 /*
29 * This file manages the OpenGL API dispatch layer.
30 * The dispatch table (struct _glapi_table) is basically just a list
31 * of function pointers.
32 * There are functions to set/get the current dispatch table for the
33 * current thread and to manage registration/dispatch of dynamically
34 * added extension functions.
35 *
36 * It's intended that this file and the other glapi*.[ch] files are
37 * flexible enough to be reused in several places: XFree86, DRI-
38 * based libGL.so, and perhaps the SGI SI.
39 *
40 * There are no dependencies on Mesa in this code.
41 *
42 * Versions (API changes):
43 * 2000/02/23 - original version for Mesa 3.3 and XFree86 4.0
44 * 2001/01/16 - added dispatch override feature for Mesa 3.5
45 */
46
47
48
49 #include "glheader.h"
50 #include "glapi.h"
51 #include "glapioffsets.h"
52 #include "glapitable.h"
53 #include "glthread.h"
54
55 /***** BEGIN NO-OP DISPATCH *****/
56
57 static GLboolean WarnFlag = GL_FALSE;
58
59 void
60 _glapi_noop_enable_warnings(GLboolean enable)
61 {
62 WarnFlag = enable;
63 }
64
65 static GLboolean
66 warn(void)
67 {
68 if (WarnFlag || getenv("MESA_DEBUG") || getenv("LIBGL_DEBUG"))
69 return GL_TRUE;
70 else
71 return GL_FALSE;
72 }
73
74
75 #define KEYWORD1 static
76 #define KEYWORD2
77 #define NAME(func) NoOp##func
78
79 #define F stderr
80
81 #define DISPATCH(func, args, msg) \
82 if (warn()) { \
83 fprintf(stderr, "GL User Error: calling "); \
84 fprintf msg; \
85 fprintf(stderr, " without a current context\n"); \
86 }
87
88 #define RETURN_DISPATCH(func, args, msg) \
89 if (warn()) { \
90 fprintf(stderr, "GL User Error: calling "); \
91 fprintf msg; \
92 fprintf(stderr, " without a current context\n"); \
93 } \
94 return 0
95
96 #define DISPATCH_TABLE_NAME __glapi_noop_table
97 #define UNUSED_TABLE_NAME __usused_noop_functions
98
99 #define TABLE_ENTRY(name) (void *) NoOp##name
100
101 static int NoOpUnused(void)
102 {
103 if (warn()) {
104 fprintf(stderr, "GL User Error: calling extension function without a current context\n");
105 }
106 return 0;
107 }
108
109 #include "glapitemp.h"
110
111 /***** END NO-OP DISPATCH *****/
112
113
114
115 /***** BEGIN THREAD-SAFE DISPATCH *****/
116 /* if we support thread-safety, build a special dispatch table for use
117 * in thread-safety mode (ThreadSafe == GL_TRUE). Each entry in the
118 * dispatch table will call _glthread_GetTSD() to get the actual dispatch
119 * table bound to the current thread, then jump through that table.
120 */
121
122 #if defined(THREADS)
123
124 static GLboolean ThreadSafe = GL_FALSE; /* In thread-safe mode? */
125 static _glthread_TSD DispatchTSD; /* Per-thread dispatch pointer */
126 static _glthread_TSD RealDispatchTSD; /* only when using override */
127 static _glthread_TSD ContextTSD; /* Per-thread context pointer */
128
129
130 #define KEYWORD1 static
131 #define KEYWORD2 GLAPIENTRY
132 #define NAME(func) _ts_##func
133
134 #define DISPATCH(FUNC, ARGS, MESSAGE) \
135 struct _glapi_table *dispatch; \
136 dispatch = (struct _glapi_table *) _glthread_GetTSD(&DispatchTSD); \
137 if (!dispatch) \
138 dispatch = (struct _glapi_table *) __glapi_noop_table; \
139 (dispatch->FUNC) ARGS
140
141 #define RETURN_DISPATCH(FUNC, ARGS, MESSAGE) \
142 struct _glapi_table *dispatch; \
143 dispatch = (struct _glapi_table *) _glthread_GetTSD(&DispatchTSD); \
144 if (!dispatch) \
145 dispatch = (struct _glapi_table *) __glapi_noop_table; \
146 return (dispatch->FUNC) ARGS
147
148 #define DISPATCH_TABLE_NAME __glapi_threadsafe_table
149 #define UNUSED_TABLE_NAME __usused_threadsafe_functions
150
151 #define TABLE_ENTRY(name) (void *) _ts_##name
152
153 static int _ts_Unused(void)
154 {
155 return 0;
156 }
157
158 #include "glapitemp.h"
159
160 #endif
161
162 /***** END THREAD-SAFE DISPATCH *****/
163
164
165
166 struct _glapi_table *_glapi_Dispatch = (struct _glapi_table *) __glapi_noop_table;
167 struct _glapi_table *_glapi_RealDispatch = (struct _glapi_table *) __glapi_noop_table;
168
169 /* Used when thread safety disabled */
170 void *_glapi_Context = NULL;
171
172
173 static GLuint MaxDispatchOffset = sizeof(struct _glapi_table) / sizeof(void *) - 1;
174 static GLboolean GetSizeCalled = GL_FALSE;
175
176 static GLboolean DispatchOverride = GL_FALSE;
177
178
179 /* strdup() is actually not a standard ANSI C or POSIX routine.
180 * Irix will not define it if ANSI mode is in effect.
181 */
182 static char *
183 str_dup(const char *str)
184 {
185 char *copy;
186 copy = (char*) malloc(strlen(str) + 1);
187 if (!copy)
188 return NULL;
189 strcpy(copy, str);
190 return copy;
191 }
192
193
194
195 /*
196 * We should call this periodically from a function such as glXMakeCurrent
197 * in order to test if multiple threads are being used.
198 */
199 void
200 _glapi_check_multithread(void)
201 {
202 #if defined(THREADS)
203 if (!ThreadSafe) {
204 static unsigned long knownID;
205 static GLboolean firstCall = GL_TRUE;
206 if (firstCall) {
207 knownID = _glthread_GetID();
208 firstCall = GL_FALSE;
209 }
210 else if (knownID != _glthread_GetID()) {
211 ThreadSafe = GL_TRUE;
212 }
213 }
214 if (ThreadSafe) {
215 /* make sure that this thread's dispatch pointer isn't null */
216 if (!_glapi_get_dispatch()) {
217 _glapi_set_dispatch(NULL);
218 }
219 }
220 #endif
221 }
222
223
224
225 /*
226 * Set the current context pointer for this thread.
227 * The context pointer is an opaque type which should be cast to
228 * void from the real context pointer type.
229 */
230 void
231 _glapi_set_context(void *context)
232 {
233 #if defined(THREADS)
234 _glthread_SetTSD(&ContextTSD, context);
235 if (ThreadSafe)
236 _glapi_Context = NULL;
237 else
238 _glapi_Context = context;
239 #else
240 _glapi_Context = context;
241 #endif
242 }
243
244
245
246 /*
247 * Get the current context pointer for this thread.
248 * The context pointer is an opaque type which should be cast from
249 * void to the real context pointer type.
250 */
251 void *
252 _glapi_get_context(void)
253 {
254 #if defined(THREADS)
255 if (ThreadSafe) {
256 return _glthread_GetTSD(&ContextTSD);
257 }
258 else {
259 return _glapi_Context;
260 }
261 #else
262 return _glapi_Context;
263 #endif
264 }
265
266
267
268 /*
269 * Set the global or per-thread dispatch table pointer.
270 */
271 void
272 _glapi_set_dispatch(struct _glapi_table *dispatch)
273 {
274 if (!dispatch) {
275 /* use the no-op functions */
276 dispatch = (struct _glapi_table *) __glapi_noop_table;
277 }
278 #ifdef DEBUG
279 else {
280 _glapi_check_table(dispatch);
281 }
282 #endif
283
284 #if defined(THREADS)
285 if (DispatchOverride) {
286 _glthread_SetTSD(&RealDispatchTSD, (void *) dispatch);
287 if (ThreadSafe)
288 _glapi_RealDispatch = (struct _glapi_table*) __glapi_threadsafe_table;
289 else
290 _glapi_RealDispatch = dispatch;
291 }
292 else {
293 /* normal operation */
294 _glthread_SetTSD(&DispatchTSD, (void *) dispatch);
295 if (ThreadSafe)
296 _glapi_Dispatch = (struct _glapi_table *) __glapi_threadsafe_table;
297 else
298 _glapi_Dispatch = dispatch;
299 }
300 #else /*THREADS*/
301 if (DispatchOverride) {
302 _glapi_RealDispatch = dispatch;
303 }
304 else {
305 _glapi_Dispatch = dispatch;
306 }
307 #endif /*THREADS*/
308 }
309
310
311
312 /*
313 * Return pointer to current dispatch table for calling thread.
314 */
315 struct _glapi_table *
316 _glapi_get_dispatch(void)
317 {
318 #if defined(THREADS)
319 if (ThreadSafe) {
320 if (DispatchOverride) {
321 return (struct _glapi_table *) _glthread_GetTSD(&RealDispatchTSD);
322 }
323 else {
324 return (struct _glapi_table *) _glthread_GetTSD(&DispatchTSD);
325 }
326 }
327 else {
328 if (DispatchOverride) {
329 assert(_glapi_RealDispatch);
330 return _glapi_RealDispatch;
331 }
332 else {
333 assert(_glapi_Dispatch);
334 return _glapi_Dispatch;
335 }
336 }
337 #else
338 return _glapi_Dispatch;
339 #endif
340 }
341
342
343 /*
344 * Notes on dispatch overrride:
345 *
346 * Dispatch override allows an external agent to hook into the GL dispatch
347 * mechanism before execution goes into the core rendering library. For
348 * example, a trace mechanism would insert itself as an overrider, print
349 * logging info for each GL function, then dispatch to the real GL function.
350 *
351 * libGLS (GL Stream library) is another agent that might use override.
352 *
353 * We don't allow more than one layer of overriding at this time.
354 * In the future we may allow nested/layered override. In that case
355 * _glapi_begin_dispatch_override() will return an override layer,
356 * _glapi_end_dispatch_override(layer) will remove an override layer
357 * and _glapi_get_override_dispatch(layer) will return the dispatch
358 * table for a given override layer. layer = 0 will be the "real"
359 * dispatch table.
360 */
361
362 /*
363 * Return: dispatch override layer number.
364 */
365 int
366 _glapi_begin_dispatch_override(struct _glapi_table *override)
367 {
368 struct _glapi_table *real = _glapi_get_dispatch();
369
370 assert(!DispatchOverride); /* can't nest at this time */
371 DispatchOverride = GL_TRUE;
372
373 _glapi_set_dispatch(real);
374
375 #if defined(THREADS)
376 _glthread_SetTSD(&DispatchTSD, (void *) override);
377 if (ThreadSafe)
378 _glapi_Dispatch = (struct _glapi_table *) __glapi_threadsafe_table;
379 else
380 _glapi_Dispatch = override;
381 #else
382 _glapi_Dispatch = override;
383 #endif
384 return 1;
385 }
386
387
388 void
389 _glapi_end_dispatch_override(int layer)
390 {
391 struct _glapi_table *real = _glapi_get_dispatch();
392 (void) layer;
393 DispatchOverride = GL_FALSE;
394 _glapi_set_dispatch(real);
395 /* the rest of this isn't needed, just play it safe */
396 #if defined(THREADS)
397 _glthread_SetTSD(&RealDispatchTSD, NULL);
398 #endif
399 _glapi_RealDispatch = NULL;
400 }
401
402
403 struct _glapi_table *
404 _glapi_get_override_dispatch(int layer)
405 {
406 if (layer == 0) {
407 return _glapi_get_dispatch();
408 }
409 else {
410 if (DispatchOverride) {
411 #if defined(THREADS)
412 return (struct _glapi_table *) _glthread_GetTSD(&DispatchTSD);
413 #else
414 return _glapi_Dispatch;
415 #endif
416 }
417 else {
418 return NULL;
419 }
420 }
421 }
422
423
424
425 /*
426 * Return size of dispatch table struct as number of functions (or
427 * slots).
428 */
429 GLuint
430 _glapi_get_dispatch_table_size(void)
431 {
432 /* return sizeof(struct _glapi_table) / sizeof(void *);*/
433 GetSizeCalled = GL_TRUE;
434 return MaxDispatchOffset + 1;
435 }
436
437
438
439 /*
440 * Get API dispatcher version string.
441 */
442 const char *
443 _glapi_get_version(void)
444 {
445 return "20010116"; /* YYYYMMDD */
446 }
447
448
449 struct name_address_offset {
450 const char *Name;
451 GLvoid *Address;
452 GLuint Offset;
453 };
454
455
456 /* The code in this file is auto-generated */
457 #include "glprocs.h"
458
459
460
461 /*
462 * Return dispatch table offset of the named static (built-in) function.
463 * Return -1 if function not found.
464 */
465 static GLint
466 get_static_proc_offset(const char *funcName)
467 {
468 GLuint i;
469 for (i = 0; static_functions[i].Name; i++) {
470 if (strcmp(static_functions[i].Name, funcName) == 0) {
471 return static_functions[i].Offset;
472 }
473 }
474 return -1;
475 }
476
477
478 /*
479 * Return dispatch function address the named static (built-in) function.
480 * Return NULL if function not found.
481 */
482 static GLvoid *
483 get_static_proc_address(const char *funcName)
484 {
485 GLint i;
486 for (i = 0; static_functions[i].Name; i++) {
487 if (strcmp(static_functions[i].Name, funcName) == 0) {
488 return static_functions[i].Address;
489 }
490 }
491 return NULL;
492 }
493
494
495
496 /**********************************************************************
497 * Extension function management.
498 */
499
500
501 #define MAX_EXTENSION_FUNCS 1000
502
503 static struct name_address_offset ExtEntryTable[MAX_EXTENSION_FUNCS];
504 static GLuint NumExtEntryPoints = 0;
505
506 #ifdef USE_SPARC_ASM
507 extern void __glapi_sparc_icache_flush(unsigned int *);
508 #endif
509
510 /*
511 * Generate a dispatch function (entrypoint) which jumps through
512 * the given slot number (offset) in the current dispatch table.
513 * We need assembly language in order to accomplish this.
514 */
515 static void *
516 generate_entrypoint(GLuint functionOffset)
517 {
518 #if defined(USE_X86_ASM)
519 /*
520 * This x86 code contributed by Josh Vanderhoof.
521 *
522 * 0: a1 10 32 54 76 movl __glapi_Dispatch,%eax
523 * 00 01 02 03 04
524 * 5: 85 c0 testl %eax,%eax
525 * 05 06
526 * 7: 74 06 je f <entrypoint+0xf>
527 * 07 08
528 * 9: ff a0 10 32 54 76 jmp *0x76543210(%eax)
529 * 09 0a 0b 0c 0d 0e
530 * f: e8 fc ff ff ff call __glapi_get_dispatch
531 * 0f 10 11 12 13
532 * 14: ff a0 10 32 54 76 jmp *0x76543210(%eax)
533 * 14 15 16 17 18 19
534 */
535 static const unsigned char temp[] = {
536 0xa1, 0x00, 0x00, 0x00, 0x00,
537 0x85, 0xc0,
538 0x74, 0x06,
539 0xff, 0xa0, 0x00, 0x00, 0x00, 0x00,
540 0xe8, 0x00, 0x00, 0x00, 0x00,
541 0xff, 0xa0, 0x00, 0x00, 0x00, 0x00
542 };
543 unsigned char *code = malloc(sizeof(temp));
544 unsigned int next_insn;
545 if (code) {
546 memcpy(code, temp, sizeof(temp));
547
548 *(unsigned int *)(code + 0x01) = (unsigned int)&_glapi_Dispatch;
549 *(unsigned int *)(code + 0x0b) = (unsigned int)functionOffset * 4;
550 next_insn = (unsigned int)(code + 0x14);
551 *(unsigned int *)(code + 0x10) = (unsigned int)_glapi_get_dispatch - next_insn;
552 *(unsigned int *)(code + 0x16) = (unsigned int)functionOffset * 4;
553 }
554 return code;
555 #elif defined(USE_SPARC_ASM)
556
557 #ifdef __sparc_v9__
558 static const unsigned int insn_template[] = {
559 0x05000000, /* sethi %uhi(_glapi_Dispatch), %g2 */
560 0x03000000, /* sethi %hi(_glapi_Dispatch), %g1 */
561 0x8410a000, /* or %g2, %ulo(_glapi_Dispatch), %g2 */
562 0x82106000, /* or %g1, %lo(_glapi_Dispatch), %g1 */
563 0x8528b020, /* sllx %g2, 32, %g2 */
564 0xc2584002, /* ldx [%g1 + %g2], %g1 */
565 0x05000000, /* sethi %hi(8 * glapioffset), %g2 */
566 0x8410a000, /* or %g2, %lo(8 * glapioffset), %g2 */
567 0xc6584002, /* ldx [%g1 + %g2], %g3 */
568 0x81c0c000, /* jmpl %g3, %g0 */
569 0x01000000 /* nop */
570 };
571 #else
572 static const unsigned int insn_template[] = {
573 0x03000000, /* sethi %hi(_glapi_Dispatch), %g1 */
574 0xc2006000, /* ld [%g1 + %lo(_glapi_Dispatch)], %g1 */
575 0xc6006000, /* ld [%g1 + %lo(4*glapioffset)], %g3 */
576 0x81c0c000, /* jmpl %g3, %g0 */
577 0x01000000 /* nop */
578 };
579 #endif
580 unsigned int *code = malloc(sizeof(insn_template));
581 unsigned long glapi_addr = (unsigned long) &_glapi_Dispatch;
582 if (code) {
583 memcpy(code, insn_template, sizeof(insn_template));
584
585 #ifdef __sparc_v9__
586 code[0] |= (glapi_addr >> (32 + 10));
587 code[1] |= ((glapi_addr & 0xffffffff) >> 10);
588 __glapi_sparc_icache_flush(&code[0]);
589 code[2] |= ((glapi_addr >> 32) & ((1 << 10) - 1));
590 code[3] |= (glapi_addr & ((1 << 10) - 1));
591 __glapi_sparc_icache_flush(&code[2]);
592 code[6] |= ((functionOffset * 8) >> 10);
593 code[7] |= ((functionOffset * 8) & ((1 << 10) - 1));
594 __glapi_sparc_icache_flush(&code[6]);
595 #else
596 code[0] |= (glapi_addr >> 10);
597 code[1] |= (glapi_addr & ((1 << 10) - 1));
598 __glapi_sparc_icache_flush(&code[0]);
599 code[2] |= (functionOffset * 4);
600 __glapi_sparc_icache_flush(&code[2]);
601 #endif
602 }
603 return code;
604 #else
605 return NULL;
606 #endif
607 }
608
609
610
611 /*
612 * Add a new extension function entrypoint.
613 * Return: GL_TRUE = success or GL_FALSE = failure
614 */
615 GLboolean
616 _glapi_add_entrypoint(const char *funcName, GLuint offset)
617 {
618 /* first check if the named function is already statically present */
619 {
620 GLint index = get_static_proc_offset(funcName);
621 if (index >= 0) {
622 return (GLboolean) ((GLuint) index == offset); /* bad offset! */
623 }
624 }
625
626 {
627 /* make sure this offset/name pair is legal */
628 const char *name = _glapi_get_proc_name(offset);
629 if (name && strcmp(name, funcName) != 0)
630 return GL_FALSE; /* bad name! */
631 }
632
633 {
634 /* be sure index and name match known data */
635 GLuint i;
636 for (i = 0; i < NumExtEntryPoints; i++) {
637 if (strcmp(ExtEntryTable[i].Name, funcName) == 0) {
638 /* function already registered with api */
639 if (ExtEntryTable[i].Offset == offset) {
640 return GL_TRUE; /* offsets match */
641 }
642 else {
643 return GL_FALSE; /* bad offset! */
644 }
645 }
646 }
647
648 /* Make sure we don't try to add a new entrypoint after someone
649 * has already called _glapi_get_dispatch_table_size()! If that's
650 * happened the caller's information would become out of date.
651 */
652 if (GetSizeCalled)
653 return GL_FALSE;
654
655 /* make sure we have space */
656 if (NumExtEntryPoints >= MAX_EXTENSION_FUNCS) {
657 return GL_FALSE;
658 }
659 else {
660 void *entrypoint = generate_entrypoint(offset);
661 if (!entrypoint)
662 return GL_FALSE;
663
664 ExtEntryTable[NumExtEntryPoints].Name = str_dup(funcName);
665 ExtEntryTable[NumExtEntryPoints].Offset = offset;
666 ExtEntryTable[NumExtEntryPoints].Address = entrypoint;
667 NumExtEntryPoints++;
668
669 if (offset > MaxDispatchOffset)
670 MaxDispatchOffset = offset;
671
672 return GL_TRUE; /* success */
673 }
674 }
675
676 /* should never get here, but play it safe */
677 return GL_FALSE;
678 }
679
680
681
682 #if 0000 /* prototype code for dynamic extension slot allocation */
683
684 static int NextFreeOffset = 409; /*XXX*/
685 #define MAX_DISPATCH_TABLE_SIZE 1000
686
687 /*
688 * Dynamically allocate a dispatch slot for an extension entrypoint
689 * and generate the assembly language dispatch stub.
690 * Return the dispatch offset for the function or -1 if no room or error.
691 */
692 GLint
693 _glapi_add_entrypoint2(const char *funcName)
694 {
695 int offset;
696
697 /* first see if extension func is already known */
698 offset = _glapi_get_proc_offset(funcName);
699 if (offset >= 0)
700 return offset;
701
702 if (NumExtEntryPoints < MAX_EXTENSION_FUNCS
703 && NextFreeOffset < MAX_DISPATCH_TABLE_SIZE) {
704 void *entryPoint;
705 offset = NextFreeOffset;
706 entryPoint = generate_entrypoint(offset);
707 if (entryPoint) {
708 NextFreeOffset++;
709 ExtEntryTable[NumExtEntryPoints].Name = str_dup(funcName);
710 ExtEntryTable[NumExtEntryPoints].Offset = offset;
711 ExtEntryTable[NumExtEntryPoints].Address = entryPoint;
712 NumExtEntryPoints++;
713 return offset;
714 }
715 }
716 return -1;
717 }
718
719 #endif
720
721
722
723 /*
724 * Return offset of entrypoint for named function within dispatch table.
725 */
726 GLint
727 _glapi_get_proc_offset(const char *funcName)
728 {
729 /* search extension functions first */
730 GLuint i;
731 for (i = 0; i < NumExtEntryPoints; i++) {
732 if (strcmp(ExtEntryTable[i].Name, funcName) == 0) {
733 return ExtEntryTable[i].Offset;
734 }
735 }
736
737 /* search static functions */
738 return get_static_proc_offset(funcName);
739 }
740
741
742
743 /*
744 * Return entrypoint for named function.
745 */
746 const GLvoid *
747 _glapi_get_proc_address(const char *funcName)
748 {
749 /* search extension functions first */
750 GLuint i;
751 for (i = 0; i < NumExtEntryPoints; i++) {
752 if (strcmp(ExtEntryTable[i].Name, funcName) == 0) {
753 return ExtEntryTable[i].Address;
754 }
755 }
756
757 /* search static functions */
758 return get_static_proc_address(funcName);
759 }
760
761
762
763
764 /*
765 * Return the name of the function at the given dispatch offset.
766 * This is only intended for debugging.
767 */
768 const char *
769 _glapi_get_proc_name(GLuint offset)
770 {
771 const GLuint n = sizeof(static_functions) / sizeof(struct name_address_offset);
772 GLuint i;
773 for (i = 0; i < n; i++) {
774 if (static_functions[i].Offset == offset)
775 return static_functions[i].Name;
776 }
777
778 /* search added extension functions */
779 for (i = 0; i < NumExtEntryPoints; i++) {
780 if (ExtEntryTable[i].Offset == offset) {
781 return ExtEntryTable[i].Name;
782 }
783 }
784 return NULL;
785 }
786
787
788
789 /*
790 * Make sure there are no NULL pointers in the given dispatch table.
791 * Intended for debugging purposes.
792 */
793 void
794 _glapi_check_table(const struct _glapi_table *table)
795 {
796 #ifdef DEBUG
797 const GLuint entries = _glapi_get_dispatch_table_size();
798 const void **tab = (const void **) table;
799 GLuint i;
800 for (i = 1; i < entries; i++) {
801 assert(tab[i]);
802 }
803
804 /* Do some spot checks to be sure that the dispatch table
805 * slots are assigned correctly.
806 */
807 {
808 GLuint BeginOffset = _glapi_get_proc_offset("glBegin");
809 char *BeginFunc = (char*) &table->Begin;
810 GLuint offset = (BeginFunc - (char *) table) / sizeof(void *);
811 assert(BeginOffset == _gloffset_Begin);
812 assert(BeginOffset == offset);
813 }
814 {
815 GLuint viewportOffset = _glapi_get_proc_offset("glViewport");
816 char *viewportFunc = (char*) &table->Viewport;
817 GLuint offset = (viewportFunc - (char *) table) / sizeof(void *);
818 assert(viewportOffset == _gloffset_Viewport);
819 assert(viewportOffset == offset);
820 }
821 {
822 GLuint VertexPointerOffset = _glapi_get_proc_offset("glVertexPointer");
823 char *VertexPointerFunc = (char*) &table->VertexPointer;
824 GLuint offset = (VertexPointerFunc - (char *) table) / sizeof(void *);
825 assert(VertexPointerOffset == _gloffset_VertexPointer);
826 assert(VertexPointerOffset == offset);
827 }
828 {
829 GLuint ResetMinMaxOffset = _glapi_get_proc_offset("glResetMinmax");
830 char *ResetMinMaxFunc = (char*) &table->ResetMinmax;
831 GLuint offset = (ResetMinMaxFunc - (char *) table) / sizeof(void *);
832 assert(ResetMinMaxOffset == _gloffset_ResetMinmax);
833 assert(ResetMinMaxOffset == offset);
834 }
835 {
836 GLuint blendColorOffset = _glapi_get_proc_offset("glBlendColor");
837 char *blendColorFunc = (char*) &table->BlendColor;
838 GLuint offset = (blendColorFunc - (char *) table) / sizeof(void *);
839 assert(blendColorOffset == _gloffset_BlendColor);
840 assert(blendColorOffset == offset);
841 }
842 {
843 GLuint istextureOffset = _glapi_get_proc_offset("glIsTextureEXT");
844 char *istextureFunc = (char*) &table->IsTextureEXT;
845 GLuint offset = (istextureFunc - (char *) table) / sizeof(void *);
846 assert(istextureOffset == _gloffset_IsTextureEXT);
847 assert(istextureOffset == offset);
848 }
849 {
850 GLuint secondaryColor3fOffset = _glapi_get_proc_offset("glSecondaryColor3fEXT");
851 char *secondaryColor3fFunc = (char*) &table->SecondaryColor3fEXT;
852 GLuint offset = (secondaryColor3fFunc - (char *) table) / sizeof(void *);
853 assert(secondaryColor3fOffset == _gloffset_SecondaryColor3fEXT);
854 assert(secondaryColor3fOffset == offset);
855 assert(_glapi_get_proc_address("glSecondaryColor3fEXT") == (void *) &glSecondaryColor3fEXT);
856 }
857 #endif
858 }