12 #include "../stdafx.h"
25 #define GL_GLEXT_PROTOTYPES
26 #if defined(__APPLE__)
27 # include <OpenGL/gl3.h>
31 #include "../3rdparty/opengl/glext.h"
34 #include "../core/geometry_func.hpp"
35 #include "../core/mem_func.hpp"
36 #include "../core/math_func.hpp"
37 #include "../core/mem_func.hpp"
38 #include "../gfx_func.h"
40 #include "../blitter/factory.hpp"
41 #include "../zoom_func.h"
45 #include "../table/opengl_shader.h"
46 #include "../table/sprites.h"
49 #include "../safeguards.h"
54 #define GL(function) static decltype(&function) _ ## function
59 GL(glDebugMessageControl);
60 GL(glDebugMessageCallback);
89 GL(glClearBufferSubData);
97 GL(glGenVertexArrays);
98 GL(glDeleteVertexArrays);
99 GL(glBindVertexArray);
106 GL(glGetProgramInfoLog);
113 GL(glGetShaderInfoLog);
114 GL(glGetUniformLocation);
120 GL(glGetAttribLocation);
121 GL(glEnableVertexAttribArray);
122 GL(glDisableVertexAttribArray);
123 GL(glVertexAttribPointer);
124 GL(glBindFragDataLocation);
136 static const int MAX_CACHED_CURSORS = 48;
140 GetOGLProcAddressProc GetOGLProcAddress;
153 const char *pos = strstr(
string, substring);
154 if (pos ==
nullptr)
break;
158 const char *end = pos + strlen(substring);
159 if ((pos ==
string || pos[-1] ==
' ') && (*end ==
' ' || *end ==
'\0'))
return pos;
173 static bool IsOpenGLExtensionSupported(
const char *extension)
175 static PFNGLGETSTRINGIPROC glGetStringi =
nullptr;
176 static bool glGetStringi_loaded =
false;
180 if (!glGetStringi_loaded) {
182 glGetStringi_loaded =
true;
185 if (glGetStringi !=
nullptr) {
188 _glGetIntegerv(GL_NUM_EXTENSIONS, &num_exts);
190 for (GLint i = 0; i < num_exts; i++) {
191 const char *entry = (
const char *)glGetStringi(GL_EXTENSIONS, i);
192 if (strcmp(entry, extension) == 0)
return true;
202 static byte _gl_major_ver = 0;
203 static byte _gl_minor_ver = 0;
214 return (_gl_major_ver > major) || (_gl_major_ver == major && _gl_minor_ver >= minor);
224 template <
typename F>
225 static bool BindGLProc(F &f,
const char *name)
227 f =
reinterpret_cast<F
>(GetOGLProcAddress(name));
232 static bool BindBasicInfoProcs()
234 if (!BindGLProc(_glGetString,
"glGetString"))
return false;
235 if (!BindGLProc(_glGetIntegerv,
"glGetIntegerv"))
return false;
236 if (!BindGLProc(_glGetError,
"glGetError"))
return false;
242 static bool BindBasicOpenGLProcs()
244 if (!BindGLProc(_glDisable,
"glDisable"))
return false;
245 if (!BindGLProc(_glEnable,
"glEnable"))
return false;
246 if (!BindGLProc(_glViewport,
"glViewport"))
return false;
247 if (!BindGLProc(_glTexImage1D,
"glTexImage1D"))
return false;
248 if (!BindGLProc(_glTexImage2D,
"glTexImage2D"))
return false;
249 if (!BindGLProc(_glTexParameteri,
"glTexParameteri"))
return false;
250 if (!BindGLProc(_glTexSubImage1D,
"glTexSubImage1D"))
return false;
251 if (!BindGLProc(_glTexSubImage2D,
"glTexSubImage2D"))
return false;
252 if (!BindGLProc(_glBindTexture,
"glBindTexture"))
return false;
253 if (!BindGLProc(_glDeleteTextures,
"glDeleteTextures"))
return false;
254 if (!BindGLProc(_glGenTextures,
"glGenTextures"))
return false;
255 if (!BindGLProc(_glPixelStorei,
"glPixelStorei"))
return false;
256 if (!BindGLProc(_glClear,
"glClear"))
return false;
257 if (!BindGLProc(_glClearColor,
"glClearColor"))
return false;
258 if (!BindGLProc(_glBlendFunc,
"glBlendFunc"))
return false;
259 if (!BindGLProc(_glDrawArrays,
"glDrawArrays"))
return false;
265 static bool BindTextureExtensions()
268 if (!BindGLProc(_glActiveTexture,
"glActiveTexture"))
return false;
270 if (!BindGLProc(_glActiveTexture,
"glActiveTextureARB"))
return false;
277 static bool BindVBOExtension()
280 if (!BindGLProc(_glGenBuffers,
"glGenBuffers"))
return false;
281 if (!BindGLProc(_glDeleteBuffers,
"glDeleteBuffers"))
return false;
282 if (!BindGLProc(_glBindBuffer,
"glBindBuffer"))
return false;
283 if (!BindGLProc(_glBufferData,
"glBufferData"))
return false;
284 if (!BindGLProc(_glBufferSubData,
"glBufferSubData"))
return false;
285 if (!BindGLProc(_glMapBuffer,
"glMapBuffer"))
return false;
286 if (!BindGLProc(_glUnmapBuffer,
"glUnmapBuffer"))
return false;
288 if (!BindGLProc(_glGenBuffers,
"glGenBuffersARB"))
return false;
289 if (!BindGLProc(_glDeleteBuffers,
"glDeleteBuffersARB"))
return false;
290 if (!BindGLProc(_glBindBuffer,
"glBindBufferARB"))
return false;
291 if (!BindGLProc(_glBufferData,
"glBufferDataARB"))
return false;
292 if (!BindGLProc(_glBufferSubData,
"glBufferSubDataARB"))
return false;
293 if (!BindGLProc(_glMapBuffer,
"glMapBufferARB"))
return false;
294 if (!BindGLProc(_glUnmapBuffer,
"glUnmapBufferARB"))
return false;
298 BindGLProc(_glClearBufferSubData,
"glClearBufferSubData");
300 _glClearBufferSubData =
nullptr;
307 static bool BindVBAExtension()
313 if (!BindGLProc(_glGenVertexArrays,
"glGenVertexArrays"))
return false;
314 if (!BindGLProc(_glDeleteVertexArrays,
"glDeleteVertexArrays"))
return false;
315 if (!BindGLProc(_glBindVertexArray,
"glBindVertexArray"))
return false;
316 }
else if (IsOpenGLExtensionSupported(
"GL_APPLE_vertex_array_object")) {
317 if (!BindGLProc(_glGenVertexArrays,
"glGenVertexArraysAPPLE"))
return false;
318 if (!BindGLProc(_glDeleteVertexArrays,
"glDeleteVertexArraysAPPLE"))
return false;
319 if (!BindGLProc(_glBindVertexArray,
"glBindVertexArrayAPPLE"))
return false;
326 static bool BindShaderExtensions()
329 if (!BindGLProc(_glCreateProgram,
"glCreateProgram"))
return false;
330 if (!BindGLProc(_glDeleteProgram,
"glDeleteProgram"))
return false;
331 if (!BindGLProc(_glLinkProgram,
"glLinkProgram"))
return false;
332 if (!BindGLProc(_glUseProgram,
"glUseProgram"))
return false;
333 if (!BindGLProc(_glGetProgramiv,
"glGetProgramiv"))
return false;
334 if (!BindGLProc(_glGetProgramInfoLog,
"glGetProgramInfoLog"))
return false;
335 if (!BindGLProc(_glCreateShader,
"glCreateShader"))
return false;
336 if (!BindGLProc(_glDeleteShader,
"glDeleteShader"))
return false;
337 if (!BindGLProc(_glShaderSource,
"glShaderSource"))
return false;
338 if (!BindGLProc(_glCompileShader,
"glCompileShader"))
return false;
339 if (!BindGLProc(_glAttachShader,
"glAttachShader"))
return false;
340 if (!BindGLProc(_glGetShaderiv,
"glGetShaderiv"))
return false;
341 if (!BindGLProc(_glGetShaderInfoLog,
"glGetShaderInfoLog"))
return false;
342 if (!BindGLProc(_glGetUniformLocation,
"glGetUniformLocation"))
return false;
343 if (!BindGLProc(_glUniform1i,
"glUniform1i"))
return false;
344 if (!BindGLProc(_glUniform1f,
"glUniform1f"))
return false;
345 if (!BindGLProc(_glUniform2f,
"glUniform2f"))
return false;
346 if (!BindGLProc(_glUniform4f,
"glUniform4f"))
return false;
348 if (!BindGLProc(_glGetAttribLocation,
"glGetAttribLocation"))
return false;
349 if (!BindGLProc(_glEnableVertexAttribArray,
"glEnableVertexAttribArray"))
return false;
350 if (!BindGLProc(_glDisableVertexAttribArray,
"glDisableVertexAttribArray"))
return false;
351 if (!BindGLProc(_glVertexAttribPointer,
"glVertexAttribPointer"))
return false;
354 if (!BindGLProc(_glCreateProgram,
"glCreateProgramObjectARB"))
return false;
355 if (!BindGLProc(_glDeleteProgram,
"glDeleteObjectARB"))
return false;
356 if (!BindGLProc(_glLinkProgram,
"glLinkProgramARB"))
return false;
357 if (!BindGLProc(_glUseProgram,
"glUseProgramObjectARB"))
return false;
358 if (!BindGLProc(_glGetProgramiv,
"glGetObjectParameterivARB"))
return false;
359 if (!BindGLProc(_glGetProgramInfoLog,
"glGetInfoLogARB"))
return false;
360 if (!BindGLProc(_glCreateShader,
"glCreateShaderObjectARB"))
return false;
361 if (!BindGLProc(_glDeleteShader,
"glDeleteObjectARB"))
return false;
362 if (!BindGLProc(_glShaderSource,
"glShaderSourceARB"))
return false;
363 if (!BindGLProc(_glCompileShader,
"glCompileShaderARB"))
return false;
364 if (!BindGLProc(_glAttachShader,
"glAttachObjectARB"))
return false;
365 if (!BindGLProc(_glGetShaderiv,
"glGetObjectParameterivARB"))
return false;
366 if (!BindGLProc(_glGetShaderInfoLog,
"glGetInfoLogARB"))
return false;
367 if (!BindGLProc(_glGetUniformLocation,
"glGetUniformLocationARB"))
return false;
368 if (!BindGLProc(_glUniform1i,
"glUniform1iARB"))
return false;
369 if (!BindGLProc(_glUniform1f,
"glUniform1fARB"))
return false;
370 if (!BindGLProc(_glUniform2f,
"glUniform2fARB"))
return false;
371 if (!BindGLProc(_glUniform4f,
"glUniform4fARB"))
return false;
373 if (!BindGLProc(_glGetAttribLocation,
"glGetAttribLocationARB"))
return false;
374 if (!BindGLProc(_glEnableVertexAttribArray,
"glEnableVertexAttribArrayARB"))
return false;
375 if (!BindGLProc(_glDisableVertexAttribArray,
"glDisableVertexAttribArrayARB"))
return false;
376 if (!BindGLProc(_glVertexAttribPointer,
"glVertexAttribPointerARB"))
return false;
381 BindGLProc(_glBindFragDataLocation,
"glBindFragDataLocation");
382 }
else if (IsOpenGLExtensionSupported(
"GL_EXT_gpu_shader4")) {
383 BindGLProc(_glBindFragDataLocation,
"glBindFragDataLocationEXT");
385 _glBindFragDataLocation =
nullptr;
392 static bool BindPersistentBufferExtensions()
396 if (!BindGLProc(_glMapBufferRange,
"glMapBufferRange"))
return false;
399 if (!BindGLProc(_glBufferStorage,
"glBufferStorage"))
return false;
401 #ifndef NO_GL_BUFFER_SYNC
403 if (!BindGLProc(_glClientWaitSync,
"glClientWaitSync"))
return false;
404 if (!BindGLProc(_glFenceSync,
"glFenceSync"))
return false;
405 if (!BindGLProc(_glDeleteSync,
"glDeleteSync"))
return false;
413 void APIENTRY DebugOutputCallback(GLenum source, GLenum type, GLuint
id, GLenum severity, GLsizei length,
const GLchar *message,
const void *userParam)
416 const char *severity_str =
"";
418 case GL_DEBUG_SEVERITY_HIGH: severity_str =
"high";
break;
419 case GL_DEBUG_SEVERITY_MEDIUM: severity_str =
"medium";
break;
420 case GL_DEBUG_SEVERITY_LOW: severity_str =
"low";
break;
424 const char *type_str =
"Other";
426 case GL_DEBUG_TYPE_ERROR: type_str =
"Error";
break;
427 case GL_DEBUG_TYPE_DEPRECATED_BEHAVIOR: type_str =
"Deprecated";
break;
428 case GL_DEBUG_TYPE_UNDEFINED_BEHAVIOR: type_str =
"Undefined behaviour";
break;
429 case GL_DEBUG_TYPE_PERFORMANCE: type_str =
"Performance";
break;
430 case GL_DEBUG_TYPE_PORTABILITY: type_str =
"Portability";
break;
433 DEBUG(driver, 6,
"OpenGL: %s (%s) - %s", type_str, severity_str, message);
437 void SetupDebugOutput()
439 #ifndef NO_DEBUG_MESSAGES
440 if (_debug_driver_level < 6)
return;
443 BindGLProc(_glDebugMessageControl,
"glDebugMessageControl");
444 BindGLProc(_glDebugMessageCallback,
"glDebugMessageCallback");
445 }
else if (IsOpenGLExtensionSupported(
"GL_ARB_debug_output")) {
446 BindGLProc(_glDebugMessageControl,
"glDebugMessageControlARB");
447 BindGLProc(_glDebugMessageCallback,
"glDebugMessageCallbackARB");
450 if (_glDebugMessageControl !=
nullptr && _glDebugMessageCallback !=
nullptr) {
452 _glEnable(GL_DEBUG_OUTPUT);
453 if (_debug_driver_level >= 8) _glEnable(GL_DEBUG_OUTPUT_SYNCHRONOUS);
455 _glDebugMessageCallback(&DebugOutputCallback,
nullptr);
457 _glDebugMessageControl(GL_DONT_CARE, GL_DONT_CARE, GL_DONT_CARE, 0,
nullptr, _debug_driver_level >= 9 ? GL_TRUE : GL_FALSE);
459 _glDebugMessageControl(GL_DONT_CARE, GL_DEBUG_TYPE_ERROR, GL_DONT_CARE, 0,
nullptr, GL_TRUE);
460 _glDebugMessageControl(GL_DONT_CARE, GL_DEBUG_TYPE_UNDEFINED_BEHAVIOR, GL_DONT_CARE, 0,
nullptr, GL_TRUE);
461 _glDebugMessageControl(GL_DONT_CARE, GL_DEBUG_TYPE_DEPRECATED_BEHAVIOR, GL_DONT_CARE, 0,
nullptr, GL_TRUE);
475 GetOGLProcAddress = get_proc;
502 if (_glDeleteProgram !=
nullptr) {
508 if (_glDeleteVertexArrays !=
nullptr) _glDeleteVertexArrays(1, &this->
vao_quad);
509 if (_glDeleteBuffers !=
nullptr) {
510 _glDeleteBuffers(1, &this->
vbo_quad);
511 _glDeleteBuffers(1, &this->
vid_pbo);
512 _glDeleteBuffers(1, &this->
anim_pbo);
514 if (_glDeleteTextures !=
nullptr) {
530 if (!BindBasicInfoProcs())
return "OpenGL not supported";
533 const char *ver = (
const char *)_glGetString(GL_VERSION);
534 const char *vend = (
const char *)_glGetString(GL_VENDOR);
535 const char *renderer = (
const char *)_glGetString(GL_RENDERER);
537 if (ver ==
nullptr || vend ==
nullptr || renderer ==
nullptr)
return "OpenGL not supported";
539 DEBUG(driver, 1,
"OpenGL driver: %s - %s (%s)", vend, renderer, ver);
541 #ifndef GL_ALLOW_SOFTWARE_RENDERER
544 if (strncmp(renderer,
"llvmpipe", 8) == 0 || strncmp(renderer,
"softpipe", 8) == 0)
return "Software renderer detected, not using OpenGL";
547 const char *minor = strchr(ver,
'.');
548 _gl_major_ver = atoi(ver);
549 _gl_minor_ver = minor !=
nullptr ? atoi(minor + 1) : 0;
551 if (!BindBasicOpenGLProcs())
return "Failed to bind basic OpenGL functions.";
558 if (!
IsOpenGLVersionAtLeast(2, 0) && !IsOpenGLExtensionSupported(
"GL_ARB_texture_non_power_of_two"))
return "Non-power-of-two textures not supported";
560 if (!
IsOpenGLVersionAtLeast(3, 0) && !IsOpenGLExtensionSupported(
"GL_ARB_texture_rg"))
return "Single element texture formats not supported";
561 if (!BindTextureExtensions())
return "Failed to bind texture extension functions";
563 if (!
IsOpenGLVersionAtLeast(1, 5) && !IsOpenGLExtensionSupported(
"ARB_vertex_buffer_object"))
return "Vertex buffer objects not supported";
564 if (!BindVBOExtension())
return "Failed to bind VBO extension functions";
566 if (!
IsOpenGLVersionAtLeast(2, 1) && !IsOpenGLExtensionSupported(
"GL_ARB_pixel_buffer_object"))
return "Pixel buffer objects not supported";
568 if (!
IsOpenGLVersionAtLeast(3, 0) && (!IsOpenGLExtensionSupported(
"GL_ARB_vertex_array_object") || !IsOpenGLExtensionSupported(
"GL_APPLE_vertex_array_object")))
return "Vertex array objects not supported";
569 if (!BindVBAExtension())
return "Failed to bind VBA extension functions";
571 if (!
IsOpenGLVersionAtLeast(2, 0) && (!IsOpenGLExtensionSupported(
"GL_ARB_shader_objects") || !IsOpenGLExtensionSupported(
"GL_ARB_fragment_shader") || !IsOpenGLExtensionSupported(
"GL_ARB_vertex_shader")))
return "No shader support";
572 if (!BindShaderExtensions())
return "Failed to bind shader extension functions";
573 if (
IsOpenGLVersionAtLeast(3, 2) && _glBindFragDataLocation ==
nullptr)
return "OpenGL claims to support version 3.2 but doesn't have glBindFragDataLocation";
576 #ifndef NO_GL_BUFFER_SYNC
580 #ifndef GL_MAP_PERSISTENT_AMD
583 DEBUG(driver, 3,
"OpenGL: Detected AMD GPU, not using persistent buffer mapping due to performance problems");
589 DEBUG(driver, 1,
"OpenGL claims to support persistent buffer mapping but doesn't export all functions, not using persistent mapping.");
595 GLint max_tex_units = 0;
596 _glGetIntegerv(GL_MAX_COMBINED_TEXTURE_IMAGE_UNITS, &max_tex_units);
597 if (max_tex_units < 4)
return "Not enough simultaneous textures supported";
599 DEBUG(driver, 2,
"OpenGL shading language version: %s, texture units = %d", (
const char *)_glGetString(GL_SHADING_LANGUAGE_VERSION), (
int)max_tex_units);
601 if (!this->
InitShaders())
return "Failed to initialize shaders";
606 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
607 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
608 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAX_LEVEL, 0);
609 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
610 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
611 _glBindTexture(GL_TEXTURE_2D, 0);
612 if (_glGetError() != GL_NO_ERROR)
return "Can't generate video buffer texture";
617 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
618 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
619 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAX_LEVEL, 0);
620 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
621 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
622 _glBindTexture(GL_TEXTURE_2D, 0);
623 if (_glGetError() != GL_NO_ERROR)
return "Can't generate animation buffer texture";
628 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
629 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
630 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_MAX_LEVEL, 0);
631 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
632 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
633 _glTexImage1D(GL_TEXTURE_1D, 0, GL_RGBA8, 256, 0, GL_BGRA, GL_UNSIGNED_INT_8_8_8_8_REV,
nullptr);
634 _glBindTexture(GL_TEXTURE_1D, 0);
635 if (_glGetError() != GL_NO_ERROR)
return "Can't generate palette lookup texture";
638 GLint tex_location = _glGetUniformLocation(this->
vid_program,
"colour_tex");
639 GLint palette_location = _glGetUniformLocation(this->
vid_program,
"palette");
640 GLint sprite_location = _glGetUniformLocation(this->
vid_program,
"sprite");
641 GLint screen_location = _glGetUniformLocation(this->
vid_program,
"screen");
643 _glUniform1i(tex_location, 0);
644 _glUniform1i(palette_location, 1);
646 _glUniform4f(sprite_location, 0.0f, 0.0f, 1.0f, 1.0f);
647 _glUniform2f(screen_location, 1.0f, 1.0f);
650 tex_location = _glGetUniformLocation(this->
pal_program,
"colour_tex");
651 palette_location = _glGetUniformLocation(this->
pal_program,
"palette");
652 sprite_location = _glGetUniformLocation(this->
pal_program,
"sprite");
653 screen_location = _glGetUniformLocation(this->
pal_program,
"screen");
655 _glUniform1i(tex_location, 0);
656 _glUniform1i(palette_location, 1);
657 _glUniform4f(sprite_location, 0.0f, 0.0f, 1.0f, 1.0f);
658 _glUniform2f(screen_location, 1.0f, 1.0f);
661 tex_location = _glGetUniformLocation(this->
remap_program,
"colour_tex");
662 palette_location = _glGetUniformLocation(this->
remap_program,
"palette");
663 GLint remap_location = _glGetUniformLocation(this->
remap_program,
"remap_tex");
669 _glUniform1i(tex_location, 0);
670 _glUniform1i(palette_location, 1);
671 _glUniform1i(remap_location, 2);
674 tex_location = _glGetUniformLocation(this->
sprite_program,
"colour_tex");
675 palette_location = _glGetUniformLocation(this->
sprite_program,
"palette");
676 remap_location = _glGetUniformLocation(this->
sprite_program,
"remap_tex");
677 GLint pal_location = _glGetUniformLocation(this->
sprite_program,
"pal");
684 _glUniform1i(tex_location, 0);
685 _glUniform1i(palette_location, 1);
686 _glUniform1i(remap_location, 2);
687 _glUniform1i(pal_location, 3);
691 _glGenBuffers(1, &this->
vid_pbo);
692 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, this->
vid_pbo);
694 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, this->
anim_pbo);
695 if (_glGetError() != GL_NO_ERROR)
return "Can't allocate pixel buffer for video buffer";
701 { 1.f, -1.f, 1.f, 1.f },
702 { 1.f, 1.f, 1.f, 0.f },
703 { -1.f, -1.f, 0.f, 1.f },
704 { -1.f, 1.f, 0.f, 0.f },
708 _glGenVertexArrays(1, &this->
vao_quad);
713 _glBindBuffer(GL_ARRAY_BUFFER, this->
vbo_quad);
714 _glBufferData(GL_ARRAY_BUFFER,
sizeof(vert_array), vert_array, GL_STATIC_DRAW);
715 if (_glGetError() != GL_NO_ERROR)
return "Can't generate VBO for fullscreen quad";
718 GLint loc_position = _glGetAttribLocation(this->
vid_program,
"position");
719 GLint colour_position = _glGetAttribLocation(this->
vid_program,
"colour_uv");
720 _glEnableVertexAttribArray(loc_position);
721 _glEnableVertexAttribArray(colour_position);
724 _glBindVertexArray(0);
729 this->PrepareContext();
735 void OpenGLBackend::PrepareContext()
737 _glClearColor(0.0f, 0.0f, 0.0f, 1.0f);
738 _glDisable(GL_DEPTH_TEST);
741 _glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
749 static bool VerifyShader(GLuint shader)
753 GLint result = GL_FALSE;
754 _glGetShaderiv(shader, GL_COMPILE_STATUS, &result);
758 _glGetShaderiv(shader, GL_INFO_LOG_LENGTH, &log_len);
760 _glGetShaderInfoLog(shader, log_len,
nullptr, log_buf.
Allocate(log_len));
761 DEBUG(driver, result != GL_TRUE ? 0 : 2,
"%s", log_buf.
GetBuffer());
764 return result == GL_TRUE;
772 static bool VerifyProgram(GLuint program)
776 GLint result = GL_FALSE;
777 _glGetProgramiv(program, GL_LINK_STATUS, &result);
781 _glGetProgramiv(program, GL_INFO_LOG_LENGTH, &log_len);
783 _glGetProgramInfoLog(program, log_len,
nullptr, log_buf.
Allocate(log_len));
784 DEBUG(driver, result != GL_TRUE ? 0 : 2,
"%s", log_buf.
GetBuffer());
787 return result == GL_TRUE;
796 const char *ver = (
const char *)_glGetString(GL_SHADING_LANGUAGE_VERSION);
797 if (ver ==
nullptr)
return false;
799 int glsl_major = ver[0] -
'0';
800 int glsl_minor = ver[2] -
'0';
802 bool glsl_150 = (
IsOpenGLVersionAtLeast(3, 2) || glsl_major > 1 || (glsl_major == 1 && glsl_minor >= 5)) && _glBindFragDataLocation !=
nullptr;
805 GLuint vert_shader = _glCreateShader(GL_VERTEX_SHADER);
807 _glCompileShader(vert_shader);
808 if (!VerifyShader(vert_shader))
return false;
811 GLuint frag_shader_rgb = _glCreateShader(GL_FRAGMENT_SHADER);
813 _glCompileShader(frag_shader_rgb);
814 if (!VerifyShader(frag_shader_rgb))
return false;
817 GLuint frag_shader_pal = _glCreateShader(GL_FRAGMENT_SHADER);
819 _glCompileShader(frag_shader_pal);
820 if (!VerifyShader(frag_shader_pal))
return false;
823 GLuint remap_shader = _glCreateShader(GL_FRAGMENT_SHADER);
825 _glCompileShader(remap_shader);
826 if (!VerifyShader(remap_shader))
return false;
829 GLuint sprite_shader = _glCreateShader(GL_FRAGMENT_SHADER);
831 _glCompileShader(sprite_shader);
832 if (!VerifyShader(sprite_shader))
return false;
837 _glAttachShader(this->
vid_program, frag_shader_rgb);
841 _glAttachShader(this->
pal_program, frag_shader_pal);
853 _glBindFragDataLocation(this->
vid_program, 0,
"colour");
854 _glBindFragDataLocation(this->
pal_program, 0,
"colour");
860 if (!VerifyProgram(this->
vid_program))
return false;
863 if (!VerifyProgram(this->
pal_program))
return false;
871 _glDeleteShader(vert_shader);
872 _glDeleteShader(frag_shader_rgb);
873 _glDeleteShader(frag_shader_pal);
874 _glDeleteShader(remap_shader);
875 _glDeleteShader(sprite_shader);
889 if (!force && _screen.width == w && _screen.height == h)
return false;
892 int pitch =
Align(w, 4);
894 _glViewport(0, 0, w, h);
898 _glDeleteBuffers(1, &this->
vid_pbo);
899 _glGenBuffers(1, &this->
vid_pbo);
900 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, this->
vid_pbo);
901 _glBufferStorage(GL_PIXEL_UNPACK_BUFFER, pitch * h * bpp / 8,
nullptr, GL_MAP_READ_BIT | GL_MAP_WRITE_BIT | GL_MAP_PERSISTENT_BIT | GL_MAP_COHERENT_BIT | GL_CLIENT_STORAGE_BIT);
904 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, this->
vid_pbo);
905 _glBufferData(GL_PIXEL_UNPACK_BUFFER, pitch * h * bpp / 8,
nullptr, GL_DYNAMIC_DRAW);
911 if (_glClearBufferSubData !=
nullptr) {
912 _glClearBufferSubData(GL_PIXEL_UNPACK_BUFFER, GL_RGBA8, 0, pitch * h * bpp / 8, GL_BGRA, GL_UNSIGNED_INT_8_8_8_8_REV, &black.
data);
914 uint32 *buf = (uint32 *)_glMapBuffer(GL_PIXEL_UNPACK_BUFFER, GL_READ_WRITE);
915 for (
int i = 0; i < pitch * h; i++) {
918 _glUnmapBuffer(GL_PIXEL_UNPACK_BUFFER);
921 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, 0);
923 _glActiveTexture(GL_TEXTURE0);
927 _glTexImage2D(GL_TEXTURE_2D, 0, GL_R8, w, h, 0, GL_RED, GL_UNSIGNED_BYTE,
nullptr);
931 _glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA8, w, h, 0, GL_BGRA, GL_UNSIGNED_INT_8_8_8_8_REV,
nullptr);
939 _glDeleteBuffers(1, &this->
anim_pbo);
941 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, this->
anim_pbo);
942 _glBufferStorage(GL_PIXEL_UNPACK_BUFFER, pitch * h,
nullptr, GL_MAP_READ_BIT | GL_MAP_WRITE_BIT | GL_MAP_PERSISTENT_BIT | GL_MAP_COHERENT_BIT | GL_CLIENT_STORAGE_BIT);
944 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, this->
anim_pbo);
945 _glBufferData(GL_PIXEL_UNPACK_BUFFER, pitch * h,
nullptr, GL_DYNAMIC_DRAW);
947 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, 0);
950 _glTexImage2D(GL_TEXTURE_2D, 0, GL_R8, w, h, 0, GL_RED, GL_UNSIGNED_BYTE,
nullptr);
953 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, this->
anim_pbo);
954 _glUnmapBuffer(GL_PIXEL_UNPACK_BUFFER);
955 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, 0);
961 _glPixelStorei(GL_UNPACK_ROW_LENGTH, 0);
963 _glTexImage2D(GL_TEXTURE_2D, 0, GL_R8, 1, 1, 0, GL_RED, GL_UNSIGNED_BYTE, &dummy);
966 _glBindTexture(GL_TEXTURE_2D, 0);
971 _screen.pitch = pitch;
972 _screen.dst_ptr =
nullptr;
976 _glUniform2f(this->
remap_screen_loc, (
float)_screen.width, (
float)_screen.height);
989 assert(first + length <= 256);
991 _glPixelStorei(GL_UNPACK_ROW_LENGTH, 0);
992 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, 0);
993 _glActiveTexture(GL_TEXTURE1);
995 _glTexSubImage1D(GL_TEXTURE_1D, 0, first, length, GL_BGRA, GL_UNSIGNED_INT_8_8_8_8_REV, pal + first);
1003 _glClear(GL_COLOR_BUFFER_BIT);
1005 _glDisable(GL_BLEND);
1008 _glActiveTexture(GL_TEXTURE0);
1010 _glActiveTexture(GL_TEXTURE1);
1014 _glActiveTexture(GL_TEXTURE2);
1024 _glBindVertexArray(this->
vao_quad);
1025 _glDrawArrays(GL_TRIANGLE_STRIP, 0, 4);
1027 _glEnable(GL_BLEND);
1036 _cur_dpi = &_screen;
1043 if (old !=
nullptr) {
1045 sprite->~OpenGLSprite();
1067 sprite->~OpenGLSprite();
1078 #ifndef NO_GL_BUFFER_SYNC
1083 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, this->
vid_pbo);
1084 this->
vid_buffer = _glMapBuffer(GL_PIXEL_UNPACK_BUFFER, GL_READ_WRITE);
1086 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, this->
vid_pbo);
1099 if (this->
anim_pbo == 0)
return nullptr;
1101 #ifndef NO_GL_BUFFER_SYNC
1106 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, this->
anim_pbo);
1107 this->
anim_buffer = _glMapBuffer(GL_PIXEL_UNPACK_BUFFER, GL_READ_WRITE);
1109 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, this->
anim_pbo);
1110 this->
anim_buffer = _glMapBufferRange(GL_PIXEL_UNPACK_BUFFER, 0, _screen.pitch * _screen.height, GL_MAP_READ_BIT | GL_MAP_WRITE_BIT | GL_MAP_PERSISTENT_BIT | GL_MAP_COHERENT_BIT);
1124 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, this->
vid_pbo);
1126 _glUnmapBuffer(GL_PIXEL_UNPACK_BUFFER);
1130 #ifndef NO_GL_BUFFER_SYNC
1139 _glActiveTexture(GL_TEXTURE0);
1141 _glPixelStorei(GL_UNPACK_ROW_LENGTH, _screen.pitch);
1144 _glTexSubImage2D(GL_TEXTURE_2D, 0, update_rect.left, update_rect.top, update_rect.right - update_rect.left, update_rect.bottom - update_rect.top, GL_RED, GL_UNSIGNED_BYTE, (GLvoid *)(
size_t)(update_rect.top * _screen.pitch + update_rect.left));
1148 _glTexSubImage2D(GL_TEXTURE_2D, 0, update_rect.left, update_rect.top, update_rect.right - update_rect.left, update_rect.bottom - update_rect.top, GL_BGRA, GL_UNSIGNED_INT_8_8_8_8_REV, (GLvoid *)(
size_t)(update_rect.top * _screen.pitch * 4 + update_rect.left * 4));
1152 #ifndef NO_GL_BUFFER_SYNC
1166 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, this->
anim_pbo);
1168 _glUnmapBuffer(GL_PIXEL_UNPACK_BUFFER);
1172 #ifndef NO_GL_BUFFER_SYNC
1180 if (update_rect.left != update_rect.right) {
1181 _glActiveTexture(GL_TEXTURE0);
1183 _glPixelStorei(GL_UNPACK_ROW_LENGTH, _screen.pitch);
1184 _glTexSubImage2D(GL_TEXTURE_2D, 0, update_rect.left, update_rect.top, update_rect.right - update_rect.left, update_rect.bottom - update_rect.top, GL_RED, GL_UNSIGNED_BYTE, (GLvoid *)(
size_t)(update_rect.top * _screen.pitch + update_rect.left));
1186 #ifndef NO_GL_BUFFER_SYNC
1202 gl_sprite->
Update(sprite[i].width, sprite[i].height, i, sprite[i].data);
1224 _glActiveTexture(GL_TEXTURE0 + 1);
1228 _glActiveTexture(GL_TEXTURE0 + 3);
1229 if (pal != PAL_NONE) {
1234 _glPixelStorei(GL_UNPACK_ROW_LENGTH, 0);
1237 _glTexSubImage1D(GL_TEXTURE_1D, 0, 0, 256, GL_RED, GL_UNSIGNED_BYTE, 0);
1239 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, 0);
1250 _glUniform4f(this->
sprite_sprite_loc, (
float)x, (
float)y, (
float)dim.width, (
float)dim.height);
1252 _glUniform2f(this->
sprite_screen_loc, (
float)_screen.width, (
float)_screen.height);
1256 _glBindVertexArray(this->
vao_quad);
1257 _glDrawArrays(GL_TRIANGLE_STRIP, 0, 4);
1274 for (
int t =
TEX_RGBA; t < NUM_TEX; t++) {
1277 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST_MIPMAP_NEAREST);
1278 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
1279 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAX_LEVEL, 0);
1280 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
1281 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
1284 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, 0);
1285 _glPixelStorei(GL_UNPACK_ROW_LENGTH, 0);
1288 const Colour rgb_pixel(0, 0, 0);
1290 _glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA8, 1, 1, 0, GL_BGRA, GL_UNSIGNED_INT_8_8_8_8_REV, &rgb_pixel);
1295 _glTexImage2D(GL_TEXTURE_2D, 0, GL_R8, 1, 1, 0, GL_RED, GL_UNSIGNED_BYTE, &pal);
1298 std::array<uint8, 256> identity_pal;
1299 std::iota(std::begin(identity_pal), std::end(identity_pal), 0);
1304 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
1305 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
1306 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_MAX_LEVEL, 0);
1307 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
1308 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
1309 _glTexImage1D(GL_TEXTURE_1D, 0, GL_R8, 256, 0, GL_RED, GL_UNSIGNED_BYTE, identity_pal.data());
1314 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
1315 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
1316 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_MAX_LEVEL, 0);
1317 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
1318 _glTexParameteri(GL_TEXTURE_1D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
1319 _glTexImage1D(GL_TEXTURE_1D, 0, GL_R8, 256, 0, GL_RED, GL_UNSIGNED_BYTE, identity_pal.data());
1324 _glBufferData(GL_PIXEL_UNPACK_BUFFER, 256, identity_pal.data(), GL_DYNAMIC_DRAW);
1325 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, 0);
1327 return _glGetError() == GL_NO_ERROR;
1349 (void)_glGetError();
1351 this->dim.width = width;
1352 this->dim.height = height;
1355 _glActiveTexture(GL_TEXTURE0);
1356 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, 0);
1358 for (
int t =
TEX_RGBA; t < NUM_TEX; t++) {
1364 _glGenTextures(1, &this->
tex[t]);
1365 _glBindTexture(GL_TEXTURE_2D, this->
tex[t]);
1367 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST_MIPMAP_NEAREST);
1368 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
1369 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAX_LEVEL, levels - 1);
1370 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
1371 _glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
1374 for (uint i = 0, w = width, h = height; i < levels; i++, w /= 2, h /= 2) {
1377 _glTexImage2D(GL_TEXTURE_2D, i, GL_R8, w, h, 0, GL_RED, GL_UNSIGNED_BYTE,
nullptr);
1379 _glTexImage2D(GL_TEXTURE_2D, i, GL_RGBA8, w, h, 0, GL_BGRA, GL_UNSIGNED_INT_8_8_8_8_REV,
nullptr);
1384 assert(_glGetError() == GL_NO_ERROR);
1387 OpenGLSprite::~OpenGLSprite()
1389 _glDeleteTextures(NUM_TEX, this->
tex);
1404 _glActiveTexture(GL_TEXTURE0);
1405 _glBindBuffer(GL_PIXEL_UNPACK_BUFFER, 0);
1406 _glPixelStorei(GL_UNPACK_ROW_LENGTH, 0);
1411 for (
size_t i = 0; i < width * height; i++) {
1412 rgba[i].r = data[i].
r;
1413 rgba[i].g = data[i].
g;
1414 rgba[i].b = data[i].
b;
1415 rgba[i].
a = data[i].
a;
1418 _glBindTexture(GL_TEXTURE_2D, this->
tex[
TEX_RGBA]);
1419 _glTexSubImage2D(GL_TEXTURE_2D, level, 0, 0, width, height, GL_BGRA, GL_UNSIGNED_INT_8_8_8_8_REV, rgba);
1424 int pitch =
Align(width, 4);
1426 uint8 *pal = buf_pal.
Allocate(pitch * height);
1428 for (uint y = 0; y < height; y++, pal += pitch, row += width) {
1429 for (uint x = 0; x < width; x++) {
1435 _glTexSubImage2D(GL_TEXTURE_2D, level, 0, 0, width, height, GL_RED, GL_UNSIGNED_BYTE, buf_pal.
GetBuffer());
1438 assert(_glGetError() == GL_NO_ERROR);
1458 _glActiveTexture(GL_TEXTURE0);
1460 _glActiveTexture(GL_TEXTURE0 + 2);