rb_sdl2 0.1.2 → 0.2.0

data/lib/rb_sdl2/audio.rb

@@ -1,132 +0,0 @@
-module RbSDL2
-  class Audio
-    IS_CAPTURE = -> (capture) { capture ? 1 : 0 }
-    CAPTURE = -> (capture) { capture ? true : false }
-    # AudioStream, AudioCallback の実装は行っていない。
-    # AudioCallback は Ruby 側からまともに使う方法がない。
-    # AudioStream はリアルタイムなリサンプラー、リフォーマッターとして使えるがこれが本当に必要か判らない。
-    class << self
-      def current
-        ptr = ::SDL2.SDL_GetCurrentAudioDriver
-        raise RbSDL2Error, "Audio subsystem has not been initialized" if ptr.null?
-        ptr.read_string
-      end
-
-      require_relative 'audio/audio_device'
-
-      def devices = AudioDevice.devices
-
-      def drivers
-        ::SDL2.SDL_GetNumAudioDrivers.times.map do |num|
-          ptr = ::SDL2.SDL_GetAudioDriver(num)
-          raise RbSDL2Error if ptr.null?
-          ptr.read_string
-        end
-      end
-
-      def init(driver)
-        raise RbSDL2Error if ::SDL2.SDL_AudioInit(driver) < 0
-      end
-
-      require_relative 'audio/audio_buffer'
-
-      def load(...) = AudioBuffer.load(...)
-
-      require_relative 'audio/audio_allowed_changes'
-      require_relative 'audio/audio_format'
-      require_relative 'audio/audio_spec'
-
-      def new(device = nil, capture = false, allowed_changes: {}, channels: 2, format: {},
-              frequency: 48_000, samples: 0)
-        want = AudioSpec.new(channels: channels, format: AudioFormat.to_num(**format),
-                             frequency: frequency, samples: samples)
-        have = AudioSpec.new
-        id = ::SDL2.SDL_OpenAudioDevice(device&.to_s, IS_CAPTURE.(capture), want, have,
-                                        AudioAllowedChanges.to_num(**allowed_changes))
-        raise RbSDL2Error if id == 0
-        super(id, capture, have)
-      end
-      alias open new
-
-      def quit = ::SDL2.SDL_AudioQuit
-    end
-
-    def initialize(id, capture, spec)
-      @capture = CAPTURE.(capture)
-      @closed = false
-      @id = id
-      @spec = spec
-    end
-
-    def capture? = @capture
-
-    def clear
-      raise IOError if closed?
-      ::SDL2.SDL_ClearQueuedAudio(self)
-    end
-
-    def close
-      ::SDL2.SDL_CloseAudioDevice(id) unless @closed
-      @closed = true
-      nil
-    end
-
-    def closed? = @closed
-
-    attr_reader :id
-    alias to_int id
-
-    def pause
-      raise IOError if closed?
-      ::SDL2.SDL_PauseAudioDevice(id, 1)
-    end
-
-    def play
-      raise IOError if closed?
-      ::SDL2.SDL_PauseAudioDevice(id, 0)
-    end
-
-    def read(len)
-      raise IOError if closed?
-      ptr = ::FFI::MemoryPointer.new(len)
-      size = ::SDL2.SDL_DequeueAudio(id, ptr, len)
-      ptr.read_bytes(size)
-    end
-
-    def size
-      raise IOError if closed?
-      ::SDL2.SDL_GetQueuedAudioSize(id)
-    end
-    alias length size
-
-    attr_reader :spec
-
-    require 'forwardable'
-    extend Forwardable
-    def_delegators :spec, *%i(channels chunk_size format frequency samples)
-
-    require_relative 'audio/audio_format'
-    include AudioFormat
-
-    def status
-      raise IOError if closed?
-      ::SDL2.SDL_GetAudioDeviceStatus(id)
-    end
-
-    module AudioStatus
-      def paused? = ::SDL2::SDL_AUDIO_PAUSED == status
-
-      def playing? = ::SDL2::SDL_AUDIO_PLAYING == status
-
-      def stopped? = ::SDL2::SDL_AUDIO_STOPPED == status
-    end
-    include AudioStatus
-
-    def write(data)
-      raise IOError if closed?
-      err = ::SDL2.SDL_QueueAudio(id, data, data.size)
-      raise RbSDL2Error if err < 0
-      data.size
-    end
-  end
-end

data/lib/rb_sdl2/cursor/color_cursor.rb

