pione 0.3.2 → 0.4.0

data/test/command/spec_pione-command.rb

@@ -2,17 +2,17 @@ require 'pione/test-helper'
 require_relative 'command-behavior'
 
 describe Pione::Command::PioneCommand do
+  before do
+    @cmd = Pione::Command::PioneCommand
+  end
+
   behaves_like "command"
 
   it "should call subcommand" do
-    TestHelper::Command.succeed do
-      Command::PioneCommand.run(["val", "1 + 1"])
-    end
+    Rootage::ScenarioTest.succeed(@cmd.new(["val", "1 + 1"]))
   end
 
   it "should fail with unknown subcommand name" do
-    TestHelper::Command.fail do
-      Command::PioneCommand.run(["abcdefghijk"])
-    end
+    Rootage::ScenarioTest.fail(@cmd.new(["abcdefghijk"]))
   end
 end

data/test/command/{spec_pione-compiler.rb → spec_pione-compile.rb}

@@ -3,35 +3,33 @@ require 'pione/test-helper'
 TestHelper.scope do |this|
   this::PNML1 = Location[File.dirname(__FILE__)] + "data" + "pione-compiler" + "Sequence.pnml"
 
-  describe Pione::Command::PioneCompiler do
+  describe Pione::Command::PioneCompile do
+    before do
+      @cmd = Pione::Command::PioneCompile
+    end
+
     it "should compile from PNML to PIONE document" do
-      TestHelper::Command.succeed do
-        Command::PioneCompiler.run [this::PNML1.path.to_s]
-      end
+      Rootage::ScenarioTest.succeed(@cmd.new([this::PNML1.path.to_s]))
     end
 
     it "should compile with package name" do
-      res = TestHelper::Command.succeed do
-        Command::PioneCompiler.run [this::PNML1.path.to_s, "--name", "Sequence"]
-      end
+      res = Rootage::ScenarioTest.succeed(@cmd.new([this::PNML1.path.to_s, "--package-name", "Sequence"]))
       res.stdout.string.should.include "@ PackageName :: \"Sequence\""
       res.stdout.string.should.not.include "@ Editor ::"
       res.stdout.string.should.not.include "@ Tag ::"
     end
 
     it "should compile with package name and editor" do
-      res = TestHelper::Command.succeed do
-        Command::PioneCompiler.run [this::PNML1.path.to_s, "--name", "Sequence", "--editor", "yamaguchi"]
-      end
+      cmd = @cmd.new([this::PNML1.path.to_s, "--package-name", "Sequence", "--editor", "yamaguchi"])
+      res = Rootage::ScenarioTest.succeed(cmd)
       res.stdout.string.should.include "@ PackageName :: \"Sequence\""
       res.stdout.string.should.include "@ Editor :: \"yamaguchi\""
       res.stdout.string.should.not.include "@ Tag ::"
     end
 
     it "should compile with package name, editor, and tag" do
-      res = TestHelper::Command.succeed do
-        Command::PioneCompiler.run [this::PNML1.path.to_s, "--name", "Sequence", "--editor", "yamaguchi", "--tag", "test"]
-      end
+      cmd = @cmd.new([this::PNML1.path.to_s, "--package-name", "Sequence", "--editor", "yamaguchi", "--tag", "test"])
+      res = Rootage::ScenarioTest.succeed(cmd)
       res.stdout.string.should.include "@ PackageName :: \"Sequence\""
       res.stdout.string.should.include "@ Editor :: \"yamaguchi\""
       res.stdout.string.should.include "@ Tag :: \"test\""

data/test/command/spec_pione-config-get.rb

