kwalify 0.5.1 → 0.6.0

data/test/test-main.yaml

@@ -1,118 +1,104 @@
 ##
-## $Rev: 44 $
-## $Release: 0.5.1 $
+## $Rev: 51 $
+## $Release: 0.6.0 $
 ## copyright(c) 2005 kuwata-lab all rights reserved.
 ##
 ---
-name:  parseOptions1
-desc:  test Main#parseOptions()
-method: parseOptions
-args: [ -hvsmtlEDf, schema.yaml, document.yaml, document2.yaml ]
-inspect: |
-  command       : kwalify
-  flag_help     : true
-  flag_version  : true
-  flag_silent   : true
-  flag_meta     : true
-  flag_untabify : true
-  flag_emacs    : true
-  flag_linenum  : true
-  flag_debug    : true
-  schema_filename : schema.yaml
-  properties:
-  filenames:
-    - document.yaml
-    - document2.yaml
-#
----
-name:  parseOptions2
-desc:  -ffilename
-method: parseOptions
-args: [ -lfschema.yaml]
-inspect: |
-  command       : kwalify
-  flag_help     : false
-  flag_version  : false
-  flag_silent   : false
-  flag_meta     : false
-  flag_untabify : false
-  flag_emacs    : false
-  flag_linenum  : true
-  flag_debug    : false
-  schema_filename : schema.yaml
-  properties:
-  filenames:
-#
----
-name:  parseOptions3
-desc:  "'--help' is equal to '-h'"
-method: parseOptions
-args:  [ --help, document.yaml ]
-inspect: |
-  command       : kwalify
-  flag_help     : true
-  flag_version  : false
-  flag_silent   : false
-  flag_meta     : false
-  flag_untabify : false
-  flag_emacs    : false
-  flag_linenum  : false
-  flag_debug    : false
-  schema_filename : null
-  properties:
-    help: true
-  filenames:
-    - document.yaml
-#
----
-name:  parseOptions4
-desc:  "'-E' turns on '-l'"
-method: parseOptions
-args:  [ -E, document.yaml ]
-inspect: |
-  command       : kwalify
-  flag_help     : false
-  flag_version  : false
-  flag_silent   : false
-  flag_meta     : false
-  flag_untabify : false
-  flag_emacs    : true
-  flag_linenum  : true
-  flag_debug    : false
-  schema_filename : null
-  properties:
-  filenames:
-    - document.yaml
-#
----
-name:  optionError1
-desc:  invalid command-line option
-method: parseOptions
-args:  [ -hvi ]
-inspect: '*'
-exception*:
-  ruby: CommandOptionError
-  java: CommandOptionException
-message: "-i: invalid command option."
-error_symbol*:
-  ruby: !ruby/sym :command_option_invalid
-  java: command.option.invalid
-#
+- name:  parseOptions1
+  desc:  test Main#parseOptions()
+  method: parseOptions
+  args: [ -hvsmtlEDf, schema.yaml, -a, gemclass-ruby, -Ipath/to/dir, document.yaml, document2.yaml ]
+  expected: |
+	command: kwalify
+	options:
+	  - action: gemclass-ruby
+	  - debug: true
+	  - emacs: true
+	  - help: true
+	  - linenum: true
+	  - meta: true
+	  - schema: schema.yaml
+	  - silent: true
+	  - tpath: path/to/dir
+	  - untabify: true
+	  - version: true
+	properties:
+	filenames:
+	  - document.yaml
+	  - document2.yaml
+
+##
+- name:  parseOptions2
+  desc:  -ffilename
+  method: parseOptions
+  args: [ -lfschema.yaml, -hagenclass-ruby, -I/path/to/dir]
+  expected: |
+	command: kwalify
+	options:
+	  - action: genclass-ruby
+	  - help: true
+	  - linenum: true
+	  - schema: schema.yaml
+	  - tpath: /path/to/dir
+	properties:
+	filenames:
+
+##
+- name:  parseOptions3
+  desc:  "'--help' is equal to '-h'"
+  method: parseOptions
+  args:  [ --help, document.yaml ]
+  expected: |
+	command: kwalify
+	options:
+	  - help: true
+	properties:
+	  - help: true
+	filenames:
+	  - document.yaml
+ 
+##
+- name:  parseOptions4
+  desc:  "'-E' turns on '-l'"
+  method: parseOptions
+  args:  [ -E, document.yaml ]
+  expected: |
+	command: kwalify
+	options:
+	  - emacs: true
+	  - linenum: true
+	properties:
+	filenames:
+	  - document.yaml
+
+##
 ---
