music-transcription 0.9.2 → 0.10.0

data/lib/music-transcription/parsing/duration_nodes.rb

@@ -0,0 +1,23 @@
+module Music
+module Transcription
+module Parsing
+  class NumDenNode < Treetop::Runtime::SyntaxNode
+    def to_r
+      text_value.to_r
+    end
+  end
+
+  class NumOnlyNode < Treetop::Runtime::SyntaxNode
+    def to_r
+      Rational(numerator.text_value.to_i,1)
+    end
+  end
+  
+  class DenOnlyNode < Treetop::Runtime::SyntaxNode
+    def to_r
+      Rational(1,denominator.text_value.to_i)
+    end
+  end
+end
+end
+end

data/lib/music-transcription/parsing/duration_parsing.rb

@@ -0,0 +1,207 @@
+# Autogenerated from a Treetop grammar. Edits may be lost.
+
+
+module Music
+module Transcription
+module Parsing
+
+module Duration
+  include Treetop::Runtime
+
+  def root
+    @root ||= :duration
+  end
+
+  include PositiveInteger
+
+  def _nt_duration
+    start_index = index
+    if node_cache[:duration].has_key?(index)
+      cached = node_cache[:duration][index]
+      if cached
+        node_cache[:duration][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0 = index
+    r1 = _nt_num_and_den
+    if r1
+      r1 = SyntaxNode.new(input, (index-1)...index) if r1 == true
+      r0 = r1
+    else
+      r2 = _nt_num_only
+      if r2
+        r2 = SyntaxNode.new(input, (index-1)...index) if r2 == true
+        r0 = r2
+      else
+        r3 = _nt_den_only
+        if r3
+          r3 = SyntaxNode.new(input, (index-1)...index) if r3 == true
+          r0 = r3
+        else
+          @index = i0
+          r0 = nil
+        end
+      end
+    end
+
+    node_cache[:duration][start_index] = r0
+
+    r0
+  end
+
+  module NumAndDen0
+    def positive_integer1
+      elements[0]
+    end
+
+    def positive_integer2
+      elements[2]
+    end
+  end
+
+  def _nt_num_and_den
+    start_index = index
+    if node_cache[:num_and_den].has_key?(index)
+      cached = node_cache[:num_and_den][index]
+      if cached
+        node_cache[:num_and_den][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    r1 = _nt_positive_integer
+    s0 << r1
+    if r1
+      if (match_len = has_terminal?("/", false, index))
+        r2 = true
+        @index += match_len
+      else
+        terminal_parse_failure("/")
+        r2 = nil
+      end
+      s0 << r2
+      if r2
+        r3 = _nt_positive_integer
+        s0 << r3
+      end
+    end
+    if s0.last
+      r0 = instantiate_node(NumDenNode,input, i0...index, s0)
+      r0.extend(NumAndDen0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:num_and_den][start_index] = r0
+
+    r0
+  end
+
+  module NumOnly0
+    def numerator
+      elements[0]
+    end
+
+  end
+
+  def _nt_num_only
+    start_index = index
+    if node_cache[:num_only].has_key?(index)
+      cached = node_cache[:num_only][index]
+      if cached
+        node_cache[:num_only][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    r1 = _nt_positive_integer
+    s0 << r1
+    if r1
+      if (match_len = has_terminal?("/", false, index))
+        r3 = true
+        @index += match_len
+      else
+        terminal_parse_failure("/")
+        r3 = nil
+      end
+      if r3
+        r2 = r3
+      else
+        r2 = instantiate_node(SyntaxNode,input, index...index)
+      end
+      s0 << r2
+    end
+    if s0.last
+      r0 = instantiate_node(NumOnlyNode,input, i0...index, s0)
+      r0.extend(NumOnly0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:num_only][start_index] = r0
+
+    r0
+  end
+
+  module DenOnly0
+    def denominator
+      elements[1]
+    end
+  end
+
+  def _nt_den_only
+    start_index = index
+    if node_cache[:den_only].has_key?(index)
+      cached = node_cache[:den_only][index]
+      if cached
+        node_cache[:den_only][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    if (match_len = has_terminal?("/", false, index))
+      r1 = true
+      @index += match_len
+    else
+      terminal_parse_failure("/")
+      r1 = nil
+    end
+    s0 << r1
+    if r1
+      r2 = _nt_positive_integer
+      s0 << r2
+    end
+    if s0.last
+      r0 = instantiate_node(DenOnlyNode,input, i0...index, s0)
+      r0.extend(DenOnly0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:den_only][start_index] = r0
+
+    r0
+  end
+
+end
+
+class DurationParser < Treetop::Runtime::CompiledParser
+  include Duration
+end
+
+
+end
+end
+end

data/lib/music-transcription/parsing/duration_parsing.treetop

@@ -0,0 +1,27 @@
+module Music
+module Transcription
+module Parsing
+
+grammar Duration
+  include PositiveInteger
+  
+  rule duration
+    num_and_den / num_only / den_only
+  end
+  
+  rule num_and_den
+    positive_integer "/" positive_integer <NumDenNode>
+  end
+  
+  rule num_only
+    numerator:positive_integer "/"? <NumOnlyNode>
+  end
+  
+  rule den_only
+    "/" denominator:positive_integer <DenOnlyNode>
+  end
+end
+
+end
+end
+end

data/lib/music-transcription/parsing/link_nodes.rb

@@ -0,0 +1,37 @@
+module Music
+module Transcription
+module Parsing
+  class LinkNode < Treetop::Runtime::SyntaxNode; end
+    
+  class SlurNode < LinkNode
+    def to_link
+      Music::Transcription::Link::Slur.new(target.to_pitch)
+    end
+  end
+
+  class LegatoNode < LinkNode
+    def to_link
+      Music::Transcription::Link::Legato.new(target.to_pitch)
+    end
+  end
+
+  class GlissandoNode < LinkNode
+    def to_link
+      Music::Transcription::Link::Glissando.new(target.to_pitch)
+    end
+  end
+  
+  class PortamentoNode < LinkNode
+    def to_link
+      Music::Transcription::Link::Portamento.new(target.to_pitch)
+    end
+  end
+  
+  class TieNode < LinkNode
+    def to_link
+      Music::Transcription::Link::Tie.new
+    end
+  end  
+end
+end
+end

data/lib/music-transcription/parsing/link_parsing.rb

@@ -0,0 +1,272 @@
+# Autogenerated from a Treetop grammar. Edits may be lost.
+
+
+module Music
+module Transcription
+module Parsing
+
+module Link
+  include Treetop::Runtime
+
+  def root
+    @root ||= :link
+  end
+
+  include Pitch
+
+  def _nt_link
+    start_index = index
+    if node_cache[:link].has_key?(index)
+      cached = node_cache[:link][index]
+      if cached
+        node_cache[:link][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0 = index
+    r1 = _nt_slur_link
+    if r1
+      r1 = SyntaxNode.new(input, (index-1)...index) if r1 == true
+      r0 = r1
+    else
+      r2 = _nt_tie
+      if r2
+        r2 = SyntaxNode.new(input, (index-1)...index) if r2 == true
+        r0 = r2
+      else
+        r3 = _nt_legato_link
+        if r3
+          r3 = SyntaxNode.new(input, (index-1)...index) if r3 == true
+          r0 = r3
+        else
+          r4 = _nt_glissando
+          if r4
+            r4 = SyntaxNode.new(input, (index-1)...index) if r4 == true
+            r0 = r4
+          else
+            r5 = _nt_portamento
+            if r5
+              r5 = SyntaxNode.new(input, (index-1)...index) if r5 == true
+              r0 = r5
+            else
+              @index = i0
+              r0 = nil
+            end
+          end
+        end
+      end
+    end
+
+    node_cache[:link][start_index] = r0
+
+    r0
+  end
+
+  module SlurLink0
+    def target
+      elements[1]
+    end
+  end
+
+  def _nt_slur_link
+    start_index = index
+    if node_cache[:slur_link].has_key?(index)
+      cached = node_cache[:slur_link][index]
+      if cached
+        node_cache[:slur_link][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    if (match_len = has_terminal?("=", false, index))
+      r1 = true
+      @index += match_len
+    else
+      terminal_parse_failure("=")
+      r1 = nil
+    end
+    s0 << r1
+    if r1
+      r2 = _nt_pitch
+      s0 << r2
+    end
+    if s0.last
+      r0 = instantiate_node(SlurNode,input, i0...index, s0)
+      r0.extend(SlurLink0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:slur_link][start_index] = r0
+
+    r0
+  end
+
+  def _nt_tie
+    start_index = index
+    if node_cache[:tie].has_key?(index)
+      cached = node_cache[:tie][index]
+      if cached
+        node_cache[:tie][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    if (match_len = has_terminal?("=", false, index))
+      r0 = instantiate_node(TieNode,input, index...(index + match_len))
+      @index += match_len
+    else
+      terminal_parse_failure("=")
+      r0 = nil
+    end
+
+    node_cache[:tie][start_index] = r0
+
+    r0
+  end
+
+  module LegatoLink0
+    def target
+      elements[1]
+    end
+  end
+
+  def _nt_legato_link
+    start_index = index
+    if node_cache[:legato_link].has_key?(index)
+      cached = node_cache[:legato_link][index]
+      if cached
+        node_cache[:legato_link][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    if (match_len = has_terminal?("-", false, index))
+      r1 = true
+      @index += match_len
+    else
+      terminal_parse_failure("-")
+      r1 = nil
+    end
+    s0 << r1
+    if r1
+      r2 = _nt_pitch
+      s0 << r2
+    end
+    if s0.last
+      r0 = instantiate_node(LegatoNode,input, i0...index, s0)
+      r0.extend(LegatoLink0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:legato_link][start_index] = r0
+
+    r0
+  end
+
+  module Glissando0
+    def target
+      elements[1]
+    end
+  end
+
+  def _nt_glissando
+    start_index = index
+    if node_cache[:glissando].has_key?(index)
+      cached = node_cache[:glissando][index]
+      if cached
+        node_cache[:glissando][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    if (match_len = has_terminal?("~", false, index))
+      r1 = true
+      @index += match_len
+    else
+      terminal_parse_failure("~")
+      r1 = nil
+    end
+    s0 << r1
+    if r1
+      r2 = _nt_pitch
+      s0 << r2
+    end
+    if s0.last
+      r0 = instantiate_node(GlissandoNode,input, i0...index, s0)
+      r0.extend(Glissando0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:glissando][start_index] = r0
+
+    r0
+  end
+
+  module Portamento0
+    def target
+      elements[1]
+    end
+  end
+
+  def _nt_portamento
+    start_index = index
+    if node_cache[:portamento].has_key?(index)
+      cached = node_cache[:portamento][index]
+      if cached
+        node_cache[:portamento][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    if (match_len = has_terminal?("/", false, index))
+      r1 = true
+      @index += match_len
+    else
+      terminal_parse_failure("/")
+      r1 = nil
+    end
+    s0 << r1
+    if r1
+      r2 = _nt_pitch
+      s0 << r2
+    end
+    if s0.last
+      r0 = instantiate_node(PortamentoNode,input, i0...index, s0)
+      r0.extend(Portamento0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:portamento][start_index] = r0
+
+    r0
+  end
+
+end
+
+class LinkParser < Treetop::Runtime::CompiledParser
+  include Link
+end
+
+
+end
+end
+end