pione 0.2.2 → 0.3.0

data/test/parser/spec_document-parser.rb

@@ -1,5 +0,0 @@
-require_relative '../test-util'
-
-describe 'Pione::Parser::DocumentParser' do
-  TestUtil::Parser.spec(Pione::Parser::DocumentParser, __FILE__, self)
-end

data/test/parser/spec_document-parser.yml

@@ -1,77 +0,0 @@
-toplevel_element:
-  valid:
-    # parameter line
-    - "param $X := 1"
-    # parameter block
-    - |
-      Param
-        $X := 1
-        $Y := 2
-        $Z := 3
-      End
-    # rule definition
-    - |
-      Rule Test
-        input '*.txt'
-        output '{$*}.result'
-      Action
-        rev {$I[1]} > {$O[1]}
-      End
-    # assignment
-    - "$X := 1"
-param_block:
-  valid:
-    # empty block
-    - |
-      Param
-      End
-    # one line block
-    - |
-      Param
-        $X := 1
-      End
-    # multi line block
-    - |
-      Param
-        $X := 1
-        $Y := 2
-        $Z := 3
-      End
-    # multi line with empty line
-    - |
-      Param
-        $X := 1
-        
-        $Y := 2
-      End
-    # one line with comment
-    - |
-      Param
-        # param $X := 1
-        $X := 1
-      End
-    # multi line with comments
-    - |
-      Param
-        # param $X := 1
-        $X := 1
-        # param $Y := 2
-        $Y := 2
-        # param $Z := 3
-        $Z := 3
-      End
-    # basic param block
-    - |
-      Basic Param
-        $X := 1
-        $Y := 2
-        $Z := 3
-      End
-    # advanced param block
-    - |
-      Advanced Param
-        $X := 1
-        $Y := 2
-        $Z := 3
-      End
-

data/test/parser/spec_expr-parser.rb

@@ -1,6 +0,0 @@
-require_relative '../test-util'
-
-describe 'Pione::Parser::ExprParser' do
-  TestUtil::Parser.spec(Pione::Parser::ExprParser, __FILE__, self)
-end
-

data/test/parser/spec_feature-expr-parser.rb

@@ -1,32 +0,0 @@
-require_relative '../test-util'
-
-class TestParser < Parslet::Parser
-  include Pione::Parser::FeatureExprParser
-end
-
-describe 'Pione::Parser::FeatureExprParser' do
-  describe 'feature_expr' do
-    it 'should parse feature expressions' do
-      strings = ['+A', '-A', '?A', '(+A)',
-                 '+A & +A', '+A | +A', '?A & +A',
-                 '(+A) & (+A)', '(+A | +A)',
-                 '+A & (+A & -A)', '(+A & -A) & +A']
-      strings.each do |s|
-        should.not.raise(Parslet::ParseFailed) do
-          TestParser.new.feature_expr.parse(s)
-        end
-      end
-    end
-
-    TestUtil::Parser.spec(Pione::Parser::FeatureExprParser, __FILE__, self)
-
-    it 'should fail with other strings' do
-      strings = ['A', '(-A', '?A)']
-      strings.each do |s|
-        should.raise(Parslet::ParseFailed) do
-          TestParser.new.feature_expr.parse(s)
-        end
-      end
-    end
-  end
-end

data/test/parser/spec_feature-expr-parser.yml

@@ -1,25 +0,0 @@
-atomic_feature:
-  valid:
-    - "+A"
-    - "-A"
-    - "?A"
-    - "^A"
-    - "!A"
-    - "*"
-    - "@"
-feature_expr:
-  valid:
-    - "+A"
-    - "-A"
-    - "?A"
-    - "^A"
-    - "!A"
-    - "*"
-    - "@"
-    - "(+A)"
-    - "+A & -A"
-    - "-A & +A"
-    - "+A | -A"
-    - "+A & *"
-    - "* & * & *"
-    - "* | *"

data/test/parser/spec_flow-element-parser.rb

@@ -1,5 +0,0 @@
-require_relative '../test-util'
-
-describe 'Pione::Parser::FlowElementParser' do
-  TestUtil::Parser.spec(Pione::Parser::FlowElementParser, __FILE__, self)
-end

data/test/parser/spec_literal-parser.rb

