spnet 0.1.4 → 0.1.5

data/lib/spnet/block.rb

@@ -1,40 +0,0 @@
-
-module SPNet
-class Block
-  include Hashmake::HashMakeable
-  
-  attr_reader :name, :in_ports, :out_ports
-  
-  DO_NOTHING = ->(){}
-  
-  HASHED_ARG_SPECS = [
-    Hashmake::ArgSpec.new(:reqd => false, :key => :name, :type => String, :default => "UNNAMED"),
-    Hashmake::ArgSpec.new(:reqd => false, :key => :algorithm, :type => Proc, :default => DO_NOTHING),
-    Hashmake::ArgSpec.new(:reqd => false, :key => :in_ports, :type => InPort, :container => Hashmake::ArgSpec::CONTAINER_ARRAY, :default => ->(){ Array.new } ),
-    Hashmake::ArgSpec.new(:reqd => false, :key => :out_ports, :type => OutPort, :container => Hashmake::ArgSpec::CONTAINER_ARRAY, :default => ->(){ Array.new }),
-  ]
-  
-  def initialize args = {}
-    hash_make Block::HASHED_ARG_SPECS, args
-  end
-  
-  def find_ports name, ignore_case = true
-    matches = (@in_ports + @out_ports).select do |port|
-      if ignore_case
-        port.name.casecmp(name) == 0
-      else
-        port.name == name
-      end
-    end
-    return matches
-  end
-  
-  def find_first_port name, ignore_case = true
-    return find_ports(name, ignore_case).first
-  end
-  
-  def step count
-    @algorithm.call count
-  end
-end
-end

data/lib/spnet/in_port.rb

@@ -1,29 +0,0 @@
-require 'hashmake'
-
-module SPNet
-class InPort
-  
-  include Hashmake::HashMakeable
-    
-  ARG_SPECS = [
-    Hashmake::ArgSpec.new(:reqd => false, :key => :name, :type => String, :default => "UNNAMED"),
-    Hashmake::ArgSpec.new(:reqd => true, :key => :matching_port_class, :type => Class),
-  ]
-
-  attr_reader :name, :link
-  
-  def initialize args
-    hash_make InPort::ARG_SPECS, args
-    @link = nil
-  end
-  
-  def clear_link
-    @link = nil
-  end
-  
-  def set_link link
-    raise ArgumentError, "link #{link} is not a #{@matching_port_class}" unless link.is_a?(@matching_port_class)
-    @link = link
-  end
-end
-end

data/lib/spnet/out_port.rb

@@ -1,64 +0,0 @@
-require 'set'
-require 'hashmake'
-
-module SPNet
-class OutPort
-
-  include Hashmake::HashMakeable
-  
-  ARG_SPECS = [
-    Hashmake::ArgSpec.new(:reqd => false, :key => :name, :type => String, :default => "UNNAMED"),
-    Hashmake::ArgSpec.new(:reqd => true, :key => :matching_port_class, :type => Class),
-  ]
-
-  attr_reader :name, :links
-
-  def initialize hashed_args = {}
-    hash_make OutPort::ARG_SPECS, hashed_args
-    @links = Set.new
-  end
-  
-  def add_link link
-    raise ArgumentError, "link #{link} is not a #{@matching_port_class}" unless link.is_a?(@matching_port_class)
-    raise ArgumentError, "link #{link} is already linked" if link.link
-    @links.add link
-    link.set_link self
-  end
-  
-  def remove_link link
-    raise ArgumentError, "@links does not include link #{link}" unless @links.include? link
-    @links.delete link
-    link.clear_link
-  end
-  
-  def remove_bad_links
-    find_bad_links_and :remove
-  end
-  
-  def correct_bad_links
-    find_bad_links_and :correct
-  end
-  
-  private
-  
-  def find_bad_links_and action
-    marked = []
-    
-    @links.each do |link|
-      bad = (link.link == nil) or (link.link != self)
-      if bad
-        marked.push link
-      end
-    end
-    
-    marked.each do |link|
-      if action == :remove
-        @links.delete link
-      elsif action == :correct
-        link.set_link self
-      end
-    end
-  end
-
-end
-end

data/lib/spnet/ports/value_in_port.rb

@@ -1,27 +0,0 @@
-require 'hashmake'
-
-module SPNet
-class ValueInPort < InPort
-  
-  include Hashmake::HashMakeable
-
-  ARG_SPECS = [
-    Hashmake::ArgSpec.new(:key => :get_value_handler, :reqd => true, :type => Proc),
-    Hashmake::ArgSpec.new(:key => :set_value_handler, :reqd => true, :type => Proc)
-  ]
-
-  def initialize hashed_args = {}
-    hash_make(ValueInPort::ARG_SPECS, hashed_args)
-    hashed_args.merge!(:matching_port_class => ValueOutPort)
-    super(hashed_args)
-  end
-  
-  def set_value value
-    @set_value_handler.call value
-  end
-  
-  def get_value
-    @get_value_handler.call
-  end
-end
-end

data/lib/spnet/ports/value_out_port.rb

