pione 0.2.2 → 0.3.0

data/test/command/spec_pione-clean.rb

@@ -0,0 +1,12 @@
+require 'pione/test-helper'
+require_relative 'command-behavior'
+
+describe "Pione::Command::PioneClean" do
+  behaves_like "command"
+
+  it "should clean temporary files" do
+    res = TestHelper::Command.succeed do
+      Command::PioneClean.run []
+    end
+  end
+end

data/test/command/spec_pione-client.rb

@@ -1,4 +1,4 @@
-require_relative '../test-util'
+require 'pione/test-helper'
 require_relative 'command-behavior'
 
 describe "Pione::Command::PioneClient" do
@@ -8,7 +8,7 @@ describe "Pione::Command::PioneClient" do
   # it "should execute a PIONE document" do
   #   path = Temppath.create
   #   args = ["example/HelloWorld/HelloWorld.pione", "-o", path.to_s]
-  #   res = TestUtil::Command.succeed do
+  #   res = TestHelper::Command.succeed do
   #     Pione::Command::PioneClient.run args
   #   end
   #   Location[path + "message.txt"].should.exist
@@ -18,7 +18,7 @@ describe "Pione::Command::PioneClient" do
   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"]
-    res = TestUtil::Command.succeed do
+    res = TestHelper::Command.succeed do
       Pione::Command::PioneClient.run args
     end
     Location[path + "message.txt"].should.exist
@@ -28,7 +28,7 @@ describe "Pione::Command::PioneClient" do
   # it "should execute a PIONE package" do
   #   path = Temppath.create
   #   args = ["example/HelloWorld/", "-o", path.to_s]
-  #   res = TestUtil::Command.succeed do
+  #   res = TestHelper::Command.succeed do
   #     Pione::Command::PioneClient.run args
   #   end
   #   Location[path + "message.txt"].should.exist
@@ -38,7 +38,7 @@ describe "Pione::Command::PioneClient" do
   it "should execute a PIONE package with stand alone mode" do
     path = Temppath.create
     args = ["example/HelloWorld/", "-o", path.to_s, "--stand-alone"]
-    res = TestUtil::Command.succeed do
+    res = TestHelper::Command.succeed do
       Pione::Command::PioneClient.run args
     end
     Location[path + "message.txt"].should.exist
@@ -47,7 +47,7 @@ describe "Pione::Command::PioneClient" do
 
   it "should show parameters list of package" do
     args = ["example/HelloWorld/HelloWorld.pione", "--list-params"]
-    res = TestUtil::Command.succeed do
+    res = TestHelper::Command.succeed do
       Pione::Command::PioneClient.run args
     end
     res.stdout.string.size.should > 0

data/test/command/spec_pione-log.rb

@@ -0,0 +1,28 @@
+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
+  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
+
+  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
+  end
+end

data/test/command/spec_pione-package.rb

