kwalify 0.4.1 → 0.5.0

data/test/test-rule.rb

@@ -0,0 +1,60 @@
+###
+### $Rev: 42 $
+### $Release: 0.5.0 $
+### copyright(c) 2005 kuwata-lab all rights reserved.
+###
+
+unless defined?(TESTDIR)
+   TESTDIR = File.dirname(__FILE__)
+   libdir  = File.dirname(TESTDIR) + "/lib"
+   $LOAD_PATH << libdir << TESTDIR
+end
+
+require 'test/unit'
+require 'test/unit/ui/console/testrunner'
+require 'kwalify'
+require 'kwalify/util/assert-diff'
+require 'yaml'
+
+
+class RuleTest < Test::Unit::TestCase
+
+   ## define test methods
+   testdata_filename = __FILE__.sub(/\.rb$/, '.yaml')
+   str = File.read(testdata_filename)
+   @@docs = {}
+   YAML.load_documents(str) do |doc|
+      name = doc['name']
+      !@@docs.key?(name) or raise "*** test name '#name}' is duplicated."
+      @@docs[name] = doc
+      doc.each do |key, val|
+         if key =~ /\A(.*)\*\z/
+            doc[$1] ||= val['ruby']
+         end
+      end
+      doc['schema'] = YAML.load(doc['input'])
+      s = <<-END
+         def test_#{name}
+            doc = @@docs['#{name}']
+            @name    = doc['name']
+            @desc    = doc['desc']
+            @input   = doc['input']
+            @schema  = doc['schema']
+            @exception   = #{doc['exception'] == nil ? 'nil' : doc['error']}
+            _test()
+         end
+      END
+      eval s
+   end
+
+   ## execute test
+   def _test()
+      assert_nothing_raised do
+         return if $target && $target != @name
+         schema = @schema
+         rule = Kwalify::Rule.new(schema)
+      end
+   end
+
+end
+

data/test/test-rule.yaml

