ecere/gfx/drivers/OpenGL; 3DS: Fixed GLES indices, matrix stack issues
[sdk] / ecere / src / gfx / drivers / OpenGLDisplayDriver.ec
1 // We were using PBUFFER for alpha compositing on Linux before, but it does not seem to work, nor be required anymore.
2 // #define USEPBUFFER
3
4 namespace gfx::drivers;
5
6 // OpenGL Extensions
7 #if defined(__unix__) || defined(__APPLE__)
8
9 #if !defined(__MINGW32__)
10    #define GL_GLEXT_PROTOTYPES
11 #endif
12
13 #define pointer _pointer
14
15 #ifdef ECERE_MINIGLX
16
17 //#include <GL/miniglx.h>
18
19 #else
20
21    #if !defined(__ANDROID__) && !defined(__EMSCRIPTEN__) && !defined(__ODROID__)
22
23       #define property _property
24       #define new _new
25       #define class _class
26
27       #define Window    X11Window
28       #define Cursor    X11Cursor
29       #define Font      X11Font
30       #define Display   X11Display
31       #define Time      X11Time
32       #define KeyCode   X11KeyCode
33       #define Picture   X11Picture
34       #define uint _uint
35
36       #include <X11/Xlib.h>
37       #include <X11/Xutil.h>
38       #include <GL/glx.h>
39       #include <X11/extensions/XShm.h>
40       #include <sys/ipc.h>
41       #include <sys/shm.h>
42       #include <X11/extensions/Xrender.h>
43       #include <X11/extensions/shape.h>
44
45       #undef Window
46       #undef Cursor
47       #undef Font
48       #undef Display
49       #undef Time
50       #undef KeyCode
51       #undef Picture
52       #undef uint
53       #undef new
54       #undef property
55       #undef class
56
57    #endif
58
59 #endif
60
61 #endif
62
63 #if defined(__APPLE__)
64 #include <OpenGl/gl.h>
65 #endif
66
67 #if defined(__WIN32__) || defined(__unix__) || defined(__APPLE__)
68
69 #if defined(__WIN32__)
70    #define WIN32_LEAN_AND_MEAN
71    #undef _WIN32_WINNT
72    #define _WIN32_WINNT 0x0502
73    #define String Sting_
74    #include <windows.h>
75    #undef String
76 #endif
77
78 #if defined(__ANDROID__) || defined(__ODROID__)
79
80 #define uint _uint
81 #define property _property
82 #define new _new
83 #define class _class
84 #define Window    X11Window
85 #define Cursor    X11Cursor
86 #define Font      X11Font
87 #define Display   X11Display
88 #define Time      X11Time
89 #define KeyCode   X11KeyCode
90 #define Picture   X11Picture
91 #define Bool      X11Bool
92
93    #include <GLES/gl.h>
94    #include <EGL/egl.h>
95
96 #undef Bool
97 #undef Picture
98 #undef Window
99 #undef Cursor
100 #undef Font
101 #undef Display
102 #undef Time
103 #undef KeyCode
104 #undef uint
105 #undef new
106 #undef property
107 #undef class
108
109 #elif defined(__EMSCRIPTEN__)
110
111    #define property _property
112    #define uint _uint
113
114    #include <GL/gl.h>
115
116    //#include <GLES/gl.h>
117    //#include <EGL/egl.h>
118
119    //#include <GLES2/gl.h>
120    //#include <EGL/egl.h>
121
122    //#include <GLES2/gl2.h>
123    #include <GL/glfw.h>
124    #include <emscripten/emscripten.h>
125
126    #undef property
127    #undef uint
128
129 #else
130
131    #include <GL/gl.h>
132    #include <GL/glext.h>
133
134 #endif
135
136 #if defined(__ODROID__) && !defined(_GLES)
137 #define _GLES
138 #endif
139
140 #if defined(__EMSCRIPTEN__)
141 #define EM_MODE
142 // #define _GLES
143 #endif
144
145 //#define EM_MODE
146
147 #undef pointer
148
149 import "Display"
150
151 #if defined(__unix__) || defined(__APPLE__)
152
153    #if !defined(__ANDROID__) && !defined(__EMSCRIPTEN__) && !defined(__ODROID__)
154    import "XInterface"
155    #endif
156
157 #endif
158
159 static double nearPlane = 1;
160
161 public double glesGetNearPlane()
162 {
163    return nearPlane;
164 }
165
166 public void glesSetNearPlane(double value)
167 {
168    nearPlane = value;
169 }
170
171 #define glLoadMatrix glLoadMatrixd
172 #define glMultMatrix glMultMatrixd
173 #define glGetMatrix  glGetDoublev
174 #define glTranslate glTranslated
175 #define glScale glScaled
176
177 /*
178 #define glVertex3v glVertex3dv
179 #define glNormal3v glNormal3dv
180 */
181
182 /*
183 //#ifdef VERTEX_FORMAT_DOUBLE
184
185 #define glLoadMatrix glLoadMatrixd
186 #define glMultMatrix glMultMatrixd
187 #define glGetMatrix  glGetDoublev
188 #define glVertex3v glVertex3dv
189 #define glNormal3v glNormal3dv
190 #define glTranslate glTranslated
191 #define glScale glScaled
192 //#define GL_VERTEX_FORMAT   GL_DOUBLE
193
194 #else
195
196 #define glLoadMatrix glLoadMatrixf
197 #define glMultMatrix glMultMatrixf
198 #define glGetMatrix  glGetFloatv
199 #define glVertex3v glVertex3fv
200 #define glNormal3v glNormal3fv
201 #define glTranslate glTranslatef
202 #define glScale glScalef
203 //#define GL_VERTEX_FORMAT   GL_FLOAT
204
205 #endif
206 */
207
208 #define GL_ARRAY_BUFFER_ARB            0x8892
209 #define GL_ELEMENT_ARRAY_BUFFER_ARB    0x8893
210 #define GL_STATIC_DRAW_ARB             0x88E4
211 #define GL_LIGHT_MODEL_COLOR_CONTROL   0x81F8
212 #define GL_SEPARATE_SPECULAR_COLOR     0x81FA
213
214 #define GL_MULTISAMPLE_ARB             0x809D
215
216 #if defined(__WIN32__)
217
218    #define WGL_SAMPLE_BUFFERS_ARB              0x2041
219    #define WGL_SAMPLES_ARB                     0x2042
220
221    #define  WGL_WGLEXT_VERSION   1
222    #define  WGL_FRONT_COLOR_BUFFER_BIT_ARB   0x00000001
223    #define  WGL_BACK_COLOR_BUFFER_BIT_ARB   0x00000002
224    #define  WGL_DEPTH_BUFFER_BIT_ARB   0x00000004
225    #define  WGL_STENCIL_BUFFER_BIT_ARB   0x00000008
226    #define  WGL_NUMBER_PIXEL_FORMATS_ARB   0x2000
227    #define  WGL_DRAW_TO_WINDOW_ARB   0x2001
228    #define  WGL_DRAW_TO_BITMAP_ARB   0x2002
229    #define  WGL_ACCELERATION_ARB   0x2003
230    #define  WGL_NEED_PALETTE_ARB   0x2004
231    #define  WGL_NEED_SYSTEM_PALETTE_ARB   0x2005
232    #define  WGL_SWAP_LAYER_BUFFERS_ARB   0x2006
233    #define  WGL_SWAP_METHOD_ARB   0x2007
234    #define  WGL_NUMBER_OVERLAYS_ARB   0x2008
235    #define  WGL_NUMBER_UNDERLAYS_ARB   0x2009
236    #define  WGL_TRANSPARENT_ARB   0x200A
237    #define  WGL_TRANSPARENT_RED_VALUE_ARB   0x2037
238    #define  WGL_TRANSPARENT_GREEN_VALUE_ARB   0x2038
239    #define  WGL_TRANSPARENT_BLUE_VALUE_ARB   0x2039
240    #define  WGL_TRANSPARENT_ALPHA_VALUE_ARB   0x203A
241    #define  WGL_TRANSPARENT_INDEX_VALUE_ARB   0x203B
242    #define  WGL_SHARE_DEPTH_ARB   0x200C
243    #define  WGL_SHARE_STENCIL_ARB   0x200D
244    #define  WGL_SHARE_ACCUM_ARB   0x200E
245    #define  WGL_SUPPORT_GDI_ARB   0x200F
246    #define  WGL_SUPPORT_OPENGL_ARB   0x2010
247    #define  WGL_DOUBLE_BUFFER_ARB   0x2011
248    #define  WGL_STEREO_ARB   0x2012
249    #define  WGL_PIXEL_TYPE_ARB   0x2013
250    #define  WGL_COLOR_BITS_ARB   0x2014
251    #define  WGL_RED_BITS_ARB   0x2015
252    #define  WGL_RED_SHIFT_ARB   0x2016
253    #define  WGL_GREEN_BITS_ARB   0x2017
254    #define  WGL_GREEN_SHIFT_ARB   0x2018
255    #define  WGL_BLUE_BITS_ARB   0x2019
256    #define  WGL_BLUE_SHIFT_ARB   0x201A
257    #define  WGL_ALPHA_BITS_ARB   0x201B
258    #define  WGL_ALPHA_SHIFT_ARB   0x201C
259    #define  WGL_ACCUM_BITS_ARB   0x201D
260    #define  WGL_ACCUM_RED_BITS_ARB   0x201E
261    #define  WGL_ACCUM_GREEN_BITS_ARB   0x201F
262    #define  WGL_ACCUM_BLUE_BITS_ARB   0x2020
263    #define  WGL_ACCUM_ALPHA_BITS_ARB   0x2021
264    #define  WGL_DEPTH_BITS_ARB   0x2022
265    #define  WGL_STENCIL_BITS_ARB   0x2023
266    #define  WGL_AUX_BUFFERS_ARB   0x2024
267    #define  WGL_NO_ACCELERATION_ARB   0x2025
268    #define  WGL_GENERIC_ACCELERATION_ARB   0x2026
269    #define  WGL_FULL_ACCELERATION_ARB   0x2027
270    #define  WGL_SWAP_EXCHANGE_ARB   0x2028
271    #define  WGL_SWAP_COPY_ARB   0x2029
272    #define  WGL_SWAP_UNDEFINED_ARB   0x202A
273    #define  WGL_TYPE_RGBA_ARB   0x202B
274    #define  WGL_TYPE_COLORINDEX_ARB   0x202C
275    #define  ERROR_INVALID_PIXEL_TYPE_ARB   0x2043
276    #define  ERROR_INCOMPATIBLE_DEVICE_CONTEXTS_ARB   0x2054
277    #define  WGL_DRAW_TO_PBUFFER_ARB   0x202D
278    #define  WGL_MAX_PBUFFER_PIXELS_ARB   0x202E
279    #define  WGL_MAX_PBUFFER_WIDTH_ARB   0x202F
280    #define  WGL_MAX_PBUFFER_HEIGHT_ARB   0x2030
281    #define  WGL_PBUFFER_LARGEST_ARB   0x2033
282    #define  WGL_PBUFFER_WIDTH_ARB   0x2034
283    #define  WGL_PBUFFER_HEIGHT_ARB   0x2035
284    #define  WGL_PBUFFER_LOST_ARB   0x2036
285    #define  ERROR_INVALID_PIXEL_TYPE_EXT   0x2043
286    #define  WGL_NUMBER_PIXEL_FORMATS_EXT   0x2000
287    #define  WGL_DRAW_TO_WINDOW_EXT   0x2001
288    #define  WGL_DRAW_TO_BITMAP_EXT   0x2002
289    #define  WGL_ACCELERATION_EXT   0x2003
290    #define  WGL_NEED_PALETTE_EXT   0x2004
291    #define  WGL_NEED_SYSTEM_PALETTE_EXT   0x2005
292    #define  WGL_SWAP_LAYER_BUFFERS_EXT   0x2006
293    #define  WGL_SWAP_METHOD_EXT   0x2007
294    #define  WGL_NUMBER_OVERLAYS_EXT   0x2008
295    #define  WGL_NUMBER_UNDERLAYS_EXT   0x2009
296    #define  WGL_TRANSPARENT_EXT   0x200A
297    #define  WGL_TRANSPARENT_VALUE_EXT   0x200B
298    #define  WGL_SHARE_DEPTH_EXT   0x200C
299    #define  WGL_SHARE_STENCIL_EXT   0x200D
300    #define  WGL_SHARE_ACCUM_EXT   0x200E
301    #define  WGL_SUPPORT_GDI_EXT   0x200F
302    #define  WGL_SUPPORT_OPENGL_EXT   0x2010
303    #define  WGL_DOUBLE_BUFFER_EXT   0x2011
304    #define  WGL_STEREO_EXT   0x2012
305    #define  WGL_PIXEL_TYPE_EXT   0x2013
306    #define  WGL_COLOR_BITS_EXT   0x2014
307    #define  WGL_RED_BITS_EXT   0x2015
308    #define  WGL_RED_SHIFT_EXT   0x2016
309    #define  WGL_GREEN_BITS_EXT   0x2017
310    #define  WGL_GREEN_SHIFT_EXT   0x2018
311    #define  WGL_BLUE_BITS_EXT   0x2019
312    #define  WGL_BLUE_SHIFT_EXT   0x201A
313    #define  WGL_ALPHA_BITS_EXT   0x201B
314    #define  WGL_ALPHA_SHIFT_EXT   0x201C
315    #define  WGL_ACCUM_BITS_EXT   0x201D
316    #define  WGL_ACCUM_RED_BITS_EXT   0x201E
317    #define  WGL_ACCUM_GREEN_BITS_EXT   0x201F
318    #define  WGL_ACCUM_BLUE_BITS_EXT   0x2020
319    #define  WGL_ACCUM_ALPHA_BITS_EXT   0x2021
320    #define  WGL_DEPTH_BITS_EXT   0x2022
321    #define  WGL_STENCIL_BITS_EXT   0x2023
322    #define  WGL_AUX_BUFFERS_EXT   0x2024
323    #define  WGL_NO_ACCELERATION_EXT   0x2025
324    #define  WGL_GENERIC_ACCELERATION_EXT   0x2026
325    #define  WGL_FULL_ACCELERATION_EXT   0x2027
326    #define  WGL_SWAP_EXCHANGE_EXT   0x2028
327    #define  WGL_SWAP_COPY_EXT   0x2029
328    #define  WGL_SWAP_UNDEFINED_EXT   0x202A
329    #define  WGL_TYPE_RGBA_EXT   0x202B
330    #define  WGL_TYPE_COLORINDEX_EXT   0x202C
331    #define  WGL_DRAW_TO_PBUFFER_EXT   0x202D
332    #define  WGL_MAX_PBUFFER_PIXELS_EXT   0x202E
333    #define  WGL_MAX_PBUFFER_WIDTH_EXT   0x202F
334    #define  WGL_MAX_PBUFFER_HEIGHT_EXT   0x2030
335    #define  WGL_OPTIMAL_PBUFFER_WIDTH_EXT   0x2031
336    #define  WGL_OPTIMAL_PBUFFER_HEIGHT_EXT   0x2032
337    #define  WGL_PBUFFER_LARGEST_EXT   0x2033
338    #define  WGL_PBUFFER_WIDTH_EXT   0x2034
339    #define  WGL_PBUFFER_HEIGHT_EXT   0x2035
340    #define  WGL_DEPTH_FLOAT_EXT   0x2040
341    #define  WGL_SAMPLE_BUFFERS_3DFX   0x2060
342    #define  WGL_SAMPLES_3DFX   0x2061
343    #define  WGL_SAMPLE_BUFFERS_EXT   0x2041
344    #define  WGL_SAMPLES_EXT   0x2042
345    #define  WGL_GENLOCK_SOURCE_MULTIVIEW_I3D   0x2044
346    #define  WGL_GENLOCK_SOURCE_EXTENAL_SYNC_I3D   0x2045
347    #define  WGL_GENLOCK_SOURCE_EXTENAL_FIELD_I3D   0x2046
348    #define  WGL_GENLOCK_SOURCE_EXTENAL_TTL_I3D   0x2047
349    #define  WGL_GENLOCK_SOURCE_DIGITAL_SYNC_I3D   0x2048
350    #define  WGL_GENLOCK_SOURCE_DIGITAL_FIELD_I3D   0x2049
351    #define  WGL_GENLOCK_SOURCE_EDGE_FALLING_I3D   0x204A
352    #define  WGL_GENLOCK_SOURCE_EDGE_RISING_I3D   0x204B
353    #define  WGL_GENLOCK_SOURCE_EDGE_BOTH_I3D   0x204C
354    #define  WGL_GAMMA_TABLE_SIZE_I3D   0x204E
355    #define  WGL_GAMMA_EXCLUDE_DESKTOP_I3D   0x204F
356    #define  WGL_DIGITAL_VIDEO_CURSOR_ALPHA_FRAMEBUFFER_I3D   0x2050
357    #define  WGL_DIGITAL_VIDEO_CURSOR_ALPHA_VALUE_I3D   0x2051
358    #define  WGL_DIGITAL_VIDEO_CURSOR_INCLUDED_I3D   0x2052
359    #define  WGL_DIGITAL_VIDEO_GAMMA_CORRECTED_I3D   0x2053
360    #define  WGL_ARB_buffer_region   1
361    #define  WGL_ARB_extensions_string   1
362    #define  WGL_ARB_pixel_format   1
363    #define  WGL_ARB_make_current_read   1
364    #define  WGL_ARB_pbuffer   1
365    #define  WGL_EXT_display_color_table   1
366    #define  WGL_EXT_extensions_string   1
367    #define  WGL_EXT_make_current_read   1
368    #define  WGL_EXT_pbuffer   1
369    #define  WGL_EXT_pixel_format   1
370    #define  WGL_EXT_swap_control   1
371    #define  WGL_WGL_EXT_depth_float   1
372    #define  WGL_WGL_3DFX_multisample   1
373    #define  WGL_WGL_EXT_multisample   1
374    #define  WGL_NV_allocate_memory   1
375
376    /*
377    typedef void (APIENTRY * PFNGLACTIVETEXTUREARBPROC) (GLenum target);
378    typedef void (APIENTRY * PFNGLMULTITEXCOORD2FARBPROC) (GLenum target, GLfloat s, GLfloat t);
379    typedef void (APIENTRY * PFNGLCLIENTACTIVETEXTUREARBPROC) (GLenum target);
380    typedef void (APIENTRY * PFNGLLOCKARRAYSEXTPROC) (GLint first, GLsizei count);
381    typedef void (APIENTRY * PFNGLUNLOCKARRAYSEXTPROC) (void);
382    */
383
384    /*
385    typedef int (APIENTRY * PFNGLBINDBUFFERARBPROC) (GLenum target, GLuint buffer);
386    typedef int (APIENTRY * PFNGLDELETEBUFFERSARBPROC) (GLsizei n, const GLuint *buffers);
387    typedef int (APIENTRY * PFNGLGENBUFFERSARBPROC) (GLsizei n, GLuint *buffers);
388    typedef int (APIENTRY * PFNGLBUFFERDATAARBPROC) (GLenum target, int size, const GLvoid *data, GLenum usage);
389    */
390    typedef int (APIENTRY * PFNWGLCHOOSEPIXELFORMATARBPROC) ();
391    typedef void * (APIENTRY * PFNWGLCREATEPBUFFERARBPROC) (HDC hDC, int iPixelFormat, int iWidth, int iHeight, const int *piAttribList);
392    typedef HDC (APIENTRY * PFNWGLGETPBUFFERDCARBPROC) (void * hPbuffer);
393    typedef int (APIENTRY * PFNWGLRELEASEPBUFFERDCARBPROC) (void * hPbuffer, HDC hDC);
394    typedef BOOL (APIENTRY * PFNWGLDESTROYPBUFFERARBPROC) (void * hPbuffer);
395    typedef BOOL (APIENTRY * PFNWGLQUERYPBUFFERARBPROC) (void * hPbuffer, int iAttribute, int *piValue);
396    typedef const char * (APIENTRY * PFNWGLGETEXTENSIONSSTRINGARBPROC) (HDC hdc);
397    typedef BOOL (APIENTRY * PFNWGLBINDTEXIMAGEARBPROC) (void * hPbuffer, int iBuffer);
398    typedef BOOL (APIENTRY * PFNWGLRELEASETEXIMAGEARBPROC) (void * hPbuffer, int iBuffer);
399
400    static PFNGLMAPBUFFERARBPROC glMapBufferARB = null;
401    static PFNGLUNMAPBUFFERARBPROC glUnmapBufferARB = null;
402    static PFNGLACTIVETEXTUREARBPROC glActiveTextureARB = null;
403    static PFNGLMULTITEXCOORD2FARBPROC glMultiTexCoord2fARB = null;
404    static PFNGLCLIENTACTIVETEXTUREARBPROC glClientActiveTextureARB = null;
405    static PFNGLLOCKARRAYSEXTPROC glLockArraysEXT = null;
406    static PFNGLUNLOCKARRAYSEXTPROC glUnlockArraysEXT = null;
407    static PFNGLBLENDFUNCSEPARATEPROC glBlendFuncSeparate = null;
408
409    static PFNGLGENBUFFERSARBPROC glGenBuffersARB = null;
410    static PFNGLBINDBUFFERARBPROC glBindBufferARB = null;
411    static PFNGLBUFFERDATAARBPROC glBufferDataARB = null;
412    static PFNGLDELETEBUFFERSARBPROC glDeleteBuffersARB = null;
413    static PFNWGLCHOOSEPIXELFORMATARBPROC wglChoosePixelFormatARB = null;
414    static PFNWGLGETEXTENSIONSSTRINGARBPROC wglGetExtensionsStringARB = null;
415    static PFNWGLCREATEPBUFFERARBPROC wglCreatePbufferARB = null;
416    static PFNWGLGETPBUFFERDCARBPROC wglGetPbufferDCARB = null;
417    static PFNWGLQUERYPBUFFERARBPROC wglQueryPbufferARB = null;
418    static PFNWGLDESTROYPBUFFERARBPROC wglDestroyPbufferARB = null;
419    static PFNWGLRELEASEPBUFFERDCARBPROC wglReleasePbufferDCARB = null;
420    static PFNWGLBINDTEXIMAGEARBPROC wglBindTexImageARB = null;
421    static PFNWGLRELEASETEXIMAGEARBPROC wglReleaseTexImageARB = null;
422
423    #define glBufferData glBufferDataARB
424
425    #ifdef WGL_WGLEXT_PROTOTYPES
426    extern BOOL WINAPI wglSwapIntervalEXT (int);
427    extern int WINAPI wglGetSwapIntervalEXT (void);
428    #endif /* WGL_WGLEXT_PROTOTYPES */
429    typedef BOOL (WINAPI * PFNWGLSWAPINTERVALEXTPROC) (int interval);
430    typedef int (WINAPI * PFNWGLGETSWAPINTERVALEXTPROC) (void);
431
432    static PFNWGLSWAPINTERVALEXTPROC wglSwapIntervalEXT = NULL;
433
434 #elif defined(__ANDROID__) || defined(__ODROID__)
435
436    #define GL_FRAMEBUFFER           GL_FRAMEBUFFER_OES
437    #define GL_RENDERBUFFER          GL_RENDERBUFFER_OES
438    #define GL_COLOR_ATTACHMENT0     GL_COLOR_ATTACHMENT0_OES
439
440    #define GL_POLYGON_STIPPLE 0xFFFF
441    #define GL_LINE_STIPPLE 0xFFFF
442    #define GL_LINE 0xFFFF
443    #define GL_FILL 0xFFFF
444    #define GL_ALL_ATTRIB_BITS 0xFFFF
445    #define GL_LIGHT_MODEL_LOCAL_VIEWER 0xFFFF
446
447    #define GL_POLYGON      9
448    #define GL_QUADS        7
449
450    //#define GL_QUADS              0
451    #define GL_QUAD_STRIP         0
452    //#define GL_DOUBLE             0
453    //#define GL_UNSIGNED_INT       0
454    //#define GL_FILL               0
455    //#define GL_LINE               0
456    //#define GL_LINE_STIPPLE       0
457    #define GL_BGRA_EXT           0
458    #define GL_UNPACK_ROW_LENGTH  0
459    #define GL_UNPACK_SKIP_PIXELS 0
460    #define GL_UNPACK_SKIP_ROWS   0
461    #define GL_RGBA8              0
462    #define GL_PACK_ROW_LENGTH    0
463    #define GL_PACK_SKIP_ROWS     0
464    #define GL_PACK_SKIP_PIXELS   0
465
466 #endif
467
468 #if defined(ECERE_NO3D) || defined(ECERE_VANILLA)
469 public union Matrix
470 {
471    double array[16];
472    double m[4][4];
473
474    void Identity()
475    {
476       FillBytesBy4(this, 0, sizeof(Matrix) >> 2);
477       m[0][0]=m[1][1]=m[2][2]=m[3][3]=1;
478    }
479
480    void Transpose(Matrix source)
481    {
482       int i,j;
483       for(i=0; i<4; i++)
484          for(j=0; j<4; j++)
485             m[j][i] = source.m[i][j];
486    }
487
488    void Multiply(Matrix a, Matrix b)
489    {
490       // We need a full matrix multiplication for the Projection matrix
491       m[0][0]=a.m[0][0]*b.m[0][0] + a.m[0][1]*b.m[1][0] + a.m[0][2]*b.m[2][0] + a.m[0][3]*b.m[3][0];
492       m[0][1]=a.m[0][0]*b.m[0][1] + a.m[0][1]*b.m[1][1] + a.m[0][2]*b.m[2][1] + a.m[0][3]*b.m[3][1];
493       m[0][2]=a.m[0][0]*b.m[0][2] + a.m[0][1]*b.m[1][2] + a.m[0][2]*b.m[2][2] + a.m[0][3]*b.m[3][2];
494       m[0][3]=a.m[0][0]*b.m[0][3] + a.m[0][1]*b.m[1][3] + a.m[0][2]*b.m[2][3] + a.m[0][3]*b.m[3][3];
495
496       m[1][0]=a.m[1][0]*b.m[0][0] + a.m[1][1]*b.m[1][0] + a.m[1][2]*b.m[2][0] + a.m[1][3]*b.m[3][0];
497       m[1][1]=a.m[1][0]*b.m[0][1] + a.m[1][1]*b.m[1][1] + a.m[1][2]*b.m[2][1] + a.m[1][3]*b.m[3][1];
498       m[1][2]=a.m[1][0]*b.m[0][2] + a.m[1][1]*b.m[1][2] + a.m[1][2]*b.m[2][2] + a.m[1][3]*b.m[3][2];
499       m[1][3]=a.m[1][0]*b.m[0][3] + a.m[1][1]*b.m[1][3] + a.m[1][2]*b.m[2][3] + a.m[1][3]*b.m[3][3];
500
501       m[2][0]=a.m[2][0]*b.m[0][0] + a.m[2][1]*b.m[1][0] + a.m[2][2]*b.m[2][0] + a.m[2][3]*b.m[3][0];
502       m[2][1]=a.m[2][0]*b.m[0][1] + a.m[2][1]*b.m[1][1] + a.m[2][2]*b.m[2][1] + a.m[2][3]*b.m[3][1];
503       m[2][2]=a.m[2][0]*b.m[0][2] + a.m[2][1]*b.m[1][2] + a.m[2][2]*b.m[2][2] + a.m[2][3]*b.m[3][2];
504       m[2][3]=a.m[2][0]*b.m[0][3] + a.m[2][1]*b.m[1][3] + a.m[2][2]*b.m[2][3] + a.m[2][3]*b.m[3][3];
505
506       m[3][0]=a.m[3][0]*b.m[0][0] + a.m[3][1]*b.m[1][0] + a.m[3][2]*b.m[2][0] + a.m[3][3]*b.m[3][0];
507       m[3][1]=a.m[3][0]*b.m[0][1] + a.m[3][1]*b.m[1][1] + a.m[3][2]*b.m[2][1] + a.m[3][3]*b.m[3][1];
508       m[3][2]=a.m[3][0]*b.m[0][2] + a.m[3][1]*b.m[1][2] + a.m[3][2]*b.m[2][2] + a.m[3][3]*b.m[3][2];
509       m[3][3]=a.m[3][0]*b.m[0][3] + a.m[3][1]*b.m[1][3] + a.m[3][2]*b.m[2][3] + a.m[3][3]*b.m[3][3];
510    }
511 };
512 #endif
513
514 // Our own matrix stack
515 static Matrix matrixStack[3][32];
516 static int matrixIndex[3];
517 static int curStack = 0;
518
519 #if defined(_GLES)
520
521    // OpenGL ES Porting Kit
522 #if defined(__ANDROID__) || defined(__ODROID__)
523    #define glBindFramebuffer        glBindFramebufferOES
524    #define glBindRenderbuffer       glBindRenderbufferOES
525    #define glFramebufferTexture2D   glFramebufferTexture2DOES
526    #define glGenFramebuffers        glGenFramebuffersOES
527    #define glGenRenderbuffers       glGenRenderbuffersOES
528    #define glDeleteFramebuffers     glDeleteFramebuffersOES
529    #define glDeleteRenderbuffers    glDeleteRenderbuffersOES
530
531    #define GL_INT                                  0x1404
532    #define GL_UNSIGNED_INT                         0x1405
533    #define GL_DOUBLE                               0x140A
534    #define APIENTRY
535 #endif
536
537    #define glDrawElementsi(type, count, start)  glDrawElements(type, count, GL_UNSIGNED_SHORT, start)
538
539    #define glBufferDatai         glesBufferDatai
540    #define glBufferDatad         glesBufferDatad
541    #define glVertexPointeri      glesVertexPointeri
542    #define glVertexPointerd      glesVertexPointerd
543
544    #define glRecti               glesRecti
545    #define glBegin               glesBegin
546    #define glTexCoord2i          glesTexCoord2i
547    #define glVertex2i            glesVertex2i
548    #define glTexCoord2d          glesTexCoord2d
549    #define glVertex2d            glesVertex2d
550    #define glTexCoord2f          glesTexCoord2f
551    #define glVertex2f            glesVertex2f
552    #define glEnd                 glesEnd
553    #define glColor3f             glesColor3f
554    #define glColor4ub            glesColor4ub
555    #define glColor4fv            glesColor4fv
556    #define glLineStipple         glesLineStipple
557    #define glNormal3fv           glesNormal3fv
558    #define glNormal3f            glesNormal3f
559    #define glTexCoord2fv         glesTexCoord2fv
560    #define glColorMaterial       glesColorMaterial
561
562    #define glLoadMatrixd         glesLoadMatrixd
563    #define glMultMatrixd         glesMultMatrixd
564    #define glFrustum             glesFrustum
565    #define glOrtho               glesOrtho
566    #define glScaled              glesScaled
567    #define glTranslated          glesTranslated
568    #define glRotated             glesRotated
569    #define glVertex3d            glesVertex3d
570    #define glVertex3dv           glesVertex3dv
571    #define glVertex3f            glesVertex3f
572    #define glVertex3fv           glesVertex3fv
573    #define glLightModeli         glesLightModeli
574
575 #else
576
577 #define glVertexPointerd(nc, s, p, nv)       glVertexPointer(nc, GL_DOUBLE, s, p)
578 #define glDrawElementsi(type, count, start)  glDrawElements(type, count, GL_UNSIGNED_INT, start)
579
580 #endif
581
582 #if defined(__ANDROID__) || defined(__ODROID__)
583    static EGLDisplay eglDisplay;
584    static EGLSurface eglSurface;
585    static EGLContext eglContext;
586    static int eglWidth, eglHeight;
587
588 #if defined(__ANDROID__)
589    static bool egl_init_display(ANativeWindow* window)
590 #else
591    static bool egl_init_display(uint window)
592 #endif
593    {
594       const EGLint attribs[] =
595       {
596          EGL_SURFACE_TYPE, EGL_WINDOW_BIT,
597          EGL_BLUE_SIZE, 8,
598          EGL_GREEN_SIZE, 8,
599          EGL_RED_SIZE, 8,
600          EGL_DEPTH_SIZE, 16, //24,
601          /*EGL_SAMPLE_BUFFERS, 1,
602          EGL_SAMPLES, 0, //2,*/
603          EGL_NONE
604       };
605       EGLint w, h, format;
606       EGLint numConfigs;
607       EGLConfig config;
608       EGLSurface surface;
609       EGLContext context;
610
611       EGLDisplay display = eglGetDisplay(EGL_DEFAULT_DISPLAY);
612       eglInitialize(display, 0, 0);
613       eglChooseConfig(display, attribs, &config, 1, &numConfigs);
614       eglGetConfigAttrib(display, config, EGL_NATIVE_VISUAL_ID, &format);
615
616       surface = eglCreateWindowSurface(display, config, window, null);
617       context = eglCreateContext(display, config, null, null);
618
619       if(!eglMakeCurrent(display, surface, surface, context))
620          return false;
621
622       eglQuerySurface(display, surface, EGL_WIDTH, &w);
623       eglQuerySurface(display, surface, EGL_HEIGHT, &h);
624
625       eglDisplay = display;
626       eglContext = context;
627       eglSurface = surface;
628       eglWidth = w;
629       eglHeight = h;
630
631       glEnableClientState(GL_VERTEX_ARRAY);
632       /*
633       // Initialize GL state.
634       glHint(GL_PERSPECTIVE_CORRECTION_HINT, GL_FASTEST);
635       glEnable(GL_CULL_FACE);
636       glShadeModel(GL_SMOOTH);
637       glDisable(GL_DEPTH_TEST);
638       */
639       glDisable(GL_CULL_FACE);
640       glDisable(GL_DEPTH_TEST);
641
642       glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
643       glEnable(GL_BLEND);
644
645       matrixStack[0][0].Identity();
646       matrixStack[1][0].Identity();
647       matrixStack[2][0].Identity();
648
649       glesMatrixMode(GL_MODELVIEW);
650       glScaled(1.0, 1.0, -1.0);
651       glesMatrixMode(GL_PROJECTION);
652       glShadeModel(GL_FLAT);
653
654       glLightModeli(GL_LIGHT_MODEL_COLOR_CONTROL, GL_SEPARATE_SPECULAR_COLOR);
655       glFogi(GL_FOG_MODE, GL_EXP);
656       glFogf(GL_FOG_DENSITY, 0);
657       glEnable(GL_NORMALIZE);
658       glDepthFunc(GL_LESS);
659       glClearDepth(1.0);
660       glDisable(GL_MULTISAMPLE_ARB);
661
662       glViewport(0,0,w,h);
663       glesLoadIdentity();
664       glOrtho(0,w,h,0,0.0,1.0);
665
666       curArrayBuffer = 0;
667       curElementBuffer = 0;
668       return true;
669    }
670
671    static void egl_term_display()
672    {
673       if(stippleTexture)
674       {
675          glDeleteTextures(1, &stippleTexture);
676          stippleTexture = 0;
677       }
678       if(eglDisplay != EGL_NO_DISPLAY)
679       {
680          eglMakeCurrent(eglDisplay, EGL_NO_SURFACE, EGL_NO_SURFACE, EGL_NO_CONTEXT);
681          if(eglContext != EGL_NO_CONTEXT)
682             eglDestroyContext(eglDisplay, eglContext);
683          if(eglSurface != EGL_NO_SURFACE)
684             eglDestroySurface(eglDisplay, eglSurface);
685          eglTerminate(eglDisplay);
686       }
687       eglDisplay = EGL_NO_DISPLAY;
688       eglContext = EGL_NO_CONTEXT;
689       eglSurface = EGL_NO_SURFACE;
690    }
691
692 #endif
693
694 // OpenGL Immediate Mode Porting Kit
695 static int beginCount;
696 static int vertexCount;
697 static int normalCount;
698 static float *vertexPointer;
699 static float *normalPointer;
700 static GLenum beginMode = -1;
701 static uint beginBufferSize, normalBufferSize;
702 static int numVertexCoords = 2;
703 static bool vertexColorValues = false;
704 static int vertexStride = 4;
705 static int vertexOffset = 2;
706
707 public void glesRecti(int a, int b, int c, int d)
708 {
709    glBegin(GL_QUADS);
710    glVertex2i(a, b);
711    glVertex2i(a, d);
712    glVertex2i(c, d);
713    glVertex2i(c, b);
714    glEnd();
715 }
716
717 public void glesBegin(GLenum mode)
718 {
719    beginMode = mode;
720    beginCount = 0;
721    vertexCount = 0;
722    vertexColorValues = false;
723    vertexOffset = 2;
724    vertexStride = 4;
725    numVertexCoords = 2;
726
727    if(!vertexPointer)
728    {
729       normalBufferSize = beginBufferSize = 1024;  // default number of vertices
730       vertexPointer = new float[beginBufferSize * vertexStride];
731       normalPointer = new float[normalBufferSize * 3];
732    }
733 }
734
735 public void glesTexCoord2f(float x, float y)
736 {
737    int count = vertexCount;
738
739    if(vertexCount + numVertexCoords > beginBufferSize)
740    {
741       beginBufferSize = beginBufferSize + beginBufferSize/2;
742       vertexPointer = renew vertexPointer float[beginBufferSize * vertexStride];
743    }
744
745    vertexPointer[count*vertexStride  ] = x;
746    vertexPointer[count*vertexStride+1] = y;
747    count++;
748
749    if(beginMode == GL_QUADS && ((beginCount % 4) == 3))
750    {
751       vertexPointer[count*vertexStride  ] = vertexPointer[(count-4)*vertexStride];
752       vertexPointer[count*vertexStride+1] = vertexPointer[(count-4)*vertexStride+1];
753       count++;
754       vertexPointer[count*vertexStride  ] = vertexPointer[(count-3)*vertexStride];
755       vertexPointer[count*vertexStride+1] = vertexPointer[(count-3)*vertexStride+1];
756       count++;
757    }
758 }
759 public void glesTexCoord2i(int x, int y)       { glesTexCoord2f((float)x, (float)y); }
760 public void glesTexCoord2d(double x, double y) { glesTexCoord2f((float)x, (float)y); }
761 public void glesTexCoord2fv(float * a)         { glesTexCoord2f(a[0], a[1]); }
762
763 public void glesVertex2f(float x, float y)
764 {
765    numVertexCoords = 2;
766    vertexStride = vertexOffset + numVertexCoords;
767
768    if(vertexCount + 4 > beginBufferSize)
769    {
770       beginBufferSize = beginBufferSize + beginBufferSize/2;
771       vertexPointer = renew vertexPointer float[beginBufferSize * vertexStride];
772    }
773
774    vertexPointer[vertexCount*vertexStride+vertexOffset] = x;
775    vertexPointer[vertexCount*vertexStride+vertexOffset + 1] = y;
776    vertexCount++;
777
778    if(beginMode == GL_QUADS && ((beginCount % 4) == 3))
779    {
780       vertexPointer[vertexCount*vertexStride+vertexOffset] = vertexPointer[(vertexCount-4)*vertexStride+vertexOffset];
781       vertexPointer[vertexCount*vertexStride+vertexOffset + 1] = vertexPointer[(vertexCount-4)*vertexStride+vertexOffset + 1];
782       vertexCount++;
783       vertexPointer[vertexCount*vertexStride+vertexOffset] = vertexPointer[(vertexCount-3)*vertexStride+vertexOffset];
784       vertexPointer[vertexCount*vertexStride+vertexOffset + 1] = vertexPointer[(vertexCount-3)*vertexStride+vertexOffset + 1];
785       vertexCount++;
786    }
787    beginCount++;
788 }
789 public void glesVertex2i(int x, int y)         { glesVertex2f((float)x, (float)y); }
790 public void glesVertex2d(double x, double y)   { glesVertex2f((float)x, (float)y); }
791
792 public void glesEnd(void)
793 {
794    int mode = beginMode;
795    if(mode == GL_QUADS)        mode = GL_TRIANGLES;
796    else if(mode == GL_POLYGON) mode = GL_TRIANGLE_FAN;
797
798    glEnableClientState(GL_TEXTURE_COORD_ARRAY);
799    noAB.use(texCoord, 2, GL_FLOAT, vertexStride * sizeof(float), vertexPointer);
800    if(vertexColorValues)
801    {
802       glEnableClientState(GL_COLOR_ARRAY);
803       noAB.use(color, 4, GL_FLOAT, vertexStride * sizeof(float), vertexPointer + 2);
804    }
805    noAB.use(vertex, numVertexCoords, GL_FLOAT, (vertexStride)*sizeof(float),vertexPointer+vertexOffset);
806    if(normalCount && normalCount == vertexCount)
807    {
808       glEnableClientState(GL_NORMAL_ARRAY);
809       noAB.use(normal, 3, GL_FLOAT, 3*sizeof(float),normalPointer);
810    }
811
812    glDrawArrays(mode, 0, vertexCount);
813    if(normalCount)
814       glDisableClientState(GL_NORMAL_ARRAY);
815    if(vertexColorValues)
816       glDisableClientState(GL_COLOR_ARRAY);
817    glDisableClientState(GL_TEXTURE_COORD_ARRAY);
818    normalCount = 0;
819    vertexColorValues = false;
820    numVertexCoords = 2;
821    beginMode = -1;
822 }
823
824 // Vertex Pointer
825 static float *floatVPBuffer = null;
826 static short *shortVPBuffer = null;
827 static unsigned int shortVPSize = 0, floatVPSize = 0;
828
829 // Buffer Data
830 //static float *floatVPBuffer = null;  // For floats we reuse floatVPBuffer
831 static unsigned short *shortBDBuffer = null;
832 static unsigned int shortBDSize = 0/*, floatVPSize = 0*/;
833
834 public void glesVertexPointeri(int numCoords, int stride, int *pointer, int numVertices)
835 {
836    if(pointer)
837    {
838       int i;
839       if(numVertices*numCoords > shortVPSize)
840       {
841          shortVPSize = numVertices*numCoords;
842          shortVPBuffer = renew shortVPBuffer short[shortVPSize];
843       }
844       for(i = 0; i < numVertices*numCoords; i++)
845          shortVPBuffer[i] = (short)pointer[i];
846       glVertexPointer(numCoords, GL_SHORT, stride, shortVPBuffer);
847    }
848    else
849       glVertexPointer(numCoords, GL_SHORT, stride, 0);
850 }
851
852 public void glesVertexPointerd(int numCoords, int stride, double *pointer, int numVertices)
853 {
854    if(pointer)
855    {
856       int i;
857       if(numVertices*numCoords > floatVPSize)
858       {
859          floatVPSize = numVertices*numCoords;
860          floatVPBuffer = renew floatVPBuffer float[floatVPSize];
861       }
862       for(i = 0; i < numVertices*numCoords; i++)
863          floatVPBuffer[i] = (float)pointer[i];
864       glVertexPointer(numCoords, GL_FLOAT, stride, floatVPBuffer);
865    }
866    else
867       glVertexPointer(numCoords, GL_FLOAT, stride, 0);
868 }
869
870 public void glesTexReuseIntVP(int numCoords)
871 {
872    glTexCoordPointer(numCoords, GL_SHORT, 0, floatVPBuffer);
873 }
874
875 public void glesTexReuseDoubleVP(int numCoords)
876 {
877    glTexCoordPointer(numCoords, GL_FLOAT, 0, floatVPBuffer);
878 }
879
880 public void glesColor4f(float r, float g, float b, float a)
881 {
882    if(beginMode != (GLenum)-1)
883    {
884       int count = vertexCount;
885
886       vertexColorValues = true;
887       vertexOffset = 6;
888       vertexStride = vertexOffset + numVertexCoords;
889
890       if(vertexCount + vertexStride > beginBufferSize)
891       {
892          beginBufferSize = beginBufferSize + beginBufferSize/2;
893          vertexPointer = renew vertexPointer float[beginBufferSize * vertexStride];
894       }
895
896       vertexPointer[count*vertexStride + 2] = r;
897       vertexPointer[count*vertexStride + 3] = g;
898       vertexPointer[count*vertexStride + 4] = b;
899       vertexPointer[count*vertexStride + 5] = a;
900       count++;
901
902       if(beginMode == GL_QUADS && ((beginCount % 4) == 3))
903       {
904          vertexPointer[count*vertexStride + 2] = vertexPointer[(count-4) * vertexStride + 2];
905          vertexPointer[count*vertexStride + 3] = vertexPointer[(count-4) * vertexStride + 3];
906          vertexPointer[count*vertexStride + 4] = vertexPointer[(count-4) * vertexStride + 4];
907          vertexPointer[count*vertexStride + 5] = vertexPointer[(count-4) * vertexStride + 5];
908          count++;
909          vertexPointer[count*vertexStride + 2] = vertexPointer[(count-3) * vertexStride + 2];
910          vertexPointer[count*vertexStride + 3] = vertexPointer[(count-3) * vertexStride + 3];
911          vertexPointer[count*vertexStride + 4] = vertexPointer[(count-3) * vertexStride + 4];
912          vertexPointer[count*vertexStride + 5] = vertexPointer[(count-3) * vertexStride + 5];
913          count++;
914       }
915    }
916    else
917       glColor4f(r, g, b, a);
918 }
919
920 public void glesColor3f( float r, float g, float b )
921 {
922    glesColor4f(r, g, b, 1.0f);
923 }
924
925 public void glesColor4ub(unsigned char r, unsigned char g, unsigned char b, unsigned char a)
926 {
927    glesColor4f(r/255.0f, g/255.0f, b/255.0f, a/255.0f);
928 }
929
930 public void glesColor4fv(float * a)
931 {
932    glesColor4f(a[0], a[1], a[2], a[3]);
933 }
934
935 public void glesBufferDatad(int target, int size, void * data, int usage)
936 {
937    int numElems = size/sizeof(double);
938    double * dblPtr = (double *)data;
939    int i;
940    if (numElems > floatVPSize)
941    {
942       floatVPSize = numElems;
943       floatVPBuffer = renew floatVPBuffer float[floatVPSize];
944    }
945    for (i=0; i< numElems; i++)
946       floatVPBuffer[i] = (float)dblPtr[i];
947
948    glBufferData(target, numElems*sizeof(float), floatVPBuffer, usage);
949 }
950
951 public void glesBufferDatai(int target, int size, void * data, int usage)
952 {
953    int numElems = size/sizeof(unsigned int);
954    unsigned int * pointer = (unsigned int *)data;
955    int i;
956    if (numElems > shortBDSize)
957    {
958       shortBDSize = numElems;
959       shortBDBuffer = renew shortBDBuffer uint16[shortBDSize];
960    }
961    for (i=0; i< numElems; i++)
962       shortBDBuffer[i] = (unsigned short)pointer[i];
963
964    glBufferData(target, numElems*sizeof(unsigned short), shortBDBuffer, usage);
965 }
966
967 // *** Our Custom Matrix Stack ***
968
969 static void LoadCurMatrix()
970 {
971    double * i = matrixStack[curStack][matrixIndex[curStack]].array;
972    float m[16] =
973    {
974       (float)i[0],(float)i[1],(float)i[2],(float)i[3],
975       (float)i[4],(float)i[5],(float)i[6],(float)i[7],
976       (float)i[8],(float)i[9],(float)i[10],(float)i[11],
977       (float)i[12],(float)i[13],(float)i[14],(float)i[15]
978    };
979    glLoadMatrixf(m);
980 }
981
982 public void glesLoadIdentity()
983 {
984    matrixStack[curStack][matrixIndex[curStack]].Identity();
985    LoadCurMatrix();
986 }
987
988 public void glesPushMatrix()
989 {
990    if(matrixIndex[curStack] + 1 < sizeof(matrixStack[0]) / sizeof(Matrix))
991    {
992       matrixIndex[curStack]++;
993       memcpy(matrixStack[curStack][matrixIndex[curStack]].array, matrixStack[curStack][matrixIndex[curStack]-1].array, sizeof(Matrix));
994    }
995 }
996
997 public void glesPopMatrix()
998 {
999    if(matrixIndex[curStack] > 0)
1000    {
1001       matrixIndex[curStack]--;
1002       LoadCurMatrix();
1003    }
1004 }
1005
1006 public void glesLoadMatrixd(double * i)
1007 {
1008    memcpy(matrixStack[curStack][matrixIndex[curStack]].array, i, sizeof(Matrix));
1009    LoadCurMatrix();
1010 }
1011
1012 public void glesOrtho( double l, double r, double b, double t, double n, double f )
1013 {
1014    Matrix m
1015    { {
1016       (2 / (r - l)), 0, 0, 0,
1017       0, (2 / (t - b)), 0, 0,
1018       0, 0, (-2 / (f - n)), 0,
1019       (-(r + l) / (r - l)), (-(t + b) / (t - b)), (-(f + n) / (f - n)), 1
1020    } };
1021    Matrix res;
1022    res.Multiply(m, matrixStack[curStack][matrixIndex[curStack]]);
1023    matrixStack[curStack][matrixIndex[curStack]] = res;
1024    LoadCurMatrix();
1025 }
1026
1027 public void glesFrustum( double l, double r, double b, double t, double n, double f )
1028 {
1029    nearPlane = n;
1030    n = 1;
1031    l /= nearPlane;
1032    r /= nearPlane;
1033    b /= nearPlane;
1034    t /= nearPlane;
1035    f /= nearPlane;
1036    {
1037       double A = ((r + l) / (r - l));
1038       double B = ((t + b) / (t - b));
1039       double C = (-(f + n) / (f - n));
1040       double D = (-2*f*n/(f-n));
1041       Matrix m
1042       { {
1043          (2.0*n / (r - l)), 0, 0, 0,
1044          0, (2.0*n / (t - b)), 0, 0,
1045          A, B,             C,-1,
1046          0, 0,             D, 0
1047       } };
1048       Matrix res;
1049       res.Multiply(m, matrixStack[curStack][matrixIndex[curStack]]);
1050       matrixStack[curStack][matrixIndex[curStack]] = res;
1051       LoadCurMatrix();
1052    }
1053 }
1054
1055 #if !defined(ECERE_NO3D) && !defined(ECERE_VANILLA)
1056 public void glesRotated( double a, double b, double c, double d )
1057 {
1058    Quaternion q;
1059    Matrix m, r;
1060
1061    q.RotationAxis({(float)b,(float)c,(float)-d}, a );
1062    m.RotationQuaternion(q);
1063    r.Multiply(m, matrixStack[curStack][matrixIndex[curStack]]);
1064    matrixStack[curStack][matrixIndex[curStack]] = r;
1065    LoadCurMatrix();
1066 }
1067 public void glesScaled( double a, double b, double c )
1068 {
1069    Matrix m, r;
1070
1071    m.Identity();
1072    m.Scale(a,b,c);
1073    r.Multiply(m, matrixStack[curStack][matrixIndex[curStack]]);
1074    matrixStack[curStack][matrixIndex[curStack]] = r;
1075    LoadCurMatrix();
1076 }
1077
1078 public void glesTranslated( double a, double b, double c )
1079 {
1080    Matrix m, r;
1081
1082    m.Identity();
1083    m.Translate(a,b,c);
1084    r.Multiply(m, matrixStack[curStack][matrixIndex[curStack]]);
1085    matrixStack[curStack][matrixIndex[curStack]] = r;
1086    LoadCurMatrix();
1087 }
1088
1089 public void glesMultMatrixd( double * i )
1090 {
1091    Matrix r;
1092    r.Multiply((Matrix *)i, matrixStack[curStack][matrixIndex[curStack]]);
1093    matrixStack[curStack][matrixIndex[curStack]] = r;
1094    LoadCurMatrix();
1095 }
1096 #endif
1097
1098 public void glesMatrixMode(int mode)
1099 {
1100    curStack = (mode == GL_MODELVIEW) ? 0 : (mode == GL_PROJECTION) ? 1 : 2;
1101    glMatrixMode(mode);
1102 }
1103
1104 #if defined(_GLES)
1105
1106 #define glPushMatrix          glesPushMatrix
1107 #define glPopMatrix           glesPopMatrix
1108 #define glLoadIdentity        glesLoadIdentity
1109 #define glMatrixMode          glesMatrixMode
1110
1111 #endif
1112
1113 /* Using the built-in matrix stack
1114 void glesLoadMatrixd( double * i )
1115 {
1116    float m[16] =
1117    {
1118       (float)i[0],(float)i[1],(float)i[2],(float)i[3],
1119       (float)i[4],(float)i[5],(float)i[6],(float)i[7],
1120       (float)i[8],(float)i[9],(float)i[10],(float)i[11],
1121       (float)i[12],(float)i[13],(float)i[14],(float)i[15]
1122    };
1123    glLoadMatrixf(m);
1124 }
1125
1126 void glesOrtho( double l, double r, double b, double t, double n, double f )
1127 {
1128    float matrix[4][4] =
1129    {
1130       { (float)(2 / (r - l)), 0, 0, 0 },
1131       { 0, (float)(2 / (t - b)), 0, 0 },
1132       { 0, 0, (float)(-2 / (f - n)), 0 },
1133       { (float)(-(r + l) / (r - l)), (float)(-(t + b) / (t - b)), (float)(-(f + n) / (f - n)), 1 }
1134    };
1135    glMultMatrixf((float *)matrix);
1136 }
1137
1138 void glesFrustum( double l, double r, double b, double t, double n, double f )
1139 {
1140    float A = (float)((r + l) / (r - l));
1141    float B = (float)((t + b) / (t - b));
1142    float C = (float)(-(f + n) / (f - n));
1143    float D = (float)(-2*f*n/(f-n));
1144    float matrix[4][4] =
1145    {
1146       { (float)(2*n / (r - l)), 0, 0, 0 },
1147       { 0, (float)(2*n / (t - b)), 0, 0 },
1148       { A, B,             C,-1 },
1149       { 0, 0,             D, 0 }
1150    };
1151    glMultMatrixf((float *)matrix);
1152 }
1153
1154 void glesRotated( double a, double b, double c, double d ) { glRotatef((float)a, (float)b, (float)c, (float)d); }
1155 void glesScaled( double a, double b, double c ) { glScalef((float)a, (float)b, (float)c); }
1156 void glesTranslated( double a, double b, double c ) { glTranslatef((float)a, (float)b, (float)c); }
1157
1158 void glesMultMatrixd( double * i )
1159 {
1160    float m[16] =
1161    {
1162       (float)i[0], (float)i[1], (float)i[2], (float)i[3],
1163       (float)i[4], (float)i[5], (float)i[6], (float)i[7],
1164       (float)i[8], (float)i[9], (float)i[10], (float)i[11],
1165       (float)i[12], (float)i[13], (float)i[14], (float)i[15]
1166    };
1167    glMultMatrixf(m);
1168 }
1169 */
1170
1171 // Need to do these...
1172 public void glesVertex3f( float x, float y, float z )
1173 {
1174    numVertexCoords = 3;
1175    vertexStride = vertexOffset + numVertexCoords;
1176
1177    if(vertexCount + vertexStride > beginBufferSize)
1178    {
1179       beginBufferSize = beginBufferSize + beginBufferSize/2;
1180       vertexPointer = renew vertexPointer float[beginBufferSize * vertexStride];
1181    }
1182
1183    vertexPointer[vertexCount*vertexStride+vertexOffset] = x;
1184    vertexPointer[vertexCount*vertexStride+vertexOffset+1] = y;
1185    vertexPointer[vertexCount*vertexStride+vertexOffset+2] = z;
1186    vertexCount++;
1187
1188    if(beginMode == GL_QUADS && ((beginCount % 4) == 3))
1189    {
1190       vertexPointer[vertexCount*vertexStride+vertexOffset] = vertexPointer[(vertexCount-4)*vertexStride+vertexOffset];
1191       vertexPointer[vertexCount*vertexStride+vertexOffset+1] = vertexPointer[(vertexCount-4)*vertexStride+vertexOffset+1];
1192       vertexPointer[vertexCount*vertexStride+vertexOffset+2] = vertexPointer[(vertexCount-4)*vertexStride+vertexOffset+2];
1193       vertexCount++;
1194       vertexPointer[vertexCount*vertexStride+vertexOffset] = vertexPointer[(vertexCount-3)*vertexStride+vertexOffset];
1195       vertexPointer[vertexCount*vertexStride+vertexOffset+1] = vertexPointer[(vertexCount-3)*vertexStride+vertexOffset+1];
1196       vertexPointer[vertexCount*vertexStride+vertexOffset+2] = vertexPointer[(vertexCount-3)*vertexStride+vertexOffset+2];
1197       vertexCount++;
1198    }
1199    beginCount++;
1200 }
1201
1202 public void glesVertex3d( double x, double y, double z )  { glesVertex3f((float)x, (float)y, (float)z); }
1203 public void glesVertex3fv( float* coords )                { glesVertex3f(coords[0], coords[1], coords[2]); }
1204 public void glesVertex3dv( double* coords )               { glesVertex3f((float)coords[0], (float)coords[1], (float)coords[2]); }
1205
1206 public void glesNormal3f(float x, float y, float z)
1207 {
1208    normalCount = vertexCount;
1209    if(vertexCount + 4 > normalBufferSize)
1210    {
1211       normalBufferSize = normalBufferSize + normalBufferSize/2;
1212       normalPointer = renew normalPointer float[normalBufferSize * 2];
1213    }
1214
1215    normalPointer[normalCount*3+0] = x;
1216    normalPointer[normalCount*3+1] = y;
1217    normalPointer[normalCount*3+2] = z;
1218    normalCount++;
1219
1220    if(beginMode == GL_QUADS && ((beginCount % 4) == 3))
1221    {
1222       normalPointer[normalCount*3+0] = normalPointer[(normalCount-4)*3+0];
1223       normalPointer[normalCount*3+1] = normalPointer[(normalCount-4)*3+1];
1224       normalPointer[normalCount*3+2] = normalPointer[(normalCount-4)*3+2];
1225       normalCount++;
1226       normalPointer[normalCount*3+0] = normalPointer[(normalCount-3)*3+0];
1227       normalPointer[normalCount*3+1] = normalPointer[(normalCount-3)*3+1];
1228       normalPointer[normalCount*3+2] = normalPointer[(normalCount-3)*3+2];
1229       normalCount++;
1230    }
1231 }
1232 public void glesNormal3fd(double x, double y, double z)         { glesNormal3f((float)x, (float)y, (float)z); }
1233 public void glesNormal3fv(float * coords)                       { glesNormal3f(coords[0], coords[1], coords[2]); }
1234
1235 public void glesColorMaterial(int a, int b)
1236 {
1237    PrintLn("glColorMaterial stub");
1238 }
1239
1240 public void glesTerminate()
1241 {
1242    delete vertexPointer;
1243    delete normalPointer;
1244    beginBufferSize = 0;
1245
1246    delete floatVPBuffer;
1247    shortVPSize = 0;
1248
1249    delete shortVPBuffer;
1250    floatVPSize = 0;
1251
1252    delete shortBDBuffer;
1253    shortBDSize = 0;
1254 }
1255
1256 static GLuint stippleTexture;
1257 #if defined(_GLES) || defined(EM_MODE)
1258 static bool stippleEnabled;
1259 #endif
1260
1261 public void glesLineStipple( int i, unsigned short j )
1262 {
1263    uint texture[1*16];
1264    int x;
1265    for(x = 0; x < 16; x++)
1266    {
1267       bool v = (j & (1 << x)) != 0;
1268       texture[x] = v ? 0xFFFFFFFF : 0;
1269    }
1270    if(!stippleTexture)
1271       glGenTextures(1, &stippleTexture);
1272    glBindTexture(GL_TEXTURE_2D, stippleTexture);
1273    glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, 16, 1, 0, GL_RGBA, GL_UNSIGNED_BYTE, texture);
1274    glEnable(GL_TEXTURE_2D);
1275    glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
1276    glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
1277    glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT);
1278    glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
1279    glMatrixMode(GL_TEXTURE);
1280    glLoadIdentity();
1281    //glTranslated(1.0/backAttrib->texW/2.0f, 1.0/backAttrib->texH/2.0f, 0.0f);
1282    glScaled(i/16.0, 1, 1.0f);
1283    glTranslated(0.5, 0.5, 0);
1284    glMatrixMode(GL_PROJECTION);
1285 }
1286
1287 public void glesLightModeli( unsigned int pname, int param )
1288 {
1289 #if !defined(EM_MODE)
1290    if(pname == GL_LIGHT_MODEL_TWO_SIDE)
1291       glLightModelf(GL_LIGHT_MODEL_TWO_SIDE, param);
1292 #endif
1293 }
1294
1295 #if defined(__ANDROID__) || defined(__ODROID__)
1296 void glClearDepth( double depth ) { glClearDepthf((float)depth); }
1297 void glFogi( unsigned int pname, int param ) { }
1298 void glPolygonMode( unsigned int i, unsigned int j ) { }
1299
1300
1301 // *** Picking won't be supported for now ***
1302 void glPushName( unsigned int i ) { }
1303 void glLoadName( unsigned int i ) { }
1304 void glPopName() { }
1305
1306 // Probably replace by regular glBlendFunc ...
1307 void glBlendFuncSeparate(int a, int b, int c, int d)
1308 {
1309    glBlendFunc(a, b);
1310 }
1311
1312 // For direct pixel blitting...
1313 void glRasterPos2d(double a, double b) { }
1314 void glPixelZoom(float a, float b) { }
1315 void glDrawPixels(int a, int b, int c, int d, void * e) { }
1316
1317 #endif
1318
1319 #if !defined(__APPLE__) && !defined(__WIN32__) && !defined(__ODROID__)
1320 void (APIENTRY * glBindBufferARB) (GLenum target, GLuint buffer);
1321 void (APIENTRY * glGenBuffersARB) (GLsizei n, GLuint *buffers);
1322 void (APIENTRY * glDeleteBuffersARB) (GLsizei n, const GLuint *buffers);
1323 void (APIENTRY * glBufferDataARB) (GLenum target, int size, const GLvoid *data, GLenum usage);
1324 #endif
1325
1326 public void GLLoadMatrix(Matrix matrix)
1327 {
1328    float m[16] =
1329    {
1330       (float)matrix.m[0][0], (float)matrix.m[0][1], (float)matrix.m[0][2], (float)matrix.m[0][3],
1331       (float)matrix.m[1][0], (float)matrix.m[1][1], (float)matrix.m[1][2], (float)matrix.m[1][3],
1332       (float)matrix.m[2][0], (float)matrix.m[2][1], (float)matrix.m[2][2], (float)matrix.m[2][3],
1333       (float)matrix.m[3][0], (float)matrix.m[3][1], (float)matrix.m[3][2], (float)matrix.m[3][3]
1334    };
1335    glLoadMatrixf(m);
1336 }
1337
1338 public enum GLBufferContents { vertex, normal, texCoord, color };
1339
1340 public define noAB = GLAB { 0 };
1341
1342 static uint curArrayBuffer;
1343
1344 public struct GLAB
1345 {
1346    uint buffer;
1347
1348    void upload(uint size, void * data)
1349    {
1350       if(this != null)
1351       {
1352          if(!buffer)
1353             GLGenBuffers(1, this);
1354          if(curArrayBuffer != buffer)
1355             GLBindBuffer(GL_ARRAY_BUFFER, buffer);
1356          glBufferData(GL_ARRAY_BUFFER, size, data, GL_STATIC_DRAW);  //GL_DYNAMIC_DRAW);
1357       }
1358    }
1359
1360    void free()
1361    {
1362       if(this != null)
1363       {
1364          GLDeleteBuffers(1, this);
1365          buffer = 0;
1366       }
1367    }
1368
1369    void use(GLBufferContents contents, int n, int type, uint stride, void * pointer)
1370    {
1371       if(curArrayBuffer != ((this != null) ? buffer : 0))
1372          GLBindBuffer(GL_ARRAY_BUFFER, ((this != null) ? buffer : 0));
1373       switch(contents)
1374       {
1375          case normal:   glNormalPointer(type, stride, pointer); break;
1376          case vertex:   glVertexPointer(n, type, stride, pointer); break;
1377          case texCoord: glTexCoordPointer(n, type, stride, pointer); break;
1378          case color:    glColorPointer(n, type, stride, pointer); break;
1379       }
1380    }
1381
1382    void useVertTrans(uint count, int n, int type, uint stride, void * pointer)
1383    {
1384 #ifdef _GLES
1385       if(curArrayBuffer != ((this != null) ? buffer : 0))
1386          GLBindBuffer(GL_ARRAY_BUFFER, ((this != null) ? buffer : 0));
1387       if(type == GL_INT)
1388          glVertexPointeri(n, stride, pointer, count);
1389       else if(type == GL_DOUBLE)
1390          glVertexPointerd(n, stride, pointer, count);
1391 #else
1392       use(vertex, n, type, stride, pointer);
1393 #endif
1394    }
1395 };
1396
1397 static uint curElementBuffer;
1398
1399 public define noEAB = GLEAB { 0 };
1400
1401 public struct GLEAB
1402 {
1403    uint buffer;
1404
1405    void upload(uint size, void * data)
1406    {
1407       if(this != null)
1408       {
1409          if(!buffer)
1410             GLGenBuffers(1, (GLAB *)this);
1411
1412          if(curElementBuffer != buffer)
1413             GLBindBuffer(GL_ELEMENT_ARRAY_BUFFER, buffer);
1414          glBufferData(GL_ELEMENT_ARRAY_BUFFER, size, data, GL_STATIC_DRAW);  //GL_DYNAMIC_DRAW);
1415       }
1416    }
1417
1418    void free()
1419    {
1420       if(this != null)
1421       {
1422          GLDeleteBuffers(1, (GLAB *)this);
1423          buffer = 0;
1424       }
1425    }
1426
1427    void draw(int primType, int count, int type, void * indices)
1428    {
1429       if(curElementBuffer != ((this != null) ? buffer : 0))
1430          GLBindBuffer(GL_ELEMENT_ARRAY_BUFFER, ((this != null) ? buffer : 0));
1431 #ifdef _GLES
1432       type = GL_UNSIGNED_SHORT;
1433 #endif
1434       glDrawElements(primType, count, type, indices);
1435    }
1436 };
1437
1438 public void GLGenBuffers(int count, GLAB * buffers)
1439 {
1440 #if defined(__ANDROID__) || defined(__EMSCRIPTEN__) || defined(__ODROID__)
1441    glGenBuffers(count, (GLuint *)buffers);
1442 #else
1443 #if defined(__WIN32__)
1444    if(glGenBuffersARB)
1445 #endif
1446       glGenBuffersARB(count, (GLuint *)buffers);
1447 #endif
1448 }
1449
1450 public void GLDeleteBuffers(int count, GLAB * buffers)
1451 {
1452    int i;
1453    for(i = 0; i < count; i++)
1454    {
1455       uint buffer = buffers[i].buffer;
1456       if(buffer == curArrayBuffer)
1457          GLBindBuffer(GL_ARRAY_BUFFER_ARB, 0);
1458       else if(buffer == curElementBuffer)
1459          GLBindBuffer(GL_ELEMENT_ARRAY_BUFFER_ARB, 0);
1460    }
1461 #if defined(__ANDROID__) || defined(__EMSCRIPTEN__) || defined(__ODROID__)
1462    glDeleteBuffers(count, (GLuint *)buffers);
1463 #else
1464 #if defined(__WIN32__)
1465    if(glDeleteBuffersARB)
1466 #endif
1467       glDeleteBuffersARB(count, (GLuint *)buffers);
1468 #endif
1469 }
1470
1471 void GLBindBuffer(int target, uint buffer)
1472 {
1473 #if defined(__ANDROID__) || defined(__EMSCRIPTEN__) || defined(__ODROID__)
1474    glBindBuffer(target, buffer);
1475 #else
1476 #if defined(__WIN32__)
1477    if(glBindBufferARB)
1478 #endif
1479       glBindBufferARB(target, buffer);
1480 #endif
1481    if(target == GL_ARRAY_BUFFER_ARB)
1482       curArrayBuffer = buffer;
1483    else if(target == GL_ELEMENT_ARRAY_BUFFER_ARB)
1484       curElementBuffer = buffer;
1485 }
1486
1487 public void GLVertexPointer(int numCoords, int glType, int stride, void *ptr, int numVertices)
1488 {
1489 #ifdef _GLES
1490    if(glType == GL_DOUBLE)
1491       glesVertexPointerd(numCoords, stride, ptr, numVertices);
1492    else if(glType == GL_INT)
1493       glesVertexPointeri(numCoords, stride, ptr, numVertices);
1494    else
1495 #endif
1496       glVertexPointer(numCoords, glType, stride, ptr);
1497 }
1498
1499 public void GLBufferData(int type, GLenum target, int size, const GLvoid *data, GLenum usage)
1500 {
1501 #ifdef _GLES
1502    if(type == GL_DOUBLE)
1503       glesBufferDatad(target, size, (void *)data, usage);
1504    else if(type == GL_UNSIGNED_INT)
1505       glesBufferDatai(target, size, (void *)data, usage);
1506    else
1507 #endif
1508
1509 #if defined(__ANDROID__) || defined(__EMSCRIPTEN__) || defined(__ODROID__)
1510       glBufferData(target, size, data, usage);
1511 #else
1512
1513 #if defined(__WIN32__)
1514    if(glBufferDataARB)
1515 #endif
1516       glBufferDataARB(target, size, data, usage);
1517 #endif
1518 }
1519
1520 #if !defined(ECERE_NO3D) && !defined(ECERE_VANILLA)
1521 static int primitiveTypes[RenderPrimitiveType] =
1522 {
1523    GL_POINTS, GL_LINES, GL_TRIANGLES, GL_TRIANGLE_STRIP, GL_TRIANGLE_FAN, GL_QUADS, GL_QUAD_STRIP, GL_LINE_STRIP
1524 };
1525 #endif
1526
1527
1528 // Non OpenGL ES friendly stuff
1529
1530 #if defined(_GLES)
1531
1532 //#undef GL_UNSIGNED_INT
1533 //#undef GL_DOUBLE
1534 #undef GL_INT
1535 //#undef GL_POLYGON
1536 //#undef GL_QUADS
1537 #undef GL_QUAD_STRIP
1538 #undef GL_POLYGON_STIPPLE
1539 #undef GL_LINE_STIPPLE
1540 #undef GL_LINE
1541 #undef GL_FILL
1542 #undef GL_ALL_ATTRIB_BITS
1543 #undef GL_LIGHT_MODEL_LOCAL_VIEWER
1544
1545 #endif
1546
1547 static int displayWidth, displayHeight;
1548
1549 #define GL_CLAMP_TO_EDGE 0x812F
1550
1551 static bool vboAvailable;
1552
1553 static bool useSingleGLContext = false;
1554 class OGLDisplay : struct
1555 {
1556 #if defined(__WIN32__)
1557    HDC hdc;
1558    HGLRC glrc;
1559
1560    HBITMAP memBitmap;
1561    HDC memDC;
1562    byte * picture;
1563    uint stride;
1564    void * pBuffer;
1565    /*
1566    int imageBuffers[2];
1567    byte * pboMemory1, * pboMemory2;
1568    */
1569 #elif !defined(__ANDROID__) && !defined(__EMSCRIPTEN__) && !defined(__ODROID__)
1570    GLXContext glContext;
1571
1572    Pixmap pixmap;
1573    XShmSegmentInfo shminfo;
1574    XImage * image;
1575    XShmSegmentInfo shminfoShape;
1576    XImage * shapeImage;
1577    byte * picture;
1578    uint stride;
1579    GLXPbuffer pBuffer;
1580    X11Picture windowPicture;
1581    X11Picture pixmapPicture;
1582    Pixmap shapePixmap;
1583    X11Picture shapePicture;
1584 #endif
1585
1586    ColorAlpha * flippingBuffer;
1587    int flipBufH, flipBufW;
1588    bool depthWrite;
1589    int x, y;
1590 };
1591
1592 class OGLSystem : struct
1593 {
1594    int maxTextureSize;
1595    bool loadingFont;
1596    bool pow2textures;
1597 #if defined(__WIN32__)
1598    PIXELFORMATDESCRIPTOR pfd;
1599    int format;
1600    HDC hdc;
1601    HGLRC glrc;
1602    HWND hwnd;
1603 #elif !defined(__ANDROID__) && !defined(__EMSCRIPTEN__) && !defined(__ODROID__)
1604    XVisualInfo * visualInfo;
1605    GLXContext glContext;
1606    GLXDrawable glxDrawable;
1607 #endif
1608 };
1609
1610 class OGLSurface : struct
1611 {
1612    Font font;
1613    bool opaqueText;
1614    int xOffset;
1615    bool writingText;
1616    bool writingOutline;
1617
1618    float foreground[4], background[4], bitmapMult[4];
1619 } OGLSurface;
1620
1621 class OGLMesh : struct
1622 {
1623    GLAB vertices;
1624    GLAB normals;
1625    GLAB texCoords;
1626    GLAB texCoords2;
1627    GLAB colors;
1628 };
1629
1630 class OGLIndices : struct
1631 {
1632    uint16 * indices;
1633    GLEAB buffer;
1634    uint nIndices;
1635 };
1636
1637 int current;
1638 void * previous;
1639
1640 class OpenGLDisplayDriver : DisplayDriver
1641 {
1642    class_property(name) = "OpenGL";
1643
1644    bool LockSystem(DisplaySystem displaySystem)
1645    {
1646 #if !defined(__ANDROID__) && !defined(__EMSCRIPTEN__) && !defined(__ODROID__)
1647       OGLSystem oglSystem = displaySystem.driverData;
1648       if(useSingleGLContext) return true;
1649    #if defined(__WIN32__)
1650       wglMakeCurrent(oglSystem.hdc, oglSystem.glrc);
1651    #elif defined(__unix__) || defined(__APPLE__)
1652       //if(previous) return true;
1653       // printf("Making SYSTEM current\n");
1654       glXMakeCurrent(xGlobalDisplay, (GLXDrawable)oglSystem.glxDrawable, oglSystem.glContext);
1655       //previous = oglSystem.glContext;
1656    #endif
1657 #endif
1658       return true;
1659    }
1660
1661    void UnlockSystem(DisplaySystem displaySystem)
1662    {
1663       if(useSingleGLContext) return;
1664    #if defined(__WIN32__)
1665       wglMakeCurrent(null, null);
1666    #elif defined(__unix__) || defined(__APPLE__)
1667       // printf("Making NULL current\n");
1668       #if defined(__ANDROID__) || defined(__EMSCRIPTEN__) || defined(__ODROID__)
1669       #else
1670       glXMakeCurrent(xGlobalDisplay, None, null);
1671       #endif
1672       // previous = null;
1673    #endif
1674    }
1675
1676    bool Lock(Display display)
1677    {
1678 #if !defined(__ANDROID__) && !defined(__EMSCRIPTEN__) && !defined(__ODROID__)
1679       OGLDisplay oglDisplay = display.driverData;
1680       if(useSingleGLContext) return true;
1681    #if defined(__WIN32__)
1682       wglMakeCurrent(oglDisplay.hdc, oglDisplay.glrc);
1683    #elif defined(__unix__) || defined(__APPLE__)
1684       // if(previous) glXMakeCurrent(xGlobalDisplay, None, null);
1685       // printf("   Making DISPLAY current\n");
1686       glXMakeCurrent(xGlobalDisplay, (GLXDrawable)display.window, oglDisplay.glContext);
1687    #endif
1688 #endif
1689       return true;
1690    }
1691
1692    void Unlock(Display display)
1693    {
1694       if(useSingleGLContext) return;
1695       //printf("   Making NULL current\n");
1696       //glXMakeCurrent(xGlobalDisplay, None, null);
1697       // if(previous)
1698          LockSystem(display.displaySystem);
1699    }
1700
1701    void DestroyDisplay(Display display)
1702    {
1703       OGLDisplay oglDisplay = display.driverData;
1704
1705       if(oglDisplay)
1706       {
1707    #if defined(__WIN32__)
1708          wglMakeCurrent( null, null );
1709
1710          if(oglDisplay.glrc)
1711             wglDeleteContext(oglDisplay.glrc);
1712
1713          if(oglDisplay.hdc && oglDisplay.pBuffer)
1714             wglReleasePbufferDCARB(oglDisplay.pBuffer, oglDisplay.hdc);
1715
1716          if(oglDisplay.pBuffer)
1717             wglDestroyPbufferARB(oglDisplay.pBuffer);
1718
1719          if(oglDisplay.hdc)
1720             ReleaseDC(display.window, oglDisplay.hdc);
1721
1722          if(oglDisplay.memDC) DeleteDC(oglDisplay.memDC);
1723          if(oglDisplay.memBitmap) DeleteObject(oglDisplay.memBitmap);
1724
1725    #elif defined(__unix__) || defined(__APPLE__)
1726       #if defined(__ANDROID__) || defined(__EMSCRIPTEN__) || defined(__ODROID__)
1727       #else
1728          if(oglDisplay.shapePixmap)
1729             XFreePixmap(xGlobalDisplay, oglDisplay.shapePixmap);
1730          if(oglDisplay.pixmap)
1731             XFreePixmap(xGlobalDisplay, oglDisplay.pixmap);
1732          if(oglDisplay.image)
1733          {
1734             if(oglDisplay.shminfoShape.shmid != -1)
1735             {
1736                XShmDetach(xGlobalDisplay, &oglDisplay.shminfo);
1737                if(oglDisplay.shminfo.shmaddr != (void *)-1)
1738                   shmdt(oglDisplay.shminfo.shmaddr);
1739                shmctl(oglDisplay.shminfo.shmid, IPC_RMID, 0);
1740             }
1741          }
1742          if(oglDisplay.shapeImage)
1743          {
1744             if(oglDisplay.shminfoShape.shmid != -1)
1745             {
1746                XShmDetach(xGlobalDisplay, &oglDisplay.shminfoShape);
1747                if(oglDisplay.shminfoShape.shmaddr != (void *)-1)
1748                   shmdt(oglDisplay.shminfoShape.shmaddr);
1749                shmctl(oglDisplay.shminfoShape.shmid, IPC_RMID, 0);
1750             }
1751             XDestroyImage(oglDisplay.shapeImage);
1752             oglDisplay.shapeImage = None;
1753          }
1754
1755          glXMakeCurrent(xGlobalDisplay, None, null);
1756
1757          if(oglDisplay.glContext)
1758             glXDestroyContext(xGlobalDisplay, oglDisplay.glContext);
1759       #endif
1760    #endif
1761          delete oglDisplay.flippingBuffer;
1762          delete oglDisplay;
1763          display.driverData = null;
1764       }
1765    }
1766
1767    void ::CheckExtensions(OGLSystem oglSystem)
1768    {
1769       const char * extensions = (const char *)glGetString(GL_EXTENSIONS);
1770       if(extensions)
1771          oglSystem.pow2textures = strstr(extensions, "GL_ARB_texture_non_power_of_two") ? false : true;
1772       glGetIntegerv(GL_MAX_TEXTURE_SIZE, &oglSystem.maxTextureSize);
1773    }
1774
1775    bool CreateDisplaySystem(DisplaySystem displaySystem)
1776    {
1777       bool result = false;
1778       OGLSystem oglSystem = displaySystem.driverData = OGLSystem { };
1779
1780    #ifdef __WIN32__
1781       oglSystem.hwnd = CreateWindow("static", null, 0,0,0,0,0,null,null,null,null);
1782
1783       oglSystem.hdc = GetDC(oglSystem.hwnd);
1784       if(oglSystem.hdc)
1785       {
1786
1787          oglSystem.pfd.nSize = (short)sizeof(oglSystem.pfd);
1788          oglSystem.pfd.nVersion = 1;
1789          oglSystem.pfd.dwFlags = PFD_DRAW_TO_WINDOW /*PFD_DRAW_TO_BITMAP*/ | PFD_SUPPORT_OPENGL | PFD_DOUBLEBUFFER;
1790          oglSystem.pfd.iPixelType = PFD_TYPE_RGBA;
1791          oglSystem.pfd.cColorBits = 24;
1792          oglSystem.pfd.cAlphaBits = 8;
1793          oglSystem.pfd.cDepthBits = 24;
1794          oglSystem.pfd.iLayerType = PFD_MAIN_PLANE;
1795
1796          oglSystem.format = ChoosePixelFormat(oglSystem.hdc, &oglSystem.pfd);
1797          DescribePixelFormat(oglSystem.hdc, oglSystem.format, sizeof(oglSystem.pfd), &oglSystem.pfd);
1798
1799          if(oglSystem.pfd.cColorBits > 8)
1800          {
1801             SetPixelFormat(oglSystem.hdc, oglSystem.format, &oglSystem.pfd);
1802             oglSystem.glrc = wglCreateContext(oglSystem.hdc);
1803             if(oglSystem.glrc)
1804             {
1805                wglMakeCurrent(oglSystem.hdc, oglSystem.glrc);
1806
1807                  // Get Pointers To The GL Functions
1808                glActiveTextureARB = (void *) wglGetProcAddress("glActiveTextureARB");
1809                glMultiTexCoord2fARB = (void *) wglGetProcAddress("glMultiTexCoord2fARB");
1810                glClientActiveTextureARB = (void *) wglGetProcAddress("glClientActiveTextureARB");
1811                glLockArraysEXT = (void *) wglGetProcAddress("glLockArraysEXT" );
1812                glUnlockArraysEXT = (void *) wglGetProcAddress("glUnlockArraysEXT");
1813                  glGenBuffersARB = (void *) wglGetProcAddress("glGenBuffersARB");
1814                  glBindBufferARB = (void *) wglGetProcAddress("glBindBufferARB");
1815                  glBufferDataARB = (void *) wglGetProcAddress("glBufferDataARB");
1816                glMapBufferARB  = (void *) wglGetProcAddress("glMapBufferARB");
1817                glUnmapBufferARB  = (void *) wglGetProcAddress("glUnmapBufferARB");
1818                  glDeleteBuffersARB = (void *) wglGetProcAddress("glDeleteBuffersARB");
1819                glBlendFuncSeparate = (void *) wglGetProcAddress("glBlendFuncSeparate");
1820
1821                wglChoosePixelFormatARB = (void *) wglGetProcAddress("wglChoosePixelFormatARB");
1822                wglGetExtensionsStringARB = (void *)wglGetProcAddress("wglGetExtensionsStringARB");
1823                wglCreatePbufferARB = (void *)wglGetProcAddress("wglCreatePbufferARB");
1824                wglGetPbufferDCARB = (void *)wglGetProcAddress("wglGetPbufferDCARB");
1825                wglQueryPbufferARB = (void *)wglGetProcAddress("wglQueryPbufferARB");
1826                wglDestroyPbufferARB = (void *)wglGetProcAddress("wglDestroyPbufferARB");
1827                wglReleasePbufferDCARB = (void *)wglGetProcAddress("wglReleasePbufferDCARB");
1828                wglBindTexImageARB = (void *)wglGetProcAddress("wglBindTexImageARB");
1829                wglReleaseTexImageARB = (void *)wglGetProcAddress("wglReleaseTexImageARB");
1830
1831                wglSwapIntervalEXT = (void *)wglGetProcAddress("wglSwapIntervalEXT");
1832
1833                vboAvailable = glBindBufferARB != null;
1834
1835                // eSystem_LoggingMode(LOG_MSGBOX, null);
1836
1837                if(wglChoosePixelFormatARB)
1838                {
1839                     int pixelFormat;
1840                     int valid;
1841                     int numFormats;
1842                     float fAttributes[] = {0,0};
1843                     int iAttributes[] =
1844                   {
1845                      WGL_DRAW_TO_WINDOW_ARB,GL_TRUE,
1846                             WGL_SUPPORT_OPENGL_ARB,GL_TRUE,
1847                             WGL_ACCELERATION_ARB,WGL_FULL_ACCELERATION_ARB,
1848                             WGL_COLOR_BITS_ARB,24,
1849                             WGL_ALPHA_BITS_ARB,8,
1850                             WGL_DEPTH_BITS_ARB,16,
1851                             WGL_STENCIL_BITS_ARB,0,
1852                             WGL_DOUBLE_BUFFER_ARB,GL_TRUE,
1853                             WGL_SAMPLE_BUFFERS_ARB,GL_TRUE,
1854                             WGL_SAMPLES_ARB, 4,                                         // Check For 4x Multisampling
1855                             0,0
1856                   };
1857
1858                   //Log("Found wglChoosePixelFormatARB\n");
1859
1860                     valid = wglChoosePixelFormatARB(oglSystem.hdc,iAttributes,fAttributes,1,&pixelFormat,&numFormats);
1861                     if(!valid || !numFormats)
1862                     {
1863                      //Log("Can't find 4x multi sampling\n");
1864                        iAttributes[19] = 2;
1865                        valid = wglChoosePixelFormatARB(oglSystem.hdc,iAttributes,fAttributes,1,&pixelFormat,&numFormats);
1866                      if(!valid || !numFormats)
1867                      {
1868                         // Log("Can't find 2x multi sampling\n");
1869                         iAttributes[16] = 0;
1870                         iAttributes[17] = 0;
1871                         valid = wglChoosePixelFormatARB(oglSystem.hdc,iAttributes,fAttributes,1,&pixelFormat,&numFormats);
1872                      }
1873                     }
1874                   if(valid && numFormats)
1875                   {
1876                      oglSystem.format = pixelFormat;
1877                      wglMakeCurrent(null, null);
1878                      wglDeleteContext(oglSystem.glrc);
1879
1880                      // *** DescribePixelFormat does not support WGL pixel formats! ***
1881                      //DescribePixelFormat(oglSystem.hdc, oglSystem.format, sizeof(oglSystem.pfd), &oglSystem.pfd);
1882                      SetPixelFormat(oglSystem.hdc, oglSystem.format, &oglSystem.pfd);
1883                      //Log("Successfully set pixel format\n");
1884
1885                      oglSystem.glrc = wglCreateContext(oglSystem.hdc);
1886                      wglMakeCurrent(oglSystem.hdc, oglSystem.glrc);
1887                   }
1888                }
1889                /*else
1890                   eSystem_Logf("Can't find wglChoosePixelFormatARB\n");*/
1891
1892                result = true;
1893
1894                CheckExtensions(oglSystem);
1895
1896                wglMakeCurrent(null, null);
1897
1898                //eSystem_DumpErrors(true);
1899             }
1900          }
1901       }
1902    #elif defined(__unix__) || defined(__APPLE__)
1903       vboAvailable = true;
1904       #if defined(__ANDROID__)
1905          egl_init_display(guiApp.desktop.windowHandle);
1906       #elif defined(__ODROID__)
1907          egl_init_display((uint)displaySystem.window);
1908          CheckExtensions(oglSystem);
1909          result = true;
1910       #elif defined(__EMSCRIPTEN__)
1911          if(glfwInit() == GL_TRUE)
1912          {
1913             const int width = 640, height = 480;
1914             if(glfwOpenWindow(width, height, 8, 8, 8, 8, 16, 0, GLFW_WINDOW) == GL_TRUE)
1915             {
1916                //glfwSwapBuffers();
1917                result = true;
1918             }
1919             else
1920                printf("glfwOpenWindow() failed\n"); //glfwTerminate();
1921          }
1922          else
1923             printf("glfwInit() failed\n"); //glfwTerminate();
1924       #else
1925       {
1926          X11Window root = RootWindow( xGlobalDisplay, DefaultScreen( xGlobalDisplay ) );
1927          XSetWindowAttributes attr;
1928          unsigned long mask;
1929
1930          int attrList[] =
1931          {
1932       #ifndef ECERE_MINIGLX
1933             GLX_USE_GL, GLX_DEPTH_SIZE, 1,
1934       #endif
1935             GLX_RGBA,
1936             GLX_RED_SIZE, 1, GLX_GREEN_SIZE, 1, GLX_BLUE_SIZE, 1,
1937             GLX_DOUBLEBUFFER,
1938             None
1939          };
1940          oglSystem.visualInfo = glXChooseVisual( xGlobalDisplay,  DefaultScreen( xGlobalDisplay ), attrList );
1941          attr.background_pixel = 0;
1942          attr.border_pixel = 0;
1943          attr.colormap = XCreateColormap( xGlobalDisplay, root, oglSystem.visualInfo->visual, AllocNone);
1944          attr.event_mask = StructureNotifyMask | ExposureMask | KeyPressMask;
1945          mask = CWBackPixel | CWBorderPixel | CWColormap | CWEventMask;
1946
1947          oglSystem.glxDrawable = XCreateWindow( xGlobalDisplay, root, 0, 0, 1, 1, 0, oglSystem.visualInfo->depth, InputOutput,
1948             oglSystem.visualInfo->visual, mask, &attr );
1949       }
1950       if(oglSystem.visualInfo)
1951       {
1952          oglSystem.glContext = glXCreateContext(xGlobalDisplay, oglSystem.visualInfo, null, True);
1953          if(oglSystem.glContext)
1954          {
1955             glXMakeCurrent(xGlobalDisplay, oglSystem.glxDrawable, oglSystem.glContext);
1956             // Setup Extensions
1957             CheckExtensions(oglSystem);
1958             glXMakeCurrent(xGlobalDisplay, None, null);
1959             result = true;
1960          }
1961       }
1962       #endif
1963    #endif
1964
1965       displaySystem.flags.alpha = true;
1966       displaySystem.flags.flipping = true;
1967       displaySystem.pixelFormat = pixelFormat888;
1968       return result;
1969    }
1970
1971    void DestroyDisplaySystem(DisplaySystem displaySystem)
1972    {
1973       OGLSystem oglSystem = displaySystem.driverData;
1974
1975    #if defined(__WIN32__)
1976       wglMakeCurrent( null, null );
1977
1978       if(oglSystem.glrc)
1979          wglDeleteContext(oglSystem.glrc);
1980
1981       if(oglSystem.hdc)
1982          ReleaseDC(oglSystem.hwnd, oglSystem.hdc);
1983       DestroyWindow(oglSystem.hwnd);
1984
1985    #elif defined(__unix__) || defined(__APPLE__)
1986       #if defined(__ANDROID__) || defined(__ODROID__)
1987          egl_term_display();
1988       #elif defined(__EMSCRIPTEN__)
1989          glfwTerminate();
1990       #else
1991       if(oglSystem.visualInfo)
1992       {
1993    #ifdef   ECERE_MINIGLX
1994          __miniglx_XFree(oglSystem.visualInfo);
1995    #else
1996          XFree(oglSystem.visualInfo);
1997    #endif
1998       }
1999
2000       if(oglSystem.glxDrawable)
2001       {
2002          XDestroyWindow(xGlobalDisplay, oglSystem.glxDrawable);
2003          oglSystem.glxDrawable = 0;
2004       }
2005       #endif
2006    #endif
2007       delete oglSystem;
2008    }
2009
2010    bool CreateDisplay(Display display)
2011    {
2012       bool result = false;
2013       OGLDisplay oglDisplay = display.driverData;
2014 #if !defined(__ANDROID__) && !defined(__EMSCRIPTEN__) && !defined(__ODROID__)
2015       OGLSystem oglSystem = display.displaySystem.driverData;
2016 #endif
2017       if(!oglDisplay)
2018          oglDisplay = display.driverData = OGLDisplay { };
2019       //printf("Inside CreateDisplay\n");
2020
2021 #if defined(__WIN32__) || defined(USEPBUFFER)
2022       if(!display.alphaBlend)
2023 #endif
2024       {
2025    #if defined(__WIN32__)
2026          oglDisplay.hdc = GetDC(display.window);
2027          SetPixelFormat(oglDisplay.hdc, oglSystem.format, &oglSystem.pfd);
2028          if((oglDisplay.glrc = wglCreateContext(oglDisplay.hdc)))
2029          {
2030             wglShareLists(oglSystem.glrc, oglDisplay.glrc);
2031             wglMakeCurrent(oglDisplay.hdc, oglDisplay.glrc);
2032             result = true;
2033          }
2034          else
2035             ReleaseDC(display.window, oglDisplay.hdc);
2036    #elif defined(__unix__) || defined(__APPLE__)
2037       #if defined(__ANDROID__) || defined(__EMSCRIPTEN__) || defined(__ODROID__)
2038       #else
2039          XVisualInfo * visualInfo = ((XWindowData)display.windowDriverData).visual;
2040          /*
2041 #if defined(__APPLE__)
2042          XVisualInfo template = { 0 };
2043          XWindowAttributes winAttr;
2044          int n;
2045          XGetWindowAttributes(xGlobalDisplay, (X11Window)display.window, &winAttr);
2046          template.visualid = XVisualIDFromVisual(winAttr.visual);
2047          visualInfo = XGetVisualInfo(xGlobalDisplay, VisualIDMask, &template, &n);
2048 #ifdef _DEBUG
2049          printf("XGetVisualInfo visual ID = %d\n", template.visualid);
2050          printf("visualInfo visual ID = %d\n", visualInfo->visualid);
2051          printf("oglSystem.visualInfo visual ID = %d\n", oglSystem.visualInfo->visualid);
2052          printf("((XWindowData)display.windowDriverData).visual visual ID = %d\n", ((XWindowData)display.windowDriverData).visual->visualid);
2053 #endif
2054          // visualInfo = oglSystem.visualInfo;
2055 //#endif
2056          */
2057          if(visualInfo)
2058          {
2059             //printf("visualInfo is not null\n");
2060             // printf("Creating Display Context, sharing with %x!\n", oglSystem.glContext);
2061             oglDisplay.glContext = glXCreateContext(xGlobalDisplay, visualInfo, oglSystem.glContext, True);
2062             //XFree(visualInfo);
2063          }
2064
2065          // oglDisplay.glContext = glXCreateContext(xGlobalDisplay, oglSystem.visualInfo, oglSystem.glContext, True);
2066          if(oglDisplay.glContext)
2067          {
2068             //printf("CreateDisplay Got a Context\n");
2069             glXMakeCurrent(xGlobalDisplay, (GLXDrawable)display.window, oglDisplay.glContext);
2070             result = true;
2071          }
2072       #endif
2073    #endif
2074       }
2075 #if defined(__WIN32__) || defined(USEPBUFFER)
2076       else
2077          result = true;
2078 #endif
2079       if(result)
2080       {
2081 #if defined(__WIN32__)
2082          if(glBlendFuncSeparate)
2083             glBlendFuncSeparate(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA, GL_ONE, GL_ONE_MINUS_SRC_ALPHA);
2084          else
2085             glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
2086 #else
2087 #if !defined(__OLDX__)
2088           glBlendFuncSeparate(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA, GL_ONE, GL_ONE_MINUS_SRC_ALPHA);
2089 #else
2090          glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
2091 #endif
2092 #endif
2093          glEnable(GL_BLEND);
2094
2095          glMatrixMode(GL_MODELVIEW);
2096          glLoadIdentity(); // For setting up GLES stack
2097          glScaled(1.0, 1.0, -1.0);
2098          // glTranslatef(0.375f, 0.375f, 0.0f);
2099          // glTranslatef(-0.625f, -0.625f, 0.0f);
2100          glMatrixMode(GL_PROJECTION);
2101          glShadeModel(GL_FLAT);
2102
2103          // glLightModeli(GL_LIGHT_MODEL_LOCAL_VIEWER, true);
2104 #if !defined(EM_MODE)
2105          glLightModeli(GL_LIGHT_MODEL_COLOR_CONTROL, GL_SEPARATE_SPECULAR_COLOR);
2106 #endif
2107          glFogi(GL_FOG_MODE, GL_EXP);
2108          glFogf(GL_FOG_DENSITY, 0);
2109          glEnable(GL_NORMALIZE);
2110          glDepthFunc(GL_LESS);
2111          glClearDepth(1.0);
2112          glDisable(GL_MULTISAMPLE_ARB);
2113       }
2114 #if !defined(ECERE_NO3D) && !defined(ECERE_VANILLA)
2115       display.ambient = Color { 50,50,50 };
2116 #endif
2117
2118       if(!useSingleGLContext)
2119       {
2120    #if defined(__WIN32__)
2121          wglMakeCurrent(null, null);
2122    #elif defined(__unix__) || defined(__APPLE__)
2123       #if defined(__ANDROID__) || defined(__EMSCRIPTEN__) || defined(__ODROID__)
2124          result = true;
2125       #else
2126          glXMakeCurrent(xGlobalDisplay, None, null);
2127       #endif
2128    #endif
2129       }
2130       else
2131       {
2132       #if defined(__ANDROID__) || defined(__EMSCRIPTEN__) || defined(__ODROID__)
2133          result = true;
2134       #endif
2135       }
2136
2137       return result;
2138    }
2139
2140    bool DisplaySize(Display display, int width, int height)
2141    {
2142       OGLDisplay oglDisplay = display.driverData;
2143
2144       bool result = false;
2145
2146       //printf("Inside DisplaySize\n");
2147 #if defined(__WIN32__) || defined(USEPBUFFER)
2148       OGLSystem oglSystem = display.displaySystem.driverData;
2149       if(display.alphaBlend)
2150       {
2151 #if defined(__WIN32__)
2152          const int attributes[]=
2153          {
2154             /*WGL_TEXTURE_FORMAT_ARB, WGL_TEXTURE_RGBA_ARB,
2155             WGL_TEXTURE_TARGET_ARB, WGL_TEXTURE_2D_ARB, */0
2156          };
2157          int pixelFormat = 0;
2158          if(wglChoosePixelFormatARB)
2159          {
2160             int valid;
2161             int numFormats;
2162             float fAttributes[] = {0,0};
2163             int iAttributes[] =
2164             {
2165                //WGL_DRAW_TO_BITMAP_ARB, GL_TRUE,
2166                WGL_DRAW_TO_PBUFFER_ARB,GL_TRUE,
2167                     WGL_SUPPORT_OPENGL_ARB,GL_TRUE,
2168                     WGL_ACCELERATION_ARB,WGL_FULL_ACCELERATION_ARB,
2169                     WGL_COLOR_BITS_ARB,24,
2170                     WGL_ALPHA_BITS_ARB,8,
2171                     WGL_DEPTH_BITS_ARB,16,
2172                     WGL_STENCIL_BITS_ARB,0,
2173                     WGL_DOUBLE_BUFFER_ARB,GL_FALSE,
2174                     WGL_SAMPLE_BUFFERS_ARB,GL_TRUE,
2175                     WGL_SAMPLES_ARB, 4,                                         // Check For 4x Multisampling
2176                     0,0
2177             };
2178
2179             //Log("Found wglChoosePixelFormatARB\n");
2180
2181             valid = wglChoosePixelFormatARB(oglSystem.hdc,iAttributes,fAttributes,1,&pixelFormat,&numFormats);
2182             if(!valid || !numFormats)
2183             {
2184                //Log("Can't find 4x multi sampling\n");
2185                iAttributes[19] = 2;
2186                valid = wglChoosePixelFormatARB(oglSystem.hdc,iAttributes,fAttributes,1,&pixelFormat,&numFormats);
2187                if(!valid || !numFormats)
2188                {
2189                   // Log("Can't find 2x multi sampling\n");
2190                   iAttributes[16] = 0;
2191                   iAttributes[17] = 0;
2192                   valid = wglChoosePixelFormatARB(oglSystem.hdc,iAttributes,fAttributes,1,&pixelFormat,&numFormats);
2193                   if(!valid || !numFormats)
2194                   {
2195                      int iAttributes[] =
2196                      {
2197                         WGL_DRAW_TO_PBUFFER_ARB,GL_TRUE,
2198                         //WGL_DRAW_TO_BITMAP_ARB,GL_TRUE,
2199                         WGL_SUPPORT_OPENGL_ARB,GL_TRUE,
2200                         WGL_COLOR_BITS_ARB,24,
2201                         WGL_ALPHA_BITS_ARB,8,
2202                         WGL_DEPTH_BITS_ARB,16,
2203                         0,0
2204                      };
2205                      valid = wglChoosePixelFormatARB(oglSystem.hdc,iAttributes,fAttributes,1,&pixelFormat,&numFormats);
2206                   }
2207                }
2208             }
2209             if(valid && numFormats)
2210             {
2211                wglMakeCurrent(null, null);
2212             }
2213          }
2214
2215          wglMakeCurrent( null, null );
2216          wglMakeCurrent( oglDisplay.hdc, oglDisplay.glrc );
2217          if(oglDisplay.hdc && oglDisplay.pBuffer)
2218             wglReleasePbufferDCARB(oglDisplay.pBuffer, oglDisplay.hdc);
2219
2220          wglDestroyPbufferARB(oglDisplay.pBuffer);
2221
2222          if(!useSingleGLContext)
2223             wglMakeCurrent( null, null );
2224
2225          if(oglDisplay.glrc)
2226             wglDeleteContext(oglDisplay.glrc);
2227
2228          oglDisplay.pBuffer = wglCreatePbufferARB(oglSystem.hdc, pixelFormat, width, height, attributes);
2229          oglDisplay.hdc = wglGetPbufferDCARB(oglDisplay.pBuffer);
2230          if((oglDisplay.glrc = wglCreateContext(oglDisplay.hdc)))
2231          {
2232             BITMAPINFO * info;
2233             HDC hdc = GetDC(display.window);
2234
2235             wglShareLists(oglSystem.glrc, oglDisplay.glrc);
2236             wglMakeCurrent(oglDisplay.hdc, oglDisplay.glrc);
2237
2238             //wglQueryPbufferARB(pBuffer, WGL_PBUFFER_WIDTH_ARB, &width);
2239             //wglQueryPbufferARB(pBuffer, WGL_PBUFFER_HEIGHT_ARB, &height);
2240
2241             // glDeleteBuffersARB(2, oglDisplay.imageBuffers);
2242
2243             if((info = (BITMAPINFO *)new0 byte[sizeof(BITMAPINFOHEADER)+sizeof(RGBQUAD)*256]))
2244             {
2245                HBITMAP newBitmap;
2246
2247                if(oglDisplay.memDC) DeleteDC(oglDisplay.memDC);
2248                oglDisplay.memDC = CreateCompatibleDC(hdc);
2249                SetMapMode(oglDisplay.memDC, MM_TEXT);
2250                info->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
2251                info->bmiHeader.biPlanes = 1;
2252                info->bmiHeader.biCompression = BI_RGB;
2253                info->bmiHeader.biBitCount = 32; //(uint16)GetDeviceCaps(hdc, BITSPIXEL);
2254                info->bmiHeader.biWidth = width;
2255                info->bmiHeader.biHeight = height;
2256                newBitmap = CreateDIBSection(hdc, info, DIB_RGB_COLORS, &oglDisplay.picture, null, 0);
2257                if(newBitmap)
2258                {
2259                   SelectObject(oglDisplay.memDC, newBitmap);
2260                   if(oglDisplay.memBitmap) DeleteObject(oglDisplay.memBitmap);
2261                   /*
2262                   {
2263                      PIXELFORMATDESCRIPTOR pfd = { 0 };
2264                      pfd.nSize = (short)sizeof(pfd);
2265                      pfd.nVersion = 1;
2266                      pfd.dwFlags = PFD_DRAW_TO_BITMAP | PFD_SUPPORT_OPENGL;
2267                      pfd.iPixelType = PFD_TYPE_RGBA;
2268                      pfd.cColorBits = 32;
2269                      //pfd.cAlphaBits = 8;
2270                      pfd.cDepthBits = 24;
2271                      pfd.iLayerType = PFD_MAIN_PLANE;
2272
2273                      oglDisplay.hdc = oglDisplay.memDC;
2274
2275                      pixelFormat = ChoosePixelFormat(oglSystem.hdc, &pfd);
2276                      DescribePixelFormat(oglDisplay.hdc, pixelFormat, sizeof(pfd), &pfd);
2277                      SetPixelFormat(oglDisplay.hdc, pixelFormat, &pfd);
2278
2279                      oglDisplay.glrc = wglCreateContext(oglDisplay.hdc);
2280                      wglShareLists(oglSystem.glrc, oglDisplay.glrc);
2281                      wglMakeCurrent(oglDisplay.hdc, oglDisplay.glrc);
2282                   }
2283                   */
2284                   /*
2285                   {
2286                      const int imageSize = width * height * 4;
2287
2288                      glGenBuffersARB(2, oglDisplay.imageBuffers);
2289
2290                      glBindBufferARB(GL_PIXEL_PACK_BUFFER_ARB, oglDisplay.imageBuffers[0]);
2291                      glBufferDataARB(GL_PIXEL_PACK_BUFFER_ARB, imageSize, null, GL_STREAM_READ);
2292                      // glBindBufferARB(GL_PIXEL_PACK_BUFFER_ARB, oglDisplay.imageBuffers[1]);
2293                      // glBufferDataARB(GL_PIXEL_PACK_BUFFER_ARB, imageSize / 2, null, GL_STREAM_READ);
2294                   }
2295                   */
2296                   oglDisplay.memBitmap = newBitmap;
2297                   oglDisplay.stride = width;
2298
2299                   result = true;
2300                }
2301                delete info;
2302             }
2303             ReleaseDC(display.window, hdc);
2304          }
2305 #elif defined(__unix__) || defined(__APPLE__)
2306       #if defined(__ANDROID__) || defined(__EMSCRIPTEN__) || defined(__ODROID__)
2307          result = true;
2308       #else
2309         int attrib[] =
2310         {
2311                 GLX_DOUBLEBUFFER,  True,
2312             GLX_DEPTH_SIZE,    1,
2313                 GLX_RED_SIZE,      8,
2314                 GLX_GREEN_SIZE,    8,
2315                 GLX_BLUE_SIZE,     8,
2316                 GLX_ALPHA_SIZE,    8,
2317                 GLX_STENCIL_SIZE,  1,
2318                 //GLX_DEPTH_SIZE,    24,
2319                 GLX_RENDER_TYPE,   GLX_RGBA_BIT,
2320                 GLX_DRAWABLE_TYPE, GLX_PBUFFER_BIT | GLX_WINDOW_BIT,
2321                 None
2322         };
2323
2324         int PBattrib[] =
2325         {
2326                 GLX_PBUFFER_WIDTH,   width,
2327                 GLX_PBUFFER_HEIGHT,  height,
2328                 GLX_LARGEST_PBUFFER, False,
2329             None
2330         };
2331
2332         // choose a pixel format that meets our minimum requirements
2333         int count = 0;
2334
2335         GLXFBConfig *config = glXChooseFBConfig(xGlobalDisplay, DefaultScreen(xGlobalDisplay), attrib, &count);
2336          if(config)
2337          {
2338             if(oglDisplay.pixmap)
2339             {
2340                XFreePixmap(xGlobalDisplay, oglDisplay.pixmap);
2341                oglDisplay.pixmap = None;
2342             }
2343             if(oglDisplay.shapePixmap)
2344             {
2345                XFreePixmap(xGlobalDisplay, oglDisplay.shapePixmap);
2346                oglDisplay.shapePixmap = None;
2347             }
2348
2349             // Free Shared Memory Pixmap
2350             if(oglDisplay.image)
2351             {
2352                if(oglDisplay.shminfoShape.shmid != -1)
2353                {
2354                   XShmDetach(xGlobalDisplay, &oglDisplay.shminfo);
2355                   if(oglDisplay.shminfo.shmaddr != (void *)-1)
2356                      shmdt(oglDisplay.shminfo.shmaddr);
2357                   shmctl(oglDisplay.shminfo.shmid, IPC_RMID, 0);
2358                }
2359                XDestroyImage(oglDisplay.image);
2360                oglDisplay.image = None;
2361             }
2362             if(oglDisplay.shapeImage)
2363             {
2364                if(oglDisplay.shminfoShape.shmid != -1)
2365                {
2366                   XShmDetach(xGlobalDisplay, &oglDisplay.shminfoShape);
2367                   if(oglDisplay.shminfoShape.shmaddr != (void *)-1)
2368                      shmdt(oglDisplay.shminfoShape.shmaddr);
2369                   shmctl(oglDisplay.shminfoShape.shmid, IPC_RMID, 0);
2370                }
2371                XDestroyImage(oglDisplay.shapeImage);
2372                oglDisplay.shapeImage = None;
2373             }
2374
2375             if(oglDisplay.windowPicture)
2376                XRenderFreePicture(xGlobalDisplay, oglDisplay.windowPicture);
2377             if(oglDisplay.pixmapPicture)
2378                XRenderFreePicture(xGlobalDisplay, oglDisplay.pixmapPicture);
2379
2380             if(oglDisplay.pixmap)
2381                XFreePixmap(xGlobalDisplay, oglDisplay.pixmap);
2382
2383             if(oglDisplay.glContext)
2384                   glXDestroyContext(xGlobalDisplay, oglDisplay.glContext);
2385             if(oglDisplay.pBuffer)
2386                glXDestroyPbuffer(xGlobalDisplay, oglDisplay.pBuffer);
2387
2388                 oglDisplay.pBuffer = glXCreatePbuffer(xGlobalDisplay, config[0], PBattrib);
2389             if(oglDisplay.pBuffer)
2390             {
2391                    oglDisplay.glContext = glXCreateNewContext(xGlobalDisplay, config[0], GLX_RGBA_TYPE, oglSystem.glContext, True);
2392                if(oglDisplay.glContext)
2393                {
2394                   glXMakeCurrent(xGlobalDisplay, None, null);
2395                   glXMakeCurrent(xGlobalDisplay, (GLXDrawable)display.window, oglDisplay.glContext);
2396
2397                   // Initialize Shared Memory Pixmap
2398                   oglDisplay.image = XShmCreateImage(xGlobalDisplay, DefaultVisual(xGlobalDisplay, DefaultScreen(xGlobalDisplay)), 32,
2399                      ZPixmap, null, &oglDisplay.shminfo, width, height);
2400                   if(oglDisplay.image)
2401                   {
2402                      oglDisplay.shminfo.shmid = shmget(IPC_PRIVATE,
2403                         oglDisplay.image->bytes_per_line * oglDisplay.image->height, IPC_CREAT|0777);
2404                      if(oglDisplay.shminfo.shmid != -1)
2405                      {
2406                         oglDisplay.shminfo.shmaddr = shmat(oglDisplay.shminfo.shmid, 0, 0);
2407                         if(oglDisplay.shminfo.shmaddr != (void *)-1)
2408                         {
2409                            oglDisplay.shminfo.readOnly = False;
2410                            if(XShmAttach(xGlobalDisplay, &oglDisplay.shminfo))
2411                            {
2412                               oglDisplay.pixmap = XShmCreatePixmap(xGlobalDisplay, (X11Window)display.window, oglDisplay.shminfo.shmaddr,
2413                                  &oglDisplay.shminfo, width, height, 32);
2414
2415                               // Initialize Shared Memory Shape Pixmap
2416                               oglDisplay.shapeImage = XShmCreateImage(xGlobalDisplay, DefaultVisual(xGlobalDisplay, DefaultScreen(xGlobalDisplay)), 1,
2417                                  ZPixmap, null, &oglDisplay.shminfoShape, width, height);
2418                               if(oglDisplay.shapeImage)
2419                               {
2420                                  oglDisplay.shminfoShape.shmid = shmget(IPC_PRIVATE,
2421                                     oglDisplay.shapeImage->bytes_per_line * oglDisplay.shapeImage->height, IPC_CREAT|0777);
2422                                  if(oglDisplay.shminfoShape.shmid != -1)
2423                                  {
2424                                     oglDisplay.shminfoShape.shmaddr = shmat(oglDisplay.shminfoShape.shmid, 0, 0);
2425                                     if(oglDisplay.shminfoShape.shmaddr != (void *)-1)
2426                                     {
2427                                        oglDisplay.shminfoShape.readOnly = False;
2428                                        if(XShmAttach(xGlobalDisplay, &oglDisplay.shminfoShape))
2429                                        {
2430                                           oglDisplay.shapePixmap = XShmCreatePixmap(xGlobalDisplay, (X11Window)display.window, oglDisplay.shminfoShape.shmaddr,
2431                                              &oglDisplay.shminfoShape, width, height, 1);
2432                                           //oglDisplay.shapePixmap = XCreatePixmap(xGlobalDisplay, (X11Window)display.window, width, height, 1);
2433
2434                                           {
2435                                              XRenderPictureAttributes attributes = { 0 };
2436                                              XRenderPictFormat * format = XRenderFindStandardFormat(xGlobalDisplay, /*PictStandardRGB24*/ PictStandardARGB32);
2437                                              #if !defined(__APPLE__) && !defined(__OLDX__)
2438                                              attributes.repeat = RepeatNormal;
2439                                              #else
2440                                              attributes.repeat = 1;
2441                                              #endif
2442                                              oglDisplay.pixmapPicture = XRenderCreatePicture(xGlobalDisplay, oglDisplay.pixmap, format, CPRepeat, &attributes);
2443                                              oglDisplay.windowPicture = XRenderCreatePicture(xGlobalDisplay, (X11Window)display.window, format, 0, &attributes);
2444                                              oglDisplay.shapePicture = XRenderCreatePicture(xGlobalDisplay, oglDisplay.shapePixmap,
2445                                                 XRenderFindStandardFormat(xGlobalDisplay, PictStandardA1), 0, &attributes);
2446                                           }
2447
2448                                           oglDisplay.picture = oglDisplay.shminfo.shmaddr;
2449                                           oglDisplay.stride = oglDisplay.image->bytes_per_line / 4;
2450
2451                                           result = true;
2452                                        }
2453                                     }
2454                                  }
2455                               }
2456                            }
2457                         }
2458                      }
2459                   }
2460                }
2461             }
2462             XFree(config);
2463          }
2464      #endif
2465 #endif
2466          CreateDisplay(display);
2467 #if defined(__WIN32__)
2468          wglMakeCurrent(oglDisplay.hdc, oglDisplay.glrc);
2469 #elif defined(__unix__) || defined(__APPLE__)
2470       #if defined(__ANDROID__) || defined(__EMSCRIPTEN__) || defined(__ODROID__)
2471          width = eglWidth;
2472          height = eglHeight;
2473       #else
2474          glXMakeCurrent(xGlobalDisplay, (GLXDrawable)display.window, oglDisplay.glContext);
2475       #endif
2476 #endif
2477       }
2478       else
2479 #endif
2480          result = true;
2481       if(!result && display.alphaBlend)
2482       {
2483          printf("Alpha blending windows not supported on this display\n");
2484       }
2485       if(!result)
2486          return false;
2487
2488       result = false;
2489
2490       glViewport(0,0,width,height);
2491       glMatrixMode(GL_PROJECTION);
2492       glLoadIdentity();
2493       glOrtho(0,width,height,0,0.0,1.0);
2494       displayWidth = display.width = width;
2495       displayHeight = display.height = height;
2496
2497       if(!oglDisplay.flippingBuffer || oglDisplay.flipBufW < width || oglDisplay.flipBufH < height)
2498       {
2499          oglDisplay.flipBufW = width;
2500          oglDisplay.flipBufH = height;
2501 #ifdef _GLES
2502          result = true;
2503 #else
2504          oglDisplay.flippingBuffer = renew oglDisplay.flippingBuffer ColorAlpha [width * height];
2505 #endif
2506       }
2507       if(oglDisplay.flippingBuffer || !width || !height)
2508          result = true;
2509
2510       return result;
2511    }
2512
2513    void DisplayPosition(Display display, int x, int y)
2514    {
2515       OGLDisplay oglDisplay = display.driverData;
2516
2517       oglDisplay.x = x;
2518       oglDisplay.y = y;
2519    }
2520
2521    void SetPalette(Display display, ColorAlpha * palette, bool colorMatch)
2522    {
2523    }
2524
2525    void RestorePalette(Display display)
2526    {
2527    }
2528
2529    void StartUpdate(Display display)
2530    {
2531    }
2532
2533    void EndUpdate(Display display)
2534    {
2535    }
2536
2537    void Scroll(Display display, Box scroll, int x, int y, Extent dirty)
2538    {
2539    }
2540
2541    void Update(Display display, Box updateBox)
2542    {
2543 #if defined(__WIN32__) || defined(USEPBUFFER)
2544       OGLDisplay oglDisplay = display.driverData;
2545 #endif
2546       //Logf("DisplayScreen\n");
2547
2548       glFlush();
2549       glFinish();
2550 #if defined(__WIN32__) || defined(USEPBUFFER)
2551       if(display.alphaBlend)
2552       {
2553          glPixelStorei(GL_PACK_ALIGNMENT, 4);
2554          glPixelStorei(GL_PACK_ROW_LENGTH, oglDisplay.stride);
2555          glPixelStorei(GL_PACK_SKIP_ROWS, 0);
2556          glPixelStorei(GL_PACK_SKIP_PIXELS, 0);
2557          glReadPixels(0,0,display.width,display.height,GL_BGRA_EXT,GL_UNSIGNED_BYTE, oglDisplay.picture);
2558
2559          {
2560 #if defined(__WIN32__)
2561             HDC hdc = GetDC(0);
2562             POINT point = { oglDisplay.x, oglDisplay.y};
2563             POINT srcPoint = { 0, 0 };
2564             BLENDFUNCTION blend = { 0 };
2565             SIZE size;
2566             size.cx = display.width;
2567             size.cy = display.height;
2568             blend.BlendOp = AC_SRC_OVER;
2569             blend.BlendFlags = 0;
2570             blend.SourceConstantAlpha = 255;
2571             blend.AlphaFormat = AC_SRC_ALPHA;
2572
2573             /*
2574             // Process partial images.  Mapping the buffer waits for
2575             // outstanding DMA transfers into the buffer to finish.
2576             glBindBufferARB(GL_PIXEL_PACK_BUFFER_ARB, oglDisplay.imageBuffers[0]);
2577             oglDisplay.pboMemory1 = (byte *)glMapBufferARB(GL_PIXEL_PACK_BUFFER_ARB, GL_READ_ONLY);
2578
2579             // glBindBufferARB(GL_PIXEL_PACK_BUFFER_ARB, oglDisplay.imageBuffers[1]);
2580             // oglDisplay.pboMemory2 = (byte *)glMapBufferARB(GL_PIXEL_PACK_BUFFER_ARB,GL_READ_ONLY);
2581
2582
2583             memcpy(oglDisplay.picture, oglDisplay.pboMemory1, display.width * display.height * 4);
2584             //memcpy(oglDisplay.picture + display.width * display.height * 4 / 2, oglDisplay.pboMemory2, display.width * display.height * 4/ 2);
2585             */
2586
2587             UpdateLayeredWindow(display.window, hdc, &point, &size, oglDisplay.memDC, &srcPoint, 0, &blend, ULW_ALPHA);
2588             /*
2589
2590             // Unmap the image buffers
2591             glBindBufferARB(GL_PIXEL_PACK_BUFFER_ARB, oglDisplay.imageBuffers[0]);
2592             glUnmapBufferARB(GL_PIXEL_PACK_BUFFER_ARB);
2593
2594             // glBindBufferARB(GL_PIXEL_PACK_BUFFER_ARB, oglDisplay.imageBuffers[1]);
2595             // glUnmapBufferARB(GL_PIXEL_PACK_BUFFER_ARB);
2596
2597             // Bind two different buffer objects and start the glReadPixels
2598             // asynchronously. Each call will return directly after
2599             // starting the DMA transfer.
2600             glBindBufferARB(GL_PIXEL_PACK_BUFFER_ARB, oglDisplay.imageBuffers[0]);
2601             glReadPixels(0, 0, display.width, display.height, GL_BGRA, GL_UNSIGNED_BYTE, 0);
2602
2603             // glBindBufferARB(GL_PIXEL_PACK_BUFFER_ARB, oglDisplay.imageBuffers[1]);
2604             // glReadPixels(0, display.height/2, display.width, display.height/2, GL_BGRA, GL_UNSIGNED_BYTE, 0);
2605             */
2606
2607             ReleaseDC(0, hdc);
2608 #elif defined(__unix__) || defined(__APPLE__)
2609       #if defined(__ANDROID__) || defined(__EMSCRIPTEN__) || defined(__ODROID__)
2610       #else
2611             XTransform transform =
2612             {
2613                {
2614                   { (int)(1.0f * (1<<16)), (int)(0.0f * (1<<16)),  (int)(0 * (1 << 16)) },
2615                   { (int)(0.0f),           (int)(-1.0f * (1<<16)), (int)(0 * (1<<16)) },
2616                   { (int)(0.0f * (1<<16)), (int)(0.0f * (1<<16)),  (int)(1.0f * (1<<16)) }
2617                }
2618             };
2619             XRenderSetPictureTransform(xGlobalDisplay, oglDisplay.pixmapPicture, &transform);
2620             XRenderComposite(xGlobalDisplay, PictOpSrc, oglDisplay.pixmapPicture, None, oglDisplay.shapePicture, 0, 0, 0, 0, 0, 0, display.width, display.height);
2621             XRenderComposite(xGlobalDisplay, PictOpSrc, oglDisplay.pixmapPicture, None, oglDisplay.windowPicture, 0, 0, 0, 0, 0, 0, display.width, display.height);
2622             #if !defined(__APPLE__) && !defined(__OLDX__)
2623             XShapeCombineMask(xGlobalDisplay, (X11Window)display.window, ShapeInput, 0, 0, oglDisplay.shapePixmap, ShapeSet);
2624             #else
2625             XShapeCombineMask(xGlobalDisplay, display.window, 2, 0, 0, oglDisplay.shapePixmap, ShapeSet);
2626             #endif
2627             XFlush(xGlobalDisplay);
2628      #endif
2629 #endif
2630          }
2631       }
2632       else
2633 #endif
2634       {
2635 #if defined(__WIN32__)
2636          //wglSwapLayerBuffers(oglDisplay.hdc,WGL_SWAP_MAIN_PLANE);
2637          SwapBuffers(oglDisplay.hdc);
2638 #elif defined(__unix__) || defined(__APPLE__)
2639       #if defined(__ANDROID__) || defined(__ODROID__)
2640          eglSwapBuffers(eglDisplay, eglSurface);
2641       #elif defined(__EMSCRIPTEN__)
2642          glfwSwapBuffers();
2643       #else
2644          glXSwapBuffers(xGlobalDisplay, (GLXDrawable)display.window);
2645       #endif
2646 #endif
2647       }
2648       //Logf("Out of DisplayScreen\n");
2649    }
2650
2651    void FreeBitmap(DisplaySystem displaySystem, Bitmap bitmap)
2652    {
2653       if(bitmap.driverData)
2654       {
2655          GLuint tex = (GLuint)(uintptr)bitmap.driverData;
2656          glDeleteTextures(1, &tex);
2657          bitmap.driverData = 0;
2658       }
2659       bitmap.driver = ((subclass(DisplayDriver))class(LFBDisplayDriver));
2660    }
2661
2662    bool AllocateBitmap(DisplaySystem displaySystem, Bitmap bitmap, int width, int height, int stride, PixelFormat format, bool allocatePalette)
2663    {
2664       OGLSystem oglSystem = displaySystem.driverData;
2665       bool result = false;
2666       Bitmap mipMap { };
2667       GLuint glBitmap = 0;
2668
2669       uint w = width, h = height;
2670       if(oglSystem.pow2textures)
2671       {
2672          w = pow2i(w);
2673          h = pow2i(h);
2674       }
2675       w = Min(w, oglSystem.maxTextureSize);
2676       h = Min(h, oglSystem.maxTextureSize);
2677
2678       glGenTextures(1, &glBitmap);
2679       glBindTexture(GL_TEXTURE_2D, glBitmap);
2680
2681       glPixelStorei( GL_UNPACK_ALIGNMENT, 1 );
2682
2683       glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
2684       glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
2685
2686       glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
2687       glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
2688
2689       glHint(GL_PERSPECTIVE_CORRECTION_HINT, GL_NICEST);
2690
2691       mipMap.Allocate(null, w, h, w, pixelFormatRGBA, false);
2692
2693       // glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA8, w, h, 0, GL_RGBA, GL_UNSIGNED_BYTE, mipMap.picture);
2694       glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, w, h, 0, GL_RGBA, GL_UNSIGNED_BYTE, mipMap.picture);
2695
2696       delete mipMap;
2697
2698       bitmap.driverData = (void *)(uintptr)glBitmap;
2699       bitmap.driver = displaySystem.driver;
2700       bitmap.width = w;
2701       bitmap.height = h;
2702
2703       result = true;
2704       return result;
2705    }
2706
2707    bool MakeDDBitmap(DisplaySystem displaySystem, Bitmap bitmap, bool mipMaps)
2708    {
2709       bool result = false;
2710       OGLSystem oglSystem = displaySystem.driverData;
2711       Bitmap convBitmap = bitmap;
2712       if(bitmap.keepData)
2713       {
2714          convBitmap = { };
2715          convBitmap.Copy(bitmap);
2716       }
2717
2718       // Pre process the bitmap... First make it 32 bit
2719       if(/*bitmap.pixelFormat == pixelFormatRGBA || */convBitmap.Convert(null, pixelFormat888, null))
2720       {
2721          int c, level;
2722          uint w = bitmap.width, h = bitmap.height;
2723          GLuint glBitmap = 0;
2724          if(oglSystem.pow2textures)
2725          {
2726             w = pow2i(w);
2727             h = pow2i(h);
2728          }
2729          w = Min(w, oglSystem.maxTextureSize);
2730          h = Min(h, oglSystem.maxTextureSize);
2731
2732          if(mipMaps)
2733          {
2734             while(w * 2 < h) w *= 2;
2735             while(h * 2 < w) h *= 2;
2736          }
2737
2738          // Switch ARGB to RGBA
2739          //if(bitmap.format != pixelFormatRGBA)
2740          {
2741             for(c=0; c<bitmap.size; c++)
2742             {
2743                // ((ColorRGBA *)bitmap.picture)[c] = ((ColorAlpha *)bitmap.picture)[c];
2744                // TODO:
2745                ColorAlpha color = ((ColorAlpha *)convBitmap.picture)[c];
2746                ((ColorRGBA *)convBitmap.picture)[c] = ColorRGBA { color.color.r, color.color.g, color.color.b, color.a };
2747             }
2748          }
2749          // convBitmap.pixelFormat = pixelFormat888;
2750
2751          glGetError();
2752          glGenTextures(1, &glBitmap);
2753          if(glBitmap == 0)
2754          {
2755             //int error = glGetError();
2756             return false;
2757          }
2758
2759          glBindTexture(GL_TEXTURE_2D, glBitmap);
2760          glPixelStorei( GL_UNPACK_ALIGNMENT, 1 );
2761
2762          glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
2763          glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, mipMaps ? GL_LINEAR_MIPMAP_LINEAR : GL_LINEAR);
2764          //glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
2765
2766          //glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP);
2767          //glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP);
2768
2769          glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
2770          glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
2771
2772          glHint(GL_PERSPECTIVE_CORRECTION_HINT, GL_NICEST);
2773
2774          result = true;
2775
2776          for(level = 0; result && (w > 1 || h > 1); level++, w >>= 1, h >>= 1)
2777          {
2778             Bitmap mipMap;
2779             if(bitmap.width != w || bitmap.height != h)
2780             {
2781                mipMap = Bitmap { };
2782                if(mipMap.Allocate(null, w, h, w, convBitmap.pixelFormat, false))
2783                {
2784                   Surface mipSurface = mipMap.GetSurface(0,0,null);
2785                   mipSurface.Filter(convBitmap, 0,0,0,0, w, h, convBitmap.width, convBitmap.height);
2786                   delete mipSurface;
2787                }
2788                else
2789                {
2790                   result = false;
2791                   delete mipMap;
2792                }
2793             }
2794             else
2795                mipMap = convBitmap;
2796
2797             if(result)
2798             {
2799                int error;
2800                //int width = 0;
2801                glGetError();
2802                // glTexImage2D(GL_TEXTURE_2D, level, GL_RGBA8, w, h, 0, GL_RGBA, GL_UNSIGNED_BYTE, mipMap.picture);
2803                glTexImage2D(GL_TEXTURE_2D, level, GL_RGBA, w, h, 0, GL_RGBA, GL_UNSIGNED_BYTE, mipMap.picture);
2804                //printf("Calling glTexImage2D\n");
2805                //glGetTexLevelParameteriv(GL_TEXTURE_2D, level, GL_TEXTURE_WIDTH, &width);
2806                //printf("width = %d (Should be %d, %d)\n", width, w, h);
2807                if((error = glGetError()))
2808                {
2809                   //Logf("OpenGL Bitmap MakeDD error: %d...\n", error);
2810                   //printf("OpenGL Bitmap MakeDD error: %d...\n", error);
2811                   result = false;
2812                }
2813             }
2814             if(mipMap != convBitmap)
2815                delete mipMap;
2816             if(!mipMaps) break;
2817          }
2818
2819          convBitmap.driver.FreeBitmap(convBitmap.displaySystem, convBitmap);
2820          bitmap.driverData = (void *)(uintptr)glBitmap;
2821          bitmap.driver = displaySystem.driver;
2822          if(bitmap.keepData)
2823             delete convBitmap;
2824
2825          if(!result)
2826             FreeBitmap(displaySystem, bitmap);
2827          else if(oglSystem.loadingFont)
2828          {
2829             glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
2830             glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
2831             oglSystem.loadingFont = false;
2832          }
2833       }
2834       return result;
2835    }
2836
2837    void ReleaseSurface(Display display, Surface surface)
2838    {
2839       glDisable(GL_SCISSOR_TEST);
2840       delete surface.driverData;
2841       surface.driverData = null;
2842    }
2843
2844    bool GetBitmapSurface(DisplaySystem displaySystem, Surface surface, Bitmap bitmap, int x, int y, Box clip)
2845    {
2846       return false;
2847    }
2848
2849    bool GetSurface(Display display, Surface surface, int x,int y, Box clip)
2850    {
2851       bool result = false;
2852       OGLSurface oglSurface = surface.driverData = OGLSurface { };
2853
2854       //Logf("GetSurface\n");
2855
2856       if(oglSurface)
2857       {
2858          if(displayWidth != display.width || displayHeight != display.height)
2859          {
2860             displayWidth = display.width;
2861             displayHeight = display.height;
2862
2863             glViewport(0,0,display.width,display.height);
2864             glLoadIdentity();
2865             glOrtho(0,display.width,display.height,0,0.0,1.0);
2866          }
2867
2868          surface.offset.x = x;
2869          surface.offset.y = y;
2870          surface.unclippedBox = surface.box = clip;
2871          oglSurface.bitmapMult[0] = 1;
2872          oglSurface.bitmapMult[1] = 1;
2873          oglSurface.bitmapMult[2] = 1;
2874          oglSurface.bitmapMult[3] = 1;
2875
2876          glEnable(GL_SCISSOR_TEST);
2877          glScissor(
2878             x+clip.left,
2879             (display.height) -(y+clip.bottom)-1,
2880             clip.right-clip.left+1,
2881             clip.bottom-clip.top+1);
2882          result = true;
2883       }
2884       return result;
2885    }
2886
2887    void Clip(Display display, Surface surface, Box clip)
2888    {
2889       Box box;
2890
2891       //Logf("Clip\n");
2892
2893       if(clip != null)
2894       {
2895          box = clip;
2896          box.Clip(surface.unclippedBox);
2897          surface.box = box;
2898       }
2899       else
2900          box = surface.box = surface.unclippedBox;
2901       box.left += surface.offset.x;
2902       box.top  += surface.offset.y;
2903       box.right+= surface.offset.x;
2904       box.bottom += surface.offset.y;
2905
2906       glScissor(
2907          box.left,display.height - box.bottom - 1,
2908          box.right-box.left+1, box.bottom-box.top+1);
2909    }
2910
2911    bool GrabScreen(Display display, Bitmap bitmap, int x, int y, unsigned int w, unsigned int h)
2912    {
2913       bool result = false;
2914       OGLDisplay oglDisplay = display.driverData;
2915       ColorAlpha * flippingBuffer = oglDisplay.flippingBuffer;
2916
2917       if(oglDisplay.flippingBuffer)
2918       {
2919          if(bitmap.pixelFormat != pixelFormat888 || bitmap.width < w || bitmap.height < h)
2920          {
2921             bitmap.Free();
2922             bitmap.Allocate(null, w,h,w, pixelFormat888, false);
2923          }
2924          if(bitmap)
2925          {
2926             uint row;
2927
2928             glPixelStorei(GL_PACK_ALIGNMENT, 4);
2929             glPixelStorei(GL_PACK_ROW_LENGTH, bitmap.stride);
2930             glPixelStorei(GL_PACK_SKIP_ROWS, 0);
2931             glPixelStorei(GL_PACK_SKIP_PIXELS, 0);
2932             glReadPixels(x,display.height-h-y,w,h,GL_BGRA_EXT,GL_UNSIGNED_BYTE, flippingBuffer);
2933
2934             // Need a flip...
2935             for(row = 0; row<h; row++)
2936                CopyBytesBy4(((ColorAlpha *)bitmap.picture) + row * w, ((ColorAlpha *)flippingBuffer) + (h-row-1) * w, w);
2937             result = true;
2938          }
2939       }
2940       return result;
2941    }
2942
2943    void SetForeground(Display display, Surface surface, ColorAlpha color)
2944    {
2945       OGLSurface oglSurface = surface.driverData;
2946
2947       //Logf("SetForeground\n");
2948
2949       oglSurface.foreground[0] = color.color.r/255.0f;
2950       oglSurface.foreground[1] = color.color.g/255.0f;
2951       oglSurface.foreground[2] = color.color.b/255.0f;
2952       //oglSurface.foreground[3] = 1.0f;
2953       oglSurface.foreground[3] = color.a/255.0f;
2954
2955       //if(!oglSurface.foreground[3])printf("bug");
2956    }
2957
2958    void SetBackground(Display display, Surface surface, ColorAlpha color)
2959    {
2960       OGLSurface oglSurface = surface.driverData;
2961
2962       //Logf("SetBackground\n");
2963
2964       oglSurface.background[0] = color.color.r/255.0f;
2965       oglSurface.background[1] = color.color.g/255.0f;
2966       oglSurface.background[2] = color.color.b/255.0f;
2967       //oglSurface.background[3] = 1.0;
2968       oglSurface.background[3] = color.a/255.0f;
2969    }
2970
2971    void SetBlitTint(Display display, Surface surface, ColorAlpha color)
2972    {
2973       OGLSurface oglSurface = surface.driverData;
2974
2975       oglSurface.bitmapMult[0] = color.color.r/255.0f;
2976       oglSurface.bitmapMult[1] = color.color.g/255.0f;
2977       oglSurface.bitmapMult[2] = color.color.b/255.0f;
2978       oglSurface.bitmapMult[3] = color.a/255.0f;
2979    }
2980
2981    ColorAlpha GetPixel(Display display, Surface surface,int x,int y)
2982    {
2983       return 0;
2984    }
2985
2986    void PutPixel(Display display, Surface surface,int x,int y)
2987    {
2988       OGLSurface oglSurface = surface.driverData;
2989
2990       //Logf("PutPixel\n");
2991
2992       glColor4fv(oglSurface.foreground);
2993       glBegin(GL_POINTS);
2994       // glVertex2i(x+surface.offset.x, y+surface.offset.y);
2995       glVertex2f(x+surface.offset.x + 0.5f, y+surface.offset.y + 0.5f);
2996
2997       glEnd();
2998    }
2999
3000    void DrawLine(Display display, Surface surface, int _x1, int _y1, int _x2, int _y2)
3001    {
3002       OGLSurface oglSurface = surface.driverData;
3003       float x1 = _x1, x2 = _x2, y1 = _y1, y2 = _y2;
3004       if(_x1 == _x2)
3005       {
3006          if(_y2 >= _y1)
3007             y2 += 1;
3008          else
3009             y1 += 1;
3010       }
3011       else if(_y1 == _y2)
3012       {
3013          if(_x2 >= _x1)
3014             x2 += 1;
3015          else
3016             x1 += 1;
3017       }
3018       x1 += surface.offset.x;
3019       y1 += surface.offset.y;
3020       x2 += surface.offset.x;
3021       y2 += surface.offset.y;
3022
3023       //Logf("Line\n");
3024
3025       glColor4fv(oglSurface.foreground);
3026       glBegin(GL_LINES);
3027 #if defined(_GLES) || defined(EM_MODE)
3028       if(stippleEnabled)
3029       {
3030          glTexCoord2f(0.5f, 0);
3031          glVertex2f(x1 + 0.5f, y1 + 0.5f);
3032          glTexCoord2f(Max(x2-x1, y2-y1) + 0.5f, 0);
3033          glVertex2f(x2 + 0.5f, y2 + 0.5f);
3034       }
3035       else
3036 #endif
3037       {
3038          /*
3039          glVertex2i(x1, y1);
3040          glVertex2i(x2, y2);
3041          */
3042          glVertex2f(x1 + 0.5f, y1 + 0.5f);
3043          glVertex2f(x2 + 0.5f, y2 + 0.5f);
3044       }
3045
3046       glEnd();
3047    }
3048
3049    void Rectangle(Display display, Surface surface,int x1,int y1,int x2,int y2)
3050    {
3051       OGLSurface oglSurface = surface.driverData;
3052       x1 += surface.offset.x;
3053       y1 += surface.offset.y;
3054       x2 += surface.offset.x;
3055       y2 += surface.offset.y;
3056
3057       //Logf("Rectangle\n");
3058
3059       glColor4fv(oglSurface.foreground);
3060 #if defined(_GLES) || defined(EM_MODE)
3061       if(stippleEnabled)
3062       {
3063          glBegin(GL_LINES);
3064
3065          glTexCoord2f(0.5f, 0);
3066          glVertex2f(x1 + 0.5f, y1 + 0.5f);
3067          glTexCoord2f(y2-y1 + 0.5f, 0);
3068          glVertex2f(x1 + 0.5f, y2 + 0.5f);
3069
3070          glTexCoord2f(0.5f, 0);
3071          glVertex2f(x1 + 0.5f, y2 + 0.5f);
3072          glTexCoord2f(x2 - x1 + 0.5f, 0);
3073          glVertex2f(x2 + 0.5f, y2 + 0.5f);
3074
3075          glTexCoord2f(0.5f, 0);
3076          glVertex2f(x2 + 0.5f, y2 + 0.5f);
3077          glTexCoord2f(y1 - y2 + 0.5f, 0);
3078          glVertex2f(x2 + 0.5f, y1 + 0.5f);
3079
3080          glTexCoord2f(0.5f, 0);
3081          glVertex2f(x2 + 0.5f, y1 + 0.5f);
3082          glTexCoord2f(x1 - x2 + 0.5f, 0);
3083          glVertex2f(x1 + 0.5f, y1 + 0.5f);
3084       }
3085       else
3086 #endif
3087       {
3088          glBegin(GL_LINE_LOOP);
3089          /*
3090          glVertex2i(x1, y1);
3091          glVertex2i(x1, y2);
3092          glVertex2i(x2, y2);
3093          glVertex2i(x2, y1);
3094          */
3095          glVertex2f(x1 + 0.5f, y1 + 0.5f);
3096          glVertex2f(x1 + 0.5f, y2 + 0.5f);
3097          glVertex2f(x2 + 0.5f, y2 + 0.5f);
3098          glVertex2f(x2 + 0.5f, y1 + 0.5f);
3099       }
3100       glEnd();
3101    }
3102
3103    void Area(Display display, Surface surface,int x1,int y1,int x2,int y2)
3104    {
3105       OGLSurface oglSurface = surface.driverData;
3106       //Logf("Area\n");
3107
3108       glColor4fv(oglSurface.background);
3109
3110 #ifdef EM_MODE
3111       glBegin(GL_QUADS);
3112       glVertex2f(x1+surface.offset.x, y1+surface.offset.y);
3113       glVertex2f(x1+surface.offset.x, y2+surface.offset.y+1);
3114       glVertex2f(x2+surface.offset.x+1, y2+surface.offset.y+1);
3115       glVertex2f(x2+surface.offset.x+1, y1+surface.offset.y);
3116       glEnd();
3117 #else
3118       glRecti(x1+surface.offset.x, y1+surface.offset.y,
3119               x2+surface.offset.x + 1, y2+surface.offset.y + 1);
3120 #endif
3121       /*
3122       glRectf(x1+surface.offset.x, y1+surface.offset.y,
3123               x2+surface.offset.x + 1, y2+surface.offset.y + 1);
3124       */
3125    }
3126
3127    void Clear(Display display, Surface surface, ClearType type)
3128    {
3129       OGLDisplay oglDisplay = display.driverData;
3130       OGLSurface oglSurface = surface.driverData;
3131
3132       //Logf("Clear\n");
3133       if(type != depthBuffer)
3134          glClearColor(oglSurface.background[0], oglSurface.background[1], oglSurface.background[2], oglSurface.background[3]);
3135       if(type != colorBuffer && !oglDisplay.depthWrite)
3136       {
3137          glDepthMask((byte)bool::true);
3138       }
3139       glClear(((type != depthBuffer) ? GL_COLOR_BUFFER_BIT : 0) |
3140               ((type != colorBuffer) ? GL_DEPTH_BUFFER_BIT : 0));
3141       if(type != colorBuffer && !oglDisplay.depthWrite)
3142       {
3143          glDepthMask((byte)bool::false);
3144       }
3145    }
3146
3147    bool ConvertBitmap(DisplaySystem displaySystem, Bitmap bitmap, PixelFormat format, ColorAlpha * palette)
3148    {
3149       return true;
3150    }
3151
3152    void Blit(Display display, Surface surface, Bitmap bitmap, int dx, int dy, int sx, int sy, int w, int h)
3153    {
3154       OGLSurface oglSurface = surface.driverData;
3155
3156 #if !defined(__OLDX__)
3157          // WHY DO WE HAVE GL_ONE HERE ?
3158          /*if(glBlendFuncSeparate && !oglSurface.writingText)
3159             glBlendFuncSeparate(GL_ONE, GL_ONE_MINUS_SRC_ALPHA, GL_ONE, GL_ONE_MINUS_SRC_ALPHA);*/
3160 #endif
3161
3162       if(!oglSurface.writingText)
3163       {
3164          // glTranslatef(-0.375f, -0.375f, 0.0f);
3165          glEnable(GL_TEXTURE_2D);
3166          glColor4fv(oglSurface.bitmapMult);
3167       }
3168       else if(oglSurface.xOffset)
3169          glTranslated(oglSurface.xOffset / 64.0/*-0.375*/, 0.0, 0.0);
3170
3171       glBindTexture(GL_TEXTURE_2D, (GLuint)(uintptr)bitmap.driverData);
3172       glBegin(GL_QUADS);
3173
3174       if(h < 0)
3175       {
3176          glTexCoord2f((float)sx/ bitmap.width, (float)(sy-h)/ bitmap.height);
3177          glVertex2i(dx+surface.offset.x, dy+surface.offset.y);
3178          glTexCoord2f((float)(sx+w) / bitmap.width, (float)(sy-h)/ bitmap.height);
3179          glVertex2i(dx+w+surface.offset.x, dy+surface.offset.y);
3180          glTexCoord2f((float)(sx+w)/ bitmap.width, (float)sy/ bitmap.height);
3181          glVertex2i(dx+w+surface.offset.x, dy-h+surface.offset.y);
3182          glTexCoord2f((float)sx / bitmap.width, (float)sy/ bitmap.height);
3183          glVertex2i(dx+surface.offset.x, dy-h+surface.offset.y);
3184       }
3185       else
3186       {
3187          /*
3188          glTexCoord2f((float)sx / bitmap.width, (float)sy/ bitmap.height);
3189          glVertex2i(dx+surface.offset.x, dy+surface.offset.y);
3190          glTexCoord2f((float)(sx+w)/ bitmap.width, (float)sy/ bitmap.height);
3191          glVertex2i(dx+w+surface.offset.x, dy+surface.offset.y);
3192          glTexCoord2f((float)(sx+w) / bitmap.width, (float)(sy+h)/ bitmap.height);
3193          glVertex2i(dx+w+surface.offset.x, dy+h+surface.offset.y);
3194          glTexCoord2f((float)sx/ bitmap.width, (float)(sy+h)/ bitmap.height);
3195          glVertex2i(dx+surface.offset.x, dy+h+surface.offset.y);
3196          */
3197
3198          glTexCoord2f((float)sx / bitmap.width, (float)sy/ bitmap.height);
3199          glVertex2f((float)dx+surface.offset.x, (float)dy+surface.offset.y);
3200          glTexCoord2f((float)(sx+w)/ bitmap.width, (float)sy/ bitmap.height);
3201          glVertex2f((float)dx+w+surface.offset.x, (float)dy+surface.offset.y);
3202          glTexCoord2f((float)(sx+w) / bitmap.width, (float)(sy+h)/ bitmap.height);
3203          glVertex2f((float)dx+w+surface.offset.x, (float)dy+h+surface.offset.y);
3204          glTexCoord2f((float)sx/ bitmap.width, (float)(sy+h)/ bitmap.height);
3205          glVertex2f((float)dx+surface.offset.x, (float)dy+h+surface.offset.y);
3206       }
3207       glEnd();
3208
3209       if(!oglSurface.writingText)
3210       {
3211          glDisable(GL_TEXTURE_2D);
3212
3213          //glTranslate(0.375, 0.375, 0.0);
3214       }
3215       else if(oglSurface.xOffset)
3216          glTranslated(-oglSurface.xOffset / 64.0/*+0.375*/, 0.0, 0.0);
3217
3218 #if !defined(__OLDX__)
3219          /*if(glBlendFuncSeparate && !oglSurface.writingText)
3220             glBlendFuncSeparate(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA, GL_ONE, GL_ONE_MINUS_SRC_ALPHA);*/
3221 #endif
3222    }
3223
3224    void Stretch(Display display, Surface surface, Bitmap bitmap, int dx, int dy, int sx, int sy, int w, int h, int sw, int sh)
3225    {
3226       OGLSurface oglSurface = surface.driverData;
3227
3228       //glTranslate(-0.375, -0.375, 0.0);
3229
3230       //Logf("Stretch\n");
3231
3232 #if !defined(__OLDX__)
3233       /*if(glBlendFuncSeparate)
3234          glBlendFuncSeparate(GL_ONE, GL_ONE_MINUS_SRC_ALPHA, GL_ONE, GL_ONE_MINUS_SRC_ALPHA);*/
3235 #endif
3236
3237       glEnable(GL_TEXTURE_2D);
3238       glBindTexture(GL_TEXTURE_2D, (GLuint)(uintptr)bitmap.driverData);
3239
3240       glColor4fv(oglSurface.bitmapMult);
3241
3242       glBegin(GL_QUADS);
3243
3244       if(h < 0)
3245       {
3246          glTexCoord2f((float)(sx)/ bitmap.width, (float)(sy+sh)/ bitmap.height);
3247          glVertex2i(dx+surface.offset.x, dy+surface.offset.y);
3248
3249          glTexCoord2f((float)(sx+sw) / bitmap.width, (float)(sy+sh)/ bitmap.height);
3250          glVertex2i(dx+w+surface.offset.x, dy+surface.offset.y);
3251
3252          glTexCoord2f((float)(sx+sw)/ bitmap.width, (float)(sy)/ bitmap.height);
3253          glVertex2i(dx+w+surface.offset.x, dy-h+surface.offset.y);
3254
3255          glTexCoord2f((float)(sx) / bitmap.width, (float)(sy)/ bitmap.height);
3256          glVertex2i(dx+surface.offset.x, dy-h+surface.offset.y);
3257       }
3258       else
3259       {
3260          glTexCoord2f((float)(sx) / bitmap.width, (float)(sy)/ bitmap.height);
3261          glVertex2i(dx+surface.offset.x, dy+surface.offset.y);
3262
3263          glTexCoord2f((float)(sx+sw)/ bitmap.width, (float)(sy)/ bitmap.height);
3264          glVertex2i(dx+w+surface.offset.x, dy+surface.offset.y);
3265
3266          glTexCoord2f((float)(sx+sw) / bitmap.width, (float)(sy+sh)/ bitmap.height);
3267          glVertex2i(dx+w+surface.offset.x, dy+h+surface.offset.y);
3268
3269          glTexCoord2f((float)(sx)/ bitmap.width, (float)(sy+sh)/ bitmap.height);
3270          glVertex2i(dx+surface.offset.x, dy+h+surface.offset.y);
3271       }
3272
3273       glEnd();
3274
3275       glDisable(GL_TEXTURE_2D);
3276
3277       //glTranslate(0.375, 0.375, 0.0);
3278 #if !defined(__OLDX__)
3279       /*if(glBlendFuncSeparate)
3280          glBlendFuncSeparate(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA, GL_ONE, GL_ONE_MINUS_SRC_ALPHA);*/
3281 #endif
3282
3283    }
3284
3285    void Filter(Display display, Surface surface, Bitmap bitmap, int dx, int dy, int sx, int sy, int w, int h, int sw, int sh)
3286    {
3287       Stretch(display, surface, bitmap, dx, dy, sx, sy, w, h, sw, sh);
3288    }
3289
3290    void StretchDI(Display display, Surface surface, Bitmap bitmap, int dx, int dy, int sx, int sy, int w, int h, int sw, int sh)
3291    {
3292 #if !defined(EM_MODE)
3293       float s2dw,s2dh,d2sw,d2sh;
3294       //bool flipX = false, flipY = false;
3295
3296       //Logf("StretchDI\n");
3297
3298       if(Sgn(w) != Sgn(sw))
3299       {
3300          w = Abs(w);
3301          sw = Abs(sw);
3302          //flipX = true;
3303       }
3304       if(Sgn(h) != Sgn(sh))
3305       {
3306          h = Abs(h);
3307          sh = Abs(sh);
3308          //flipY = true;
3309       }
3310
3311       s2dw=(float)w / sw;
3312       s2dh=(float)h / sh;
3313       d2sw=(float)sw / w;
3314       d2sh=(float)sh / h;
3315
3316       //Clip against the edges of the source
3317       if(sx<0)
3318       {
3319          dx+=(int)((0-sx) * s2dw);
3320          w-=(int)((0-sx) * s2dw);
3321          sw-=0-sx;
3322          sx=0;
3323       }
3324       if(sy<0)
3325       {
3326          dy+=(int)((0-sy) * s2dh);
3327          h-=(int)((0-sy) * s2dh);
3328
3329          sh-=0-sy;
3330          sy=0;
3331       }
3332       if(sx+sw>bitmap.width-1)
3333       {
3334          w-=(int)((sx+sw-(bitmap.width-1)-1)*s2dw);
3335          sw-=sx+sw-(bitmap.width-1)-1;
3336       }
3337       if(sy+sh>(bitmap.height-1))
3338       {
3339          h-=(int)((sy+sh-(bitmap.height-1)-1)*s2dh);
3340          sh-=sy+sh-(bitmap.height-1)-1;
3341       }
3342       //Clip against the edges of the surfaceination
3343       if(dx<surface.box.left)
3344       {
3345          //if(!flip)
3346          sx+=(int)((surface.box.left-dx)*d2sw);
3347          sw-=(int)((surface.box.left-dx)*d2sw);
3348          w-=surface.box.left-dx;
3349          dx=surface.box.left;
3350       }
3351       if(dy<surface.box.top)
3352       {
3353          sy+=(int)((surface.box.top-dy)*d2sh);
3354          sh-=(int)((surface.box.top-dy)*d2sh);
3355          h-=surface.box.top-dy;
3356          dy=surface.box.top;
3357       }
3358       if(dx+w>surface.box.right)
3359       {
3360          //if(flip) sx+=(int)((dx+w-surface.box.right-1)*d2sw);
3361          sw-=(int)((dx+w-surface.box.right-1)*d2sw);
3362          w-=dx+w-surface.box.right-1;
3363       }
3364       if(dy+h>surface.box.bottom)
3365       {
3366          sh-=(int)((dy+h-surface.box.bottom-1)*d2sh);
3367          h-=dy+h-surface.box.bottom-1;
3368       }
3369       if((w<=0)||(h<=0)||(sw<=0)||(sh<=0)) return;
3370
3371       dx += surface.offset.x;
3372       dy += surface.offset.y;
3373
3374       if(bitmap.pixelFormat == pixelFormat888 && !bitmap.paletteShades)
3375       {
3376          glPixelStorei(GL_UNPACK_ALIGNMENT, 4);
3377          glPixelStorei(GL_UNPACK_ROW_LENGTH, bitmap.stride);
3378          glPixelStorei(GL_UNPACK_SKIP_PIXELS, sx);
3379          glPixelStorei(GL_UNPACK_SKIP_ROWS, sy);
3380          glRasterPos2d(dx,dy);
3381          //glPixelZoom(flipX ? -s2dw : s2dw, flipY ? s2dh : -s2dh);
3382          glPixelZoom(s2dw, -s2dh);
3383          glDrawPixels(sw,sh,GL_BGRA_EXT,GL_UNSIGNED_BYTE, bitmap.picture);
3384          glPixelStorei(GL_UNPACK_ALIGNMENT, 1);
3385          glPixelStorei(GL_UNPACK_ROW_LENGTH, 0);
3386          glPixelStorei(GL_UNPACK_SKIP_PIXELS, 0);
3387          glPixelStorei(GL_UNPACK_SKIP_ROWS, 0);
3388       }
3389 #endif
3390    }
3391
3392    void BlitDI(Display display, Surface surface, Bitmap bitmap, int dx, int dy, int sx, int sy, int w, int h)
3393    {
3394 #if !defined(EM_MODE)
3395       //Logf("BlitDI\n");
3396
3397       //Clip against the edges of the source
3398       if(sx<0)
3399       {
3400          dx+=-sx;
3401          w-=-sx;
3402          sx=0;
3403       }
3404       if(sy<0)
3405       {
3406          dy+=0-sy;
3407          h-=0-sy;
3408          sy=0;
3409       }
3410       if(sx+w>bitmap.width-1)
3411          w-=sx+w-(bitmap.width-1)-1;
3412       if(sy+h>bitmap.height-1)
3413          h-=sy+h-(bitmap.height-1)-1;
3414       //Clip against the edges of the surfaceination
3415       if(dx<surface.box.left)
3416       {
3417          //if(!flip)
3418          sx+=surface.box.left-dx;
3419          w-=surface.box.left-dx;
3420          dx=surface.box.left;
3421       }
3422       if(dy<surface.box.top)
3423       {
3424          sy+=surface.box.top-dy;
3425          h-=surface.box.top-dy;
3426          dy=surface.box.top;
3427       }
3428       if(dx+w>surface.box.right)
3429       {
3430          //if(flip) sx+=dx+w-surface.box.right-1;
3431          w-=dx+w-surface.box.right-1;
3432       }
3433       if(dy+h>surface.box.bottom)
3434          h-=dy+h-surface.box.bottom-1;
3435       if((w<=0)||(h<=0))
3436          return;
3437
3438       dx += surface.offset.x;
3439       dy += surface.offset.y;
3440
3441       if(bitmap.pixelFormat == pixelFormat888 && !bitmap.paletteShades)
3442       {
3443          glPixelStorei(GL_UNPACK_ALIGNMENT, 4);
3444          glPixelStorei(GL_UNPACK_ROW_LENGTH, bitmap.stride);
3445          glPixelStorei(GL_UNPACK_SKIP_PIXELS, sx);
3446          glPixelStorei(GL_UNPACK_SKIP_ROWS, sy);
3447          glRasterPos2d(dx,dy);
3448          glPixelZoom(1,-1);
3449          glDrawPixels(w,h,GL_BGRA_EXT,GL_UNSIGNED_BYTE, bitmap.picture);
3450          glPixelStorei(GL_UNPACK_ALIGNMENT, 1);
3451          glPixelStorei(GL_UNPACK_ROW_LENGTH, 0);
3452          glPixelStorei(GL_UNPACK_SKIP_PIXELS, 0);
3453          glPixelStorei(GL_UNPACK_SKIP_ROWS, 0);
3454       }
3455 #endif
3456    }
3457
3458    void FilterDI(Display display, Surface surface, Bitmap bitmap, int dx, int dy, int sx, int sy, int w, int h, int sw, int sh)
3459    {
3460       StretchDI(display, surface, bitmap, dx, dy, sx, sy, w, h, sw, sh);
3461    }
3462
3463    void UnloadFont(DisplaySystem displaySystem, Font font)
3464    {
3465       ((subclass(DisplayDriver))class(LFBDisplayDriver)).UnloadFont(displaySystem, font);
3466    }
3467
3468    Font LoadFont(DisplaySystem displaySystem, const char * faceName, float size, FontFlags flags)
3469    {
3470       Font font;
3471       OGLSystem oglSystem = displaySystem.driverData;
3472       oglSystem.loadingFont = true;
3473       font = ((subclass(DisplayDriver))class(LFBDisplayDriver)).LoadFont(displaySystem, faceName, size, flags);
3474       return font;
3475    }
3476
3477    void FontExtent(DisplaySystem displaySystem, Font font, const char * text, int len, int * width, int * height)
3478    {
3479       ((subclass(DisplayDriver))class(LFBDisplayDriver)).FontExtent(displaySystem, font, text, len, width, height);
3480    }
3481
3482    void WriteText(Display display, Surface surface, int x, int y, const char * text, int len)
3483    {
3484       OGLSurface oglSurface = surface.driverData;
3485       OGLSystem oglSystem = display.displaySystem.driverData;
3486       oglSystem.loadingFont = true;
3487
3488       //glTranslated(-0.375, -0.375, 0.0);
3489
3490       //Logf("Blit\n");
3491
3492       if(surface.textOpacity)
3493       {
3494          int w, h;
3495          FontExtent(display.displaySystem, surface.font, text, len, &w, &h);
3496          display.displaySystem.driver.Area(display, surface,x,y,x+w-1,y+h-1);
3497       }
3498
3499       oglSurface.writingText = true;
3500
3501       glEnable(GL_TEXTURE_2D);
3502
3503       if(surface.outline.size)
3504       {
3505          ColorAlpha outlineColor = surface.outline.color;
3506          glColor4ub(outlineColor.color.r, outlineColor.color.g, outlineColor.color.b, outlineColor.a);
3507          //glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
3508          //glEnable(GL_BLEND);
3509
3510          oglSurface.writingOutline = true;
3511          ((subclass(DisplayDriver))class(LFBDisplayDriver)).WriteText(display, surface, x, y, text, len);
3512          oglSurface.writingOutline = false;
3513       }
3514       glColor4fv(oglSurface.foreground);
3515
3516       ((subclass(DisplayDriver))class(LFBDisplayDriver)).WriteText(display, surface, x, y, text, len);
3517       oglSurface.writingText = false;
3518       oglSystem.loadingFont = false;
3519
3520       glDisable(GL_TEXTURE_2D);
3521
3522       //glTranslated(0.375, 0.375, 0.0);
3523    }
3524
3525    void TextFont(Display display, Surface surface, Font font)
3526    {
3527       ((subclass(DisplayDriver))class(LFBDisplayDriver)).TextFont(display, surface, font);
3528    }
3529
3530    void TextOpacity(Display display, Surface surface, bool opaque)
3531    {
3532       OGLSurface oglSurface = surface.driverData;
3533       oglSurface.opaqueText = opaque;
3534    }
3535
3536    void TextExtent(Display display, Surface surface, const char * text, int len, int * width, int * height)
3537    {
3538       OGLSurface oglSurface = surface.driverData;
3539       OGLSystem oglSystem = display.displaySystem.driverData;
3540       oglSystem.loadingFont = true;
3541       FontExtent(display.displaySystem, oglSurface.font, text, len, width, height);
3542       oglSystem.loadingFont = false;
3543    }
3544
3545    void DrawingChar(Display display, Surface surface, char character)
3546    {
3547
3548    }
3549
3550    void LineStipple(Display display, Surface surface, uint32 stipple)
3551    {
3552       //Logf("Stipple\n");
3553
3554       if(stipple)
3555       {
3556 #if defined(_GLES) || defined(EM_MODE)
3557          stippleEnabled = true;
3558          glesLineStipple(1, (uint16)stipple);
3559 #else
3560          glLineStipple(1, (uint16)stipple);
3561          glEnable(GL_LINE_STIPPLE);
3562 #endif
3563       }
3564       else
3565       {
3566 #if defined(_GLES) || defined(EM_MODE)
3567          stippleEnabled = false;
3568          glMatrixMode(GL_TEXTURE);
3569          glLoadIdentity();
3570          glMatrixMode(GL_PROJECTION);
3571          glDisable(GL_TEXTURE_2D);
3572 #else
3573          glDisable(GL_LINE_STIPPLE);
3574 #endif
3575       }
3576    }
3577 #if !defined(ECERE_NO3D) && !defined(ECERE_VANILLA)
3578    void SetRenderState(Display display, RenderState state, uint value)
3579    {
3580       OGLDisplay oglDisplay = display.driverData;
3581       //Logf("RenderState\n");
3582
3583       switch(state)
3584       {
3585          case antiAlias:
3586             if(value)
3587                glEnable(GL_MULTISAMPLE_ARB);
3588             else
3589                glDisable(GL_MULTISAMPLE_ARB);
3590             break;
3591          case fillMode:
3592 #if !defined(_GLES)
3593             glPolygonMode(GL_FRONT_AND_BACK, ((FillModeValue)value == solid) ? GL_FILL : GL_LINE);
3594 #endif
3595             break;
3596          case depthTest:
3597             if(value) glEnable(GL_DEPTH_TEST); else glDisable(GL_DEPTH_TEST);
3598             break;
3599          case depthWrite:
3600             if(value) glDepthMask((byte)bool::true); else glDepthMask((byte)bool::false);
3601             oglDisplay.depthWrite = (bool)value;
3602             break;
3603          case fogColor:
3604          {
3605             float color[4] = { ((Color)value).r/255.0f, ((Color)value).g/255.0f, ((Color)value).b/255.0f, 1.0f };
3606             glFogfv(GL_FOG_COLOR, (float *)&color);
3607             break;
3608          }
3609          case fogDensity:
3610             glFogf(GL_FOG_DENSITY, (float)(RenderStateFloat { ui = value }.f * nearPlane));
3611             break;
3612          case blend:
3613             if(value) glEnable(GL_BLEND); else glDisable(GL_BLEND);
3614             break;
3615          case ambient:
3616          {
3617 #if !defined(EM_MODE)
3618             float ambient[4] = { ((Color)value).r/255.0f, ((Color)value).g/255.0f, ((Color)value).b/255.0f, 1.0f };
3619             glLightModelfv(GL_LIGHT_MODEL_AMBIENT, ambient);
3620 #endif
3621             break;
3622          }
3623          case alphaWrite:
3624          {
3625             if(value) glColorMask(1,1,1,1); else glColorMask(1,1,1,0);
3626             break;
3627          }
3628          case vSync:
3629          {
3630 #if defined(__WIN32__)
3631             wglSwapIntervalEXT(value ? 1 : 0);
3632 #endif
3633             break;
3634          }
3635       }
3636    }
3637
3638    void SetLight(Display display, int id, Light light)
3639    {
3640 #if !defined(EM_MODE)
3641       //Logf("SetLight\n");
3642
3643       if(light != null)
3644       {
3645          Object lightObject = light.lightObject;
3646          float position[4] = { 0, 0, 0, 0 };
3647          float color[4] = { 0, 0, 0, 1 };
3648
3649          glEnable(GL_LIGHT0 + id);
3650          /*
3651          glLightfv(GL_LIGHT0 + id, GL_DIFFUSE, (float *)&light.diffuse);
3652          glLightfv(GL_LIGHT0 + id, GL_AMBIENT, (float *)&light.ambient);
3653          glLightfv(GL_LIGHT0 + id, GL_SPECULAR,(float *)&light.specular);
3654          */
3655
3656          if(!light.multiplier) light.multiplier = 1.0f;
3657
3658          color[0] = light.diffuse.r * light.multiplier;
3659          color[1] = light.diffuse.g * light.multiplier;
3660          color[2] = light.diffuse.b * light.multiplier;
3661          glLightfv(GL_LIGHT0 + id, GL_DIFFUSE, color);
3662
3663          color[0] = light.ambient.r * light.multiplier;
3664          color[1] = light.ambient.g * light.multiplier;
3665          color[2] = light.ambient.b * light.multiplier;
3666          glLightfv(GL_LIGHT0 + id, GL_AMBIENT, color);
3667          color[0] = light.specular.r * light.multiplier;
3668          color[1] = light.specular.g * light.multiplier;
3669          color[2] = light.specular.b * light.multiplier;
3670          glLightfv(GL_LIGHT0 + id, GL_SPECULAR,color);
3671
3672          if(lightObject)
3673          {
3674             Vector3D positionVector;
3675             if(light.flags.spot)
3676             {
3677                if(lightObject.flags.root || !lightObject.parent)
3678                {
3679                   positionVector = lightObject.transform.position;
3680                   positionVector.Subtract(positionVector, display.display3D.camera.cPosition);
3681                }
3682                else
3683                {
3684                   positionVector.MultMatrix(lightObject.transform.position, lightObject.parent.matrix);
3685                   if(display.display3D.camera)
3686                      positionVector.Subtract(positionVector, display.display3D.camera.cPosition);
3687                }
3688                position[3] = 1;
3689             }
3690             else
3691             {
3692                if(!light.direction.x && !light.direction.y && !light.direction.z)
3693                {
3694                   Vector3Df vector { 0,0,-1 };
3695                   Matrix mat;
3696                   mat.RotationQuaternion(light.orientation);
3697                   positionVector.MultMatrixf(vector, mat);
3698                }
3699                else
3700                {
3701                   positionVector = light.direction;
3702                   position[3] = 1;
3703                }
3704             }
3705
3706             position[0] = (float)positionVector.x;
3707             position[1] = (float)positionVector.y;
3708             position[2] = (float)positionVector.z;
3709
3710             glLightfv(GL_LIGHT0 + id, GL_POSITION, position);
3711
3712             /*
3713             // Display Light Position
3714             glDisable(GL_LIGHTING);
3715             glDisable(GL_DEPTH_TEST);
3716             glColor3f(1,1,1);
3717             glPointSize(10);
3718             glBegin(GL_POINTS);
3719             glVertex3fv(position);
3720             glEnd();
3721             glEnable(GL_DEPTH_TEST);
3722             glEnable(GL_LIGHTING);
3723
3724
3725             // Display Target
3726             if(lightObject.flags.root || !lightObject.parent)
3727             {
3728                positionVector = light.target.transform.position;
3729                positionVector.Subtract(positionVector, display.camera.cPosition);
3730             }
3731             else
3732             {
3733                positionVector.MultMatrix(light.target.transform.position,
3734                   lightObject.light.target.parent.matrix);
3735                positionVector.Subtract(positionVector, display.camera.cPosition);
3736             }
3737
3738             position[0] = positionVector.x;
3739             position[1] = positionVector.y;
3740             position[2] = positionVector.z;
3741
3742             glDisable(GL_LIGHTING);
3743             glDisable(GL_DEPTH_TEST);
3744             glColor3f(1,1,0);
3745             glPointSize(10);
3746             glBegin(GL_POINTS);
3747             glVertex3fv(position);
3748             glEnd();
3749             glEnable(GL_DEPTH_TEST);
3750             glEnable(GL_LIGHTING);
3751             */
3752
3753             if(light.flags.attenuation)
3754             {
3755                glLightf(GL_LIGHT0 + id, GL_CONSTANT_ATTENUATION, light.Kc);
3756                glLightf(GL_LIGHT0 + id, GL_LINEAR_ATTENUATION, light.Kl);
3757                glLightf(GL_LIGHT0 + id, GL_QUADRATIC_ATTENUATION, light.Kq);
3758             }
3759
3760             if(light.flags.spot)
3761             {
3762                float exponent = 0;
3763                #define MAXLIGHT  0.9
3764                float direction[4] = { (float)light.direction.x, (float)light.direction.y, (float)light.direction.z, 1 };
3765                // Figure out exponent out of the hot spot
3766                exponent = (float)(log(MAXLIGHT) / log(cos((light.hotSpot / 2))));
3767
3768                glLightfv(GL_LIGHT0 + id, GL_SPOT_DIRECTION, direction);
3769                glLightf(GL_LIGHT0 + id, GL_SPOT_CUTOFF, (float)(light.fallOff / 2));
3770                glLightf(GL_LIGHT0 + id, GL_SPOT_EXPONENT, exponent);
3771             }
3772          }
3773          else
3774          {
3775
3776             Vector3Df vector { 0,0,-1 };
3777             Vector3Df direction;
3778             Matrix mat;
3779
3780             mat.RotationQuaternion(light.orientation);
3781             direction.MultMatrix(vector, mat);
3782
3783             position[0] = direction.x;
3784             position[1] = direction.y;
3785             position[2] = direction.z;
3786
3787             glLightfv(GL_LIGHT0 + id, GL_POSITION, position);
3788          }
3789       }
3790       else
3791          glDisable(GL_LIGHT0 + id);
3792 #endif
3793    }
3794
3795    void SetCamera(Display display, Surface surface, Camera camera)
3796    {
3797       OGLDisplay oglDisplay = display.driverData;
3798       //Logf("SetCamera\n");
3799
3800       if(camera)
3801       {
3802          int left = surface.box.left + surface.offset.x;
3803          int top = surface.box.top  + surface.offset.y;
3804          int right = surface.box.right + surface.offset.x;
3805          int bottom = surface.box.bottom + surface.offset.y;
3806          float origX = surface.offset.x + camera.origin.x;
3807          float origY = surface.offset.y + camera.origin.y;
3808          int x = left;
3809          int y = display.height - bottom - 1;
3810          int w = right - left + 1;
3811          int h = bottom - top + 1;
3812
3813          // *** ViewPort ***
3814          glViewport(x, y, w, h);
3815
3816          // *** Projection Matrix ***
3817          glMatrixMode(GL_PROJECTION);
3818          if(!display.display3D.camera)
3819             glPushMatrix();
3820
3821          if(display.display3D.collectingHits)
3822          {
3823             float pickX = display.display3D.pickX + surface.offset.x;
3824             float pickY = display.height - (display.display3D.pickY + surface.offset.y) - 1;
3825             Matrix pickMatrix
3826             {
3827                {
3828                   w / display.display3D.pickWidth, 0, 0, 0,
3829                   0, h / display.display3D.pickHeight, 0, 0,
3830                   0, 0, 1, 0,
3831                   (w + 2.0f * (x - pickX)) / display.display3D.pickWidth,
3832                   (h + 2.0f * (y - pickY)) / display.display3D.pickHeight, 0, 1
3833                }
3834             };
3835             glLoadMatrixd(pickMatrix.array);
3836          }
3837          else
3838             glLoadIdentity();
3839          glFrustum(
3840             (left   - origX) * camera.zMin / camera.focalX,
3841             (right  - origX) * camera.zMin / camera.focalX,
3842             (bottom - origY) * camera.zMin / camera.focalY,
3843             (top    - origY) * camera.zMin / camera.focalY,
3844             camera.zMin, camera.zMax);
3845
3846          glDisable(GL_BLEND);
3847
3848          // *** Z Inverted Identity Matrix ***
3849          glMatrixMode(GL_MODELVIEW);
3850          if(!display.display3D.camera)
3851             glPushMatrix();
3852
3853          glLoadIdentity();
3854
3855          glScaled(1.0/nearPlane, 1.0/nearPlane, -1.0/nearPlane);
3856
3857          // *** View Matrix ***
3858          glMultMatrixd(camera.viewMatrix.array);
3859
3860          // *** Lights ***
3861          // ...
3862
3863          glEnable(GL_DEPTH_TEST);
3864 //#if !defined(EM_MODE)
3865          glEnable(GL_LIGHTING);
3866          glShadeModel(GL_SMOOTH);
3867 //#endif
3868          glDepthMask((byte)bool::true);
3869          oglDisplay.depthWrite = true;
3870
3871          glEnable(GL_MULTISAMPLE_ARB);
3872       }
3873       else if(display.display3D.camera)
3874       {
3875          oglDisplay.depthWrite = false;
3876          glViewport(0,0,display.width,display.height);
3877
3878          glDisable(GL_CULL_FACE);
3879          glDisable(GL_DEPTH_TEST);
3880          glDisable(GL_LIGHTING);
3881          glDisable(GL_FOG);
3882          glDisable(GL_TEXTURE_2D);
3883 //#if !defined(EM_MODE)
3884          glShadeModel(GL_FLAT);
3885 //#endif
3886          glEnable(GL_BLEND);
3887          glDisable(GL_MULTISAMPLE_ARB);
3888
3889          // *** Restore 2D MODELVIEW Matrix ***
3890          glPopMatrix();
3891
3892          // *** Restore 2D PROJECTION Matrix ***
3893          glMatrixMode(GL_PROJECTION);
3894          glPopMatrix();
3895       }
3896
3897    }
3898
3899    void ApplyMaterial(Display display, Material material, Mesh mesh)
3900    {
3901       //Logf("ApplyMaterial\n");
3902
3903       // Basic Properties
3904       if(material.flags.doubleSided)
3905       {
3906 #if !defined(EM_MODE)
3907          glLightModeli(GL_LIGHT_MODEL_TWO_SIDE, !material.flags.singleSideLight);
3908 #endif
3909          glDisable(GL_CULL_FACE);
3910       }
3911       else
3912       {
3913 #if !defined(EM_MODE)
3914          glLightModeli(GL_LIGHT_MODEL_TWO_SIDE, bool::false);
3915 #endif
3916          glEnable(GL_CULL_FACE);
3917       }
3918
3919       // Fog
3920       if(material.flags.noFog)
3921          glDisable(GL_FOG);
3922       else
3923          glEnable(GL_FOG);
3924
3925       // Maps
3926       if(material.baseMap && (mesh.texCoords || mesh.flags.texCoords1))
3927       {
3928          Bitmap map = material.baseMap;
3929          glEnable(GL_TEXTURE_2D);
3930          glBindTexture(GL_TEXTURE_2D, (GLuint)(uintptr)map.driverData);
3931
3932          glMatrixMode(GL_TEXTURE);
3933          glLoadIdentity();
3934          if(material.uScale && material.vScale)
3935             glScalef(material.uScale, material.vScale, 1);
3936          glMatrixMode(GL_MODELVIEW);
3937
3938          if(material.flags.tile)
3939          {
3940             glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT);
3941             glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT);
3942          }
3943          else
3944          {
3945             glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
3946             glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
3947          }
3948       }
3949       else
3950          glDisable(GL_TEXTURE_2D);
3951
3952 #ifdef EM_MODE
3953       glColor4f(material.diffuse.r, material.diffuse.g, material.diffuse.b, material.opacity);
3954 #else
3955       if(mesh.flags.colors)
3956       {
3957          glColorMaterial(GL_FRONT_AND_BACK, GL_AMBIENT_AND_DIFFUSE);
3958          glEnable(GL_COLOR_MATERIAL);
3959       }
3960       else
3961       {
3962          glDisable(GL_COLOR_MATERIAL);
3963          {
3964             float color[4] = { material.diffuse.r, material.diffuse.g, material.diffuse.b, material.opacity };
3965             glMaterialfv(GL_FRONT_AND_BACK, GL_DIFFUSE, color);
3966          }
3967          {
3968             float color[4] = { material.ambient.r, material.ambient.g, material.ambient.b, 0 };
3969             glMaterialfv(GL_FRONT_AND_BACK, GL_AMBIENT, color);
3970          }
3971       }
3972       {
3973          float color[4] = { material.specular.r, material.specular.g, material.specular.b, 0 };
3974          glMaterialfv(GL_FRONT_AND_BACK, GL_SPECULAR, color);
3975       }
3976       {
3977          float color[4] = { material.emissive.r, material.emissive.g, material.emissive.b, 0 };
3978          glMaterialfv(GL_FRONT_AND_BACK, GL_EMISSION, color);
3979       }
3980
3981       glMaterialfv(GL_FRONT_AND_BACK, GL_SHININESS, &material.power);
3982 #endif
3983    }
3984
3985    void FreeMesh(DisplaySystem displaySystem, Mesh mesh)
3986    {
3987       OGLMesh oglMesh = mesh.data;
3988       if(oglMesh)
3989       {
3990          if(!mesh.flags.vertices)
3991          {
3992             oglMesh.vertices.free();
3993             delete mesh.vertices;
3994          }
3995          if(!mesh.flags.normals)
3996          {
3997             oglMesh.normals.free();
3998             delete mesh.normals;
3999          }
4000          if(!mesh.flags.texCoords1)
4001          {
4002             oglMesh.texCoords.free();
4003             delete mesh.texCoords;
4004          }
4005          if(!mesh.flags.texCoords2)
4006          {
4007             oglMesh.texCoords2.free();
4008             // delete mesh.texCoords2;
4009          }
4010          if(!mesh.flags.colors)
4011          {
4012             oglMesh.colors.free();
4013             delete mesh.colors;
4014          }
4015          if(!mesh.flags)
4016          {
4017             delete oglMesh;
4018             mesh.data = null;
4019          }
4020       }
4021    }
4022
4023    bool AllocateMesh(DisplaySystem displaySystem, Mesh mesh, MeshFeatures flags, int nVertices)
4024    {
4025       bool result = false;
4026
4027       if(!mesh.data)
4028          mesh.data = OGLMesh { };
4029       if(mesh.data)
4030       {
4031          if(mesh.nVertices == nVertices)
4032          {
4033             // Same number of vertices, adding features (Leaves the other features pointers alone)
4034             if(mesh.flags != flags)
4035             {
4036                if(!mesh.flags.vertices && flags.vertices)
4037                {
4038                   if(flags.doubleVertices)
4039                   {
4040                      mesh.vertices = (Vector3Df *)new Vector3D[nVertices];
4041                   }
4042                   else
4043                      mesh.vertices = new Vector3Df[nVertices];
4044                }
4045                if(!mesh.flags.normals && flags.normals)
4046                {
4047                   if(flags.doubleNormals)
4048                   {
4049                      mesh.normals = (Vector3Df *)new Vector3D[nVertices];
4050                   }
4051                   else
4052                      mesh.normals = new Vector3Df[nVertices];
4053                }
4054                if(!mesh.flags.texCoords1 && flags.texCoords1)
4055                {
4056                   mesh.texCoords = new Pointf[nVertices];
4057                }
4058                if(!mesh.flags.colors && flags.colors)
4059                {
4060                   mesh.colors = new ColorRGBAf[nVertices];
4061                }
4062             }
4063          }
4064          else
4065          {
4066             // New number of vertices, reallocate all current and new features
4067             flags |= mesh.flags;
4068             if(flags.vertices)
4069             {
4070                if(flags.doubleVertices)
4071                {
4072                   mesh.vertices = (Vector3Df *)renew mesh.vertices Vector3D[nVertices];
4073                }
4074                else
4075                   mesh.vertices = renew mesh.vertices Vector3Df[nVertices];
4076             }
4077             if(flags.normals)
4078             {
4079                if(flags.doubleNormals)
4080                {
4081                   mesh.normals = (Vector3Df *)renew mesh.normals Vector3D[nVertices];
4082                }
4083                else
4084                   mesh.normals = renew mesh.normals Vector3Df[nVertices];
4085             }
4086             if(flags.texCoords1)
4087             {
4088                mesh.texCoords = renew mesh.texCoords Pointf[nVertices];
4089             }
4090             if(flags.colors)
4091             {
4092                mesh.colors = renew mesh.colors ColorRGBAf[nVertices];
4093             }
4094          }
4095          result = true;
4096       }
4097       return result;
4098    }
4099
4100    void UnlockMesh(DisplaySystem displaySystem, Mesh mesh, MeshFeatures flags)
4101    {
4102       OGLMesh oglMesh = mesh.data;
4103       if(!flags) flags = mesh.flags;
4104
4105       if(vboAvailable)
4106       {
4107          if(flags.vertices)
4108             oglMesh.vertices.upload(
4109                mesh.nVertices * (mesh.flags.doubleVertices ? sizeof(Vector3D) : sizeof(Vector3Df)), mesh.vertices); //, GL_STATIC_DRAW_ARB );
4110
4111          if(flags.normals)
4112             oglMesh.normals.upload(
4113                mesh.nVertices * (mesh.flags.doubleNormals ? sizeof(Vector3D) : sizeof(Vector3Df)), mesh.normals); //, GL_STATIC_DRAW_ARB );
4114
4115          if(flags.texCoords1)
4116             oglMesh.texCoords.upload(
4117                mesh.nVertices * sizeof(Pointf), mesh.texCoords); //, GL_STATIC_DRAW_ARB );
4118
4119          if(flags.colors)
4120             oglMesh.colors.upload(
4121                mesh.nVertices * sizeof(ColorRGBAf), mesh.colors); //, GL_STATIC_DRAW_ARB );
4122       }
4123    }
4124
4125    bool LockMesh(DisplaySystem displaySystem, Mesh mesh, MeshFeatures flags)
4126    {
4127       bool result = true;
4128
4129         return result;
4130    }
4131
4132    void FreeIndices(DisplaySystem displaySystem, OGLIndices oglIndices)
4133    {
4134       if(oglIndices)
4135       {
4136          oglIndices.buffer.free();
4137          delete oglIndices.indices;
4138          delete oglIndices;
4139       }
4140    }
4141
4142    void * AllocateIndices(DisplaySystem displaySystem, int nIndices, bool indices32bit)
4143    {
4144       OGLIndices oglIndices = OGLIndices { };
4145       if(oglIndices)
4146       {
4147          oglIndices.indices = (void *)(indices32bit ? new uint32[nIndices] : new uint16[nIndices]);
4148          oglIndices.nIndices = nIndices;
4149       }
4150       return oglIndices;
4151    }
4152
4153    void UnlockIndices(DisplaySystem displaySystem, OGLIndices oglIndices, bool indices32bit, int nIndices)
4154    {
4155       if(vboAvailable)
4156       {
4157 #ifdef _GLES
4158          if(indices32bit)
4159          {
4160             if(!oglIndices.buffer.buffer)
4161                GLGenBuffers(1, (GLAB *)&oglIndices.buffer);
4162             if(curElementBuffer != oglIndices.buffer.buffer)
4163                GLBindBuffer(GL_ELEMENT_ARRAY_BUFFER, oglIndices.buffer.buffer);
4164             glesBufferDatai(GL_ELEMENT_ARRAY_BUFFER, sizeof(uint32) * nIndices, oglIndices.indices, GL_STATIC_DRAW_ARB);
4165          }
4166          else
4167 #endif
4168          oglIndices.buffer.upload(
4169             nIndices * (indices32bit ? sizeof(uint32) : sizeof(uint16)),
4170             oglIndices.indices); //GL_STATIC_DRAW_ARB);
4171       }
4172    }
4173
4174    uint16 * LockIndices(DisplaySystem displaySystem, OGLIndices oglIndices)
4175    {
4176
4177       return oglIndices.indices;
4178    }
4179
4180    void SelectMesh(Display display, Mesh mesh)
4181    {
4182       //Logf("SelectMesh\n");
4183
4184 #if !defined( __ANDROID__) && !defined(__APPLE__) && !defined(__EMSCRIPTEN__) && !defined(__ODROID__)
4185
4186 #if defined(__WIN32__)
4187       if(glUnlockArraysEXT)
4188 #endif
4189          if(!vboAvailable && display.display3D.mesh)
4190             glUnlockArraysEXT();
4191
4192 #endif
4193       if(mesh)
4194       {
4195          OGLMesh oglMesh = mesh.data;
4196
4197          // *** Vertex Stream ***
4198          glEnableClientState(GL_VERTEX_ARRAY);
4199          if(!display.display3D.collectingHits && oglMesh)
4200          {
4201             oglMesh.vertices.use(vertex, 3, (mesh.flags.doubleVertices ? GL_DOUBLE : GL_FLOAT), 0, oglMesh.vertices.buffer ? null : (double *)mesh.vertices);
4202
4203             // *** Normals Stream ***
4204             if(mesh.normals || mesh.flags.normals)
4205             {
4206                glEnableClientState(GL_NORMAL_ARRAY);
4207                oglMesh.normals.use(normal, 3, GL_FLOAT, 0, oglMesh.normals.buffer ? null : mesh.normals);
4208             }
4209             else
4210                glDisableClientState(GL_NORMAL_ARRAY);
4211
4212             // *** Texture Coordinates Stream ***
4213             if(mesh.texCoords || mesh.flags.texCoords1)
4214             {
4215                glEnableClientState(GL_TEXTURE_COORD_ARRAY);
4216                oglMesh.texCoords.use(texCoord, 2, GL_FLOAT, 0, oglMesh.texCoords.buffer ? null : mesh.texCoords);
4217             }
4218             else
4219                glDisableClientState(GL_TEXTURE_COORD_ARRAY);
4220
4221             // *** Color Stream ***
4222             if(mesh.colors || mesh.flags.colors)
4223             {
4224                glEnableClientState(GL_COLOR_ARRAY);
4225                oglMesh.colors.use(color, 4, GL_FLOAT, 0, oglMesh.colors.buffer ? null : mesh.colors);
4226             }
4227             else
4228                glDisableClientState(GL_COLOR_ARRAY);
4229          }
4230          else
4231          {
4232             noAB.use(vertex, 3, (mesh.flags.doubleVertices ? GL_DOUBLE : GL_FLOAT), 0, (double *)mesh.vertices);
4233             if((mesh.normals || mesh.flags.normals) && !display.display3D.collectingHits)
4234             {
4235                glEnableClientState(GL_NORMAL_ARRAY);
4236                noAB.use(normal, 3, GL_FLOAT, 0, mesh.normals);
4237             }
4238             else
4239                glDisableClientState(GL_NORMAL_ARRAY);
4240             if((mesh.texCoords || mesh.flags.texCoords1) && !display.display3D.collectingHits)
4241             {
4242                glEnableClientState(GL_TEXTURE_COORD_ARRAY);
4243                noAB.use(texCoord, 2, GL_FLOAT, 0, mesh.texCoords);
4244             }
4245             else
4246                glDisableClientState(GL_TEXTURE_COORD_ARRAY);
4247             if((mesh.colors || mesh.flags.colors) && !display.display3D.collectingHits)
4248             {
4249                glEnableClientState(GL_COLOR_ARRAY);
4250                noAB.use(color, 4, GL_FLOAT, 0, mesh.colors);
4251             }
4252             else
4253                glDisableClientState(GL_COLOR_ARRAY);
4254          }
4255
4256 #if !defined(__ANDROID__) && !defined(__APPLE__) && !defined(__EMSCRIPTEN__) && !defined(__ODROID__)
4257
4258 #if defined(__WIN32__)
4259          if(glLockArraysEXT)
4260 #endif
4261             if(!vboAvailable)
4262                glLockArraysEXT(0, mesh.nVertices);
4263
4264 #endif
4265       }
4266    }
4267
4268    void DrawPrimitives(Display display, PrimitiveSingle * primitive, Mesh mesh)
4269    {
4270       //Logf("DrawPrimitives\n");
4271
4272       if(primitive->type.vertexRange)
4273          glDrawArrays(primitiveTypes[primitive->type.primitiveType], primitive->first, primitive->nVertices);
4274       else
4275       {
4276          //    *** Hoping the data won't be uploaded at all (Won't really work if another group of the mesh is using the mesh ) ***
4277          // HACK TO SPEED THINGS UP...
4278 #ifndef __ANDROID__
4279          /*GLBindBuffer(GL_ELEMENT_ARRAY_BUFFER_ARB, 0);
4280          if(primitive->nIndices < (mesh.nVertices >> 2) && !primitive->type.indices32bit)
4281          {
4282             int c;
4283             glBegin(primitiveTypes[primitive->type.primitiveType]);
4284             if(primitive->data)
4285             {
4286                OGLIndices oglIndices = primitive->data;
4287                MeshFeatures flags = mesh.flags;
4288                for(c = 0; c<primitive->nIndices; c++)
4289                {
4290                   uint16 index = ((uint16 *) oglIndices.indices)[c];
4291                   if(flags.normals) glNormal3fv((float *)&mesh.normals[index]);
4292                   if(flags.texCoords1) glTexCoord2fv((float *)&mesh.texCoords[index]);
4293                   if(flags.colors) glColor4fv((float *)&mesh.colors[index]);
4294                   glVertex3fv((float *)&mesh.vertices[index]);
4295                }
4296             }
4297             glEnd();
4298          }
4299          else*/
4300 #endif
4301
4302          {
4303             OGLIndices oglIndices = primitive->data;
4304             GLEAB eab = ((!display.display3D.collectingHits && oglIndices) ? oglIndices.buffer : noEAB);
4305
4306             eab.draw(primitiveTypes[primitive->type.primitiveType], primitive->nIndices,
4307                primitive->type.indices32bit ? GL_UNSIGNED_INT : GL_UNSIGNED_SHORT,
4308                eab.buffer ? 0 : (oglIndices ? oglIndices.indices : primitive->indices));
4309             GLBindBuffer(GL_ELEMENT_ARRAY_BUFFER, 0);
4310          }
4311       }
4312    }
4313
4314    void PushMatrix(Display display)
4315    {
4316       glPushMatrix();
4317    }
4318
4319    void PopMatrix(Display display, bool setMatrix)
4320    {
4321       glPopMatrix();
4322    }
4323
4324    void SetTransform(Display display, Matrix transMatrix, bool viewSpace, bool useCamera)
4325    {
4326       Matrix matrix = transMatrix;
4327       Camera camera = useCamera ? display.display3D.camera : null;
4328
4329       if(viewSpace)
4330       {
4331          glLoadIdentity();
4332          glScaled(1.0/nearPlane, 1.0/nearPlane, -1.0/nearPlane);
4333       }
4334       else if(camera)
4335       {
4336          glTranslated(
4337             matrix.m[3][0] - camera.cPosition.x,
4338             matrix.m[3][1] - camera.cPosition.y,
4339             matrix.m[3][2] - camera.cPosition.z);
4340       }
4341       else
4342          glTranslated(
4343             matrix.m[3][0],
4344             matrix.m[3][1],
4345             matrix.m[3][2]);
4346
4347       matrix.m[3][0] = 0;
4348       matrix.m[3][1] = 0;
4349       matrix.m[3][2] = 0;
4350
4351       glMultMatrixd(matrix.array);
4352    }
4353 #endif
4354 }
4355
4356 public void UseSingleGLContext(bool useSingle)
4357 {
4358    useSingleGLContext = useSingle;
4359 }
4360
4361 default dllexport void *
4362 #if defined(__WIN32__)
4363 __attribute__((stdcall))
4364 #endif
4365 IS_GLGetContext(DisplaySystem displaySystem)
4366 {
4367    if(displaySystem)
4368    {
4369 #if defined(__WIN32__)
4370       OGLSystem system = displaySystem.driverData;
4371       return system.glrc;
4372 #elif defined(__ANDROID__) || defined(__ODROID__)
4373       return eglContext;
4374 #elif defined(__EMSCRIPTEN__)
4375 #else
4376       OGLSystem system = displaySystem.driverData;
4377       return system.glContext;
4378 #endif
4379    }
4380    return null;
4381 }
4382
4383 #endif