launchpad_mk2 0.0.1

data/test/test_device.rb

@@ -0,0 +1,446 @@
+require 'helper'
+
+describe Launchpad::Device do
+  
+  CONTROL_BUTTONS = {
+    :up       => 0x68,
+    :down     => 0x69,
+    :left     => 0x6A,
+    :right    => 0x6B,
+    :session  => 0x6C,
+    :user1    => 0x6D,
+    :user2    => 0x6E,
+    :mixer    => 0x6F
+  }
+
+  SCENE_BUTTONS = {
+    :scene1   => 0x59,
+    :scene2   => 0x4F,
+    :scene3   => 0x45,
+    :scene4   => 0x3B,
+    :scene5   => 0x31,
+    :scene6   => 0x27,
+    :scene7   => 0x1D,
+    :scene8   => 0x13
+  }
+
+  STATES = {
+    :down     => 127,
+    :up       => 0
+  }
+  
+  def expects_output(device, *args)
+    args = [args] unless args.first.is_a?(Array)
+    messages = args.collect {|data| {:message => data, :timestamp => 0}}
+    device.instance_variable_get('@output').expects(:write).with(messages)
+  end
+
+  def expects_sysex_message(device, message)
+    device.instance_variable_get('@output').expects(:write_sysex).with(Launchpad::Device::SYSEX_HEADER + message  + Launchpad::Device::SYSEX_FOOTER)
+  end
+  
+  def stub_input(device, *args)
+    device.instance_variable_get('@input').stubs(:read).returns(args)
+  end
+  
+  describe '#initialize' do
+    
+    it 'tries to initialize both input and output when not specified' do
+      Portmidi.expects(:input_devices).returns(mock_devices)
+      Portmidi.expects(:output_devices).returns(mock_devices)
+      d = Launchpad::Device.new
+      refute_nil d.instance_variable_get('@input')
+      refute_nil d.instance_variable_get('@output')
+    end
+    
+    it 'does not try to initialize input when set to false' do
+      Portmidi.expects(:input_devices).never
+      d = Launchpad::Device.new(:input => false)
+      assert_nil d.instance_variable_get('@input')
+      refute_nil d.instance_variable_get('@output')
+    end
+    
+    it 'does not try to initialize output when set to false' do
+      Portmidi.expects(:output_devices).never
+      d = Launchpad::Device.new(:output => false)
+      refute_nil d.instance_variable_get('@input')
+      assert_nil d.instance_variable_get('@output')
+    end
+    
+    it 'does not try to initialize any of both when set to false' do
+      Portmidi.expects(:input_devices).never
+      Portmidi.expects(:output_devices).never
+      d = Launchpad::Device.new(:input => false, :output => false)
+      assert_nil d.instance_variable_get('@input')
+      assert_nil d.instance_variable_get('@output')
+    end
+    
+    it 'initializes the correct input output devices when specified by name' do
+      Portmidi.stubs(:input_devices).returns(mock_devices(:id => 4, :name => 'Launchpad Name'))
+      Portmidi.stubs(:output_devices).returns(mock_devices(:id => 5, :name => 'Launchpad Name'))
+      d = Launchpad::Device.new(:device_name => 'Launchpad Name')
+      assert_equal Portmidi::Input, (input = d.instance_variable_get('@input')).class
+      assert_equal 4, input.device_id
+      assert_equal Portmidi::Output, (output = d.instance_variable_get('@output')).class
+      assert_equal 5, output.device_id
+    end
+    
+    it 'initializes the correct input output devices when specified by id' do
+      Portmidi.stubs(:input_devices).returns(mock_devices(:id => 4))
+      Portmidi.stubs(:output_devices).returns(mock_devices(:id => 5))
+      d = Launchpad::Device.new(:input_device_id => 4, :output_device_id => 5, :device_name => 'nonexistant')
+      assert_equal Portmidi::Input, (input = d.instance_variable_get('@input')).class
+      assert_equal 4, input.device_id
+      assert_equal Portmidi::Output, (output = d.instance_variable_get('@output')).class
+      assert_equal 5, output.device_id
+    end
+    
+    it 'raises NoSuchDeviceError when requested input device does not exist' do
+      assert_raises Launchpad::NoSuchDeviceError do
+        Portmidi.stubs(:input_devices).returns(mock_devices(:name => 'Launchpad Input'))
+        Launchpad::Device.new
+      end
+    end
+    
+    it 'raises NoSuchDeviceError when requested output device does not exist' do
+      assert_raises Launchpad::NoSuchDeviceError do
+        Portmidi.stubs(:output_devices).returns(mock_devices(:name => 'Launchpad Output'))
+        Launchpad::Device.new
+      end
+    end
+    
+    it 'raises DeviceBusyError when requested input device is busy' do
+      assert_raises Launchpad::DeviceBusyError do
+        Portmidi::Input.stubs(:new).raises(RuntimeError)
+        Launchpad::Device.new
+      end
+    end
+    
+    it 'raises DeviceBusyError when requested output device is busy' do
+      assert_raises Launchpad::DeviceBusyError do
+        Portmidi::Output.stubs(:new).raises(RuntimeError)
+        Launchpad::Device.new
+      end
+    end
+    
+    it 'stores the logger given' do
+      logger = Logger.new(nil)
+      device = Launchpad::Device.new(:logger => logger)
+      assert_same logger, device.logger
+    end
+    
+  end
+  
+  describe '#close' do
+    
+    it 'does not fail when neither input nor output are there' do
+      Launchpad::Device.new(:input => false, :output => false).close
+    end
+    
+    describe 'with input and output devices' do
+      
+      before do
+        Portmidi::Input.stubs(:new).returns(@input = mock('input'))
+        Portmidi::Output.stubs(:new).returns(@output = mock('output'))
+        @device = Launchpad::Device.new
+      end
+      
+      it 'closes input/output and raise NoInputAllowedError/NoOutputAllowedError on subsequent read/write accesses' do
+        @input.expects(:close)
+        @output.expects(:close)
+        @device.close
+        assert_raises Launchpad::NoInputAllowedError do
+          @device.read_pending_actions
+        end
+        assert_raises Launchpad::NoOutputAllowedError do
+          @device.change(:session)
+        end
+      end
+      
+    end
+    
+  end
+  
+  describe '#closed?' do
+    
+    it 'returns true when neither input nor output are there' do
+      assert Launchpad::Device.new(:input => false, :output => false).closed?
+    end
+    
+    it 'returns false when initialized with input' do
+      assert !Launchpad::Device.new(:input => true, :output => false).closed?
+    end
+    
+    it 'returns false when initialized with output' do
+      assert !Launchpad::Device.new(:input => false, :output => true).closed?
+    end
+    
+    it 'returns false when initialized with both but true after calling close' do
+      d = Launchpad::Device.new
+      assert !d.closed?
+      d.close
+      assert d.closed?
+    end
+    
+  end
+
+  describe 'top level API initialized with output' do
+    before do
+      @device = Launchpad::Device.new(:input => false)
+    end
+
+    describe '#pulse1' do
+      [[1, 4, 24], [0, 6, 27]].each do |message|
+        it "sends 40, 0, #{(message[1] + 1) * 10 + (message[0] + 1)}, #{message[2]} when given #{message}" do
+          expects_sysex_message(@device, [40, 0, (message[1] + 1) * 10 + (message[0] + 1), message[2]])
+          @device.pulse1(message[0], message[1], message[2])
+        end
+      end
+    end
+
+    describe '#pulsen' do
+      it "sends one message for each set of coordinates received" do
+        [[1, 4], [0, 6]].each do |coords|
+          expects_sysex_message(@device, [40, 0, (coords[1] + 1) * 10 + (coords[0] + 1), 24])
+        end
+        @device.pulsen([[1, 4], [0, 6]], 24)
+      end
+    end
+
+    describe '#flash1' do
+      [[1, 4, 24], [0, 6, 27]].each do |message|
+        it "sends 35, 0, #{(message[1] + 1) * 10 + (message[0] + 1)}, #{message[2]} when given #{message}" do
+          expects_sysex_message(@device, [35, 0, (message[1] + 1) * 10 + (message[0] + 1), message[2]])
+          @device.flash1(message[0], message[1], message[2])
+        end
+      end
+    end
+
+    describe '#flashn' do
+      it "sends one message for each set of coordinates received" do
+        [[1, 4], [0, 6]].each do |coords|
+          expects_sysex_message(@device, [35, 0, (coords[1] + 1) * 10 + (coords[0] + 1), 24, 0])
+        end
+        @device.flashn([[1, 4], [0, 6]], 24)
+      end
+    end
+
+    describe '#light_all' do
+      [24, 27].each do |message|
+        it "sends 14, #{message[0]} when given #{message}" do
+          expects_sysex_message(@device, [14, message[0]])
+          @device.light_all(message[0])
+        end
+      end
+    end
+
+    describe '#reset_all' do
+      it "sends 14, 0" do
+        expects_sysex_message(@device, [14, 0])
+        @device.reset_all()
+      end
+    end
+
+    describe '#light1_row' do
+      [[1, 24], [0, 27]].each do |message|
+        it "sends 13, #{message[0]}, #{message[1]} when given #{message}" do
+          expects_sysex_message(@device, [13, message[0], message[1]])
+          @device.light1_row(message[0], message[1])
+        end
+      end
+    end
+
+    describe '#light1_column' do
+      [[1, 24], [0, 27]].each do |message|
+        it "sends 12, #{message[0]}, #{message[1]} when given #{message}" do
+          expects_sysex_message(@device, [12, message[0], message[1]])
+          @device.light1_column(message[0], message[1])
+        end
+      end
+    end
+  end
+
+  describe '#change' do
+    
+    it 'raises NoOutputAllowedError when not initialized with output' do
+      assert_raises Launchpad::NoOutputAllowedError do
+        Launchpad::Device.new(:output => false).change(:up)
+      end
+    end
+    
+    describe 'initialized with output' do
+      
+      before do
+        @device = Launchpad::Device.new(:input => false)
+      end
+      
+      it 'returns nil' do
+        assert_nil @device.change(:up)
+      end
+      
+      describe 'control buttons' do
+        CONTROL_BUTTONS.each do |type, value|
+          it "sends 0xB0, #{value}, 0 when given #{type}" do
+            expects_output(@device, 0xB0, value, 0)
+            @device.change(type)
+          end
+        end
+      end
+      
+      describe 'scene buttons' do
+        SCENE_BUTTONS.each do |type, value|
+          it "sends 0x90, #{value}, 0 when given #{type}" do
+            expects_output(@device, 0x90, value, 0)
+            @device.change(type)
+          end
+        end
+      end
+      
+      describe 'grid buttons' do
+        8.times do |x|
+          8.times do |y|
+            it "sends 0x90, #{10 * (y + 1) + (x + 1)}, 0 when given :grid, :x => #{x}, :y => #{y}" do
+              expects_output(@device, 0x90, (10 * (y + 1)) + (x + 1), 0)
+              @device.change(:grid, :x => x, :y => y)
+            end
+          end
+        end
+        
+        it 'raises NoValidGridCoordinatesError if x is not specified' do
+          assert_raises Launchpad::NoValidGridCoordinatesError do
+            @device.change(:grid, :y => 1)
+          end
+        end
+        
+        it 'raises NoValidGridCoordinatesError if x is below 0' do
+          assert_raises Launchpad::NoValidGridCoordinatesError do
+            @device.change(:grid, :x => -1, :y => 1)
+          end
+        end
+        
+        it 'raises NoValidGridCoordinatesError if x is above 7' do
+          assert_raises Launchpad::NoValidGridCoordinatesError do
+            @device.change(:grid, :x => 8, :y => 1)
+          end
+        end
+        
+        it 'raises NoValidGridCoordinatesError if y is not specified' do
+          assert_raises Launchpad::NoValidGridCoordinatesError do
+            @device.change(:grid, :x => 1)
+          end
+        end
+        
+        it 'raises NoValidGridCoordinatesError if y is below 0' do
+          assert_raises Launchpad::NoValidGridCoordinatesError do
+            @device.change(:grid, :x => 1, :y => -1)
+          end
+        end
+        
+        it 'raises NoValidGridCoordinatesError if y is above 7' do
+          assert_raises Launchpad::NoValidGridCoordinatesError do
+            @device.change(:grid, :x => 1, :y => 8)
+          end
+        end
+        
+      end
+      
+      describe 'colors' do
+        (0..127).each do |color_key|
+          it "sends 0x90, 0, #{color_key} when given :color => #{color_key}" do
+            expects_output(@device, 0x90, 11, color_key)
+            @device.change(:grid, :x => 0, :y => 0, :color => color_key)
+          end
+        end
+        
+        it 'raises NoValidColorError if color is below 0' do
+          assert_raises Launchpad::NoValidColorError do
+            @device.change(:grid, :x => 0, :y => 0, :color => -1)
+          end
+        end
+        
+        it 'raises NoValidColorError if color is above 127' do
+          assert_raises Launchpad::NoValidColorError do
+            @device.change(:grid, :x => 0, :y => 0, :color => 128)
+          end
+        end
+        
+        it 'raises NoValidColorError if color is an unknown symbol' do
+          assert_raises Launchpad::NoValidColorError do
+            @device.change(:grid, :x => 0, :y => 0, :color => :unknown)
+          end
+        end
+        
+      end
+      
+      describe 'mode' do
+        
+        it 'sends 0 when nothing given' do
+          expects_output(@device, 0x90, 11, 0)
+          @device.change(:grid, :x => 0, :y => 0)
+        end
+        
+      end
+      
+    end
+    
+  end
+  
+  describe '#read_pending_actions' do
+    
+    it 'raises NoInputAllowedError when not initialized with input' do
+      assert_raises Launchpad::NoInputAllowedError do
+        Launchpad::Device.new(:input => false).read_pending_actions
+      end
+    end
+    
+    describe 'initialized with input' do
+      
+      before do
+        @device = Launchpad::Device.new(:output => false)
+      end
+      
+      describe 'control buttons' do
+        CONTROL_BUTTONS.each do |type, value|
+          STATES.each do |state, velocity|
+            it "builds proper action for control button #{type}, #{state}" do
+              stub_input(@device, {:timestamp => 0, :message => [0xB0, value, velocity]})
+              assert_equal [{:timestamp => 0, :state => state, :type => type}], @device.read_pending_actions
+            end
+          end
+        end
+      end
+      
+      describe 'scene buttons' do
+        SCENE_BUTTONS.each do |type, value|
+          STATES.each do |state, velocity|
+            it "builds proper action for scene button #{type}, #{state}" do
+              stub_input(@device, {:timestamp => 0, :message => [0x90, value, velocity]})
+              assert_equal [{:timestamp => 0, :state => state, :type => type}], @device.read_pending_actions
+            end
+          end
+        end
+      end
+      
+      describe '#grid buttons' do
+        8.times do |x|
+          8.times do |y|
+            STATES.each do |state, velocity|
+              it "builds proper action for grid button #{x},#{y}, #{state}" do
+                stub_input(@device, {:timestamp => 0, :message => [0x90, 10 * (y + 1) + (x + 1), velocity]})
+                assert_equal [{:timestamp => 0, :state => state, :type => :grid, :x => x, :y => y}], @device.read_pending_actions
+              end
+            end
+          end
+        end
+      end
+      
+      it 'builds proper actions for multiple pending actions' do
+        stub_input(@device, {:timestamp => 1, :message => [0x90, 11, 127]}, {:timestamp => 2, :message => [0xB0, 0x68, 0]})
+        assert_equal [{:timestamp => 1, :state => :down, :type => :grid, :x => 0, :y => 0}, {:timestamp => 2, :state => :up, :type => :up}], @device.read_pending_actions
+      end
+      
+    end
+    
+  end
+  
+end

