pione 0.2.2 → 0.3.0

data/lib/pione/tuple/working-tuple.rb

@@ -1,13 +0,0 @@
-module Pione
-  module Tuple
-    # WorkingTuple represents current working task informations.
-    class WorkingTuple < BasicTuple
-      define_format [:working,
-        # caller domain
-        [:domain, String],
-        # rule handler digest
-        [:digest, String]
-      ]
-    end
-  end
-end

data/lib/pione/uri-scheme.rb

@@ -1,11 +0,0 @@
-module Pione
-  # URIScheme is a name spece for URI.
-  module URIScheme; end
-end
-
-require 'pione/uri-scheme/basic-scheme'
-require 'pione/uri-scheme/local-scheme'
-require 'pione/uri-scheme/dropbox-scheme'
-require 'pione/uri-scheme/broadcast-scheme'
-require 'pione/uri-scheme/myftp-scheme'
-

data/lib/pione/util/error-report.rb

@@ -1,27 +0,0 @@
-module Pione
-  module Util
-    module ErrorReport
-      # Prints the pretty exception.
-      def print(e)
-        $stderr.puts "%s: %s" % [e.class, e.message]
-        e.backtrace.each {|line| $stderr.puts "    %s" % line}
-      end
-      module_function :print
-
-      def warn(msg, receiver, exception, file, line)
-        if Pione.debug_mode?
-          $stderr.puts "PIONE warning [%s:%i] %s (%s)" % [file, line, msg, receiver]
-          print(exception)
-        end
-      end
-      module_function :warn
-
-      def debug(msg, receiver, file, line)
-        if Pione.debug_mode?
-          $stderr.puts "PIONE debug [%s:%i] %s (%s)" % [file, line, msg, receiver]
-        end
-      end
-      module_function :debug
-    end
-  end
-end

data/test/agent/spec_command-listener.rb

@@ -1,30 +0,0 @@
-require_relative '../test-util'
-
-class TestCommandListener < Pione::Agent::TupleSpaceClient
-  define_state :test
-
-  define_state_transition :initialized => :test
-  define_state_transition :test => :test
-
-  def transit_to_test
-    sleep 0.1
-  end
-end
-
-describe 'Pione::Agent::CommandListener' do
-  before do
-    create_remote_tuple_space_server
-  end
-
-  after do
-    DRb.stop_service
-  end
-
-  it 'should terminate' do
-    agent = TestCommandListener.start(tuple_space_server)
-    agent.wait_till(:test)
-    write(Tuple[:command].new("terminate"))
-    agent.wait_till(:terminated)
-    agent.should.be.terminated
-  end
-end

data/test/agent/spec_rule-provider.rb

@@ -1,78 +0,0 @@
-require_relative '../test-util'
-
-describe "Pione::Agent::RuleProvider" do
-  before do
-    @ts = create_tuple_space_server
-    @agent = Agent[:rule_provider].new(@ts)
-    doc = Component::Document.parse(<<-DOCUMENT)
-      Rule A
-        input  '*.a'
-        output '{$I[1]}.result'
-      Action
-        echo A > {$O[1]}
-      End
-
-      Rule B
-        input  '*.b'
-        output '{$I[1]}.result'
-      Action
-        echo B > {$[1]}
-      End
-    DOCUMENT
-    @rule_a = doc.find('A')
-    @rule_b = doc.find('B')
-    @agent.read_rules(doc)
-  end
-
-  after do
-    @agent.terminate
-    @ts.terminate
-  end
-
-  it "should have rules" do
-    @agent.known_rules.should.include "&Main:A"
-    @agent.known_rules.should.include "&Main:B"
-  end
-
-  it "should add a rule" do
-    doc = Component::Document.parse(<<-DOCUMENT)
-      Rule C
-        input  '*.c'
-        output '{$I[1]}.result'
-      Action
-        echo C > {$O[1]}
-      End
-    DOCUMENT
-    @agent.read_rules(doc)
-    @agent.known_rules.should.include "&Main:C"
-  end
-
-  it "should provide requested rule" do
-    @agent.start
-
-    # wait provider's setup
-    @agent.wait_till(:request_waiting)
-
-    # write a request
-    write_and_wait_to_be_taken(Tuple[:request_rule].new(rule_path: '&Main:A'))
-    check_exceptions
-
-    # check rule tuple
-    should.not.raise(Rinda::RequestExpiredError) do
-      tuple = read!(Tuple[:rule].new(rule_path: '&Main:A'))
-      tuple.content.class.should == Component::ActionRule
-      tuple.content.should == @rule_a
-    end
-
-    # write another request
-    write_and_wait_to_be_taken(Tuple[:request_rule].new(rule_path: '&Main:B'))
-    check_exceptions
-
-    # check rule tuple
-    should.not.raise(Rinda::RequestExpiredError) do
-      tuple = read!(Tuple[:rule].new(rule_path: '&Main:B'))
-      tuple.content.class.should == Component::ActionRule
-      tuple.content.should == @rule_b
-    end
-  end
-end

