rb_sdl2 0.1.2 → 0.2.0

data/lib/rb_sdl2/filesystem.rb

@@ -1,16 +1,17 @@
 module RbSDL2
   module Filesystem
     class << self
+      require_relative 'sdl_pointer'
+
       # RbSDL2 にロードされた SDL2 の配置パスを戻す。
       # パスの末尾にはパスの区切り文字がかならずある。
       # パスの区切り記号は環境依存である。Windows であれば "\" が使われる。
       # Ruby は環境依存のパスの区切り文字を正しく取り扱うことができる。
       def base_path
-        ptr = ::SDL2.SDL_GetBasePath
+        # 戻り値のポインターはアプリケーション側で開放する。
+        ptr = SDLPointer.new(::SDL.GetBasePath)
         raise RbSDL2Error if ptr.null?
-        ptr.read_string.force_encoding(Encoding::UTF_8)
-      ensure
-        ::SDL2.SDL_free(ptr)
+        ptr.to_s
       end
 
       # アプリケーションが書き込むことのできるパスを戻す。
@@ -28,12 +29,10 @@ module RbSDL2
       # SDL が知りたいことはアプリケーションがアクセス可能かどうかだけだ。
       # エラーが出るかどうかはユーザが設定するパスのアクセス制限による。
       def pref_path(org_name, app_name)
-        ptr = ::SDL2.SDL_GetPrefPath(org_name.encode(Encoding::UTF_8),
-                                     app_name.encode(Encoding::UTF_8))
+        # 戻り値のポインターはアプリケーション側で開放する。
+        ptr = SDLPointer.new(::SDL.GetPrefPath(SDL.str_to_sdl(org_name), SDL.str_to_sdl(app_name)))
         raise RbSDL2Error if ptr.null?
-        ptr.read_string.force_encoding(Encoding::UTF_8)
-      ensure
-        ::SDL2.SDL_free(ptr)
+        ptr.to_s
       end
     end
   end

data/lib/rb_sdl2/hint.rb

@@ -1,24 +1,26 @@
-module RbSDL2
-  module Hint
-    class << self
-      def [](name)
-        ptr = ::SDL2.SDL_GetHint(name.to_s)
-        ptr.null? ? nil : ptr.read_string
-      end
-
-      def []=(name, value)
-        bool = ::SDL2.SDL_SetHintWithPriority(name.to_s, value&.to_s, ::SDL2::SDL_HINT_OVERRIDE)
-        raise RbSDL2Error, "failed to set hint" if bool == ::SDL2::SDL_FALSE
-      end
-
-      def clear = ::SDL2.SDL_ClearHints
-
-      def freeze = raise(TypeError, "cannot freeze Hint")
-
-      def include?(name) = ::SDL2.SDL_GetHintBoolean(name, -1) != -1
-      alias has_key? include?
-      alias member? include?
-      alias key? include?
-    end
-  end
-end
+module RbSDL2
+  module Hint
+    class << self
+      # ヒントの設定が行われていないときは nil を戻す。
+      # SDL のデフォルト値はハードコーディングされているためこのメソッドで読み出すことはできない。
+      def [](name)
+        ptr = ::SDL.GetHint(name.to_s)
+        ptr.null? ? nil : ptr.read_string
+      end
+
+      def []=(name, value)
+        bool = ::SDL.SetHintWithPriority(name.to_s, value&.to_s, ::SDL::HINT_OVERRIDE)
+        raise RbSDL2Error, "failed to set hint" if bool == ::SDL::FALSE
+      end
+
+      def clear = ::SDL.ClearHints
+
+      def freeze = raise(TypeError, "cannot freeze Hint")
+
+      def include?(name) = ::SDL.GetHintBoolean(name, -1) != -1
+      alias has_key? include?
+      alias member? include?
+      alias key? include?
+    end
+  end
+end

data/lib/rb_sdl2/keyboard/keyboard.rb