-name:  optionError2
-desc:  no argument of '-f'
-method: parseOptions
-args:  [ -f ]
-inspect: '*'
-exception*:
-  ruby: CommandOptionError
-  java: CommandOptionException
-message: "-f: schema filename is required."
-error_symbol*:
-  ruby: !ruby/sym :command_option_noschema
-  java: command.option.noschema
-#
-##---
+- name:  optionError1
+  desc:  invalid command-line option
+  method: parseOptions
+  args:  [ -hvi ]
+  inspect: '*'
+  exception*:
+    ruby: CommandOptionError
+    java: CommandOptionException
+  message: "-i: invalid command option."
+  error_symbol*:
+    ruby: !ruby/sym :command_option_invalid
+    java: command.option.invalid
+##
+- name:  optionError2
+  desc:  no argument of '-f'
+  method: parseOptions
+  args:  [ -f ]
+  inspect: '*'
+  exception*:
+    ruby: CommandOptionError
+    java: CommandOptionException
+  message: "-f: schema filename is required."
+  error_symbol*:
+    ruby: !ruby/sym :command_option_noschema
+    java: command.option.noschema
+####
 ##name:  optionError3
 ##desc:  invalid property
 ##method: parseOptions
@@ -125,91 +111,96 @@ error_symbol*:
 ##error_symbol*:
 ##  ruby: !ruby/sym :command_property_invalid
 ##  #java: command.property.invalid
----
-name:  optionError4
-desc:  action required
-method: execute
-args:  [ document.yaml ]
-inspect: '*'
-expected: |
-exception*:
-  ruby: CommandOptionError
-  java: CommandOptionException
-message: "command-line option '-f' or '-m' required."
-error_symbol*:
-  ruby: !ruby/sym :command_option_noschema
-  java: command.option.noaction
-#
----
-name:  version
-desc:  option '-v'
-method: execute
-args:  [ -vt, document.yaml ]
-expected: |
-  0.0.0
-#
----
-name:  help
-desc:  option '-h'
-method: execute
-args:  [ -hD, document.yaml ]
-expected: |
-  Usage1: kwalify [-hvstlE] -f schema.yaml doc.yaml [doc2.yaml ...]
-  Usage2: kwalify [-hvstlE] -m schema.yaml [schema2.yaml ...]
-    -h, --help      :  help
-    -v              :  version
-    -s              :  silent
-    -f schema.yaml  :  schema definition file
-    -m              :  meta-validation mode
-    -t              :  expand tab character automatically
-    -l              :  show linenumber when errored (experimental)
-    -E              :  show errors in emacs-style (implies '-l')
-#
----
-name:  silent1
-desc:  option '-s' (valid)
-method: execute
-args:  [ -sf, silent1.schema, silent1.document ]
-expected: |
-schema: |
-  type:   seq
-  sequence:
-    - type:   str
-document: |
-  - foo
-  - bar
-  - baz
-#
----
-name:  silent2
-desc:  option '-s' (invalid)
-method: execute
-args:  [ -sf, silent2.schema, silent2.document ]
-expected: |
-  silent2.document#1: INVALID
-    - [/1] '123': not a string.
-    - [/2] 'true': not a string.
-schema: |
-  type:   seq
-  sequence:
-    - type:   str
-document: |
-  - foo
-  - bar
-  - baz
-  ---
-  - foo
-  - 123
-  - true
 #
+
+##
+- name:  optionError4
+  desc:  action required
+  method: execute
+  args:  [ document.yaml ]
+  inspect: '*'
+  expected: |
+  exception*:
+    ruby: CommandOptionError
+    java: CommandOptionException
+  message: "command-line option '-f' or '-m' required."
+  error_symbol*:
+    ruby: !ruby/sym :command_option_noschema
+    java: command.option.noaction
+##
 ---
