pione 0.5.0.alpha.1 → 0.5.0.alpha.2

checksums.yaml

@@ -1,15 +1,15 @@
 ---
 !binary "U0hBMQ==":
   metadata.gz: !binary |-
-    NGQyYWIyZGZlMjFhNmYyMzQ4OGY2MGE5OGYzNWViYzFiMDE5Nzg4MQ==
+    ZTUzMjJhZmQwY2EyNmQzODZlZThhYTQ3YzA2NmQzYTgxMjM5ZTg4ZQ==
   data.tar.gz: !binary |-
-    NDQyNDQ4ZjFkYjgxMWUxYjhmNjczZDdiNDRkZDEyNmQ2YzBkNjUwYQ==
+    ZWE3MzQ1NTFlOGZkNmNjYzA1ZTliMzFmMmYyZTE5MThjMjYyMWRkNQ==
 SHA512:
   metadata.gz: !binary |-
-    YmY3Y2VmMjM2ZDA0Mzg4NDQwYjEyZDZmYzRiNzJjNzBmYmMyZmJkYzc2ZWYx
-    N2UwNmNkZjU4MjI4ZWFiNjJiYWI0NzI5ZmJhM2I1ODNjNTkwMjM3OTY5N2I0
-    ZGY3MDFjYWZjOTZkYjVjMjE3NmZlODEwMTMwYzMwODdmYmM3ZDQ=
+    MzNiNzQxMmYwMjllMjE4MzQ1Nzk3YzFiNWM3NzVhMWMzM2Q5YmFkMDA3Njgx
+    MDQyZmRmNzk0M2E5YTdmMjJkOWUyOGI4ZGE1YmI1OTkwMDkxMjFjYTY0YjI1
+    MTY2ZTAzY2Q4MzQyZjU4NTA2NTI2YWRmNDBkZWVkMjAxYzFiMjY=
   data.tar.gz: !binary |-
-    YWFmOWMyMWVkZTFhYWU0YzUyZWU3NzNhNzE5YzY2NjgyOThlMDRlMTA1YjQ4
-    ODg3YjQ3YTQ0ZGYwZTJiYjI5N2ZjNWJjNzAxZTYzYWVkYTA1NWRhZjZmNzhk
-    NTc4NGRjYzRlNWMzYzkwOGUxNDc4YTFlYmU0YTZkNmU0NGQyZDY=
+    ODFlMGIxZTM4Zjc4M2Q0YjU5ZmNmNDNhOTNkOGRlNTYyMDM0ZWNmZTk2ZGZj
+    YjFhNWEzZWE0MGMwZmNhZjVlNTI4NmNhNTM3N2IxZWE2ZThjZGVhMTg2M2Iz
+    OGVlYzJjMGNiYmQwMjk2NmQyNmMwZjBhZTFkYWFkNTdhNDk4MWY=

data/.gitignore

@@ -7,17 +7,16 @@
 .yardoc
 Gemfile.lock
 gems
-log.txt
-nohup.out
-test-report.txt
-*.log
 
-/input
-/output
 /process
