opengl3 0.0.1.pre1

data/lib/opengl/raw/core/4_1/GL_ARB_vertex_attrib_64bit.yml

@@ -0,0 +1,61 @@
+---
+glVertexAttribL1d:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLdouble x
+glVertexAttribL2d:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLdouble x
+  - GLdouble y
+glVertexAttribL3d:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLdouble x
+  - GLdouble y
+  - GLdouble z
+glVertexAttribL4d:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLdouble x
+  - GLdouble y
+  - GLdouble z
+  - GLdouble w
+glVertexAttribL1dv:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLdouble_in v
+glVertexAttribL2dv:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLdouble_in v
+glVertexAttribL3dv:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLdouble_in v
+glVertexAttribL4dv:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLdouble_in v
+glVertexAttribLPointer:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLint size
+  - GLenum type
+  - GLsizei stride
+  - buffer_in pointer
+glGetVertexAttribLdv:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLenum pname
+  - GLdouble_out params

data/lib/opengl/raw/core/4_1/GL_ARB_viewport_array.yml

@@ -0,0 +1,63 @@
+---
+glViewportArrayv:
+  return_type: void
+  parameters:
+  - GLuint first
+  - GLsizei count
+  - GLfloat_in v
+glViewportIndexedf:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLfloat x
+  - GLfloat y
+  - GLfloat w
+  - GLfloat h
+glViewportIndexedfv:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLfloat_in v
+glScissorArrayv:
+  return_type: void
+  parameters:
+  - GLuint first
+  - GLsizei count
+  - GLint_in v
+glScissorIndexed:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLint left
+  - GLint bottom
+  - GLsizei width
+  - GLsizei height
+glScissorIndexedv:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLint_in v
+glDepthRangeArrayv:
+  return_type: void
+  parameters:
+  - GLuint first
+  - GLsizei count
+  - GLdouble_in v
+glDepthRangeIndexed:
+  return_type: void
+  parameters:
+  - GLuint index
+  - GLdouble n
+  - GLdouble f
+glGetFloati_v:
+  return_type: void
+  parameters:
+  - GLenum target
+  - GLuint index
+  - GLfloat_out data
+glGetDoublei_v:
+  return_type: void
+  parameters:
+  - GLenum target
+  - GLuint index
+  - GLdouble_out data

data/lib/opengl/raw/core/4_1/GL_VERSION_4_1.yml

@@ -0,0 +1 @@
+{}

data/lib/opengl/raw/core/4_2/GL_ARB_base_instance.yml

@@ -0,0 +1,28 @@
+---
+glDrawArraysInstancedBaseInstance:
+  return_type: void
+  parameters:
+  - GLenum mode
+  - GLint first
+  - GLsizei count
+  - GLsizei instancecount
+  - GLuint baseinstance
+glDrawElementsInstancedBaseInstance:
+  return_type: void
+  parameters:
+  - GLenum mode
+  - GLsizei count
+  - GLenum type
+  - buffer_in indices
+  - GLsizei instancecount
+  - GLuint baseinstance
+glDrawElementsInstancedBaseVertexBaseInstance:
+  return_type: void
+  parameters:
+  - GLenum mode
+  - GLsizei count
+  - GLenum type
+  - buffer_in indices
+  - GLsizei instancecount
+  - GLint basevertex
+  - GLuint baseinstance

data/lib/opengl/raw/core/4_2/GL_ARB_internalformat_query.yml

@@ -0,0 +1,9 @@
+---
+glGetInternalformativ:
+  return_type: void
+  parameters:
+  - GLenum target
+  - GLenum internalformat
+  - GLenum pname
+  - GLsizei bufSize
+  - GLint_out params

data/lib/opengl/raw/core/4_2/GL_ARB_shader_atomic_counters.yml

@@ -0,0 +1,8 @@
+---
+glGetActiveAtomicCounterBufferiv:
+  return_type: void
+  parameters:
+  - GLuint program
+  - GLuint bufferIndex
+  - GLenum pname
+  - GLint_out params

data/lib/opengl/raw/core/4_2/GL_ARB_shader_image_load_store.yml

@@ -0,0 +1,15 @@
+---
+glBindImageTexture:
+  return_type: void
+  parameters:
+  - GLuint unit
+  - GLuint texture
+  - GLint level
+  - GLboolean layered
+  - GLint layer
+  - GLenum access
+  - GLenum format
+glMemoryBarrier:
+  return_type: void
+  parameters:
+  - GLbitfield barriers

data/lib/opengl/raw/core/4_2/GL_ARB_texture_storage.yml