@@ -1,15 +1,114 @@
-require_relative "../test-util"
-
-describe "Pione::Command::PionePackage" do
-  it "should build PIONE package" do
-    package_location = TestUtil::Package.get("TestPackage1")
-    output_location = Location[Temppath.mkdir]
-    res = TestUtil::Command.succeed do
-      Command::PionePackage.run ["--build", "-o", output_location.path.to_s, package_location.path.to_s]
-    end
-    pkg = output_location + "TestPackage1+v0.1.0.ppg"
-    pkg.should.exist
-    pkg.size.should > 0
+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
+      @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 build PIONE package with the package name" do
+      output_location = Location[Temppath.mkdir]
+      res = TestHelper::Command.succeed do
+        Command::PionePackage.run ["--build", "-o", output_location.path.to_s, this::P1.path.to_s]
+      end
+      pkg = output_location + "P1.ppg"
+      pkg.should.exist
+      pkg.size.should > 0
+    end
+
+    it "should build PIONE package with the tag" do
+      output_location = Location[Temppath.mkdir]
+      res = TestHelper::Command.succeed do
+        Command::PionePackage.run ["--build", "-o", output_location.path.to_s, this::P2.path.to_s]
+      end
+      pkg = output_location + "P2+v0.1.0.ppg"
+      pkg.should.exist
+      pkg.size.should > 0
+    end
+
+    it "should build PIONE package with the editor" do
+      output_location = Location[Temppath.mkdir]
+      res = TestHelper::Command.succeed do
+        Command::PionePackage.run ["--build", "-o", output_location.path.to_s, this::P3.path.to_s]
+      end
+      pkg = output_location + "P3(keita.yamaguchi@gmail.com).ppg"
+      pkg.should.exist
+      pkg.size.should > 0
+    end
+
+    it "should build PIONE package with full name" do
+      output_location = Location[Temppath.mkdir]
+      res = TestHelper::Command.succeed do
+        Command::PionePackage.run ["--build", "-o", output_location.path.to_s, this::P4.path.to_s]
+      end
+      pkg = output_location + "P4(keita.yamaguchi@gmail.com)+v0.1.0.ppg"
+      pkg.should.exist
+      pkg.size.should > 0
+    end
+
+    it "should add package with name to database" do
+      res = TestHelper::Command.succeed do
+        Command::PionePackage.run ["--add", this::P1.path.to_s]
+      end
+      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 = TestHelper::Command.succeed do
+        Command::PionePackage.run ["--add", this::P2.path.to_s]
+      end
+      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 = TestHelper::Command.succeed do
+        Command::PionePackage.run ["--add", this::P3.path.to_s]
+      end
+      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
+      TestHelper::Command.succeed do
+        Command::PionePackage.run ["--add", this::P4.path.to_s]
+      end
+      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
+      TestHelper::Command.succeed do
+        Command::PionePackage.run ["--add", "--tag", "TEST", this::P4.path.to_s]
+      end
+      db = Package::Database.load
+      digest = db.find("P4", "keita.yamaguchi@gmail.com", "TEST")
+      digest.size.should > 0
+    end
+
+    it "should write a package information file" do
+      location = Location[Temppath.mkdir]
+      (this::P1 + "P1.pione").copy(location + "P1.pione")
+      res = TestHelper::Command.succeed do
+        Command::PionePackage.run ["--write-info", location.path.to_s]
+      end
+      (location + "pione-package.json").should.exist
+    end
   end
 end
 

data/test/command/spec_pione-val.rb

@@ -1,19 +1,19 @@
-require_relative '../test-util'
+require 'pione/test-helper'
 require_relative 'command-behavior'
 
 describe "Pione::Command::PioneVal" do
   behaves_like "command"
 
   it "should get value" do
-    res = TestUtil::Command.succeed do
+    res = TestHelper::Command.succeed do
       Command::PioneVal.run ["1 + 1"]
     end
     res.stdout.string.chomp.should == "2"
   end
 
   it "should get variable from domain info" do
-    domain_info = TestUtil::DIR + "command" + "spec_pione-val.domain.dump"
-    res = TestUtil::Command.succeed do
+    domain_info = Location[File.dirname(__FILE__)] + "data" + "pione-val.domain.dump"
+    res = TestHelper::Command.succeed do
       Command::PioneVal.run ["$O[1]", "--domain-info", domain_info.path.to_s]
     end
     res.stdout.string.chomp.should == "message.txt"

data/test/lang/data/boolean.yml

