ruck 0.1.0

data/lib/ruck/ugen/wav.rb

@@ -0,0 +1,185 @@
+
+require File.join(File.dirname(__FILE__), "..", "misc", "riff")
+
+module Ruck
+  module Generators
+    
+    # saves all incoming samples in memory to export to disk later
+    # outputs 0.0 samples
+    class WavOut
+      include UGen
+      include Source
+      include MultiChannelTarget
+
+      attr_reader :filename
+
+      def initialize(attrs = {})
+        require_attrs attrs, [:filename]
+        @filename = attrs.delete(:filename)
+        @num_channels = attrs.delete(:num_channels) || 1
+        @bits_per_sample = attrs.delete(:bits_per_sample) || 16
+        parse_attrs attrs
+
+        @in_channels = (1..@num_channels).map { InChannel.new }
+
+        @sample_rate = SAMPLE_RATE
+        @samples = (1..@num_channels).map { [] }
+        @ins = []
+        @last = 0.0
+
+        # TODO: this is necessary, but if UGen graph were explicitly
+        # destructed, that would be nice.
+        at_exit { save }
+      end
+
+      def next(now)
+        return @last if @now == now
+        @now = now
+        @samples << @in_channels.map { |chan| chan.next now }
+        @last
+      end
+
+      def save
+        LOG.info "Saving WAV to #{@filename}..."
+        File.open(@filename, "wb") { |f| f.write encode }
+      end
+
+      def attr_names
+        [:filename]
+      end
+
+      private
+
+        def encode
+          chunk("RIFF") do |riff|
+            riff << ascii("WAVE")
+            riff << chunk("fmt ") do |fmt|
+              fmt << short(1) # format = 1: PCM (no compression)
+              fmt << short(@num_channels)
+              fmt << int(@sample_rate)
+              fmt << int((@sample_rate * @num_channels * (@bits_per_sample / 8))) # byte-rate
+              fmt << short((@num_channels * @bits_per_sample/8)) # block align
+              fmt << short(@bits_per_sample) # bits/sample
+            end
+            riff << chunk("data") do |data|
+              range = 2 ** (@bits_per_sample - 1)
+              @samples.each do |sample_list|
+                sample_list.each { |sample| data << [sample * range].pack("s1") }
+              end
+            end
+          end
+        end
+
+        def int(i)
+          [i].pack("i1")
+        end
+
+        def short(s)
+          [s].pack("s1")
+        end
+
+        def ascii(str)
+          str.split("").pack("A1" * str.length)
+        end
+
+        def chunk(type, &block)
+          buf = ""
+          block.call(buf)
+          ascii(type) + int(buf.length) + buf
+        end
+
+    end
+
+    # plays sound stored in a RIFF WAV file
+    class WavIn
+      include UGen
+      include MultiChannelSource
+
+      linkable_attr :rate
+      linkable_attr :gain
+      attr_reader :filename
+
+      def initialize(attrs = {})
+        require_attrs attrs, [:filename]
+        @rate = 1.0
+        @gain = 1.0
+        @filename = attrs.delete(:filename)
+        parse_attrs attrs
+
+        @loaded = false
+        @playing = true
+
+        init_wav
+      end
+
+      def init_wav
+        riff = Riff::RiffReader.new(@filename).chunks.first
+        unless riff.type == "RIFF"
+          LOG.error "#{@filename}: Not RIFF!"
+          return
+        end
+        unless riff[0..3] == "WAVE"
+          LOG.error "#{@filename}: Not WAVE!"
+          return
+        end
+
+        riff.data_skip = 4 # skip "WAVE"
+        fmt = riff.chunks.first
+        @wav = riff.chunks.find { |c| c.type == "data" }
+        unless fmt[0..1].unpack("s1").first == 1
+          LOG.error "#{@filename}: Not PCM!"
+          return
+        end
+
+        @num_channels, @sample_rate, @byte_rate,
+          @block_align, @bits_per_sample =
+          fmt[2..15].unpack("s1i1i1s1s1")
+        @range = (2 ** (@bits_per_sample - 1)).to_f
+
+        @out_channels = (0..@num_channels-1).map { |chan| OutChannel.new self, chan }
+        @sample = [0.0] * @num_channels
+        @last = [0.0] * @num_channels
+        @now = [nil] * @num_channels
+        @rate_adjust = @sample_rate / SAMPLE_RATE
+
+        @loaded = true
+      end
+
+      def duration
+        @loaded ? @wav.size / @block_align / @rate_adjust : 0
+      end
+
+      def attr_names
+        [:filename, :rate]
+      end
+
+      def next(now, chan = 0)
+        return @last[chan] if @now[chan] == now
+        @now[chan] = now
+
+        return @last[chan] unless @loaded && @playing
+
+        offset = @sample[chan].to_i * @block_align
+        chan_offset = (chan * @bits_per_sample) / 8
+
+        if offset + @block_align > @wav.size
+          @playing = false
+          return @last[chan]
+        end
+
+        @last[chan] = @wav[offset + chan_offset, @bits_per_sample].unpack("s1").first / @range * gain
+        @sample[chan] += rate * @rate_adjust
+        @last[chan]
+      end
+
+      def play; @playing = true; end
+      def stop; @playing = false; end
+
+      def reset
+        @offset = 0
+      end
+
+    end
+    
+  end
+end