@@ -1,19 +0,0 @@
-module RbSDL2
-  module Cursor
-    require_relative 'cursor_class'
-
-    class ColorCursor < CursorClass
-      class << self
-        require_relative 'cursor_pointer'
-
-        def new(surface, hot_x = 0, hot_y = 0)
-          # SDL_CreateColorCursor は与えられた surface をコピーする。
-          # 呼び出し後に引数に与えた surface オブジェクトは安全に開放できる。
-          ptr = CursorPointer.new(::SDL2.SDL_CreateColorCursor(surface, hot_x, hot_y))
-          raise RbSDL2Error if ptr.null?
-          super(ptr)
-        end
-      end
-    end
-  end
-end

data/lib/rb_sdl2/cursor/cursor_class.rb

@@ -1,24 +0,0 @@
-module RbSDL2
-  module Cursor
-    class CursorClass
-      def initialize(ptr)
-        @ptr = ptr
-      end
-
-      def current! = Cursor.current = self
-
-      def current? = Cursor.current?(self)
-
-      def hide = Cursor.hide
-
-      def show
-        current!
-        Cursor.show
-      end
-
-      def shown? = Cursor.shown? && current?
-
-      def to_ptr = @ptr
-    end
-  end
-end

data/lib/rb_sdl2/cursor/cursor_pointer.rb

@@ -1,12 +0,0 @@
-module RbSDL2
-  module Cursor
-    class CursorPointer < ::FFI::AutoPointer
-      class << self
-        # カーソルポインターはいつでも開放してよい。
-        # SDL はカレントカーソルが開放されたときはデフォルトカーソルをカレントカーソルに設定する。
-        # デフォルトカーソルは SDL_FreeCursorを呼び出しても開放されない。
-        def release(ptr) = ::SDL2.SDL_FreeCursor(ptr)
-      end
-    end
-  end
-end

data/lib/rb_sdl2/cursor/default_cursor.rb

@@ -1,18 +0,0 @@
-module RbSDL2
-  module Cursor
-    require_relative 'cursor_class'
-
-    class DefaultCursor < CursorClass
-      class << self
-        def new
-          ptr = ::SDL2.SDL_GetDefaultCursor
-          raise RbSDL2Error if ptr.null?
-          super(ptr)
-        end
-      end
-
-      require 'singleton'
-      include Singleton
-    end
-  end
-end

data/lib/rb_sdl2/cursor/system_cursor.rb

@@ -1,45 +0,0 @@
-module RbSDL2
-  module Cursor
-    require_relative 'cursor_class'
-
-    class SystemCursor < CursorClass
-      require_relative 'cursor_pointer'
-
-      @cursors = Array.new(::SDL2::SDL_NUM_SYSTEM_CURSORS)
-
-      class << self
-        private def new(id)
-          return @cursors[id] if @cursors[id]
-
-          ptr = CursorPointer.new(::SDL2.SDL_CreateSystemCursor(id))
-          raise RbSDL2Error if ptr.null?
-          @cursors[id] = super(ptr)
-        end
-
-        def arrow_cursor = new(::SDL2::SDL_SYSTEM_CURSOR_ARROW)
-
-        def crosshair_cursor = new(::SDL2::SDL_SYSTEM_CURSOR_CROSSHAIR)
-
-        def hand_cursor = new(::SDL2::SDL_SYSTEM_CURSOR_HAND)
-
-        def i_beam_cursor = new(::SDL2::SDL_SYSTEM_CURSOR_IBEAM)
-
-        def no_cursor = new(::SDL2::SDL_SYSTEM_CURSOR_NO)
-
-        def size_all_cursor = new(SDL_SYSTEM_CURSOR_SIZEALL)
-
-        def size_ne_sw_cursor = new(::SDL2::SDL_SYSTEM_CURSOR_SIZENESW)
-
-        def size_ns_cursor = new(::SDL2::SDL_SYSTEM_CURSOR_SIZENS)
-
-        def size_nw_se_cursor = new(::SDL2::SDL_SYSTEM_CURSOR_SIZENWSE)
-
-        def size_we_cursor = new(::SDL2::SDL_SYSTEM_CURSOR_SIZEWE)
-
-        def wait_cursor = new(::SDL2::SDL_SYSTEM_CURSOR_WAIT)
-
-        def wait_arrow_cursor = new(::SDL2::SDL_SYSTEM_CURSOR_WAITARROW)
-      end
-    end
-  end
-end

data/lib/rb_sdl2/event.rb