@@ -1,5 +0,0 @@
-require_relative '../test-util'
-
-describe 'Pione::Parser::LiteralParser' do
-  TestUtil::Parser.spec(Pione::Parser::LiteralParser, __FILE__, self)
-end

data/test/parser/spec_literal-parser.yml

@@ -1,134 +0,0 @@
-data_name:
-  valid:
-    - "''"
-    - "'test'"
-    - "'(test)'"
-    - "'test*'"
-    - "'日本語'"
-    - "'\\a'"
-    - "'\\\\a'"
-  invalid:
-    - "test"
-    - "'test"
-    - "test'"
-    - "'\\'"
-    - "\\''"
-identifier:
-  valid:
-    - 'a'
-    - 'A'
-    - 'a_b'
-    - '_a'
-    - '日本語'
-    - '_'
-  invalid:
-    - '$a'
-    - '"a"'
-    - "'a'"
-    - ' '
-    - "\n"
-variable:
-  valid:
-    - '$a'
-    - '$abc'
-    - '$a_b'
-    - '$a0'
-    - '$0'
-    - '$A'
-    - '$AA'
-    - '$日本語'
-  invalid:
-    - '$'
-    - '$ '
-    - 'a'
-    - ''
-    - '$$'
-    - '$+'
-    - '$-'
-package_name:
-  valid:
-    - "&abc"
-    - "&a"
-    - "&A"
-    - "&_"
-  invalid:
-    - "&"
-    - "&&"
-rule_name:
-  valid:
-    - 'Main'
-    - '日本語'
-    - 'a'
-  invalid:
-    - '/Main/'
-    - 'Main/'
-    - '//Main'
-    - ''
-    - '/'
-    - '//'
-string:
-  valid:
-    - '""'
-    - '"test"'
-    - '"(test)"'
-    - '"test*"'
-    - '"日本語"'
-    - '"\a"'
-  invalid:
-    - 'test'
-    - 'test"'
-    - '"test'
-    - '"\"'
-    - '\""'
-    - '"" '
-integer:
-  valid:
-    - '1'
-    - '123'
-    - '01'
-    - '+1'
-    - '+01'
-    - '-1'
-    - '-01'
-    - '+0'
-    - '-0'
-  invalid:
-    - '-'
-    - '+'
-    - ''
-    - '0.1'
-    - '.1'
-    - '1a'
-    - 'a1'
-float:
-  valid:
-    - '0.1'
-    - '1.0'
-    - '01.0'
-    - '+1.0'
-    - '+01.1'
-    - '-1.0'
-    - '-01.0'
-    - '+0.0'
-    - '-0.0'
-    - '0.1e3'
-    - '1.9E100'
-  invalid:
-    - '-1'
-    - '+1'
-    - ''
-    - '.1'
-    - '0.1a'
-    - '0.a1'
-    - '0.1e'
-ticket:
-  valid:
-    - "<t>"
-    - "<T>"
-    - "<1>"
-    - "<Ticket>"
-    - "< T >"
-    - "<T >"
-    - "< T>"
-  invalid:
-    - "<a b>"

data/test/parser/spec_rule-definition-parser.rb

@@ -1,5 +0,0 @@
-require_relative '../test-util'
-
-describe "Pione::Parser::RuleDefinitionParser" do
-  TestUtil::Parser.spec(Pione::Parser::RuleDefinitionParser, __FILE__, self)
-end

data/test/parser/spec_rule-definition-parser.yml