@@ -0,0 +1,50 @@
+module RbSDL2
+  module Keyboard
+    require_relative 'mod_state'
+    extend ModState
+
+    class << self
+      # いずれかのキーが押されている場合に true を戻す。つまり *any key* が押されたということ。
+      # このメソッドを使用するには定期的に Event.pump を呼び出してキーボード状態を更新する必要があります。
+      def any_key? = state.any?
+      alias hit_any_key? any_key?
+      alias pressed_any_key? any_key?
+
+      # s に与えた文字列に対応するスキャンコードのキーが押されてい場合に true を戻します。
+      # キーが押されていない場合、対応するスキャンコードが無い場合は false を戻します。
+      # このメソッドを使用するには定期的に Event.pump を呼び出してキーボード状態を更新する必要があります。
+      def key?(s) = state[::SDL.GetScancodeFromName(s)]
+      alias pressed_key? key?
+
+      # num に与えたキーコードに対応する文字列を戻します。対応する文字列が無い場合は nil を戻します。
+      def keycode_name(num) = (s = ::SDL.GetKeyName(num).read_string).empty? ? nil : s
+
+      # キーコードをスキャンコードに変換します。対応するキーコードがない場合は nil を戻します。
+      def keycode_to_scancode(num) = ::SDL.GetScancodeFromKey(num).nonzero?
+
+      # 現在キーボードの押されているキーの名前を配列で戻します。
+      # このメソッドを使用するには定期的に Event.pump を呼び出してキーボード状態を更新する必要があります。
+      def pressed_keys = state.to_a.map { |n| Keyboard.scancode_name(n) }
+
+      # num に与えたスキャンコードに対応する文字列を戻します。対応する文字列が無い場合は nil を戻します。
+      def scancode_name(num) = (s = ::SDL.GetScancodeName(num).read_string).empty? ? nil : s
+
+      # num に与えたスキャンコードのキーが押されている場合に true を戻します。
+      # スキャンコードに対応するキーがない場合、キーが押されていない場合は false を戻します。
+      def scancode?(num) = state.scancode?(num)
+
+      # スキャンコードをキーコードに変換します。対応するキーコードがない場合は nil を戻します。
+      def scancode_to_keycode(num) = ::SDL.GetKeyFromScancode(num).nonzero?
+
+      require_relative 'state'
+
+      def state = State.instance
+
+      # s に与えた文字列に対応するキーコードを戻します。対応するキーコードがない場合は nil を戻します。
+      def to_keycode(s) = ::SDL.GetKeyFromName(s).nonzero?
+
+      # s に与えた文字列に対応するスキャンコードを戻します。対応するスキャンコードが無い場合は nil を戻します。
+      def to_scancode(s) = ::SDL.GetScancodeFromName(s).nonzero?
+    end
+  end
+end

data/lib/rb_sdl2/keyboard/mod_state.rb

