maca-Scruby 0.0.8

data/spec/audio/lib_spec.rb

@@ -0,0 +1,14 @@
+require File.join( File.expand_path(File.dirname(__FILE__)), '..',"helper")
+require "named_arguments"
+require 'osc'
+
+require "#{SCRUBY_DIR}/../scruby"
+
+describe 'Lib' do
+  
+  it "should instantiate and encode" do
+    expected = [ 83, 67, 103, 102, 0, 0, 0, 1, 0, 1, 4, 104, 101, 108, 112, 0, 2, 67, -36, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 6, 83, 105, 110, 79, 115, 99, 2, 0, 2, 0, 1, 0, 0, -1, -1, 0, 0, -1, -1, 0, 1, 2, 6, 83, 105, 110, 79, 115, 99, 2, 0, 2, 0, 1, 0, 0, -1, -1, 0, 0, -1, -1, 0, 1, 2, 12, 66, 105, 110, 97, 114, 121, 79, 112, 85, 71, 101, 110, 2, 0, 2, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 2, 6, 83, 105, 110, 79, 115, 99, 2, 0, 2, 0, 1, 0, 0, -1, -1, 0, 0, -1, -1, 0, 1, 2, 12, 66, 105, 110, 97, 114, 121, 79, 112, 85, 71, 101, 110, 2, 0, 2, 0, 1, 0, 2, 0, 2, 0, 0, 0, 3, 0, 0, 2, 0, 0 ].pack('C*')
+    SynthDef.new(:help){ (SinOsc.ar() + SinOsc.ar()) * SinOsc.ar() }.encode.should == expected
+  end
+  
+end

data/spec/audio/multiout_ugen_spec.rb

@@ -0,0 +1,112 @@
+require File.join( File.expand_path(File.dirname(__FILE__)), '..',"helper")
+
+require "#{SCRUBY_DIR}/audio/ugens/ugen_operations" 
+require "#{SCRUBY_DIR}/audio/ugens/ugen" 
+require "#{SCRUBY_DIR}/extensions"
+require "#{SCRUBY_DIR}/audio/ugens/multi_out_ugens"
+
+include Scruby
+include Audio
+include Ugens
+
+describe MultiOutUgen do
+  before do
+    sdef = mock( 'sdef', :children => [] )
+    Ugen.should_receive( :synthdef ).and_return( sdef )
+    @proxies = MultiOutUgen.new( :audio, 1, 2, 3 )
+    @multi   = sdef.children.first
+  end
+
+  it "should return an array of channels" do
+    @proxies.should be_instance_of( Array )
+    @proxies.should == [1,2,3]
+  end
+
+  it "should be instace of Control" do
+    @multi.should be_instance_of( MultiOutUgen )
+  end
+
+  it do
+    @multi.rate.should == :audio
+  end
+
+  it do
+    @multi.channels.should == [1,2,3]
+  end
+  
+  it do
+    @multi.inputs.should == []
+  end
+end
+
+describe Control do
+  before do
+    sdef = mock( 'sdef', :children => [] )
+    Ugen.stub!( :synthdef ).and_return( sdef )
+
+    @proxy = mock('proxy', :instance_of_proxy? => true)
+    OutputProxy.stub!( :new ).and_return( @proxy )
+
+    @names = Array.new( rand(7) + 3 ){ |i| mock('name', :rate => :audio, :valid_ugen_input? => true)  }
+    @proxies = Control.new( :audio, *@names )
+    @control = sdef.children.first
+  end
+
+  it "should return an array of proxies" do
+    @proxies.should be_instance_of( Array )
+    @proxies.should have( @names.size ).proxies
+  end
+
+  it "should set channels" do
+    @control.should be_instance_of( Control )
+    @control.channels.should == @names.map{ @proxy }
+  end
+
+  it "should be added to synthdef" do
+    Ugen.should_receive( :synthdef )
+    Control.new( :audio, [])
+  end
+  
+  it "should instantiate with #and_proxies_from" do
+    Control.should_receive(:new).with( :audio, *@names )
+    Control.and_proxies_from( @names )
+  end
+  
+  it "should have index" do
+    @control.index.should == 0
+  end
+  
+end
+
+describe OutputProxy do
+  
+  before do
+    @sdef = mock( 'sdef', :children => [] )
+    Ugen.stub!( :synthdef ).and_return( @sdef )
+    
+    @source = mock('source', :index => 0, :valid_ugen_input? => true )
+    @name   = mock('control name', :valid_ugen_input? => true)
+    @output_index = mock('output_idex', :valid_ugen_input? => true)
+    
+    @names = [mock('name', :rate => :audio, :valid_ugen_input? => true)]
+    
+  end
+  
+  it "should receive index from control" do
+    Control.and_proxies_from( @names ).first.index.should == 0
+    @sdef.children.first.index.should == 0
+  end
+  
+  it "should have empty inputs" do
+    OutputProxy.new( :audio, @source, @output_index, @name ).inputs.should == []
+  end
+  
+  
+  it "should not be added to synthdef" do
+    Ugen.should_not_receive( :synthdef )
+    OutputProxy.new( :audio, @source, @output_index, @name )
+  end
+  
+end
+
+