@@ -0,0 +1,314 @@
+##
+## $Rev: 42 $
+## $Release: 0.5.0 $
+## copyright(c) 2005 kuwata-lab all rights reserved.
+##
+---
+name:   sequence1
+desc:   basic sequence
+input: |
+  type: seq
+  sequence:
+    - type: str
+#
+---
+name:   mapping1
+desc:   basic mapping
+input: |
+  type:       map
+  mapping:
+   "name":
+      type:      str
+      required:  yes
+   "email":
+      type:      str
+      pattern:   /@/
+   "age":
+      type:      int
+   "birth":
+      type:      date
+#
+---
+name:   seqmap1
+desc:   mapping of sequence
+input: |
+  type:      seq
+  sequence:
+    - type:      map
+      mapping:
+       "name":
+          type:      str
+          required:  true
+       "email":
+          type:      str
+#
+---
+name:  mapseq1
+desc:  mapping of sequence
+input: |
+  type:      map
+  mapping:
+   "company":
+      type:      str
+      required:  yes
+   "email":
+      type:      str
+   "employees":
+      type:      seq
+      sequence:
+        - type:    map
+          mapping:
+           "code":
+              type:      int
+              required:  yes
+           "name":
+              type:      str
+              required:  yes
+           "email":
+              type:      str
+#
+---
+name: unique1
+desc: unique constraint
+input: |
+  type: seq
+  sequence:
+    - type:     map
+      required: yes
+      mapping:
+       "name":
+          type:     str
+          required: yes
+          unique:   yes
+       "email":
+          type:     str
+       "groups":
+          type:     seq
+          sequence:
+            - type: str
+              unique:   yes
+---
+name:  constraints1
+desc:  some constraints
+input: |
+  name:      address-book
+  desc:      Address book
+  type:      seq
+  sequence:
+    - type:      map
+      mapping:
+       "name":
+          type:       str
+          required:   yes
+       "email":
+          type:       str
+          required:   yes
+          pattern:    /@/
+       "password":
+          type:       str
+          length:     { max: 16, min: 8 }
+       "age":
+          type:       int
+          range:      { max: 30, min: 18 }
+          # or assert: 18 <= val && val <= 30
+       "blood":
+          type:       str
+          enum:
+            - A
+            - B
+            - O
+            - AB
+       "birth":
+          type:       date
+       "memo":
+          type:       any
+#
+---
+name:  default1
+desc:  default rule
+input: |
+  type: map
+  mapping:
+   "properties":
+      type: map
+      mapping:
+       =:
+          type: any
+#
+---
+name:  default2
+desc:  default rule #2
+input: |
+  type: seq
+  sequence:
+    - type: map
+      mapping:
+       "name":
+          type: str
+          required: yes
+       "email":
+          type: str
+       "birth":
+          type: date
+       =:
+          type: any
+#
+---
+name:  merge1
+desc:  merge rule
+input: |
+  type: map
+  mapping:
+   "group":
+      type: map
+      mapping:
+       "name": &name
+          type: str
+          required: yes
+       "email": &email
+          type: str
+          pattern: /@/
+          required: no
+   "user":
+      type: map
+      mapping:
+       "name":
+          <<: *name             # merge
+          length: { max: 16 }   # append
+       "email":
+          <<: *email            # merge
+          required: yes         # overwrite
+#
+---
+name:  anchor1
+desc:  sharing rule with anchor and alias
+input: |
+  desc:   Bookshelf
+  type:   seq
+  sequence:
+    - type:   map
+      mapping:
+       "title":
+          type:   str
+          required: yes
+       "author":  &persons       # anchor
+          type:   seq
+          sequence:
+            - type: str
+       "translator": *persons     # alias
+       "publisher":
+          type:   str
+       "year":
+          type:   int
+#
+---
+name:  anchor2
+desc:  recursive definition of rule
+input: |
+  &task                  # anchor
+  desc:   WBS
+  type:   map
+  mapping:
+   "name":      { type: str, required: yes }
+   "assigned":  { type: str }
+   "deadline":  { type: date }
+   "subtasks":
+      type:  seq
+      sequence:
+        - *task          # alias
+---
+name: meta_schema
+desc: schema for meta-validator
+#
+input: |
+  name:      MAIN
+  type:      map
+  required:  yes
+  mapping:   &main-rule
+   "name":
+      type:      str
+   "desc":
+      type:      str
+   "type":
+      type:      str
+      #required:  yes
+      enum:
+        - seq
+        #- sequence
+        #- list
+        - map
+        #- mapping
+        #- hash
+        - str
+        #- string
+        - int
+        #- integer
+        - float
+        - number
+        #- numeric
+        - bool
+        #- boolean
+        - text
+        - date
+        - time
+        - timestamp
+        #- object
+        - any
+        - scalar
+        #- collection
+   "required":
+      type:      bool
+   "enum":
+      type:      seq
+      sequence:
+        - type:     scalar
+          unique:   yes
+   "pattern":
+      type:      str
+   "assert":
+      type:      str
+      pattern:   /\bval\b/
+   "range":
+      type:      map
+      mapping:
+       "max":
+          type:     scalar
+       "min":
+          type:     scalar
+       "max-ex":
+          type:     scalar
+       "min-ex":
+          type:     scalar
+   "length":
+      type:      map
+      mapping:
+       "max":
+          type:     int
+       "min":
+          type:     int
+       "max-ex":
+          type:     int
+       "min-ex":
+          type:     int
+   "ident":
+      type:      bool
+   "unique":
+      type:      bool
+   "sequence":
+      name:      SEQUENCE
+      type:      seq
+      sequence:
+        - type:      map
+          mapping:   *main-rule
+          name:      MAIN
+          #required:  yes
+   "mapping":
+      name:      MAPPING
+      type:      map
+      mapping:
+        =:
+          type:      map
+          mapping:   *main-rule
+          name:      MAIN
+          #required:  yes
+

data/test/test-validator.rb

@@ -1,6 +1,6 @@
 ###
-### $Rev: 39 $
-### $Release: 0.4.1 $
+### $Rev: 42 $
+### $Release: 0.5.0 $
 ### copyright(c) 2005 kuwata-lab all rights reserved.
 ###
 
@@ -50,8 +50,8 @@ class ValidatorTest < Test::Unit::TestCase
       error2 = @error.gsub(/\(line \d+\)/, '')
       _test_body(validator, @valid,   ''    , false)
       _test_body(validator, @invalid, error2, false)
-      # Kwalify::Parser
-      schema = Kwalify::Parser.new(@schema).parse()
+      # Kwalify::YamlParser
+      schema = Kwalify::YamlParser.new(@schema).parse()
       validator = Kwalify::Validator.new(schema)
       _test_body(validator, @valid,   ''    , true)
       _test_body(validator, @invalid, @error, true)