data/test/component/spec_document.rb

@@ -1,67 +0,0 @@
-require_relative '../test-util'
-
-document_location = Location[File.dirname(__FILE__)] + "spec_document.pione"
-
-describe 'Pione::Component::Document' do
-  before do
-    @document = Component::Document.load(document_location)
-  end
-
-  it 'should load a document from a file' do
-    @document.rules.map{|rule| rule.name}.tap do |x|
-      x.should.include "Main"
-      x.should.include "RuleA"
-      x.should.include "RuleB"
-      x.should.include "RuleC"
-    end
-  end
-
-  it 'should load a document from a string' do
-    Component::Document.parse(document_location.read).should == @document
-  end
-
-  it 'should load a document with package name' do
-    document = Component::Document.load(document_location, "Test")
-    document.package_name.should == "Test"
-    document.find("Main").package_name == "Test"
-  end
-
-  it 'should get rule by name' do
-    @document.find("Main").should.kind_of(Component::FlowRule)
-    @document.find("RuleA").should.kind_of(Component::ActionRule)
-    @document.find("RuleB").should.kind_of(Component::ActionRule)
-    @document.find("RuleC").should.kind_of(Component::ActionRule)
-  end
-
-  it 'should have document parameters' do
-    @document.params["P1"].should == PioneString.new("a").to_seq
-    @document.params["P2"].should == PioneString.new("b").to_seq
-    @document.params["P3"].should == PioneString.new("c").to_seq
-    @document.params["P4"].should == PioneString.new("d").to_seq
-    @document.params["P5"].should == PioneString.new("e").to_seq
-    @document.params["P6"].should == PioneString.new("f").to_seq
-    user_params = @document.params.data.select{|var, val| var.user_param}.map{|var, val| var.name}
-    user_params.sort.should == ["P1", "P2", "P3", "P4", "P5"]
-  end
-
-  it 'should have document variable bindings' do
-    @document.find("Main").condition.params["X"].should == 1.to_pione.to_seq
-    @document.find("RuleA").condition.params["X"].should == 1.to_pione.to_seq
-    @document.find("RuleB").condition.params["X"].should == 1.to_pione.to_seq
-    @document.find("RuleC").condition.params["X"].should == 1.to_pione.to_seq
-  end
-
-  it 'should create root rule' do
-    root = @document.create_root_rule(@document.find("Main"), Model::Parameters.empty)
-    root.should.kind_of(Component::RootRule)
-  end
-
-  it 'should raise variable binding error' do
-    should.raise(VariableBindingError) do
-      Component::Document.parse <<-PIONE
-        $X := 1
-        $X := 2
-      PIONE
-    end
-  end
-end

data/test/component/spec_package-archiver.rb

@@ -1,27 +0,0 @@
-require_relative '../test-util'
-
-describe "Pione::Component::PackageArchiver" do
-  before do
-    @path = TestUtil::Package.get("TestPackage1")
-  end
-
-  it "should create archive file" do
-    out = Location[Temppath.mkdir]
-    Component::PackageArchiver.new(@path).archive(out)
-
-    # easy check
-    pkg = out + "TestPackage1+v0.1.0.ppg"
-    pkg.should.exist
-    pkg.should.file
-    pkg.size.should > 0
-
-    # structure check
-    Zip::Archive.open(pkg.path.to_s) do |ar|
-      ar.each do |file|
-        unless file.directory?
-          file.read.should == (@path + file.name).read
-        end
-      end
-    end
-  end
-end

data/test/component/spec_package-expander.rb

@@ -1,11 +0,0 @@
-require_relative '../test-util'
-
-describe "Pione::Component::PackageExpander" do
-  it "should expand archive package" do
-    location = TestUtil::TEST_PACKAGE_DIR + "TestPackage1+v0.1.0.ppg"
-    expanded = Location[Temppath.mkdir]
-    Component::PackageExpander.new(location).expand(expanded)
-    (expanded + "package.yml").should.exist
-  end
-end
-

data/test/component/spec_package-filename.rb

