imgui-bindings 0.1.17 → 1.0.0

data/lib/imgui_impl_opengl3.rb

@@ -1,13 +1,14 @@
 require 'ffi'
 require 'opengl'
+require 'fiddle'
 
 require_relative 'imgui'
 
 module ImGui
 
-  @@g_GlVersion = 0 # Extracted at runtime using GL::MAJOR_VERSION, GL::MINOR_VERSION queries.
-  @@g_GlslVersionString = "" # Specified by user or detected based on compile time
-  @@g_FontTexture = nil
+  @@g_GlVersion = 0
+  @@g_MaxTextureSize = 0
+  @@g_GlslVersionString = ""
 
   @@g_ShaderHandle = 0
 
@@ -26,37 +27,37 @@ module ImGui
   def self.PrintShaderCompileStatus(handle)
     rvalue = ' ' * 4
     GL.GetShaderiv(handle, GL::COMPILE_STATUS, rvalue)
-    rvalue = rvalue.unpack1('L')
-    if rvalue == GL::FALSE
-      $stderr.puts "Error in compiling shader"
-      log_length = ' ' * 4
-      GL.GetShaderiv(handle, GL::INFO_LOG_LENGTH, log_length)
-      log_length = log_length.unpack1('L')
-      if log_length > 0
-        buf = ' ' * log_length
-        GL.GetShaderInfoLog(handle, log_length, nil, buf)
-        $stderr.puts(buf)
-        exit()
-      end
+    ok = rvalue.unpack1('L')
+    return true if ok == GL::TRUE
+
+    $stderr.puts "Error in compiling shader"
+    log_length = ' ' * 4
+    GL.GetShaderiv(handle, GL::INFO_LOG_LENGTH, log_length)
+    log_length = log_length.unpack1('L')
+    if log_length > 0
+      buf = ' ' * log_length
+      GL.GetShaderInfoLog(handle, log_length, nil, buf)
+      $stderr.puts(buf)
     end
+    false
   end
 
   def self.PrintProgramLinkStatus(handle)
     rvalue = ' ' * 4
     GL.GetProgramiv(handle, GL::LINK_STATUS, rvalue)
-    rvalue = rvalue.unpack1('L')
-    if rvalue == GL::FALSE
-      $stderr.puts "Error in linking program"
-      log_length = ' ' * 4
-      GL.GetProgramiv(handle, GL::INFO_LOG_LENGTH, log_length)
-      log_length = log_length.unpack1('L')
-      if log_length > 0
-        buf = ' ' * log_length
-        GL.GetProgramInfoLog(handle, log_length, nil, buf)
-        $stderr.puts(buf)
-        exit()
-      end
+    ok = rvalue.unpack1('L')
+    return true if ok == GL::TRUE
+
+    $stderr.puts "Error in linking program"
+    log_length = ' ' * 4
+    GL.GetProgramiv(handle, GL::INFO_LOG_LENGTH, log_length)
+    log_length = log_length.unpack1('L')
+    if log_length > 0
+      buf = ' ' * log_length
+      GL.GetProgramInfoLog(handle, log_length, nil, buf)
+      $stderr.puts(buf)
     end
+    false
   end
 
   def self.ImplOpenGL3_Init(glsl_version = nil)
@@ -65,27 +66,56 @@ module ImGui
     GL.GetIntegerv(GL::MINOR_VERSION, minor)
     major = major.unpack1('L')
     minor = minor.unpack1('L')
-    @@g_GlVersion = major * 1000 + minor
+
+    # OpenGL 2.x fallback when GL_MAJOR_VERSION/GL_MINOR_VERSION are unavailable.
+    if major == 0 && minor == 0 && GL.respond_to?(:GetString)
+      version_string = GL.GetString(GL::VERSION).to_s
+      parts = version_string.split(/[ .]/)
+      major = parts[0].to_i
+      minor = parts[1].to_i
+    end
+
+    @@g_GlVersion = major * 100 + minor * 10
+
+    max_texture_size = ' ' * 4
+    GL.GetIntegerv(GL::MAX_TEXTURE_SIZE, max_texture_size)
+    @@g_MaxTextureSize = max_texture_size.unpack1('L')
 
     io = ImGuiIO.new(ImGui::GetIO())
     io[:BackendRendererName] = @@g_BackendRendererName
-    io[:BackendFlags] |= ImGuiBackendFlags_RendererHasVtxOffset if @@g_GlVersion >= 3200
-
-    # Ref.: Fix imgui_impl_opengl3 on MacOS
-    #       https://github.com/ocornut/imgui/pull/3199
-    if GL.get_platform() == :OPENGL_PLATFORM_MACOSX
-      glsl_version = "#version 150" if glsl_version == nil
-    else
-      glsl_version = "#version 130" if glsl_version == nil
+    io[:BackendFlags] |= ImGuiBackendFlags_RendererHasVtxOffset if @@g_GlVersion >= 320
+    io[:BackendFlags] |= ImGuiBackendFlags_RendererHasTextures
+
+    platform_io = ImGuiPlatformIO.new(ImGui::GetPlatformIO())
+    platform_io[:Renderer_TextureMaxWidth] = @@g_MaxTextureSize
+    platform_io[:Renderer_TextureMaxHeight] = @@g_MaxTextureSize
+
+    if glsl_version.nil?
+      if GL.get_platform() == :OPENGL_PLATFORM_MACOSX
+        glsl_version = '#version 150'
+      else
+        glsl_version = '#version 130'
+      end
     end
 
