Define GLX_SAMPLE_BUFFERS_ARB and GLX_SAMPLES_ARB if they were not
[wine] / dlls / opengl32 / wgl_ext.c
1 /* Support for window-specific OpenGL extensions.
2  *
3  * Copyright (c) 2004 Lionel Ulmer
4  * Copyright (c) 2005 Alex Woods
5  * Copyright (c) 2005 Raphael Junqueira
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This library is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this library; if not, write to the Free Software
19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
20  */
21
22 #include "config.h"
23 #include "wine/port.h"
24
25 #include <stdarg.h>
26 #include <stdlib.h>
27 #include <string.h>
28
29 #include "windef.h"
30 #include "winbase.h"
31 #include "winuser.h"
32 #include "winerror.h"
33
34 #include "gdi.h"
35 #include "wgl.h"
36 #include "wgl_ext.h"
37 #include "opengl_ext.h"
38 #include "wine/library.h"
39 #include "wine/debug.h"
40
41 WINE_DEFAULT_DEBUG_CHANNEL(opengl);
42
43
44 /* x11drv GDI escapes */
45 #define X11DRV_ESCAPE 6789
46 enum x11drv_escape_codes
47 {
48     X11DRV_GET_DISPLAY,   /* get X11 display for a DC */
49     X11DRV_GET_DRAWABLE,  /* get current drawable for a DC */
50     X11DRV_GET_FONT,      /* get current X font for a DC */
51     X11DRV_SET_DRAWABLE,     /* set current drawable for a DC */
52 };
53 struct x11drv_escape_set_drawable
54 {
55     enum x11drv_escape_codes code;         /* escape code (X11DRV_SET_DRAWABLE) */
56     Drawable                 drawable;     /* X drawable */
57     int                      mode;         /* ClipByChildren or IncludeInferiors */
58     POINT                    org;          /* origin of DC relative to drawable */
59     POINT                    drawable_org; /* origin of drawable relative to screen */
60 };
61
62 /* retrieve the X display to use on a given DC */
63 inline static Display *get_display( HDC hdc )
64 {
65     Display *display;
66     enum x11drv_escape_codes escape = X11DRV_GET_DISPLAY;
67
68     if (!ExtEscape( hdc, X11DRV_ESCAPE, sizeof(escape), (LPCSTR)&escape,
69                     sizeof(display), (LPSTR)&display )) display = NULL;
70     return display;
71 }
72 inline static void set_drawable( HDC hdc, Drawable drawable )
73 {
74     struct x11drv_escape_set_drawable escape;
75
76     escape.code = X11DRV_SET_DRAWABLE;
77     escape.drawable = drawable;
78     escape.mode = IncludeInferiors;
79     escape.org.x = escape.org.y = 0;
80     escape.drawable_org.x = escape.drawable_org.y = 0;
81
82     ExtEscape( hdc, X11DRV_ESCAPE, sizeof(escape), (LPCSTR)&escape, 0, NULL );
83 }
84
85 /* Some WGL extensions... */
86 static const char *WGL_extensions_base = "WGL_ARB_extensions_string WGL_EXT_extensions_string";
87 static char *WGL_extensions = NULL;
88
89 /**
90  * Extensions-query functions 
91  *
92  * @TODO: use a struct to handle parameters 
93  */
94 BOOL query_function_make_current_read(glXGetProcAddressARB_t proc, const char *gl_version, const char *gl_extensions, 
95                                       const char* glx_version, const char *glx_extensions,
96                                       const char *server_glx_extensions, const char *client_glx_extensions)
97 {
98   return 0 <= strcmp("1.3", glx_version);
99 }
100
101 BOOL query_function_multisample(glXGetProcAddressARB_t proc, const char *gl_version, const char *gl_extensions, 
102                                 const char* glx_version, const char *glx_extensions,
103                                 const char *server_glx_extensions, const char *client_glx_extensions)
104 {
105   return NULL != strstr(glx_extensions, "GLX_ARB_multisample");
106 }
107
108 BOOL query_function_pbuffer(glXGetProcAddressARB_t proc, const char *gl_version, const char *gl_extensions, 
109                             const char* glx_version, const char *glx_extensions,
110                             const char *server_glx_extensions, const char *client_glx_extensions)
111 {
112   FIXME("gl_version is: \"%s\"\n", gl_version);
113   FIXME("glx_exts is: \"%s\"\n", glx_extensions);
114
115   return 0 <= strcmp("1.3", glx_version) || NULL != strstr(glx_extensions, "GLX_SGIX_pbuffer");
116 }
117
118 BOOL query_function_pixel_format(glXGetProcAddressARB_t proc, const char *gl_version, const char *gl_extensions, 
119                                  const char* glx_version, const char *glx_extensions,
120                                  const char *server_glx_extensions, const char *client_glx_extensions)
121 {
122   return TRUE;
123 }
124
125 /** GLX_ARB_render_texture */
126 Bool (*p_glXBindTexImageARB)(Display *dpy, GLXPbuffer pbuffer, int buffer);
127 Bool (*p_glXReleaseTexImageARB)(Display *dpy, GLXPbuffer pbuffer, int buffer);
128 Bool (*p_glXDrawableAttribARB)(Display *dpy, GLXDrawable draw, const int *attribList);
129
130 BOOL query_function_render_texture(glXGetProcAddressARB_t proc, const char *gl_version, const char *gl_extensions, 
131                                    const char* glx_version, const char *glx_extensions,
132                                    const char *server_glx_extensions, const char *client_glx_extensions)
133 {
134   BOOL bTest = (0 <= strcmp("1.3", glx_version) || NULL != strstr(glx_extensions, "GLX_SGIX_pbuffer") || NULL != strstr(glx_extensions, "GLX_ARB_render_texture"));
135   if (bTest) {
136     p_glXBindTexImageARB = proc("glXBindTexImageARB");
137     p_glXReleaseTexImageARB = proc("glXReleaseTexImageARB");
138     p_glXDrawableAttribARB = proc("glXDrawableAttribARB");
139     bTest = (NULL != p_glXBindTexImageARB && NULL != p_glXReleaseTexImageARB && NULL != p_glXDrawableAttribARB);
140   }
141   return bTest;
142 }
143
144 int (*p_glXSwapIntervalSGI)(int);
145 BOOL query_function_swap_control(glXGetProcAddressARB_t proc, const char *gl_version, const char *gl_extensions, 
146                                  const char* glx_version, const char *glx_extensions,
147                                  const char *server_glx_extensions, const char *client_glx_extensions)
148 {
149   BOOL bTest = (0 <= strcmp("1.3", glx_version) || NULL != strstr(glx_extensions, "GLX_SGI_swap_control"));
150   if (bTest) {
151     p_glXSwapIntervalSGI = proc("glXSwapIntervalSGI");
152     bTest = (NULL != p_glXSwapIntervalSGI);
153   }
154   return bTest;
155 }
156
157 /***********************************************************************
158  *              wglGetExtensionsStringEXT(OPENGL32.@)
159  */
160 const char * WINAPI wglGetExtensionsStringEXT(void) {
161     TRACE("() returning \"%s\"\n", WGL_extensions);
162
163     return WGL_extensions;
164 }
165
166 /***********************************************************************
167  *              wglGetExtensionsStringARB(OPENGL32.@)
168  */
169 const char * WINAPI wglGetExtensionsStringARB(HDC hdc) {
170     TRACE("() returning \"%s\"\n", WGL_extensions);
171
172     return WGL_extensions;    
173 }
174
175 static int swap_interval = 1;
176
177 /***********************************************************************
178  *              wglSwapIntervalEXT(OPENGL32.@)
179  */
180 BOOL WINAPI wglSwapIntervalEXT(int interval) {
181   TRACE("(%d)\n", interval);
182   swap_interval = interval;
183   if (NULL != p_glXSwapIntervalSGI) {
184     return 0 == p_glXSwapIntervalSGI(interval);
185   }
186   WARN("(): GLX_SGI_swap_control extension seems not supported \n");
187   return TRUE;
188 }
189
190 /***********************************************************************
191  *              wglGetSwapIntervalEXT(OPENGL32.@)
192  */
193 int WINAPI wglGetSwapIntervalEXT(VOID) {
194     FIXME("(),stub!\n");
195     return swap_interval;
196 }
197
198 typedef struct wine_glpbuffer {
199   Drawable   drawable;
200   Display*   display;
201   int        pixelFormat;
202   int        width;
203   int        height;
204   int*       attribList;
205   HDC        hdc;
206 } Wine_GLPBuffer;
207
208 #define PUSH1(attribs,att)        attribs[nAttribs++] = (att); 
209 #define PUSH2(attribs,att,value)  attribs[nAttribs++] = (att); attribs[nAttribs++] = (value);
210
211 #define WGL_NUMBER_PIXEL_FORMATS_ARB            0x2000
212 #define WGL_DRAW_TO_WINDOW_ARB                  0x2001
213 #define WGL_DRAW_TO_BITMAP_ARB                  0x2002
214 #define WGL_ACCELERATION_ARB                    0x2003
215 #define WGL_NEED_PALETTE_ARB                    0x2004
216 #define WGL_NEED_SYSTEM_PALETTE_ARB             0x2005
217 #define WGL_SWAP_LAYER_BUFFERS_ARB              0x2006
218 #define WGL_SWAP_METHOD_ARB                     0x2007
219 #define WGL_NUMBER_OVERLAYS_ARB                 0x2008
220 #define WGL_NUMBER_UNDERLAYS_ARB                0x2009
221 #define WGL_TRANSPARENT_ARB                     0x200A
222 #define WGL_TRANSPARENT_RED_VALUE_ARB           0x2037
223 #define WGL_TRANSPARENT_GREEN_VALUE_ARB         0x2038
224 #define WGL_TRANSPARENT_BLUE_VALUE_ARB          0x2039
225 #define WGL_TRANSPARENT_ALPHA_VALUE_ARB         0x203A
226 #define WGL_TRANSPARENT_INDEX_VALUE_ARB         0x203B
227 #define WGL_SHARE_DEPTH_ARB                     0x200C
228 #define WGL_SHARE_STENCIL_ARB                   0x200D
229 #define WGL_SHARE_ACCUM_ARB                     0x200E
230 #define WGL_SUPPORT_GDI_ARB                     0x200F
231 #define WGL_SUPPORT_OPENGL_ARB                  0x2010
232 #define WGL_DOUBLE_BUFFER_ARB                   0x2011
233 #define WGL_STEREO_ARB                          0x2012
234 #define WGL_PIXEL_TYPE_ARB                      0x2013
235 #define WGL_COLOR_BITS_ARB                      0x2014
236 #define WGL_RED_BITS_ARB                        0x2015
237 #define WGL_RED_SHIFT_ARB                       0x2016
238 #define WGL_GREEN_BITS_ARB                      0x2017
239 #define WGL_GREEN_SHIFT_ARB                     0x2018
240 #define WGL_BLUE_BITS_ARB                       0x2019
241 #define WGL_BLUE_SHIFT_ARB                      0x201A
242 #define WGL_ALPHA_BITS_ARB                      0x201B
243 #define WGL_ALPHA_SHIFT_ARB                     0x201C
244 #define WGL_ACCUM_BITS_ARB                      0x201D
245 #define WGL_ACCUM_RED_BITS_ARB                  0x201E
246 #define WGL_ACCUM_GREEN_BITS_ARB                0x201F
247 #define WGL_ACCUM_BLUE_BITS_ARB                 0x2020
248 #define WGL_ACCUM_ALPHA_BITS_ARB                0x2021
249 #define WGL_DEPTH_BITS_ARB                      0x2022
250 #define WGL_STENCIL_BITS_ARB                    0x2023
251 #define WGL_AUX_BUFFERS_ARB                     0x2024
252
253 #define WGL_PBUFFER_WIDTH_ARB                   0x2034
254 #define WGL_PBUFFER_HEIGHT_ARB                  0x2035
255 #define WGL_PBUFFER_LOST_ARB                    0x2036
256 #define WGL_DRAW_TO_PBUFFER_ARB                 0x202D
257 #define WGL_MAX_PBUFFER_PIXELS_ARB              0x202E
258 #define WGL_MAX_PBUFFER_WIDTH_ARB               0x202F
259 #define WGL_MAX_PBUFFER_HEIGHT_ARB              0x2030
260 #define WGL_PBUFFER_LARGEST_ARB                 0x2033
261
262 #define WGL_TYPE_RGBA_ARB                       0x202B
263 #define WGL_TYPE_COLORINDEX_ARB                 0x202C
264
265 #define WGL_SAMPLE_BUFFERS_ARB                  0x2041
266 #define WGL_SAMPLES_ARB                         0x2042
267
268 #if 0 /* not used yet */
269 static unsigned ConvertAttribGLXtoWGL(const int* iWGLAttr, int* oGLXAttr) {
270   unsigned nAttribs = 0;
271   FIXME("not yet implemented!\n");
272   return nAttribs;
273 }
274 #endif
275
276 static unsigned ConvertAttribWGLtoGLX(const int* iWGLAttr, int* oGLXAttr) {
277   unsigned nAttribs = 0;
278   unsigned cur = 0; 
279   int pop;
280
281   while (0 != iWGLAttr[cur]) {
282     TRACE("pAttr[%d] = %x\n", cur, iWGLAttr[cur]);
283
284     switch (iWGLAttr[cur]) {
285     case WGL_COLOR_BITS_ARB:
286       pop = iWGLAttr[++cur];
287       PUSH2(oGLXAttr, GLX_BUFFER_SIZE, pop);
288       TRACE("pAttr[%d] = WGL_COLOR_BITS_ARB: %d\n", cur, pop);
289       break;
290     case WGL_BLUE_BITS_ARB:
291       pop = iWGLAttr[++cur];
292       PUSH2(oGLXAttr, GLX_BLUE_SIZE, pop);
293       TRACE("pAttr[%d] = GLX_BLUE_SIZE: %d\n", cur, pop);
294       break;
295     case WGL_RED_BITS_ARB:
296       pop = iWGLAttr[++cur];
297       TRACE("pAttr[%d] = GLX_RED_SIZE: %d\n", cur, pop);
298       PUSH2(oGLXAttr, GLX_RED_SIZE, pop);
299       break;
300     case WGL_GREEN_BITS_ARB:
301       pop = iWGLAttr[++cur];
302       TRACE("pAttr[%d] = GLX_GREEN_SIZE: %d\n", cur, pop);
303       PUSH2(oGLXAttr, GLX_GREEN_SIZE, pop);
304       break;
305     case WGL_ALPHA_BITS_ARB:
306       pop = iWGLAttr[++cur];
307       TRACE("pAttr[%d] = GLX_ALPHA_SIZE: %d\n", cur, pop);
308       PUSH2(oGLXAttr, GLX_ALPHA_SIZE, pop);
309       break;
310     case WGL_DEPTH_BITS_ARB:
311       pop = iWGLAttr[++cur];
312       TRACE("pAttr[%d] = GLX_DEPTH_SIZE: %d\n", cur, pop);
313       PUSH2(oGLXAttr, GLX_DEPTH_SIZE, pop);
314       break;
315     case WGL_STENCIL_BITS_ARB:
316       pop = iWGLAttr[++cur];
317       PUSH2(oGLXAttr, GLX_STENCIL_SIZE, pop);
318       TRACE("pAttr[%d] = GLX_STENCIL_SIZE: %d\n", cur, pop);
319       break;
320     case WGL_DOUBLE_BUFFER_ARB:
321       pop = iWGLAttr[++cur];
322       PUSH2(oGLXAttr, GLX_DOUBLEBUFFER, pop);
323       TRACE("pAttr[%d] = GLX_DOUBLEBUFFER: %d\n", cur, pop);
324       break;
325
326     case WGL_PIXEL_TYPE_ARB:
327       pop = iWGLAttr[++cur];
328       switch (pop) {
329       case WGL_TYPE_RGBA_ARB:  pop = GLX_RGBA_BIT; break ; 
330       case WGL_TYPE_COLORINDEX_ARB: pop = GLX_COLOR_INDEX_BIT; break ;
331       default:
332         ERR("unexpected PixelType(%x)\n", pop); 
333         pop = 0;
334       }
335       PUSH2(oGLXAttr, GLX_RENDER_TYPE, pop);
336       TRACE("pAttr[%d] = GLX_RENDER_TYPE: %d\n", cur, pop);
337       break;
338
339     case WGL_SUPPORT_GDI_ARB:
340     case WGL_DRAW_TO_WINDOW_ARB:
341     case WGL_DRAW_TO_BITMAP_ARB:
342     case WGL_DRAW_TO_PBUFFER_ARB:
343       pop = iWGLAttr[++cur];
344       PUSH2(oGLXAttr, GLX_X_RENDERABLE, pop);
345       TRACE("pAttr[%d] = GLX_RENDERABLE: %d\n", cur, pop);
346       break;
347
348     case WGL_ACCELERATION_ARB:
349     case WGL_SUPPORT_OPENGL_ARB:
350       pop = iWGLAttr[++cur];
351       /** nothing to do, if we are here, supposing support Accelerated OpenGL */
352       TRACE("pAttr[%d] = WGL_SUPPORT_OPENGL_ARB: %d\n", cur, pop);
353       break;
354
355     case WGL_PBUFFER_LARGEST_ARB:
356       pop = iWGLAttr[++cur];
357       PUSH2(oGLXAttr, GLX_LARGEST_PBUFFER, pop);
358       TRACE("pAttr[%d] = GLX_LARGEST_PBUFFER: %x\n", cur, pop);
359       break;
360
361     case WGL_SAMPLE_BUFFERS_ARB:
362       pop = iWGLAttr[++cur];
363       PUSH2(oGLXAttr, GLX_SAMPLE_BUFFERS_ARB, pop);
364       TRACE("pAttr[%d] = GLX_SAMPLE_BUFFERS_ARB: %x\n", cur, pop);
365       break;
366       
367     case WGL_SAMPLES_ARB:
368       pop = iWGLAttr[++cur];
369       PUSH2(oGLXAttr, GLX_SAMPLES_ARB, pop);
370       TRACE("pAttr[%d] = GLX_SAMPLES_ARB: %x\n", cur, pop);
371       break;
372
373     default:
374       FIXME("unsupported %x WGL Attribute\n", iWGLAttr[cur]);
375       break;
376     }
377     ++cur;
378   }
379   return nAttribs;
380 }
381
382 GLboolean WINAPI wglGetPixelFormatAttribivARB(HDC hdc, int iPixelFormat, int iLayerPlane, UINT nAttributes, const int *piAttributes, int *piValues)
383 {
384   Display* display = get_display( hdc );
385   UINT i;
386   GLXFBConfig* cfgs = NULL;
387   GLXFBConfig  curCfg = NULL;
388   int nCfgs = 0;
389   int hTest;
390   int tmp;
391   int curGLXAttr = 0;
392
393   TRACE("(%p, %d, %d, %d, %p, %p)\n", hdc, iPixelFormat, iLayerPlane, nAttributes, piAttributes, piValues);
394   
395   if (0 < iLayerPlane) {
396     FIXME("unsupported iLayerPlane(%d) > 0, returns FALSE\n", iLayerPlane);
397     return GL_FALSE;
398   }
399
400   cfgs = glXGetFBConfigs(display, DefaultScreen(display), &nCfgs);
401   if (NULL == cfgs) {
402     ERR("no FB Configs found for display(%p)\n", display);
403     return GL_FALSE;
404   }
405
406   for (i = 0; i < nAttributes; ++i) {
407     const int curWGLAttr = piAttributes[i];
408     TRACE("pAttr[%d] = %x\n", i, curWGLAttr);
409     
410     switch (curWGLAttr) {
411     case WGL_NUMBER_PIXEL_FORMATS_ARB:
412       piValues[i] = nCfgs; 
413       continue ;
414
415     case WGL_SUPPORT_OPENGL_ARB:
416       piValues[i] = GL_TRUE; 
417       continue ;
418
419     case WGL_ACCELERATION_ARB:
420       curGLXAttr = GLX_CONFIG_CAVEAT;
421       if (nCfgs < iPixelFormat || 0 >= iPixelFormat) goto pix_error;
422       curCfg = cfgs[iPixelFormat - 1];
423       hTest = glXGetFBConfigAttrib(display, curCfg, curGLXAttr, &tmp);
424       if (hTest) goto get_error;
425       switch (tmp) {
426       case GLX_NONE: piValues[i] = GL_TRUE; break;
427       case GLX_SLOW_CONFIG: piValues[i] = GL_FALSE; break;
428       case GLX_NON_CONFORMANT_CONFIG: piValues[i] = GL_TRUE; break; /** really GL_TRUE ? */
429       default:
430         ERR("unexpected Config Caveat(%x)\n", tmp);
431         piValues[i] = GL_FALSE;
432       }
433       continue ;
434
435     case WGL_TRANSPARENT_ARB:
436       curGLXAttr = GLX_TRANSPARENT_TYPE;
437       if (nCfgs < iPixelFormat || 0 >= iPixelFormat) goto pix_error;
438       curCfg = cfgs[iPixelFormat - 1];
439       hTest = glXGetFBConfigAttrib(display, curCfg, curGLXAttr, &tmp);
440       if (hTest) goto get_error;
441       piValues[i] = GL_FALSE;
442       if (GLX_NONE != tmp) piValues[i] = GL_TRUE;
443       continue ;
444
445     case WGL_PIXEL_TYPE_ARB:
446       curGLXAttr = GLX_RENDER_TYPE;
447       if (nCfgs < iPixelFormat || 0 >= iPixelFormat) goto pix_error;
448       curCfg = cfgs[iPixelFormat - 1];
449       hTest = glXGetFBConfigAttrib(display, curCfg, curGLXAttr, &tmp);
450       if (hTest) goto get_error;
451       switch (tmp) {
452       case GLX_RGBA_BIT: piValues[i] = WGL_TYPE_RGBA_ARB; break;
453       case GLX_COLOR_INDEX_BIT: piValues[i] = WGL_TYPE_COLORINDEX_ARB; break ;
454       default:
455         ERR("unexpected RenderType(%x)\n", tmp);
456         piValues[i] = WGL_TYPE_RGBA_ARB;
457       }
458       continue ;
459       
460     case WGL_COLOR_BITS_ARB:
461       curGLXAttr = GLX_BUFFER_SIZE;
462       break;
463     case WGL_BLUE_BITS_ARB:
464       curGLXAttr = GLX_BLUE_SIZE;
465       break;
466     case WGL_RED_BITS_ARB:
467       curGLXAttr = GLX_RED_SIZE;
468       break;
469     case WGL_GREEN_BITS_ARB:
470       curGLXAttr = GLX_GREEN_SIZE;
471       break;
472     case WGL_ALPHA_BITS_ARB:
473       curGLXAttr = GLX_ALPHA_SIZE;
474       break;
475     case WGL_DEPTH_BITS_ARB:
476       curGLXAttr = GLX_DEPTH_SIZE;
477       break;
478     case WGL_STENCIL_BITS_ARB:
479       curGLXAttr = GLX_STENCIL_SIZE;
480       break;
481     case WGL_DOUBLE_BUFFER_ARB:
482       curGLXAttr = GLX_DOUBLEBUFFER;
483       break;
484     case WGL_STEREO_ARB:
485       curGLXAttr = GLX_STEREO;
486       break;
487     case WGL_AUX_BUFFERS_ARB:
488       curGLXAttr = GLX_AUX_BUFFERS;
489       break;
490
491     case WGL_SUPPORT_GDI_ARB:
492     case WGL_DRAW_TO_WINDOW_ARB:
493     case WGL_DRAW_TO_BITMAP_ARB:
494     case WGL_DRAW_TO_PBUFFER_ARB:
495       curGLXAttr = GLX_X_RENDERABLE;
496       break;
497
498     case WGL_PBUFFER_LARGEST_ARB:
499       curGLXAttr = GLX_LARGEST_PBUFFER;
500       break;
501
502     case WGL_SAMPLE_BUFFERS_ARB:
503       curGLXAttr = GLX_SAMPLE_BUFFERS_ARB;
504       break;
505       
506     case WGL_SAMPLES_ARB:
507       curGLXAttr = GLX_SAMPLES_ARB;
508       break;
509
510     default:
511       FIXME("unsupported %x WGL Attribute\n", curWGLAttr);
512     }
513     
514     if (0 != curGLXAttr) {
515       if (nCfgs < iPixelFormat || 0 >= iPixelFormat) goto pix_error;
516       curCfg = cfgs[iPixelFormat - 1];
517       hTest = glXGetFBConfigAttrib(display, curCfg, curGLXAttr, piValues + i);
518       if (hTest) goto get_error;
519     } else { 
520       piValues[i] = GL_FALSE; 
521     }
522   }
523   
524   return GL_TRUE;
525
526 get_error:
527   ERR("(%p): unexpected failure on GetFBConfigAttrib(%x) returns FALSE\n", hdc, curGLXAttr);
528   XFree(cfgs);
529   return GL_FALSE;
530
531 pix_error:
532   ERR("(%p): unexpected iPixelFormat(%d) vs nFormats(%d), returns FALSE\n", hdc, iPixelFormat, nCfgs);
533   XFree(cfgs);
534   return GL_FALSE;
535 }
536
537 GLboolean WINAPI wglGetPixelFormatAttribfvARB(HDC hdc, int iPixelFormat, int iLayerPlane, UINT nAttributes, const int *piAttributes, FLOAT *pfValues)
538 {
539     FIXME("(%p, %d, %d, %d, %p, %p): stub\n", hdc, iPixelFormat, iLayerPlane, nAttributes, piAttributes, pfValues);
540     return GL_FALSE;
541 }
542 /**
543  * http://publib.boulder.ibm.com/infocenter/pseries/index.jsp?topic=/com.ibm.aix.doc/libs/openglrf/glXChooseFBConfig.htm
544  */
545 GLboolean WINAPI wglChoosePixelFormatARB(HDC hdc, const int *piAttribIList, const FLOAT *pfAttribFList, UINT nMaxFormats, int *piFormats, UINT *nNumFormats)
546 {
547   Display* display = get_display( hdc );
548   int gl_test = 0;
549   int attribs[256];
550   unsigned nAttribs = 0;
551
552   GLXFBConfig* cfgs = NULL;
553   int nCfgs = 0;
554   UINT it;
555   int fmt_id;
556
557   GLXFBConfig* cfgs_fmt = NULL;
558   int nCfgs_fmt = 0;
559   UINT it_fmt;
560   int tmp_fmt_id;
561
562   int pfmt_it = 0;
563
564   TRACE("(%p, %p, %p, %d, %p, %p): hackish\n", hdc, piAttribIList, pfAttribFList, nMaxFormats, piFormats, nNumFormats);
565   if (NULL != pfAttribFList) {
566     FIXME("unused pfAttribFList\n");
567   }
568
569   nAttribs = ConvertAttribWGLtoGLX(piAttribIList, attribs);
570   PUSH1(attribs, None);
571
572   cfgs = glXChooseFBConfig(display, DefaultScreen(display), attribs, &nCfgs);
573   if (NULL == cfgs) {
574     WARN("Compatible Pixel Format not found\n");
575     return GL_FALSE;
576   }
577
578   cfgs_fmt = glXGetFBConfigs(display, DefaultScreen(display), &nCfgs_fmt);
579   if (NULL == cfgs_fmt) {
580     ERR("Failed to get All FB Configs\n");
581     XFree(cfgs);
582     return GL_FALSE;
583   }
584
585   for (it = 0; it < nMaxFormats && it < nCfgs; ++it) {
586     gl_test = glXGetFBConfigAttrib(display, cfgs[it], GLX_FBCONFIG_ID, &fmt_id);
587     if (gl_test) {
588       ERR("Failed to retrieve FBCONFIG_ID from GLXFBConfig, expect problems.\n");
589       continue ;
590     }
591     for (it_fmt = 0; it_fmt < nCfgs_fmt; ++it_fmt) {
592       gl_test = glXGetFBConfigAttrib(display, cfgs_fmt[it_fmt], GLX_FBCONFIG_ID, &tmp_fmt_id);
593       if (gl_test) {
594         ERR("Failed to retrieve FBCONFIG_ID from GLXFBConfig, expect problems.\n");
595         continue ;
596       }
597       if (fmt_id == tmp_fmt_id) {
598         piFormats[pfmt_it] = it_fmt + 1;
599         ++pfmt_it;
600         break ;
601       }
602     }
603     if (it_fmt == nCfgs_fmt) {
604       ERR("Failed to get valid fmt for %d. Try next.\n", it);
605       continue ;
606     }
607     TRACE("at %d/%d found FBCONFIG_ID(%d/%d)\n", it + 1, nCfgs, piFormats[it], nCfgs_fmt);
608   }
609   
610   *nNumFormats = pfmt_it;
611   /** free list */
612   XFree(cfgs);
613   XFree(cfgs_fmt);
614   return GL_TRUE;
615 }
616
617 #define HPBUFFERARB void *
618 HPBUFFERARB WINAPI wglCreatePbufferARB(HDC hdc, int iPixelFormat, int iWidth, int iHeight, const int *piAttribList)
619 {
620   Wine_GLPBuffer* object = NULL;
621   Display* display = get_display( hdc );
622   GLXFBConfig* cfgs = NULL;
623   int nCfgs = 0;
624   int attribs[256];
625   unsigned nAttribs = 0;
626
627   TRACE("(%p, %d, %d, %d, %p)\n", hdc, iPixelFormat, iWidth, iHeight, piAttribList);
628
629   if (0 >= iPixelFormat) {
630     ERR("(%p): unexpected iPixelFormat(%d) <= 0, returns NULL\n", hdc, iPixelFormat);
631     return NULL; /* unespected error */
632   }
633
634   /*nAttribs = ConvertAttribWGLtoGLX(piAttribList, attribs);*/
635   /*
636   nAttribs = 0;
637   PUSH2(attribs, GLX_FBCONFIG_ID, iPixelFormat);
638   PUSH1(attribs, None);
639   cfgs = glXChooseFBConfig(display, DefaultScreen(display), attribs, &nCfgs);
640   iPixelFormat = 0;
641   */
642   cfgs = glXGetFBConfigs(display, DefaultScreen(display), &nCfgs);
643
644   if (NULL == cfgs || 0 == nCfgs) {
645     ERR("(%p): Cannot get FB Configs for iPixelFormat(%d), returns NULL\n", hdc, iPixelFormat);
646     return NULL; /* unespected error */
647   }
648   if (nCfgs < iPixelFormat) {
649     ERR("(%p): unexpected iPixelFormat(%d) > nFormats(%d), returns NULL\n", hdc, iPixelFormat, nCfgs);
650     XFree(cfgs);
651     return NULL; /* unespected error */
652   }
653
654   object = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(Wine_GLPBuffer));
655   object->hdc = hdc;
656   object->display = display;
657   object->width = iWidth;
658   object->height = iHeight;
659   object->pixelFormat = iPixelFormat;
660
661   nAttribs = ConvertAttribWGLtoGLX(piAttribList, attribs);
662   PUSH2(attribs, GLX_PBUFFER_WIDTH,  iWidth);
663   PUSH2(attribs, GLX_PBUFFER_HEIGHT, iHeight); 
664   PUSH1(attribs, None);
665
666   object->drawable = glXCreatePbuffer(display, cfgs[iPixelFormat - 1], attribs);
667   TRACE("drawable as %p\n", (void*) object->drawable);
668
669   TRACE("->(%p)\n", object);
670
671   /** free list */
672   XFree(cfgs);
673
674   return (HPBUFFERARB) object;
675 }
676
677 HDC WINAPI wglGetPbufferDCARB(HPBUFFERARB hPbuffer)
678 {
679   Wine_GLPBuffer* object = (Wine_GLPBuffer*) hPbuffer;
680   HDC hDC;
681   hDC = CreateCompatibleDC(object->hdc);
682   set_drawable(hDC, object->drawable); /* works ?? */
683   TRACE("(%p)\n", hPbuffer);
684   return hDC;
685 }
686
687 int WINAPI wglReleasePbufferDCARB(HPBUFFERARB hPbuffer, HDC hdc)
688 {
689   TRACE("(%p, %p)\n", hPbuffer, hdc);
690   DeleteDC(hdc);
691   return 0;
692 }
693
694 GLboolean WINAPI wglDestroyPbufferARB(HPBUFFERARB hPbuffer)
695 {
696   Wine_GLPBuffer* object = (Wine_GLPBuffer*) hPbuffer;
697   TRACE("(%p)\n", hPbuffer);
698
699   glXDestroyPbuffer(object->display, object->drawable);
700   HeapFree(GetProcessHeap(), 0, object);
701
702   return GL_TRUE;
703 }
704
705 GLboolean WINAPI wglQueryPbufferARB(HPBUFFERARB hPbuffer, int iAttribute, int *piValue)
706 {
707   Wine_GLPBuffer* object = (Wine_GLPBuffer*) hPbuffer;
708   TRACE("(%p, %d, %p)\n", hPbuffer, iAttribute, piValue);
709
710   /*glXQueryDrawable(object->display, object->drawable);*/
711
712   switch (iAttribute) {
713   case WGL_PBUFFER_WIDTH_ARB:
714     glXQueryDrawable(object->display, object->drawable, GLX_WIDTH, piValue);
715     break;
716   case WGL_PBUFFER_HEIGHT_ARB:
717     glXQueryDrawable(object->display, object->drawable, GLX_HEIGHT, piValue);
718     break;
719
720   case WGL_PBUFFER_LOST_ARB:
721     FIXME("unsupported WGL_PBUFFER_LOST_ARB (need glXSelectEvent/GLX_DAMAGED work)\n");
722     break;
723
724   default:
725     FIXME("unexpected attribute %x\n", iAttribute);
726     break;
727   }
728
729   return GL_TRUE;
730 }
731
732 GLboolean WINAPI wglBindTexImageARB(HPBUFFERARB hPbuffer, int iBuffer)
733 {
734   Wine_GLPBuffer* object = (Wine_GLPBuffer*) hPbuffer;
735   TRACE("(%p, %d)\n", hPbuffer, iBuffer);
736   return p_glXBindTexImageARB(object->display, object->drawable, iBuffer);
737 }
738
739 GLboolean WINAPI wglReleaseTexImageARB(HPBUFFERARB hPbuffer, int iBuffer)
740 {
741   Wine_GLPBuffer* object = (Wine_GLPBuffer*) hPbuffer;
742   TRACE("(%p, %d)\n", hPbuffer, iBuffer);
743   return p_glXReleaseTexImageARB(object->display, object->drawable, iBuffer);
744 }
745
746 GLboolean WINAPI wglSetPbufferAttribARB(HPBUFFERARB hPbuffer, const int *piAttribList)
747 {
748   Wine_GLPBuffer* object = (Wine_GLPBuffer*) hPbuffer;
749   WARN("(%p, %p): alpha-testing, report any problem\n", hPbuffer, piAttribList);
750   return p_glXDrawableAttribARB(object->display, object->drawable, piAttribList);
751 }
752
753 static const struct {
754     const char *name;
755     BOOL (*query_function)(glXGetProcAddressARB_t proc, const char *gl_version, const char *gl_extensions,
756                            const char *glx_version, const char *glx_extensions,
757                            const char *server_glx_extensions, const char *client_glx_extensions);
758 } extension_list[] = {
759   { "WGL_ARB_make_current_read", query_function_make_current_read },
760   { "WGL_ARB_multisample",       query_function_multisample },
761   { "WGL_ARB_pbuffer",           query_function_pbuffer },
762   { "WGL_ARB_pixel_format" ,     query_function_pixel_format },
763   { "WGL_ARB_render_texture",    query_function_render_texture },
764   { "WGL_EXT_swap_control",      query_function_swap_control }
765 };
766
767 /* Used to initialize the WGL extension string at DLL loading */
768 void wgl_ext_initialize_extensions(Display *display, int screen, glXGetProcAddressARB_t proc, const char* disabled_extensions)
769 {
770     int size = strlen(WGL_extensions_base);
771     const char *glx_extensions = glXQueryExtensionsString(display, screen);
772     const char *server_glx_extensions = glXQueryServerString(display, screen, GLX_EXTENSIONS);
773     const char *client_glx_extensions = glXGetClientString(display, GLX_EXTENSIONS);
774     const char *gl_extensions = (const char *) glGetString(GL_EXTENSIONS);
775     const char *gl_version = (const char *) glGetString(GL_VERSION);
776     const char *glx_version = glXGetClientString(display, GLX_VERSION);
777     int i;
778
779     TRACE("GL version      : %s.\n", debugstr_a(gl_version));
780     TRACE("GL exts         : %s.\n", debugstr_a(gl_extensions));
781     TRACE("GLX exts        : %s.\n", debugstr_a(glx_extensions));
782     TRACE("Server GLX exts : %s.\n", debugstr_a(server_glx_extensions));
783     TRACE("Client GLX exts : %s.\n", debugstr_a(client_glx_extensions));
784
785     for (i = 0; i < (sizeof(extension_list) / sizeof(extension_list[0])); i++) {
786         if (strstr(disabled_extensions, extension_list[i].name)) continue ; /* disabled by config, next */
787         if (extension_list[i].query_function(proc, 
788                                              gl_version, gl_extensions, 
789                                              glx_version, glx_extensions,
790                                              server_glx_extensions, client_glx_extensions)) {
791             size += strlen(extension_list[i].name) + 1;
792         }
793     }
794
795     /* For the moment, only 'base' extensions are supported. */
796     WGL_extensions = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, size + 1);
797     if (WGL_extensions == NULL) {
798         WGL_extensions = (char *) WGL_extensions_base;
799     } else {
800         strcpy(WGL_extensions, WGL_extensions_base);
801         for (i = 0; i < (sizeof(extension_list) / sizeof(extension_list[0])); i++) {
802             if (strstr(disabled_extensions, extension_list[i].name)) continue ; /* disabled by config, next */
803             if (extension_list[i].query_function(proc, 
804                                                  gl_version, gl_extensions, 
805                                                  glx_version, glx_extensions,
806                                                  server_glx_extensions, client_glx_extensions)) {
807                 strcat(WGL_extensions, " ");
808                 strcat(WGL_extensions, extension_list[i].name);
809             }
810         }
811     }
812
813     TRACE("Supporting following WGL extensions : %s.\n", debugstr_a(WGL_extensions));
814 }
815
816 void wgl_ext_finalize_extensions(void)
817 {
818     if (WGL_extensions != WGL_extensions_base) {
819         HeapFree(GetProcessHeap(), 0, WGL_extensions);
820     }
821 }
822
823 /*
824  * Putting this at the end to prevent having to write the prototypes :-) 
825  *
826  * @WARNING: this list must be ordered by name
827  *
828  * @TODO: real handle caps on providing some func_init functions (third param, ex: to check extensions)
829  */
830 WGL_extension wgl_extension_registry[] = {
831     { "wglBindTexImageARB", (void *) wglBindTexImageARB, NULL, NULL},
832     { "wglChoosePixelFormatARB", (void *) wglChoosePixelFormatARB, NULL, NULL},
833     { "wglCreatePbufferARB", (void *) wglCreatePbufferARB, NULL, NULL},
834     { "wglDestroyPbufferARB", (void *) wglDestroyPbufferARB, NULL, NULL},
835     { "wglGetCurrentReadDCARB", (void *) wglGetCurrentReadDCARB, NULL, NULL},
836     { "wglGetExtensionsStringARB", (void *) wglGetExtensionsStringARB, NULL, NULL},
837     { "wglGetExtensionsStringEXT", (void *) wglGetExtensionsStringEXT, NULL, NULL},
838     { "wglGetPbufferDCARB", (void *) wglGetPbufferDCARB, NULL, NULL},
839     { "wglGetPixelFormatAttribfvARB", (void *) wglGetPixelFormatAttribfvARB, NULL, NULL},
840     { "wglGetPixelFormatAttribivARB", (void *) wglGetPixelFormatAttribivARB, NULL, NULL},
841     { "wglGetSwapIntervalEXT", (void *) wglGetSwapIntervalEXT, NULL, NULL},
842     { "wglMakeContextCurrentARB", (void *) wglMakeContextCurrentARB, NULL, NULL },
843     { "wglQueryPbufferARB", (void *) wglQueryPbufferARB, NULL, NULL},
844     { "wglReleasePbufferDCARB", (void *) wglReleasePbufferDCARB, NULL, NULL},
845     { "wglReleaseTexImageARB", (void *) wglReleaseTexImageARB, NULL, NULL},
846     { "wglSetPbufferAttribARB", (void *) wglSetPbufferAttribARB, NULL, NULL},
847     { "wglSwapIntervalEXT", (void *) wglSwapIntervalEXT, NULL, NULL}
848 };
849 int wgl_extension_registry_size = sizeof(wgl_extension_registry) / sizeof(wgl_extension_registry[0]);