pione 0.3.2 → 0.4.0

data/test/agent/spec_tuple-space-provider.rb

@@ -3,23 +3,27 @@ require 'pione/test-helper'
 describe 'Pione::Agent::TupleSpaceProvider' do
   before do
     @tuple_space = TestHelper::TupleSpace.create(self)
-    @front = Front::TupleSpaceProviderFront.new(@tuple_space)
-    @orig = Global.presence_notification_addresses
+    @cmd = Command::BasicCommand.new([])
+    @cmd.model[:parent_front] = Front::ClientFront.new(@cmd)
+    @cmd.model[:parent_front].set_tuple_space(@tuple_space)
+    @front = Front::TupleSpaceProviderFront.new(@cmd)
+    @orig = Global.notification_targets
   end
 
   after do
+    @cmd.model[:parent_front].terminate
     @front.terminate
-    Global.presence_notification_addresses = @orig
+    Global.notification_targets = @orig
   end
 
   it 'should start activity' do
-    provider = Agent::TupleSpaceProvider.start(@front)
-    provider.wait_until_after(:send_packet, 10)
+    provider = Agent::TupleSpaceProvider.start(@front, [URI.parse("pnu://127.0.0.1:3456")])
+    provider.wait_until_after(:send_message, 10)
     provider.should.not.terminated
   end
 
   it 'should terminate' do
-    provider = Agent::TupleSpaceProvider.start(@front)
+    provider = Agent::TupleSpaceProvider.start(@front, [URI.parse("pnu://127.0.0.1:3456")])
     should.not.raise { provider.terminate }
     provider.should.terminated
   end

data/test/command/command-behavior.rb

@@ -1,15 +1,7 @@
 shared "command" do
   it "should show a help message" do
-    res = TestHelper::Command.succeed do
-      Command::PioneVal.run ["--help"]
-    end
-    res.stdout.string.should.start_with "Usage"
-  end
-
-  it "should show a version message" do
-    res = TestHelper::Command.succeed do
-      Command::PioneVal.run ["--version"]
-    end
-    res.stdout.string.should.include Pione::VERSION
+    cmd = @cmd.new(["--help"])
+    res = Rootage::ScenarioTest.succeed(cmd)
+    res.stdout.string.size.should > 0
   end
 end

data/test/command/data/pione-list-param/AdvancedParameters.pione

@@ -0,0 +1,12 @@
+param $B1 := true
+advanced param $B2 := false
+advanced param $B3 := true | false
+
+param $I1 := 1
+advanced param $I2 := 1 | 2 | 3
+
+param $S1 := "test"
+advanced param $S2 := "test1" | "test2" | "test3"
+
+param $D1 := 'test.txt'
+advanced param $D2 := 'test1.txt' | 'test2.txt' | 'test3.txt'

data/test/command/data/pione-list-param/BasicParameters.pione

@@ -0,0 +1,12 @@
+param $B1 := true
+param $B2 := false
+param $B3 := true | false
+
+param $I1 := 1
+param $I2 := 1 | 2 | 3
+
+param $S1 := "test"
+param $S2 := "test1" | "test2" | "test3"
+
+param $D1 := 'test.txt'
+param $D2 := 'test1.txt' | 'test2.txt' | 'test3.txt'

data/test/command/spec_pione-action-exec.rb

@@ -0,0 +1,16 @@
+require 'pione/test-helper'
+
+describe Pione::Command::PioneActionExec do
+  before do
+    @cmd = Pione::Command::PioneActionExec
+    @dir = Location[File.dirname(__FILE__)] + ".." + "literate-action" + "data"
+  end
+
+  it "should execute action" do
+    base = Location[Temppath.mkdir]
+    args = [(@dir + "HelloWorld.md").path.to_s, "SayHello", "-d", base.path.to_s]
+    cmd = @cmd.new(args)
+    Rootage::ScenarioTest.succeed(cmd)
+    (base + "message.txt").read.chomp.should == "Hello, world!"
+  end
+end