-    @@g_GlslVersionString = glsl_version.dup
+    @@g_GlslVersionString = glsl_version.end_with?("\n") ? glsl_version.dup : "#{glsl_version}\n"
 
-    return true
+    true
   end
 
   def self.ImplOpenGL3_Shutdown()
     ImplOpenGL3_DestroyDeviceObjects()
+
+    io = ImGuiIO.new(ImGui::GetIO())
+    io[:BackendRendererName] = nil
+    io[:BackendFlags] &= ~(ImGuiBackendFlags_RendererHasVtxOffset | ImGuiBackendFlags_RendererHasTextures)
+
+    begin
+      platform_io = ImGuiPlatformIO.new(ImGui::GetPlatformIO())
+      platform_io.ClearRendererHandlers()
+    rescue StandardError
+      # Older generated bindings may not expose all platform IO helpers.
+    end
   end
 
   def self.ImplOpenGL3_NewFrame()
@@ -93,32 +123,38 @@ module ImGui
   end
 
   def self.ImplOpenGL3_RenderDrawData(draw_data_raw)
-    #  Avoid rendering when minimized, scale coordinates for retina displays (screen coordinates != framebuffer coordinates)
     draw_data = ImDrawData.new(draw_data_raw)
+
+    # Avoid rendering when minimized, scale coordinates for retina displays.
     fb_width = (draw_data[:DisplaySize][:x] * draw_data[:FramebufferScale][:x]).to_i
     fb_height = (draw_data[:DisplaySize][:y] * draw_data[:FramebufferScale][:y]).to_i
+    return if fb_width <= 0 || fb_height <= 0
+
+    ImplOpenGL3_ProcessTextureUpdates(draw_data)
 
-    return if fb_width == 0 || fb_height == 0
+    last_active_texture = ' ' * 4; GL.GetIntegerv(GL::ACTIVE_TEXTURE, last_active_texture)
+    GL.ActiveTexture(GL::TEXTURE0)
 
-    #  Backup GL state
-    last_active_texture = ' ' * 4;  GL.GetIntegerv(GL::ACTIVE_TEXTURE, last_active_texture)
-    last_program = ' ' * 4;  GL.GetIntegerv(GL::CURRENT_PROGRAM, last_program)
-    last_texture = ' ' * 4;  GL.GetIntegerv(GL::TEXTURE_BINDING_2D, last_texture)
+    last_program = ' ' * 4; GL.GetIntegerv(GL::CURRENT_PROGRAM, last_program)
+    last_texture = ' ' * 4; GL.GetIntegerv(GL::TEXTURE_BINDING_2D, last_texture)
 
-    last_sampler = ' ' * 4;  GL.GetIntegerv(GL::SAMPLER_BINDING, last_sampler)
-    last_array_buffer = ' ' * 4;  GL.GetIntegerv(GL::ARRAY_BUFFER_BINDING, last_array_buffer)
-    last_vertex_array_object = ' ' * 4;  GL.GetIntegerv(GL::VERTEX_ARRAY_BINDING, last_vertex_array_object)
+    has_sampler = defined?(GL::SAMPLER_BINDING)
+    last_sampler = ' ' * 4
+    GL.GetIntegerv(GL::SAMPLER_BINDING, last_sampler) if has_sampler
 
-    last_polygon_mode = ' ' * 8;  GL.GetIntegerv(GL::POLYGON_MODE, last_polygon_mode)
-    last_viewport = ' ' * 16;  GL.GetIntegerv(GL::VIEWPORT, last_viewport)
-    last_scissor_box = ' ' * 16;  GL.GetIntegerv(GL::SCISSOR_BOX, last_scissor_box)
+    last_array_buffer = ' ' * 4; GL.GetIntegerv(GL::ARRAY_BUFFER_BINDING, last_array_buffer)
+    last_vertex_array_object = ' ' * 4; GL.GetIntegerv(GL::VERTEX_ARRAY_BINDING, last_vertex_array_object)
 