@@ -0,0 +1,52 @@
+---
+glTexStorage1D:
+  return_type: void
+  parameters:
+  - GLenum target
+  - GLsizei levels
+  - GLenum internalformat
+  - GLsizei width
+glTexStorage2D:
+  return_type: void
+  parameters:
+  - GLenum target
+  - GLsizei levels
+  - GLenum internalformat
+  - GLsizei width
+  - GLsizei height
+glTexStorage3D:
+  return_type: void
+  parameters:
+  - GLenum target
+  - GLsizei levels
+  - GLenum internalformat
+  - GLsizei width
+  - GLsizei height
+  - GLsizei depth
+glTextureStorage1DEXT:
+  return_type: void
+  parameters:
+  - GLuint texture
+  - GLenum target
+  - GLsizei levels
+  - GLenum internalformat
+  - GLsizei width
+glTextureStorage2DEXT:
+  return_type: void
+  parameters:
+  - GLuint texture
+  - GLenum target
+  - GLsizei levels
+  - GLenum internalformat
+  - GLsizei width
+  - GLsizei height
+glTextureStorage3DEXT:
+  return_type: void
+  parameters:
+  - GLuint texture
+  - GLenum target
+  - GLsizei levels
+  - GLenum internalformat
+  - GLsizei width
+  - GLsizei height
+  - GLsizei depth

data/lib/opengl/raw/core/4_2/GL_ARB_transform_feedback_instanced.yml

@@ -0,0 +1,14 @@
+---
+glDrawTransformFeedbackInstanced:
+  return_type: void
+  parameters:
+  - GLenum mode
+  - GLuint id
+  - GLsizei instancecount
+glDrawTransformFeedbackStreamInstanced:
+  return_type: void
+  parameters:
+  - GLenum mode
+  - GLuint id
+  - GLuint stream
+  - GLsizei instancecount

data/lib/opengl/raw/core/4_2/GL_VERSION_4_2.yml

@@ -0,0 +1 @@
+{}

data/lib/opengl/type.rb

