brevity 0.4.0

data/lib/brevity/parsing/file/file.rb

@@ -0,0 +1,152 @@
+# Autogenerated from a Treetop grammar. Edits may be lost.
+
+
+module Brevity
+
+module File
+  include Treetop::Runtime
+
+  def root
+    @root ||= :file
+  end
+
+  include Comment
+
+  include Command
+
+  module File0
+    def node
+      elements[1]
+    end
+  end
+
+  module File1
+    def nodes
+      elements[0]
+    end
+
+  end
+
+  def _nt_file
+    start_index = index
+    if node_cache[:file].has_key?(index)
+      cached = node_cache[:file][index]
+      if cached
+        node_cache[:file][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    s1, i1 = [], index
+    loop do
+      i2, s2 = index, []
+      s3, i3 = [], index
+      loop do
+        if has_terminal?(@regexps[gr = '\A[\\s]'] ||= Regexp.new(gr), :regexp, index)
+          r4 = true
+          @index += 1
+        else
+          terminal_parse_failure('[\\s]')
+          r4 = nil
+        end
+        if r4
+          s3 << r4
+        else
+          break
+        end
+      end
+      r3 = instantiate_node(SyntaxNode,input, i3...index, s3)
+      s2 << r3
+      if r3
+        r5 = _nt_node
+        s2 << r5
+      end
+      if s2.last
+        r2 = instantiate_node(SyntaxNode,input, i2...index, s2)
+        r2.extend(File0)
+      else
+        @index = i2
+        r2 = nil
+      end
+      if r2
+        s1 << r2
+      else
+        break
+      end
+    end
+    r1 = instantiate_node(SyntaxNode,input, i1...index, s1)
+    s0 << r1
+    if r1
+      s6, i6 = [], index
+      loop do
+        if has_terminal?(@regexps[gr = '\A[\\s]'] ||= Regexp.new(gr), :regexp, index)
+          r7 = true
+          @index += 1
+        else
+          terminal_parse_failure('[\\s]')
+          r7 = nil
+        end
+        if r7
+          s6 << r7
+        else
+          break
+        end
+      end
+      r6 = instantiate_node(SyntaxNode,input, i6...index, s6)
+      s0 << r6
+    end
+    if s0.last
+      r0 = instantiate_node(FileNode,input, i0...index, s0)
+      r0.extend(File1)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:file][start_index] = r0
+
+    r0
+  end
+
+  def _nt_node
+    start_index = index
+    if node_cache[:node].has_key?(index)
+      cached = node_cache[:node][index]
+      if cached
+        node_cache[:node][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0 = index
+    r1 = _nt_comment
+    if r1
+      r1 = SyntaxNode.new(input, (index-1)...index) if r1 == true
+      r0 = r1
+    else
+      r2 = _nt_command
+      if r2
+        r2 = SyntaxNode.new(input, (index-1)...index) if r2 == true
+        r0 = r2
+      else
+        @index = i0
+        r0 = nil
+      end
+    end
+
+    node_cache[:node][start_index] = r0
+
+    r0
+  end
+
+end
+
+class FileParser < Treetop::Runtime::CompiledParser
+  include File
+end
+
+
+end

data/lib/brevity/parsing/file/file.treetop

@@ -0,0 +1,16 @@
+module Brevity
+
+grammar File
+  include Comment
+  include Command
+  
+  rule file
+    nodes:([\s]* node)* [\s]* <FileNode>
+  end
+  
+  rule node
+    comment / command
+  end
+end
+
+end

data/lib/brevity/parsing/file/file_node.rb

@@ -0,0 +1,7 @@
+module Brevity
+  class FileNode < Treetop::Runtime::SyntaxNode
+    def command_nodes
+      nodes.elements.select {|el| el.node.is_a? CommandNode }.map {|el| el.node }
+    end
+  end
+end

data/lib/brevity/parsing/file/path.rb

@@ -0,0 +1,235 @@
+# Autogenerated from a Treetop grammar. Edits may be lost.
+
+
+module Brevity
+
+module Path
+  include Treetop::Runtime
+
+  def root
+    @root ||= :path
+  end
+
+  module Path0
+  end
+
+  module Path1
+    def name
+      elements[2]
+    end
+  end
+
+  def _nt_path
+    start_index = index
+    if node_cache[:path].has_key?(index)
+      cached = node_cache[:path][index]
+      if cached
+        node_cache[:path][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    i2 = index
+    if (match_len = has_terminal?("./", false, index))
+      r3 = instantiate_node(SyntaxNode,input, index...(index + match_len))
+      @index += match_len
+    else
+      terminal_parse_failure("./")
+      r3 = nil
+    end
+    if r3
+      r3 = SyntaxNode.new(input, (index-1)...index) if r3 == true
+      r2 = r3
+    else
+      if (match_len = has_terminal?("/", false, index))
+        r4 = true
+        @index += match_len
+      else
+        terminal_parse_failure("/")
+        r4 = nil
+      end
+      if r4
+        r4 = SyntaxNode.new(input, (index-1)...index) if r4 == true
+        r2 = r4
+      else
+        @index = i2
+        r2 = nil
+      end
+    end
+    if r2
+      r1 = r2
+    else
+      r1 = instantiate_node(SyntaxNode,input, index...index)
+    end
+    s0 << r1
+    if r1
+      s5, i5 = [], index
+      loop do
+        i6, s6 = index, []
+        i7 = index
+        if (match_len = has_terminal?("..", false, index))
+          r8 = instantiate_node(SyntaxNode,input, index...(index + match_len))
+          @index += match_len
+        else
+          terminal_parse_failure("..")
+          r8 = nil
+        end
+        if r8
+          r8 = SyntaxNode.new(input, (index-1)...index) if r8 == true
+          r7 = r8
+        else
+          r9 = _nt_name
+          if r9
+            r9 = SyntaxNode.new(input, (index-1)...index) if r9 == true
+            r7 = r9
+          else
+            @index = i7
+            r7 = nil
+          end
+        end
+        s6 << r7
+        if r7
+          if (match_len = has_terminal?("/", false, index))
+            r10 = true
+            @index += match_len
+          else
+            terminal_parse_failure("/")
+            r10 = nil
+          end
+          s6 << r10
+        end
+        if s6.last
+          r6 = instantiate_node(SyntaxNode,input, i6...index, s6)
+          r6.extend(Path0)
+        else
+          @index = i6
+          r6 = nil
+        end
+        if r6
+          s5 << r6
+        else
+          break
+        end
+      end
+      if s5.empty?
+        @index = i5
+        r5 = nil
+      else
+        r5 = instantiate_node(SyntaxNode,input, i5...index, s5)
+      end
+      s0 << r5
+      if r5
+        r11 = _nt_name
+        s0 << r11
+      end
+    end
+    if s0.last
+      r0 = instantiate_node(SyntaxNode,input, i0...index, s0)
+      r0.extend(Path1)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:path][start_index] = r0
+
+    r0
+  end
+
+  module Name0
+  end
+
+  def _nt_name
+    start_index = index
+    if node_cache[:name].has_key?(index)
+      cached = node_cache[:name][index]
+      if cached
+        node_cache[:name][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    i1 = index
+    i2 = index
+    if (match_len = has_terminal?(".", false, index))
+      r3 = true
+      @index += match_len
+    else
+      terminal_parse_failure(".")
+      r3 = nil
+    end
+    if r3
+      r3 = SyntaxNode.new(input, (index-1)...index) if r3 == true
+      r2 = r3
+    else
+      if (match_len = has_terminal?("..", false, index))
+        r4 = instantiate_node(SyntaxNode,input, index...(index + match_len))
+        @index += match_len
+      else
+        terminal_parse_failure("..")
+        r4 = nil
+      end
+      if r4
+        r4 = SyntaxNode.new(input, (index-1)...index) if r4 == true
+        r2 = r4
+      else
+        @index = i2
+        r2 = nil
+      end
+    end
+    if r2
+      r1 = nil
+    else
+      @index = i1
+      r1 = instantiate_node(SyntaxNode,input, index...index)
+    end
+    s0 << r1
+    if r1
+      s5, i5 = [], index
+      loop do
+        if has_terminal?(@regexps[gr = '\A[A-Za-z0-9_,:\\.]'] ||= Regexp.new(gr), :regexp, index)
+          r6 = true
+          @index += 1
+        else
+          terminal_parse_failure('[A-Za-z0-9_,:\\.]')
+          r6 = nil
+        end
+        if r6
+          s5 << r6
+        else
+          break
+        end
+      end
+      if s5.empty?
+        @index = i5
+        r5 = nil
+      else
+        r5 = instantiate_node(SyntaxNode,input, i5...index, s5)
+      end
+      s0 << r5
+    end
+    if s0.last
+      r0 = instantiate_node(SyntaxNode,input, i0...index, s0)
+      r0.extend(Name0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:name][start_index] = r0
+
+    r0
+  end
+
+end
+
+class PathParser < Treetop::Runtime::CompiledParser
+  include Path
+end
+
+
+end

data/lib/brevity/parsing/file/path.treetop

@@ -0,0 +1,12 @@
+module Brevity
+
+grammar Path
+  rule path
+    ("./" / "/")? ((".." / name) "/")+ name
+  end
+  rule name
+    !("." / "..") [A-Za-z0-9_,:\.]+
+  end
+end
+
+end

data/lib/brevity/parsing/modifiers/duplicate_modifier.rb

@@ -0,0 +1,65 @@
+# Autogenerated from a Treetop grammar. Edits may be lost.
+
+
+module Brevity
+
+module DuplicateModifier
+  include Treetop::Runtime
+
+  def root
+    @root ||= :duplicate_modifier
+  end
+
+  include PositiveInteger
+
+  module DuplicateModifier0
+    def ntimes
+      elements[1]
+    end
+  end
+
+  def _nt_duplicate_modifier
+    start_index = index
+    if node_cache[:duplicate_modifier].has_key?(index)
+      cached = node_cache[:duplicate_modifier][index]
+      if cached
+        node_cache[:duplicate_modifier][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(DuplicateModifierNode,input, i0...index, s0)
+      r0.extend(DuplicateModifier0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:duplicate_modifier][start_index] = r0
+
+    r0
+  end
+
+end
+
+class DuplicateModifierParser < Treetop::Runtime::CompiledParser
+  include DuplicateModifier
+end
+
+
+end

data/lib/brevity/parsing/modifiers/duplicate_modifier.treetop

@@ -0,0 +1,11 @@
+module Brevity
+
+grammar DuplicateModifier
+  include PositiveInteger
+  
+  rule duplicate_modifier
+    ":" ntimes:positive_integer <DuplicateModifierNode>
+  end
+end
+
+end

data/lib/brevity/parsing/modifiers/duplicate_modifier_node.rb

@@ -0,0 +1,8 @@
+module Brevity  
+  class DuplicateModifierNode < Treetop::Runtime::SyntaxNode
+    def process primitives
+      n = ntimes.text_value.to_i
+      Array.new(n){|i| primitives.clone }.flatten
+    end
+  end
+end

data/lib/brevity/parsing/modifiers/modifier.rb

@@ -0,0 +1,64 @@
+# Autogenerated from a Treetop grammar. Edits may be lost.
+
+
+module Brevity
+
+module Modifier
+  include Treetop::Runtime
+
+  def root
+    @root ||= :modifier
+  end
+
+  include DuplicateModifier
+
+  include TransposeModifier
+
+  include StretchModifier
+
+  def _nt_modifier
+    start_index = index
+    if node_cache[:modifier].has_key?(index)
+      cached = node_cache[:modifier][index]
+      if cached
+        node_cache[:modifier][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0 = index
+    r1 = _nt_transpose_modifier
+    if r1
+      r1 = SyntaxNode.new(input, (index-1)...index) if r1 == true
+      r0 = r1
+    else
+      r2 = _nt_duplicate_modifier
+      if r2
+        r2 = SyntaxNode.new(input, (index-1)...index) if r2 == true
+        r0 = r2
+      else
+        r3 = _nt_stretch_modifier
+        if r3
+          r3 = SyntaxNode.new(input, (index-1)...index) if r3 == true
+          r0 = r3
+        else
+          @index = i0
+          r0 = nil
+        end
+      end
+    end
+
+    node_cache[:modifier][start_index] = r0
+
+    r0
+  end
+
+end
+
+class ModifierParser < Treetop::Runtime::CompiledParser
+  include Modifier
+end
+
+
+end

data/lib/brevity/parsing/modifiers/modifier.treetop

@@ -0,0 +1,13 @@
+module Brevity
+
+grammar Modifier
+  include DuplicateModifier
+  include TransposeModifier
+  include StretchModifier
+    
+  rule modifier
+    transpose_modifier / duplicate_modifier / stretch_modifier
+  end
+end
+
+end

data/lib/brevity/parsing/modifiers/stretch_modifier.rb

@@ -0,0 +1,69 @@
+# Autogenerated from a Treetop grammar. Edits may be lost.
+
+
+module Brevity
+
+module StretchModifier
+  include Treetop::Runtime
+
+  def root
+    @root ||= :stretch_modifier
+  end
+
+  include Duration
+
+  module StretchModifier0
+    def op
+      elements[0]
+    end
+
+    def duration
+      elements[1]
+    end
+  end
+
+  def _nt_stretch_modifier
+    start_index = index
+    if node_cache[:stretch_modifier].has_key?(index)
+      cached = node_cache[:stretch_modifier][index]
+      if cached
+        node_cache[:stretch_modifier][index] = cached = SyntaxNode.new(input, index...(index + 1)) if cached == true
+        @index = cached.interval.end
+      end
+      return cached
+    end
+
+    i0, s0 = index, []
+    if has_terminal?(@regexps[gr = '\A[=*]'] ||= Regexp.new(gr), :regexp, index)
+      r1 = true
+      @index += 1
+    else
+      terminal_parse_failure('[=*]')
+      r1 = nil
+    end
+    s0 << r1
+    if r1
+      r2 = _nt_duration
+      s0 << r2
+    end
+    if s0.last
+      r0 = instantiate_node(StretchModifierNode,input, i0...index, s0)
+      r0.extend(StretchModifier0)
+    else
+      @index = i0
+      r0 = nil
+    end
+
+    node_cache[:stretch_modifier][start_index] = r0
+
+    r0
+  end
+
+end
+
+class StretchModifierParser < Treetop::Runtime::CompiledParser
+  include StretchModifier
+end
+
+
+end

data/lib/brevity/parsing/modifiers/stretch_modifier.treetop

@@ -0,0 +1,11 @@
+module Brevity
+
+grammar StretchModifier
+  include Duration
+  
+  rule stretch_modifier
+    op:[=*] duration <StretchModifierNode>
+  end
+end
+
+end

data/lib/brevity/parsing/modifiers/stretch_modifier_node.rb

@@ -0,0 +1,21 @@
+module Brevity  
+  class StretchModifierNode < Treetop::Runtime::SyntaxNode
+    def process primitives
+      if op.text_value == "*"
+        ratio = duration.to_r
+      else
+        p_duration = primitives.map do |p|
+          p.respond_to?(:duration) ? p.duration : 0
+        end.inject(0,:+)
+        if p_duration == 0
+          require 'pry'
+          binding.pry
+        end
+        ratio = duration.to_r / p_duration
+      end
+      primitives.map do |p|
+        p.respond_to?(:stretch) ? p.stretch(ratio) : p
+      end
+    end
+  end
+end