-    last_blend_src_rgb = ' ' * 4;  GL.GetIntegerv(GL::BLEND_SRC_RGB, last_blend_src_rgb)
-    last_blend_dst_rgb = ' ' * 4;  GL.GetIntegerv(GL::BLEND_DST_RGB, last_blend_dst_rgb)
-    last_blend_src_alpha = ' ' * 4;  GL.GetIntegerv(GL::BLEND_SRC_ALPHA, last_blend_src_alpha)
-    last_blend_dst_alpha = ' ' * 4;  GL.GetIntegerv(GL::BLEND_DST_ALPHA, last_blend_dst_alpha)
-    last_blend_equation_rgb = ' ' * 4;  GL.GetIntegerv(GL::BLEND_EQUATION_RGB, last_blend_equation_rgb)
-    last_blend_equation_alpha = ' ' * 4;  GL.GetIntegerv(GL::BLEND_EQUATION_ALPHA, last_blend_equation_alpha)
+    last_polygon_mode = ' ' * 8; GL.GetIntegerv(GL::POLYGON_MODE, last_polygon_mode)
+    last_viewport = ' ' * 16; GL.GetIntegerv(GL::VIEWPORT, last_viewport)
+    last_scissor_box = ' ' * 16; GL.GetIntegerv(GL::SCISSOR_BOX, last_scissor_box)
+
+    last_blend_src_rgb = ' ' * 4; GL.GetIntegerv(GL::BLEND_SRC_RGB, last_blend_src_rgb)
+    last_blend_dst_rgb = ' ' * 4; GL.GetIntegerv(GL::BLEND_DST_RGB, last_blend_dst_rgb)
+    last_blend_src_alpha = ' ' * 4; GL.GetIntegerv(GL::BLEND_SRC_ALPHA, last_blend_src_alpha)
+    last_blend_dst_alpha = ' ' * 4; GL.GetIntegerv(GL::BLEND_DST_ALPHA, last_blend_dst_alpha)
+    last_blend_equation_rgb = ' ' * 4; GL.GetIntegerv(GL::BLEND_EQUATION_RGB, last_blend_equation_rgb)
+    last_blend_equation_alpha = ' ' * 4; GL.GetIntegerv(GL::BLEND_EQUATION_ALPHA, last_blend_equation_alpha)
 
     last_enable_blend = GL.IsEnabled(GL::BLEND)
     last_enable_cull_face = GL.IsEnabled(GL::CULL_FACE)
@@ -126,80 +162,70 @@ module ImGui
     last_enable_stencil_test = GL.IsEnabled(GL::STENCIL_TEST)
     last_enable_scissor_test = GL.IsEnabled(GL::SCISSOR_TEST)
 
-    #  Setup desired GL state
-    vertex_array_object = ' ' * 4
-    GL.GenVertexArrays(1, vertex_array_object)
-    vertex_array_object = vertex_array_object.unpack1('L')
+    # Recreate VAO every frame so this works across multiple GL contexts.
+    vao_mem = ' ' * 4
+    GL.GenVertexArrays(1, vao_mem)
+    vertex_array_object = vao_mem.unpack1('L')
     ImplOpenGL3_SetupRenderState(draw_data, fb_width, fb_height, vertex_array_object)
 
-    #  Will project scissor/clipping rectangles into framebuffer space
-    clip_off = draw_data[:DisplayPos]         #  (0,0) unless using multi-viewports
-    clip_scale = draw_data[:FramebufferScale] #  (1,1) unless using retina display which are often (2,2)
+    clip_off = draw_data[:DisplayPos]
+    clip_scale = draw_data[:FramebufferScale]
+
+    cmd_list_data = draw_data[:CmdLists][:Data]
+    pointer_stride = FFI::Pointer.size
 
-    #  Render command lists
     draw_data[:CmdListsCount].times do |n|
+      cmd_list_ptr = (cmd_list_data + pointer_stride * n).read_pointer
+      cmd_list = ImDrawList.new(cmd_list_ptr)
 
-      cmd_list = ImDrawList.new((draw_data[:CmdLists][:Data] + 8 * n).read_pointer) # 8 == const ImDrawList*
-      # vtx_buffer = ImDrawVert.new(cmd_list[:VtxBuffer][:Data]) # const ImDrawVert*
-      # idx_buffer = cmd_list[:IdxBuffer][:Data] # const ImDrawIdx*
+      vtx_size = cmd_list[:VtxBuffer][:Size] * ImDrawVert.size
+      idx_size = cmd_list[:IdxBuffer][:Size] * 2 # ImDrawIdx is currently ushort in generated bindings.
 
-      # Upload vertex/index buffers
-      GL.BufferData(GL::ARRAY_BUFFER, cmd_list[:VtxBuffer][:Size] * ImDrawVert.size, Fiddle::Pointer.new(cmd_list[:VtxBuffer][:Data]), GL::STREAM_DRAW)
-      # 2 == ImDrawIdx(:ushort).size
-      GL.BufferData(GL::ELEMENT_ARRAY_BUFFER, cmd_list[:IdxBuffer][:Size] * 2, Fiddle::Pointer.new(cmd_list[:IdxBuffer][:Data]), GL::STREAM_DRAW) # [TODO] Refer ImGui::ImDrawIdx
+      GL.BufferData(GL::ARRAY_BUFFER, vtx_size, Fiddle::Pointer.new(cmd_list[:VtxBuffer][:Data]), GL::STREAM_DRAW)
+      GL.BufferData(GL::ELEMENT_ARRAY_BUFFER, idx_size, Fiddle::Pointer.new(cmd_list[:IdxBuffer][:Data]), GL::STREAM_DRAW)
 
       cmd_list[:CmdBuffer][:Size].times do |cmd_i|
-        pcmd = ImDrawCmd.new(cmd_list[:CmdBuffer][:Data] + ImDrawCmd.size * cmd_i) # const ImDrawCmd*
+        pcmd = ImDrawCmd.new(cmd_list[:CmdBuffer][:Data] + ImDrawCmd.size * cmd_i)
         if pcmd[:UserCallback] != nil