@@ -1,161 +0,0 @@
-module RbSDL2
-  class Event
-    class EventPointer < ::FFI::AutoPointer
-      class << self
-        def malloc
-          ptr = new(::SDL2.SDL_calloc(1, ::SDL2::SDL_Event.size))
-          raise NoMemoryError if ptr.null?
-          ptr
-        end
-
-        def release(ptr)
-          # メンバーのポインターを開放する。
-          Event.to_ptr(ptr).clear
-          ::SDL2.SDL_free(ptr)
-        end
-      end
-    end
-
-    require 'forwardable'
-    extend SingleForwardable
-
-    require_relative 'event/event_filter'
-    def_single_delegators "Event::EventFilter",
-                          *%i(add_watch_callback filter_callback_set filter_callback_defined?
-                          remove_watch_callback)
-
-    require_relative 'event/event_queue'
-    def_single_delegators "Event::EventQueue",
-                          *%i(clear count deq each empty? enq get length peep poll pump push push!
-                          quit? size reject! wait)
-
-    require_relative 'event/event_type'
-    def_single_delegators "Event::EventQueue", *%i(define_user_event disable enable ignore?)
-
-    class << self
-      def new(type: 0, **members)
-        ptr = EventPointer.malloc
-        num = Numeric === type ? type : EventType.to_num(type)
-        ptr.write_uint32(num)
-        obj = super(ptr)
-        if obj.typed?
-          members.each_pair { |sym, val| obj[sym] = val }
-        end
-        obj
-      end
-
-      def to_ptr(ptr)
-        obj = allocate
-        obj.__send__(:initialize, ptr)
-        obj
-      end
-    end
-
-    # UserEvent の data1, data2 メンバー、SysWMEvent の msg メンバーはポインターである。
-    # ポインターとしての読み書きの対応はしている。しかしポインターが指し示すメモリーの管理は行わない。
-    def initialize(ptr)
-      @ptr = ptr
-    end
-
-    def [](sym)
-      raise ArgumentError unless member?(sym)
-
-      case sym
-      when :data
-        member[:data].to_a
-      when :file
-        member[:file].then { |ptr| ptr.null? ? nil : ptr.read_string }
-      when :keysym
-        member[:keysym].then { |st| {scancode: st[:scancode], sym: st[:sym], mod: st[:mod]} }
-      when :text
-        member[:text].to_s
-      else
-        member[sym]
-      end
-    end
-
-    # DropEvent の file メンバーのポインターの管理は行われる。
-    # UserEvent の data1, data2 メンバーと SysWMEvent の msg メンバーはポインターである。
-    # これらのポインターの管理は行ない。アプリケーション側で実装を行うこと。
-    def []=(sym, val)
-      raise FrozenError if frozen?
-      raise ArgumentError unless member?(sym)
-
-      case sym
-      when :data
-        val.each.with_index { |v, i| member[:data][i] = v }
-      when :file
-        if drop_file? || drop_text?
-          _ptr = member[:file]
-
-          member[:file] = if val.nil?
-                            nil
-                          else
-                            c_str = "#{val}\x00"
-                            ptr = ::SDL2.SDL_malloc(c_str.size)
-                            raise NoMemoryError if ptr.null?
-                            ptr.write_bytes(c_str)
-                          end
-
-          ::SDL2.SDL_free(_ptr)
-        else
-          raise ArgumentError
-        end
-      when :keysym
-        val.each { |k, v| member[:keysym][k] = v }
-      when :msg
-        if val.nil? || val.respond_to?(:null?) && val.null? || val.respond_to?(:zero?) && val.zero?
-          raise ArgumentError
-        end
-        member[:msg] = val
-      when :type
-        raise ArgumentError
-      else
-        member[sym] = val
-      end
-    end
-
-    def clear
-      raise FrozenError if frozen?
-      if drop_file? || drop_text?
-        self[:file] = nil
-      end
-      member.clear
-      @st = nil
-      self
-    end
-
-    # deep copy を行う。
-    # これは @ptr が イベントキューの一部（SDL の管理領域）を指している場合があるためである。
-    def initialize_copy(obj)
-      super
-      @ptr = EventPointer.malloc.write_bytes(obj.to_ptr.read_bytes(::SDL2::SDL_Event.size))
-      if drop_file? || drop_text?
-        self[:file] = obj[:file]
-      end
-    end
-
-    def inspect
-      "#<#{self.class.name} ptr=#{@ptr.inspect} name=#{name.inspect} #{to_h}>"
-    end
-
-    protected def member = @st ||= ::SDL2::SDL_Event.new(@ptr)[EventType.to_type(type)]
-
-    def member?(name) = members.include?(name)
-
-    def members = member.members.grep_v(/\Apadding/)
-
-    def name = EventType.to_name(type)
-    alias to_s name
-
-    def to_h = members.map { |sym| [sym, self[sym]] }.to_h
-
-    def to_ptr = @ptr
-
-    def type = to_ptr.read_uint32
-
-    include EventType
-
-    def typed? = type != 0
-  end
-end