@@ -1,28 +0,0 @@
-require 'set'
-
-module SPNet
-class ValueOutPort < OutPort
-
-  def initialize hashed_args = {}
-    hashed_args.merge!(:matching_port_class => ValueInPort)
-    super(hashed_args)
-  end
-  
-  def set_value value
-    rvs = []
-    @links.each do |link|
-      rvs.push link.set_value value
-    end
-    return rvs
-  end
-
-  def get_value
-    rvs = []
-    @links.each do |link|
-      rvs.push link.get_value
-    end
-    return rvs
-  end
-
-end
-end

data/spec/block_spec.rb

@@ -1,38 +0,0 @@
-require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
-
-describe SPNet::Block do
-  context '.new' do
-    context 'no I/O ports given' do
-      before :all do
-        @block = SPNet::Block.new
-      end
-      
-      it 'should have no input ports' do
-        @block.in_ports.should be_empty
-      end
-
-      it 'should have no output ports' do
-        @block.out_ports.should be_empty
-      end
-    end
-    
-    context '1 in and 1 out port given' do
-      before :all do
-        @block = SPNet::Block.new(
-          :in_ports => [SPNet::SignalInPort.new(:name => "IN")],
-          :out_ports => [SPNet::SignalOutPort.new(:name => "OUT")],
-        )
-      end
-      
-      it 'should have 1 input port' do
-        @block.in_ports.count.should be 1
-        @block.in_ports.first.name.should eq("IN")
-      end
-
-      it 'should have 1 output port' do
-        @block.out_ports.count.should be 1
-        @block.out_ports.first.name.should eq("OUT")
-      end      
-    end
-  end
-end

data/spec/in_port_spec.rb

@@ -1,29 +0,0 @@
-require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
-
-describe SPNet::InPort do
-  describe '.new' do
-    it 'should not have any links' do
-      port = SPNet::InPort.new :matching_port_class => SPNet::OutPort
-      port.link.should be_nil
-    end
-  end
-
-  describe '#set_link' do
-    it 'should set link to given OutPort' do
-      in_port = SPNet::InPort.new :matching_port_class => SPNet::OutPort
-      out_port = SPNet::OutPort.new :matching_port_class => SPNet::InPort
-      in_port.set_link out_port
-      in_port.link.should eq(out_port)
-    end
-  end
-  
-  describe '#clear_link' do
-    it 'should set link to given OutPort' do
-      in_port = SPNet::InPort.new :matching_port_class => SPNet::OutPort
-      out_port = SPNet::OutPort.new :matching_port_class => SPNet::InPort
-      in_port.set_link out_port
-      in_port.clear_link
-      in_port.link.should be_nil
-    end
-  end
-end

data/spec/out_port_spec.rb

@@ -1,46 +0,0 @@
-require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
-
-describe SPNet::OutPort do
-  before :each do
-    @in_port = SPNet::InPort.new :matching_port_class => SPNet::OutPort
-    @out_port = SPNet::OutPort.new :matching_port_class => SPNet::InPort
-  end
-  
-  describe '.new' do
-    it 'should have no links' do
-      @out_port.links.should be_empty
-    end    
-  end
-  
-  describe '#add_link' do
-    it 'should add the given input port to links' do
-      @out_port.add_link @in_port
-      @out_port.links.count.should be 1
-      @out_port.links.first.should eq(@in_port)
-    end
-
-    it 'should also link the output port to the given input port' do
-      @out_port.add_link @in_port
-      @in_port.link.should eq(@out_port)
-    end
-
-    it 'should raise ArgumentError if the given input port is already linked' do
-      @out_port.add_link @in_port
-      lambda { @out_port.add_link(@in_port) }.should raise_error(ArgumentError)
-    end
-    
-    it 'should raise ArgumentError if port is not input port' do
-      out_port2 = SPNet::OutPort.new :matching_port_class => SPNet::InPort
-      lambda { @out_port.add_link(out_port2) }.should raise_error(ArgumentError)
-    end
-  end
-
-  describe '#remove_link' do
-    it 'should remove the given input port (if it is already linked to the output port)' do
-      @out_port.add_link @in_port
-      @out_port.remove_link @in_port
-      @out_port.links.should be_empty
-    end
-  end
-
-end

data/spec/ports/value_out_port_spec.rb

@@ -1,41 +0,0 @@
-require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
-
-describe SPNet::ValueOutPort do
-  before :each do
-    @value = 0
-    
-    set_value_handler = lambda do |value|
-      return @value = value
-    end
-    
-    get_value_handler = lambda do
-      return @value
-    end
-    
-    @out_port = SPNet::ValueOutPort.new
-    @in_port = SPNet::ValueInPort.new :get_value_handler => get_value_handler, :set_value_handler => set_value_handler
-  end
-
-  describe '#add_link' do
-    it 'should raise ArgumentError if port is not ValueInPort' do
-      @in_port2 = SPNet::SignalInPort.new
-      lambda { @out_port.add_link(@in_port2) }.should raise_error(ArgumentError)
-    end
-  end
-
-  describe '#set_value' do
-    it 'should pass the given value through ValueInPort#set_value' do
-      @out_port.add_link @in_port
-      rv = @out_port.set_value 5
-      @value.should eq(5)
-    end
-  end
-  
-  describe '#get_value' do
-    it "should return the value from each linked port's ValueInPort#get_value" do
-      @value = 7
-      @out_port.add_link @in_port
-      @out_port.get_value.first.should eq(7)
-    end
-  end
-end