@@ -0,0 +1,68 @@
+module RbSDL2
+  module Keyboard
+    module ModState
+      class << self
+        def state = ::SDL.GetModState
+
+        def state?(num) = state & num != 0
+
+        def state=(num)
+          ::SDL::SetModState(num)
+        end
+      end
+
+      KMOD_NONE   = 0x0000
+      KMOD_LSHIFT = 0x0001
+      KMOD_RSHIFT = 0x0002
+      KMOD_LCTRL  = 0x0040
+      KMOD_RCTRL  = 0x0080
+      KMOD_LALT   = 0x0100
+      KMOD_RALT   = 0x0200
+      KMOD_LGUI   = 0x0400
+      KMOD_RGUI   = 0x0800
+      KMOD_NUM    = 0x1000
+      KMOD_CAPS   = 0x2000
+      KMOD_MODE   = 0x4000
+      KMOD_SCROLL = 0x8000
+
+      KMOD_CTRL  = KMOD_LCTRL | KMOD_RCTRL
+      KMOD_SHIFT = KMOD_LSHIFT | KMOD_RSHIFT
+      KMOD_ALT   = KMOD_LALT | KMOD_RALT
+      KMOD_GUI   = KMOD_LGUI | KMOD_RGUI
+
+      def alt_key? = ModState.state?(KMOD_ALT)
+
+      def caps_key? = ModState.state?(KMOD_CAPS)
+
+      def ctrl_key? = ModState.state?(KMOD_CTRL)
+
+      def gui_key? = ModState.state?(KMOD_GUI)
+
+      def l_alt_key? = ModState.state?(KMOD_LALT)
+
+      def l_ctrl_key? = ModState.state?(KMOD_LCTRL)
+
+      def l_gui_key? = ModState.state?(KMOD_LGUI)
+
+      def l_shift_key? = ModState.state?(KMOD_LSHIFT)
+
+      def mod_key? = ModState.state != 0
+
+      def mode_key? = ModState.state?(KMOD_MODE)
+
+      def num_key? = ModState.state?(KMOD_NUM)
+
+      def r_alt_key? = ModState.state?(KMOD_RALT)
+
+      def r_ctrl_key? = ModState.state?(KMOD_RCTRL)
+
+      def r_gui_key? = ModState.state?(KMOD_RGUI)
+
+      def r_shift_key? = ModState.state?(KMOD_RSHIFT)
+
+      def scroll_lock_key? = ModState.state?(KMOD_SCROLL)
+
+      def shift_key? = ModState.state?(KMOD_SHIFT)
+    end
+  end
+end

data/lib/rb_sdl2/keyboard/state.rb

@@ -0,0 +1,39 @@
+module RbSDL2
+  module Keyboard
+    # SDL 内部にあるキーボードのキースイッチング配列へアクセスします。
+    # キースイッチング状態は SDL_PumpEvents() が呼び出さられたときに更新されます。
+    class State
+      require 'singleton'
+      include Singleton
+
+      # SDL ロード前に呼び出すとエラーになる。その際にインスタンスは作成されない。
+      def initialize
+        num_keys = ::FFI::MemoryPointer.new(:int)
+        # SDL_GetKeyboardState() が戻すポインターは SDL がロードされた時点で作成されるため不変と考えてよい。
+        # この関数は SDL_Init() より前に呼ぶことができる。
+        # 引数に NULL ポインターを与えた場合にエラーを戻す。
+        @ptr = ::SDL.GetKeyboardState(num_keys)
+        raise RbSDL2Error if @ptr.null?
+        @size = num_keys.read_int
+      end
+
+      # nth に該当するスキャンコードのキーが押されているか調べます。
+      # nth のキーが押されている場合に nth を戻します。
+      # nth のキーが押されていない、nth が範囲外の場合は nil を戻します。
+      def [](nth) = 0 <= nth && nth < size && @ptr[nth].read_uint8 == ::SDL::PRESSED ? nth : nil
+      alias scancode? []
+
+      def any? = to_str.bytes.any? { |n| n == ::SDL::PRESSED }
+
+      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)
+
+      # 現在キーボードの押されている全てのキーに対応するスキャンコードを配列で戻します。
+      def to_a = to_str.bytes.with_index.inject([]) { |a, (n, i)| n == ::SDL::PRESSED ? a << i : a }
+    end
+  end
+end

data/lib/rb_sdl2/message_box.rb

@@ -1,120 +1,87 @@
 module RbSDL2
   module MessageBox
-    class MessageBoxButtonDataArray
-      def initialize(num)
-        @entity_class = ::SDL2::SDL_MessageBoxButtonData
-        @ptr = ::FFI::MemoryPointer.new(@entity_class.size, num)
-      end
+    ERROR = ::SDL::MESSAGEBOX_ERROR
+    WARN = ::SDL::MESSAGEBOX_WARNING
+    INFO = ::SDL::MESSAGEBOX_INFORMATION
 