data/spec/audio/node_spec.rb

@@ -0,0 +1,60 @@
+require File.join( File.expand_path(File.dirname(__FILE__)), '..',"helper")
+require 'yaml'
+require 'named_arguments'
+
+
+require "#{SCRUBY_DIR}/typed_array" 
+require "#{SCRUBY_DIR}/audio/node" 
+include Scruby
+
+
+
+
+describe Node do  
+  before :all do
+    @server  = mock('server')
+    Server   = mock('Server' )
+  end
+  
+  before do
+    Node.reset!
+    Server.stub!(:all).and_return([@server])
+  end
+  
+  it "should have incremental uniq id" do
+    10.times do |i|
+      Node.new( 'nodo' ).id.should  == 2001 + i
+    end    
+  end
+  
+  it "should reset" do
+    Node.new( 'nodo' ).id.should == 2001
+  end
+  
+  describe 'instantiation' do
+    
+    it "should have a name" do
+      Node.new('nodo').name.should == 'nodo'
+    end
+    
+    it "should not accept non servers" do
+      lambda{ Node.new('nodo', 1,2) }.should   raise_error(TypeError)
+      lambda{ Node.new('nodo', [1,2]) }.should raise_error(TypeError)
+    end
+    
+    it "should accept a server and have a TypedArray of Servers" do
+      @server.should_receive(:instance_of?).exactly(:twice).and_return(true)
+      n = Node.new( 'nodo', @server )
+      n.servers.should == [@server]
+      n = Node.new( 'nodo', [@server] )
+      n.servers.should == [@server]
+    end
+    
+    it "should have default servers if no server is passed" do
+      n = Node.new( 'nodo' )
+      n.servers.should == [@server]
+    end
+    
+  end
+  
+end

data/spec/audio/operation_ugens_spec.rb