data/test/command/spec_pione-action-list.rb

@@ -1,15 +1,20 @@
 require 'pione/test-helper'
 
-TestHelper.scope do |this|
-  this::DIR = Location[File.dirname(__FILE__)] + ".." + "literate-action" + "data"
+describe Pione::Command::PioneActionList do
+  before do
+    @cmd = Pione::Command::PioneActionList
+    @dir = Location[File.dirname(__FILE__)] + ".." + "literate-action" + "data"
+  end
+
+  it "should show action names" do
+    cmd = @cmd.new([(@dir + "D1.md").path.to_s])
+    res = Rootage::ScenarioTest.succeed(cmd)
+    res.stdout.string.chomp.should == "Name1\nName2"
+  end
 
-  describe Pione::Command::PioneActionList do
-    it "should show action names" do
-      args = [(this::DIR + "D1.md").path.to_s]
-      res = TestHelper::Command.succeed do
-        Pione::Command::PioneActionList.run(args)
-      end
-      res.stdout.string.chomp.should == "Name1\nName2"
-    end
+  it "should show action names in compact form" do
+    cmd = @cmd.new(["--compact", (@dir + "D1.md").path.to_s])
+    res = Rootage::ScenarioTest.succeed(cmd)
+    res.stdout.string.chomp.should == "Name1 Name2"
   end
 end

data/test/command/spec_pione-action-print.rb

@@ -0,0 +1,14 @@
+require 'pione/test-helper'
+
+describe Pione::Command::PioneActionPrint do
+  before do
+    @cmd = Pione::Command::PioneActionPrint
+    @dir = Location[File.dirname(__FILE__)] + ".." + "literate-action" + "data"
+  end
+
+  it "should print action contents" do
+    cmd = @cmd.new([(@dir + "HelloWorld.md").path.to_s, "SayHello"])
+    res = Rootage::ScenarioTest.succeed(cmd)
+    res.stdout.string.chomp.should == "echo \"Hello, world!\" > message.txt"
+  end
+end

data/test/command/spec_pione-action.rb

@@ -1,24 +1,11 @@
 require 'pione/test-helper'
 
-TestHelper.scope do |this|
-  this::DIR = Location[File.dirname(__FILE__)] + ".." + "literate-action" + "data"
-
-  describe Pione::Command::PioneAction do
-    it "should execute action" do
-      base = Location[Temppath.mkdir]
-      args = [(this::DIR + "HelloWorld.md").path.to_s, "SayHello", "-d", base.path.to_s]
-      TestHelper::Command.succeed do
-        Pione::Command::PioneAction.run(args)
-      end
-      (base + "message.txt").read.chomp.should == "Hello, world!"
-    end
+describe Pione::Command::PioneAction do
+  before do
+    @cmd = Pione::Command::PioneAction
+  end
 
-    it "should show action content" do
-      args = [(this::DIR + "HelloWorld.md").path.to_s, "SayHello", "--show"]
-      res = TestHelper::Command.succeed do
-        Pione::Command::PioneAction.run(args)
-      end
-      res.stdout.string.chomp.should == "echo \"Hello, world!\" > message.txt"
-    end
+  it "should fail with no subcommands" do
+    Rootage::ScenarioTest.fail(@cmd.new([]))
   end
 end

data/test/command/spec_pione-clean.rb

@@ -83,10 +83,9 @@ TestHelper.scope do |this|
     end
   end
 
-  describe "Pione::Command::PioneClean" do
-    behaves_like "command"
-
+  describe Pione::Command::PioneClean do
     before do
+      @cmd = Pione::Command::PioneClean
       @orig_my_temporary_directory = Global.my_temporary_directory
       Global.my_temporary_directory = Temppath.mkdir
       @orig_file_cache_directory = Global.my_file_cache_directory