-      def [](nth) = @entity_class.new(@ptr + @entity_class.size * nth)
+    class << self
+      # 簡単なボタン入力のあるウィンドウを表示します。
+      # SDL が初期化される前に呼び出すことができます。
+      # 環境によってはこのメソッドをメインスレッドで呼び出す必要があるでしょう。
+      # このウィンドウを表示中はアプリケーションはブロックされます。
+      # ボタン配置は右詰めです。配列の先頭のボタン番号 0 がウィンドウ右側に配置され、以降はその左に配置されます。
+      #
+      # level: RbSDL2::MessageBox にある ERROR, WARN, INFO, 0 のどれかを与えます。
+      # これはウィンドウの本文部分に表示するアイコンを選択します。
+      # message:
+      # ウィンドウに表示する本文の文字列を与えます。
+      # オブジェクトを与えた場合はメソッド内部で文字列への変換を試みます。
+      # title:
+      # ウィンドウに表示するタイトルの文字列を与えます。
+      # オブジェクトを与えた場合はメソッド内部で文字列への変換を試みます。
+      # window:
+      # 関連のある親ウィンドウがあればそれを与えます。
+      # メッセージウィンドウが閉じるまで親ウィンドウは入力を受け付けなくなります。
+      # buttons:
+      # ボタンに表示する文字列または文字列の配列です。
+      # オブジェクトを与えた場合はメソッド内部で配列への変換を試みます。
+      # 配列の要素がオブジェクトの場合はメソッド内部で文字列への変換を試みます。
+      # nil を与えた場合はボタンが表示されません。
+      # その場合はユーザがエスケープキーを押さない限りこのメソッドを終了できません。
+      # default:
+      # 選択済みのボタンをボタン番号（0 から始まる）指定します。nil の場合はどのボタンも選択されません。
+      # ウィンドウ表示中にユーザがリターンキーを押すと選択済みのボタンが押されたことになります。
+      #
+      # 戻り値は押されたボタン番号か nil です。
+      # nil になる場合はこのウィンドウがアクティブな時に表示中にエスケープキーが押された場合です。
+      def show(level, message = nil, title = nil, window = nil, buttons: nil, default: nil)
+        # アンダーバーのついた変数はオブジェクトをスコープ中に保持するためにある。
+        data = ::SDL::MessageBoxData.new
+        data[:flags] = level
+        data[:window] = _window = window
+        data[:title] = _title = ::FFI::MemoryPointer.from_string(SDL.str_to_sdl(title))
+        data[:message] = _message = ::FFI::MemoryPointer.from_string(SDL.str_to_sdl(message))
 
-      def to_ptr = @ptr
-    end
+        texts = Array(buttons)
 
-    class MessageBoxData
-      def initialize(buttons: nil, colors: nil, escape_key: nil, level: nil, message: nil,
-                     return_key: nil, title: nil, window: nil)
-        @st = ::SDL2::SDL_MessageBoxData.new.tap do |data|
-          button_data = *buttons
-          data[:numbuttons] = num_buttons = button_data.length
-          data[:buttons] = @buttons = num_buttons.nonzero? &&
-            MessageBoxButtonDataArray.new(num_buttons).tap do |data_ary|
-              @button_texts = []
-              num_buttons.times do |idx|
-                st, (text, *) = data_ary[idx], button_data[idx]
-                st[:buttonid] = idx
-                st[:flags] = case idx
-                             when escape_key then ::SDL2::SDL_MESSAGEBOX_BUTTON_ESCAPEKEY_DEFAULT
-                             when return_key then ::SDL2::SDL_MESSAGEBOX_BUTTON_RETURNKEY_DEFAULT
-                             else 0
-                             end
-                st[:text] = @button_texts[idx] =
-                  ::FFI::MemoryPointer.from_string(text.to_s.encode(Encoding::UTF_8))
-              end
-            end
-          data[:colorScheme] = @color_scheme = colors &&
-            ::SDL2::SDL_MessageBoxColorScheme.new.tap do |st|
-              # r, g, b, a 形式だった場合にエラーを出さない。
-              st[:colors].each.with_index { |c, i| c[:r], c[:g], c[:b] = colors[i] }
-            end
-          data[:flags] = MessageBoxFlags.to_num(level)
-          data[:message] = @message =
-            ::FFI::MemoryPointer.from_string(message.to_s.encode(Encoding::UTF_8))
-          data[:title] = @title =
-            ::FFI::MemoryPointer.from_string(title.to_s.encode(Encoding::UTF_8))
-          data[:window] = window
-        end
-      end
+        data[:numbuttons] = num_buttons = texts.size
 