-          # [TODO] Handle user callback (Ref.: https://github.com/ffi/ffi/wiki/Callbacks )
-
-          #  User callback, registered via ImDrawList::AddCallback()
-          #  (ImDrawCallback_ResetRenderState is a special callback value used by the user to request the renderer to reset render state.)
-          # if pcmd[:UserCallback] == :ImDrawCallback_ResetRenderState
-              ImGui_ImplOpenGL3_SetupRenderState(draw_data, fb_width, fb_height, vertex_array_object)
-          # else
-          #   pcmd[:UserCallback](cmd_list, pcmd)
-          # end
-        else
-          #  Project scissor/clipping rectangles into framebuffer space
-          clip_rect = ImVec4.new
-          clip_rect[:x] = (pcmd[:ClipRect][:x] - clip_off[:x]) * clip_scale[:x]
-          clip_rect[:y] = (pcmd[:ClipRect][:y] - clip_off[:y]) * clip_scale[:y]
-          clip_rect[:z] = (pcmd[:ClipRect][:z] - clip_off[:x]) * clip_scale[:x]
-          clip_rect[:w] = (pcmd[:ClipRect][:w] - clip_off[:y]) * clip_scale[:y]
-
-          if (clip_rect[:x] < fb_width && clip_rect[:y] < fb_height && clip_rect[:z] >= 0.0 && clip_rect[:w] >= 0.0)
-            #  Apply scissor/clipping rectangle
-            GL.Scissor(clip_rect[:x].to_i, (fb_height - clip_rect[:w]).to_i, (clip_rect[:z] - clip_rect[:x]).to_i, (clip_rect[:w] - clip_rect[:y]).to_i)
-
-            #  Bind texture, Draw
-            GL.BindTexture(GL::TEXTURE_2D, pcmd.GetTexID())
-
-            if @@g_GlVersion >= 3200
-              # 2 == ImDrawIdx(:ushort).size
-              GL.DrawElementsBaseVertex(GL::TRIANGLES, pcmd[:ElemCount], GL::UNSIGNED_SHORT, Fiddle::Pointer.new(pcmd[:IdxOffset] * 2), pcmd[:VtxOffset])
-            else
-              # 2 == ImDrawIdx(:ushort).size
-              GL.DrawElements(GL::TRIANGLES, pcmd[:ElemCount], GL::UNSIGNED_SHORT, Fiddle::Pointer.new(pcmd[:IdxOffset] * 2))
-            end
-          end
+          # Reset callback token is not exposed cleanly in current bindings, so keep old behavior.
+          ImplOpenGL3_SetupRenderState(draw_data, fb_width, fb_height, vertex_array_object)
+          next
+        end
 
+        clip_min_x = (pcmd[:ClipRect][:x] - clip_off[:x]) * clip_scale[:x]
+        clip_min_y = (pcmd[:ClipRect][:y] - clip_off[:y]) * clip_scale[:y]
+        clip_max_x = (pcmd[:ClipRect][:z] - clip_off[:x]) * clip_scale[:x]
+        clip_max_y = (pcmd[:ClipRect][:w] - clip_off[:y]) * clip_scale[:y]
+
+        next if clip_max_x <= clip_min_x || clip_max_y <= clip_min_y
+
+        GL.Scissor(clip_min_x.to_i, (fb_height - clip_max_y).to_i, (clip_max_x - clip_min_x).to_i, (clip_max_y - clip_min_y).to_i)
+
+        GL.BindTexture(GL::TEXTURE_2D, pcmd.GetTexID())
+        if @@g_GlVersion >= 320
+          GL.DrawElementsBaseVertex(GL::TRIANGLES, pcmd[:ElemCount], GL::UNSIGNED_SHORT, Fiddle::Pointer.new(pcmd[:IdxOffset] * 2), pcmd[:VtxOffset])
+        else
+          GL.DrawElements(GL::TRIANGLES, pcmd[:ElemCount], GL::UNSIGNED_SHORT, Fiddle::Pointer.new(pcmd[:IdxOffset] * 2))
         end
-        # idx_buffer += pcmd[:ElemCount] * 2 # 2 == ImDrawIdx(:ushort).size
       end
     end
 
-    # Destroy the temporary VAO
     GL.DeleteVertexArrays(1, [vertex_array_object].pack('L'))
 
-    #  Restore modified GL state
     GL.UseProgram(last_program.unpack1('L'))
     GL.BindTexture(GL::TEXTURE_2D, last_texture.unpack1('L'))
-    GL.BindSampler(0, last_sampler.unpack1('L'))
+    GL.BindSampler(0, last_sampler.unpack1('L')) if has_sampler
     GL.ActiveTexture(last_active_texture.unpack1('L'))
     GL.BindVertexArray(last_vertex_array_object.unpack1('L'))
     GL.BindBuffer(GL::ARRAY_BUFFER, last_array_buffer.unpack1('L'))
+
     GL.BlendEquationSeparate(last_blend_equation_rgb.unpack1('L'), last_blend_equation_alpha.unpack1('L'))
+    GL.BlendFuncSeparate(
+      last_blend_src_rgb.unpack1('L'),
+      last_blend_dst_rgb.unpack1('L'),
+      last_blend_src_alpha.unpack1('L'),
+      last_blend_dst_alpha.unpack1('L')
+    )
 
     if last_enable_blend then GL.Enable(GL::BLEND) else GL.Disable(GL::BLEND) end
     if last_enable_cull_face then GL.Enable(GL::CULL_FACE) else GL.Disable(GL::CULL_FACE) end