@@ -107,103 +106,87 @@ TestHelper.scope do |this|
       Global.profile_report_directory = @orig_profile_report_directory
     end
 
+    behaves_like "command"
+
     it "should remove all type files" do
       fset = this::FakeFileSet.new
-      TestHelper::Command.succeed do
-        Command::PioneClean.run([])
-      end
+      Rootage::ScenarioTest.succeed(@cmd.new([]))
       fset.temporary.size.should == 0
       fset.file_cache.size.should == 0
       fset.package_cache.size.should == 0
       fset.profile.size.should == 0
     end
 
-    it "should remove old than 1 days" do
+    it "should remove older files than 1 days" do
       fset = this::FakeFileSet.new
-      TestHelper::Command.succeed do
-        Command::PioneClean.run ["--older", "1"]
-      end
+      Rootage::ScenarioTest.succeed(@cmd.new(["--older", "1"]))
       fset.temporary.size.should == 0
       fset.file_cache.size.should == 0
       fset.package_cache.size.should == 0
       fset.profile.size.should == 0
     end
 
-    it "should remove old than 2 days" do
+    it "should remove older files than 2 days" do
       fset = this::FakeFileSet.new
-      TestHelper::Command.succeed do
-        Command::PioneClean.run ["--older", "2"]
-      end
+      Rootage::ScenarioTest.succeed(@cmd.new(["--older", "2"]))
       fset.temporary.size.should == 4
       fset.file_cache.size.should == 2
       fset.package_cache.size.should == 2
       fset.profile.size.should == 1
     end
 
-    it "should remove old than 30 days" do
+    it "should remove older files than 30 days" do
       fset = this::FakeFileSet.new
-      TestHelper::Command.succeed do
-        Command::PioneClean.run ["--older", "30"]
-      end
+      Rootage::ScenarioTest.succeed(@cmd.new(["--older", "30"]))
       fset.temporary.size.should == 4
       fset.file_cache.size.should == 2
       fset.package_cache.size.should == 2
       fset.profile.size.should == 1
     end
 
-    it "should remove old than 31 days" do
+    it "should remove older files than 31 days" do
       fset = this::FakeFileSet.new
-      TestHelper::Command.succeed do
-        Command::PioneClean.run ["--older", "31"]
-      end
+      Rootage::ScenarioTest.succeed(@cmd.new(["--older", "31"]))
       fset.temporary.size.should == 8
       fset.file_cache.size.should == 4
       fset.package_cache.size.should == 4
       fset.profile.size.should == 2
     end
 
-    it "should remove older than 1 days with iso8601 format" do
+    it "should remove older files than 1 days with iso8601 format" do
       fset = this::FakeFileSet.new
       date = this.days_before(1)
-      TestHelper::Command.succeed do
-        Command::PioneClean.run ["--older", date.iso8601]
-      end
+      Rootage::ScenarioTest.succeed(@cmd.new(["--older", date.iso8601]))
       fset.temporary.size.should == 0
       fset.file_cache.size.should == 0
       fset.package_cache.size.should == 0
       fset.profile.size.should == 0
     end
 
-    it "should remove older than 2 days with iso8601 format" do
+    it "should remove older files than 2 days with iso8601 format" do
       fset = this::FakeFileSet.new
       date = this.days_before(2)
-      TestHelper::Command.succeed do
-        Command::PioneClean.run ["--older", date.iso8601]
-      end
+      Rootage::ScenarioTest.succeed(@cmd.new(["--older", date.iso8601]))
       fset.temporary.size.should == 4
       fset.file_cache.size.should == 2
       fset.package_cache.size.should == 2
       fset.profile.size.should == 1
     end
 
-    it "should remove older than 30 days with iso8601 format" do
+    it "should remove older files than 30 days with iso8601 format" do
       fset = this::FakeFileSet.new
       date = this.days_before(30)