-      def to_ptr = @st.to_ptr
-    end
+        _texts = Array.new(num_buttons)
+        button_data = ::SDL::MessageBoxButtonData
+        st_size = button_data.size
 
-    module MessageBoxFlags
-      class << self
-        def to_num(obj)
-          case obj
-          when /\Aerror/ then ::SDL2::SDL_MESSAGEBOX_ERROR
-          when /\Ainfo/ then ::SDL2::SDL_MESSAGEBOX_INFORMATION
-          when /\Awarn/ then ::SDL2::SDL_MESSAGEBOX_WARNING
-          when nil then 0
-          else
-            raise ArgumentError
+        data[:buttons] = _buttons = ::FFI::MemoryPointer.new(st_size, num_buttons).tap do |ptr|
+          texts.each_with_index do |text, idx|
+            st = button_data.new(ptr + st_size * idx)
+            # Escape キー（SDL_MESSAGEBOX_BUTTON_ESCAPEKEY_DEFAULT）はボタンへ割り当てない。
+            # return_key と escape_key は排他的でありが同一値の場合はどちらかが機能しないため。
+            st[:flags] = idx == default ? ::SDL::MESSAGEBOX_BUTTON_RETURNKEY_DEFAULT : 0
+            st[:buttonid] = idx
+            st[:text] = _texts[idx] = ::FFI::MemoryPointer.from_string(SDL.str_to_sdl(text))
+            st
           end
         end
-      end
-    end
-
-    CONFIRMATION_OPTIONS = { buttons: { Cancel: false, OK: true }, default: true }.freeze
+        # colorScheme は環境依存。例えば Windows　では反映されない。NULL の場合はシステム設定のカラーを使用する。
+        data[:colorScheme] = nil
 
-    class << self
-      def alert(msg = nil, window = nil, level: nil, message: msg, title: nil)
-        err = ::SDL2.SDL_ShowSimpleMessageBox(MessageBoxFlags.to_num(level),
-                                              title&.to_s&.encode(Encoding::UTF_8),
-                                              message&.to_s&.encode(Encoding::UTF_8),
-                                              window)
-        raise RbSDL2Error if err < 0
-      end
-
-      def confirm(*args, **opts) = dialog(*args, **opts.merge!(CONFIRMATION_OPTIONS))
-
-      # buttons: "label" | ["label",...] | [["label", obj],...] | {"label" => obj,...}
-      # buttons １個以上のオブジェクトがあること。０個の場合はエラーになる。
-      # colors: [[r,g,b],...] | nil
-      # 環境（例えば Win10）によっては colors は反映されない。 nil の場合はシステム設定のカラーが使用される。
-      # ユーザがクリックしたボタンに応じたオブジェクトが戻る。
-      # ユーザが Escape キーが押した場合（何も選択しなかった場合）ブロックが与えられていればブロックの評価内容が、
-      # ブロックがなければ nil が戻る。
-      def dialog(msg = nil, window = nil, buttons:, message: msg, **opts)
-        button_data = *buttons
-        raise ArgumentError if button_data.empty?
-        # Escape キーの割り当ては可能だが行わないようにした。
-        # Return キーと Escape キーの割り当てが同じ場合に Return キーは機能しなくなる。
-        if opts.key?(:default)
-          opts.merge!(return_key: button_data.index { |*, obj| obj == opts[:default] })
-          opts.delete(:default)
-        end
         ptr = ::FFI::MemoryPointer.new(:int)
