require File.expand_path(File.dirname(__FILE__) + '/spec_helper')

describe Note do
  before :all do
    @pitch = C4
  end
  
  describe '.new' do
    it 'should assign :duration that is given during construction' do
      note = Note.new 2
      note.duration.should eq(2)
    end
    
    it "should assign :accent parameter if given during construction" do
      note = Note.new 2, accent: Accent::Staccato.new
      note.accent.class.should eq(Accent::Staccato)
    end
    
    it 'should have no pitches if not given' do
      Note.new(2).pitches.should be_empty
    end
    
    it 'should assign pitches when given' do
      pitches = [ C2, D2 ]
      n = Note.new(2, pitches)
      n.pitches.should include(pitches[0])
      n.pitches.should include(pitches[1])
    end
  end
  
  describe '#duration=' do
    it 'should assign duration' do
      note = Note.new 2, [@pitch]
      note.duration = 3
      note.duration.should eq 3
    end
  end
  
  describe '#transpose!' do
    context 'given pitch diff' do
      before(:all) do
        @note = Note::Quarter.new([C2,F2], links:{C2=>Link::Slur.new(D2)})
        @diff = Pitch.new(semitone: 4)
        @note.transpose! @diff
      end
        
      it 'should modifiy pitches by adding pitch diff' do
        @note.pitches[0].should eq E2
        @note.pitches[1].should eq A2
      end
        
      it 'should also affect link targets' do
        @note.links.should have_key(E2)
        @note.links[E2].target_pitch.should eq(Gb2)
      end
    end
    
    context 'given integer diff' do
      it 'should transpose the given number of semitones' do
        Note::Quarter.new([C2]).transpose!(4).pitches[0].should eq(E2)
      end
    end
    
    it 'should return self' do
      n = Note::Quarter.new
      n.transpose!(0).should eq n
    end
  end
  
  describe '#stretch!' do
    it 'should multiply note duration by ratio' do
      note = Note::Quarter.new
      note.stretch!(2)
      note.duration.should eq(Rational(1,2))
      
      note = Note::Quarter.new
      note.stretch!(Rational(1,2))
      note.duration.should eq(Rational(1,8))
      note = Note::Quarter.new
      note.stretch!(2)
      note.duration.should eq(Rational(1,2))
    end
    
    it 'should return self' do
      note = Note::Quarter.new
      note.stretch!(1).should be note
    end
  end
  
  describe '#to_yaml' do
    it 'should produce YAML that can be loaded' do
      n = Note.new(1,[C2])
      YAML.load(n.to_yaml).should eq n
      
      n = Note.new(1,[C2,E2])
      YAML.load(n.to_yaml).should eq n
      
      n = Note.new(1,[C2], accent: Accents::STACCATO)
      YAML.load(n.to_yaml).should eq n
      
      n = Note.new(1,[E2], links: {E2 => Link::Legato.new(F2)})
      YAML.load(n.to_yaml).should eq n
    end
  end
  
  describe '#valid?' do
    context 'note with positive duration' do
      it 'should return true' do
        Note.new(1,[C2]).should be_valid
      end
    end
    
    context 'note with 0 duration' do
      it 'should return false' do
        Note.new(0,[C2]).should be_invalid
        require 'pry'
        binding.pry
      end
    end
    
    context 'note with negative duration' do
      it 'should be invalid' do
        Note.new(-1,[C2]).should be_invalid
      end
    end
  end
end