dxruby_sdl 0.0.4 → 0.0.5

data/spec/{dxruby_sdl → lib/dxruby_sdl}/input_spec.rb

@@ -3,8 +3,30 @@ require 'spec_helper'
 
 describe DXRubySDL::Input,
          'キーボード・ゲームパッド・マウスの入力を扱うモジュール' do
-  before do
-    DXRubySDL::Input.instance_variable_set('@joysticks', [])
+  def push_key_down_event(sym)
+    e = SDL::Event::KeyDown.new
+    e.press = true
+    e.sym = sym
+    e.mod = 0
+    e.unicode = 0
+    SDL::Event.push(e)
+  end
+
+  def push_key_up_event(sym)
+    e = SDL::Event::KeyUp.new
+    e.press = false
+    e.sym = sym
+    e.mod = 0
+    e.unicode = 0
+    SDL::Event.push(e)
+  end
+
+  def update_input_keys
+    expect {
+      DXRubySDL::Window.loop do
+        SDL::Event.push(SDL::Event::Quit.new)
+      end
+    }.to raise_error(SystemExit)
   end
 
   shared_context '.set_repeat' do
@@ -19,43 +41,41 @@ describe DXRubySDL::Input,
   end
 
   describe '.set_repeat', 'キーリピートを設定する' do
-    subject { DXRubySDL::Input.set_repeat(15, 2) }
+    subject { described_class.set_repeat(15, 2) }
 
     include_context '.set_repeat'
 
     describe 'alias' do
       describe '.setRepeat' do
         it_behaves_like '.set_repeat' do
-          subject { DXRubySDL::Input.setRepeat(15, 2) }
+          subject { described_class.setRepeat(15, 2) }
         end
       end
     end
   end
 
-  shared_context 'push_key' do
+  shared_context 'push key_down events' do
     let(:_keys) { [] }
 
     before do
-      allow(SDL::Key).to receive(:scan)
-      allow(SDL::Key).to receive(:press?) { |key|
-                           [_keys].flatten.include?(key) ? true : false
-                         }
+      _keys.each { |key| push_key_down_event(key) }
+      update_input_keys
     end
   end
 
   describe '.x' do
-    include_context 'push_key'
+    include_context 'push key_down events'
 
     subject { described_class.x }
 
     context '左カーソルが押されている場合' do
-      let(:_keys) { SDL::Key::LEFT }
+      let(:_keys) { [SDL::Key::LEFT] }
 
       it { should eq(-1) }
     end
 
     context '右カーソルが押されている場合' do
-      let(:_keys) { SDL::Key::RIGHT }
+      let(:_keys) { [SDL::Key::RIGHT] }
 
       it { should eq(1) }
     end
@@ -72,18 +92,18 @@ describe DXRubySDL::Input,
   end
 
   describe '.y' do
-    include_context 'push_key'
+    include_context 'push key_down events'
 
     subject { described_class.y }
 
     context '上カーソルが押されている場合' do
-      let(:_keys) { SDL::Key::UP }
+      let(:_keys) { [SDL::Key::UP] }
 
       it { should eq(-1) }
     end
 
     context '下カーソルが押されている場合' do
-      let(:_keys) { SDL::Key::DOWN }
+      let(:_keys) { [SDL::Key::DOWN] }
 
       it { should eq(1) }
     end
@@ -100,7 +120,7 @@ describe DXRubySDL::Input,
   end
 
   shared_context '.pad_down?' do