@@ -1,79 +0,0 @@
-require_relative '../test-util'
-
-shared "package filename" do
-  it "should parse the package filename" do
-    Component::PackageFilename.parse(@filename).tap do |fname|
-      fname.package_name.should == @package_name
-      fname.edition.should == @edition
-      fname.tag.should == @tag
-      fname.hash_id.should == @hash_id
-    end
-  end
-
-  it "should build package filename string" do
-    Component::PackageFilename.parse(@filename).to_s.should == @filename
-  end
-end
-
-describe "Pione::Component::PackageFilename" do
-  describe "package name + edition + tag + hash_id" do
-    before do
-      @filename = "Test(keita.yamaguchi@gmail.com)+test@d462c59.ppg"
-      @package_name = "Test"
-      @edition = "keita.yamaguchi@gmail.com"
-      @tag = "test"
-      @hash_id = "d462c59"
-    end
-
-    behaves_like "package filename"
-  end
-
-  describe "package name + 'origin' + tag + hash_id" do
-    before do
-      @filename = "Test+test@d462c59.ppg"
-      @package_name = "Test"
-      @edition = "origin"
-      @tag = "test"
-      @hash_id = "d462c59"
-    end
-
-    behaves_like "package filename"
-  end
-
-  describe "package name + tag + hash_id" do
-    before do
-      @filename = "Test+test@d462c59.ppg"
-      @package_name = "Test"
-      @edition = "origin"
-      @tag = "test"
-      @hash_id = "d462c59"
-    end
-
-    behaves_like "package filename"
-  end
-
-  describe "package name + tag" do
-    before do
-      @filename = "Test+test.ppg"
-      @package_name = "Test"
-      @edition = "origin"
-      @tag = "test"
-      @hash_id = nil
-    end
-
-    behaves_like "package filename"
-  end
-
-  describe "package name + hash id" do
-    before do
-      @filename = "Test@d462c59.ppg"
-      @package_name = "Test"
-      @edition = "origin"
-      @tag = nil
-      @hash_id = "d462c59"
-    end
-
-    behaves_like "package filename"
-  end
-end
-

data/test/component/spec_package-reader.rb

@@ -1,100 +0,0 @@
-require_relative '../test-util'
-
-$stdout = STDOUT
-$stderr = STDERR
-
-describe "Pione::Component::PackageReader" do
-  shared "package" do
-    it "should read the package and return it" do
-      Component::PackageReader.read(@location).should.kind_of Component::Package
-    end
-
-    it "should get package informations" do
-      package = Component::PackageReader.read(@location)
-      package.name.should == "HelloWorld"
-    end
-
-    it "should get scenarios" do
-      package = Component::PackageReader.read(@location)
-      package.name.should == "HelloWorld"
-      scenario = package.scenarios[0]
-      scenario.name.should == "HelloWorld"
-      scenario.inputs.should.empty
-      scenario.outputs[0].basename.should == "message.txt"
-
-      # case1 = package.scenarios[0]
-      # case1.name.should == "Case1"
-      # case1.inputs[0].basename.should == "1.txt"
-      # case2 = package.scenarios[1]
-      # case2.name.should == "Case2"
-      # case2.inputs[0].basename.should == "1.txt"
-      # case2.inputs[1].basename.should == "2.txt"
-      # case2.inputs[2].basename.should == "3.txt"
-      # case3 = package.scenarios[2]
-      # case3.name.should == "Case3"
-      # case3.inputs[0].basename.should == "a.txt"
-      # case3.inputs[1].basename.should == "b.txt"
-    end
-  end
-
-  shared "directory package" do
-    it "should read package directory" do
-      Component::PackageReader.new(@location).type.should == :directory
-    end
-  end
-
-  describe "directory package at local location" do
-    before do
-      @location = TestUtil::Package.get("HelloWorld")
-    end
-
-    behaves_like "package"
-    behaves_like "directory package"
-  end
-
-  describe "directory package at HTTP location" do
-    before do
-      @server = TestUtil::WebServer.start(TestUtil::TEST_PACKAGE_DIR)
-      @location = @server.root + "HelloWorld/"
-    end
-
-    after do
-      @server.terminate
-    end
-
-    behaves_like "package"
-    behaves_like "directory package"
-  end
-
-  describe "archive package at local location" do
-    before do
-      @location = TestUtil::TEST_PACKAGE_DIR + "HelloWorld+v0.1.0.ppg"
-    end
-
-    behaves_like "package"
-  end
-
-  describe "archive package at HTTP location" do
-    before do
-      @server = TestUtil::WebServer.start(TestUtil::TEST_PACKAGE_DIR)
-      @location = @server.root + "HelloWorld+v0.1.0.ppg"
-    end
-
-    after do
-      @server.terminate
-    end
-
-    behaves_like "package"
-  end
-
-  describe "git package at local location" do
-    before do
-      path = Temppath.mkdir
-      Util::Zip.uncompress(TestUtil::TEST_PACKAGE_DIR + "HelloWorld-gitrepos.zip", Location[path])
-      @location = Location[git: path]
-    end
-
-    behaves_like "package"
-  end
-end
-