@@ -0,0 +1,134 @@
+"# ==":
+  - true  : 'true == true'
+  - false : 'true == false'
+  - false : 'false == true'
+  - true  : 'false == false'
+  - false : 'true | true == true'
+  - false : 'true | true == false'
+  - false : 'true | false == true'
+  - false : 'true | false == false'
+  - false : 'false | true == true'
+  - false : 'false | true == false'
+  - false : 'false | false == true'
+  - false : 'false | false == false'
+  - false : 'true == true | true'
+  - false : 'true == true | false'
+  - false : 'true == false | true'
+  - false : 'true == false | false'
+  - false : 'false == true | true'
+  - false : 'false == true | false'
+  - false : 'false == false | true'
+  - false : 'false == false | false'
+  - true  : 'true | true == true | true'
+  - false : 'true | true == true | false'
+  - false : 'true | true == false | true'
+  - false : 'true | true == false | false'
+  - false : 'true | false == true | true'
+  - true  : 'true | false == true | false'
+  - false : 'true | false == false | true'
+  - false : 'true | false == false | false'
+  - false : 'false | true == true | true'
+  - false : 'false | true == true | false'
+  - true  : 'false | true == false | true'
+  - false : 'false | true == false | false'
+  - false : 'false | false == true | true'
+  - false : 'false | false == true | false'
+  - false : 'false | false == false | true'
+  - true  : 'false | false == false | false'
+
+"#as_string, #str":
+  - '"true"' : 'true.as_string'
+  - '"false"' : 'false.as_string'
+  - '"true"' : 'true.str'
+  - '"false"' : 'false.str'
+  - '"true" | "true"' : '(true | true).str'
+  - '"true" | "false"' : '(true | false).str'
+  - '"false" | "true"' : '(false | true).str'
+  - '"false" | "false"' : '(false | false).str'
+
+"# as_data_expr, #d":
+  # - "'true'" : 'true.as_data_expr'
+  # - "'false'" : 'false.as_data_expr'
+  # - "'true'" : 'true.d'
+  # - "'false'" : 'false.d'
+  # - "'true' | 'true'" : '(true | true).d'
+  # - "'true' | 'false'" : '(true | false).d'
+  # - "'false' | 'true'" : '(false | true).d'
+  # - "'false' | 'false'" : '(false | false).d'
+
+"#not":
+  - false : 'true.not'
+  - true  : 'false.not'
+  - true  : '(true | true).not == false | false'
+  - true  : '(true | false).not == false | true'
+  - true  : '(false | true).not == true | false'
+  - true  : '(false | false).not == true | true'
+
+"#and":
+  - true : 'true and true == true'
+  - true : 'true and false == false'
+  - true : 'false and true == false'
+  - true : 'false and false == false'
+  - true : '(true | true) and true == true | true'
+  - true : '(true | true) and false == false | false'
+  - true : '(true | false) and true == true | false'
+  - true : '(true | false) and false == false | false'
+  - true : '(false | true) and true == false | true'
+  - true : '(false | true) and false == false | false'
+  - true : '(false | false) and true == false | false'
+  - true : '(false | false) and false == false | false'
+  - true : 'true and (true | true) == true | true'
+  - true : 'true and (true | false) == true | false'
+  - true : 'true and (false | true) == false | true'
+  - true : 'true and (false | false) == false | false'
+  - true : 'false and (true | true) == false | false'
+  - true : 'false and (true | false) == false | false'
+  - true : 'false and (false | true) == false | false'
+  - true : 'false and (false | false) == false | false'
+
+"#or":
+  - true : 'true or true == true'
+  - true : 'true or false == true'
+  - true : 'false or true == true'
+  - true : 'false or false == false'
+  - true : '(true | true) or true == true | true'
+  - true : '(true | true) or false == true | true'
+  - true : '(true | false) or true == true | true'
+  - true : '(true | false) or false == true | false'
+  - true : '(false | true) or true == true | true'
+  - true : '(false | true) or false == false | true'
+  - true : '(false | false) or true == true | true'
+  - true : '(false | false) or false == false | false'
+  - true : 'true or (true | true) == true | true'
+  - true : 'true or (true | false) == true | true'
+  - true : 'true or (false | true) == true | true'
+  - true : 'true or (false | false) == true | true'
+  - true : 'false or (true | true) == true | true'
+  - true : 'false or (true | false) == true | false'
+  - true : 'false or (false | true) == false | true'
+  - true : 'false or (false | false) == false | false'
+
+"#every?":
+  - true : 'true.every?'
+  - false : 'false.every?'
+  - true : '(true | true).every?'
+  - false : '(true | false).every?'
+  - false : '(false | true).every?'
+  - false : '(false | false).every?'
+
+"#any?":
+  - true : 'true.any?'
+  - false : 'false.any?'
+  - true : '(true | true).any?'
+  - true : '(true | false).any?'
+  - true : '(false | true).any?'
+  - false : '(false | false).any?'
+
+"#one?":
+  - true : 'true.one?'
+  - false : 'false.one?'
+  - false : '(true | true).one?'
+  - true : '(true | false).one?'
+  - true : '(false | true).one?'
+  - false : '(false | false).one?'
+

