summaryrefslogtreecommitdiff
path: root/test/psych/test_parser.rb
diff options
context:
space:
mode:
authortenderlove <tenderlove@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2010-03-28 21:49:37 +0000
committertenderlove <tenderlove@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2010-03-28 21:49:37 +0000
commitb9b923ca942096ddb1062be2deb9e6de9a65f346 (patch)
treebc8466746efbe763c7e8a54390d9b34db1aa63c4 /test/psych/test_parser.rb
parenta8a99a7379fa8e07f217fc7b24e3a9208a967898 (diff)
* ext/psych/*: importing Psych to trunk
* test/psych/*: ditto * lib/psych/*: ditto git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@27079 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'test/psych/test_parser.rb')
-rw-r--r--test/psych/test_parser.rb188
1 files changed, 188 insertions, 0 deletions
diff --git a/test/psych/test_parser.rb b/test/psych/test_parser.rb
new file mode 100644
index 0000000..3886994
--- /dev/null
+++ b/test/psych/test_parser.rb
@@ -0,0 +1,188 @@
+require 'test/psych/helper'
+
+module Psych
+ class TestParser < TestCase
+ class EventCatcher < Handler
+ attr_reader :calls
+ def initialize
+ @calls = []
+ end
+
+ (Handler.instance_methods(true) -
+ Object.instance_methods).each do |m|
+ class_eval %{
+ def #{m} *args
+ super
+ @calls << [:#{m}, args]
+ end
+ }
+ end
+ end
+
+ def setup
+ super
+ @parser = Psych::Parser.new EventCatcher.new
+ end
+
+ def test_bogus_io
+ o = Object.new
+ def o.read len; self end
+
+ assert_raises(TypeError) do
+ @parser.parse o
+ end
+ end
+
+ def test_parse_io
+ @parser.parse StringIO.new("--- a")
+ assert_called :start_stream
+ assert_called :scalar
+ assert_called :end_stream
+ end
+
+ def test_syntax_error
+ assert_raises(Psych::SyntaxError) do
+ @parser.parse("---\n\"foo\"\n\"bar\"\n")
+ end
+ end
+
+ def test_mapping_end
+ @parser.parse("---\n!!map { key: value }")
+ assert_called :end_mapping
+ end
+
+ def test_mapping_tag
+ @parser.parse("---\n!!map { key: value }")
+ assert_called :start_mapping, ["tag:yaml.org,2002:map", false, Nodes::Mapping::FLOW]
+ end
+
+ def test_mapping_anchor
+ @parser.parse("---\n&A { key: value }")
+ assert_called :start_mapping, ['A', true, Nodes::Mapping::FLOW]
+ end
+
+ def test_mapping_block
+ @parser.parse("---\n key: value")
+ assert_called :start_mapping, [true, Nodes::Mapping::BLOCK]
+ end
+
+ def test_mapping_start
+ @parser.parse("---\n{ key: value }")
+ assert_called :start_mapping
+ assert_called :start_mapping, [true, Nodes::Mapping::FLOW]
+ end
+
+ def test_sequence_end
+ @parser.parse("---\n&A [1, 2]")
+ assert_called :end_sequence
+ end
+
+ def test_sequence_start_anchor
+ @parser.parse("---\n&A [1, 2]")
+ assert_called :start_sequence, ["A", true, Nodes::Sequence::FLOW]
+ end
+
+ def test_sequence_start_tag
+ @parser.parse("---\n!!seq [1, 2]")
+ assert_called :start_sequence, ["tag:yaml.org,2002:seq", false, Nodes::Sequence::FLOW]
+ end
+
+ def test_sequence_start_flow
+ @parser.parse("---\n[1, 2]")
+ assert_called :start_sequence, [true, Nodes::Sequence::FLOW]
+ end
+
+ def test_sequence_start_block
+ @parser.parse("---\n - 1\n - 2")
+ assert_called :start_sequence, [true, Nodes::Sequence::BLOCK]
+ end
+
+ def test_literal_scalar
+ @parser.parse(<<-eoyml)
+%YAML 1.1
+---
+"literal\n\
+ \ttext\n"
+ eoyml
+ assert_called :scalar, ['literal text ', false, true, Nodes::Scalar::DOUBLE_QUOTED]
+ end
+
+ def test_scalar
+ @parser.parse("--- foo\n")
+ assert_called :scalar, ['foo', true, false, Nodes::Scalar::PLAIN]
+ end
+
+ def test_scalar_with_tag
+ @parser.parse("---\n!!str foo\n")
+ assert_called :scalar, ['foo', 'tag:yaml.org,2002:str', false, false, Nodes::Scalar::PLAIN]
+ end
+
+ def test_scalar_with_anchor
+ @parser.parse("---\n&A foo\n")
+ assert_called :scalar, ['foo', 'A', true, false, Nodes::Scalar::PLAIN]
+ end
+
+ def test_scalar_plain_implicit
+ @parser.parse("---\n&A foo\n")
+ assert_called :scalar, ['foo', 'A', true, false, Nodes::Scalar::PLAIN]
+ end
+
+ def test_alias
+ @parser.parse(<<-eoyml)
+%YAML 1.1
+---
+!!seq [
+ !!str "Without properties",
+ &A !!str "Anchored",
+ !!str "Tagged",
+ *A,
+ !!str "",
+]
+ eoyml
+ assert_called :alias, ['A']
+ end
+
+ def test_end_stream
+ @parser.parse("--- foo\n")
+ assert_called :end_stream
+ end
+
+ def test_start_stream
+ @parser.parse("--- foo\n")
+ assert_called :start_stream
+ end
+
+ def test_end_document_implicit
+ @parser.parse("\"foo\"\n")
+ assert_called :end_document, [true]
+ end
+
+ def test_end_document_explicit
+ @parser.parse("\"foo\"\n...")
+ assert_called :end_document, [false]
+ end
+
+ def test_start_document_version
+ @parser.parse("%YAML 1.1\n---\n\"foo\"\n")
+ assert_called :start_document, [[1,1], [], false]
+ end
+
+ def test_start_document_tag
+ @parser.parse("%TAG !yaml! tag:yaml.org,2002\n---\n!yaml!str \"foo\"\n")
+ assert_called :start_document, [[], [['!yaml!', 'tag:yaml.org,2002']], false]
+ end
+
+ def assert_called call, with = nil, parser = @parser
+ if with
+ call = parser.handler.calls.find { |x|
+ x.first == call && x.last.compact == with
+ }
+ assert(call,
+ "#{[call,with].inspect} not in #{parser.handler.calls.inspect}"
+ )
+ else
+ assert parser.handler.calls.any? { |x| x.first == call }
+ end
+ end
+ end
+end