-        data = MessageBoxData.new(buttons: button_data, message: message, window: window, **opts)
-        err = ::SDL2.SDL_ShowMessageBox(data, ptr)
+        err = ::SDL.ShowMessageBox(data, ptr)
         raise RbSDL2Error if err < 0
+        num = ptr.read_int
         # (Escape キーの割り当てがない場合に) Escape キーが押された場合 idx = -1
-        if (idx = ptr.read_int) < 0
-          block_given? ? yield : nil
-        else
-          button_data[idx]
-        end
+        num if num >= 0
       end
 
-      def error(*args, title: :Error, **opts)
-        alert(*args, title: title, **opts.merge!(level: :error))
-      end
-
-      def info(*args, title: :Information, **opts)
-        alert(*args, title: title, **opts.merge!(level: :info))
-      end
-
-      def warn(*args, title: :Warning, **opts)
-        alert(*args, title: title, **opts.merge!(level: :warn))
+      # シンプルなメッセージウィンドウを開きます。
+      # MessageBox.show の簡易版です。ボタン一つのウィンドウが表示されます。
+      # 戻り値は常に true です。
+      def simple(level, message = nil, title = nil, window = nil)
+        err = ::SDL.ShowSimpleMessageBox(level,
+                                         SDL.str_to_sdl(title),
+                                         SDL.str_to_sdl(message),
+                                         window)
+        raise RbSDL2Error if err < 0
+        true
       end
     end
   end

data/lib/rb_sdl2/mouse/global_mouse.rb

@@ -3,14 +3,21 @@ module RbSDL2
     require_relative 'mouse_class'
 
     class GlobalMouse < MouseClass
+      def initialize
+        @_x = ::FFI::MemoryPointer.new(:int)
+        @_y = ::FFI::MemoryPointer.new(:int)
+        super
+      end
+
       def position=(x_y)
-        err = ::SDL2.SDL_WarpMouseGlobal(*x_y)
+        err = ::SDL.WarpMouseGlobal(*x_y)
         raise RbSDL2Error if err < 0
-        update
+        super
       end
 
       def update
-        self.button = ::SDL2.SDL_GetGlobalMouseState(x_ptr, y_ptr)
+        self.button, self.x, self.y =
+          ::SDL.GetGlobalMouseState(@_x, @_y), @_x.read_int, @_y.read_int
         self
       end
     end

data/lib/rb_sdl2/mouse/mouse.rb

@@ -0,0 +1,64 @@
+module RbSDL2
+  module Mouse
+    class << self
+      def capture=(bool)
+        err = ::SDL.CaptureMouse(bool ? ::SDL::TRUE : ::SDL::FALSE)
+        raise RbSDL2Error if err < 0
+      end
+
+      def relative=(bool)
+        err = ::SDL.SetRelativeMouseMode(bool ? ::SDL::TRUE : ::SDL::FALSE)
+        raise RbSDL2Error if err < 0
+      end
+
+      def relative? = ::SDL.GetRelativeMouseMode == ::SDL::TRUE
+    end
+
+    require_relative 'global_mouse'
+    require_relative 'mouse_wheel'
+    require_relative 'relative_mouse'
+
+    @x, @y = ::FFI::MemoryPointer.new(:int), ::FFI::MemoryPointer.new(:int)
+
+    class << self
+      def global_mouse = GlobalMouse.new.update
+
+      def relative_mouse = RelativeMouse.instance
+
+      def button = ::SDL.GetMouseState(nil, nil)
+
+      require_relative 'mouse_button'
+      include MouseButton
+
+      def position
+        ::SDL.GetMouseState(@x, @y)
+        [@x.read_int, @y.read_int]
+      end
+
+      def position=(x_y)
+        ::SDL.WarpMouseInWindow(nil, *x_y)
+      end
+
+      def x
+        ::SDL.GetMouseState(@x, nil)
+        @x.read_int
+      end
+
+      def y
+        ::SDL.GetMouseState(nil, @y)
+        @y.read_int
+      end
+
+      def wheel=(bool)
+        if bool
+          @wheel ||= MouseWheel.new.tap { |obj| obj.wheel = true }
+        else
+          @wheel.wheel = false
+          @wheel = nil
+        end
+      end
+
+      def wheel = @wheel&.update.wheel_y
+    end
+  end
+end