data/ruck.gemspec

@@ -0,0 +1,94 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run the gemspec command
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{ruck}
+  s.version = "0.1.0"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Tom Lieber"]
+  s.date = %q{2009-11-16}
+  s.description = %q{      Ruck uses continuations and a simple scheduler to ensure "shreds"
+      (threads in Ruck) are woken at precisely the right time according
+      to its virtual clock. Schedulers can map virtual time to samples
+      in a WAV file, real time, time in a MIDI file, or anything else
+      by overriding "sim_to" in the Shreduler class.
+      
+      A small library of useful unit generators and plenty of examples
+      are provided. See the README or the web page for details.
+}
+  s.email = %q{tom@alltom.com}
+  s.executables = ["ruck_glapp", "ruck_midi", "ruck_ugen"]
+  s.extra_rdoc_files = [
+    "README"
+  ]
+  s.files = [
+    ".gitignore",
+     "README",
+     "Rakefile",
+     "VERSION",
+     "bin/ruck_glapp",
+     "bin/ruck_midi",
+     "bin/ruck_ugen",
+     "examples/glapp/ex01.rb",
+     "examples/midi/ex01.rb",
+     "examples/ugen/ex01.rb",
+     "examples/ugen/ex02.rb",
+     "examples/ugen/ex03.rb",
+     "examples/ugen/ex04.rb",
+     "examples/ugen/ex05.rb",
+     "examples/ugen/ex06.rb",
+     "examples/ugen/ex07.rb",
+     "examples/ugen/ex08.rb",
+     "examples/ugen/ex09.rb",
+     "examples/ugen/ex10.rb",
+     "examples/ugen/ex11.rb",
+     "examples/ugen/ex12.rb",
+     "lib/ruck.rb",
+     "lib/ruck/bench.rb",
+     "lib/ruck/misc/linkage.rb",
+     "lib/ruck/misc/metaid.rb",
+     "lib/ruck/misc/pcm_time_helpers.rb",
+     "lib/ruck/misc/riff.rb",
+     "lib/ruck/misc/wavparse.rb",
+     "lib/ruck/shreduling.rb",
+     "lib/ruck/ugen/general.rb",
+     "lib/ruck/ugen/oscillators.rb",
+     "lib/ruck/ugen/wav.rb",
+     "ruck.gemspec"
+  ]
+  s.homepage = %q{http://github.com/alltom/ruck}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.3.5}
+  s.summary = %q{strong timing for Ruby: cooperative threads on a virtual clock}
+  s.test_files = [
+    "examples/glapp/ex01.rb",
+     "examples/midi/ex01.rb",
+     "examples/ugen/ex01.rb",
+     "examples/ugen/ex02.rb",
+     "examples/ugen/ex03.rb",
+     "examples/ugen/ex04.rb",
+     "examples/ugen/ex05.rb",
+     "examples/ugen/ex06.rb",
+     "examples/ugen/ex07.rb",
+     "examples/ugen/ex08.rb",
+     "examples/ugen/ex09.rb",
+     "examples/ugen/ex10.rb",
+     "examples/ugen/ex11.rb",
+     "examples/ugen/ex12.rb"
+  ]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+    else
+    end
+  else
+  end
+end
+

metadata

@@ -0,0 +1,102 @@
+--- !ruby/object:Gem::Specification 
+name: ruck
+version: !ruby/object:Gem::Version 
+  version: 0.1.0
+platform: ruby
+authors: 
+- Tom Lieber
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-11-16 00:00:00 -08:00
+default_executable: 
+dependencies: []
+
+description: "      Ruck uses continuations and a simple scheduler to ensure \"shreds\"\n      (threads in Ruck) are woken at precisely the right time according\n      to its virtual clock. Schedulers can map virtual time to samples\n      in a WAV file, real time, time in a MIDI file, or anything else\n      by overriding \"sim_to\" in the Shreduler class.\n      \n      A small library of useful unit generators and plenty of examples\n      are provided. See the README or the web page for details.\n"
+email: tom@alltom.com
+executables: 
+- ruck_glapp
+- ruck_midi
+- ruck_ugen
+extensions: []
+
+extra_rdoc_files: 
+- README
+files: 
+- .gitignore
+- README
+- Rakefile
+- VERSION
+- bin/ruck_glapp
+- bin/ruck_midi
+- bin/ruck_ugen
+- examples/glapp/ex01.rb
+- examples/midi/ex01.rb
+- examples/ugen/ex01.rb
+- examples/ugen/ex02.rb
+- examples/ugen/ex03.rb
+- examples/ugen/ex04.rb
+- examples/ugen/ex05.rb
+- examples/ugen/ex06.rb
+- examples/ugen/ex07.rb
+- examples/ugen/ex08.rb
+- examples/ugen/ex09.rb
+- examples/ugen/ex10.rb
+- examples/ugen/ex11.rb
+- examples/ugen/ex12.rb
+- lib/ruck.rb
+- lib/ruck/bench.rb
+- lib/ruck/misc/linkage.rb
+- lib/ruck/misc/metaid.rb
+- lib/ruck/misc/pcm_time_helpers.rb
+- lib/ruck/misc/riff.rb
+- lib/ruck/misc/wavparse.rb
+- lib/ruck/shreduling.rb
+- lib/ruck/ugen/general.rb
+- lib/ruck/ugen/oscillators.rb
+- lib/ruck/ugen/wav.rb
+- ruck.gemspec
+has_rdoc: true
+homepage: http://github.com/alltom/ruck
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+require_paths: 
+- lib
+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.3.5
+signing_key: 
+specification_version: 3
+summary: "strong timing for Ruby: cooperative threads on a virtual clock"
+test_files: 
+- examples/glapp/ex01.rb
+- examples/midi/ex01.rb
+- examples/ugen/ex01.rb
+- examples/ugen/ex02.rb
+- examples/ugen/ex03.rb
+- examples/ugen/ex04.rb
+- examples/ugen/ex05.rb
+- examples/ugen/ex06.rb
+- examples/ugen/ex07.rb
+- examples/ugen/ex08.rb
+- examples/ugen/ex09.rb
+- examples/ugen/ex10.rb
+- examples/ugen/ex11.rb
+- examples/ugen/ex12.rb