data/lib/rb_sdl2/keyboard/key_mod.rb

@@ -1,37 +0,0 @@
-module RbSDL2
-  module Keyboard
-    module KeyMod
-      def mod_key? = ::SDL2::KMOD_NONE != mod
-
-      def l_shift_key? = ::SDL2::KMOD_LSHIFT & mod != 0
-
-      def r_shift_key? = ::SDL2::KMOD_RSHIFT & mod != 0
-
-      def l_ctrl_key? = ::SDL2::KMOD_LCTRL & mod != 0
-
-      def r_ctrl_key? = ::SDL2::KMOD_RCTRL & mod != 0
-
-      def l_alt_key? = ::SDL2::KMOD_LALT & mod != 0
-
-      def r_alt_key? = ::SDL2::KMOD_RALT & mod != 0
-
-      def l_gui_key? = ::SDL2::KMOD_LGUI & mod != 0
-
-      def r_gui_key? = ::SDL2::KMOD_RGUI & mod != 0
-
-      def alt_key? = ::SDL2::KMOD_ALT & mod != 0
-
-      def caps_key? = ::SDL2::KMOD_CAPS & mod != 0
-
-      def ctrl_key? = ::SDL2::KMOD_CTRL & mod != 0
-
-      def gui_key? = ::SDL2::KMOD_GUI & mod != 0
-
-      def mode_key? = ::SDL2::KMOD_MODE & mod != 0
-
-      def num_key? = ::SDL2::KMOD_NUM & mod != 0
-
-      def shift_key? = ::SDL2::KMOD_SHIFT & mod != 0
-    end
-  end
-end

data/lib/rb_sdl2/keyboard/keyboard_state.rb

@@ -1,34 +0,0 @@
-module RbSDL2
-  class KeyboardState
-    require 'singleton'
-    include Singleton
-
-    def initialize
-      num_keys = ::FFI::MemoryPointer.new(:int)
-      # SDL_GetKeyboardState が戻すポインターは SDL がロードされた時点でメモリー確保している。
-      # 戻されたポインターは不変と考えてよい。
-      # SDL_GetKeyboardState は SDL_init より前に呼ぶことができる。
-      # SDL_GetKeyboardState は引数に NULL ポインターを与えた場合にエラーを戻す。
-      @ptr = ::SDL2.SDL_GetKeyboardState(num_keys)
-      raise RbSDL2Error if @ptr.null?
-      @size = num_keys.read_int
-    end
-
-    # nth のキーが押されている場合、nth を戻す。
-    # nth のキーが押されていない、nth が範囲外の場合は nil を戻す。
-    # 真偽値を戻すようにしなかったのは、このメソッドを応用したコードを書く際に index 情報を不要にするためである。
-    # 戻り値が nil | obj なのは Numeric#nonzero? を参考にした。（この戻り値は Ruby において真偽値と同等である）
-    def [](nth)
-      if 0 <= nth && nth < size && @ptr[nth].read_uint8 == ::SDL2::SDL_PRESSED
-        nth
-      end
-    end
-
-    def each = block_given? ? size.times { |i| yield(self[i]) } : to_enum
-
-    attr_reader :size
-    alias length size
-
-    def to_str = @ptr.read_bytes(size)
-  end
-end

data/lib/rb_sdl2/keyboard.rb