@@ -209,17 +235,15 @@ module ImGui
 
     last_polygon_mode = last_polygon_mode.unpack('L2')
     GL.PolygonMode(GL::FRONT_AND_BACK, last_polygon_mode[0])
+
     last_viewport = last_viewport.unpack('L4')
     GL.Viewport(last_viewport[0], last_viewport[1], last_viewport[2], last_viewport[3])
+
     last_scissor_box = last_scissor_box.unpack('L4')
     GL.Scissor(last_scissor_box[0], last_scissor_box[1], last_scissor_box[2], last_scissor_box[3])
-
   end
 
-  # private
-
   def self.ImplOpenGL3_SetupRenderState(draw_data, fb_width, fb_height, vertex_array_object)
-    # Setup render state: alpha-blending enabled, no face culling, no depth testing, scissor enabled, polygon fill
     GL.Enable(GL::BLEND)
     GL.BlendEquation(GL::FUNC_ADD)
     GL.BlendFuncSeparate(GL::SRC_ALPHA, GL::ONE_MINUS_SRC_ALPHA, GL::ONE, GL::ONE_MINUS_SRC_ALPHA)
@@ -227,30 +251,30 @@ module ImGui
     GL.Disable(GL::DEPTH_TEST)
     GL.Disable(GL::STENCIL_TEST)
     GL.Enable(GL::SCISSOR_TEST)
-    GL.PolygonMode(GL::FRONT_AND_BACK, GL::FILL) # GL::POLYGON_MODE
+    GL.PolygonMode(GL::FRONT_AND_BACK, GL::FILL)
 
-    # Setup viewport, orthographic projection matrix
-    # Our visible imgui space lies from draw_data->DisplayPos (top left) to draw_data->DisplayPos+data_data->DisplaySize (bottom right). DisplayPos is (0,0) for single viewport apps.
     GL.Viewport(0, 0, fb_width, fb_height)
     l = draw_data[:DisplayPos][:x]
     r = draw_data[:DisplayPos][:x] + draw_data[:DisplaySize][:x]
     t = draw_data[:DisplayPos][:y]
     b = draw_data[:DisplayPos][:y] + draw_data[:DisplaySize][:y]
+
     ortho_projection = [
-        2.0/(r-l),   0.0,         0.0,   0.0,
-        0.0,         2.0/(t-b),   0.0,   0.0,
-        0.0,         0.0,        -1.0,   0.0,
-        (r+l)/(l-r),  (t+b)/(b-t),  0.0,   1.0,
+      2.0 / (r - l), 0.0, 0.0, 0.0,
+      0.0, 2.0 / (t - b), 0.0, 0.0,
+      0.0, 0.0, -1.0, 0.0,
+      (r + l) / (l - r), (t + b) / (b - t), 0.0, 1.0,
     ]
+
     GL.UseProgram(@@g_ShaderHandle)
     GL.Uniform1i(@@g_AttribLocationTex, 0)
     GL.UniformMatrix4fv(@@g_AttribLocationProjMtx, 1, GL::FALSE, ortho_projection.pack('F16'))
-    # GL::SAMPLER_BINDING
-    GL.BindSampler(0, 0) # We use combined texture/sampler state. Applications using GL 3.3 may set that otherwise.
 
-    GL.BindVertexArray(vertex_array_object)
+    if defined?(GL::SAMPLER_BINDING)
+      GL.BindSampler(0, 0)
+    end
 
-    # Bind vertex/index buffers and setup attributes for ImDrawVert
+    GL.BindVertexArray(vertex_array_object)
     GL.BindBuffer(GL::ARRAY_BUFFER, @@g_VboHandle)
     GL.BindBuffer(GL::ELEMENT_ARRAY_BUFFER, @@g_ElementsHandle)
 
@@ -258,67 +282,139 @@ module ImGui
     GL.EnableVertexAttribArray(@@g_AttribLocationVtxUV)
     GL.EnableVertexAttribArray(@@g_AttribLocationVtxColor)
 
-    GL.VertexAttribPointer(@@g_AttribLocationVtxPos,   2, GL::FLOAT,         GL::FALSE, ImDrawVert.size, ImDrawVert.offset_of(:pos))
-    GL.VertexAttribPointer(@@g_AttribLocationVtxUV,    2, GL::FLOAT,         GL::FALSE, ImDrawVert.size, ImDrawVert.offset_of(:uv))
-    GL.VertexAttribPointer(@@g_AttribLocationVtxColor, 4, GL::UNSIGNED_BYTE, GL::TRUE,  ImDrawVert.size, ImDrawVert.offset_of(:col))
-
+    GL.VertexAttribPointer(@@g_AttribLocationVtxPos, 2, GL::FLOAT, GL::FALSE, ImDrawVert.size, ImDrawVert.offset_of(:pos))
+    GL.VertexAttribPointer(@@g_AttribLocationVtxUV, 2, GL::FLOAT, GL::FALSE, ImDrawVert.size, ImDrawVert.offset_of(:uv))
+    GL.VertexAttribPointer(@@g_AttribLocationVtxColor, 4, GL::UNSIGNED_BYTE, GL::TRUE, ImDrawVert.size, ImDrawVert.offset_of(:col))
   end
 
+  # Compatibility wrapper retained for older caller code.
   def self.ImplOpenGL3_CreateFontsTexture()