@@ -0,0 +1,74 @@
+require 'ffi'
+require_relative 'platform'
+
+module OpenGL
+  module Type
+    
+    @primitive_types = Platform.current.primitive_types.dup
+    #@regex_buffer_in_types = /\A(#{@primitive_types.keys.join('|')})_in\z/
+    #@regex_buffer_out_types = /\A(#{@primitive_types.keys.join('|')})_out\z/
+    
+    @type_map = Hash[
+      @primitive_types.to_a +
+      @primitive_types.keys.map {|t| [:"#{t}_in", :buffer_in] } +
+      @primitive_types.keys.map {|t| [:"#{t}_out", :buffer_out] } + 
+      [ [:pointer_out, :buffer_out], [:pointer_in, :buffer_in] ] + 
+      [ [:GLchar_pointer_in, :buffer_in] ]
+    ]
+    
+    def self.find(type)
+      type = type.to_sym
+      type = @type_map.fetch(type, type)
+      if RUBY_ENGINE == "rbx" # work around for Rubinius
+        [:buffer_in, :buffer_out].include?(type) ? :pointer : type
+      else
+        type
+      end
+    end
+    
+    MemoryPointerInstanceMethods = Module.new
+    @primitive_types.each do |gl_type, old_type|
+      code = <<-RUBY
+        def read_array_of_#{gl_type}(n)
+          read_array_of_#{old_type}(n)
+        end
+        def get_array_of_#{gl_type}(off, n)
+          get_array_of_#{old_type}(off, n)
+        end
+        def write_array_of_#{gl_type}(ary)
+          write_array_of_#{old_type}(ary)
+        end
+        def put_array_of_#{gl_type}(off, ary)
+          put_array_of_#{old_type}(off, ary)
+        end
+      RUBY
+      MemoryPointerInstanceMethods.module_eval code, __FILE__, __LINE__
+    end
+    
+    @primitive_types.each do |gl_type, old_type|
+      code = <<-RUBY
+        def self.#{gl_type}(n)
+          ptr = pointer(FFI::MemoryPointer.new(:#{old_type}, n))
+          if block_given?
+            yield ptr
+          else
+            return ptr
+          end
+        end
+      RUBY
+      self.module_eval code, __FILE__, __LINE__
+    end
+    
+    def self.pointer(ptr = nil)
+      if ptr.is_a? Integer
+        ptr = FFI::MemoryPointer(:pointer, n)
+      end
+      ptr.extend MemoryPointerInstanceMethods
+    end
+    
+    def self.to_boolean(bool)
+      (bool && bool != 0) ? Constants::GL_TRUE : Constants::GL_FALSE
+    end
+    
+  end
+end

data/lib/opengl/version.rb

@@ -0,0 +1,3 @@
+module OpenGL
+  VERSION = "0.0.1.pre1"
+end

data/lib/opengl/wrapper.rb

@@ -0,0 +1,13 @@
+require_relative 'raw'
+
+module OpenGL::Wrapper
+  ROOT = File.expand_path('../wrapper', __FILE__)
+end
+
+Dir[File.join(OpenGL::Wrapper::ROOT, 'macros', '**', '*.rb')].each do |path|
+  require path
+end
+
+Dir[File.join(OpenGL::Wrapper::ROOT, "**", "GL_*.rb")].each do |path|
+  require path
+end

data/lib/opengl/wrapper/core/2_x/GL_VERSION_1_0.rb

@@ -0,0 +1,165 @@
+module OpenGL
+  module Wrapper::GL_VERSION_1_0
+    extend Wrapper::Base
+    
+    # glCullFace
+    #
+    # @method glCullFace
+    # @param [Integer] mode
+    def_wrapped('CullFace')
+    
+    # glFrontFace
+    #
+    # @method glFrontFace
+    # @param [Integer] mode
+    def_wrapped('FrontFace')
+    
+    # glHint
+    #
+    # @method glHint
+    # @param [Integer] target
+    # @param [Integer] mode
+    def_wrapped('Hint')
+    
+    # glLineWidth
+    #
+    # @method glLineWidth
+    # @param [Float] width
+    def_wrapped('LineWidth')
+    
+    # glPointSize
+    #
+    # @method glPointSize
+    # @param [Float] size
+    def_wrapped('PointSize')
+    
+    # glPolygonMode
+    #
+    # @method glPolygonMode
+    # @param [Integer] face
+    # @param [Integer] mode
+    def_wrapped('PolygonMode')
+    
+    # glScissor
+    #
+    # @method glScissor
+    # @param [Integer] x
+    # @param [Integer] y
+    # @param [Integer] width
+    # @param [Integer] height
+    def_wrapped('Scissor')
+    
+    # glTexParameterf
+    #
+    # @method glTexParameterf
+    # @param [Integer] target
+    # @param [Integer] pname
+    # @param [Float] param
+    def_wrapped('TexParameterf')
+    
+    # glTexParameterfv
+    #
+    # @method glTexParameterfv
+    # @param [Integer] target
+    # @param [Integer] pname
+    # @param [Array of Float] params
+    def_glSetValues('TexParameterf', :GLfloat, %w(target pname))
+    
+    # glTexParameteri
+    #
+    # @method glTexParameteri
+    # @param [Integer] target
+    # @param [Integer] pname
+    # @param [Integer] param
+    def_wrapped('TexParameteri')
+    
+    # glTexParameteriv
+    #
+    # @method glTexParameteriv
+    # @param [Integer] target
+    # @param [Integer] pname
+    # @param [Array of Integer] params
+    def_glSetValues('TexParameteri', :GLint, %w(target pname))
+    
+    # glTexImage1D
+    # glTexImage2D
+    # glDrawBuffer
+    # glClear
+    # glClearColor
+    # glClearStencil
+    # glClearDepth
+    # glStencilMask
+    # glColorMask
+    # glDepthMask
+    # glDisable
+    # glEnable
+    # glFinish
+    # glFlush
+    # glBlendFunc
+    # glLogicOp
+    # glStencilFunc
+    # glStencilOp
+    # glDepthFunc
+    # glPixelStoref
+    # glPixelStorei
+    # glReadBuffer
+    # glReadPixels
+    
+    # glGetBooleanv
+    def_glGetValues('Boolean', :GLboolean, %w(pname))
+    
+    # glGetDoublev
+    def_glGetValues('Double', :GLdouble, %w(pname))
+    
+    # glGetError
+    
+    # glGetFloatv
+    def_glGetValues('Float', :GLfloat, %w(pname))
+    
+    # glGetIntegerv
+    def_glGetValues('Integer', :GLint, %w(pname))
+    
+    # glGetString
+    # usage: glGetString() -> String
+    
+    # glGetTexImage
+    
+    # glGetTexParameterfv
+    def_glGetValues('TexParameterf', :GLfloat, %w(target pname))
+    
+    # glGetTexParameteriv
+    def_glGetValues('TexParameteri', :GLint, %w(target pname))
+    
+    # glGetTexLevelParameterfv
+    def_glGetValues('TexLevelParameterf', :GLfloat, %w(target level pname))
+    
+    # glGetTexLevelParameteriv
+    def_glGetValues('TexLevelParameteri', :GLint, %w(target level pname))
+    
+    # glIsEnabled
+    # glDepthRange
+    # glViewport
+    
+    #
+    def glGetVersion(target = Constants::GL_VERSION)
+      mdata = %r{\A(\d+)\.(\d+)}.match(glGetString(target))
+      return [mdata[1].to_i, mdata[2].to_i]
+    end
+    
+    #
+    def glGetShadingLanguageVersion()
+      glGetVersion(Constants::GL_SHADING_LANGUAGE_VERSION)
+    end
+    
+    #
+    def glGetAvailableExtensions()
+      if glGetVersion().first >= 3
+        n = glGetIntegerv(Constants::GL_NUM_EXTENSIONS)[0]
+        return (0...n).map{|i| glGetStringi(Constants::GL_EXTENSIONS, i) }
+      else
+        glGetString(Constants::GL_EXTENSIONS).split()
+      end
+    end
+    
+  end
+end