-name:  untabify
-desc:  option '-t'
-method: execute
-args:  [ -tf, untabify.schema, untabify.document ]
-expected: |
-  untabify.document#0: valid.
-schema: |
+- name:  version
+  desc:  option '-v'
+  method: execute
+  args:  [ -vt, document.yaml ]
+  expected: |
+    0.0.0
+
+##
+- name:  help
+  desc:  option '-h'
+  method: execute
+  args:  [ -hD, document.yaml ]
+  expected: |
+    kwalify - tiny schema validator for YAML and JSON
+    Usage1: kwalify [..options..] -f schema.yaml doc.yaml [doc2.yaml ...]
+    Usage2: kwalify [..options..] -m schema.yaml [schema2.yaml ...]
+    Usage3: kwalify [..options..] -a action -f schema.yaml [schema2.yaml ...]
+      -h, --help      :  help
+      -v              :  version
+      -s              :  silent
+      -f schema.yaml  :  schema definition file
+      -m              :  meta-validation mode
+      -t              :  expand tab characters
+      -l              :  show linenumber when errored (experimental)
+      -E              :  show errors in emacs-style (implies '-l')
+      -a action       :  action ('genclass-ruby' or 'genclass-java')
+                         (use '-ha action' option to show action properites)
+##
+- name:  silent1
+  desc:  option '-s' (valid)
+  method: execute
+  args:  [ -sf, silent1.schema, silent1.document ]
+  expected: |
+  schema: |
+    type:   seq
+    sequence:
+      - type:   str
+  document: |
+    - foo
+    - bar
+    - baz
+
+##
+- name:  silent2
+  desc:  option '-s' (invalid)
+  method: execute
+  args:  [ -sf, silent2.schema, silent2.document ]
+  expected: |
+    silent2.document#1: INVALID
+      - [/1] '123': not a string.
+      - [/2] 'true': not a string.
+  schema: |
+    type:   seq
+    sequence:
+      - type:   str
+  document: |
+    - foo
+    - bar
+    - baz
+    ---
+    - foo
+    - 123
+    - true
+
+##
+- name:  untabify
+  desc:  option '-t'
+  method: execute
+  args:  [ -tf, untabify.schema, untabify.document ]
+  expected: |
+    untabify.document#0: valid.
+  schema: |
         type:		seq
         sequence:
           -	type: map
@@ -220,586 +211,369 @@ schema: |
         	   "value":
         	        type: any
         	       	required:  yes
-document: |
+  document: |
         #
         	- key: foo
         	  value: 123
                 - key: bar
           	  value: [a, b, c]
-#
----
-name:  stream
-desc:  stream document
-method: validation
-schema: |
-  type:   seq
-  sequence:
-    - type:   str
-valid: |
-   ---
-   - foo
-   - bar
-   - baz
-   ---
-   - aaa
-   - bbb
-   - ccc
-valid-out: |
-  stream.valid#0: valid.
-  stream.valid#1: valid.
-invalid: |
-  ---
-  - foo
-  - 123
-  - baz
-  ---
-  - aaa
-  - bbb
-  - true
-invalid-out: |
-  stream.invalid#0: INVALID
-    - (line 3) [/1] '123': not a string.
-  stream.invalid#1: INVALID
-    - (line 8) [/2] 'true': not a string.
-#
----
-name:  meta1
-desc:  meta validation (valid)
-method: execute
-args:  [ -m, meta1.schema ]
-schema: |
-  type:   seq
-  sequence:
-    - type:   str
-document: |
-expected: |
-  meta1.schema#0: valid.
-#
----
-name:  meta2
-desc:  meta validation (invalid)
-method: execute
-args:  [ -m, meta2.schema ]
-schema: |
-  type:   map
-  sequence:
-    - type:   str
-document: |
-expected: |
-  meta2.schema#0: INVALID
-    - [/] type 'map' requires 'mapping:'.
-    - [/] 'sequence:': not available with mapping.
-#
----
-name:  emacs
-desc:  show errors in emacs style
-method: execute
-args:  [ -Ef, emacs.schema, emacs.document ]
-schema: |
-  type:   seq
-  sequence:
-    - type:   map
-      mapping:
-       "key":   { type: str, required: yes }
-       "value": { type: any }
-document: |
-  - key: one
-    value: 1
-  - key: 2
-    val: two
-  - kye: three
-    value:
-expected: |
-  emacs.document#0: INVALID
-  emacs.document:3: [/1/key] '2': not a string.
-  emacs.document:4: [/1/val] key 'val:' is undefined.
-  emacs.document:5: [/2] key 'key:' is required.
-  emacs.document:5: [/2/kye] key 'kye:' is undefined.
-#
 