data/test/lang/data/common-parser.yml

@@ -0,0 +1,187 @@
+eof:
+  valid:
+    # reach no characters
+    - ""
+  invalid:
+    # any characters
+    - "a"
+    # newline
+    - "\n"
+
+newline:
+  valid:
+    # newline
+    - "\n"
+    # explicit line end
+    - ";"
+
+comment:
+  valid:
+    # simple comment
+    - "# comment"
+    # comment out any character
+    - "# comment 日本語 # comment"
+  invalid:
+    # newline breaks comment
+    - "# comment\naaaa"
+
+identifier:
+  valid:
+    # simple
+    - "a"
+    - "abc"
+    - "aBC"
+    - "A"
+    - "ABC"
+    - "Abc"
+    # underscore
+    - "a_"
+    - "_a"
+    - "a_a"
+    # spacial tail "!"
+    - "a!"
+    - "abc!"
+    # spaceial tail "?"
+    - "a?"
+    - "abc?"
+    # UTF-8 characters
+    - '日本語'
+  invalid:
+    # digit only
+    - "1"
+    # space
+    - " "
+    # head space
+    - " a"
+    # tail space
+    - "a "
+    # with header
+    - '$a'
+
+digit:
+  valid:
+    # from 0 to 9
+    - "0"
+    - "1"
+    - "2"
+    - "3"
+    - "4"
+    - "5"
+    - "6"
+    - "7"
+    - "8"
+    - "9"
+  invalid:
+    # number, but not digit
+    - "01"
+    - "10"
+    - "100"
+    # any alphabet
+    - "a"
+    - "abc"
+
+space:
+  valid:
+    # simple space
+    - " "
+    # spaces
+    - "  "
+    - "   "
+    # simple tab
+    - "	"
+    # tabs
+    - "		"
+    - "			"
+    # mix spaces and tabs
+    - " 	"
+  invalid:
+    # newline
+    - "\n"
+    - " \n"
+    - "\n "
+    - " \n "
+    # unicode space characters excluding U+0020 are not acceptted
+    - "　"
+    # any characters
+    - "a"
+    # tail any characters
+    - " a"
+
+pad:
+  valid:
+    # simple space
+    - " "
+    # spaces
+    - "  "
+    - "   "
+    # simple tab
+    - "	"
+    # tabs
+    - "		"
+    - "			"
+    # simple newline
+    - "\n"
+    # newlines
+    - "\n\n"
+    - "\n\n\n"
+    # mix spaces, tabs, and newlines
+    - " \n	"
+  invalid:
+    # unicode space characters excluding U+0020 are not acceptted
+    - "　"
+    # any characters
+    - "a"
+    # tail any characters
+    - " a"
+
+line_end:
+  valid:
+    # spaces and newline
+    - "\n"
+    - ";"
+    - " \n"
+    - "  \n"
+    - " ;"
+    - "  ;"
+    # spaces and eof
+    - ""
+    - " "
+    - "  "
+    # spaces and comment
+    - "# comment"
+    - " # comment"
+    - "  # comment"
+  invalid:
+    # any alphabets
+    - "a"
+    - " a"
+    - "  a"
+    - "a "
+    - "a  "
+    - "a   "
+
+empty_line:
+  valid:
+    # spaces and eof
+    - " "
+    - "   "
+    # spaces and newline
+    - "\n"
+    - " \n"
+    - "  \n"
+    - ";"
+    - " ;"
+    - "  ;"
+    # spaces and comment
+    - "#comment"
+    - " #comment"
+    - "  #comment"
+  invalid:
+    # reach no characters(to avoid endless loop)
+    - ""
+    # any alphabets
+    - "a "
+    - " a"
+    - " a "
+    - "a #a"
+