brevity 0.4.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: a75a79f97d04f510ba6fe4b19c2f9d16ad4e29c4
+  data.tar.gz: ffd37ed1f4e1bdb122b5482fb06c6de9a9798549
+SHA512:
+  metadata.gz: a68eff07683640d944d6d620bd24f65f14263d399099dedeaea6a402f1bc80de4a05dfea84cb073ddd2f3b552655c6ab628202f58a6545042fb75e31b2e4b35d
+  data.tar.gz: 46252d7032b3ec064c85aa59f66685f7d0fdfe90eca956148ce8efcc79b8c936b553e38527ef9db1b088e0d8ae384f735819407b2eca90fd76e49f007372eed9

data/.document

@@ -0,0 +1,3 @@
+- 
+ChangeLog.rdoc
+LICENSE.txt

data/.gitignore

@@ -0,0 +1,7 @@
+Gemfile.lock
+doc/
+pkg/
+vendor/cache/*.gem
+.bundle/*
+bundler_stubs/*
+

data/.rspec

@@ -0,0 +1 @@
+--colour

data/.ruby-version

@@ -0,0 +1 @@
+2.0

data/.yardopts

@@ -0,0 +1 @@
+--markup rdoc --title "brevity Documentation" --protected

data/ChangeLog.rdoc

@@ -0,0 +1,4 @@
+=== 0.1.0 / 2013-12-24
+
+* Initial release:
+

data/Gemfile

@@ -0,0 +1,3 @@
+source :rubygems
+
+gemspec

data/LICENSE.txt

@@ -0,0 +1,20 @@
+Copyright (c) 2013 James Tunnell
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.rdoc

@@ -0,0 +1,27 @@
+= brevity
+
+* {Homepage}[https://rubygems.org/gems/brevity]
+* {Documentation}[http://rubydoc.info/gems/brevity/frames]
+* {Email}[mailto:jamestunnell at gmail.com]
+
+== Description
+
+Parse and process brevity files, used for music notation. Convert them to other formats.
+
+== Features
+
+== Examples
+
+  require 'brevity'
+
+== Requirements
+
+== Install
+
+  $ gem install brevity
+
+== Copyright
+
+Copyright (c) 2013 James Tunnell
+
+See LICENSE.txt for details.

data/Rakefile

@@ -0,0 +1,67 @@
+# encoding: utf-8
+
+require 'rubygems'
+
+begin
+  require 'bundler'
+rescue LoadError => e
+  warn e.message
+  warn "Run `gem install bundler` to install Bundler."
+  exit -1
+end
+
+begin
+  Bundler.setup(:development)
+rescue Bundler::BundlerError => e
+  warn e.message
+  warn "Run `bundle install` to install missing gems."
+  exit e.status_code
+end
+
+require 'rake'
+
+require 'rspec/core/rake_task'
+RSpec::Core::RakeTask.new
+
+task :test    => :spec
+task :default => :spec
+
+require 'yard'
+YARD::Rake::YardocTask.new  
+task :doc => :yard
+
+require "bundler/gem_tasks"
+
+def rb_fname fname
+  basename = File.basename(fname, File.extname(fname))
+  dirname = File.dirname(fname)
+  "#{dirname}/#{basename}.rb"
+end
+  
+task :build_parsers do
+  wd = Dir.pwd
+  Dir.chdir "lib/brevity/parsing"
+  parser_files = Dir.glob(["**/*.treetop","**/*.tt"])
+  
+  if parser_files.empty?
+    puts "No parsers found"
+    return
+  end
+
+  build_list = parser_files.select do |fname|
+    rb_name = rb_fname(fname)
+    !File.exists?(rb_name) || (File.mtime(fname) > File.mtime(rb_name))
+  end
+  
+  if build_list.any?
+    puts "building parsers:"
+    build_list.each do |fname|
+      puts "  #{fname} -> #{rb_fname(fname)}"
+      `tt -f #{fname}`
+    end
+  else
+    puts "Parsers are up-to-date"
+  end
+  Dir.chdir wd
+end
+task :spec => :build_parsers

data/bin/debrief

@@ -0,0 +1,56 @@
+#!/usr/bin/env ruby
+
+require 'brevity'
+require 'docopt'
+require 'yaml'
+
+exe_name = File.basename(__FILE__)
+
+doc = <<DOCOPT
+Parses a Brevity file, outputting a music-transcription parts as YAML.
+
+Usage:
+  #{exe_name} <input>
+  #{exe_name} <input> <output>
+  #{exe_name} -h | --help
+  #{exe_name} --version
+
+Options:
+  -h --help     Show this screen.
+  --version     Show version.
+
+DOCOPT
+
+begin
+  require "pp"
+  args = Docopt::docopt(doc)
+  pp args
+rescue Docopt::Exit => e
+  puts e.message
+  exit
+end
+
+fin = args["<input>"]
+print "Reading file '#{fin}'..."
+cmd_nodes = Brevity.read_file fin
+puts "complete"
+
+sm = Brevity::ScoreMaker.new
+
+print "Processing commands..."
+sm.process_nodes cmd_nodes
+puts "complete"
+
+print "Making score..."
+score = sm.make_score
+puts "complete"
+  
+fout = args["[output]"]
+if fout.nil?
+  fout = "#{File.dirname(fin)}/#{File.basename(fin,File.extname(fin))}.yml"
+end
+print "Writing file '#{fout}'..."
+File.open(fout,"w") do |f|
+  f.write(YAML.dump(score))
+end
+puts "complete"

data/brevity.gemspec

@@ -0,0 +1,28 @@
+# -*- encoding: utf-8 -*-
+
+require File.expand_path('../lib/brevity/version', __FILE__)
+
+Gem::Specification.new do |gem|
+  gem.name          = "brevity"
+  gem.version       = Brevity::VERSION
+  gem.summary       = %q{Parse and process brevity files. Convert them to other formats.}
+  gem.description   = %q{Parse and process brevity files, used for music notation. Convert them to other formats.}
+  gem.license       = "MIT"
+  gem.authors       = ["James Tunnell"]
+  gem.email         = "jamestunnell@gmail.com"
+  gem.homepage      = "https://rubygems.org/gems/brevity"
+
+  gem.files         = `git ls-files`.split($/)
+  gem.executables   = gem.files.grep(%r{^bin/}).map{ |f| File.basename(f) }
+  gem.test_files    = gem.files.grep(%r{^(test|spec|features)/})
+  gem.require_paths = ['lib']
+
+  gem.add_development_dependency 'bundler', '~> 1.0'
+  gem.add_development_dependency 'rake', '~> 0.8'
+  gem.add_development_dependency 'rspec', '~> 2.4'
+  gem.add_development_dependency 'yard', '~> 0.8'
+  gem.add_development_dependency 'pry'
+  
+  gem.add_dependency 'treetop'
+  gem.add_dependency 'music-transcription', '~> 0.7'
+end

data/examples/alley_cat.br

@@ -0,0 +1,50 @@
+\meter{4}{/4}
+\tempo{120}
+
+#-------------------------------------------------------------------------
+
+\expr{r1}{ /4C5 /4B4 /4A4 /4Ab4 /4G4 /4Ab4 /4A4 /4 /4G4 /4Ab4 /4A4 }
+\expr{r2}{ r1 /4Bb4 /4B4 3/4 }
+\expr{r3}{ r1 /4F4 /4E4 3/4 }
+\expr{r4}{ r1 /4B4 /4C5 2/4 mf /4C5 }
+
+\part{r}{f}{
+  r2 r3 r2 r4
+  
+  /4D5 /2D5 /4Ab4 /4A4  /2 /4C5
+  /4D5 /2D5 /4Gb4 /4D4  /2 /4C5
+  /4D5 /2D5 /4F4  /4Gb4 3/4
+  
+  /4D5 /4C5  /4B4 /4A4  /4G4 /4Gb4 /4F4 /4
+  /4C5 /4B4  /4A4 /4Ab4 /4G4 /4Ab4 /4A3 /4
+  /4G4 /4Ab4 /4A4 /4Bb4 /4B4 3/4
+  
+  r1 /4B4  /4C5 3/4
+}
+
+#-------------------------------------------------------------------------
+
+\expr{l1}{ /4E3,C4 }
+\expr{l2}{ /4F3,B4 }
+\expr{l3}{ (/4G2 /4A2 /4G2)=/4 }
+\expr{l4}{
+  /4C2 l1 /4G2 l1 /4C2 l1 l1 l3
+  /4C2 l1 /4E2 /4Eb2 /4D2 (/4G2,G3 /4Gb2,Gb3 /4G2,G3)=/4 /4Ab2,Ab3 /4G2,G3
+  /4D2 l2 /4G2 l2 /4D2 l2 l2 l3
+}
+\expr{l5}{
+  l4
+  /4D2 /4F3,B3 /4G2,F3,A3 /4F3,G3
+}
+
+\part{l}{mf}{
+  l5 /4C2 /4E2 /4Eb2 /4D2
+  l5 /4C2,E3,C4 /4C2 /4D2 mp /4E2,Ab3
+  
+  /4F2,F3,A3  /4F3,A3  /4C2 /4Db4 /4F2,D4 /4C4 /4C2,A3 /4F3
+  /4C3,E3,G3  /4E3,G3  /4G2 /4Eb4 /4C2,E4 /4C4 /4G2,A3 /4G3
+  /4D2,Gb3,C4 /4Gb3,C4 /4A2 /4Db4 /4D2,D4 /4C4 /4A2,A3 /4Gb3
+  /4D2 /4E2 /4F2 /4Gb2,C4 /4G2,B3 /4A2,A3 /4B2,G3 /4G2
+  
+  l4 /4D2 /4F2 /4E2 /4D2 /4C2 /4Db2,Ab2,F3,Bb3,Eb4 /2C2,G2,E3,A3,D4
+}

data/examples/hip.br

@@ -0,0 +1,15 @@
+\meter{4}{/4}
+\tempo{120}
+
+\expr{bass}{
+  /6Bb2 /4 /3Ab2 /6F2 /12Ab2
+  /6Bb2 /4 /3Ab2 /4Ab2
+}
+
+\expr{lead}{
+  /6Bb3 /4 5/18Db4 /36Eb4 /36Db4 /6Ab4 /12Db4
+  /6Bb3 /4 11/24Db4 /8C4
+}
+
+\part{Bass}{mf}{ bass:2 bass+2 bass }
+\part{Lead}{mf}{ lead:2 lead+2 lead }

data/examples/missed_connection.br

@@ -0,0 +1,6 @@
+\meter{4}{/4}
+\tempo{120}
+
+\expr{a}{ /4Eb2 /4 /4Bb2 /4 /4Eb2 /8 /8B2 /4Bb2 /4Ab2 }
+\expr{b}{ /4Bb2 /8 5/8F3 /4Bb2 /8 5/8F3 }
+\part{bass}{mf}{ (a:2 b b+1):2 }

data/examples/song1.br

@@ -0,0 +1,11 @@
+\meter{4}{/4}
+\tempo{120}
+
+\expr{a}{ 3/8C2 /4Eb2 5/16F2 /16Eb2
+          /8 /4C2 /4Eb2 3/8 }
+\expr{b}{
+  /8 /8Bb3:4 /4C4 /4A3 /8G3 /8F3 5/16G3 1/16E3 /8E3 /8
+  /8 /8Bb3:4 /4C4 /8A3 /8E4 /8E4 /8D4 /8C4 /2 }
+
+\part{1}{mf}{ a:4 }
+\part{2}{mf}{ b:2 }

data/examples/song2.br

@@ -0,0 +1,10 @@
+\meter{4}{/4}
+\tempo{120}
+
+\expr{a}{ 1C4 1Bb3 1Ab3 /2G3 /2Bb3 }
+\expr{b}{ 3/8E5 1D5 1C5 5/8C5 /2C5 /2D5 }
+\expr{c}{ /8 /4G5 /2F5 /4 /4F5 /2Eb5 /4 /4Eb5 /2Eb5 /8 /2Eb5 /2F5 }
+
+\part{1}{mf}{ a:2 }
+\part{2}{mf}{ b:2 }
+\part{3}{mf}{ c:2 }

data/examples/twinkle.br

@@ -0,0 +1,18 @@
+\meter{4}{/4}
+\tempo{90}
+
+# A
+
+\expr{rhA}{ /4C4:2 /4G4:2 /4A4:2 /2G4
+            /4F4:2 /4E4:2 /4D4:2 /2C4 }
+
+\expr{lhA}{ 1E3           /2F3   /2E3
+            /2A3   /2G3   /2F3   /2E3 }
+
+# B
+
+\expr{rhB}{ /4G4:2 /4F4:2 /4E4:2 /2D4 }
+\expr{lhB}{ 1C4           /2C4   /2G3 }
+
+\part{L. Hand}{mf}{ rhA rhB:2 rhA }
+\part{R. Hand}{f }{ lhA lhB:2 lhA }

data/lib/brevity/commands/constants.rb

@@ -0,0 +1,18 @@
+module Brevity
+  module Commands
+    ENV_START_TEMPO = :start_tempo
+    ENV_START_METER = :start_meter
+    ENV_EXPRS = :exprs
+    ENV_PARTS = :parts
+    ENV_TEMPO_CHANGES = :tempo_changes
+    ENV_METER_CHANGES = :meter_changes
+    
+    EXPR_PARSER = ExpressionParser.new
+    LABEL_PARSER = LabelParser.new
+    DYNAMIC_PARSER = DynamicParser.new
+    
+    def class_const sym
+      self.class.const_get(sym)
+    end
+  end
+end

data/lib/brevity/commands/expr.rb

@@ -0,0 +1,17 @@
+module Brevity
+  module Commands
+    def expr label_str, expr_str
+      label_node = LABEL_PARSER.parse(label_str)
+      expr_node = EXPR_PARSER.parse(expr_str)
+      
+      if label_node.nil?
+        raise ArgumentError, "Could not parse label string '#{label_str}'"
+      end
+      if expr_node.nil?
+        raise ArgumentError, "Could not parse expr string '#{expr_str}'"
+      end
+      
+      @env[ENV_EXPRS][label_node.to_key] = expr_node.primitives(@env[ENV_EXPRS])
+    end
+  end
+end

data/lib/brevity/commands/meter.rb

@@ -0,0 +1,20 @@
+module Brevity
+  module Commands
+    def meter beats_per_measure_str, beat_dur_str
+      beats_per_measure_node = PositiveIntegerParser.new.parse(beats_per_measure_str)
+      beat_dur_node = DurationParser.new.parse(beat_dur_str)
+      
+      if beats_per_measure_node.nil?
+        raise ArgumentError, "Could not parse beats per measure string '#{beats_per_measure_str}'"
+      end
+      if beat_dur_node.nil?
+        raise ArgumentError, "Could not parse beat duration string '#{beat_dur_str}'"
+      end
+      
+      @env[ENV_START_METER] = Music::Transcription::Meter.new(
+        beats_per_measure_node.to_i,
+        beat_dur_node.to_r
+      )
+    end
+  end
+end

data/lib/brevity/commands/part.rb

@@ -0,0 +1,47 @@
+module Brevity
+  module Commands
+    def part name_str, startdynamic_str, expr_str
+      dyn_node = DYNAMIC_PARSER.parse(startdynamic_str.strip)
+      expr_node = EXPR_PARSER.parse(expr_str)
+      
+      if dyn_node.nil?
+        raise ArgumentError, "Could not parse start dynamic string '#{startdynamic_str}'"
+      end
+      if expr_node.nil?
+        raise ArgumentError, "Could not parse expr string '#{expr_str}'"
+      end
+      
+      startdyn = dyn_node.to_dynamic
+      notes = []
+      dynamic_changes = {}
+      offset = 0.to_r
+      change_mark = nil
+      
+      expr_node.primitives(@env[ENV_EXPRS]).each do |p|
+        case p
+        when Music::Transcription::Note
+          note = p
+          notes.push note
+          offset += note.duration
+        when Music::Transcription::Dynamic
+          dynamic = p
+          if change_mark.nil?
+            change = Music::Transcription::Change::Immediate.new(dynamic)
+          else
+            duration = offset - change_mark
+            change = Music::Transcription::Change::Gradual.new(dynamic,duration)
+            change_mark = nil
+          end
+          dynamic_changes[offset] = change
+        when GradualNode
+          change_mark = offset
+        end
+      end
+      
+      @env[ENV_PARTS][name_str] = Music::Transcription::Part.new(
+        startdyn,
+        notes: notes,
+        dynamic_changes: dynamic_changes)
+    end
+  end
+end

data/lib/brevity/commands/tempo.rb

@@ -0,0 +1,13 @@
+module Brevity
+  module Commands
+    def tempo beats_per_minute_str
+      bpm_node = PositiveIntegerParser.new.parse(beats_per_minute_str)
+      
+      if bpm_node.nil?
+        raise ArgumentError, "Could not parse beats per minute string '#{beats_per_minute_str}'"
+      end
+      
+      @env[ENV_START_TEMPO] = bpm_node.to_i
+    end
+  end
+end

data/lib/brevity/itemization.rb

@@ -0,0 +1,73 @@
+module Brevity
+  class Itemization
+    attr_reader :notes, :dynamic_changes, :tempo_changes, :duration
+    
+    def initialize notes:[], dynamic_changes:{}, tempo_changes:{}
+      @notes = notes
+      @dynamic_changes = dynamic_changes
+      @tempo_changes = tempo_changes      
+      @duration = @notes.map{ |n| n.duration }.each.inject(0.to_r,:+)
+    end
+    
+    def eql?(other)
+      self == other
+    end
+    
+    def clone
+      Marshal.load(Marshal.dump(self))
+    end
+    
+    def ==(other)
+      (self.notes == other.notes) &&
+      (self.dynamic_changes == other.dynamic_changes) &&
+      (self.tempo_changes == other.tempo_changes)
+    end
+    
+    def append other
+      self.clone.append! other
+    end
+    
+    def append! other
+      other.dynamic_changes.each do |offset,change|
+        @dynamic_changes[offset + @duration] = change
+      end
+      other.tempo_changes.each do |offset,change|
+        @tempo_changes[offset + @duration] = change
+      end
+      @notes += other.notes
+      @duration += other.duration
+      
+      return self
+    end
+    
+    def calc_duration
+      @notes.each.inject(0.to_r,:+)
+    end
+    
+    def stretch ratio
+      self.clone.stretch! ratio
+    end
+    
+    def stretch! ratio
+      @notes.each_index do |i|
+        n1 = @notes[i]
+        @notes[i] = Music::Transcription::Note.new(n1.duration * ratio, n1.pitches, links: n1.links, accent: n1.accent)
+      end
+      @dynamic_changes = Hash[ @dynamic_changes.map {|k,v| [k*ratio,v] }]
+      @tempo_changes = Hash[ @tempo_changes.map {|k,v| [k*ratio,v] }]
+      return self
+    end
+    
+    def transpose diff
+      self.clone.transpose! diff
+    end
+  
+    def transpose! diff
+      @notes[0...-1].each do |note|
+        note.transpose_pitches_and_links! diff
+      end
+      @notes[-1].transpose_pitches_only! diff
+      return self
+    end
+  end
+end