-    #  Build texture atlas
-    io = ImGuiIO.new(ImGui::GetIO())
-    pixels = FFI::MemoryPointer.new :pointer
-    width = FFI::MemoryPointer.new :int
-    height = FFI::MemoryPointer.new :int
-    io[:Fonts].GetTexDataAsRGBA32(pixels, width, height, nil)   #  Load as RGBA 32-bits (75% of the memory is wasted, but default font is so small) because it is more likely to be compatible with user's existing shaders. If your ImTextureId represent a higher-level concept than just a GL texture id, consider calling GetTexDataAsAlpha8() instead to save on GPU memory.
+    true
+  end
 
-    #  Upload texture to graphics system
-    last_texture = ' ' * 4
-    @@g_FontTexture = ' ' * 4
-    GL.GetIntegerv(GL::TEXTURE_BINDING_2D, last_texture)
-    GL.GenTextures(1, @@g_FontTexture)
-    GL.BindTexture(GL::TEXTURE_2D, @@g_FontTexture.unpack1('L'))
-    GL.TexParameteri(GL::TEXTURE_2D, GL::TEXTURE_MIN_FILTER, GL::LINEAR)
-    GL.TexParameteri(GL::TEXTURE_2D, GL::TEXTURE_MAG_FILTER, GL::LINEAR)
-    GL.PixelStorei(GL::UNPACK_ROW_LENGTH, 0)
-    # Ruby/FFI <-> Fiddle pointer exchange
-    # p pixels
-    # p pixels.read_pointer
-    # p pixels.read_pointer.address.to_s(16)
-    pixels_ptr = Fiddle::Pointer.new(pixels.read_pointer.address)
-    GL.TexImage2D(GL::TEXTURE_2D, 0, GL::RGBA, width.read_uint, height.read_uint, 0, GL::RGBA, GL::UNSIGNED_BYTE, pixels_ptr)
-
-    #  Store our identifier
-    io[:Fonts][:TexID] = @@g_FontTexture.unpack1('L')
-
-    #  Restore state
-    GL.BindTexture(GL::TEXTURE_2D, last_texture.unpack1('L'))
+  # Compatibility wrapper retained for older caller code.
+  def self.ImplOpenGL3_DestroyFontsTexture()
+    nil
+  end
 
-    return true
+  def self.ImplOpenGL3_ProcessTextureUpdates(draw_data)
+    textures_ptr = draw_data[:Textures]
+    return if textures_ptr.nil? || textures_ptr.null?
+
+    textures = ImVector.new(textures_ptr)
+    data_ptr = textures[:Data]
+    pointer_stride = FFI::Pointer.size
+
+    textures[:Size].times do |i|
+      tex_ptr = (data_ptr + pointer_stride * i).read_pointer
+      next if tex_ptr.nil? || tex_ptr.null?
+
+      tex = ImTextureData.new(tex_ptr)
+      ImplOpenGL3_UpdateTexture(tex) if tex[:Status] != ImTextureStatus_OK
+    end
   end
 