@@ -1,94 +0,0 @@
-input_line:
-  valid:
-    - input '*.txt'
-    - input "*.txt".as_data_expr
-output_line:
-  valid:
-    - output '*.txt'
-    - output "*.txt".as_data_expr
-param_line:
-  valid:
-    - "param $abc"
-    - "param $Var"
-    - "param $Var := 1"
-    - "param $NUM := 1.0"
-    - "param $STR := \"abc\""
-    - "basic param $X"
-    - "basic param $X := 1"
-    - "advanced param $X"
-    - "advanced param $X := 1"
-  invalid:
-    - "param $"
-    - "basicparam $X := 1"
-    - "advancedparam $X := 1"
-feature_line:
-  valid:
-    - feature +A
-    - feature -A
-    - feature ?A
-    - feature "A".as_requisite_feature
-  invalid:
-    - feature +
-    - feature -
-    - feature ?
-rule_header:
-  valid:
-    - Rule Test
-    - Rule test
-rule_condition:
-  valid:
-    - input "*.txt"
-    - output "*.txt"
-    - param $var
-    - feature +A
-rule_conditions:
-  valid:
-    - |
-      input "*.a"
-      input "*.b"
-      output "*.c"
-      param $var
-      feature +A
-    - |
-      output "*.a"
-      input "*.b"
-      feature -A
-      param $var
-rule_definition:
-  valid:
-    - |
-      Rule test
-        input '*.a'
-        output '*.b'
-      Flow
-        rule Test
-      End
-    - |
-      Rule test
-        input '*.a'
-        output '*.b'
-      Action
-      echo "a"
-      End
-    - |
-      Rule Test
-        input  '*.a'
-        output '{$INPUT[1].MATCH[1]}.b'
-      Action
-      echo "test" > {$OUTPUT[1].NAME}
-      End
-    - |
-      Rule Test
-        input '*.a'
-        output '{$INPUT[1].MATCH[1]}.b'
-      Flow
-      rule TestA
-      rule TestB.sync
-      End
-    - |
-      Rule Test
-        output 'test.txt'
-        param $N := 1
-      Flow
-        rule TestA
-      End

data/test/rule-handler/spec_action-handler.rb

@@ -1,79 +0,0 @@
-require_relative '../test-util'
-
-$doc = Component::Document.load(Location[File.dirname(__FILE__)] + "spec_action-handler.pione")
-
-describe 'Pione::RuleHandler::ActionHandler' do
-  before do
-    @ts = create_tuple_space_server
-
-    @rule_test = $doc.find('Test')
-    @rule_sh1 = $doc.find('Shell1')
-    @rule_sh2 = $doc.find('Shell2')
-    @rule_ruby = $doc.find('Ruby')
-
-    location = Location[Temppath.create]
-    location_a = location + "1.a"
-    location_b = location + "1.b"
-    location_a.create("1")
-    location_b.create("2")
-
-    @tuple_a = Tuple[:data].new(name: '1.a', location: location_a, domain: "test")
-    @tuple_b = Tuple[:data].new(name: '1.b', location: location_b, domain: "test")
-    @tuples = [@tuple_a, @tuple_b].tap{|t| write(t)}
-
-    @handler_sh1 = @rule_sh1.make_handler(@ts, @tuples, Parameters.empty, [])
-    @handler_sh2 = @rule_sh2.make_handler(@ts, @tuples, Parameters.empty, [])
-    @handler_ruby = @rule_ruby.make_handler(@ts, @tuples, Parameters.empty, [])
-  end
-
-  after do
-    @ts.terminate
-  end
-
-  it 'should be made from action rule' do
-    handler = @rule_test.make_handler(@ts, [@tuple_a], Parameters.empty, [])
-    handler.should.be.kind_of(RuleHandler::ActionHandler)
-  end
-
-  it 'should have working directory' do
-    @handler_sh1.working_directory.should.exist
-    @handler_sh2.working_directory.should.exist
-    @handler_ruby.working_directory.should.exist
-  end
-
-  it 'should make different working directories' do
-    @handler_sh1.make_working_directory.should != @handler_sh1.make_working_directory
-  end
-
-  it 'should write a shell script' do
-    handler = @rule_test.make_handler(@ts, [@tuple_a], Parameters.empty, [])
-    handler.write_shell_script do |path|
-      File.should.exist(path)
-      File.should.executable(path)
-      File.read(path).should == "cat 1.a > 1.b\n"
-    end
-  end
-
-  it 'should call shell script' do
-    handler = @rule_test.make_handler(@ts, [@tuple_a], Parameters.empty, [])
-    handler.write_shell_script do |path|
-      handler.call_shell_script(path)
-      (handler.working_directory + "1.b").should.exist
-    end
-  end
-
-  [:sh1, :sh2, :ruby].each do |sym|
-    it "should execute an action: #{sym}" do
-      # execute and get result
-      handler = eval("@handler_#{sym}")
-      outputs = handler.execute
-      res = outputs.first
-      res.name.should == '1.c'
-      res.location.read.chomp.should == "3"
-      should.not.raise do
-        read(Tuple[:data].new(name: '1.c', domain: handler.domain))
-      end
-    end
-  end
-end
-