@@ -0,0 +1,47 @@
+require "pione/test-helper"
+
+describe Pione::Command::PioneConfigGet do
+  before do
+    @cmd = Pione::Command::PioneConfigGet
+
+    Global.define_external_item(:test1) do |item|
+      item.type = :string
+    end
+
+    Global.define_external_item(:test2) do |item|
+      item.type = :integer
+    end
+
+    Global.define_external_item(:test3) do |item|
+      item.type = :boolean
+    end
+
+    @path = Temppath.create
+  end
+
+  after do
+    Global.item[:test1].unregister
+    Global.item[:test2].unregister
+    Global.item[:test3].unregister
+  end
+
+  it "should get item value" do
+    config = Global::Config.new(@path)
+    config.set(:test1, "a")
+    config.set(:test2, 1)
+    config.set(:test3, true)
+    config.save
+
+    cmd1  = @cmd.new(["-f", @path.to_s, "test1"])
+    res1 = Rootage::ScenarioTest.succeed(cmd1)
+    res1.stdout.string.chomp.should == "a"
+
+    cmd2 = @cmd.new(["-f", @path.to_s, "test2"])
+    res2 = Rootage::ScenarioTest.succeed(cmd2)
+    res2.stdout.string.chomp.should == "1"
+
+    cmd3 = @cmd.new(["-f", @path.to_s, "test3"])
+    res3 = Rootage::ScenarioTest.succeed(cmd3)
+    res3.stdout.string.chomp.should == "true"
+  end
+end

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

@@ -0,0 +1,42 @@
+require "pione/test-helper"
+
+describe Pione::Command::PioneConfigList do
+  before do
+    @cmd = Pione::Command::PioneConfigList
+
+    Global.define_external_item(:test1) do |item|
+      item.type = :string
+    end
+
+    Global.define_external_item(:test2) do |item|
+      item.type = :integer
+    end
+
+    Global.define_external_item(:test3) do |item|
+      item.type = :boolean
+    end
+
+    @path = Temppath.create
+  end
+
+  after do
+    Global.item[:test1].unregister
+    Global.item[:test2].unregister
+    Global.item[:test3].unregister
+  end
+
+  it "should list all" do
+    config = Global::Config.new(@path)
+    config.set(:test1, "a")
+    config.set(:test2, 1)
+    config.set(:test3, true)
+    config.save
+
+    res = Rootage::ScenarioTest.succeed(@cmd.new(["-f", @path.to_s]))
+
+    list = res.stdout.string.split("\n")
+    list.should.include("test1: a")
+    list.should.include("test2: 1")
+    list.should.include("test3: true")
+  end
+end

data/test/command/spec_pione-config-set.rb

@@ -0,0 +1,38 @@
+require "pione/test-helper"
+
+describe Pione::Command::PioneConfigSet do
+  before do
+    @cmd = Pione::Command::PioneConfigSet
+
+    Global.define_external_item(:test1) do |item|
+      item.type = :string
+    end
+
+    Global.define_external_item(:test2) do |item|
+      item.type = :integer
+    end
+
+    Global.define_external_item(:test3) do |item|
+      item.type = :boolean
+    end
+
+    @path = Temppath.create
+  end
+
+  after do
+    Global.item[:test1].unregister
+    Global.item[:test2].unregister
+    Global.item[:test3].unregister
+  end
+
+  it "should set items" do
+    Rootage::ScenarioTest.succeed(@cmd.new(["-f", @path.to_s, "test1", "a"]))
+    Rootage::ScenarioTest.succeed(@cmd.new(["-f", @path.to_s, "test2", "1"]))
+    Rootage::ScenarioTest.succeed(@cmd.new(["-f", @path.to_s, "test3", "true"]))
+
+    config = Global::Config.new(@path)
+    config[:test1].should == "a"
+    config[:test2].should == 1
+    config[:test3].should.true
+  end
+end

data/test/command/spec_pione-config-unset.rb

@@ -0,0 +1,44 @@
+require "pione/test-helper"
+
+describe Pione::Command::PioneConfigUnset do
+  before do
+    @cmd = Pione::Command::PioneConfigUnset
+
+    Global.define_external_item(:test1) do |item|
+      item.type = :string
+    end
+
+    Global.define_external_item(:test2) do |item|
+      item.type = :integer
+    end
+
+    Global.define_external_item(:test3) do |item|
+      item.type = :boolean
+    end
+
+    @path = Temppath.create
+  end
+
+  after do
+    Global.item[:test1].unregister
+    Global.item[:test2].unregister
+    Global.item[:test3].unregister
+  end
+
+  it "should unset items" do
+    config = Global::Config.new(@path)
+    config.set(:test1, "a")
+    config.set(:test2, 1)
+    config.set(:test3, true)
+    config.save
+
+    Rootage::ScenarioTest.succeed(@cmd.new(["-f", @path.to_s, "test1"]))
+    Rootage::ScenarioTest.succeed(@cmd.new(["-f", @path.to_s, "test2"]))
+    Rootage::ScenarioTest.succeed(@cmd.new(["-f", @path.to_s, "test3"]))
+
+    config = Global::Config.new(@path)
+    config[:test1].should.nil
+    config[:test2].should.nil
+    config[:test3].should.nil
+  end
+end