-/result
 /html
 /vendor
 /coverage
 /pkg
 /*.ppg
+
+log.txt
+nohup.out
+test-report.txt
+*.log
+scenario-test-result.txt

data/.travis.yml

@@ -1,7 +1,9 @@
 language: ruby
 rvm:
   - "1.9.3"
-#  - "2.0.0" # pione doesn't work with 2.0
+  - "2.0.0"
+  - "2.1"
+  - "2.2"
 #  - jruby-19mode
 #  - rbx-19mode # pione doesn't work with 2.0
 script: rake -I lib test

data/example/FeatureExample/Package.pione

@@ -1 +1,2 @@
 .@ PackageName :: "FeatureExample"
+.@ Entrance :: FeatureExample

data/lib/pione/agent/job-manager.rb

@@ -68,7 +68,7 @@ module Pione
 
       def transit_to_run
         finder = RuleEngine::DataFinder.new(@tuple_space, 'root')
-        list = Enumerator.new(finder, :find, :input, @rule_condition.inputs, @env).to_a
+        list = finder.to_enum(:find, :input, @rule_condition.inputs, @env).to_a
         if list.empty?
           user_message "error: no inputs"
           terminate

data/lib/pione/lang/common-parser.rb

@@ -198,6 +198,9 @@ module Pione
       def line(content)
         space? >> content >> line_end.as(:tail)
       end
+      def _line(content)
+        space? >> content >> line_end
+      end
     end
   end
 end

data/lib/pione/lang/conditional-branch-parser.rb

@@ -31,10 +31,10 @@ module Pione
       }
 
       # +else_context+ matches +else+ block.
-      rule(:else_context) { line(keyword_else) >> conditional_branch_context.as(:else_context) }
+      rule(:else_context) { _line(keyword_else) >> conditional_branch_context.as(:else_context) }
 
       # +branch_end+ matches conditional branch block end.
-      rule(:branch_end) { line(keyword_end) }
+      rule(:branch_end) { _line(keyword_end) }
       rule(:branch_end!) { branch_end.or_error("conditional branch end not found") }
 
       # +case_branch+ matches +case+ conditional branches.

data/lib/pione/lang/declaration-parser.rb

@@ -159,14 +159,14 @@ module Pione
       # +flow_rule_block+ matches flow rule declarations.
       rule(:flow_rule_block) {
         ( rule_header >> flow_rule_condition_context.as(:context1) >>
-          line(keyword_Flow) >> flow_context.as(:context2) >> rule_footer!
+          _line(keyword_Flow) >> flow_context.as(:context2) >> rule_footer!
         ).as(:flow_rule_block)
       }
 
       # +action_rule_block+ matches action rule declarations.
       rule(:action_rule_block) {
         ( rule_header >> action_rule_condition_context.as(:context1) >>
-          line(keyword_Action) >> action_context.as(:context2) >> rule_footer!
+          _line(keyword_Action) >> action_context.as(:context2) >> rule_footer!
         ).as(:action_rule_block)
       }
 
@@ -177,11 +177,11 @@ module Pione
 
       # +rule_header+ matches rule headers.
       rule(:rule_header) {
-        line(keyword_Rule.as(:declarator) >> space >> expr!("should be rule name").as(:expr))
+        _line(keyword_Rule.as(:declarator) >> space >> expr!("should be rule name").as(:expr))
       }
 
       # +rule_footer+ matches rule end keywords.
-      rule(:rule_footer) { line(keyword_End) }
+      rule(:rule_footer) { _line(keyword_End) }
       rule(:rule_footer!) { rule_footer.or_error("rule footer not found") }
     end
   end

data/lib/pione/lang/sequence.rb

@@ -104,7 +104,7 @@ module Pione
         if block_given?
           pieces.each {|e| yield set(pieces: [e])}
         else
-          Enumerator.new(self, :each)
+          to_enum(:each)
         end
       end
 

data/lib/pione/log/system-log.rb

@@ -3,17 +3,57 @@ module Pione
     SystemLog = Rootage::Log
     SystemLog.set_logger_block {Global.system_logger}
 
+    # BasicLogger provides common functions for PIONE's loggers.
+    class BasicLogger < Rootage::Logger
+      include DRbUndumped
+
+      # log level
+      attr_accessor :level
+
+      def initialize
+        @level = :info
+      end
+
+      private
+
+      # Return true if the level message can be loggable.
+      #
+      # @param level [Symbol]
+      #   the level
+      # @return [Boolean]
+      #   true if the level message can be loggable
+      def loggable?(level)
+        level_to_i(@level) >= level_to_i(level)
+      end
+
+      # Return the number of the level.
+      #
+      # @param level [Symbol]
+      #   the level
+      # @return [Integer]
+      #   the number of the level
+      def level_to_i(level)
+        case level
+        when :fatal; 0
+        when :error; 1
+        when :warn ; 2
+        when :info ; 3
+        when :debug; 4
+        end
+      end
+    end
+
     # `Log::PioneSystemLogger` is a PIONE original logger. This generates very
     # colorful message for identifiability and detailed informations.
-    class PioneSystemLogger < Rootage::Logger
-      include DRbUndumped
+    class PioneSystemLogger < BasicLogger
 
       attr_accessor :level
 
       def initialize(out = nil)
+        super()
+
         @queue = Queue.new
         @thread = make_writer_thread
-        @level = :info
         @lock = Mutex.new
         @out = out
       end
@@ -49,16 +89,6 @@ module Pione
 
       private
 
-      def level_to_i(level)
-        case level
-        when :fatal; 0
-        when :error; 1
-        when :warn ; 2
-        when :info ; 3
-        when :debug; 4
-        end
-      end
-
       def make_writer_thread
         Thread.new do
           while true do
@@ -69,7 +99,7 @@ module Pione
       end
 
       def push(level, msg, pos, pid)
-        if level_to_i(@level) >= level_to_i(level)
+        if loggable?(level)
           @queue.push([level, msg, pos, pid, Time.now])
         end
       end
@@ -88,31 +118,32 @@ module Pione
       end
     end
 
-    class DelegatableLogger < Rootage::Logger
-      include DRbUndumped
-
+    # DelegatableLogger delegates logging functions to another logger.
+    class DelegatableLogger < BasicLogger
       def initialize(logger)
+        super()
+
         @logger = logger
       end
 
       def fatal(msg, pos=caller(1).first, pid=Process.pid)
-        send_message(msg, pos, pid) {@logger.fatal(msg, pos, pid)}
+        send_message(:fatal, msg, pos, pid) {@logger.fatal(msg, pos, pid)}
       end
 
       def error(msg, pos=caller(1).first, pid=Process.pid)
-        send_message(msg, pos, pid) {@logger.error(msg, pos, pid)}
+        send_message(:error, msg, pos, pid) {@logger.error(msg, pos, pid)}
       end
 
       def warn(msg, pos=caller(1).first, pid=Process.pid)
-        send_message(msg, pos, pid) {@logger.warn(msg, pos, pid)}
+        send_message(:warn, msg, pos, pid) {@logger.warn(msg, pos, pid)}
       end
 
       def info(msg, pos=caller(1).first, pid=Process.pid)
-        send_message(msg, pos, pid) {@logger.info(msg, pos, pid)}
+        send_message(:info, msg, pos, pid) {@logger.info(msg, pos, pid)}
       end
 
       def debug(msg, pos=caller(1).first, pid=Process.pid)
-        send_message(msg, pos, pid) {@logger.debug(msg, pos, pid)}
+        send_message(:debug, msg, pos, pid) {@logger.debug(msg, pos, pid)}
       end
 
       def terminate
@@ -121,11 +152,15 @@ module Pione
 
       private
 
-      def send_message(msg, pos, pid, &block)
-        block.call
-      rescue Exception
-        # print stdout directly if the logger fails
-        $stdout.puts("%s (%s) #%s" % [msg, pos, pid])
+      def send_message(level, msg, pos, pid, &block)
+        if loggable?(level)
+          begin
+            block.call
+          rescue Exception
+            # print stdout directly if the logger fails
+            $stdout.puts("%s (%s) #%s" % [msg, pos, pid])
+          end
+        end
       end
     end
 

data/lib/pione/util/process-info.rb

@@ -7,9 +7,14 @@ module Pione
 
       forward! Proc.new{thread}, :alive?, :stop?
 
-      # Kill the process.
+      # Kill the process. This method waits the process to be dead.
+      #
+      # @param signal [Symbol]
+      #   the signal to send
+      # @return [void]
       def kill(signal = :TERM)
         Process.kill(signal, pid)
+        wait
       end
 
       # Wait until the process is dead.

data/lib/pione/version.rb

@@ -1,4 +1,4 @@
 module Pione
   # version of pione
-  VERSION = "0.5.0.alpha.1"
+  VERSION = "0.5.0.alpha.2"
 end

data/test/command/spec_pione-client.rb

@@ -13,7 +13,7 @@ TestHelper.scope do |this|
 
     it "should execute a PIONE document" do
       path = Temppath.create
-      cmd = @cmd.new(["example/HelloWorld/HelloWorld.pione", "--base", path.to_s])
+      cmd = @cmd.new(["example/HelloWorld/", "--base", path.to_s])
       res = Rootage::ScenarioTest.succeed(cmd)
       Location[path + "output" + "message.txt"].should.exist
       Location[path + "output" + "message.txt"].read.should.start_with "Hello, world!"
@@ -21,7 +21,7 @@ TestHelper.scope do |this|
 
     it "should execute a PIONE document with stand alone mode" do
       path = Temppath.create
-      cmd = @cmd.new(["example/HelloWorld/HelloWorld.pione", "--base", path.to_s, "--stand-alone"])
+      cmd = @cmd.new(["example/HelloWorld/", "--base", path.to_s, "--stand-alone"])
       Rootage::ScenarioTest.succeed(cmd)
       Location[path + "output" + "message.txt"].should.exist
       Location[path + "output" + "message.txt"].read.should.start_with "Hello, world!"
@@ -49,201 +49,5 @@ TestHelper.scope do |this|
       cmd = @cmd.new([doc, "--base", path.to_s, "--stand-alone"])
       Rootage::ScenarioTest.fail(cmd)
     end
-
-    describe "example/Fib" do
-      TestHelper::PioneClientRunner.test(self) do |runner|
-        runner.title = "should get a result with no parameters (default fib(3))"
-        runner.args = ["example/Fib/Fib.pione", *runner.default_arguments]
-        runner.run do |base|
-          (base + "output" + "result.txt").should.exist
-          (base + "output" + "result.txt").read.should.start_with "2"
-        end
-      end
-
-      # FIXME: this test is unstable... maybe there are bugs
-
-      # it "should get a result of fib(10)" do
-      #   path = Temppath.create
-      #   args = ["example/Fib/Fib.pione", "-o", path.to_s, "--params", "{NUM: 10}"]
-      #   res = TestHelper::Command.succeed do
-      #     Pione::Command::PioneClient.run(args)
-      #   end
-      #   Location[path + "result.txt"].should.exist
-      #   Location[path + "result.txt"].read.should.start_with "55"
-      # end
-    end
-
-    describe "example/PegasusWMS/Merge" do
-      TestHelper::PioneClientRunner.test(self) do |runner|
-        runner.title = "should get a result of example/PegasusWMS/Merge"
-        runner.args = ["example/PegasusWMS/Merge/", *runner.default_arguments]
-        runner.run do |base|
-          (base + "output" + "binaries.txt").should.exist
-          (base + "output" + "binaries.txt").size.should > 0
-        end
-      end
-    end
-
-    describe "example/PegasusWMS/Pipeline" do
-      if TestHelper::InternetConnectivity.ok?
-        TestHelper::PioneClientRunner.test(self) do |runner|
-          runner.title = "should get a result of example/PegasusWMS/Pipeline"
-          runner.args = ["example/PegasusWMS/Pipeline/", *runner.default_arguments]
-          runner.run do |base|
-            (base + "output" + "count.txt").should.exist
-            (base + "output" + "count.txt").size.should > 0
-          end
-        end
-      else
-        puts "    * ignored because of no internet connection"
-      end
-    end
-
-    describe "example/PegasusWMS/Split" do
-      if TestHelper::InternetConnectivity.ok?
-        TestHelper::PioneClientRunner.test(self) do |runner|
-          runner.title = "should get a result of example/PegasusWMS/Split"
-          runner.args = ["example/PegasusWMS/Split/", *runner.default_arguments]
-          runner.run do |base|
-            (base + "output" + "count.txt.a").should.exist
-            (base + "output" + "count.txt.a").size.should > 0
-            (base + "output" + "count.txt.b").should.exist
-            (base + "output" + "count.txt.b").size.should > 0
-            (base + "output" + "count.txt.c").should.exist
-            (base + "output" + "count.txt.c").size.should > 0
-            (base + "output" + "count.txt.d").should.exist
-            (base + "output" + "count.txt.d").size.should > 0
-          end
-        end
-      else
-        puts "    * ignored because of no internet connection"
-      end
-    end
-
-    describe "example/OddSelector" do
-      TestHelper::PioneClientRunner.test(self) do |runner|
-        runner.title = "should get a result of example/OddSelector"
-        runner.args = ["example/OddSelector", "--rehearse", *runner.default_arguments]
-        runner.run do |base|
-          (base + "output" + "1.res").should.exist
-          (base + "output" + "2.res").should.not.exist
-          (base + "output" + "3.res").should.exist
-          (base + "output" + "4.res").should.not.exist
-          (base + "output" + "5.res").should.exist
-          (base + "output" + "6.res").should.not.exist
-          (base + "output" + "7.res").should.exist
-          (base + "output" + "8.res").should.not.exist
-          (base + "output" + "9.res").should.exist
-          (base + "output" + "10.res").should.not.exist
-        end
-      end
-    end
-
-    describe "example/SerialProcessing" do
-      TestHelper::PioneClientRunner.test(self) do |runner|
-        runner.title = "should get a result of example/SerialProcessing"
-        runner.args = ["example/SerialProcessing", "--rehearse", *runner.default_arguments]
-        runner.run do |base|
-          (base + "output" + "1.a").should.exist
-          (base + "output" + "2.a").should.exist
-          (base + "output" + "3.a").should.exist
-          (base + "output" + "4.a").should.exist
-          (base + "output" + "1.b").should.exist
-          (base + "output" + "2.b").should.exist
-          (base + "output" + "3.b").should.exist
-          (base + "output" + "4.b").should.exist
-          (base + "output" + "1.a").mtime.should <= (base + "output" + "2.a").mtime
-          (base + "output" + "2.a").mtime.should <= (base + "output" + "3.a").mtime
-          (base + "output" + "3.a").mtime.should <= (base + "output" + "4.a").mtime
-          (base + "output" + "4.a").mtime.should <= (base + "output" + "1.b").mtime
-          (base + "output" + "1.b").mtime.should <= (base + "output" + "2.b").mtime
-          (base + "output" + "2.b").mtime.should <= (base + "output" + "3.b").mtime
-          (base + "output" + "3.b").mtime.should <= (base + "output" + "4.b").mtime
-        end
-      end
-    end
-
-    describe "example/MakePair" do
-      TestHelper::PioneClientRunner.test(self) do |runner|
-        runner.title = "should get a result of example/MakePair"
-        runner.args = ["example/MakePair", "--rehearse", "case1", *runner.default_arguments]
-        runner.run do |base|
-          1.upto(5) do |i|
-            1.upto(5) do |ii|
-              comb = (base + "output" + "comb-%s-%s.pair" % [i, ii])
-              i < ii ? comb.should.exist : comb.should.not.exist
-              perm = (base + "output" + "perm-%s-%s.pair" % [i, ii])
-              i != ii ? perm.should.exist : perm.should.not.exist
-              succ = (base + "output" + "succ-%s-%s.pair" % [i, ii])
-              ii - i == 1 ? succ.should.exist : succ.should.not.exist
-            end
-          end
-        end
-      end
-    end
-
-    describe "example/SelectRuleByParam" do
-      TestHelper::PioneClientRunner.test(self) do |runner|
-        runner.title = "should get a result of scenario a of example/SelectRuleByParam"
-        runner.args = ["example/SelectRuleByParam", "--rehearse", "Select A", *runner.default_arguments]
-        runner.run do |base|
-          (base + "output" + "message.txt").should.exist
-          (base + "output" + "message.txt").read.chomp.should == "This is rule A."
-        end
-      end
-
-      TestHelper::PioneClientRunner.test(self) do |runner|
-        runner.title = "should get a result of scenario b of example/SelectRuleByParam"
-        runner.args = ["example/SelectRuleByParam", "--rehearse", "Select B", *runner.default_arguments]
-        runner.run do |base|
-          (base + "output" + "message.txt").should.exist
-          (base + "output" + "message.txt").read.chomp.should == "This is rule B."
-        end
-      end
-
-      TestHelper::PioneClientRunner.test(self) do |runner|
-        runner.title = "should get a result of scenario c of example/SelectRuleByParam"
-        runner.args = ["example/SelectRuleByParam", "--rehearse", "Select C", *runner.default_arguments]
-        runner.run do |base|
-          (base + "output" + "message.txt").should.exist
-          (base + "output" + "message.txt").read.chomp.should == "This is rule C."
-        end
-      end
-    end
-
-    describe "example/FeatureExample" do
-      TestHelper::PioneClientRunner.test(self) do |runner|
-        runner.title = "should get a result of example/FeatureExample"
-        runner.args = ["example/FeatureExample", "--feature", "^X", *runner.default_arguments]
-        runner.run do |base|
-          (base + "output" + "message.txt").should.exist
-          (base + "output" + "message.txt").read.chomp.should == "I can take the task."
-        end
-      end
-
-      TestHelper::PioneClientRunner.test(self) do |runner|
-        runner.title = "should timeout with feature `*` in processing example/FeatureExample"
-        runner.args = ["example/FeatureExample", "--feature", "*", *runner.default_arguments]
-        runner.timeout(5)
-      end
-    end
-
-    describe "example/Sum" do
-      TestHelper::PioneClientRunner.test(self) do |runner|
-        runner.title = "should get a result of example/Sum"
-        runner.args = ["example/Sum", "--rehearse", *runner.default_arguments]
-        runner.run do |base|
-          (base + "output" + "sum.txt").should.exist
-        end
-      end
-    end
-
-    describe "example/ActionError" do
-      TestHelper::PioneClientRunner.test(self) do |runner|
-        runner.title = "should fail in execution of example/ActionError"
-        runner.args = ["example/ActionError", *runner.default_arguments]
-        runner.fail
-      end
-    end
   end
 end

data/test/example/spec_ActionError.rb

@@ -0,0 +1,9 @@
+require 'pione/test-helper'
+
+describe "example/ActionError" do
+  TestHelper::PioneClientRunner.test(self) do |runner|
+    runner.title = "should fail in execution of example/ActionError"
+    runner.args = ["example/ActionError", *runner.default_arguments]
+    runner.fail
+  end
+end

data/test/example/spec_FeatureExample.rb

@@ -0,0 +1,18 @@
+require 'pione/test-helper'
+
+describe "example/FeatureExample" do
+  TestHelper::PioneClientRunner.test(self) do |runner|
+    runner.title = "should get a result of example/FeatureExample"
+    runner.args = ["example/FeatureExample", "--feature", "^X", *runner.default_arguments]
+    runner.run do |base|
+      (base + "output" + "message.txt").should.exist
+      (base + "output" + "message.txt").read.chomp.should == "I can take the task."
+    end
+  end
+
+  TestHelper::PioneClientRunner.test(self) do |runner|
+    runner.title = "should timeout with feature `*` in processing example/FeatureExample"
+    runner.args = ["example/FeatureExample", "--feature", "*", *runner.default_arguments]
+    runner.timeout(5)
+  end
+end

data/test/example/spec_Fib.rb

@@ -0,0 +1,24 @@
+require 'pione/test-helper'
+
+describe "example/Fib" do
+  TestHelper::PioneClientRunner.test(self) do |runner|
+    runner.title = "should get a result with no parameters (default fib(3))"
+    runner.args = ["example/Fib/Fib.pione", *runner.default_arguments]
+    runner.run do |base|
+      (base + "output" + "result.txt").should.exist
+      (base + "output" + "result.txt").read.should.start_with "2"
+    end
+  end
+
+  # FIXME: this test is unstable... maybe there are bugs
+
+  # it "should get a result of fib(10)" do
+  #   path = Temppath.create
+  #   args = ["example/Fib/Fib.pione", "-o", path.to_s, "--params", "{NUM: 10}"]
+  #   res = TestHelper::Command.succeed do
+  #     Pione::Command::PioneClient.run(args)
+  #   end
+  #   Location[path + "result.txt"].should.exist
+  #   Location[path + "result.txt"].read.should.start_with "55"
+  # end
+end

data/test/example/spec_HelloWorld.rb

@@ -0,0 +1,15 @@
+require 'pione/test-helper'
+
+describe "example/HelloWorld" do
+  before do
+    @cmd = Command::PioneClient
+  end
+
+  it "should process" do
+    path = Temppath.create
+    cmd = @cmd.new(["example/HelloWorld/", "--base", path.to_s])
+    res = Rootage::ScenarioTest.succeed(cmd)
+    Location[path + "output" + "message.txt"].should.exist
+    Location[path + "output" + "message.txt"].read.should.start_with "Hello, world!"
+  end
+end

data/test/example/spec_MakePair.rb

@@ -0,0 +1,20 @@
+require 'pione/test-helper'
+
+describe "example/MakePair" do
+  TestHelper::PioneClientRunner.test(self) do |runner|
+    runner.title = "should get a result of example/MakePair"
+    runner.args = ["example/MakePair", "--rehearse", "case1", *runner.default_arguments]
+    runner.run do |base|
+      1.upto(5) do |i|
+        1.upto(5) do |ii|
+          comb = (base + "output" + "comb-%s-%s.pair" % [i, ii])
+          i < ii ? comb.should.exist : comb.should.not.exist
+          perm = (base + "output" + "perm-%s-%s.pair" % [i, ii])
+          i != ii ? perm.should.exist : perm.should.not.exist
+          succ = (base + "output" + "succ-%s-%s.pair" % [i, ii])
+          ii - i == 1 ? succ.should.exist : succ.should.not.exist
+        end
+      end
+    end
+  end
+end

data/test/example/spec_OddSelector.rb

@@ -0,0 +1,20 @@
+require 'pione/test-helper'
+
+describe "example/OddSelector" do
+  TestHelper::PioneClientRunner.test(self) do |runner|
+    runner.title = "should get a result of example/OddSelector"
+    runner.args = ["example/OddSelector", "--rehearse", *runner.default_arguments]
+    runner.run do |base|
+      (base + "output" + "1.res").should.exist
+      (base + "output" + "2.res").should.not.exist
+      (base + "output" + "3.res").should.exist
+      (base + "output" + "4.res").should.not.exist
+      (base + "output" + "5.res").should.exist
+      (base + "output" + "6.res").should.not.exist
+      (base + "output" + "7.res").should.exist
+      (base + "output" + "8.res").should.not.exist
+      (base + "output" + "9.res").should.exist
+      (base + "output" + "10.res").should.not.exist
+    end
+  end
+end

data/test/example/spec_PegasusWMSMerge.rb

@@ -0,0 +1,12 @@
+require 'pione/test-helper'
+
+describe "example/PegasusWMS/Merge" do
+  TestHelper::PioneClientRunner.test(self) do |runner|
+    runner.title = "should get a result of example/PegasusWMS/Merge"
+    runner.args = ["example/PegasusWMS/Merge/", *runner.default_arguments]
+    runner.run do |base|
+      (base + "output" + "binaries.txt").should.exist
+      (base + "output" + "binaries.txt").size.should > 0
+    end
+  end
+end

data/test/example/spec_PegasusWMSPipeline.rb

@@ -0,0 +1,16 @@
+require 'pione/test-helper'
+
+describe "example/PegasusWMS/Pipeline" do
+  if TestHelper::InternetConnectivity.ok?
+    TestHelper::PioneClientRunner.test(self) do |runner|
+      runner.title = "should get a result of example/PegasusWMS/Pipeline"
+      runner.args = ["example/PegasusWMS/Pipeline/", *runner.default_arguments]
+      runner.run do |base|
+        (base + "output" + "count.txt").should.exist
+        (base + "output" + "count.txt").size.should > 0
+      end
+    end
+  else
+    puts "    * ignored because of no internet connection"
+  end
+end

data/test/example/spec_PegasusWMSSplit.rb

@@ -0,0 +1,22 @@
+require 'pione/test-helper'
+
+describe "example/PegasusWMS/Split" do
+  if TestHelper::InternetConnectivity.ok?
+    TestHelper::PioneClientRunner.test(self) do |runner|
+      runner.title = "should get a result of example/PegasusWMS/Split"
+      runner.args = ["example/PegasusWMS/Split/", *runner.default_arguments]
+      runner.run do |base|
+        (base + "output" + "count.txt.a").should.exist
+        (base + "output" + "count.txt.a").size.should > 0
+        (base + "output" + "count.txt.b").should.exist
+        (base + "output" + "count.txt.b").size.should > 0
+        (base + "output" + "count.txt.c").should.exist
+        (base + "output" + "count.txt.c").size.should > 0
+        (base + "output" + "count.txt.d").should.exist
+        (base + "output" + "count.txt.d").size.should > 0
+      end
+    end
+  else
+    puts "    * ignored because of no internet connection"
+  end
+end

data/test/example/spec_SelectRuleByParam.rb

@@ -0,0 +1,30 @@
+require 'pione/test-helper'
+
+describe "example/SelectRuleByParam" do
+  TestHelper::PioneClientRunner.test(self) do |runner|
+    runner.title = "should get a result of scenario a of example/SelectRuleByParam"
+    runner.args = ["example/SelectRuleByParam", "--rehearse", "Select A", *runner.default_arguments]
+    runner.run do |base|
+      (base + "output" + "message.txt").should.exist
+      (base + "output" + "message.txt").read.chomp.should == "This is rule A."
+    end
+  end
+
+  TestHelper::PioneClientRunner.test(self) do |runner|
+    runner.title = "should get a result of scenario b of example/SelectRuleByParam"
+    runner.args = ["example/SelectRuleByParam", "--rehearse", "Select B", *runner.default_arguments]
+    runner.run do |base|
+      (base + "output" + "message.txt").should.exist
+      (base + "output" + "message.txt").read.chomp.should == "This is rule B."
+    end
+  end
+
+  TestHelper::PioneClientRunner.test(self) do |runner|
+    runner.title = "should get a result of scenario c of example/SelectRuleByParam"
+    runner.args = ["example/SelectRuleByParam", "--rehearse", "Select C", *runner.default_arguments]
+    runner.run do |base|
+      (base + "output" + "message.txt").should.exist
+      (base + "output" + "message.txt").read.chomp.should == "This is rule C."
+    end
+  end
+end

data/test/example/spec_SerialProcessing.rb

@@ -0,0 +1,25 @@
+require 'pione/test-helper'
+
+describe "example/SerialProcessing" do
+  TestHelper::PioneClientRunner.test(self) do |runner|
+    runner.title = "should get a result of example/SerialProcessing"
+    runner.args = ["example/SerialProcessing", "--rehearse", *runner.default_arguments]
+    runner.run do |base|
+      (base + "output" + "1.a").should.exist
+      (base + "output" + "2.a").should.exist
+      (base + "output" + "3.a").should.exist
+      (base + "output" + "4.a").should.exist
+      (base + "output" + "1.b").should.exist
+      (base + "output" + "2.b").should.exist
+      (base + "output" + "3.b").should.exist
+      (base + "output" + "4.b").should.exist
+      (base + "output" + "1.a").mtime.should <= (base + "output" + "2.a").mtime
+      (base + "output" + "2.a").mtime.should <= (base + "output" + "3.a").mtime
+      (base + "output" + "3.a").mtime.should <= (base + "output" + "4.a").mtime
+      (base + "output" + "4.a").mtime.should <= (base + "output" + "1.b").mtime
+      (base + "output" + "1.b").mtime.should <= (base + "output" + "2.b").mtime
+      (base + "output" + "2.b").mtime.should <= (base + "output" + "3.b").mtime
+      (base + "output" + "3.b").mtime.should <= (base + "output" + "4.b").mtime
+    end
+  end
+end

data/test/example/spec_Sum.rb

@@ -0,0 +1,11 @@
+require 'pione/test-helper'
+
+describe "example/Sum" do
+  TestHelper::PioneClientRunner.test(self) do |runner|
+    runner.title = "should get a result of example/Sum"
+    runner.args = ["example/Sum", "--rehearse", *runner.default_arguments]
+    runner.run do |base|
+      (base + "output" + "sum.txt").should.exist
+    end
+  end
+end

data/test/rule-engine/spec_data-finder.rb

@@ -87,7 +87,7 @@ describe 'Pione::RuleEngine::DataFinder' do
       }
 
       # test
-      enum = Enumerator.new(finder, :find, :input, query, @env)
+      enum = finder.to_enum(:find, :input, query, @env)
       enum.to_a.map{|env, combination| combination }.should == results
     end
   end

data/test/util/spec_process-info.rb

@@ -19,7 +19,11 @@ describe "Pione::Util::ProcessInfo" do
     end
 
     after do
-      @info.kill if @info.alive?
+      begin
+        @info.kill if @info.alive?
+      rescue
+        # ignore
+      end
     end
 
     it "should get pid" do

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: pione
 version: !ruby/object:Gem::Version
-  version: 0.5.0.alpha.1
+  version: 0.5.0.alpha.2
 platform: ruby
 authors:
 - Keita Yamaguchi
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2015-01-04 00:00:00.000000000 Z
+date: 2015-01-12 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: parslet
@@ -1311,6 +1311,18 @@ files:
 - test/command/spec_pione-package-update.rb
 - test/command/spec_pione-package.rb
 - test/command/spec_pione-val.rb
+- test/example/spec_ActionError.rb
+- test/example/spec_FeatureExample.rb
+- test/example/spec_Fib.rb
+- test/example/spec_HelloWorld.rb
+- test/example/spec_MakePair.rb
+- test/example/spec_OddSelector.rb
+- test/example/spec_PegasusWMSMerge.rb
+- test/example/spec_PegasusWMSPipeline.rb
+- test/example/spec_PegasusWMSSplit.rb
+- test/example/spec_SelectRuleByParam.rb
+- test/example/spec_SerialProcessing.rb
+- test/example/spec_Sum.rb
 - test/global/spec_config.rb
 - test/global/spec_item.rb
 - test/lang/data/boolean.yml
@@ -1595,7 +1607,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
       version: 1.3.1
 requirements: []
 rubyforge_project: 
-rubygems_version: 2.1.11
+rubygems_version: 2.4.5
 signing_key: 
 specification_version: 4
 summary: rule-based workflow engine
@@ -1663,6 +1675,18 @@ test_files:
 - test/command/spec_pione-package-update.rb
 - test/command/spec_pione-package.rb
 - test/command/spec_pione-val.rb
+- test/example/spec_ActionError.rb
+- test/example/spec_FeatureExample.rb
+- test/example/spec_Fib.rb
+- test/example/spec_HelloWorld.rb
+- test/example/spec_MakePair.rb
+- test/example/spec_OddSelector.rb
+- test/example/spec_PegasusWMSMerge.rb
+- test/example/spec_PegasusWMSPipeline.rb
+- test/example/spec_PegasusWMSSplit.rb
+- test/example/spec_SelectRuleByParam.rb
+- test/example/spec_SerialProcessing.rb
+- test/example/spec_Sum.rb
 - test/global/spec_config.rb
 - test/global/spec_item.rb
 - test/lang/data/boolean.yml