-  def self.ImplOpenGL3_DestroyFontsTexture()
-    if @@g_FontTexture != 0
-      GL.DeleteTextures(1, @@g_FontTexture)
-      io = ImGuiIO.new(ImGui::GetIO())
-      io[:Fonts][:TexID] = 0
-      @@g_FontTexture = 0
+  def self.ImplOpenGL3_DestroyTexture(tex)
+    gl_tex_id = tex.GetTexID()
+    if gl_tex_id != 0
+      GL.DeleteTextures(1, [gl_tex_id].pack('L'))
+    end
+
+    tex.SetTexID(0)
+    tex.SetStatus(ImTextureStatus_Destroyed)
+  end
+
+  def self.ImplOpenGL3_AsGLPointer(pointer)
+    return nil if pointer.nil? || pointer.null?
+
+    Fiddle::Pointer.new(pointer.to_i)
+  end
+
+  def self.ImplOpenGL3_UpdateTexture(tex)
+    status = tex[:Status]
+
+    if status == ImTextureStatus_WantCreate || status == ImTextureStatus_WantUpdates
+      GL.PixelStorei(GL::UNPACK_ROW_LENGTH, 0) if defined?(GL::UNPACK_ROW_LENGTH)
+      GL.PixelStorei(GL::UNPACK_ALIGNMENT, 1) if defined?(GL::UNPACK_ALIGNMENT)
+    end
+
+    if status == ImTextureStatus_WantCreate
+      return unless tex[:Format] == ImTextureFormat_RGBA32
+
+      last_texture = ' ' * 4
+      GL.GetIntegerv(GL::TEXTURE_BINDING_2D, last_texture)
+
+      texture_mem = ' ' * 4
+      GL.GenTextures(1, texture_mem)
+      gl_texture_id = texture_mem.unpack1('L')
+
+      GL.BindTexture(GL::TEXTURE_2D, gl_texture_id)
+      GL.TexParameteri(GL::TEXTURE_2D, GL::TEXTURE_MIN_FILTER, GL::LINEAR)
+      GL.TexParameteri(GL::TEXTURE_2D, GL::TEXTURE_MAG_FILTER, GL::LINEAR)
+      GL.TexParameteri(GL::TEXTURE_2D, GL::TEXTURE_WRAP_S, GL::CLAMP_TO_EDGE)
+      GL.TexParameteri(GL::TEXTURE_2D, GL::TEXTURE_WRAP_T, GL::CLAMP_TO_EDGE)
+
+      pixels_ptr = ImplOpenGL3_AsGLPointer(tex[:Pixels])
+      GL.TexImage2D(GL::TEXTURE_2D, 0, GL::RGBA, tex[:Width], tex[:Height], 0, GL::RGBA, GL::UNSIGNED_BYTE, pixels_ptr)
+
+      tex.SetTexID(gl_texture_id)
+      tex.SetStatus(ImTextureStatus_OK)
+
+      GL.BindTexture(GL::TEXTURE_2D, last_texture.unpack1('L'))
+      return
+    end
+
+    if status == ImTextureStatus_WantUpdates
+      last_texture = ' ' * 4
+      GL.GetIntegerv(GL::TEXTURE_BINDING_2D, last_texture)
+
+      GL.BindTexture(GL::TEXTURE_2D, tex.GetTexID())
+
+      updates = tex[:Updates]
+      updates_ptr = updates[:Data]
+
+      if !updates_ptr.nil? && !updates_ptr.null?
+        if defined?(GL::UNPACK_ROW_LENGTH)
+          GL.PixelStorei(GL::UNPACK_ROW_LENGTH, tex[:Width])
+
+          updates[:Size].times do |i|
+            rect = ImTextureRect.new(updates_ptr + i * ImTextureRect.size)
+            pixels_ptr = ImplOpenGL3_AsGLPointer(tex.GetPixelsAt(rect[:x], rect[:y]))
+            GL.TexSubImage2D(GL::TEXTURE_2D, 0, rect[:x], rect[:y], rect[:w], rect[:h], GL::RGBA, GL::UNSIGNED_BYTE, pixels_ptr)
+          end
+
+          GL.PixelStorei(GL::UNPACK_ROW_LENGTH, 0)
+        else
+          updates[:Size].times do |i|
+            rect = ImTextureRect.new(updates_ptr + i * ImTextureRect.size)
+            rect[:h].times do |line|
+              pixels_ptr = ImplOpenGL3_AsGLPointer(tex.GetPixelsAt(rect[:x], rect[:y] + line))
+              GL.TexSubImage2D(GL::TEXTURE_2D, 0, rect[:x], rect[:y] + line, rect[:w], 1, GL::RGBA, GL::UNSIGNED_BYTE, pixels_ptr)
+            end
+          end
+        end
+      end
+
+      tex.SetStatus(ImTextureStatus_OK)
+      GL.BindTexture(GL::TEXTURE_2D, last_texture.unpack1('L'))
+      return
+    end
+
+    if status == ImTextureStatus_WantDestroy && tex[:UnusedFrames] > 0
+      ImplOpenGL3_DestroyTexture(tex)
     end
   end
 
   def self.ImplOpenGL3_CreateDeviceObjects()
-    # Backup GL state
-    last_texture, last_array_buffer = ' ' * 4, ' ' * 4
+    last_texture = ' ' * 4
+    last_array_buffer = ' ' * 4
     GL.GetIntegerv(GL::TEXTURE_BINDING_2D, last_texture)
     GL.GetIntegerv(GL::ARRAY_BUFFER_BINDING, last_array_buffer)
-    last_texture = last_texture.unpack1('L')
-    last_array_buffer = last_array_buffer.unpack1('L')
 
     last_vertex_array = ' ' * 4
     GL.GetIntegerv(GL::VERTEX_ARRAY_BINDING, last_vertex_array)
-    last_vertex_array = last_vertex_array.unpack1('L')
 
-    glsl_version = @@g_GlslVersionString.split[1].to_i # == scanf(@@g_GlslVersionString, "#version %d")
+    glsl_version = @@g_GlslVersionString.split[1].to_i
 
     vertex_shader_glsl_120 = <<-'SRC'
     uniform mat4 ProjMtx;
@@ -351,7 +447,7 @@ module ImGui
     SRC
 
     vertex_shader_glsl_300_es = <<-'SRC'
-    precision mediump float;
+    precision highp float;
     layout (location = 0) in vec2 Position;
     layout (location = 1) in vec2 UV;
     layout (location = 2) in vec4 Color;
@@ -382,7 +478,7 @@ module ImGui
     SRC
 
     fragment_shader_glsl_120 = <<-'SRC'
-    #ifdef GL::ES
+    #ifdef GL_ES
         precision mediump float;
     #endif
     uniform sampler2D Texture;
@@ -438,55 +534,45 @@ module ImGui
                                        [vertex_shader_glsl_130, fragment_shader_glsl_130]
                                      end
 
-    vertex_shader.prepend(@@g_GlslVersionString + "\n")
     vert_handle = GL.CreateShader(GL::VERTEX_SHADER)
-    GL.ShaderSource(vert_handle, 1, [vertex_shader].pack('p'), nil)
+    GL.ShaderSource(vert_handle, 2, [@@g_GlslVersionString, vertex_shader].pack('p*'), nil)
     GL.CompileShader(vert_handle)
-    PrintShaderCompileStatus(vert_handle)
+    return false unless PrintShaderCompileStatus(vert_handle)
 
-    fragment_shader.prepend(@@g_GlslVersionString + "\n")
     frag_handle = GL.CreateShader(GL::FRAGMENT_SHADER)