data/test/command/spec_pione-config.rb

@@ -0,0 +1,11 @@
+require "pione/test-helper"
+
+describe Pione::Command::PioneConfig do
+  before do
+    @cmd = Pione::Command::PioneConfig
+  end
+
+  it "should fail with no subcommands" do
+    Rootage::ScenarioTest.fail(@cmd.new([]))
+  end
+end

data/test/command/spec_pione-diagnosis-notification.rb

@@ -0,0 +1,23 @@
+require 'pione/test-helper'
+
+describe Pione::Command::PioneDiagnosisNotification do
+  before do
+    @cmd = Pione::Command::PioneDiagnosisNotification
+  end
+
+  it "should diagnose fine notification connection" do
+    options = [
+      "--notification-target", "pnb://127.0.0.1",
+      "--timeout", "5"
+    ]
+    Rootage::ScenarioTest.succeed(@cmd.new(options))
+  end
+
+  it "should diagnose bad notification connetction" do
+    options = [
+      "--notification-target", "pnb://192.0.2.1",
+      "--timeout", "3"
+    ]
+    Rootage::ScenarioTest.fail(@cmd.new(options))
+  end
+end

data/test/command/spec_pione-diagnosis.rb

@@ -0,0 +1,11 @@
+require 'pione/test-helper'
+
+describe Pione::Command::PioneDiagnosis do
+  before do
+    @cmd = Pione::Command::PioneDiagnosis
+  end
+
+  it "should fail because of no subcommands" do
+    Rootage::ScenarioTest.fail(@cmd.new([]))
+  end
+end

data/test/command/spec_pione-lang-check-syntax.rb

@@ -0,0 +1,12 @@
+require 'pione/test-helper'
+
+describe Pione::Command::PioneLangCheckSyntax do
+  before do
+    @cmd = Pione::Command::PioneLangCheckSyntax
+  end
+
+  it "should check syntax" do
+    Rootage::ScenarioTest.succeed(@cmd.new(["-e", "1 + 1"]))
+    Rootage::ScenarioTest.fail(@cmd.new(["-e", "1 +"]))
+  end
+end

data/test/command/spec_pione-lang.rb

@@ -0,0 +1,11 @@
+require "pione/test-helper"
+
+describe Pione::Command::PioneLang do
+  before do
+    @cmd = Pione::Command::PioneLang
+  end
+
+  it "should fail with no subcommands" do
+    Rootage::ScenarioTest.fail(@cmd.new([]))
+  end
+end

data/test/command/spec_pione-log-format.rb

@@ -0,0 +1,29 @@
+require 'pione/test-helper'
+require_relative 'command-behavior'
+
+describe Pione::Command::PioneLogFormat do
+  raw_log_location = Location[File.dirname(__FILE__)] + "data" + "pione-process.log"
+
+  before do
+    @cmd = Pione::Command::PioneLogFormat
+  end
+
+  behaves_like "command"
+
+  it "should generate rule process log" do
+    cmd = @cmd.new(["--trace-type", "rule", raw_log_location.path.to_s])
+    res = Rootage::ScenarioTest.succeed(cmd)
+    res.stdout.string.chomp.size.should > 0
+  end
+
+  it "should generate task process log" do
+    cmd = @cmd.new(["--trace-type", "trace", raw_log_location.path.to_s])
+    res = Rootage::ScenarioTest.succeed(cmd)
+    res.stdout.string.chomp.size.should > 0
+  end
+
+  it "should fail if format is unknown" do
+    cmd = @cmd.new(["--format", "xxx", raw_log_location.path.to_s])
+    Rootage::ScenarioTest.fail(cmd)
+  end
+end

data/test/command/spec_pione-log-list-id.rb