-      TestHelper::Command.succeed do
-        Command::PioneClean.run ["--older", date.iso8601]
-      end
+      Rootage::ScenarioTest.succeed(@cmd.new(["--older", date.iso8601]))
       fset.temporary.size.should == 4
       fset.file_cache.size.should == 2
       fset.package_cache.size.should == 2
       fset.profile.size.should == 1
     end
 
-    it "should remove older than 31 days with iso8601 format" do
+    it "should remove older files than 31 days with iso8601 format" do
       fset = this::FakeFileSet.new
       date = this.days_before(31)
-      TestHelper::Command.succeed do
-        Command::PioneClean.run ["--older", date.iso8601]
-      end
+      Rootage::ScenarioTest.succeed(@cmd.new(["--older", date.iso8601]))
       fset.temporary.size.should == 8
       fset.file_cache.size.should == 4
       fset.package_cache.size.should == 4
@@ -211,9 +194,9 @@ TestHelper.scope do |this|
     end
 
     it "should remove temporary files" do
-      TestHelper::Command.succeed do
+      Rootage::ScenarioTest.succeed(@cmd, ["--type", "temporary"]) do |cmd, args|
         fset = this::FakeFileSet.new
-        Command::PioneClean.run ["--type", "temporary"]
+        cmd.run(args)
         fset.temporary.size.should == 0
         fset.file_cache.size.should == 4
         fset.package_cache.size.should == 4
@@ -222,9 +205,9 @@ TestHelper.scope do |this|
     end
 
     it "should remove file cache files" do
-      TestHelper::Command.succeed do
+      Rootage::ScenarioTest.succeed(@cmd, ["--type", "file-cache"]) do |cmd, args|
         fset = this::FakeFileSet.new
-        Command::PioneClean.run ["--type", "file-cache"]
+        cmd.run(args)
         fset.temporary.size.should == 8
         fset.file_cache.size.should == 0
         fset.package_cache.size.should == 4
@@ -233,9 +216,9 @@ TestHelper.scope do |this|
     end
 
     it "should remove package cache files" do
-      TestHelper::Command.succeed do
+      Rootage::ScenarioTest.succeed(@cmd, ["--type", "package-cache"]) do |cmd, args|
         fset = this::FakeFileSet.new
-        Command::PioneClean.run ["--type", "package-cache"]
+        cmd.run(args)
         fset.temporary.size.should == 8
         fset.file_cache.size.should == 4
         fset.package_cache.size.should == 0
@@ -244,9 +227,9 @@ TestHelper.scope do |this|
     end
 
     it "should remove profile files" do
-      TestHelper::Command.succeed do
+      Rootage::ScenarioTest.succeed(@cmd, ["--type", "profile"]) do |cmd, args|
         fset = this::FakeFileSet.new
-        Command::PioneClean.run ["--type", "profile"]
+        cmd.run(args)
         fset.temporary.size.should == 8
         fset.file_cache.size.should == 4
         fset.package_cache.size.should == 4

data/test/command/spec_pione-client.rb

@@ -4,45 +4,41 @@ require_relative 'command-behavior'
 TestHelper.scope do |this|
   this::DIR = Location[File.dirname(__FILE__)] + "data" + "pione-client"
 
-  describe "Pione::Command::PioneClient" do
+  describe Pione::Command::PioneClient do
+    before do
+      @cmd = Command::PioneClient
+    end
+
     behaves_like "command"
 
     it "should execute a PIONE document" do
       path = Temppath.create
-      args = ["example/HelloWorld/HelloWorld.pione", "-o", path.to_s]
-      res = TestHelper::Command.succeed do
-        Pione::Command::PioneClient.run(args)
-      end
+      cmd = @cmd.new(["example/HelloWorld/HelloWorld.pione", "-o", path.to_s])
+      res = Rootage::ScenarioTest.succeed(cmd)
       Location[path + "message.txt"].should.exist
       Location[path + "message.txt"].read.should.start_with "Hello, world!"
     end
 
     it "should execute a PIONE document with stand alone mode" do
       path = Temppath.create