@@ -0,0 +1,189 @@
+require File.join( File.expand_path(File.dirname(__FILE__)), '..',"helper")
+require 'yaml'
+
+require "#{SCRUBY_DIR}/audio/ugens/ugen_operations" 
+require "#{SCRUBY_DIR}/audio/ugens/ugen" 
+require "#{SCRUBY_DIR}/extensions"
+require "#{SCRUBY_DIR}/audio/ugens/operation_ugens"
+
+include Scruby
+include Audio
+include Ugens
+include OperationUgens
+
+describe UnaryOpUgen do
+  RATES = [ :scalar, :demand, :control, :audio ]
+  
+  before do
+    @scalar  = mock( 'ugen', :rate => :scalar,  :valid_ugen_input? => true ) 
+    @demand  = mock( 'ugen', :rate => :demand,  :valid_ugen_input? => true ) 
+    @control = mock( 'ugen', :rate => :control, :valid_ugen_input? => true ) 
+    @audio   = mock( 'ugen', :rate => :audio,   :valid_ugen_input? => true ) 
+  end
+  
+  describe UnaryOpUgen do
+    
+    before do
+      @op = UnaryOpUgen.new( :neg, @audio )
+    end
+    
+    it "should return special index" do
+      UnaryOpUgen.new( :neg, @audio ).special_index.should == 0
+      UnaryOpUgen.new( :bitNot, @audio ).special_index.should == 4
+      UnaryOpUgen.new( :abs, @audio ).special_index.should == 5
+      UnaryOpUgen.new( :asFloat, @audio ).special_index.should == 6
+    end
+  
+    it "should accept just one input" do
+      lambda{ UnaryOpUgen.new(:neg, @audio, @demand) }.should raise_error( ArgumentError )
+    end
+  
+    it "should just accept defined operators" # do
+     #    lambda{ UnaryOpUgen.new(:not_operator, @audio) }.should raise_error( ArgumentError )
+     #  end
+  
+    it "should get max rate" do
+      UnaryOpUgen.send(:get_rate, @scalar, @demand ).should == :demand
+      UnaryOpUgen.send(:get_rate, @scalar, @demand, @audio ).should == :audio
+      UnaryOpUgen.send(:get_rate, @scalar, [@demand, [@control, @audio]] ).should == :audio
+    end
+  
+    it do
+      UnaryOpUgen.new(:neg, @audio).should be_instance_of(UnaryOpUgen)
+    end
+  
+    it "should set rate" do
+      UnaryOpUgen.new(:neg, @audio).rate.should == :audio
+      UnaryOpUgen.new(:neg, @scalar).rate.should == :scalar
+    end
+  
+    it "should set operator" do
+      UnaryOpUgen.new(:neg, @audio).operator.should == :neg
+    end    
+  end
+  
+  describe BinaryOpUGen do
+    
+    before do
+      @arg_array = [@audio, [@scalar, @audio, [@demand, [@control, @demand]]] ]
+      @op_arr = BinaryOpUGen.new(:+, @audio, @arg_array )
+    end
+    
+    it "should return special index" do
+      BinaryOpUGen.new( :+, @audio, @audio ).special_index.should eql(0)
+      BinaryOpUGen.new( :-, @audio, @audio ).special_index.should eql(1)
+      BinaryOpUGen.new( :*, @audio, @audio ).special_index.should eql(2)
+      BinaryOpUGen.new( :/, @audio, @audio ).special_index.should eql(4)
+    end
+  
+    it "should accept exactly two inputs" do
+      lambda{ BinaryOpUGen.new(:+, @audio) }.should raise_error( ArgumentError )
+      lambda{ BinaryOpUGen.new(:+, @audio, @demand, @demand) }.should raise_error( ArgumentError )
+    end
+
+    it "should have correct inputs and operator when two inputs" do
+      arr = BinaryOpUGen.new( :+, @audio, @demand )
+      arr.inputs.should == [@audio, @demand]
+      arr.operator.should == :+
+      arr.rate.should == :audio
+    end
+  
+    it "should accept array as input" do
+      BinaryOpUGen.new(:+, @audio, [@audio, @scalar] ).should be_instance_of(Array)
+    end
+  
+    it "should return an array of UnaryOpUgens" do
+      @op_arr.flatten.map { |op| op.should be_instance_of(BinaryOpUGen)  }
+    end
+  
+    it "should set rate for all operations" do
+      @op_arr.flatten.map { |op| op.rate.should eql(:audio)  }
+    end
+  
+    it "should set operator for all operations" do
+      @op_arr.flatten.map { |op| op.operator.should eql(:+)  }
+    end
+  
+    it "should set correct inputs when provided an array" do
+      arr = BinaryOpUGen.new(:+, @control, [@audio, @scalar] )
+      arr.first.inputs.should == [@control, @audio]
+      arr.last.inputs.should == [@control, @scalar]
+    end
+    
+    it "should create the correct number of operations" do
+      @op_arr.flatten.size.should eql( @arg_array.flatten.size )
+    end
+  
+    it "should replicate the array passed" do
+      last = lambda do |i| 
+        if i.instance_of?( BinaryOpUGen) 
+          i.inputs.first.should == @audio
+          i.inputs.last 
+        else 
+          i.map{ |e| last.call(e) } 
+        end
+      end
+      last.call(@op_arr).should == @arg_array
+    end
+    
+    it "should accept numbers as inputs" do
+      arr = BinaryOpUGen.new(:+, @control, [100, 200.0] )
+      arr.first.inputs.should == [@control, 100]
+      arr.last.inputs.should == [@control, 200.0]
+      BinaryOpUGen.new(:+, 100, @control ).inputs.should == [100, @control]
+    end
+    
+    it "should accept array as input" do
+      arr = BinaryOpUGen.new(:+, [@audio, @scalar], @control  )
+      arr.first.inputs.should == [@audio, @control]
+      arr.last.inputs.should == [@scalar, @control]
+    end
+  end
+  
+  describe MulAdd do
+    it do
+      MulAdd.new( @audio, 0.5, 0.5 ).should be_instance_of(MulAdd)
+    end
+
+    it do
+      MulAdd.new( @audio, 0.5, 0.5 ).rate.should == :audio
+    end
+    
+    it do
+      MulAdd.new( @audio, 0.5, 0.5 ).inputs.should == [@audio, 0.5, 0.5]
+    end
+    
+    it "should not be instance of MulAdd" do
+      unary_op = mock('neg')
+      mult     = mock('mult')
+      minus    = mock('minus')
+      plus     = mock('plus')
+      
+      @audio.should_receive( :neg ).and_return( unary_op )
+      @audio.should_receive( :* ).and_return( mult )
+      add = mock( '0.5', :- => minus, :zero? => false )
+      @audio.should_receive( :+ ).and_return( plus )
+      
+      MulAdd.new( @audio, 0, 0.5 ).should be_instance_of( Float )
+      MulAdd.new( @audio, 1, 0 ).should   == @audio
+      MulAdd.new( @audio, -1, 0 ).should  == unary_op
+      MulAdd.new( @audio, 0.5, 0 ).should == mult
+      MulAdd.new( @audio, -1, add ).should == minus
+      MulAdd.new( @audio, 1, 0.5 ).should == plus
+    end
+    
+    it "should accept ugens" do
+      MulAdd.new( @audio, @audio, 1 ).should be_instance_of(MulAdd)
+      MulAdd.new( @audio, @audio, @scalar ).should be_instance_of(MulAdd)
+      
+      bin_op_ugen = mock('binary op ugen')
+      @audio.stub!( :* ).and_return( bin_op_ugen )
+      MulAdd.new( @audio, @audio, 0 ).should == bin_op_ugen
+    end
+    
+    it "should accept array"
+    
+  end
+  
+end
+

