music_player 0.9.0-universal-darwin-9

data/test/music_player_test.rb

@@ -0,0 +1,40 @@
+require File.join(File.dirname(__FILE__), 'test_helper.rb')
+
+class MusicPlayerTest < Test::Unit::TestCase
+  def setup
+    @player = MusicPlayer.new
+    @sequence = MusicSequence.new
+    @track = @sequence.tracks.new
+    @track.add 0.0,
+        MIDIProgramChangeMessage.new(:channel => 0, :program => 1)
+    @track.add 0.0, MIDINoteMessage.new(:note => 60)
+    @track.add 1.0, MIDINoteMessage.new(:note => 64)
+    @track.add 2.0, MIDINoteMessage.new(:note => 67)
+    @player.sequence = @sequence
+  end
+  
+  def test_playback
+    assert_nothing_raised { assert_nil @player.start }
+    assert @player.playing?
+    assert_nothing_raised { assert_nil @player.stop }
+    assert !@player.playing?
+
+    assert_raise(NoSequence) { MusicPlayer.new.start }
+  end
+  
+  def test_time
+    assert_nothing_raised do
+      assert_equal 0.0, @player.time
+      @player.time = 1.0
+      assert_equal 1.0, @player.time
+    end
+  end
+  
+  def test_play_rate_scalar
+    assert_nothing_raised do
+      assert_equal 1.0, @player.play_rate_scalar
+      @player.play_rate_scalar = 1.6
+      assert_equal 1.6, @player.play_rate_scalar
+    end
+  end
+end

data/test/music_sequence_test.rb

@@ -0,0 +1,52 @@
+require File.join(File.dirname(__FILE__), 'test_helper.rb')
+require 'pathname'
+require 'tempfile'
+
+class MusicSequenceTest < Test::Unit::TestCase
+  def setup
+    @sequence = MusicSequence.new
+    
+    @tempo = @sequence.tracks.tempo
+    @tempo.add 0.0, ExtendedTempoEvent.new(:bpm => 120)
+    
+    @track = @sequence.tracks.new
+    @track.add 0.0, MIDIProgramChangeMessage.new(:channel => 0, :program => 1)
+    @track.add 0.0, MIDINoteMessage.new(:note => 60)
+    @track.add 1.0, MIDINoteMessage.new(:note => 64)
+    @track.add 2.0, MIDINoteMessage.new(:note => 67)
+  end
+  
+  def test_type
+    assert_equal :beat, @sequence.type, "Expected default type of :beat."
+    seq = MusicSequence.new
+    seq.type = :samp
+    assert_equal :samp, seq.type
+    seq.type = :secs
+    assert_equal :secs, seq.type
+  end
+  
+  def test_tracks
+    assert_kind_of MusicTrackCollection, @sequence.tracks
+    assert_equal @sequence.tracks, @sequence.tracks,
+      "Expected only one instance of the track collection."
+  end
+  
+  def test_save_with_pathname
+    tmp = Tempfile.new('music_sequence_test.mid')
+    assert_nothing_raised { @sequence.save(tmp.path) }
+    # Or more literally, a Pathname. Should support anything with #to_str.
+    assert_nothing_raised { @sequence.save(Pathname(tmp.path)) }
+    assert File.exists?(tmp.path)
+  end
+  
+  def test_load
+    dir = File.dirname(__FILE__)
+    smf = File.join(dir, 'example.mid')
+    sz = @sequence.tracks.size
+    assert_nothing_raised { @sequence.load(smf) }
+    # Basically, show that new tracks are appended to the end of the collection.
+    assert_equal 2, @sequence.tracks.size
+    assert_equal @track, @sequence.tracks[0]
+    assert_not_equal @track, @sequence.tracks[1]
+  end
+end

data/test/music_track_collection_test.rb

@@ -0,0 +1,53 @@
+class MusicSequenceTracksEnumerableTest < Test::Unit::TestCase
+  def setup
+    @sequence = MusicSequence.new
+    @track1 = @sequence.tracks.new
+    @track2 = @sequence.tracks.new
+    @track3 = @sequence.tracks.new
+  end
+  
+  def test_size
+    assert_equal 3, @sequence.tracks.size
+  end
+  
+  def test_at_index
+    assert @sequence.tracks[0]
+    assert_nil @sequence.tracks[42]
+    
+    assert_equal @sequence.tracks[0].object_id,
+                 @sequence.tracks[0].object_id
+  end
+  
+  def test_each
+    trks = []
+    @sequence.tracks.each do |trk|
+      trks << trk
+    end
+    # Separate references can be modified independently.
+    # trks.first.add(0.0, MIDINoteMessage.new(:note => 60))
+    # @track1.add(1.0, MIDINoteMessage.new(:note => 72))
+    assert_equal [@track1, @track2, @track3], trks
+  end
+  
+  def test_index
+    assert_equal 0, @sequence.tracks.index(@track1)
+    assert_raise(ArgumentError) { @sequence.tracks.index(0) }
+    
+    seq = MusicSequence.new
+    track = seq.tracks.new
+    assert_raise(TrackNotFound) { @sequence.tracks.index(track) }
+  end
+  
+  def test_delete
+    assert_equal 3, @sequence.tracks.size
+    trk = @sequence.tracks[0]
+    @sequence.tracks.delete(trk)
+    assert_equal 2, @sequence.tracks.size
+  end
+  
+  def test_tempo
+    assert_kind_of MusicTrack, @sequence.tracks.tempo
+    assert_equal @sequence.tracks.tempo, @sequence.tracks.tempo,
+      "Expected only one instance of the tempo track."
+  end
+end