data/test/test_interaction.rb

@@ -0,0 +1,460 @@
+require 'helper'
+require 'timeout'
+
+class BreakError < StandardError; end
+
+describe Launchpad::Interaction do
+    
+  before do
+    @interaction = nil
+    @reader = nil
+    @grid_down = nil
+    @mixer_down = nil
+    @mixer_up = nil
+    @mixer = nil
+    @all_up = nil
+  end
+
+
+  # returns true/false whether the operation ended or the timeout was hit
+  def timeout(timeout = 0.02, &block)
+    Timeout.timeout(timeout, &block)
+    true
+  rescue Timeout::Error
+    false
+  end
+
+  def press(interaction, type, opts = nil)
+    interaction.respond_to(type, :down, opts)
+    interaction.respond_to(type, :up, opts)
+  end
+
+
+  def press_all(interaction)
+    %w(up down left right session user1 user2 mixer).each do |type|
+      press(interaction, type.to_sym)
+    end
+    8.times do |y|
+      8.times do |x|
+        press(interaction, :grid, :x => x, :y => y)
+      end
+      press(interaction, :"scene#{y + 1}")
+    end
+  end
+
+  describe '#initialize' do
+    
+    it 'creates device if not given' do
+      device = Launchpad::Device.new
+      Launchpad::Device.expects(:new).
+        with(:input => true, :output => true, :logger => nil).
+        returns(device)
+      interaction = Launchpad::Interaction.new
+      assert_same device, interaction.device
+    end
+    
+    it 'creates device with given device_name' do
+      device = Launchpad::Device.new
+      Launchpad::Device.expects(:new).
+        with(:device_name => 'device', :input => true, :output => true, :logger => nil).
+        returns(device)
+      interaction = Launchpad::Interaction.new(:device_name => 'device')
+      assert_same device, interaction.device
+    end
+    
+    it 'creates device with given input_device_id' do
+      device = Launchpad::Device.new
+      Launchpad::Device.expects(:new).
+        with(:input_device_id => 'in', :input => true, :output => true, :logger => nil).
+        returns(device)
+      interaction = Launchpad::Interaction.new(:input_device_id => 'in')
+      assert_same device, interaction.device
+    end
+    
+    it 'creates device with given output_device_id' do
+      device = Launchpad::Device.new
+      Launchpad::Device.expects(:new).
+        with(:output_device_id => 'out', :input => true, :output => true, :logger => nil).
+        returns(device)
+      interaction = Launchpad::Interaction.new(:output_device_id => 'out')
+      assert_same device, interaction.device
+    end
+    
+    it 'creates device with given input_device_id/output_device_id' do
+      device = Launchpad::Device.new
+      Launchpad::Device.expects(:new).
+        with(:input_device_id => 'in', :output_device_id => 'out', :input => true, :output => true, :logger => nil).
+        returns(device)
+      interaction = Launchpad::Interaction.new(:input_device_id => 'in', :output_device_id => 'out')
+      assert_same device, interaction.device
+    end
+    
+    it 'initializes device if given' do
+      device = Launchpad::Device.new
+      interaction = Launchpad::Interaction.new(:device => device)
+      assert_same device, interaction.device
+    end
+
+    it 'stores the logger given' do
+      logger = Logger.new(nil)
+      interaction = Launchpad::Interaction.new(:logger => logger)
+      assert_same logger, interaction.logger
+      assert_same logger, interaction.device.logger
+    end
+    
+    it 'doesn\'t activate the interaction' do
+      assert !Launchpad::Interaction.new.active
+    end
+    
+  end
+
+  describe '#logger=' do
+
+    it 'stores the logger and passes it to the device as well' do
+      logger = Logger.new(nil)
+      interaction = Launchpad::Interaction.new
+      interaction.logger = logger
+      assert_same logger, interaction.logger
+      assert_same logger, interaction.device.logger
+    end
+
+  end
+  
+  describe '#close' do
+
+    it 'stops the interaction' do
+      interaction = Launchpad::Interaction.new
+      interaction.expects(:stop)
+      interaction.close
+    end
+    
+    it 'closes the device' do
+      interaction = Launchpad::Interaction.new
+      interaction.device.expects(:close)
+      interaction.close
+    end
+    
+  end
+  
+  describe '#closed?' do
+    
+    it 'returns false on a newly created interaction, but true after closing' do
+      interaction = Launchpad::Interaction.new
+      assert !interaction.closed?
+      interaction.close
+      assert interaction.closed?
+    end
+    
+  end
+  
+  describe '#start' do
+    
+    before do
+      @interaction = Launchpad::Interaction.new
+    end
+    
+    after do
+      mocha_teardown # so that expectations on Thread.join don't fail in here
+      begin
+        @interaction.close
+      rescue
+        # ignore, should be handled in tests, this is just to close all the spawned threads
+      end
+    end
+    
+    it 'sets active to true in blocking mode' do
+      refute @interaction.active
+      erg = timeout { @interaction.start }
+      refute erg, 'there was no timeout'
+      assert @interaction.active
+    end
+    
+    it 'sets active to true in detached mode' do
+      refute @interaction.active
+      @interaction.start(:detached => true)
+      assert @interaction.active
+    end
+    
+    it 'blocks in blocking mode' do
+      erg = timeout { @interaction.start }
+      refute erg, 'there was no timeout'
+    end
+    
+    it 'returns immediately in detached mode' do
+      erg = timeout { @interaction.start(:detached => true) }
+      assert erg, 'there was a timeout'
+    end
+    
+    it 'raises CommunicationError when Portmidi::DeviceError occurs' do
+      @interaction.device.stubs(:read_pending_actions).raises(Portmidi::DeviceError.new(0))
+      assert_raises Launchpad::CommunicationError do
+        @interaction.start
+      end
+    end
+
+    describe 'action handling' do
+
+      before do
+        @interaction.response_to(:mixer, :down) { @mixer_down = true }
+        @interaction.response_to(:mixer, :up) do |i,a|
+          sleep 0.001 # sleep to make "sure" :mixer :down has been processed
+          i.stop
+        end
+        @interaction.device.expects(:read_pending_actions).
+          at_least_once.
+          returns([
+            {
+              :timestamp  => 0,
+              :state      => :down,
+              :type       => :mixer
+            },
+            {
+              :timestamp  => 0,
+              :state      => :up,
+              :type       => :mixer
+            }
+          ])
+      end
+      
+      it 'calls respond_to_action with actions from respond_to_action in blocking mode' do
+        erg = timeout(0.5) { @interaction.start }
+        assert erg, 'the actions weren\'t called'
+        assert @mixer_down, 'the mixer button wasn\'t pressed'
+      end
+      
+      it 'calls respond_to_action with actions from respond_to_action in detached mode' do
+        @interaction.start(:detached => true)
+        erg = timeout(0.5) { while @interaction.active; sleep 0.01; end }
+        assert erg, 'there was a timeout'
+        assert @mixer_down, 'the mixer button wasn\'t pressed'
+      end
+
+    end
+    
+    describe 'latency' do
+      
+      before do
+        @device = @interaction.device
+        @times = []
+        @device.instance_variable_set("@test_interaction_latency_times", @times)
+        def @device.read_pending_actions
+          @test_interaction_latency_times << Time.now.to_f
+          []
+        end
+      end
+      
+      it 'sleeps with default latency of 0.001s when none given' do
+        timeout { @interaction.start }
+        assert @times.size > 1
+        @times.each_cons(2) do |a,b|
+          assert_in_delta 0.001, b - a, 0.01
+        end
+      end
+      
+      it 'sleeps with given latency' do
+        @interaction = Launchpad::Interaction.new(:latency => 0.5, :device => @device)
+        timeout(0.55) { @interaction.start }
+        assert @times.size > 1
+        @times.each_cons(2) do |a,b|
+          assert_in_delta 0.5, b - a, 0.01
+        end
+      end
+      
+      it 'sleeps with absolute value of given negative latency' do
+        @interaction = Launchpad::Interaction.new(:latency => -0.1, :device => @device)
+        timeout(0.15) { @interaction.start }
+        assert @times.size > 1
+        @times.each_cons(2) do |a,b|
+          assert_in_delta 0.1, b - a, 0.01
+        end
+      end
+      
+      it 'does not sleep when latency is 0' do
+        @interaction = Launchpad::Interaction.new(:latency => 0, :device => @device)
+        timeout(0.001) { @interaction.start }
+        assert @times.size > 1
+        @times.each_cons(2) do |a,b|
+          assert_in_delta 0, b - a, 0.1
+        end
+      end
+      
+    end
+    
+    it 'raises NoInputAllowedError on closed interaction' do
+      @interaction.close
+      assert_raises Launchpad::NoInputAllowedError do
+        @interaction.start
+      end
+    end
+    
+  end
+  
+  describe '#stop' do
+
+    before do
+      @interaction = Launchpad::Interaction.new
+    end
+    
+    it 'sets active to false in blocking mode' do
+      erg = timeout { @interaction.start }
+      refute erg, 'there was no timeout'
+      assert @interaction.active
+      @interaction.stop
+      assert !@interaction.active
+    end
+    
+    it 'sets active to false in detached mode' do
+      @interaction.start(:detached => true)
+      assert @interaction.active
+      @interaction.stop
+      assert !@interaction.active
+    end
+    
+    it 'is callable anytime' do
+      @interaction.stop
+      @interaction.start(:detached => true)
+      @interaction.stop
+      @interaction.stop
+    end
+    
+    # this is kinda greybox tested, since I couldn't come up with another way to test tread handling [thomas, 2010-01-24]
+    it 'raises pending exceptions in detached mode' do
+      t = Thread.new {raise BreakError}
+      Thread.expects(:new).returns(t)
+      @interaction.start(:detached => true)
+      assert_raises BreakError do
+        @interaction.stop
+      end
+    end
+    
+  end
+  
+  describe '#response_to/#no_response_to/#respond_to' do
+    
+    before do
+      @interaction = Launchpad::Interaction.new
+    end
+    
+    it 'calls all responses that match, and not others' do
+      @interaction.response_to(:mixer, :down) {|i, a| @mixer_down = true}
+      @interaction.response_to(:all, :down) {|i, a| @all_down = true}
+      @interaction.response_to(:all, :up) {|i, a| @all_up = true}
+      @interaction.response_to(:grid, :down) {|i, a| @grid_down = true}
+      @interaction.respond_to(:mixer, :down)
+      assert @mixer_down
+      assert @all_down
+      assert !@all_up
+      assert !@grid_down
+    end
+    
+    it 'does not call responses when they are deregistered' do
+      @interaction.response_to(:mixer, :down) {|i, a| @mixer_down = true}
+      @interaction.response_to(:mixer, :up) {|i, a| @mixer_up = true}
+      @interaction.response_to(:all, :both) {|i, a| @all_down = a[:state] == :down}
+      @interaction.no_response_to(:mixer, :down)
+      @interaction.respond_to(:mixer, :down)
+      assert !@mixer_down
+      assert !@mixer_up
+      assert @all_down
+      @interaction.respond_to(:mixer, :up)
+      assert !@mixer_down
+      assert @mixer_up
+      assert !@all_down
+    end
+    
+    it 'does not call responses registered for both when removing for one of both states' do
+      @interaction.response_to(:mixer, :both) {|i, a| @mixer = true}
+      @interaction.no_response_to(:mixer, :down)
+      @interaction.respond_to(:mixer, :down)
+      assert !@mixer
+      @interaction.respond_to(:mixer, :up)
+      assert @mixer
+    end
+    
+    it 'removes other responses when adding a new exclusive response' do
+      @interaction.response_to(:mixer, :both) {|i, a| @mixer = true}
+      @interaction.response_to(:mixer, :down, :exclusive => true) {|i, a| @exclusive_mixer = true}
+      @interaction.respond_to(:mixer, :down)
+      assert !@mixer
+      assert @exclusive_mixer
+      @interaction.respond_to(:mixer, :up)
+      assert @mixer
+      assert @exclusive_mixer
+    end
+
+    it 'allows for multiple types' do
+      @downs = []
+      @interaction.response_to([:up, :down], :down) {|i, a| @downs << a[:type]}
+      @interaction.respond_to(:up, :down)
+      @interaction.respond_to(:down, :down)
+      @interaction.respond_to(:up, :down)
+      assert_equal [:up, :down, :up], @downs
+    end
+
+    describe 'allows to bind to specific grid buttons' do
+
+      before do
+        @downs = []
+        @action = lambda {|i, a| @downs << [a[:x], a[:y]]}
+      end
+
+      it 'one specific grid button' do
+        @interaction.response_to(:grid, :down, :x => 4, :y => 2, &@action)
+        press_all @interaction
+        assert_equal [[4, 2]], @downs
+      end
+
+      it 'a complete row of grid buttons' do
+        @interaction.response_to(:grid, :down, :y => 2, &@action)
+        press_all @interaction
+        assert_equal [[0, 2], [1, 2], [2, 2], [3, 2], [4, 2], [5, 2], [6, 2], [7, 2]], @downs
+      end
+
+      it 'a complete column of grid buttons' do
+        @interaction.response_to(:grid, :down, :x => 3, &@action)
+        press_all @interaction
+        assert_equal [[3, 0], [3, 1], [3, 2], [3, 3], [3, 4], [3, 5], [3, 6], [3, 7]], @downs
+      end
+
+      it 'a complex range of grid buttons' do
+        @interaction.response_to(:grid, :down, :x => [1,[2]], :y => [1, 3..5], &@action)
+        press_all @interaction
+        assert_equal [[1, 1], [2, 1], [1, 3], [2, 3], [1, 4], [2, 4], [1, 5], [2, 5]], @downs
+      end
+
+      it 'a specific grid buttons, a column, a row, all grid buttons and all buttons' do
+        @interaction.response_to(:all, :down) {|i, a| @downs << [a[:x], a[:y], :all]}
+        @interaction.response_to(:grid, :down) {|i, a| @downs << [a[:x], a[:y], :grid]}
+        @interaction.response_to(:grid, :down, :x => 0) {|i, a| @downs << [a[:x], a[:y], :col]}
+        @interaction.response_to(:grid, :down, :y => 0) {|i, a| @downs << [a[:x], a[:y], :row]}
+        @interaction.response_to(:grid, :down, :x => 0, :y => 0, &@action)
+        press @interaction, :grid, :x => 0, :y => 0
+        assert_equal [[0, 0], [0, 0, :col], [0, 0, :row], [0, 0, :grid], [0, 0, :all]], @downs
+      end
+
+    end
+    
+  end
+  
+  describe 'regression tests' do
+    
+    it 'does not raise an exception or write an error to the logger when calling stop within a response in attached mode' do
+      log = StringIO.new
+      logger = Logger.new(log)
+      logger.level = Logger::ERROR
+      i = Launchpad::Interaction.new(:logger => logger)
+      i.response_to(:mixer, :down) {|current_interaction,a| current_interaction.stop}
+      i.device.expects(:read_pending_actions).
+        at_least_once.
+        returns([{
+          :timestamp  => 0,
+          :state      => :down,
+          :type       => :mixer
+        }])
+      timeout { i.start }
+      assert_equal '', log.string
+    end
+    
+  end
+  
+end