data/spec/audio/server_spec.rb

@@ -0,0 +1,68 @@
+require File.join( File.expand_path(File.dirname(__FILE__)), '..',"helper")
+require 'yaml'
+require 'tempfile'
+
+require 'named_arguments'
+require 'osc'
+require "#{SCRUBY_DIR}/audio/server"
+
+include Scruby
+include Audio
+
+
+describe Server, 'instantiation and booting' do
+
+  before do
+    @server = Server.new
+  end
+
+  it "should not rise scynth not found error" do
+    File.stub!( :exists ).and_return( true )
+    lambda{ @server = Server.new; @server.boot; @server.stop }.should_not raise_error(Server::SCError)
+  end
+
+  it "should not reboot" do
+    @server.boot
+    Thread.should_not_receive(:new)
+    @server.boot
+    @server.stop
+  end
+
+  it "should raise scsynth not found error" do
+    Server.sc_path = '/Applications/SuperCollider/not_scsynth'
+    lambda{ @server = Server.new; @server.boot }.should raise_error(Server::SCError)
+  end
+
+  it "should add self to a list of servers" do
+    s = Server.new
+    Server.all.should include(s)
+  end
+
+  describe 'sending OSC' do
+
+    before :all do
+      Server.sc_path = '/Applications/SuperCollider/scsynth'
+
+      encoded = "SCgf\000\000\000\001\000\001\003out\000\002C\334\000\000\000\000\000\000\000\000\000\000\000\002\006SinOsc\002\000\002\000\001\000\000\377\377\000\000\377\377\000\001\002\003Out\002\000\002\000\000\000\000\377\377\000\001\000\000\000\000\000\000"
+      @sdef   = mock('sdef', :encode => encoded)
+
+      @server = Server.new
+      # @server.boot
+    end
+
+    after do
+      # @server.stop
+    end
+
+    it "should send message" # do
+    #      @server.send_synth_def( @sdef )
+    # 
+    #      # blob = [OSC::Blob.new( @sdef.encode ), 0]
+    #      
+    #    end
+
+
+
+  end
+end 
+