@@ -0,0 +1,17 @@
+require 'pione/test-helper'
+require_relative 'command-behavior'
+
+describe Pione::Command::PioneLogFormat do
+  raw_log_location = Location[File.dirname(__FILE__)] + "data" + "pione-process.log"
+
+  before do
+    @cmd = Pione::Command::PioneLogFormat
+  end
+
+  behaves_like "command"
+
+  it "should get log IDs" do
+    res = Rootage::ScenarioTest.succeed(@cmd.new([raw_log_location.path.to_s]))
+    res.stdout.string.chomp.size.should > 0
+  end
+end

data/test/command/spec_pione-log.rb

@@ -1,28 +1,14 @@
 require 'pione/test-helper'
 require_relative 'command-behavior'
 
-describe "Pione::Command::PioneLog" do
-  raw_log_location = Location[File.dirname(__FILE__)] + "data" + "pione-process.log"
-
-  behaves_like "command"
-
-  it "should generate rule process log" do
-    res = TestHelper::Command.succeed do
-      Command::PioneLog.run ["--rule-process", "--location", raw_log_location.path.to_s]
-    end
-    res.stdout.string.chomp.size.should > 0
+describe Pione::Command::PioneLog do
+  before do
+    @cmd = Pione::Command::PioneLog
   end
 
-  it "should generate task process log" do
-    res = TestHelper::Command.succeed do
-      Command::PioneLog.run ["--task-process", "--location", raw_log_location.path.to_s]
-    end
-    res.stdout.string.chomp.size.should > 0
-  end
+  behaves_like "command"
 
-  it "should fail if format is unknown" do
-    res = TestHelper::Command.fail do
-      Command::PioneLog.run ["--format", "xxx", "--location", raw_log_location.path.to_s]
-    end
+  it "should fail with no subcommands" do
+    Rootage::ScenarioTest.fail(@cmd.new([]))
   end
 end

data/test/command/spec_pione-package-add.rb

@@ -0,0 +1,55 @@
+require 'pione/test-helper'
+
+TestHelper.scope do |this|
+  this::P1 = Location[File.dirname(__FILE__)] + ".." + "command" + "data" + "PionePackageP1"
+  this::P2 = Location[File.dirname(__FILE__)] + ".." + "command" + "data" + "PionePackageP2"
+  this::P3 = Location[File.dirname(__FILE__)] + ".." + "command" + "data" + "PionePackageP3"
+  this::P4 = Location[File.dirname(__FILE__)] + ".." + "command" + "data" + "PionePackageP4"
+
+  describe Pione::Command::PionePackage do
+    before do
+      @cmd = Pione::Command::PionePackageAdd
+      @orig_database = Global.package_database_location
+      Global.package_database_location = Location[Temppath.create]
+    end
+
+    after do
+      Global.package_database_location = @orig_database
+    end
+
+    it "should add package with name to database" do
+      Rootage::ScenarioTest.succeed(@cmd.new([this::P1.path.to_s]))
+      db = Package::Database.load
+      digest = db.find("P1", nil, nil)
+      digest.size.should > 0
+    end
+
+    it "should add package with tag to database" do
+      res = Rootage::ScenarioTest.succeed(@cmd.new([this::P2.path.to_s]))
+      db = Package::Database.load
+      digest = db.find("P2", nil, "v0.1.0")
+      digest.size.should > 0
+    end
+
+    it "should add package with editor to database" do
+      res = Rootage::ScenarioTest.succeed(@cmd.new([this::P3.path.to_s]))
+      db = Package::Database.load
+      digest = db.find("P3", "keita.yamaguchi@gmail.com", nil)
+      digest.size.should > 0
+    end
+
+    it "should add package with full name to database" do
+      Rootage::ScenarioTest.succeed(@cmd.new([this::P4.path.to_s]))
+      db = Package::Database.load
+      digest = db.find("P4", "keita.yamaguchi@gmail.com", "v0.1.0")
+      digest.size.should > 0
+    end
+
+    it "should add tag alias" do
+      Rootage::ScenarioTest.succeed(@cmd.new(["--tag", "TEST", this::P4.path.to_s]))
+      db = Package::Database.load
+      digest = db.find("P4", "keita.yamaguchi@gmail.com", "TEST")
+      digest.size.should > 0
+    end
+  end
+end