@@ -59,7 +59,7 @@ class ValidatorTest < Test::Unit::TestCase
 
    def _test_body(validator, input, expected, flag_parser)
       if flag_parser
-         parser = Kwalify::Parser.new(input)
+         parser = Kwalify::YamlParser.new(input)
          document = parser.parse()
       else
          document = YAML.load(input)

data/test/test-validator.yaml

@@ -0,0 +1,816 @@
+##
+## $Rev: 42 $
+## $Release: 0.5.0 $
+## copyright(c) 2005 kuwata-lab all rights reserved.
+##
+---
+name:  sequence1
+desc:  sequence test
+#
+schema: |
+  type:        seq
+  required:    true
+  sequence:
+    - type:       str
+      required:   true
+#
+valid: |
+  - foo
+  - bar
+  - baz
+#
+invalid: |
+  - foo
+  - bar
+  -
+  - baz
+  - 100
+#
+error: |
+  :required_novalue   : (line 3)[/2] value required but none.
+  :type_unmatch       : (line 5)[/4] '100': not a string.
+#
+---
+name:  mapping1
+desc:  mapping test
+#
+schema: |
+  type:        map
+  required:    true
+  mapping:
+    name:
+      type:       str
+      required:   true
+    email:
+      type:       str
+      pattern:    /@/
+      required:   yes
+    age:
+      type:       int
+    blood:
+      type:       str
+      enum:
+        - A
+        - B
+        - O
+        - AB
+    birth:
+      type:       date
+#
+valid: |
+  name:   foo
+  email:  foo@mail.com
+  age:    20
+  blood:  AB
+  birth:   1985-01-01
+#
+invalid: |
+  nam:    foo
+  email:  foo(at)mail.com
+  age:    twenty
+  blood:  ab
+  birth:  Jul 01, 1985
+#
+error: |
+  :required_nokey     : (line 1)[/] key 'name:' is required.
+  :key_undefined      : (line 1)[/nam] key 'nam:' is undefined.
+  :pattern_unmatch    : (line 2)[/email] 'foo(at)mail.com': not matched to pattern /@/.
+  :type_unmatch       : (line 3)[/age] 'twenty': not a integer.
+  :enum_notexist      : (line 4)[/blood] 'ab': invalid blood value.
+  :type_unmatch       : (line 5)[/birth] 'Jul 01, 1985': not a date.
+#
+---
+name:  nested1
+desc:  nest of seq and map
+#
+schema: |
+  type:        map
+  required:    true
+  mapping:
+    address-book:
+      type:       seq
+      required:   true
+      sequence:
+        - type:   map
+          mapping:
+            name:
+              type:       str
+              required:   yes
+            email:
+              type:       str
+              pattern:    /@/
+              required:   yes
+            age:
+              type:       int
+            blood:
+              type:       str
+              enum:
+                - A
+                - B
+                - O
+                - AB
+            birth:
+              type:       date
+#
+valid: |
+  address-book:
+    - name:       foo
+      email:      foo@mail.com
+      age:        20
+      blood:      AB
+      birth:      1985-01-01
+    - name:       bar
+      email:      foo@mail.com
+#
+invalid: |
+  address-book:
+    - name:       foo
+      mail:       foo@mail.com
+      age:        twenty
+      blood:      ab
+      birth:      1985/01/01
+    - name:       bar
+      email:      bar(at)mail.com
+#
+error: |
+  :required_nokey     : (line 2)[/address-book/0] key 'email:' is required.
+  :key_undefined      : (line 3)[/address-book/0/mail] key 'mail:' is undefined.
+  :type_unmatch       : (line 4)[/address-book/0/age] 'twenty': not a integer.
+  :enum_notexist      : (line 5)[/address-book/0/blood] 'ab': invalid blood value.
+  :type_unmatch       : (line 6)[/address-book/0/birth] '1985/01/01': not a date.
+  :pattern_unmatch    : (line 8)[/address-book/1/email] 'bar(at)mail.com': not matched to pattern /@/.
+#
+---
+name:  anchor1
+desc:  schema with anchor
+#
+schema: |
+  type:        seq
+  required:    true
+  sequence:
+    - type:        map
+      required:    true
+      mapping:
+        first-name: &name
+          type:       str
+          required:   yes
+        family-name: *name
+#
+valid: |
+  - first-name:  foo
+    family-name: Foo
+  - first-name:  bar
+    family-name: Bar
+#
+invalid: |
+  - first-name:  foo
+    last-name:   Foo
+  - first-name:  bar
+    family-name: 100
+#
+error: |
+  :required_nokey     : (line 1)[/0] key 'family-name:' is required.
+  :key_undefined      : (line 2)[/0/last-name] key 'last-name:' is undefined.
+  :type_unmatch       : (line 4)[/1/family-name] '100': not a string.
+#
+---
+name:  anchor2
+desc:  schema with anchor 2
+#
+schema: |
+  type:        map
+  required:    true
+  mapping:
+    title: &name
+      type:       str
+      required:   true
+    address-book:
+      type:       seq
+      required:   true
+      sequence:
+        - type:   map
+          mapping:
+            name: *name
+            email:
+              type:       str
+              required:   yes
+#
+valid: |
+  title:   my friends
+  address-book:
+    - name:   foo
+      email:  foo@mail.com
+    - name:   bar
+      email:  bar@mail.com
+#
+invalid: |
+  title:   my friends
+  address-book:
+    - name:  100
+      email: foo@mail.com
+    - first-name:  bar
+      email: bar@mail.com
+#
+error: |
+  :type_unmatch       : (line 3)[/address-book/0/name] '100': not a string.
+  :required_nokey     : (line 5)[/address-book/1] key 'name:' is required.
+  :key_undefined      : (line 5)[/address-book/1/first-name] key 'first-name:' is undefined.
+#
+---
+name:  anchor3
+desc:  document with anchor
+#
+schema: |
+  type:        seq
+  sequence:
+    - &employee
+      type:    map
+      mapping:
+        name:
+          type:   str
+        post:
+          type:   str
+          enum:
+            - exective
+            - manager
+            - clerk
+        supervisor: *employee
+#
+valid: |
+  - &foo
+    name:  foo
+    post:  exective
+  - &bar
+    name:  bar
+    post:  manager
+    supervisor: *foo
+  - &baz
+    name:  baz
+    post:  clerk
+    supervisor: *bar
+  - &zak
+    name:  zak
+    post:  clerk
+    supervisor: *bar
+#
+invalid: |
+  - &foo
+    name:  100
+    post:  exective
+    supervisor: *foo
+  - &bar
+    name:  foo
+    post:  worker
+    supervisor: *foo
+#
+error: |
+  :type_unmatch       : (line 2)[/0/name] '100': not a string.
+  :enum_notexist      : (line 7)[/1/post] 'worker': invalid post value.
+#
+---
+name:  range1
+desc:  range test && bug#?????
+#
+schema: |
+  type:  map
+  mapping:
+   "max-only":
+      type:     seq
+      sequence:
+        - type:     number
+          required: yes
+          range:    { max: 100 }
+   "min-only":
+      type:     seq
+      sequence:
+        - type:     number
+          required: yes
+          range:    { min: 10.0 }
+   "max-and-min":
+      type:     seq
+      sequence:
+        - type:     number
+          required: yes
+          range:    { max: 100.0, min: 10.0 }
+#
+valid: |
+  max-only:
+    - 100
+    - 100.0
+  min-only:
+    - 10
+    - 10.0
+  max-and-min:
+    - 100
+    - 10
+    - 100.0
+    - 10.0
+#
+invalid: |
+  max-only:
+    - 101
+    - 100.1
+  min-only:
+    - 9
+    - 9.99
+  max-and-min:
+    - 101
+    - 100.1
+    - 9
+    - 9.99
+#
+error: |
+  :range_toolarge     : (line 2)[/max-only/0] '101': too large (> max 100).
+  :range_toolarge     : (line 3)[/max-only/1] '100.1': too large (> max 100).
+  :range_toosmall     : (line 5)[/min-only/0] '9': too small (< min 10.0).
+  :range_toosmall     : (line 6)[/min-only/1] '9.99': too small (< min 10.0).
+  :range_toolarge     : (line 8)[/max-and-min/0] '101': too large (> max 100.0).
+  :range_toolarge     : (line 9)[/max-and-min/1] '100.1': too large (> max 100.0).
+  :range_toosmall     : (line 10)[/max-and-min/2] '9': too small (< min 10.0).
+  :range_toosmall     : (line 11)[/max-and-min/3] '9.99': too small (< min 10.0).
+#
+---
+name:  range2
+desc:  range test (with max-ex and min-ex)
+#
+schema: |
+  type:  map
+  mapping:
+   "max-ex-only":
+      type:     seq
+      sequence:
+        - type:     number
+          required: yes
+          range:    { max-ex: 100 }
+   "min-ex-only":
+      type:     seq
+      sequence:
+        - type:     number
+          required: yes
+          range:    { min-ex: 10.0 }
+   "max-ex-and-min-ex":
+      type:     seq
+      sequence:
+        - type:     number
+          required: yes
+          range:    { max-ex: 100.0, min-ex: 10.0 }
+#
+valid: |
+  max-ex-only:
+    - 99
+    - 99.99999
+  min-ex-only:
+    - 11
+    - 10.00001
+  max-ex-and-min-ex:
+    - 99
+    - 11
+    - 99.99999
+    - 10.00001
+#
+invalid: |
+  max-ex-only:
+    - 100
+    - 100.0
+  min-ex-only:
+    - 10
+    - 10.0
+  max-ex-and-min-ex:
+    - 100
+    - 100.0
+    - 10
+    - 10.0
+#
+error: |
+  :range_toolargeex   : (line 2)[/max-ex-only/0] '100': too large (>= max 100).
+  :range_toolargeex   : (line 3)[/max-ex-only/1] '100.0': too large (>= max 100).
+  :range_toosmallex   : (line 5)[/min-ex-only/0] '10': too small (<= min 10.0).
+  :range_toosmallex   : (line 6)[/min-ex-only/1] '10.0': too small (<= min 10.0).
+  :range_toolargeex   : (line 8)[/max-ex-and-min-ex/0] '100': too large (>= max 100.0).
+  :range_toolargeex   : (line 9)[/max-ex-and-min-ex/1] '100.0': too large (>= max 100.0).
+  :range_toosmallex   : (line 10)[/max-ex-and-min-ex/2] '10': too small (<= min 10.0).
+  :range_toosmallex   : (line 11)[/max-ex-and-min-ex/3] '10.0': too small (<= min 10.0).
+#
+---
+name:  range3
+desc:  range test (with max, min, max-ex and min-ex)
+#
+schema: |
+  type:  map
+  mapping:
+   "A":
+      type:     seq
+      sequence:
+        - type:     number
+          required: yes
+          range:    { max: 100, min-ex: 10.0 }
+   "B":
+      type:     seq
+      sequence:
+        - type:     number
+          required: yes
+          range:    { min: 10, max-ex: 100.0 }
+#
+valid: |
+  A:
+    - 100
+    - 10.00001
+  B:
+    - 10
+    - 99.99999
+#
+invalid: |
+  A:
+    - 100.00001
+    - 10.0
+  B:
+    - 9.99999
+    - 100.0
+#
+error: |
+  :range_toolarge     : (line 2)[/A/0] '100.00001': too large (> max 100).
+  :range_toosmallex   : (line 3)[/A/1] '10.0': too small (<= min 10.0).
+  :range_toosmall     : (line 5)[/B/0] '9.99999': too small (< min 10).
+  :range_toolargeex   : (line 6)[/B/1] '100.0': too large (>= max 100.0).
+#
+---
+name:  length1
+desc:  length test
+#
+schema: |
+  type:  map
+  mapping:
+   "max-only":
+      type:   seq
+      sequence:
+        - type:  str
+          length:  { max: 8 }
+   "min-only":
+      type:   seq
+      sequence:
+        - type:  str
+          length:  { min: 4 }
+   "max-and-min":
+      type:   seq
+      sequence:
+        - type:  str
+          length:  { max: 8, min: 4 }
+#
+valid: |
+  max-only:
+    - hogehoge
+    - a
+    -
+  min-only:
+    - hoge
+    - hogehogehogehogehoge
+  max-and-min:
+    - hogehoge
+    - hoge
+#
+invalid: |
+  max-only:
+    - hogehoge!
+  min-only:
+    - foo
+    -
+  max-and-min:
+    - foobarbaz
+    - foo
+#
+error: |
+  :length_toolong     : (line 2)[/max-only/0] 'hogehoge!': too long (length 9 > max 8).
+  :length_tooshort    : (line 4)[/min-only/0] 'foo': too short (length 3 < min 4).
+  :length_toolong     : (line 7)[/max-and-min/0] 'foobarbaz': too long (length 9 > max 8).
+  :length_tooshort    : (line 8)[/max-and-min/1] 'foo': too short (length 3 < min 4).
+#
+---
+name:  length2
+desc:  length test (with max-ex and min-ex)
+#
+schema: |
+  type:  map
+  mapping:
+   "max-ex-only":
+      type:   seq
+      sequence:
+        - type:  str
+          length:  { max-ex: 8 }
+   "min-ex-only":
+      type:   seq
+      sequence:
+        - type:  str
+          length:  { min-ex: 4 }
+   "max-ex-and-min-ex":
+      type:   seq
+      sequence:
+        - type:  str
+          length:  { max-ex: 8, min-ex: 4 }
+#
+valid: |
+  max-ex-only:
+    - hogehog
+    - a
+    -
+  min-ex-only:
+    - hoge!
+  max-ex-and-min-ex:
+    - hogehog
+    - hoge!
+#
+invalid: |
+  max-ex-only:
+    - hogehoge
+  min-ex-only:
+    - foo!
+    -
+  max-ex-and-min-ex:
+    - foobarba
+    - foo!
+#
+error: |
+  :length_toolongex   : (line 2)[/max-ex-only/0] 'hogehoge': too long (length 8 >= max 8).
+  :length_tooshortex  : (line 4)[/min-ex-only/0] 'foo!': too short (length 4 <= min 4).
+  :length_toolongex   : (line 7)[/max-ex-and-min-ex/0] 'foobarba': too long (length 8 >= max 8).
+  :length_tooshortex  : (line 8)[/max-ex-and-min-ex/1] 'foo!': too short (length 4 <= min 4).
+#
+---
+name:  length3
+desc:  length test (with min, max, max-ex and min-ex)
+#
+schema: |
+  type:  map
+  mapping:
+   "A":
+      type:   seq
+      sequence:
+        - type:  str
+          length:  { max: 8, min-ex: 4 }
+   "B":
+      type:   seq
+      sequence:
+        - type:  str
+          length:  { max-ex: 8, min: 4 }
+#
+valid: |
+  A:
+    - hogehoge
+    - hogeh
+  B:
+    - hogehog
+    - hoge
+#
+invalid: |
+  A:
+    - hogehoge!
+    - hoge
+  B:
+    - hogehoge
+    - hog
+#
+error: |
+  :length_toolong     : (line 2)[/A/0] 'hogehoge!': too long (length 9 > max 8).
+  :length_tooshortex  : (line 3)[/A/1] 'hoge': too short (length 4 <= min 4).
+  :length_toolongex   : (line 5)[/B/0] 'hogehoge': too long (length 8 >= max 8).
+  :length_tooshort    : (line 6)[/B/1] 'hog': too short (length 3 < min 4).
+#
+---
+name:  assert1
+desc:  assert test
+#
+schema: |
+  type: seq
+  sequence:
+    - type: map
+      mapping:
+       "less-than":
+          type: number
+          assert: val < 8
+       "more-than":
+          type: number
+          assert: 3 < val
+       "between":
+          type: number
+          assert: 3 < val && val < 8
+       "except":
+          type: number
+          assert: val < 3 || 8 < val
+#
+valid: |
+  - less-than: 5
+  - more-than: 5
+  - between: 5
+  - except: 0
+#
+invalid*:
+  java: ~
+  ruby: |
+    - less-than: 8
+    - more-than: 3
+    - between: 2.9
+    - except: 3.1
+#
+error: |
+  :assert_failed      : (line 1)[/0/less-than] '8': assertion expression failed (val < 8).
+  :assert_failed      : (line 2)[/1/more-than] '3': assertion expression failed (3 < val).
+  :assert_failed      : (line 3)[/2/between] '2.9': assertion expression failed (3 < val && val < 8).
+  :assert_failed      : (line 4)[/3/except] '3.1': assertion expression failed (val < 3 || 8 < val).
+#
+---
+name:  deftype1
+desc:  default type test
+#
+schema: |
+  type: seq
+  sequence:
+    - type: map
+      mapping:
+       "name":
+       "email":
+#
+valid: |
+  - name: foo
+    email: foo@mail.com
+  - name: bar
+  - email: baz@mail.com
+#
+invalid: |
+  - name: 123
+    email: true
+  - name: 3.14
+  - email: 2004-01-01
+#
+error*:
+  ruby: |
+    :type_unmatch       : (line 1)[/0/name] '123': not a string.
+    :type_unmatch       : (line 2)[/0/email] 'true': not a string.
+    :type_unmatch       : (line 3)[/1/name] '3.14': not a string.
+    :type_unmatch       : (line 4)[/2/email] '2004-01-01': not a string.
+  java: |
+    :type_unmatch       : (line 1)[/0/name] '123': not a string.
+    :type_unmatch       : (line 2)[/0/email] 'true': not a string.
+    :type_unmatch       : (line 3)[/1/name] '3.14': not a string.
+    :type_unmatch       : (line 4)[/2/email] 'Sun Feb 01 00:00:00 JST 2004': not a string.
+#
+---
+name:  ident1
+desc:  ident constraint test
+#
+schema: |
+  type: seq
+  sequence:
+    - type: map
+      mapping:
+       "name":
+          ident:  yes
+       "age":
+          type: int
+#
+valid: |
+  - name: foo
+    age:  10
+  - name: bar
+    age:  10
+  - name: baz
+    age:  10
+#
+invalid: |
+  - name: foo
+    age:  10
+  - name: bar
+    age:  10
+  - name: bar
+    age:  10
+#
+error: |
+  :value_notunique    : (line 5)[/2/name] 'bar': is already used at '/1/name'.
+#
+---
+name:  unique1
+desc:  unique constraint test with map
+#
+schema: |
+  type: seq
+  sequence:
+    - type: map
+      mapping:
+       "name":
+          unique:  yes
+       "age":
+          type: int
+#
+valid: |
+  - name: foo
+    age:  10
+  - name: bar
+    age:  10
+  - name: baz
+    age:  10
+#
+invalid: |
+  - name: foo
+    age:  10
+  - name: bar
+    age:  10
+  - name: bar
+    age:  10
+#
+error: |
+  :value_notunique    : (line 5)[/2/name] 'bar': is already used at '/1/name'.
+#
+---
+name:  unique2
+desc:  unique constraint test with seq
+#
+schema: |
+  type: seq
+  sequence:
+    - type: str
+      unique: yes
+#
+valid: |
+  - foo
+  - ~
+  - bar
+  - ~
+  - baz
+#
+invalid: |
+  - foo
+  - ~
+  - bar
+  - ~
+  - bar
+#
+error: |
+  :value_notunique    : (line 5)[/4] 'bar': is already used at '/2'.
+#
+---
+name:  default1
+desc:  default value of map
+#
+schema: |
+  type: map
+  mapping:
+    =:
+      type: number
+      range: { min: -10, max: 10 }
+#
+valid: |
+  value1: 0
+  value2: 10
+  value3: -10
+#
+invalid: |
+  value1: 0
+  value2: 20
+  value3: -20
+error: |
+  :range_toolarge     : (line 2)[/value2] '20': too large (> max 10).
+  :range_toosmall     : (line 3)[/value3] '-20': too small (< min -10).
+---
+name:  merge1
+desc:  merge maps
+#
+schema: |
+  type: map
+  mapping:
+   "group":
+      type: map
+      mapping:
+       "name": &name
+          type: str
+          required: yes
+       "email": &email
+          type: str
+          pattern: /@/
+          required: no
+   "user":
+      type: map
+      mapping:
+       "name":
+          <<: *name             # merge
+          length: { max: 16 }   # add
+       "email":
+          <<: *email            # merge
+          required: yes         # override
+#
+valid: |
+  group:
+    name: foo
+    email: foo@mail.com
+  user:
+    name:  bar
+    email: bar@mail.com
+#
+invalid: |
+  group:
+    name: foo
+    email: foo@mail.com
+  user:
+    name: toooooo-looooong-naaaame
+#
+error: |
+  :required_nokey     : (line 4)[/user] key 'email:' is required.
+  :length_toolong     : (line 5)[/user/name] 'toooooo-looooong-naaaame': too long (length 24 > max 16).
+#