data/lib/rb_sdl2/mouse/mouse_button.rb

@@ -1,24 +1,26 @@
 module RbSDL2
   module Mouse
     module MouseButton
-      SDL_BUTTON = -> (x) { 1 << x - 1 }
-      SDL_BUTTON_LMASK  = SDL_BUTTON.(::SDL2::SDL_BUTTON_LEFT)
-      SDL_BUTTON_MMASK  = SDL_BUTTON.(::SDL2::SDL_BUTTON_MIDDLE)
-      SDL_BUTTON_RMASK  = SDL_BUTTON.(::SDL2::SDL_BUTTON_RIGHT)
-      SDL_BUTTON_X1MASK = SDL_BUTTON.(::SDL2::SDL_BUTTON_X1)
-      SDL_BUTTON_X2MASK = SDL_BUTTON.(::SDL2::SDL_BUTTON_X2)
+      BUTTON = -> (x) { 1 << x - 1 }
+      BUTTON_LMASK  = BUTTON.(::SDL::BUTTON_LEFT)
+      BUTTON_MMASK  = BUTTON.(::SDL::BUTTON_MIDDLE)
+      BUTTON_RMASK  = BUTTON.(::SDL::BUTTON_RIGHT)
+      BUTTON_X1MASK = BUTTON.(::SDL::BUTTON_X1)
+      BUTTON_X2MASK = BUTTON.(::SDL::BUTTON_X2)
+
+      def button?(mask) = mask & button != 0
 
       def any_button? = button != 0
 
-      def left_button? = SDL_BUTTON_LMASK & button != 0
+      def left_button? = button?(BUTTON_LMASK)
 
-      def middle_button? = SDL_BUTTON_MMASK & button != 0
+      def middle_button? = button?(BUTTON_MMASK)
 
-      def right_button? = SDL_BUTTON_RMASK & button != 0
+      def right_button? = button?(BUTTON_RMASK)
 
-      def x1_button? = SDL_BUTTON_X1MASK & button != 0
+      def x1_button? = button?(BUTTON_X1MASK)
 
-      def x2_button? = SDL_BUTTON_X2MASK & button != 0
+      def x2_button? = button?(BUTTON_X2MASK)
     end
   end
 end

data/lib/rb_sdl2/mouse/mouse_class.rb

@@ -1,33 +1,25 @@
 module RbSDL2
   module Mouse
     class MouseClass
-      require 'singleton'
-      include Singleton
-
-      def initialize
-        @button = 0
-        @x_ptr, @y_ptr = Array.new(2) { ::FFI::MemoryPointer.new(:int) }
+      def initialize(*)
+        @button = @x = @y = 0
+        update
       end
 
-      attr_reader :button
-      private attr_writer :button
+      attr_accessor :button, :x, :y
 
       require_relative 'mouse_button'
       include MouseButton
 
       def position = [x, y]
 
+      def position=(x_y)
+        self.x, self.y = x_y
+      end
+
       # 継承先のクラスではこのメソッドをオーバーライドすること。
       # 戻り値は self が戻ることが期待されている。
-      def update = self
-
-      private attr_reader :x_ptr
-
-      def x = x_ptr.read_int
-
-      private attr_reader :y_ptr
-
-      def y = y_ptr.read_int
+      def update = raise NotImplementedError
     end
   end
 end