Changeset 213 for libyaml

Show
Ignore:
Timestamp:
07/26/06 16:32:16 (6 years ago)
Author:
xi
Message:

Implement Emitter state machine.

Location:
libyaml/trunk
Files:
6 modified

Legend:

Unmodified
Added
Removed

  • libyaml/trunk/include/yaml.h

    r212 r213  
    170170 
    171171    YAML_BLOCK_MAPPING_STYLE, 
    172     YAML_FLOW_MAPPING_STYLE, 
    173     YAML_FLOW_SET_MAPPING_STYLE 
     172    YAML_FLOW_MAPPING_STYLE 
     173/*    YAML_FLOW_SET_MAPPING_STYLE   */ 
    174174} yaml_mapping_style_t; 
    175175 
    … …  
    413413 
    414414} yaml_event_t; 
     415 
     416/** 
     417 * Create the STREAM-START event. 
     418 * 
     419 * @param[in]   event       An empty event object. 
     420 * 
     421 * @returns @c 1 if the function succeeded, @c 0 on error. 
     422 */ 
     423 
     424YAML_DECLARE(int) 
     425yaml_stream_start_event_initialize(yaml_event_t *event, 
     426        yaml_encoding_t encoding); 
     427 
     428/** 
     429 * Create the STREAM-END event. 
     430 * 
     431 * @param[in]   event       An empty event object. 
     432 * 
     433 * @returns @c 1 if the function succeeded, @c 0 on error. 
     434 */ 
     435 
     436YAML_DECLARE(int) 
     437yaml_stream_end_event_initialize(yaml_event_t *event); 
     438 
     439/** 
     440 * Create the DOCUMENT-START event. 
     441 * 
     442 * The @a implicit argument is considered as a stylistic parameter and may be 
     443 * ignored by the emitter. 
     444 * 
     445 * @param[in]   event                   An empty event object. 
     446 * @param[in]   version_directive       The %YAML directive value or @c NULL. 
     447 * @param[in]   tag_directives_start    The beginning of the %TAG directives list. 
     448 * @param[in]   tag_directives_end      The end of the %TAG directives list. 
     449 * @param[in]   implicit                If the document start indicator is implicit. 
     450 * 
     451 * @returns @c 1 if the function succeeded, @c 0 on error. 
     452 */ 
     453 
     454YAML_DECLARE(int) 
     455yaml_document_start_event_initialize(yaml_event_t *event, 
     456        yaml_version_directive_t *version_directive, 
     457        yaml_tag_directive_t *tag_directives_start, 
     458        yaml_tag_directive_t *tag_directives_end, 
     459        int implicit); 
     460 
     461/** 
     462 * Create the DOCUMENT-END event. 
     463 * 
     464 * The @a implicit argument is considered as a stylistic parameter and may be 
     465 * ignored by the emitter. 
     466 * 
     467 * @param[in]   event       An empty event object. 
     468 * @param[in]   implicit    If the document end indicator is implicit. 
     469 * 
     470 * @returns @c 1 if the function succeeded, @c 0 on error. 
     471 */ 
     472 
     473YAML_DECLARE(int) 
     474yaml_document_end_event_initialize(yaml_event_t *event, int implicit); 
     475 
     476/** 
     477 * Create an ALIAS event. 
     478 * 
     479 * @param[in]   event       An empty event object. 
     480 * @param[in]   anchor      The anchor value. 
     481 * 
     482 * @returns @c 1 if the function succeeded, @c 0 on error. 
     483 */ 
     484 
     485YAML_DECLARE(int) 
     486yaml_alias_event_initialize(yaml_event_t *event, yaml_char_t *anchor); 
     487 
     488/** 
     489 * Create a SCALAR event. 
     490 * 
     491 * The @a style argument may be ignored by the emitter. 
     492 * 
     493 * Either the @a tag attribute or one of the @a plain_implicit and 
     494 * @a quoted_implicit flags must be set. 
     495 * 
     496 * @param[in]   event           An empty event object. 
     497 * @param[in]   anchor          The scalar anchor or @c NULL. 
     498 * @param[in]   tag             The scalar tag or @c NULL. 
     499 * @param[in]   value           The scalar value. 
     500 * @param[in]   length          The length of the scalar value. 
     501 * @param[in]   plain_implicit  If the tag may be omitted for the plain style. 
     502 * @param[in]   quoted_implicit If the tag may be omitted for any non-plain style. 
     503 * @param[in]   style           The scalar style. 
     504 * 
     505 * @returns @c 1 if the function succeeded, @c 0 on error. 
     506 */ 
     507 
     508YAML_DECLARE(int) 
     509yaml_scalar_event_initialize(yaml_event_t *event, 
     510        yaml_char_t *anchor, yaml_char_t *tag, 
     511        yaml_char_t *value, size_t length, 
     512        int plain_implicit, int quoted_implicit, 
     513        yaml_scalar_style_t style); 
     514 
     515/** 
     516 * Create a SEQUENCE-START event. 
     517 * 
     518 * The @a style argument may be ignored by the emitter. 
     519 * 
     520 * Either the @a tag attribute or the @a implicit flag must be set. 
     521 * 
     522 * @param[in]   event       An empty event object. 
     523 * @param[in]   anchor      The sequence anchor or @c NULL. 
     524 * @param[in]   tag         The sequence tag or @c NULL. 
     525 * @param[in]   implicit    If the tag may be omitted. 
     526 * @param[in]   style       The sequence style. 
     527 * 
     528 * @returns @c 1 if the function succeeded, @c 0 on error. 
     529 */ 
     530 
     531YAML_DECLARE(int) 
     532yaml_sequence_start_event_initialize(yaml_event_t *event, 
     533        yaml_char_t *anchor, yaml_char_t *tag, int implicit, 
     534        yaml_sequence_style_t style); 
     535 
     536/** 
     537 * Create a SEQUENCE-END event. 
     538 * 
     539 * @param[in]   event       An empty event object. 
     540 * 
     541 * @returns @c 1 if the function succeeded, @c 0 on error. 
     542 */ 
     543 
     544YAML_DECLARE(int) 
     545yaml_sequence_end_event_initialize(yaml_event_t *event); 
     546 
     547/** 
     548 * Create a MAPPING-START event. 
     549 * 
     550 * The @a style argument may be ignored by the emitter. 
     551 * 
     552 * Either the @a tag attribute or the @a implicit flag must be set. 
     553 * 
     554 * @param[in]   event       An empty event object. 
     555 * @param[in]   anchor      The mapping anchor or @c NULL. 
     556 * @param[in]   tag         The mapping tag or @c NULL. 
     557 * @param[in]   implicit    If the tag may be omitted. 
     558 * @param[in]   style       The mapping style. 
     559 * 
     560 * @returns @c 1 if the function succeeded, @c 0 on error. 
     561 */ 
     562 
     563YAML_DECLARE(int) 
     564yaml_mapping_start_event_initialize(yaml_event_t *event, 
     565        yaml_char_t *anchor, yaml_char_t *tag, int implicit, 
     566        yaml_mapping_style_t style); 
     567 
     568/** 
     569 * Create a MAPPING-END event. 
     570 * 
     571 * @param[in]   event       An empty event object. 
     572 * 
     573 * @returns @c 1 if the function succeeded, @c 0 on error. 
     574 */ 
     575 
     576YAML_DECLARE(int) 
     577yaml_mapping_end_event_initialize(yaml_event_t *event); 
    415578 
    416579/** 
    … …  
    8711034    YAML_EMIT_BLOCK_MAPPING_KEY_STATE, 
    8721035    YAML_EMIT_BLOCK_MAPPING_SIMPLE_VALUE_STATE, 
    873     YAML_EMIT_BLOCK_MAPPING_VALUE_STATE 
     1036    YAML_EMIT_BLOCK_MAPPING_VALUE_STATE, 
     1037    YAML_EMIT_END_STATE 
    8741038} yaml_emitter_state_t; 
    8751039 
    … …  
    9961160    } events; 
    9971161 
    998     /** The current event. */ 
    999     yaml_event_t event; 
    1000  
    10011162    /** The stack of indentation levels. */ 
    10021163    struct { 
    … …  
    11801341 * 
    11811342 * The event object may be generated using the @c yaml_parser_parse function. 
    1182  * The emitter will destroy the event object if the function succeeds.  If the 
    1183  * function fails, the application is responsible for destroing the event 
    1184  * object. 
     1343 * The emitter takes the responsibility for the event object and destroys its 
     1344 * content after it is emitted. The event object is destroyed even if the 
     1345 * function fails. 
    11851346 * 
    11861347 * @param[in]   emitter     An emitter object. 
    … …  
    11921353YAML_DECLARE(int) 
    11931354yaml_emitter_emit(yaml_emitter_t *emitter, yaml_event_t *event); 
    1194  
    1195 /** 
    1196  * Emit the STREAM-START event. 
    1197  * 
    1198  * @param[in]   emitter     An emitter object. 
    1199  * @param[in]   encoding    The stream encoding. 
    1200  * 
    1201  * @returns @c 1 if the function succeeded, @c 0 on error. 
    1202  */ 
    1203  
    1204 YAML_DECLARE(int) 
    1205 yaml_emitter_emit_stream_start(yaml_emitter_t *emitter, 
    1206         yaml_encoding_t encoding); 
    1207  
    1208 /** 
    1209  * Emit the STREAM-END event. 
    1210  * 
    1211  * @param[in]   emitter     An emitter object. 
    1212  * 
    1213  * @returns @c 1 if the function succeeded, @c 0 on error. 
    1214  */ 
    1215  
    1216 YAML_DECLARE(int) 
    1217 yaml_emitter_emit_stream_end(yaml_emitter_t *emitter); 
    1218  
    1219 /** 
    1220  * Emit the DOCUMENT-START event. 
    1221  * 
    1222  * The @a implicit argument is considered as a stylistic parameter and may be 
    1223  * ignored by the emitter. 
    1224  * 
    1225  * @param[in]   emitter                 An emitter object. 
    1226  * @param[in]   version_directive       The %YAML directive value or @c NULL. 
    1227  * @param[in]   tag_directives_start    The beginning of the %TAG directives list. 
    1228  * @param[in]   tag_directives_end      The end of the %TAG directives list. 
    1229  * @param[in]   implicit                If the document start indicator is implicit. 
    1230  * 
    1231  * @returns @c 1 if the function succeeded, @c 0 on error. 
    1232  */ 
    1233  
    1234 YAML_DECLARE(int) 
    1235 yaml_emitter_emit_document_start(yaml_emitter_t *emitter, 
    1236         yaml_version_directive_t *version_directive, 
    1237         yaml_tag_directive_t *tag_directives_start, 
    1238         yaml_tag_directive_t *tag_directives_end, 
    1239         int implicit); 
    1240  
    1241 /** 
    1242  * Emit the DOCUMENT-END event. 
    1243  * 
    1244  * The @a implicit argument is considered as a stylistic parameter and may be 
    1245  * ignored by the emitter. 
    1246  * 
    1247  * @param[in]   emitter     An emitter object. 
    1248  * @param[in]   implicit    If the document end indicator is implicit. 
    1249  * 
    1250  * @returns @c 1 if the function succeeded, @c 0 on error. 
    1251  */ 
    1252  
    1253 YAML_DECLARE(int) 
    1254 yaml_emitter_emit_document_end(yaml_emitter_t *emitter, int implicit); 
    1255  
    1256 /** 
    1257  * Emit an ALIAS event. 
    1258  * 
    1259  * @param[in]   emitter     An emitter object. 
    1260  * @param[in]   anchor      The anchor value. 
    1261  * 
    1262  * @returns @c 1 if the function succeeded, @c 0 on error. 
    1263  */ 
    1264  
    1265 YAML_DECLARE(int) 
    1266 yaml_emitter_emit_alias(yaml_emitter_t *emitter, yaml_char_t *anchor); 
    1267  
    1268 /** 
    1269  * Emit a SCALAR event. 
    1270  * 
    1271  * The @a style argument may be ignored by the emitter. 
    1272  * 
    1273  * Either the @a tag attribute or one of the @a plain_implicit and 
    1274  * @a quoted_implicit flags must be set. 
    1275  * 
    1276  * @param[in]   emitter         An emitter object. 
    1277  * @param[in]   anchor          The scalar anchor or @c NULL. 
    1278  * @param[in]   tag             The scalar tag or @c NULL. 
    1279  * @param[in]   value           The scalar value. 
    1280  * @param[in]   length          The length of the scalar value. 
    1281  * @param[in]   plain_implicit  If the tag may be omitted for the plain style. 
    1282  * @param[in]   quoted_implicit If the tag may be omitted for any non-plain style. 
    1283  * @param[in]   style           The scalar style. 
    1284  * 
    1285  * @returns @c 1 if the function succeeded, @c 0 on error. 
    1286  */ 
    1287  
    1288 YAML_DECLARE(int) 
    1289 yaml_emitter_emit_scalar(yaml_emitter_t *emitter, 
    1290         yaml_char_t *anchor, yaml_char_t *tag, 
    1291         yaml_char_t *value, size_t length, 
    1292         int plain_implicit, int quoted_implicit, 
    1293         yaml_scalar_style_t style); 
    1294  
    1295 /** 
    1296  * Emit a SEQUENCE-START event. 
    1297  * 
    1298  * The @a style argument may be ignored by the emitter. 
    1299  * 
    1300  * Either the @a tag attribute or the @a implicit flag must be set. 
    1301  * 
    1302  * @param[in]   emitter     An emitter object. 
    1303  * @param[in]   anchor      The sequence anchor or @c NULL. 
    1304  * @param[in]   tag         The sequence tag or @c NULL. 
    1305  * @param[in]   implicit    If the tag may be omitted. 
    1306  * @param[in]   style       The sequence style. 
    1307  * 
    1308  * @returns @c 1 if the function succeeded, @c 0 on error. 
    1309  */ 
    1310  
    1311 YAML_DECLARE(int) 
    1312 yaml_emitter_emit_sequence_start(yaml_emitter_t *emitter, 
    1313         yaml_char_t *anchor, yaml_char_t *tag, int implicit, 
    1314         yaml_sequence_style_t style); 
    1315  
    1316 /** 
    1317  * Emit a SEQUENCE-END event. 
    1318  * 
    1319  * @param[in]   emitter     An emitter object. 
    1320  * 
    1321  * @returns @c 1 if the function succeeded, @c 0 on error. 
    1322  */ 
    1323  
    1324 YAML_DECLARE(int) 
    1325 yaml_emitter_emit_sequence_end(yaml_emitter_t *emitter); 
    1326  
    1327 /** 
    1328  * Emit a MAPPING-START event. 
    1329  * 
    1330  * The @a style argument may be ignored by the emitter. 
    1331  * 
    1332  * Either the @a tag attribute or the @a implicit flag must be set. 
    1333  * 
    1334  * @param[in]   emitter     An emitter object. 
    1335  * @param[in]   anchor      The mapping anchor or @c NULL. 
    1336  * @param[in]   tag         The mapping tag or @c NULL. 
    1337  * @param[in]   implicit    If the tag may be omitted. 
    1338  * @param[in]   style       The mapping style. 
    1339  * 
    1340  * @returns @c 1 if the function succeeded, @c 0 on error. 
    1341  */ 
    1342  
    1343 YAML_DECLARE(int) 
    1344 yaml_emitter_emit_mapping_start(yaml_emitter_t *emitter, 
    1345         yaml_char_t *anchor, yaml_char_t *tag, int implicit, 
    1346         yaml_mapping_style_t style); 
    1347  
    1348 /** 
    1349  * Emit a MAPPING-END event. 
    1350  * 
    1351  * @param[in]   emitter     An emitter object. 
    1352  * 
    1353  * @returns @c 1 if the function succeeded, @c 0 on error. 
    1354  */ 
    1355  
    1356 YAML_DECLARE(int) 
    1357 yaml_emitter_emit_mapping_end(yaml_emitter_t *emitter); 
    13581355 
    13591356/** 

  • libyaml/trunk/src/api.c

    r212 r213  
    393393    } 
    394394    STACK_DEL(emitter, emitter->indents); 
    395     yaml_event_delete(&emitter->event); 
    396395    while (!STACK_EMPTY(empty, emitter->tag_directives)) { 
    397396        yaml_tag_directive_t tag_directive = POP(emitter, emitter->tag_directives); 
    … …  
    606605 
    607606    memset(token, 0, sizeof(yaml_token_t)); 
     607} 
     608 
     609/* 
     610 * Check if a string is a valid UTF-8 sequence. 
     611 * 
     612 * Check 'reader.c' for more details on UTF-8 encoding. 
     613 */ 
     614 
     615static int 
     616yaml_check_utf8(yaml_char_t *start, size_t length) 
     617{ 
     618    yaml_char_t *end = start+length; 
     619    yaml_char_t *pointer = start; 
     620 
     621    while (pointer < end) { 
     622        unsigned char octet; 
     623        unsigned int width; 
     624        unsigned int value; 
     625        int k; 
     626 
     627        octet = pointer[0]; 
     628        width = (octet & 0x80) == 0x00 ? 1 : 
     629                (octet & 0xE0) == 0xC0 ? 2 : 
     630                (octet & 0xF0) == 0xE0 ? 3 : 
     631                (octet & 0xF8) == 0xF0 ? 4 : 0; 
     632       value = (octet & 0x80) == 0x00 ? octet & 0x7F : 
     633                (octet & 0xE0) == 0xC0 ? octet & 0x1F : 
     634                (octet & 0xF0) == 0xE0 ? octet & 0x0F : 
     635                (octet & 0xF8) == 0xF0 ? octet & 0x07 : 0; 
     636        if (!width) return 0; 
     637        if (pointer+width > end) return 0; 
     638        for (k = 1; k < width; k ++) { 
     639            octet = pointer[k]; 
     640            if ((octet & 0xC0) != 0x80) return 0; 
     641            value = (value << 6) + (octet & 0x3F); 
     642        } 
     643        if (!((width == 1) || 
     644            (width == 2 && value >= 0x80) || 
     645            (width == 3 && value >= 0x800) || 
     646            (width == 4 && value >= 0x10000))) return 0; 
     647 
     648        pointer += width; 
     649    } 
     650 
     651    return 1; 
     652} 
     653 
     654/* 
     655 * Create STREAM-START. 
     656 */ 
     657 
     658YAML_DECLARE(int) 
     659yaml_stream_start_event_initialize(yaml_event_t *event, 
     660        yaml_encoding_t encoding) 
     661{ 
     662    yaml_mark_t mark = { 0, 0, 0 }; 
     663 
     664    assert(event);  /* Non-NULL event object is expected. */ 
     665 
     666    STREAM_START_EVENT_INIT(*event, encoding, mark, mark); 
     667 
     668    return 1; 
     669} 
     670 
     671/* 
     672 * Create STREAM-END. 
     673 */ 
     674 
     675YAML_DECLARE(int) 
     676yaml_stream_end_event_initialize(yaml_event_t *event) 
     677{ 
     678    yaml_mark_t mark = { 0, 0, 0 }; 
     679 
     680    assert(event);  /* Non-NULL event object is expected. */ 
     681 
     682    STREAM_END_EVENT_INIT(*event, mark, mark); 
     683 
     684    return 1; 
     685} 
     686 
     687/* 
     688 * Create DOCUMENT-START. 
     689 */ 
     690 
     691YAML_DECLARE(int) 
     692yaml_document_start_event_initialize(yaml_event_t *event, 
     693        yaml_version_directive_t *version_directive, 
     694        yaml_tag_directive_t *tag_directives_start, 
     695        yaml_tag_directive_t *tag_directives_end, 
     696        int implicit) 
     697{ 
     698    struct { 
     699        yaml_error_type_t error; 
     700    } context; 
     701    yaml_mark_t mark = { 0, 0, 0 }; 
     702    yaml_version_directive_t *version_directive_copy = NULL; 
     703    struct { 
     704        yaml_tag_directive_t *start; 
     705        yaml_tag_directive_t *end; 
     706        yaml_tag_directive_t *top; 
     707    } tag_directives_copy = { NULL, NULL, NULL }; 
     708    yaml_tag_directive_t value = { NULL, NULL }; 
     709 
     710    assert(event);          /* Non-NULL event object is expected. */ 
     711    assert((tag_directives_start && tag_directives_end) || 
     712            (tag_directives_start == tag_directives_end)); 
     713                            /* Valid tag directives are expected. */ 
     714 
     715    if (version_directive) { 
     716        version_directive_copy = yaml_malloc(sizeof(yaml_version_directive_t)); 
     717        if (!version_directive_copy) goto error; 
     718        version_directive_copy->major = version_directive->major; 
     719        version_directive_copy->minor = version_directive->minor; 
     720    } 
     721 
     722    if (tag_directives_start != tag_directives_end) { 
     723        yaml_tag_directive_t *tag_directive; 
     724        if (!STACK_INIT(&context, tag_directives_copy, INITIAL_STACK_SIZE)) 
     725            goto error; 
     726        for (tag_directive = tag_directives_start; 
     727                tag_directive != tag_directives_end; tag_directive ++) { 
     728            assert(tag_directive->handle); 
     729            assert(tag_directive->prefix); 
     730            if (!yaml_check_utf8(tag_directive->handle, 
     731                        strlen((char *)tag_directive->handle))) 
     732                goto error; 
     733            if (!yaml_check_utf8(tag_directive->prefix, 
     734                        strlen((char *)tag_directive->prefix))) 
     735                goto error; 
     736            value.handle = yaml_strdup(tag_directive->handle); 
     737            value.prefix = yaml_strdup(tag_directive->prefix); 
     738            if (!value.handle || !value.prefix) goto error; 
     739            if (!PUSH(&context, tag_directives_copy, value)) 
     740                goto error; 
     741            value.handle = NULL; 
     742            value.prefix = NULL; 
     743        } 
     744    } 
     745 
     746    DOCUMENT_START_EVENT_INIT(*event, version_directive_copy, 
     747            tag_directives_copy.start, tag_directives_copy.end, 
     748            implicit, mark, mark); 
     749 
     750    return 1; 
     751 
     752error: 
     753    yaml_free(version_directive_copy); 
     754    while (!STACK_EMPTY(context, tag_directives_copy)) { 
     755        yaml_tag_directive_t value = POP(context, tag_directives_copy); 
     756        yaml_free(value.handle); 
     757        yaml_free(value.prefix); 
     758    } 
     759    STACK_DEL(context, tag_directives_copy); 
     760    yaml_free(value.handle); 
     761    yaml_free(value.prefix); 
     762 
     763    return 0; 
     764} 
     765 
     766/* 
     767 * Create DOCUMENT-END. 
     768 */ 
     769 
     770YAML_DECLARE(int) 
     771yaml_document_end_event_initialize(yaml_event_t *event, int implicit) 
     772{ 
     773    yaml_mark_t mark = { 0, 0, 0 }; 
     774 
     775    assert(event);      /* Non-NULL emitter object is expected. */ 
     776 
     777    DOCUMENT_END_EVENT_INIT(*event, implicit, mark, mark); 
     778 
     779    return 1; 
     780} 
     781 
     782/* 
     783 * Create ALIAS. 
     784 */ 
     785 
     786YAML_DECLARE(int) 
     787yaml_alias_event_initialize(yaml_event_t *event, yaml_char_t *anchor) 
     788{ 
     789    yaml_mark_t mark = { 0, 0, 0 }; 
     790    yaml_char_t *anchor_copy = NULL; 
     791 
     792    assert(event);      /* Non-NULL event object is expected. */ 
     793    assert(anchor);     /* Non-NULL anchor is expected. */ 
     794 
     795    if (!yaml_check_utf8(anchor, strlen((char *)anchor))) return 0; 
     796 
     797    anchor_copy = yaml_strdup(anchor); 
     798    if (!anchor_copy) 
     799        return 0; 
     800 
     801    ALIAS_EVENT_INIT(*event, anchor_copy, mark, mark); 
     802 
     803    return 1; 
     804} 
     805 
     806/* 
     807 * Create SCALAR. 
     808 */ 
     809 
     810YAML_DECLARE(int) 
     811yaml_scalar_event_initialize(yaml_event_t *event, 
     812        yaml_char_t *anchor, yaml_char_t *tag, 
     813        yaml_char_t *value, size_t length, 
     814        int plain_implicit, int quoted_implicit, 
     815        yaml_scalar_style_t style) 
     816{ 
     817    yaml_mark_t mark = { 0, 0, 0 }; 
     818    yaml_char_t *anchor_copy = NULL; 
     819    yaml_char_t *tag_copy = NULL; 
     820    yaml_char_t *value_copy = NULL; 
     821 
     822    assert(event);      /* Non-NULL event object is expected. */ 
     823    assert(value);      /* Non-NULL anchor is expected. */ 
     824 
     825 
     826    if (anchor) { 
     827        if (!yaml_check_utf8(anchor, strlen((char *)anchor))) goto error; 
     828        anchor_copy = yaml_strdup(anchor); 
     829        if (!anchor_copy) goto error; 
     830    } 
     831 
     832    if (tag) { 
     833        if (!yaml_check_utf8(tag, strlen((char *)tag))) goto error; 
     834        tag_copy = yaml_strdup(tag); 
     835        if (!tag_copy) goto error; 
     836    } 
     837 
     838    if (!yaml_check_utf8(value, length)) goto error; 
     839    value_copy = yaml_malloc(length+1); 
     840    if (!value_copy) goto error; 
     841    memcpy(value_copy, value, length); 
     842    value_copy[length] = '\0'; 
     843 
     844    SCALAR_EVENT_INIT(*event, anchor_copy, tag_copy, value_copy, length, 
     845            plain_implicit, quoted_implicit, style, mark, mark); 
     846 
     847    return 1; 
     848 
     849error: 
     850    yaml_free(anchor_copy); 
     851    yaml_free(tag_copy); 
     852    yaml_free(value_copy); 
     853 
     854    return 0; 
     855} 
     856 
     857/* 
     858 * Create SEQUENCE-START. 
     859 */ 
     860 
     861YAML_DECLARE(int) 
     862yaml_sequence_start_event_initialize(yaml_event_t *event, 
     863        yaml_char_t *anchor, yaml_char_t *tag, int implicit, 
     864        yaml_sequence_style_t style) 
     865{ 
     866    yaml_mark_t mark = { 0, 0, 0 }; 
     867    yaml_char_t *anchor_copy = NULL; 
     868    yaml_char_t *tag_copy = NULL; 
     869 
     870    assert(event);      /* Non-NULL event object is expected. */ 
     871 
     872    if (anchor) { 
     873        if (!yaml_check_utf8(anchor, strlen((char *)anchor))) goto error; 
     874        anchor_copy = yaml_strdup(anchor); 
     875        if (!anchor_copy) goto error; 
     876    } 
     877 
     878    if (tag) { 
     879        if (!yaml_check_utf8(tag, strlen((char *)tag))) goto error; 
     880        tag_copy = yaml_strdup(tag); 
     881        if (!tag_copy) goto error; 
     882    } 
     883 
     884    SEQUENCE_START_EVENT_INIT(*event, anchor_copy, tag_copy, 
     885            implicit, style, mark, mark); 
     886 
     887    return 1; 
     888 
     889error: 
     890    yaml_free(anchor_copy); 
     891    yaml_free(tag_copy); 
     892 
     893    return 0; 
     894} 
     895 
     896/* 
     897 * Create SEQUENCE-END. 
     898 */ 
     899 
     900YAML_DECLARE(int) 
     901yaml_sequence_end_event_initialize(yaml_event_t *event) 
     902{ 
     903    yaml_mark_t mark = { 0, 0, 0 }; 
     904 
     905    assert(event);      /* Non-NULL event object is expected. */ 
     906 
     907    SEQUENCE_END_EVENT_INIT(*event, mark, mark); 
     908 
     909    return 1; 
     910} 
     911 
     912/* 
     913 * Create MAPPING-START. 
     914 */ 
     915 
     916YAML_DECLARE(int) 
     917yaml_mapping_start_event_initialize(yaml_event_t *event, 
     918        yaml_char_t *anchor, yaml_char_t *tag, int implicit, 
     919        yaml_mapping_style_t style) 
     920{ 
     921    yaml_mark_t mark = { 0, 0, 0 }; 
     922    yaml_char_t *anchor_copy = NULL; 
     923    yaml_char_t *tag_copy = NULL; 
     924 
     925    assert(event);      /* Non-NULL event object is expected. */ 
     926 
     927    if (anchor) { 
     928        if (!yaml_check_utf8(anchor, strlen((char *)anchor))) goto error; 
     929        anchor_copy = yaml_strdup(anchor); 
     930        if (!anchor_copy) goto error; 
     931    } 
     932 
     933    if (tag) { 
     934        if (!yaml_check_utf8(tag, strlen((char *)tag))) goto error; 
     935        tag_copy = yaml_strdup(tag); 
     936        if (!tag_copy) goto error; 
     937    } 
     938 
     939    MAPPING_START_EVENT_INIT(*event, anchor_copy, tag_copy, 
     940            implicit, style, mark, mark); 
     941 
     942    return 1; 
     943 
     944error: 
     945    yaml_free(anchor_copy); 
     946    yaml_free(tag_copy); 
     947 
     948    return 0; 
     949} 
     950 
     951/* 
     952 * Create MAPPING-END. 
     953 */ 
     954 
     955YAML_DECLARE(int) 
     956yaml_mapping_end_event_initialize(yaml_event_t *event) 
     957{ 
     958    yaml_mark_t mark = { 0, 0, 0 }; 
     959 
     960    assert(event);      /* Non-NULL event object is expected. */ 
     961 
     962    MAPPING_END_EVENT_INIT(*event, mark, mark); 
     963 
     964    return 1; 
    608965} 
    609966 

  • libyaml/trunk/src/emitter.c

    r212 r213  
    99yaml_emitter_emit(yaml_emitter_t *emitter, yaml_event_t *event); 
    1010 
    11 YAML_DECLARE(int) 
     11/* 
     12 * Utility functions. 
     13 */ 
     14 
     15static int 
     16yaml_emitter_set_emitter_error(yaml_emitter_t *emitter, const char *problem); 
     17 
     18static int 
     19yaml_emitter_need_more_events(yaml_emitter_t *emitter); 
     20 
     21static int 
     22yaml_emitter_append_tag_directive(yaml_emitter_t *emitter, 
     23        yaml_tag_directive_t value, int allow_duplicates); 
     24 
     25static int 
     26yaml_emitter_increase_indent(yaml_emitter_t *emitter, 
     27        int flow, int indentless); 
     28 
     29/* 
     30 * State functions. 
     31 */ 
     32 
     33static int 
     34yaml_emitter_state_machine(yaml_emitter_t *emitter, yaml_event_t *event); 
     35 
     36static int 
    1237yaml_emitter_emit_stream_start(yaml_emitter_t *emitter, 
    13         yaml_encoding_t encoding); 
    14  
    15 YAML_DECLARE(int) 
    16 yaml_emitter_emit_stream_end(yaml_emitter_t *emitter); 
    17  
    18 YAML_DECLARE(int) 
     38        yaml_event_t *event); 
     39 
     40static int 
    1941yaml_emitter_emit_document_start(yaml_emitter_t *emitter, 
    20         yaml_version_directive_t *version_directive, 
    21         yaml_tag_directive_t *tag_directives_start, 
    22         yaml_tag_directive_t *tag_directives_end, 
    23         int implicit); 
    24  
    25 YAML_DECLARE(int) 
    26 yaml_emitter_emit_document_end(yaml_emitter_t *emitter, int implicit); 
    27  
    28 YAML_DECLARE(int) 
    29 yaml_emitter_emit_alias(yaml_emitter_t *emitter, yaml_char_t *anchor); 
    30  
    31 YAML_DECLARE(int) 
    32 yaml_emitter_emit_scalar(yaml_emitter_t *emitter, 
    33         yaml_char_t *anchor, yaml_char_t *tag, 
     42        yaml_event_t *event, int first); 
     43 
     44static int 
     45yaml_emitter_emit_document_content(yaml_emitter_t *emitter, 
     46        yaml_event_t *event); 
     47 
     48static int 
     49yaml_emitter_emit_document_end(yaml_emitter_t *emitter, 
     50        yaml_event_t *event); 
     51 
     52static int 
     53yaml_emitter_emit_flow_sequence_item(yaml_emitter_t *emitter, 
     54        yaml_event_t *event, int first); 
     55 
     56static int 
     57yaml_emitter_emit_flow_mapping_key(yaml_emitter_t *emitter, 
     58        yaml_event_t *event, int first); 
     59 
     60static int 
     61yaml_emitter_emit_flow_mapping_value(yaml_emitter_t *emitter, 
     62        yaml_event_t *event, int simple); 
     63 
     64static int 
     65yaml_emitter_emit_block_sequence_item(yaml_emitter_t *emitter, 
     66        yaml_event_t *event, int first); 
     67 
     68static int 
     69yaml_emitter_emit_block_mapping_key(yaml_emitter_t *emitter, 
     70        yaml_event_t *event, int first); 
     71 
     72static int 
     73yaml_emitter_emit_block_mapping_value(yaml_emitter_t *emitter, 
     74        yaml_event_t *event, int simple); 
     75 
     76static int 
     77yaml_emitter_emit_node(yaml_emitter_t *emitter, yaml_event_t *event, 
     78        int root, int sequence, int mapping, int simple_key); 
     79 
     80static int 
     81yaml_emitter_emit_alias(yaml_emitter_t *emitter, yaml_event_t *event); 
     82 
     83static int 
     84yaml_emitter_emit_scalar(yaml_emitter_t *emitter, yaml_event_t *event); 
     85 
     86static int 
     87yaml_emitter_emit_sequence_start(yaml_emitter_t *emitter, yaml_event_t *event); 
     88 
     89static int 
     90yaml_emitter_emit_mapping_start(yaml_emitter_t *emitter, yaml_event_t *event); 
     91 
     92/* 
     93 * Checkers. 
     94 */ 
     95 
     96static int 
     97yaml_emitter_check_empty_document(yaml_emitter_t *emitter); 
     98 
     99static int 
     100yaml_emitter_check_empty_sequence(yaml_emitter_t *emitter); 
     101 
     102static int 
     103yaml_emitter_check_empty_mapping(yaml_emitter_t *emitter); 
     104 
     105static int 
     106yaml_emitter_check_simple_key(yaml_emitter_t *emitter); 
     107 
     108/* 
     109 * Processors. 
     110 */ 
     111 
     112static int 
     113yaml_emitter_process_anchor(yaml_emitter_t *emitter, 
     114        yaml_char_t *anchor, int alias); 
     115 
     116static int 
     117yaml_emitter_process_tag(yaml_emitter_t *emitter, 
     118        yaml_char_t *tag); 
     119 
     120static int 
     121yaml_emitter_process_scalar(yaml_emitter_t *emitter, 
    34122        yaml_char_t *value, size_t length, 
    35123        int plain_implicit, int quoted_implicit, 
    36124        yaml_scalar_style_t style); 
    37125 
     126/* 
     127 * Writers. 
     128 */ 
     129 
     130static int 
     131yaml_emitter_write_bom(yaml_emitter_t *emitter); 
     132 
     133static int 
     134yaml_emitter_write_version_directive(yaml_emitter_t *emitter, 
     135        yaml_version_directive_t version_directive); 
     136 
     137static int 
     138yaml_emitter_write_tag_directive(yaml_emitter_t *emitter, 
     139        yaml_tag_directive_t tag_directive); 
     140 
     141static int 
     142yaml_emitter_write_indent(yaml_emitter_t *emitter); 
     143 
     144static int 
     145yaml_emitter_write_indicator(yaml_emitter_t *emitter, 
     146        char *indicator, int need_whitespace, 
     147        int is_whitespace, int is_indention); 
     148 
     149/* 
     150 * Set an emitter error and return 0. 
     151 */ 
     152 
     153static int 
     154yaml_emitter_set_emitter_error(yaml_emitter_t *emitter, const char *problem) 
     155{ 
     156    emitter->error = YAML_EMITTER_ERROR; 
     157    emitter->problem = problem; 
     158 
     159    return 0; 
     160} 
     161 
     162/* 
     163 * Emit an event. 
     164 */ 
     165 
    38166YAML_DECLARE(int) 
    39 yaml_emitter_emit_sequence_start(yaml_emitter_t *emitter, 
    40         yaml_char_t *anchor, yaml_char_t *tag, int implicit, 
    41         yaml_sequence_style_t style); 
    42  
    43 YAML_DECLARE(int) 
    44 yaml_emitter_emit_sequence_end(yaml_emitter_t *emitter); 
    45  
    46 YAML_DECLARE(int) 
    47 yaml_emitter_emit_mapping_start(yaml_emitter_t *emitter, 
    48         yaml_char_t *anchor, yaml_char_t *tag, int implicit, 
    49         yaml_mapping_style_t style); 
    50  
    51 YAML_DECLARE(int) 
    52 yaml_emitter_emit_mapping_end(yaml_emitter_t *emitter); 
    53  
    54 /* 
    55  * Emit STREAM-START. 
    56  */ 
    57  
    58 YAML_DECLARE(int) 
    59 yaml_emitter_emit_stream_start(yaml_emitter_t *emitter, 
    60         yaml_encoding_t encoding) 
    61 { 
    62     yaml_event_t event; 
    63     yaml_mark_t mark = { 0, 0, 0 }; 
    64  
    65     assert(emitter);    /* Non-NULL emitter object is expected. */ 
    66  
    67     STREAM_START_EVENT_INIT(event, encoding, mark, mark); 
    68  
    69     return yaml_emitter_emit(emitter, &event); 
    70 } 
    71  
    72 /* 
    73  * Emit STREAM-END. 
    74  */ 
    75  
    76 YAML_DECLARE(int) 
    77 yaml_emitter_emit_stream_end(yaml_emitter_t *emitter) 
    78 { 
    79     yaml_event_t event; 
    80     yaml_mark_t mark = { 0, 0, 0 }; 
    81  
    82     assert(emitter);    /* Non-NULL emitter object is expected. */ 
    83  
    84     STREAM_END_EVENT_INIT(event, mark, mark); 
    85  
    86     return yaml_emitter_emit(emitter, &event); 
    87 } 
    88  
    89 /* 
    90  * Emit DOCUMENT-START. 
    91  */ 
    92  
    93 YAML_DECLARE(int) 
    94 yaml_emitter_emit_document_start(yaml_emitter_t *emitter, 
    95         yaml_version_directive_t *version_directive, 
    96         yaml_tag_directive_t *tag_directives_start, 
    97         yaml_tag_directive_t *tag_directives_end, 
    98         int implicit) 
    99 { 
    100     yaml_event_t event; 
    101     yaml_mark_t mark = { 0, 0, 0 }; 
    102     yaml_version_directive_t *version_directive_copy = NULL; 
    103     struct { 
    104         yaml_tag_directive_t *start; 
    105         yaml_tag_directive_t *end; 
    106         yaml_tag_directive_t *top; 
    107     } tag_directives_copy = { NULL, NULL, NULL }; 
    108     yaml_tag_directive_t value = { NULL, NULL }; 
    109  
    110     assert(emitter);        /* Non-NULL emitter object is expected. */ 
    111     assert((tag_directives_start && tag_directives_end) || 
    112             (tag_directives_start == tag_directives_end)); 
    113                             /* Valid tag directives are expected. */ 
    114  
    115     if (version_directive) { 
    116         version_directive_copy = yaml_malloc(sizeof(yaml_version_directive_t)); 
    117         if (!version_directive_copy) { 
    118             emitter->error = YAML_MEMORY_ERROR; 
    119             goto error; 
    120         } 
    121         version_directive_copy->major = version_directive->major; 
    122         version_directive_copy->minor = version_directive->minor; 
    123     } 
    124  
    125     if (tag_directives_start != tag_directives_end) { 
    126         yaml_tag_directive_t *tag_directive; 
    127         if (!STACK_INIT(emitter, tag_directives_copy, INITIAL_STACK_SIZE)) 
    128             goto error; 
    129         for (tag_directive = tag_directives_start; 
    130                 tag_directive != tag_directives_end; tag_directive ++) { 
    131             value.handle = yaml_strdup(tag_directive->handle); 
    132             value.prefix = yaml_strdup(tag_directive->prefix); 
    133             if (!value.handle || !value.prefix) { 
    134                 emitter->error = YAML_MEMORY_ERROR; 
    135                 goto error; 
    136             } 
    137             if (!PUSH(emitter, tag_directives_copy, value)) 
    138                 goto error; 
    139             value.handle = NULL; 
    140             value.prefix = NULL; 
    141         } 
    142     } 
    143  
    144     DOCUMENT_START_EVENT_INIT(event, version_directive_copy, 
    145             tag_directives_copy.start, tag_directives_copy.end, 
    146             implicit, mark, mark); 
    147  
    148     if (yaml_emitter_emit(emitter, &event)) { 
     167yaml_emitter_emit(yaml_emitter_t *emitter, yaml_event_t *event) 
     168{ 
     169    if (!ENQUEUE(emitter, emitter->events, *event)) { 
     170        yaml_event_delete(event); 
     171        return 0; 
     172    } 
     173 
     174    while (!yaml_emitter_need_more_events(emitter)) { 
     175        if (!yaml_emitter_state_machine(emitter, emitter->events.head)) { 
     176            return 0; 
     177        } 
     178        DEQUEUE(emitter, emitter->events); 
     179    } 
     180 
     181    return 1; 
     182} 
     183 
     184/* 
     185 * Check if we need to accumulate more events before emitting. 
     186 * 
     187 * We accumulate extra 
     188 *  - 1 event for DOCUMENT-START 
     189 *  - 2 events for SEQUENCE-START 
     190 *  - 3 events for MAPPING-START 
     191 */ 
     192 
     193static int 
     194yaml_emitter_need_more_events(yaml_emitter_t *emitter) 
     195{ 
     196    int level = 0; 
     197    int accumulate = 0; 
     198    yaml_event_t *event; 
     199 
     200    if (QUEUE_EMPTY(emitter, emitter->events)) 
    149201        return 1; 
    150     } 
    151  
    152 error: 
    153     yaml_free(version_directive_copy); 
    154     while (!STACK_EMPTY(emitter, tag_directives_copy)) { 
    155         yaml_tag_directive_t value = POP(emitter, tag_directives_copy); 
    156         yaml_free(value.handle); 
    157         yaml_free(value.prefix); 
    158     } 
    159     STACK_DEL(emitter, tag_directives_copy); 
    160     yaml_free(value.handle); 
    161     yaml_free(value.prefix); 
    162  
    163     return 0; 
    164 } 
    165  
    166 /* 
    167  * Emit DOCUMENT-END. 
    168  */ 
    169  
    170 YAML_DECLARE(int) 
    171 yaml_emitter_emit_document_end(yaml_emitter_t *emitter, int implicit) 
    172 { 
    173     yaml_event_t event; 
    174     yaml_mark_t mark = { 0, 0, 0 }; 
    175  
    176     assert(emitter);    /* Non-NULL emitter object is expected. */ 
    177  
    178     DOCUMENT_END_EVENT_INIT(event, implicit, mark, mark); 
    179  
    180     return yaml_emitter_emit(emitter, &event); 
    181 } 
    182  
    183 /* 
    184  * Emit ALIAS. 
    185  */ 
    186  
    187 YAML_DECLARE(int) 
    188 yaml_emitter_emit_alias(yaml_emitter_t *emitter, yaml_char_t *anchor) 
    189 { 
    190     yaml_event_t event; 
    191     yaml_mark_t mark = { 0, 0, 0 }; 
    192     yaml_char_t *anchor_copy = NULL; 
    193  
    194     assert(emitter);    /* Non-NULL emitter object is expected. */ 
    195     assert(anchor);     /* Non-NULL anchor is expected. */ 
    196  
    197     anchor_copy = yaml_strdup(anchor); 
    198     if (!anchor_copy) { 
    199         emitter->error = YAML_MEMORY_ERROR; 
    200         return 0; 
    201     } 
    202  
    203     ALIAS_EVENT_INIT(event, anchor_copy, mark, mark); 
    204  
    205     if (yaml_emitter_emit(emitter, &event)) { 
    206         return 1; 
    207     } 
    208  
    209     yaml_free(anchor_copy); 
    210  
    211     return 0; 
    212 } 
    213  
    214 /* 
    215  * Emit SCALAR. 
    216  */ 
    217  
    218 YAML_DECLARE(int) 
    219 yaml_emitter_emit_scalar(yaml_emitter_t *emitter, 
    220         yaml_char_t *anchor, yaml_char_t *tag, 
    221         yaml_char_t *value, size_t length, 
    222         int plain_implicit, int quoted_implicit, 
    223         yaml_scalar_style_t style) 
    224 { 
    225     yaml_event_t event; 
    226     yaml_mark_t mark = { 0, 0, 0 }; 
    227     yaml_char_t *anchor_copy = NULL; 
    228     yaml_char_t *tag_copy = NULL; 
    229     yaml_char_t *value_copy = NULL; 
    230  
    231     assert(emitter);    /* Non-NULL emitter object is expected. */ 
    232     assert(value);      /* Non-NULL anchor is expected. */ 
    233  
    234     if (anchor) { 
    235         anchor_copy = yaml_strdup(anchor); 
    236         if (!anchor_copy) { 
    237             emitter->error = YAML_MEMORY_ERROR; 
    238             goto error; 
    239         } 
    240     } 
    241  
    242     if (tag) { 
    243         tag_copy = yaml_strdup(tag); 
    244         if (!tag_copy) { 
    245             emitter->error = YAML_MEMORY_ERROR; 
    246             goto error; 
    247         } 
    248     } 
    249  
    250     value_copy = yaml_malloc(length+1); 
    251     if (!value_copy) { 
     202 
     203    switch (emitter->events.head->type) { 
     204        case YAML_DOCUMENT_START_EVENT: 
     205            accumulate = 1; 
     206            break; 
     207        case YAML_SEQUENCE_START_EVENT: 
     208            accumulate = 2; 
     209            break; 
     210        case YAML_MAPPING_START_EVENT: 
     211            accumulate = 3; 
     212            break; 
     213        default: 
     214            return 0; 
     215    } 
     216 
     217    if (emitter->events.tail - emitter->events.head > accumulate) 
     218        return 0; 
     219 
     220    for (event = emitter->events.head; event != emitter->events.tail; event ++) { 
     221        switch (event->type) { 
     222            case YAML_STREAM_START_EVENT: 
     223            case YAML_DOCUMENT_START_EVENT: 
     224            case YAML_SEQUENCE_START_EVENT: 
     225            case YAML_MAPPING_START_EVENT: 
     226                level += 1; 
     227                break; 
     228            case YAML_STREAM_END_EVENT: 
     229            case YAML_DOCUMENT_END_EVENT: 
     230            case YAML_SEQUENCE_END_EVENT: 
     231            case YAML_MAPPING_END_EVENT: 
     232                level -= 1; 
     233                break; 
     234            default: 
     235                break; 
     236        } 
     237        if (!level) 
     238            return 0; 
     239    } 
     240 
     241    return 1; 
     242} 
     243 
     244/* 
     245 * Append a directive to the directives stack. 
     246 */ 
     247 
     248static int 
     249yaml_emitter_append_tag_directive(yaml_emitter_t *emitter, 
     250        yaml_tag_directive_t value, int allow_duplicates) 
     251{ 
     252    yaml_tag_directive_t *tag_directive; 
     253    yaml_tag_directive_t copy = { NULL, NULL }; 
     254 
     255    for (tag_directive = emitter->tag_directives.start; 
     256            tag_directive != emitter->tag_directives.top; tag_directive ++) { 
     257        if (strcmp((char *)value.handle, (char *)tag_directive->handle) == 0) { 
     258            if (allow_duplicates) 
     259                return 1; 
     260            return yaml_emitter_set_emitter_error(emitter, 
     261                    "duplicate %TAG directive"); 
     262        } 
     263    } 
     264 
     265    copy.handle = yaml_strdup(value.handle); 
     266    copy.prefix = yaml_strdup(value.prefix); 
     267    if (!copy.handle || !copy.prefix) { 
    252268        emitter->error = YAML_MEMORY_ERROR; 
    253269        goto error; 
    254270    } 
    255     memcpy(value_copy, value, length); 
    256     value_copy[length] = '\0'; 
    257  
    258     SCALAR_EVENT_INIT(event, anchor_copy, tag_copy, value_copy, length, 
    259             plain_implicit, quoted_implicit, style, mark, mark); 
    260  
    261     if (yaml_emitter_emit(emitter, &event)) { 
     271 
     272    if (!PUSH(emitter, emitter->tag_directives, copy)) 
     273        goto error; 
     274 
     275    return 1; 
     276 
     277error: 
     278    yaml_free(copy.handle); 
     279    yaml_free(copy.prefix); 
     280    return 0; 
     281} 
     282 
     283/* 
     284 * Increase the indentation level. 
     285 */ 
     286 
     287static int 
     288yaml_emitter_increase_indent(yaml_emitter_t *emitter, 
     289        int flow, int indentless) 
     290{ 
     291    if (!PUSH(emitter, emitter->indents, emitter->indent)) 
     292        return 0; 
     293 
     294    if (emitter->indent < 0) { 
     295        emitter->indent = flow ? emitter->best_indent : 0; 
     296    } 
     297    else if (!indentless) { 
     298        emitter->indent += emitter->best_indent; 
     299    } 
     300 
     301    return 1; 
     302} 
     303 
     304/* 
     305 * State dispatcher. 
     306 */ 
     307 
     308static int 
     309yaml_emitter_state_machine(yaml_emitter_t *emitter, yaml_event_t *event) 
     310{ 
     311    switch (emitter->state) 
     312    { 
     313        case YAML_EMIT_STREAM_START_STATE: 
     314            return yaml_emitter_emit_stream_start(emitter, event); 
     315 
     316        case YAML_EMIT_FIRST_DOCUMENT_START_STATE: 
     317            return yaml_emitter_emit_document_start(emitter, event, 1); 
     318 
     319        case YAML_EMIT_DOCUMENT_START_STATE: 
     320            return yaml_emitter_emit_document_start(emitter, event, 0); 
     321 
     322        case YAML_EMIT_DOCUMENT_CONTENT_STATE: 
     323            return yaml_emitter_emit_document_content(emitter, event); 
     324 
     325        case YAML_EMIT_DOCUMENT_END_STATE: 
     326            return yaml_emitter_emit_document_end(emitter, event); 
     327 
     328        case YAML_EMIT_FLOW_SEQUENCE_FIRST_ITEM_STATE: 
     329            return yaml_emitter_emit_flow_sequence_item(emitter, event, 1); 
     330 
     331        case YAML_EMIT_FLOW_SEQUENCE_ITEM_STATE: 
     332            return yaml_emitter_emit_flow_sequence_item(emitter, event, 0); 
     333 
     334        case YAML_EMIT_FLOW_MAPPING_FIRST_KEY_STATE: 
     335            return yaml_emitter_emit_flow_mapping_key(emitter, event, 1); 
     336 
     337        case YAML_EMIT_FLOW_MAPPING_KEY_STATE: 
     338            return yaml_emitter_emit_flow_mapping_key(emitter, event, 0); 
     339 
     340        case YAML_EMIT_FLOW_MAPPING_SIMPLE_VALUE_STATE: 
     341            return yaml_emitter_emit_flow_mapping_value(emitter, event, 1); 
     342 
     343        case YAML_EMIT_FLOW_MAPPING_VALUE_STATE: 
     344            return yaml_emitter_emit_flow_mapping_value(emitter, event, 0); 
     345 
     346        case YAML_EMIT_BLOCK_SEQUENCE_FIRST_ITEM_STATE: 
     347            return yaml_emitter_emit_block_sequence_item(emitter, event, 1); 
     348 
     349        case YAML_EMIT_BLOCK_SEQUENCE_ITEM_STATE: 
     350            return yaml_emitter_emit_block_sequence_item(emitter, event, 0); 
     351 
     352        case YAML_EMIT_BLOCK_MAPPING_FIRST_KEY_STATE: 
     353            return yaml_emitter_emit_block_mapping_key(emitter, event, 1); 
     354 
     355        case YAML_EMIT_BLOCK_MAPPING_KEY_STATE: 
     356            return yaml_emitter_emit_block_mapping_key(emitter, event, 0); 
     357 
     358        case YAML_EMIT_BLOCK_MAPPING_SIMPLE_VALUE_STATE: 
     359            return yaml_emitter_emit_block_mapping_value(emitter, event, 1); 
     360 
     361        case YAML_EMIT_BLOCK_MAPPING_VALUE_STATE: 
     362            return yaml_emitter_emit_block_mapping_value(emitter, event, 0); 
     363 
     364        case YAML_EMIT_END_STATE: 
     365            return yaml_emitter_set_emitter_error(emitter, 
     366                    "expected nothing after STREAM-END"); 
     367 
     368        default: 
     369            assert(1);      /* Invalid state. */ 
     370    } 
     371 
     372    return 0; 
     373} 
     374 
     375/* 
     376 * Expect STREAM-START. 
     377 */ 
     378 
     379static int 
     380yaml_emitter_emit_stream_start(yaml_emitter_t *emitter, 
     381        yaml_event_t *event) 
     382{ 
     383    if (event->type == YAML_STREAM_START_EVENT) 
     384    { 
     385        if (!emitter->encoding) { 
     386            emitter->encoding = event->data.stream_start.encoding; 
     387        } 
     388 
     389        if (!emitter->encoding) { 
     390            emitter->encoding = YAML_UTF8_ENCODING; 
     391        } 
     392 
     393        if (emitter->best_indent < 2 || emitter->best_indent > 9) { 
     394            emitter->best_indent  = 2; 
     395        } 
     396 
     397        if (emitter->best_width >= 0 
     398                && emitter->best_width <= emitter->best_indent*2) { 
     399            emitter->best_width = 80; 
     400        } 
     401 
     402        if (emitter->best_width < 0) { 
     403            emitter->best_width = INT_MAX; 
     404        } 
     405         
     406        if (!emitter->line_break) { 
     407            emitter->line_break = YAML_LN_BREAK; 
     408        } 
     409 
     410        emitter->indent = -1; 
     411 
     412        emitter->line = 0; 
     413        emitter->column = 0; 
     414        emitter->whitespace = 1; 
     415        emitter->indention = 1; 
     416 
     417        if (emitter->encoding != YAML_UTF8_ENCODING) { 
     418            if (!yaml_emitter_write_bom(emitter)) 
     419                return 0; 
     420        } 
     421 
     422        emitter->state = YAML_EMIT_FIRST_DOCUMENT_START_STATE; 
     423 
    262424        return 1; 
    263425    } 
    264426 
    265 error: 
    266     yaml_free(anchor_copy); 
    267     yaml_free(tag_copy); 
    268     yaml_free(value_copy); 
     427    return yaml_emitter_set_emitter_error(emitter, 
     428            "expected STREAM-START"); 
     429} 
     430 
     431static int 
     432yaml_emitter_emit_document_start(yaml_emitter_t *emitter, 
     433        yaml_event_t *event, int first) 
     434{ 
     435    if (event->type == YAML_DOCUMENT_START_EVENT) 
     436    { 
     437        yaml_tag_directive_t default_tag_directives[] = { 
     438            {(yaml_char_t *)"!", (yaml_char_t *)"!"}, 
     439            {(yaml_char_t *)"!!", (yaml_char_t *)"tag:yaml.org,2002:"}, 
     440            {NULL, NULL} 
     441        }; 
     442        yaml_tag_directive_t *tag_directive; 
     443        int implicit; 
     444 
     445        if (event->data.document_start.version_directive) { 
     446            if (event->data.document_start.version_directive->major != 1 
     447                    || event->data.document_start.version_directive-> minor != 1) { 
     448                return yaml_emitter_set_emitter_error(emitter, 
     449                        "incompatible %YAML directive"); 
     450            } 
     451        } 
     452 
     453        for (tag_directive = event->data.document_start.tag_directives.start; 
     454                tag_directive != event->data.document_start.tag_directives.end; 
     455                tag_directive ++) { 
     456            if (!yaml_emitter_append_tag_directive(emitter, *tag_directive, 0)) 
     457                return 0; 
     458        } 
     459 
     460        for (tag_directive = default_tag_directives; 
     461                tag_directive->handle; tag_directive ++) { 
     462            if (!yaml_emitter_append_tag_directive(emitter, *tag_directive, 1)) 
     463                return 0; 
     464        } 
     465 
     466        implicit = event->data.document_start.implicit; 
     467        if (!first || emitter->canonical) { 
     468            implicit = 0; 
     469        } 
     470 
     471        if (event->data.document_start.version_directive) { 
     472            implicit = 0; 
     473            if (!yaml_emitter_write_version_directive(emitter, 
     474                        *event->data.document_start.version_directive)) 
     475                return 0; 
     476        } 
     477         
     478        if (event->data.document_start.tag_directives.start 
     479                != event->data.document_start.tag_directives.end) { 
     480            implicit = 0; 
     481            for (tag_directive = event->data.document_start.tag_directives.start; 
     482                    tag_directive != event->data.document_start.tag_directives.end; 
     483                    tag_directive ++) { 
     484                if (!yaml_emitter_write_tag_directive(emitter, *tag_directive)) 
     485                    return 0; 
     486            } 
     487        } 
     488 
     489        if (yaml_emitter_check_empty_document(emitter)) { 
     490            implicit = 0; 
     491        } 
     492 
     493        if (!implicit) { 
     494            if (!yaml_emitter_write_indent(emitter)) 
     495                return 0; 
     496            if (!yaml_emitter_write_indicator(emitter, "---", 1, 0, 0)) 
     497                return 0; 
     498            if (emitter->canonical) { 
     499                if (!yaml_emitter_write_indent(emitter)) 
     500                    return 0; 
     501            } 
     502        } 
     503 
     504        emitter->state = YAML_EMIT_DOCUMENT_CONTENT_STATE; 
     505 
     506        return 1; 
     507    } 
     508 
     509    else if (event->type == YAML_STREAM_END_EVENT) 
     510    { 
     511        if (!yaml_emitter_flush(emitter)) 
     512            return 0; 
     513 
     514        emitter->state = YAML_EMIT_END_STATE; 
     515 
     516        return 1; 
     517    } 
     518 
     519    return yaml_emitter_set_emitter_error(emitter, 
     520            "expected DOCUMENT-START or STREAM-END"); 
     521} 
     522 
     523static int 
     524yaml_emitter_emit_document_content(yaml_emitter_t *emitter, 
     525        yaml_event_t *event) 
     526{ 
     527    if (!PUSH(emitter, emitter->states, YAML_EMIT_DOCUMENT_END_STATE)) 
     528        return 0; 
     529 
     530    return yaml_emitter_emit_node(emitter, event, 1, 0, 0, 0); 
     531} 
     532 
     533static int 
     534yaml_emitter_emit_document_end(yaml_emitter_t *emitter, 
     535        yaml_event_t *event) 
     536{ 
     537    if (event->type == YAML_DOCUMENT_END_EVENT) 
     538    { 
     539        if (!yaml_emitter_write_indent(emitter)) 
     540            return 0; 
     541        if (!event->data.document_end.implicit) { 
     542            if (!yaml_emitter_write_indicator(emitter, "...", 1, 0, 0)) 
     543                return 0; 
     544            if (!yaml_emitter_write_indent(emitter)) 
     545                return 0; 
     546        } 
     547        if (!yaml_emitter_flush(emitter)) 
     548            return 0; 
     549 
     550        emitter->state = YAML_EMIT_DOCUMENT_START_STATE; 
     551 
     552        return 1; 
     553    } 
     554 
     555    return yaml_emitter_set_emitter_error(emitter, 
     556            "expected DOCUMENT-END"); 
     557} 
     558 
     559static int 
     560yaml_emitter_emit_flow_sequence_item(yaml_emitter_t *emitter, 
     561        yaml_event_t *event, int first) 
     562{ 
     563    if (first) 
     564    { 
     565        if (!yaml_emitter_write_indicator(emitter, "[", 1, 1, 0)) 
     566            return 0; 
     567        if (!yaml_emitter_increase_indent(emitter, 1, 0)) 
     568            return 0; 
     569        emitter->flow_level ++; 
     570    } 
     571 
     572    if (event->type == YAML_SEQUENCE_END_EVENT) 
     573    { 
     574        emitter->flow_level --; 
     575        emitter->indent = POP(emitter, emitter->indents); 
     576        if (emitter->canonical && !first) { 
     577            if (!yaml_emitter_write_indicator(emitter, ",", 0, 0, 0)) 
     578                return 0; 
     579            if (!yaml_emitter_write_indent(emitter)) 
     580                return 0; 
     581        } 
     582        if (!yaml_emitter_write_indicator(emitter, "]", 0, 0, 0)) 
     583            return 0; 
     584        emitter->state = POP(emitter, emitter->states); 
     585 
     586        return 1; 
     587    } 
     588 
     589    if (emitter->canonical || emitter->column > emitter->best_width) { 
     590        if (!yaml_emitter_write_indent(emitter)) 
     591            return 0; 
     592    } 
     593    if (PUSH(emitter, emitter->states, YAML_EMIT_FLOW_SEQUENCE_ITEM_STATE)) 
     594        return 0; 
     595 
     596    return yaml_emitter_emit_node(emitter, event, 0, 1, 0, 0); 
     597} 
     598 
     599static int 
     600yaml_emitter_emit_flow_mapping_key(yaml_emitter_t *emitter, 
     601        yaml_event_t *event, int first) 
     602{ 
     603    if (first) 
     604    { 
     605        if (!yaml_emitter_write_indicator(emitter, "{", 1, 1, 0)) 
     606            return 0; 
     607        if (!yaml_emitter_increase_indent(emitter, 1, 0)) 
     608            return 0; 
     609        emitter->flow_level ++; 
     610    } 
     611 
     612    if (event->type == YAML_MAPPING_END_EVENT) 
     613    { 
     614        emitter->flow_level --; 
     615        emitter->indent = POP(emitter, emitter->indents); 
     616        if (emitter->canonical && !first) { 
     617            if (!yaml_emitter_write_indicator(emitter, ",", 0, 0, 0)) 
     618                return 0; 
     619            if (!yaml_emitter_write_indent(emitter)) 
     620                return 0; 
     621        } 
     622        if (!yaml_emitter_write_indicator(emitter, "}", 0, 0, 0)) 
     623            return 0; 
     624        emitter->state = POP(emitter, emitter->states); 
     625 
     626        return 1; 
     627    } 
     628 
     629    if (!first) { 
     630        if (!yaml_emitter_write_indicator(emitter, ",", 0, 0, 0)) 
     631            return 0; 
     632    } 
     633    if (emitter->canonical || emitter->column > emitter->best_width) { 
     634        if (!yaml_emitter_write_indent(emitter)) 
     635            return 0; 
     636    } 
     637 
     638    if (!emitter->canonical && yaml_emitter_check_simple_key(emitter)) 
     639    { 
     640        if (!PUSH(emitter, emitter->states, 
     641                    YAML_EMIT_FLOW_MAPPING_SIMPLE_VALUE_STATE)) 
     642            return 0; 
     643 
     644        return yaml_emitter_emit_node(emitter, event, 0, 0, 1, 1); 
     645    } 
     646    else 
     647    { 
     648        if (!yaml_emitter_write_indicator(emitter, "?", 1, 0, 0)) 
     649            return 0; 
     650        if (!PUSH(emitter, emitter->states, 
     651                    YAML_EMIT_FLOW_MAPPING_VALUE_STATE)) 
     652            return 0; 
     653 
     654        return yaml_emitter_emit_node(emitter, event, 0, 0, 1, 0); 
     655    } 
     656} 
     657 
     658static int 
     659yaml_emitter_emit_flow_mapping_value(yaml_emitter_t *emitter, 
     660        yaml_event_t *event, int simple) 
     661{ 
     662    if (simple) { 
     663        if (!yaml_emitter_write_indicator(emitter, ":", 0, 0, 0)) 
     664            return 0; 
     665    } 
     666    else { 
     667        if (emitter->canonical || emitter->column > emitter->best_width) { 
     668            if (!yaml_emitter_write_indent(emitter)) 
     669                return 0; 
     670        } 
     671        if (!yaml_emitter_write_indicator(emitter, ":", 1, 0, 0)) 
     672            return 0; 
     673    } 
     674    if (!PUSH(emitter, emitter->states, YAML_EMIT_FLOW_MAPPING_KEY_STATE)) 
     675        return 0; 
     676    return yaml_emitter_emit_node(emitter, event, 0, 0, 1, 0); 
     677} 
     678 
     679static int 
     680yaml_emitter_emit_block_sequence_item(yaml_emitter_t *emitter, 
     681        yaml_event_t *event, int first) 
     682{ 
     683    if (first) 
     684    { 
     685        if (!yaml_emitter_increase_indent(emitter, 0, 
     686                    (emitter->mapping_context && !emitter->indention))) 
     687            return 0; 
     688    } 
     689 
     690    if (event->type == YAML_SEQUENCE_END_EVENT) 
     691    { 
     692        emitter->indent = POP(emitter, emitter->indents); 
     693        emitter->state = POP(emitter, emitter->states); 
     694 
     695        return 1; 
     696    } 
     697 
     698    if (!yaml_emitter_write_indent(emitter)) 
     699        return 0; 
     700    if (!yaml_emitter_write_indicator(emitter, "-", 1, 0, 1)) 
     701        return 0; 
     702    if (!PUSH(emitter, emitter->states, 
     703                YAML_EMIT_BLOCK_SEQUENCE_ITEM_STATE)) 
     704        return 0; 
     705 
     706    return yaml_emitter_emit_node(emitter, event, 0, 1, 0, 0); 
     707} 
     708 
     709static int 
     710yaml_emitter_emit_block_mapping_key(yaml_emitter_t *emitter, 
     711        yaml_event_t *event, int first) 
     712{ 
     713    if (first) 
     714    { 
     715        if (!yaml_emitter_increase_indent(emitter, 0, 0)) 
     716            return 0; 
     717    } 
     718 
     719    if (event->type == YAML_MAPPING_END_EVENT) 
     720    { 
     721        emitter->indent = POP(emitter, emitter->indents); 
     722        emitter->state = POP(emitter, emitter->states); 
     723 
     724        return 1; 
     725    } 
     726 
     727    if (!yaml_emitter_write_indent(emitter)) 
     728        return 0; 
     729 
     730    if (yaml_emitter_check_simple_key(emitter)) 
     731    { 
     732        if (!PUSH(emitter, emitter->states, 
     733                    YAML_EMIT_BLOCK_MAPPING_SIMPLE_VALUE_STATE)) 
     734            return 0; 
     735 
     736        return yaml_emitter_emit_node(emitter, event, 0, 0, 1, 1); 
     737    } 
     738    else 
     739    { 
     740        if (!yaml_emitter_write_indicator(emitter, "?", 1, 0, 1)) 
     741            return 0; 
     742        if (!PUSH(emitter, emitter->states, 
     743                    YAML_EMIT_BLOCK_MAPPING_VALUE_STATE)) 
     744            return 0; 
     745 
     746        return yaml_emitter_emit_node(emitter, event, 0, 0, 1, 0); 
     747    } 
     748} 
     749 
     750static int 
     751yaml_emitter_emit_block_mapping_value(yaml_emitter_t *emitter, 
     752        yaml_event_t *event, int simple) 
     753{ 
     754    if (simple) { 
     755        if (!yaml_emitter_write_indicator(emitter, ":", 0, 0, 0)) 
     756            return 0; 
     757    } 
     758    else { 
     759        if (!yaml_emitter_write_indent(emitter)) 
     760            return 0; 
     761        if (!yaml_emitter_write_indicator(emitter, ":", 1, 0, 1)) 
     762            return 0; 
     763    } 
     764    if (!PUSH(emitter, emitter->states, 
     765                YAML_EMIT_BLOCK_MAPPING_KEY_STATE)) 
     766        return 0; 
     767 
     768    return yaml_emitter_emit_node(emitter, event, 0, 0, 1, 0); 
     769} 
     770 
     771static int 
     772yaml_emitter_emit_node(yaml_emitter_t *emitter, yaml_event_t *event, 
     773        int root, int sequence, int mapping, int simple_key) 
     774{ 
     775    emitter->root_context = root; 
     776    emitter->sequence_context = sequence; 
     777    emitter->mapping_context = mapping; 
     778    emitter->simple_key_context = simple_key; 
     779 
     780    switch (event->type) 
     781    { 
     782        case YAML_ALIAS_EVENT: 
     783            return yaml_emitter_emit_alias(emitter, event); 
     784 
     785        case YAML_SCALAR_EVENT: 
     786            return yaml_emitter_emit_scalar(emitter, event); 
     787 
     788        case YAML_SEQUENCE_START_EVENT: 
     789            return yaml_emitter_emit_sequence_start(emitter, event); 
     790 
     791        case YAML_MAPPING_START_EVENT: 
     792            return yaml_emitter_emit_mapping_start(emitter, event); 
     793 
     794        default: 
     795            return yaml_emitter_set_emitter_error(emitter, 
     796                    "expected SCALAR, SEQUENCE-START, MAPPING-START, or ALIAS"); 
     797    } 
    269798 
    270799    return 0; 
    271800} 
    272801 
    273 /* 
    274  * Emit SEQUENCE-START. 
    275  */ 
    276  
    277 YAML_DECLARE(int) 
    278 yaml_emitter_emit_sequence_start(yaml_emitter_t *emitter, 
    279         yaml_char_t *anchor, yaml_char_t *tag, int implicit, 
    280         yaml_sequence_style_t style) 
    281 { 
    282     yaml_event_t event; 
    283     yaml_mark_t mark = { 0, 0, 0 }; 
    284     yaml_char_t *anchor_copy = NULL; 
    285     yaml_char_t *tag_copy = NULL; 
    286  
    287     assert(emitter);    /* Non-NULL emitter object is expected. */ 
    288  
    289     if (anchor) { 
    290         anchor_copy = yaml_strdup(anchor); 
    291         if (!anchor_copy) { 
    292             emitter->error = YAML_MEMORY_ERROR; 
    293             goto error; 
    294         } 
    295     } 
    296  
    297     if (tag) { 
    298         tag_copy = yaml_strdup(tag); 
    299         if (!tag_copy) { 
    300             emitter->error = YAML_MEMORY_ERROR; 
    301             goto error; 
    302         } 
    303     } 
    304  
    305     SEQUENCE_START_EVENT_INIT(event, anchor_copy, tag_copy, 
    306             implicit, style, mark, mark); 
    307  
    308     if (yaml_emitter_emit(emitter, &event)) { 
    309         return 1; 
    310     } 
    311  
    312 error: 
    313     yaml_free(anchor_copy); 
    314     yaml_free(tag_copy); 
    315  
    316     return 0; 
    317 } 
    318  
    319 /* 
    320  * Emit SEQUENCE-END. 
    321  */ 
    322  
    323 YAML_DECLARE(int) 
    324 yaml_emitter_emit_sequence_end(yaml_emitter_t *emitter) 
    325 { 
    326     yaml_event_t event; 
    327     yaml_mark_t mark = { 0, 0, 0 }; 
    328  
    329     assert(emitter);    /* Non-NULL emitter object is expected. */ 
    330  
    331     SEQUENCE_END_EVENT_INIT(event, mark, mark); 
    332  
    333     return yaml_emitter_emit(emitter, &event); 
    334 } 
    335  
    336 /* 
    337  * Emit MAPPING-START. 
    338  */ 
    339  
    340 YAML_DECLARE(int) 
    341 yaml_emitter_emit_mapping_start(yaml_emitter_t *emitter, 
    342         yaml_char_t *anchor, yaml_char_t *tag, int implicit, 
    343         yaml_mapping_style_t style) 
    344 { 
    345     yaml_event_t event; 
    346     yaml_mark_t mark = { 0, 0, 0 }; 
    347     yaml_char_t *anchor_copy = NULL; 
    348     yaml_char_t *tag_copy = NULL; 
    349  
    350     assert(emitter);    /* Non-NULL emitter object is expected. */ 
    351  
    352     if (anchor) { 
    353         anchor_copy = yaml_strdup(anchor); 
    354         if (!anchor_copy) { 
    355             emitter->error = YAML_MEMORY_ERROR; 
    356             goto error; 
    357         } 
    358     } 
    359  
    360     if (tag) { 
    361         tag_copy = yaml_strdup(tag); 
    362         if (!tag_copy) { 
    363             emitter->error = YAML_MEMORY_ERROR; 
    364             goto error; 
    365         } 
    366     } 
    367  
    368     MAPPING_START_EVENT_INIT(event, anchor_copy, tag_copy, 
    369             implicit, style, mark, mark); 
    370  
    371     if (yaml_emitter_emit(emitter, &event)) { 
    372         return 1; 
    373     } 
    374  
    375 error: 
    376     yaml_free(anchor_copy); 
    377     yaml_free(tag_copy); 
    378  
    379     return 0; 
    380 } 
    381  
    382 /* 
    383  * Emit MAPPING-END. 
    384  */ 
    385  
    386 YAML_DECLARE(int) 
    387 yaml_emitter_emit_mapping_end(yaml_emitter_t *emitter) 
    388 { 
    389     yaml_event_t event; 
    390     yaml_mark_t mark = { 0, 0, 0 }; 
    391  
    392     assert(emitter);    /* Non-NULL emitter object is expected. */ 
    393  
    394     MAPPING_END_EVENT_INIT(event, mark, mark); 
    395  
    396     return yaml_emitter_emit(emitter, &event); 
    397 } 
    398  
    399 /* 
    400  * Emit an event. 
    401  */ 
    402  
    403 YAML_DECLARE(int) 
    404 yaml_emitter_emit(yaml_emitter_t *emitter, yaml_event_t *event) 
    405 { 
    406     return 0; 
    407 } 
    408  
     802static int 
     803yaml_emitter_emit_alias(yaml_emitter_t *emitter, yaml_event_t *event) 
     804{ 
     805    if (!yaml_emitter_process_anchor(emitter, event->data.alias.anchor, 1)) 
     806        return 0; 
     807    emitter->state = POP(emitter, emitter->states); 
     808 
     809    return 1; 
     810} 
     811 
     812static int 
     813yaml_emitter_emit_scalar(yaml_emitter_t *emitter, yaml_event_t *event) 
     814{ 
     815    if (!yaml_emitter_process_anchor(emitter, event->data.scalar.anchor, 0)) 
     816        return 0; 
     817    if (!yaml_emitter_process_tag(emitter, event->data.scalar.tag)) 
     818        return 0; 
     819    if (!yaml_emitter_increase_indent(emitter, 1, 0)) 
     820        return 0; 
     821    if (!yaml_emitter_process_scalar(emitter, 
     822                event->data.scalar.value, event->data.scalar.length, 
     823                event->data.scalar.plain_implicit, 
     824                event->data.scalar.quoted_implicit, 
     825                event->data.scalar.style)) 
     826        return 0; 
     827    emitter->indent = POP(emitter, emitter->indents); 
     828    emitter->state = POP(emitter, emitter->states); 
     829 
     830    return 1; 
     831} 
     832 
     833static int 
     834yaml_emitter_emit_sequence_start(yaml_emitter_t *emitter, yaml_event_t *event) 
     835{ 
     836    if (!yaml_emitter_process_anchor(emitter, 
     837                event->data.sequence_start.anchor, 0)) 
     838        return 0; 
     839    if (!yaml_emitter_process_tag(emitter, 
     840                event->data.sequence_start.tag)) 
     841        return 0; 
     842 
     843    if (emitter->flow_level || emitter->canonical 
     844            || event->data.sequence_start.style == YAML_FLOW_SEQUENCE_STYLE 
     845            || yaml_emitter_check_empty_sequence(emitter)) { 
     846        emitter->state = YAML_EMIT_FLOW_SEQUENCE_FIRST_ITEM_STATE; 
     847    } 
     848    else { 
     849        emitter->state = YAML_EMIT_BLOCK_SEQUENCE_FIRST_ITEM_STATE; 
     850    } 
     851 
     852    return 1; 
     853} 
     854 
     855static int 
     856yaml_emitter_emit_mapping_start(yaml_emitter_t *emitter, yaml_event_t *event) 
     857{ 
     858    if (!yaml_emitter_process_anchor(emitter, 
     859                event->data.mapping_start.anchor, 0)) 
     860        return 0; 
     861    if (!yaml_emitter_process_tag(emitter, 
     862                event->data.mapping_start.tag)) 
     863        return 0; 
     864 
     865    if (emitter->flow_level || emitter->canonical 
     866            || event->data.mapping_start.style == YAML_FLOW_MAPPING_STYLE 
     867            || yaml_emitter_check_empty_mapping(emitter)) { 
     868        emitter->state = YAML_EMIT_FLOW_MAPPING_FIRST_KEY_STATE; 
     869    } 
     870    else { 
     871        emitter->state = YAML_EMIT_BLOCK_MAPPING_FIRST_KEY_STATE; 
     872    } 
     873 
     874    return 1; 
     875} 
     876 

  • libyaml/trunk/src/parser.c

    r212 r213  
    173173    assert(event);      /* Non-NULL event object is expected. */ 
    174174 
     175    /* Erase the event object. */ 
     176 
     177    memset(event, 0, sizeof(yaml_event_t)); 
     178 
    175179    /* No events after the end of the stream or error. */ 
    176180 
    177181    if (parser->stream_end_produced || parser->error || 
    178182            parser->state == YAML_PARSE_END_STATE) { 
    179         memset(event, 0, sizeof(yaml_event_t)); 
    180  
    181183        return 1; 
    182184    } 
    … …  
    13191321} 
    13201322 
     1323/* 
     1324 * Append a tag directive to the directives stack. 
     1325 */ 
     1326 
    13211327static int 
    13221328yaml_parser_append_tag_directive(yaml_parser_t *parser, 

  • libyaml/trunk/src/scanner.c

    r211 r213  
    939939    assert(token);  /* Non-NULL token object is expected. */ 
    940940 
     941    /* Erase the token object. */ 
     942 
     943    memset(token, 0, sizeof(yaml_token_t)); 
     944 
    941945    /* No tokens after STREAM-END or error. */ 
    942946 
    943947    if (parser->stream_end_produced || parser->error) { 
    944         memset(token, 0, sizeof(yaml_token_t)); 
    945  
    946948        return 1; 
    947949    } 

  • libyaml/trunk/src/yaml_private.h

    r212 r213  
    77 
    88#include <assert.h> 
     9#include <limits.h> 
    910 
    1011/*