-    GL.ShaderSource(frag_handle, 1, [fragment_shader].pack('p'), [fragment_shader.size].pack('I'))
+    GL.ShaderSource(frag_handle, 2, [@@g_GlslVersionString, fragment_shader].pack('p*'), nil)
     GL.CompileShader(frag_handle)
-    PrintShaderCompileStatus(frag_handle)
+    return false unless PrintShaderCompileStatus(frag_handle)
 
     @@g_ShaderHandle = GL.CreateProgram()
     GL.AttachShader(@@g_ShaderHandle, vert_handle)
     GL.AttachShader(@@g_ShaderHandle, frag_handle)
     GL.LinkProgram(@@g_ShaderHandle)
-    PrintProgramLinkStatus(@@g_ShaderHandle)
+    return false unless PrintProgramLinkStatus(@@g_ShaderHandle)
 
     GL.DetachShader(@@g_ShaderHandle, vert_handle)
     GL.DetachShader(@@g_ShaderHandle, frag_handle)
     GL.DeleteShader(vert_handle)
     GL.DeleteShader(frag_handle)
 
-    @@g_AttribLocationTex = GL.GetUniformLocation(@@g_ShaderHandle, "Texture")
-    @@g_AttribLocationProjMtx = GL.GetUniformLocation(@@g_ShaderHandle, "ProjMtx")
+    @@g_AttribLocationTex = GL.GetUniformLocation(@@g_ShaderHandle, 'Texture')
+    @@g_AttribLocationProjMtx = GL.GetUniformLocation(@@g_ShaderHandle, 'ProjMtx')
+    @@g_AttribLocationVtxPos = GL.GetAttribLocation(@@g_ShaderHandle, 'Position')
+    @@g_AttribLocationVtxUV = GL.GetAttribLocation(@@g_ShaderHandle, 'UV')
+    @@g_AttribLocationVtxColor = GL.GetAttribLocation(@@g_ShaderHandle, 'Color')
 
-    @@g_AttribLocationVtxPos = GL.GetAttribLocation(@@g_ShaderHandle, "Position")
-    @@g_AttribLocationVtxUV = GL.GetAttribLocation(@@g_ShaderHandle, "UV")
-    @@g_AttribLocationVtxColor = GL.GetAttribLocation(@@g_ShaderHandle, "Color")
+    vbo_mem = ' ' * 4
+    elem_mem = ' ' * 4
+    GL.GenBuffers(1, vbo_mem)
+    GL.GenBuffers(1, elem_mem)
+    @@g_VboHandle = vbo_mem.unpack1('L')
+    @@g_ElementsHandle = elem_mem.unpack1('L')
 
-    # Create buffers
-    posBuf = ' ' * 4
-    GL.GenBuffers(1, posBuf)
-    GL.BindBuffer(GL::ARRAY_BUFFER, posBuf.unpack('L')[0])
-
-    @@g_VboHandle, @@g_ElementsHandle = ' ' * 4, ' ' * 4
-    GL.GenBuffers(1, @@g_VboHandle)
-    GL.GenBuffers(1, @@g_ElementsHandle)
-    @@g_VboHandle = @@g_VboHandle.unpack1('L')
-    @@g_ElementsHandle = @@g_ElementsHandle.unpack1('L')
-
-    ImplOpenGL3_CreateFontsTexture()
-
-    # Restore modified GL state
-    GL.BindTexture(GL::TEXTURE_2D, last_texture)
-    GL.BindBuffer(GL::ARRAY_BUFFER, last_array_buffer)
-    GL.BindVertexArray(last_vertex_array)
+    GL.BindTexture(GL::TEXTURE_2D, last_texture.unpack1('L'))
+    GL.BindBuffer(GL::ARRAY_BUFFER, last_array_buffer.unpack1('L'))
+    GL.BindVertexArray(last_vertex_array.unpack1('L'))
 
-    return true
+    true
   end
 
   def self.ImplOpenGL3_DestroyDeviceObjects()
@@ -494,16 +580,32 @@ module ImGui
       GL.DeleteBuffers(1, [@@g_VboHandle].pack('L'))
       @@g_VboHandle = 0
     end
+
     if @@g_ElementsHandle != 0
       GL.DeleteBuffers(1, [@@g_ElementsHandle].pack('L'))
       @@g_ElementsHandle = 0
     end
+
     if @@g_ShaderHandle != 0
       GL.DeleteProgram(@@g_ShaderHandle)
       @@g_ShaderHandle = 0
     end
 
-    ImplOpenGL3_DestroyFontsTexture()
+    # Destroy textures retained only by the renderer backend.
+    platform_io = ImGuiPlatformIO.new(ImGui::GetPlatformIO())
+    textures = platform_io[:Textures]
+    tex_data = textures[:Data]
+
+    if !tex_data.nil? && !tex_data.null?
+      pointer_stride = FFI::Pointer.size
+      textures[:Size].times do |i|
+        tex_ptr = (tex_data + pointer_stride * i).read_pointer
+        next if tex_ptr.nil? || tex_ptr.null?
+
+        tex = ImTextureData.new(tex_ptr)
+        ImplOpenGL3_DestroyTexture(tex) if tex[:RefCount] == 1
+      end
+    end
   end
 
 end