-###
-### user's guide
-###
----
-name: validation01
-desc: basic validation
-method: validation
-schema: |
-  type:   seq
-  sequence:
-    - type:   str
-valid: |
-  - foo
-  - bar
-  - baz
-valid-out: |
-  validation01.valid#0: valid.
-invalid: |
-  - foo
-  - 123
-  - baz
-invalid-out: |
-  validation01.invalid#0: INVALID
-    - (line 2) [/1] '123': not a string.
-#
----
-name: validation02
-desc: basic validation
-method: validation
-schema: |
-  type:       map
-  mapping:
-    name:
-      type:      str
-      required:  yes
-    email:
-      type:      str
-      pattern:   /@/
-    age:
-      type:      int
-    birth:
-      type:      date
-valid: |
-  name:   foo
-  email:  foo@mail.com
-  age:    20
-  birth:  1985-01-01
-valid-out: |
-  validation02.valid#0: valid.
-invalid: |
-  name:   foo
-  email:  foo(at)mail.com
-  age:    twenty
-  birth:  Jun 01, 1985
-invalid-out: |
-  validation02.invalid#0: INVALID
-    - (line 2) [/email] 'foo(at)mail.com': not matched to pattern /@/.
-    - (line 3) [/age] 'twenty': not a integer.
-    - (line 4) [/birth] 'Jun 01, 1985': not a date.
-#
----
-name: validation03
-desc: sequence of mapping
-method: validation
-schema: |
-  type:      seq
-  sequence:
-    - type:      map
-      mapping:
-        name:
-          type:      str
-          required:  true
-        email:
-          type:      str
-valid: |
-  - name:   foo
-    email:  foo@mail.com
-  - name:   bar
-    email:  bar@mail.net
-  - name:   baz
-    email:  baz@mail.org
-valid-out: |
-  validation03.valid#0: valid.
-invalid: |
-  - name:   foo
-    email:  foo@mail.com
-  - naem:   bar
-    email:  bar@mail.net
-  - name:   baz
-    mail:   baz@mail.org
-invalid-out: |
-  validation03.invalid#0: INVALID
-    - (line 3) [/1] key 'name:' is required.
-    - (line 3) [/1/naem] key 'naem:' is undefined.
-    - (line 6) [/2/mail] key 'mail:' is undefined.
-#
----
-name: validation04
-desc: mapping of sequence
-method: validation
-schema: |
-  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
-valid: |
-  company:    Kuwata lab.
-  email:      webmaster@kuwata-lab.com
-  employees:
-    - code:   101
-      name:   foo
-      email:  foo@kuwata-lab.com
-    - code:   102
-      name:   bar
-      email:  bar@kuwata-lab.com
-valid-out: |
-  validation04.valid#0: valid.
-invalid: |
-  company:    Kuwata Lab.
-  email:      webmaster@kuwata-lab.com
-  employees:
-    - code:   A101
-      name:   foo
-      email:  foo@kuwata-lab.com
-    - code:   102
-      name:   bar
-      mail:   bar@kuwata-lab.com
-invalid-out: |
-  validation04.invalid#0: INVALID
-    - (line 4) [/employees/0/code] 'A101': not a integer.
-    - (line 9) [/employees/1/mail] key 'mail:' is undefined.
-#
----
-name: validation05
-desc: rule and entry
-method: validation
-schema: |
-  type:      seq                                # new rule
-  sequence:
-    - 
-      type:      map                            # new rule
-      mapping:
-        name:
-          type:       str                       # new rule
-          required:   yes
-        email:
-          type:       str                       # new rule
-          required:   yes
-          pattern:    /@/
-        password:
-          type:       str                       # new rule
-          length:     { max: 16, min: 8 }
-        age:
-          type:       int                       # new rule
-          range:      { max: 30, min: 18 }
-          # or assert: 18 <= val && val <= 30
-        blood:
-          type:       str                       # new rule
-          enum:
-            - A
-            - B
-            - O
-            - AB
-        birth:
-          type:       date                      # new rule
-        memo:
-          type:       any                       # new rule
-valid: |
-  - name:     foo
-    email:    foo@mail.com
-    password: xxx123456
-    age:      20
-    blood:    A
-    birth:    1985-01-01
-  - name:     bar
-    email:    bar@mail.net
-    age:      25
-    blood:    AB
-    birth:    1980-01-01
-valid-out: |
-  validation05.valid#0: valid.
-invalid: |
-  - name:     foo
-    email:    foo(at)mail.com
-    password: xxx123
-    age:      twenty
-    blood:    a
-    birth:    1985-01-01
-  - given-name:  bar
-    family-name: Bar
-    email:    bar@mail.net
-    age:      15
-    blood:    AB
-    birth:    1980/01/01
-invalid-out*:
-  ruby: |
-    validation05.invalid#0: INVALID
-      - (line 2) [/0/email] 'foo(at)mail.com': not matched to pattern /@/.
-      - (line 3) [/0/password] 'xxx123': too short (length 6 < min 8).
-      - (line 4) [/0/age] 'twenty': not a integer.
-      - (line 5) [/0/blood] 'a': invalid blood value.
-      - (line 7) [/1/given-name] key 'given-name:' is undefined.
-      - (line 7) [/1] key 'name:' is required.
-      - (line 8) [/1/family-name] key 'family-name:' is undefined.
-      - (line 10) [/1/age] '15': too small (< min 18).
-      - (line 12) [/1/birth] '1980/01/01': not a date.
-  java: |
-    validation05.invalid#0: INVALID
-      - (line 2) [/0/email] 'foo(at)mail.com': not matched to pattern /@/.
-      - (line 3) [/0/password] 'xxx123': too short (length 6 < min 8).
-      - (line 4) [/0/age] 'twenty': not a integer.
-      - (line 5) [/0/blood] 'a': invalid blood value.
-      - (line 7) [/1] key 'name:' is required.
-      - (line 7) [/1/given-name] key 'given-name:' is undefined.
-      - (line 8) [/1/family-name] key 'family-name:' is undefined.
-      - (line 10) [/1/age] '15': too small (< min 18).
-      - (line 12) [/1/birth] '1980/01/01': not a date.
-#
----
-name: validation06
-desc: unique constraint
-method: validation
-schema: |
-  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
-valid: |
-  - name:   foo
-    email:  admin@mail.com
-    groups:
-      - users
-      - foo
-      - admin
-  - name:   bar
-    email:  admin@mail.com
-    groups:
-      - users
-      - admin
-  - name:   baz
-    email:  baz@mail.com
-    groups:
-      - users
-valid-out: |
-  validation06.valid#0: valid.
-invalid: |
-  - name:   foo
-    email:  admin@mail.com
-    groups:
-      - foo
-      - users
-      - admin
-      - foo
-  - name:   bar
-    email:  admin@mail.com
-    groups:
-      - admin
-      - users
-  - name:   bar
-    email:  baz@mail.com
-    groups:
-      - users
-invalid-out: |
-  validation06.invalid#0: INVALID
-    - (line 7) [/0/groups/3] 'foo': is already used at '/0/groups/0'.
-    - (line 13) [/2/name] 'bar': is already used at '/1/name'.
-#
----
-name: validation12
-desc: json
-method: validation
-schema: |
-  { "type": "map",
-    "required": true,
-    "mapping": {
-      "name": {
-         "type": "str",
-         "required": true
-      },
-      "email": {
-         "type": "str"
-      },
-      "age": {
-         "type": "int"
-      },
-      "gender": {
-         "type": "str",
-         "enum": ["M", "F"]
-      },
-      "favorite": {
-         "type": "seq",
-         "sequence": [
-            { "type": "str" }
-         ]
-      }
-    }
-  }
-valid: |
-  { "name": "Foo",
-    "email": "foo@mail.com",
-    "age": 20,
-    "gender": "F",
-    "favorite": [
-       "football",
-       "basketball",
-       "baseball"
-    ]
-  }
-valid-out: |
-  validation12.valid#0: valid.
-invalid: |
-  { 
-    "mail": "foo@mail.com",
-    "age": twenty,
-    "gender": "X",
-    "favorite": [ 123, 456 ]
-  }
-invalid-out: |
-  validation12.invalid#0: INVALID
-    - (line 1) [/] key 'name:' is required.
-    - (line 2) [/mail] key 'mail:' is undefined.
-    - (line 3) [/age] 'twenty': not a integer.
-    - (line 4) [/gender] 'X': invalid gender value.
-    - (line 5) [/favorite/0] '123': not a string.
-    - (line 5) [/favorite/1] '456': not a string.
-#
----
-name: validation13
-desc: anchor and alias
-method: validation
-schema: |
-  type:   seq
-  sequence:
-    - &employee
-      type:      map
-      mapping:
-       "given-name": &name
-          type:     str
-          required: yes
-       "family-name": *name
-       "post":
-          enum:
-            - exective
-            - manager
-            - clerk
-       "supervisor":  *employee
-valid: |
-  - &foo
-    given-name:    foo
-    family-name:   Foo
-    post:          exective
-  - &bar
-    given-name:    bar
-    family-name:   Bar
-    post:          manager
-    supervisor:    *foo
-  - given-name:    baz
-    family-name:   Baz
-    post:          clerk
-    supervisor:    *bar
-  - given-name:    zak
-    family-name:   Zak
-    post:          clerk
-    supervisor:    *bar
-valid-out: |
-  validation13.valid#0: valid.
-invalid: |
-  - &foo
-    #given-name:    foo
-    family-name:   Foo
-    post:          exective
-  - &bar
-    given-name:    bar
-    family-name:   Bar
-    post:          manager
-    supervisor:    *foo
-  - given-name:    baz
-    family-name:   Baz
-    post:          clerk
-    supervisor:    *bar
-  - given-name:    zak
-    family-name:   Zak
-    post:          clerk
-    supervisor:    *bar
-invalid-out: |
-  validation13.invalid#0: INVALID
-    - (line 1) [/0] key 'given-name:' is required.
-#
----
-name: validation14
-desc: anchor and alias
-method: validation
-schema: |
-  type: map
-  mapping:
-    =:              # default rule
-      type: number
-      range: { max: 1, min: -1 }
-valid: |
-  value1: 0
-  value2: 0.5
-  value3: -0.9
-valid-out: |
-  validation14.valid#0: valid.
-invalid: |
-  value1: 0
-  value2: 1.1
-  value3: -2.0
-invalid-out: |
-  validation14.invalid#0: INVALID
-    - (line 2) [/value2] '1.1': too large (> max 1).
-    - (line 3) [/value3] '-2.0': too small (< min -1).
-#
+##
+- name:  stream
+  desc:  stream document
+  method: validation
+  schema: |
+    type:   seq
+    sequence:
+      - type:   str
+  valid: |
+     ---
+     - foo
+     - bar
+     - baz
+     ---
+     - aaa
+     - bbb
+     - ccc
+  valid_out: |
+    stream.valid#0: valid.
+    stream.valid#1: valid.
+  invalid: |
+    ---
+    - foo
+    - 123
+    - baz
+    ---
+    - aaa
+    - bbb
+    - true
+  invalid_out: |
+    stream.invalid#0: INVALID
+      - (line 3) [/1] '123': not a string.
+    stream.invalid#1: INVALID
+      - (line 8) [/2] 'true': not a string.
+
+##
+- name:  meta1
+  desc:  meta validation (valid)
+  method: execute
+  args:  [ -m, meta1.schema ]
+  schema: |
+    type:   seq
+    sequence:
+      - type:   str
+  document: |
+  expected: |
+    meta1.schema#0: valid.
+
+##
+- name:  meta2
+  desc:  meta validation (invalid)
+  method: execute
+  args:  [ -m, meta2.schema ]
+  schema: |
+    type:   map
+    sequence:
+      - type:   str
+  document: |
+  expected: |
+    meta2.schema#0: INVALID
+      - [/] type 'map' requires 'mapping:'.
+      - [/] 'sequence:': not available with mapping.
+##
+- name:  emacs
+  desc:  show errors in emacs style
+  method: execute
+  args:  [ -Ef, emacs.schema, emacs.document ]
+  schema: |
+    type:   seq
+    sequence:
+      - type:   map
+        mapping:
+         "key":   { type: str, required: yes }
+         "value": { type: any }
+  document: |
+    - key: one
+      value: 1
+    - key: 2
+      val: two
+    - kye: three
+      value:
+  expected: |
+    emacs.document#0: INVALID
+    emacs.document:3: [/1/key] '2': not a string.
+    emacs.document:4: [/1/val] key 'val:' is undefined.
+    emacs.document:5: [/2] key 'key:' is required.
+    emacs.document:5: [/2/kye] key 'kye:' is undefined.
+
+##
 ---