data/test/music_track_test.rb

@@ -0,0 +1,92 @@
+require File.join(File.dirname(__FILE__), 'test_helper.rb')
+
+class MusicTrackTest < Test::Unit::TestCase
+  def setup
+    @sequence = MusicSequence.new
+    @track = @sequence.tracks.new
+  end
+  
+  def test_add
+    assert_nothing_raised do
+      @track.add 0, MIDINoteMessage.new(:note => 60)
+      # a representative channel message
+      @track.add 0, MIDIControlChangeMessage.new(:channel => 0, :number => 0, :value => 0)
+    end
+    
+    assert_raise(IllegalTrackDestination) do
+      @track.add 0, ExtendedTempoEvent.new(:bpm => 120)
+    end
+  end
+  
+  def test_iterator
+    assert_kind_of MusicEventIterator, @track.iterator
+  end
+  
+  def test_enumerable
+    @track.add 0, ev1=MIDINoteMessage.new(:note => 60)
+    @track.add 1, ev2=MIDINoteMessage.new(:note => 64)
+    @track.add 2, ev3=MIDINoteMessage.new(:note => 67)
+    
+    assert_equal [ev1, ev2, ev3], @track.map { |x| x }
+  end
+  
+  def test_loop_info
+    assert_equal({ :duration => 0.0, :number => 1 }, @track.loop_info)
+    @track.loop_info = { :duration => 100.0, :number => 42 }
+    assert_equal({ :duration => 100.0, :number => 42 }, @track.loop_info)
+  end
+  
+  def test_offset
+    assert_equal 0.0, @track.offset
+    @track.offset = 1.0
+    assert_equal 1.0, @track.offset
+  end
+  
+  def test_mute
+    assert_equal false, @track.mute
+    @track.mute = true
+    assert_equal true, @track.mute
+  end
+  
+  def test_solo
+    assert_equal false, @track.solo
+    @track.solo = true
+    assert_equal true, @track.solo
+  end
+  
+  def test_length
+    assert_equal 0, @track.length
+    
+    @track.add 0, MIDINoteMessage.new(:note => 60, :duration => 1)
+    assert_equal 1, @track.length
+    
+    # Length is maximum of the user-set length and the timestamp of the
+    # release of the final event.
+    @track.length = 0.5
+    assert_equal 1, @track.length
+    
+    @track.length = 10
+    assert_equal 10, @track.length
+    
+    @track.add 42, MIDINoteMessage.new(:note => 60, :duration => 1)
+    assert_equal 43, @track.length
+  end
+  
+  def test_resolution
+    # 480 is the default resolution. 960 is also common.
+    assert_equal 480, @sequence.tracks.tempo.resolution
+    assert_raise(ArgumentError) { @track.resolution }
+  end
+  
+  def test_initialize
+    track = @sequence.tracks.new(:loop_info => { :duration => 10,
+                                                 :number   => 3 },
+                                 :mute      => true,
+                                 :solo      => true,
+                                 :length    => 10)
+    assert_equal({:duration => 10, :number => 3}, track.loop_info)
+    assert track.mute
+    assert track.solo
+    assert_equal 10, track.length
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,4 @@
+require 'music_player'
+require 'test/unit'
+
+include AudioToolbox

metadata

@@ -0,0 +1,77 @@
+--- !ruby/object:Gem::Specification 
+name: music_player
+version: !ruby/object:Gem::Version 
+  version: 0.9.0
+platform: universal-darwin-9
+authors: 
+- Jeremy Voorhis
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-03-18 00:00:00 -07:00
+default_executable: 
+dependencies: []
+
+description: Ruby bindings for OS X's high-quality music sequencing API
+email: jvoorhis@gmail.com
+executables: []
+
+extensions: 
+- ext/music_player/extconf.rb
+extra_rdoc_files: []
+
+files: 
+- LICENSE
+- Rakefile
+- examples/drum_machine.rb
+- ext/music_player/music_player.c
+- ext/music_player/util.h
+- ext/music_player/extconf.rb
+- lib/music_player.rb
+- test/example.mid
+- test/extended_tempo_event_test.rb
+- test/midi_channel_message_test.rb
+- test/midi_note_message_test.rb
+- test/music_event_iterator_test.rb
+- test/music_player_test.rb
+- test/music_sequence_test.rb
+- test/music_track_collection_test.rb
+- test/music_track_test.rb
+- test/test_helper.rb
+has_rdoc: false
+homepage: http://github.com/jvoorhis/music_player
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+- ext
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: Ruby bindings for OS X's high-quality music sequencing API
+test_files: 
+- test/extended_tempo_event_test.rb
+- test/midi_channel_message_test.rb
+- test/midi_note_message_test.rb
+- test/music_event_iterator_test.rb
+- test/music_player_test.rb
+- test/music_sequence_test.rb
+- test/music_track_collection_test.rb
+- test/music_track_test.rb