diff options
Diffstat (limited to 'ext/syck/handler.c')
| -rw-r--r-- | ext/syck/handler.c | 231 |
1 files changed, 231 insertions, 0 deletions
diff --git a/ext/syck/handler.c b/ext/syck/handler.c new file mode 100644 index 0000000000..50ba3e4232 --- /dev/null +++ b/ext/syck/handler.c @@ -0,0 +1,231 @@ +// +// handler.h +// +// $Author$ +// $Date$ +// +// Copyright (C) 2003 why the lucky stiff +// + +#include "syck.h" + +SYMID +syck_hdlr_add_node( SyckParser *p, SyckNode *n ) +{ + SYMID id; + if ( ! n->id ) + { + n->id = (p->handler)( p, n ); + } + id = n->id; + + if ( n->anchor == NULL ) + { + syck_free_node( n ); + } + return id; +} + +SyckNode * +syck_hdlr_add_anchor( SyckParser *p, char *a, SyckNode *n ) +{ + n->anchor = a; + st_insert( p->anchors, (st_data_t)a, (st_data_t)n ); + return n; +} + +SyckNode * +syck_hdlr_add_alias( SyckParser *p, char *a ) +{ + SyckNode *n; + + if ( st_lookup( p->anchors, (st_data_t)a, (st_data_t *)&n ) ) + { + return n; + } + + return syck_new_str( "..." ); +} + +void +syck_add_transfer( char *uri, SyckNode *n, int taguri ) +{ + char *comma = NULL; + char *slash = uri; + char *domain = NULL; + + if ( taguri == 0 ) + { + n->type_id = uri; + return; + } + + if ( uri[0] == '!' ) + { + syck_xprivate( n, uri + 1, strlen( uri ) - 1 ); + S_FREE( uri ); + return; + } + + while ( *(++slash) != '\0' ) + { + if ( *slash == '/' ) + break; + + if ( *slash == ',' ) + comma = slash; + } + + if ( *slash == '\0' ) + { + syck_taguri( n, "yaml.org,2002", uri, strlen( uri ) ); + } + else if ( comma == NULL ) + { + domain = S_ALLOC_N( char, ( slash - uri ) + 15 ); + domain[0] = '\0'; + strncat( domain, uri, slash - uri ); + strcat( domain, ".yaml.org,2002" ); + syck_taguri( n, domain, slash + 1, strlen( uri ) - ( slash - uri + 1 ) ); + S_FREE( domain ); + } + else + { + domain = S_ALLOC_N( char, slash - uri ); + domain[0] = '\0'; + strncat( domain, uri, slash - uri ); + syck_taguri( n, domain, slash + 1, strlen( uri ) - ( slash - uri + 1 ) ); + S_FREE( domain ); + } + S_FREE( uri ); +} + +void +syck_xprivate( SyckNode *n, char *type_id, int type_len ) +{ + if ( n->type_id != NULL ) + S_FREE( n->type_id ); + + n->type_id = S_ALLOC_N( char, type_len + 14 ); + n->type_id[0] = '\0'; + strcat( n->type_id, "x-private:" ); + strncat( n->type_id, type_id, type_len ); +} + +void +syck_taguri( SyckNode *n, char *domain, char *type_id, int type_len ) +{ + if ( n->type_id != NULL ) + S_FREE( n->type_id ); + + n->type_id = S_ALLOC_N( char, strlen( domain ) + type_len + 14 ); + n->type_id[0] = '\0'; + strcat( n->type_id, "taguri:" ); + strcat( n->type_id, domain ); + strcat( n->type_id, ":" ); + strncat( n->type_id, type_id, type_len ); +} + +int +syck_try_implicit( SyckNode *n ) +{ + return 1; +} + +void +syck_fold_format( struct SyckStr *n, int blockType, int indt_len, int nlDisp ) +{ + char *spc; + char *eol = NULL; + char *first_nl = NULL; + char *fc = n->ptr; + int keep_nl = 0; + int nl_count = 0; + + // + // Scan the sucker for newlines and strip indent + // + while ( fc < n->ptr + n->len ) + { + if ( *fc == '\n' ) + { + spc = fc; + while ( *(++spc) == ' ' ) + { + if ( blockType != BLOCK_PLAIN && spc - fc > indt_len ) + break; + } + + if ( blockType != BLOCK_LIT && *spc != ' ' ) + { + if ( eol != NULL ) fc = eol; + if ( first_nl == NULL && keep_nl == 1 ) + { + first_nl = fc; + *first_nl = ' '; + } + if ( nl_count == 1 ) + { + *first_nl = '\n'; + keep_nl = 0; + } + } + + fc += keep_nl; + if ( fc != spc && ( n->len - ( spc - n->ptr ) ) > 0 ) + { + S_MEMMOVE( fc, spc, char, n->len - ( spc - n->ptr ) ); + } + + n->len -= spc - fc; + keep_nl = 1; + eol = NULL; + nl_count++; + } + else + { + // + // eol tracks the last space on a line + // + if ( *fc == ' ' ) + { + if ( eol == NULL ) eol = fc; + } + else + { + eol = NULL; + } + first_nl = NULL; + nl_count = 0; + fc++; + } + } + + n->ptr[n->len] = '\n'; + + // + // Chomp or keep? + // + if ( nlDisp != NL_KEEP ) + { + fc = n->ptr + n->len - 1; + while ( *fc == '\n' ) + fc--; + + if ( nlDisp != NL_CHOMP ) + fc += 1; + + n->len = fc - n->ptr + 1; + } + else + { + // + // Force last line break which I gave back + // to the tokenizer. + // + n->len++; + n->ptr[n->len] = '\n'; + } + n->ptr[ n->len ] = '\0'; +} + |