@@ -1,50 +0,0 @@
-module RbSDL2
-  module Keyboard
-    class << self
-      def keycode_to_name(keycode) = ::SDL2.SDL_GetKeyName(keycode).read_string
-
-      # 対応するコードが存在しない場合 0 を戻す。戻り値 は nonzero? メソッドをチェーンすることができる。
-      # これは KeyboardState#[] での利用を考慮して設計した。
-      def keycode_to_scancode(keycode) = ::SDL2.SDL_GetScancodeFromKey(keycode)
-
-      def name_to_keycode(name) = ::SDL2.SDL_GetKeyFromName(name)
-
-      def name_to_scancode(name) = ::SDL2.SDL_GetScancodeFromName(name)
-
-      def scancode_to_keycode(scancode) = ::SDL2.SDL_GetKeyFromScancode(scancode)
-
-      def scancode_to_name(scancode) = ::SDL2.SDL_GetScancodeName(scancode).read_string
-    end
-
-    require 'forwardable'
-    extend SingleForwardable
-    require_relative 'keyboard/keyboard_state'
-    def_single_delegators 'KeyboardState.instance', *%i([] each to_str)
-
-    class << self
-      # いずれかのキーが押されている場合に true を戻す。つまり *any key* が押されたということ。
-      def any_key? = each.any?
-
-      # 引数に与えたキー名のキーが押されている場合に対応するスキャンコードを戻す。
-      # 押されていない場合は nil を戻す。
-      # 不正な名前の場合でも例外を戻さない、その場合 0 または nil を戻す。
-      # キー名は SDL が定義したものである。
-      def key?(name) = self[name_to_scancode(name)]
-
-      # 現在押されているキーの名前を配列で戻す。
-      def names = scancodes.map { |num| scancode_to_name(num) }
-
-      # 現在押されているキーのスキャンコードを配列で戻す。
-      def scancodes = each.to_a.compact!
-
-      def mod = ::SDL2.SDL_GetModState
-
-      require_relative 'keyboard/key_mod'
-      include KeyMod
-
-      def mod=(state)
-        ::SDL2::SDL_SetModState(state)
-      end
-    end
-  end
-end

data/lib/rb_sdl2/mouse/window_mouse.rb

@@ -1,17 +0,0 @@
-module RbSDL2
-  module Mouse
-    require_relative 'mouse_class'
-
-    class WindowMouse < MouseClass
-      def position=(*x_y)
-        ptr = ::SDL2.SDL_GetMouseFocus
-        ::SDL2.SDL_WarpMouseInWindow(ptr, *x_y) unless ptr.null?
-      end
-
-      def update
-        self.button = ::SDL2.SDL_GetMouseState(x_ptr, y_ptr)
-        self
-      end
-    end
-  end
-end

data/lib/rb_sdl2/mouse.rb

@@ -1,74 +0,0 @@
-module RbSDL2
-  module Mouse
-    class << self
-      def capture=(bool)
-        err = ::SDL2.SDL_CaptureMouse(bool ? ::SDL2::SDL_TRUE : ::SDL2::SDL_FALSE)
-        raise RbSDL2Error if err < 0
-      end
-
-      def relative=(bool)
-        err = ::SDL2.SDL_SetRelativeMouseMode(bool ? ::SDL2::SDL_TRUE : ::SDL2::SDL_FALSE)
-        raise RbSDL2Error if err < 0
-      end
-
-      def relative? = ::SDL2.SDL_GetRelativeMouseMode == ::SDL2::SDL_TRUE
-    end
-
-    require 'forwardable'
-    extend SingleForwardable
-
-    class << self
-      require_relative 'mouse/global_mouse'
-
-      def global_mouse = GlobalMouse.instance
-    end
-
-    def_single_delegator "global_mouse.update", :position, :global_position
-    def_single_delegator "global_mouse.update", :position=, :global_position=
-    def_single_delegator "global_mouse.update", :x, :global_x
-    def_single_delegator "global_mouse.update", :y, :global_y
-
-    class << self
-      require_relative 'mouse/mouse_wheel'
-
-      def mouse_wheel = MouseWheel.instance
-    end
-
-    def_single_delegator "mouse_wheel.update", :position, :wheel_position
-    def_single_delegator "Mouse::MouseWheel", :wheel=
-    def_single_delegator "mouse_wheel.update", :x, :wheel_x
-    def_single_delegator "mouse_wheel.update", :y, :wheel_y
-
-    class << self
-      require_relative 'mouse/relative_mouse'
-
-      def relative_mouse = RelativeMouse.instance
-
-      def relative_position=(rx_ry)
-        rx, ry = rx_ry
-        px, py = position
-        self.position = [px + rx, py + ry]
-      end
-    end
-
-    def_single_delegator "relative_mouse.update", :position, :relative_position
-    def_single_delegator "relative_mouse.update", :x, :relative_x
-    def_single_delegator "relative_mouse.update", :y, :relative_y
-
-    class << self
-      require_relative 'mouse/window_mouse'
-
-      def window_mouse = WindowMouse.instance
-    end
-
-    def_single_delegator "window_mouse.update", :button
-
-    require_relative 'mouse/mouse_button'
-    extend MouseButton
-
-    def_single_delegator "window_mouse.update", :position
-    def_single_delegator "window_mouse.update", :position=
-    def_single_delegator "window_mouse.update", :x
-    def_single_delegator "window_mouse.update", :y
-  end
-end