995 lines
		
	
	
		
			33 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			995 lines
		
	
	
		
			33 KiB
		
	
	
	
		
			C
		
	
	
	
| // Copyright 2020 Google LLC
 | |
| //
 | |
| // Licensed under the Apache License, Version 2.0 (the "License");
 | |
| // you may not use this file except in compliance with the License.
 | |
| // You may obtain a copy of the License at
 | |
| //
 | |
| //      http://www.apache.org/licenses/LICENSE-2.0
 | |
| //
 | |
| // Unless required by applicable law or agreed to in writing, software
 | |
| // distributed under the License is distributed on an "AS IS" BASIS,
 | |
| // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 | |
| // See the License for the specific language governing permissions and
 | |
| // limitations under the License.
 | |
| 
 | |
| #include "yaml.h"
 | |
| #include "yaml_write_handler.h"
 | |
| #include <assert.h>
 | |
| #include <stdbool.h>
 | |
| #include <stdint.h>
 | |
| #include <stdio.h>
 | |
| #include <stdlib.h>
 | |
| #include <string.h>
 | |
| 
 | |
| #ifdef NDEBUG
 | |
| #undef NDEBUG
 | |
| #endif
 | |
| 
 | |
| int LLVMFuzzerTestOneInput(const uint8_t *data, size_t size) {
 | |
|   if (size < 2)
 | |
|     return 0;
 | |
| 
 | |
|   bool done = false;
 | |
|   bool is_canonical = data[0] & 1;
 | |
|   bool is_unicode = data[1] & 1;
 | |
|   data += 2;
 | |
|   size -= 2;
 | |
| 
 | |
|   yaml_parser_t parser;
 | |
|   yaml_emitter_t emitter;
 | |
|   yaml_event_t input_event;
 | |
|   yaml_event_t output_event;
 | |
| 
 | |
|   /* Initialize the parser and emitter objects. */
 | |
| 
 | |
|   if (!yaml_parser_initialize(&parser)) {
 | |
|     return 1;
 | |
|   }
 | |
| 
 | |
|   if (!yaml_emitter_initialize(&emitter)) {
 | |
|     yaml_parser_delete(&parser);
 | |
|     return 1;
 | |
|   }
 | |
| 
 | |
|   /* Set the parser parameters. */
 | |
| 
 | |
|   yaml_parser_set_input_string(&parser, data, size);
 | |
| 
 | |
|   /* Set the emitter parameters. */
 | |
|   yaml_output_buffer_t out = {/*buf=*/NULL, /*size=*/0};
 | |
|   yaml_emitter_set_output(&emitter, yaml_write_handler, &out);
 | |
| 
 | |
|   yaml_emitter_set_canonical(&emitter, is_canonical);
 | |
|   yaml_emitter_set_unicode(&emitter, is_unicode);
 | |
| 
 | |
|   /* Create and emit the STREAM-START event. */
 | |
| 
 | |
|   if (!yaml_stream_start_event_initialize(&output_event, YAML_UTF8_ENCODING))
 | |
|     goto error;
 | |
|   if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|     goto error;
 | |
| 
 | |
|   /* Create and emit the DOCUMENT-START event. */
 | |
| 
 | |
|   if (!yaml_document_start_event_initialize(&output_event, NULL, NULL, NULL, 0))
 | |
|     goto error;
 | |
|   if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|     goto error;
 | |
| 
 | |
|   /* Create and emit the SEQUENCE-START event. */
 | |
| 
 | |
|   if (!yaml_sequence_start_event_initialize(
 | |
|           &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:seq", 1,
 | |
|           YAML_BLOCK_SEQUENCE_STYLE))
 | |
|     goto error;
 | |
|   if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|     goto error;
 | |
| 
 | |
|   /* Loop through the input events. */
 | |
| 
 | |
|   while (!done) {
 | |
|     /* Get the next event. */
 | |
| 
 | |
|     if (!yaml_parser_parse(&parser, &input_event))
 | |
|       goto error;
 | |
| 
 | |
|     /* Check if this is the stream end. */
 | |
| 
 | |
|     done = (input_event.type == YAML_STREAM_END_EVENT);
 | |
| 
 | |
|     /* Create and emit a MAPPING-START event. */
 | |
| 
 | |
|     if (!yaml_mapping_start_event_initialize(
 | |
|             &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:map", 1,
 | |
|             YAML_BLOCK_MAPPING_STYLE))
 | |
|       goto error;
 | |
|     if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|       goto error;
 | |
| 
 | |
|     /* Analyze the event. */
 | |
| 
 | |
|     switch (input_event.type) {
 | |
|     case YAML_STREAM_START_EVENT:
 | |
| 
 | |
|       /* Write 'type'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"type", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write 'STREAM-START'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"STREAM-START", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Display encoding information. */
 | |
| 
 | |
|       if (input_event.data.stream_start.encoding) {
 | |
|         yaml_encoding_t encoding = input_event.data.stream_start.encoding;
 | |
| 
 | |
|         /* Write 'encoding'. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)"encoding", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write the stream encoding. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)(encoding == YAML_UTF8_ENCODING
 | |
|                                     ? "utf-8"
 | |
|                                     : encoding == YAML_UTF16LE_ENCODING
 | |
|                                           ? "utf-16-le"
 | |
|                                           : encoding == YAML_UTF16BE_ENCODING
 | |
|                                                 ? "utf-16-be"
 | |
|                                                 : "unknown"),
 | |
|                 -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
|       }
 | |
| 
 | |
|       break;
 | |
| 
 | |
|     case YAML_STREAM_END_EVENT:
 | |
| 
 | |
|       /* Write 'type'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"type", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write 'STREAM-END'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"STREAM-END", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       break;
 | |
| 
 | |
|     case YAML_DOCUMENT_START_EVENT:
 | |
| 
 | |
|       /* Write 'type'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"type", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write 'DOCUMENT-START'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(&output_event, NULL,
 | |
|                                         (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                                         (yaml_char_t *)"DOCUMENT-START", -1, 1,
 | |
|                                         1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Display the document version numbers. */
 | |
| 
 | |
|       if (input_event.data.document_start.version_directive) {
 | |
|         yaml_version_directive_t *version =
 | |
|             input_event.data.document_start.version_directive;
 | |
|         char number[64];
 | |
| 
 | |
|         /* Write 'version'. */
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)"version", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write '{'. */
 | |
| 
 | |
|         if (!yaml_mapping_start_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:map", 1,
 | |
|                 YAML_FLOW_MAPPING_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write 'major'. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)"major", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write a number. */
 | |
| 
 | |
|         sprintf(number, "%d", version->major);
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:int",
 | |
|                 (yaml_char_t *)number, -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write 'minor'. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)"minor", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write a number. */
 | |
| 
 | |
|         sprintf(number, "%d", version->minor);
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:int",
 | |
|                 (yaml_char_t *)number, -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write '}'. */
 | |
| 
 | |
|         if (!yaml_mapping_end_event_initialize(&output_event))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
|       }
 | |
| 
 | |
|       /* Display the document tag directives. */
 | |
| 
 | |
|       if (input_event.data.document_start.tag_directives.start !=
 | |
|           input_event.data.document_start.tag_directives.end) {
 | |
|         yaml_tag_directive_t *tag;
 | |
| 
 | |
|         /* Write 'tags'. */
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)"tags", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Start a block sequence. */
 | |
| 
 | |
|         if (!yaml_sequence_start_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:seq", 1,
 | |
|                 YAML_BLOCK_SEQUENCE_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         for (tag = input_event.data.document_start.tag_directives.start;
 | |
|              tag != input_event.data.document_start.tag_directives.end; tag++) {
 | |
|           /* Write '{'. */
 | |
| 
 | |
|           if (!yaml_mapping_start_event_initialize(
 | |
|                   &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:map",
 | |
|                   1, YAML_FLOW_MAPPING_STYLE))
 | |
|             goto error;
 | |
|           if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|             goto error;
 | |
| 
 | |
|           /* Write 'handle'. */
 | |
| 
 | |
|           if (!yaml_scalar_event_initialize(
 | |
|                   &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                   (yaml_char_t *)"handle", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|             goto error;
 | |
|           if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|             goto error;
 | |
| 
 | |
|           /* Write the tag directive handle. */
 | |
| 
 | |
|           if (!yaml_scalar_event_initialize(
 | |
|                   &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                   (yaml_char_t *)tag->handle, -1, 0, 1,
 | |
|                   YAML_DOUBLE_QUOTED_SCALAR_STYLE))
 | |
|             goto error;
 | |
|           if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|             goto error;
 | |
| 
 | |
|           /* Write 'prefix'. */
 | |
| 
 | |
|           if (!yaml_scalar_event_initialize(
 | |
|                   &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                   (yaml_char_t *)"prefix", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|             goto error;
 | |
|           if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|             goto error;
 | |
| 
 | |
|           /* Write the tag directive prefix. */
 | |
| 
 | |
|           if (!yaml_scalar_event_initialize(
 | |
|                   &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                   (yaml_char_t *)tag->prefix, -1, 0, 1,
 | |
|                   YAML_DOUBLE_QUOTED_SCALAR_STYLE))
 | |
|             goto error;
 | |
|           if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|             goto error;
 | |
| 
 | |
|           /* Write '}'. */
 | |
| 
 | |
|           if (!yaml_mapping_end_event_initialize(&output_event))
 | |
|             goto error;
 | |
|           if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|             goto error;
 | |
|         }
 | |
| 
 | |
|         /* End a block sequence. */
 | |
| 
 | |
|         if (!yaml_sequence_end_event_initialize(&output_event))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
|       }
 | |
| 
 | |
|       /* Write 'implicit'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"implicit", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write if the document is implicit. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:bool",
 | |
|               (yaml_char_t *)(input_event.data.document_start.implicit
 | |
|                                   ? "true"
 | |
|                                   : "false"),
 | |
|               -1, 1, 0, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       break;
 | |
| 
 | |
|     case YAML_DOCUMENT_END_EVENT:
 | |
| 
 | |
|       /* Write 'type'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"type", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write 'DOCUMENT-END'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"DOCUMENT-END", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write 'implicit'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"implicit", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write if the document is implicit. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:bool",
 | |
|               (yaml_char_t *)(input_event.data.document_end.implicit ? "true"
 | |
|                                                                      : "false"),
 | |
|               -1, 1, 0, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       break;
 | |
| 
 | |
|     case YAML_ALIAS_EVENT:
 | |
| 
 | |
|       /* Write 'type'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"type", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write 'ALIAS'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"ALIAS", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write 'anchor'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"anchor", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write the alias anchor. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(&output_event, NULL,
 | |
|                                         (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                                         input_event.data.alias.anchor, -1, 0, 1,
 | |
|                                         YAML_DOUBLE_QUOTED_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       break;
 | |
| 
 | |
|     case YAML_SCALAR_EVENT:
 | |
| 
 | |
|       /* Write 'type'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"type", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write 'SCALAR'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"SCALAR", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Display the scalar anchor. */
 | |
| 
 | |
|       if (input_event.data.scalar.anchor) {
 | |
|         /* Write 'anchor'. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)"anchor", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write the scalar anchor. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 input_event.data.scalar.anchor, -1, 0, 1,
 | |
|                 YAML_DOUBLE_QUOTED_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
|       }
 | |
| 
 | |
|       /* Display the scalar tag. */
 | |
| 
 | |
|       if (input_event.data.scalar.tag) {
 | |
|         /* Write 'tag'. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)"tag", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write the scalar tag. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 input_event.data.scalar.tag, -1, 0, 1,
 | |
|                 YAML_DOUBLE_QUOTED_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
|       }
 | |
| 
 | |
|       /* Display the scalar value. */
 | |
| 
 | |
|       /* Write 'value'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"value", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write the scalar value. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               input_event.data.scalar.value, input_event.data.scalar.length, 0,
 | |
|               1, YAML_DOUBLE_QUOTED_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Display if the scalar tag is implicit. */
 | |
| 
 | |
|       /* Write 'implicit'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"implicit", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write '{'. */
 | |
| 
 | |
|       if (!yaml_mapping_start_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:map", 1,
 | |
|               YAML_FLOW_MAPPING_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write 'plain'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"plain", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write if the scalar is implicit in the plain style. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:bool",
 | |
|               (yaml_char_t *)(input_event.data.scalar.plain_implicit ? "true"
 | |
|                                                                      : "false"),
 | |
|               -1, 1, 0, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write 'quoted'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"non-plain", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write if the scalar is implicit in a non-plain style. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:bool",
 | |
|               (yaml_char_t *)(input_event.data.scalar.quoted_implicit
 | |
|                                   ? "true"
 | |
|                                   : "false"),
 | |
|               -1, 1, 0, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write '}'. */
 | |
| 
 | |
|       if (!yaml_mapping_end_event_initialize(&output_event))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Display the style information. */
 | |
| 
 | |
|       if (input_event.data.scalar.style) {
 | |
|         yaml_scalar_style_t style = input_event.data.scalar.style;
 | |
| 
 | |
|         /* Write 'style'. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)"style", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write the scalar style. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t
 | |
|                      *)(style == YAML_PLAIN_SCALAR_STYLE
 | |
|                             ? "plain"
 | |
|                             : style == YAML_SINGLE_QUOTED_SCALAR_STYLE
 | |
|                                   ? "single-quoted"
 | |
|                                   : style == YAML_DOUBLE_QUOTED_SCALAR_STYLE
 | |
|                                         ? "double-quoted"
 | |
|                                         : style == YAML_LITERAL_SCALAR_STYLE
 | |
|                                               ? "literal"
 | |
|                                               : style ==
 | |
|                                                         YAML_FOLDED_SCALAR_STYLE
 | |
|                                                     ? "folded"
 | |
|                                                     : "unknown"),
 | |
|                 -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
|       }
 | |
| 
 | |
|       break;
 | |
| 
 | |
|     case YAML_SEQUENCE_START_EVENT:
 | |
| 
 | |
|       /* Write 'type'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"type", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write 'SEQUENCE-START'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(&output_event, NULL,
 | |
|                                         (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                                         (yaml_char_t *)"SEQUENCE-START", -1, 1,
 | |
|                                         1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Display the sequence anchor. */
 | |
| 
 | |
|       if (input_event.data.sequence_start.anchor) {
 | |
|         /* Write 'anchor'. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)"anchor", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write the sequence anchor. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 input_event.data.sequence_start.anchor, -1, 0, 1,
 | |
|                 YAML_DOUBLE_QUOTED_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
|       }
 | |
| 
 | |
|       /* Display the sequence tag. */
 | |
| 
 | |
|       if (input_event.data.sequence_start.tag) {
 | |
|         /* Write 'tag'. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)"tag", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write the sequence tag. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 input_event.data.sequence_start.tag, -1, 0, 1,
 | |
|                 YAML_DOUBLE_QUOTED_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
|       }
 | |
| 
 | |
|       /* Write 'implicit'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"implicit", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write if the sequence tag is implicit. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:bool",
 | |
|               (yaml_char_t *)(input_event.data.sequence_start.implicit
 | |
|                                   ? "true"
 | |
|                                   : "false"),
 | |
|               -1, 1, 0, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Display the style information. */
 | |
| 
 | |
|       if (input_event.data.sequence_start.style) {
 | |
|         yaml_sequence_style_t style = input_event.data.sequence_start.style;
 | |
| 
 | |
|         /* Write 'style'. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)"style", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write the scalar style. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)(style == YAML_BLOCK_SEQUENCE_STYLE
 | |
|                                     ? "block"
 | |
|                                     : style == YAML_FLOW_SEQUENCE_STYLE
 | |
|                                           ? "flow"
 | |
|                                           : "unknown"),
 | |
|                 -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
|       }
 | |
| 
 | |
|       break;
 | |
| 
 | |
|     case YAML_SEQUENCE_END_EVENT:
 | |
| 
 | |
|       /* Write 'type'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"type", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write 'SEQUENCE-END'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"SEQUENCE-END", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       break;
 | |
| 
 | |
|     case YAML_MAPPING_START_EVENT:
 | |
| 
 | |
|       /* Write 'type'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"type", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write 'MAPPING-START'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(&output_event, NULL,
 | |
|                                         (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                                         (yaml_char_t *)"MAPPING-START", -1, 1,
 | |
|                                         1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Display the mapping anchor. */
 | |
| 
 | |
|       if (input_event.data.mapping_start.anchor) {
 | |
|         /* Write 'anchor'. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)"anchor", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write the mapping anchor. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 input_event.data.mapping_start.anchor, -1, 0, 1,
 | |
|                 YAML_DOUBLE_QUOTED_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
|       }
 | |
| 
 | |
|       /* Display the mapping tag. */
 | |
| 
 | |
|       if (input_event.data.mapping_start.tag) {
 | |
|         /* Write 'tag'. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)"tag", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write the mapping tag. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 input_event.data.mapping_start.tag, -1, 0, 1,
 | |
|                 YAML_DOUBLE_QUOTED_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
|       }
 | |
| 
 | |
|       /* Write 'implicit'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"implicit", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write if the mapping tag is implicit. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:bool",
 | |
|               (yaml_char_t *)(input_event.data.mapping_start.implicit
 | |
|                                   ? "true"
 | |
|                                   : "false"),
 | |
|               -1, 1, 0, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Display the style information. */
 | |
| 
 | |
|       if (input_event.data.mapping_start.style) {
 | |
|         yaml_mapping_style_t style = input_event.data.mapping_start.style;
 | |
| 
 | |
|         /* Write 'style'. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)"style", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
| 
 | |
|         /* Write the scalar style. */
 | |
| 
 | |
|         if (!yaml_scalar_event_initialize(
 | |
|                 &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|                 (yaml_char_t *)(style == YAML_BLOCK_MAPPING_STYLE
 | |
|                                     ? "block"
 | |
|                                     : style == YAML_FLOW_MAPPING_STYLE
 | |
|                                           ? "flow"
 | |
|                                           : "unknown"),
 | |
|                 -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|           goto error;
 | |
|         if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|           goto error;
 | |
|       }
 | |
| 
 | |
|       break;
 | |
| 
 | |
|     case YAML_MAPPING_END_EVENT:
 | |
| 
 | |
|       /* Write 'type'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"type", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       /* Write 'MAPPING-END'. */
 | |
| 
 | |
|       if (!yaml_scalar_event_initialize(
 | |
|               &output_event, NULL, (yaml_char_t *)"tag:yaml.org,2002:str",
 | |
|               (yaml_char_t *)"MAPPING-END", -1, 1, 1, YAML_PLAIN_SCALAR_STYLE))
 | |
|         goto error;
 | |
|       if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|         goto error;
 | |
| 
 | |
|       break;
 | |
| 
 | |
|     default:
 | |
|       /* It couldn't really happen. */
 | |
|       break;
 | |
|     }
 | |
| 
 | |
|     /* Delete the event object. */
 | |
| 
 | |
|     yaml_event_delete(&input_event);
 | |
| 
 | |
|     /* Create and emit a MAPPING-END event. */
 | |
| 
 | |
|     if (!yaml_mapping_end_event_initialize(&output_event))
 | |
|       goto error;
 | |
|     if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|       goto error;
 | |
|   }
 | |
| 
 | |
|   /* Create and emit the SEQUENCE-END event. */
 | |
| 
 | |
|   if (!yaml_sequence_end_event_initialize(&output_event))
 | |
|     goto error;
 | |
|   if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|     goto error;
 | |
| 
 | |
|   /* Create and emit the DOCUMENT-END event. */
 | |
| 
 | |
|   if (!yaml_document_end_event_initialize(&output_event, 0))
 | |
|     goto error;
 | |
|   if (!yaml_emitter_emit(&emitter, &output_event))
 | |
|     goto error;
 | |
| 
 | |
|   /* Create and emit the STREAM-END event. */
 | |
| 
 | |
|   if (!yaml_stream_end_event_initialize(&output_event))
 | |
|     goto error;
 | |
|   yaml_emitter_emit(&emitter, &output_event);
 | |
| 
 | |
| error:
 | |
| 
 | |
|   free(out.buf);
 | |
| 
 | |
|   yaml_event_delete(&input_event);
 | |
|   yaml_parser_delete(&parser);
 | |
|   yaml_emitter_delete(&emitter);
 | |
| 
 | |
|   return 0;
 | |
| }
 |