-name: validation15
-desc: anchor and alias
-method: validation
-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 }   # override
-       "email":
-          <<: *email            # merge
-          required: yes         # add
-valid: |
-  group:
-    name: foo
-    email: foo@mail.com
-  user:
-    name: bar
-    email: bar@mail.com
-valid-out: |
-  validation15.valid#0: valid.
-invalid: |
-  group:
-    name: foo
-    email: foo@mail.com
-  user:
-    name: toooooo-looooong-name
-invalid-out: |
-  validation15.invalid#0: INVALID
-    - (line 4) [/user] key 'email:' is required.
-    - (line 5) [/user/name] 'toooooo-looooong-name': too long (length 21 > max 16).
+- name:  action1
+  desc:  action 'genclass-ruby'
+  action: genclass-ruby
+  method: action
+  args:  [ -a, genclass-ruby, -tf, action1.schema ]
+  schema: &action1_schema |
+	type:  map
+	classname: Context
+	mapping:
+	 "groups":
+	    type:  seq
+	    sequence:
+	      - type:  map
+	        classname: Group
+	        mapping:
+		 "name":
+		    type:  str
+		    required:  yes
+		 "desc":
+		    type:  str
+		 "owner": &userschema
+		    type:  map
+		    classname: User
+		    mapping:
+		     "name":
+		        type:  str
+			required: yes
+	             "desc":
+		        type:  str
+	             "gender":
+		        type:  bool
+		     "mail":
+		        type:   str
+		     "manager": *userschema
+	 "users":
+	    type: seq
+	    sequence:
+	      - *userschema
+  document: &action1_document |
+	groups:
+	  - name:	admin
+	    desc:	administrator group
+	    owner: &root
+	      name:	root
+	      desc:	root user
+	  - name:       users
+	    desc:	user group
+	    owner: &guest
+	      name:	guest
+	      desc:	guest user
+	users:
+	  - *root
+	  - *guest
+	  - &user1
+	    name: user1
+	  - name: user2
+	    manager: *user1
+  expected: |+
+	## 
+	class Context
+	  def initialize(hash)
+	    @groups     = (v=hash['groups']) ? v.map!{|e| e.is_a?(Group) ? e : Group.new(e)} : v
+	    @users      = (v=hash['users']) ? v.map!{|e| e.is_a?(User) ? e : User.new(e)} : v
+	  end
+	  attr_accessor :groups     # seq
+	  attr_accessor :users      # seq
+	end
+	
+	## 
+	class Group
+	  def initialize(hash)
+	    @name       = hash['name']
+	    @desc       = hash['desc']
+	    @owner      = (v=hash['owner']) && v.is_a?(Hash) ? User.new(v) : v
+	  end
+	  attr_accessor :name       # str
+	  attr_accessor :desc       # str
+	  attr_accessor :owner      # map
+	end
+	
+	## 
+	class User
+	  def initialize(hash)
+	    @name       = hash['name']
+	    @gender     = hash['gender']
+	    @mail       = hash['mail']
+	    @desc       = hash['desc']
+	    @manager    = (v=hash['manager']) && v.is_a?(Hash) ? User.new(v) : v
+	  end
+	  attr_accessor :name       # str
+	  attr_accessor :gender     # bool
+	  attr_accessor :mail       # str
+	  attr_accessor :desc       # str
+	  attr_accessor :manager    # map
+	end
+
+##	
+- name:  action2
+  desc:  action 'genclass-java'
+  action: genclass-java
+  method: action
+  args:  [ -a, genclass-java, -tf, action2.schema ]
+  schema: *action1_schema
+  document: *action1_document
+  output_files: [ Context.java, Group.java, User.java ]
+  expected:
+    'Context.java': |
+	// generated by kwalify from action2.schema
+	
+	import java.util.*;
+	
+	/**
+	 *  
+	 */
+	public class Context {
+	
+	    private List _groups;
+	    private List _users;
+	
+	    public Context() {}
+	
+	    public Context(Map map) {
+	        List seq;
+	        Object obj;
+	        if ((seq = (List)map.get("groups")) != null) {
+	            for (int i = 0; i < seq.size(); i++) {
+	                if ((obj = seq.get(i)) instanceof Map) {
+	                    seq.set(i, new Group((Map)obj));
+	                }
+	            }
+	        }
+	        _groups       = seq;
+	        if ((seq = (List)map.get("users")) != null) {
+	            for (int i = 0; i < seq.size(); i++) {
+	                if ((obj = seq.get(i)) instanceof Map) {
+	                    seq.set(i, new User((Map)obj));
+	                }
+	            }
+	        }
+	        _users        = seq;
+	    }
+	
+	    public List getGroups() { return _groups; }
+	    public void setGroups(List groups_) { _groups = groups_; }
+	    public List getUsers() { return _users; }
+	    public void setUsers(List users_) { _users = users_; }
+	}
+	
+    'Group.java': |
+	// generated by kwalify from action2.schema
+	
+	import java.util.*;
+	
+	/**
+	 *  
+	 */
+	public class Group {
+	
+	    private String _name;
+	    private String _desc;
+	    private User _owner;
+	
+	    public Group() {}
+	
+	    public Group(Map map) {
+	        _name         = (String)map.get("name");
+	        _desc         = (String)map.get("desc");
+	        Object obj;
+	        if ((obj = map.get("owner")) != null && obj instanceof Map) {
+	            _owner    = new User((Map)obj);
+	        } else {
+	            _owner    = (User)obj;
+	        }
+	    }
+	
+	    public String getName() { return _name; }
+	    public void setName(String name_) { _name = name_; }
+	    public String getDesc() { return _desc; }
+	    public void setDesc(String desc_) { _desc = desc_; }
+	    public User getOwner() { return _owner; }
+	    public void setOwner(User owner_) { _owner = owner_; }
+	}
+
+    'User.java': |
+	// generated by kwalify from action2.schema
+	
+	import java.util.*;
+	
+	/**
+	 *  
+	 */
+	public class User {
+	
+	    private String _name;
+	    private boolean _gender;
+	    private String _mail;
+	    private String _desc;
+	    private User _manager;
+	
+	    public User() {}
+	
+	    public User(Map map) {
+	        _name         = (String)map.get("name");
+	        if (map.get("gender") != null) {
+	            _gender   = ((Boolean)map.get("gender")).booleanValue();
+	        }
+	        _mail         = (String)map.get("mail");
+	        _desc         = (String)map.get("desc");
+	        Object obj;
+	        if ((obj = map.get("manager")) != null && obj instanceof Map) {
+	            _manager  = new User((Map)obj);
+	        } else {
+	            _manager  = (User)obj;
+	        }
+	    }
+	
+	    public String getName() { return _name; }
+	    public void setName(String name_) { _name = name_; }
+	    public boolean getGender() { return _gender; }
+	    public void setGender(boolean gender_) { _gender = gender_; }
+	    public String getMail() { return _mail; }
+	    public void setMail(String mail_) { _mail = mail_; }
+	    public String getDesc() { return _desc; }
+	    public void setDesc(String desc_) { _desc = desc_; }
+	    public User getManager() { return _manager; }
+	    public void setManager(User manager_) { _manager = manager_; }
+	}
+
+## not used
+  main_file:
+    name:  Example.java
+    content: |
+	import kwalify.*;
+	import java.util.*;
+	
+	public class Example {
+	  public static void main(String[] args) throws Exception {
+	    String input = kwalify.Util.readFile("action2.document");
+	    input = kwalify.Util.untabify(input);
+	    YamlParser parser = new YamlParser(input);
+	    Object ydoc = parser.parse();
+	    //
+	    Context context = new Context((Map)ydoc);
+	    //
+	    List groups = context.getGroups();
+	    if (groups != null) {
+	      for (Iterator it = groups.iterator(); it.hasNext(); ) {
+	        Group g = (Group)it.next();
+	        System.out.println("group.name = " + g.getName());
+	        System.out.println("group.desc = " + g.getDesc());
+	        System.out.println("group.owner.name = " + g.getOwner().getName());
+	        System.out.println();
+	      }
+	    }
+	    //
+	    List users = context.getUsers();
+	    if (users != null) {
+	      for (Iterator it = users.iterator(); it.hasNext(); ) {
+	        User u = (User)it.next();
+	        System.out.println("user.name = " + u.getName());
+	        System.out.println("user.desc = " + u.getDesc());
+	        System.out.println("user.manager.name = " + (u.getManager() != null ? u.getManager().getName() : null));
+	        System.out.println();
+	      }
+	    }
+	  }
+	}
+
+##