-    include_context 'push_key'
+    include_context 'push key_down events'
 
     context 'Joystickが接続されている場合' do
       let(:joystick) {
@@ -141,7 +161,7 @@ describe DXRubySDL::Input,
           end
 
           context "#{_key}キーが押されている場合" do
-            let(:_keys) { SDL::Key.const_get(_key) }
+            let(:_keys) { [SDL::Key.const_get(_key)] }
 
             it { should be_true }
           end
@@ -173,7 +193,7 @@ describe DXRubySDL::Input,
           let(:button_code) { DXRubySDL.const_get(_button) }
 
           context "#{_key}キーが押されている場合" do
-            let(:_keys) { SDL::Key.const_get(_key) }
+            let(:_keys) { [SDL::Key.const_get(_key)] }
 
             it { should be_true }
           end
@@ -201,12 +221,7 @@ describe DXRubySDL::Input,
   end
 
   shared_context '.pad_push?' do
-    include_context 'push_key'
-
-    before do
-      DXRubySDL::Input.instance_variable_set('@current_key_state', Set.new)
-      DXRubySDL::Input.instance_variable_set('@last_key_state', Set.new)
-    end
+    include_context 'push key_down events'
 
     context 'Joystickが接続されている場合' do
       let(:joystick) {
@@ -247,7 +262,7 @@ describe DXRubySDL::Input,
           end
 
           context "#{_key}キーが押されている場合" do
-            let(:_keys) { SDL::Key.const_get(_key) }
+            let(:_keys) { [SDL::Key.const_get(_key)] }
 
             it { should be_true }
           end
@@ -279,7 +294,7 @@ describe DXRubySDL::Input,
           let(:button_code) { DXRubySDL.const_get(_button) }
 
           context "#{_key}キーが押されている場合" do
-            let(:_keys) { SDL::Key.const_get(_key) }
+            let(:_keys) { [SDL::Key.const_get(_key)] }
 
             it { should be_true }
           end
@@ -343,10 +358,10 @@ describe DXRubySDL::Input,
   end
 
   shared_context '.key_down?' do
-    include_context 'push_key'
+    include_context 'push key_down events'
 
     context 'ESCAPEキーが押されている場合' do
-      let(:_keys) { SDL::Key::ESCAPE }
+      let(:_keys) { [SDL::Key::ESCAPE] }
       let(:key_code) { DXRubySDL::K_ESCAPE }
 
       it { should be_true }
@@ -368,26 +383,20 @@ describe DXRubySDL::Input,
   end
 
   shared_context '.key_push?' do
-    include_context 'push_key'
+    include_context 'push key_down events'
 
     subject { described_class.send(method, key_code) }
 
-    before do
-      DXRubySDL::Input.instance_variable_set('@current_key_state', Set.new)
-      DXRubySDL::Input.instance_variable_set('@last_key_state', Set.new)
-    end
-
     context 'ESCAPEキーが押されている場合' do
-      let(:_keys) { SDL::Key::ESCAPE }
+      let(:_keys) { [SDL::Key::ESCAPE] }
       let(:key_code) { DXRubySDL::K_ESCAPE }
 
       it { should be_true }
 
       context 'キーが押しっぱなしの場合' do
         before do
-          last_key_state =
-            DXRubySDL::Input.instance_variable_get('@last_key_state')
-          last_key_state.add(*_keys)
+          down_keys = described_class.instance_variable_get('@down_keys')
+          down_keys.add(key_code)
         end
 
         it { should be_false }
@@ -395,7 +404,7 @@ describe DXRubySDL::Input,
 
       context 'キーが押しっぱなしだが、' \
               'Input.key_push?をメインループで毎回処理しない場合' do
-        it '最初の1回以外は全てfalseを返す' do
+        specify '最初の1回以外は全てfalseを返す' do
           begin
             first = true
             i = 0
@@ -528,8 +537,8 @@ describe DXRubySDL::Input,
   shared_context '.mouse_push?' do
     context '直前にマウスのボタンを押していない場合' do
       before do
-        DXRubySDL::Input.instance_variable_set('@last_mouse_state',
-                                               [0, 0, false, false, false])
+        described_class.instance_variable_set('@last_mouse_state',
+                                              [0, 0, false, false, false])
       end
 
       context 'マウスの左ボタンを押している場合' do
@@ -610,8 +619,8 @@ describe DXRubySDL::Input,
 
     context '直前にマウスのボタンを全て押していた場合' do
       before do
-        DXRubySDL::Input.instance_variable_set('@last_mouse_state',
-                                               [0, 0, true, true, true])
+        described_class.instance_variable_set('@last_mouse_state',
+                                              [0, 0, true, true, true])
       end
 
       context 'マウスの左ボタンを押している場合' do
@@ -704,4 +713,34 @@ describe DXRubySDL::Input,
       end
     end
   end
+
+  describe '.keys' do
+    subject {
+      update_input_keys
+      described_class.keys
+    }
+
+    context 'スペースキー、上カーソルキー、Aキーを押している場合' do
+      before do
+        push_key_down_event(SDL::Key::SPACE)
+        push_key_down_event(SDL::Key::UP)
+        push_key_down_event(SDL::Key::DOWN)
+        push_key_up_event(SDL::Key::DOWN)
+        push_key_down_event(SDL::Key::A)
+      end
+
+      it {
+        should include(DXRubySDL::K_SPACE, DXRubySDL::K_UP, DXRubySDL::K_A)
+      }
+    end
+
+    context '下カーソルキーを押したあとに離した場合' do
+      before do
+        push_key_down_event(SDL::Key::DOWN)
+        push_key_up_event(SDL::Key::DOWN)
+      end
+
+      it { should be_empty }
+    end
+  end
 end