-      args = ["example/HelloWorld/HelloWorld.pione", "-o", path.to_s, "--stand-alone"]
-      TestHelper::Command.succeed do
-        Pione::Command::PioneClient.run(args)
-      end
+      cmd = @cmd.new(["example/HelloWorld/HelloWorld.pione", "-o", path.to_s, "--stand-alone"])
+      Rootage::ScenarioTest.succeed(cmd)
       Location[path + "message.txt"].should.exist
       Location[path + "message.txt"].read.should.start_with "Hello, world!"
     end
 
     it "should execute a PIONE package" do
       path = Temppath.create
-      args = ["example/HelloWorld/", "-o", path.to_s]
-      TestHelper::Command.succeed do
-        Pione::Command::PioneClient.run(args)
-      end
+      cmd = @cmd.new(["example/HelloWorld/", "-o", path.to_s])
+      Rootage::ScenarioTest.succeed(cmd)
       Location[path + "message.txt"].should.exist
       Location[path + "message.txt"].read.should.start_with "Hello, world!"
     end
 
     it "should execute a PIONE package with stand alone mode" do
       path = Temppath.create
-      args = ["example/HelloWorld/", "-o", path.to_s, "--stand-alone"]
-      TestHelper::Command.succeed do
-        Pione::Command::PioneClient.run(args)
-      end
+      cmd = @cmd.new(["example/HelloWorld/", "-o", path.to_s, "--stand-alone"])
+      Rootage::ScenarioTest.succeed(cmd)
       Location[path + "message.txt"].should.exist
       Location[path + "message.txt"].read.should.start_with "Hello, world!"
     end
@@ -50,18 +46,8 @@ TestHelper.scope do |this|
     it "should fail with action error" do
       doc = (this::DIR + "ActionError.pione").path.to_s
       path = Temppath.create
-      args = [doc, "-o", path.to_s, "--stand-alone"]
-      TestHelper::Command.fail do
-        Pione::Command::PioneClient.run(args)
-      end
-    end
-
-    it "should show parameters list of package" do
-      args = ["example/HelloWorld/HelloWorld.pione", "--list-params"]
-      res = TestHelper::Command.succeed do
-        Pione::Command::PioneClient.run(args)
-      end
-      res.stdout.string.size.should > 0
+      cmd = @cmd.new([doc, "-o", path.to_s, "--stand-alone"])
+      Rootage::ScenarioTest.fail(cmd)
     end
 
     describe "example/Fib" do
@@ -166,13 +152,13 @@ TestHelper.scope do |this|
           (base + "2.b").should.exist
           (base + "3.b").should.exist
           (base + "4.b").should.exist
-          (base + "1.a").mtime.should < (base + "2.a").mtime
-          (base + "2.a").mtime.should < (base + "3.a").mtime
-          (base + "3.a").mtime.should < (base + "4.a").mtime
-          (base + "4.a").mtime.should < (base + "1.b").mtime
-          (base + "1.b").mtime.should < (base + "2.b").mtime
-          (base + "2.b").mtime.should < (base + "3.b").mtime
-          (base + "3.b").mtime.should < (base + "4.b").mtime
+          (base + "1.a").mtime.should <= (base + "2.a").mtime
+          (base + "2.a").mtime.should <= (base + "3.a").mtime
+          (base + "3.a").mtime.should <= (base + "4.a").mtime
+          (base + "4.a").mtime.should <= (base + "1.b").mtime
+          (base + "1.b").mtime.should <= (base + "2.b").mtime
+          (base + "2.b").mtime.should <= (base + "3.b").mtime
+          (base + "3.b").mtime.should <= (base + "4.b").mtime
         end
       end
     end
@@ -252,5 +238,12 @@ TestHelper.scope do |this|
       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