From f3cf0f579347a16120df8fc1c1ec3cd1f4e6d44e Mon Sep 17 00:00:00 2001 From: Vincent Sanders Date: Sun, 2 Jan 2011 23:20:31 +0000 Subject: simple properties split in parse similar to select in preparation for future generation svn path=/trunk/libcss/; revision=11188 --- src/parse/properties/voice_family.c | 182 ++++++++++++++++++++++++++++++++++++ 1 file changed, 182 insertions(+) create mode 100644 src/parse/properties/voice_family.c (limited to 'src/parse/properties/voice_family.c') diff --git a/src/parse/properties/voice_family.c b/src/parse/properties/voice_family.c new file mode 100644 index 0000000..beca662 --- /dev/null +++ b/src/parse/properties/voice_family.c @@ -0,0 +1,182 @@ +/* + * This file is part of LibCSS. + * Licensed under the MIT License, + * http://www.opensource.org/licenses/mit-license.php + * Copyright 2009 John-Mark Bell + */ + +#include +#include + +#include "bytecode/bytecode.h" +#include "bytecode/opcodes.h" +#include "parse/properties/properties.h" +#include "parse/properties/utils.h" + +/** + * Determine if a given voice-family ident is reserved + * + * \param c Parsing context + * \param ident IDENT to consider + * \return True if IDENT is reserved, false otherwise + */ +static bool voice_family_reserved(css_language *c, const css_token *ident) +{ + bool match; + + return (lwc_string_caseless_isequal( + ident->idata, c->strings[MALE], + &match) == lwc_error_ok && match) || + (lwc_string_caseless_isequal( + ident->idata, c->strings[FEMALE], + &match) == lwc_error_ok && match) || + (lwc_string_caseless_isequal( + ident->idata, c->strings[CHILD], + &match) == lwc_error_ok && match); +} + +/** + * Convert a voice-family token into a bytecode value + * + * \param c Parsing context + * \param token Token to consider + * \return Bytecode value + */ +static uint16_t voice_family_value(css_language *c, const css_token *token) +{ + uint16_t value; + bool match; + + if (token->type == CSS_TOKEN_IDENT) { + if ((lwc_string_caseless_isequal( + token->idata, c->strings[MALE], + &match) == lwc_error_ok && match)) + value = VOICE_FAMILY_MALE; + else if ((lwc_string_caseless_isequal( + token->idata, c->strings[FEMALE], + &match) == lwc_error_ok && match)) + value = VOICE_FAMILY_FEMALE; + else if ((lwc_string_caseless_isequal( + token->idata, c->strings[CHILD], + &match) == lwc_error_ok && match)) + value = VOICE_FAMILY_CHILD; + else + value = VOICE_FAMILY_IDENT_LIST; + } else { + value = VOICE_FAMILY_STRING; + } + + return value; +} + +/** + * Parse voice-family + * + * \param c Parsing context + * \param vector Vector of tokens to process + * \param ctx Pointer to vector iteration context + * \param result Pointer to location to receive resulting style + * \return CSS_OK on success, + * CSS_NOMEM on memory exhaustion, + * CSS_INVALID if the input is not valid + * + * Post condition: \a *ctx is updated with the next token to process + * If the input is invalid, then \a *ctx remains unchanged. + */ +css_error parse_voice_family(css_language *c, + const parserutils_vector *vector, int *ctx, + css_style **result) +{ + int orig_ctx = *ctx; + css_error error; + const css_token *token; + uint8_t flags = 0; + uint16_t value = 0; + uint32_t opv; + uint32_t required_size = sizeof(opv); + int temp_ctx = *ctx; + uint8_t *ptr; + bool match; + + /* [ IDENT+ | STRING ] [ ',' [ IDENT+ | STRING ] ]* | IDENT(inherit) + * + * In the case of IDENT+, any whitespace between tokens is collapsed to + * a single space + */ + + /* Pass 1: validate input and calculate space */ + token = parserutils_vector_iterate(vector, &temp_ctx); + if (token == NULL || (token->type != CSS_TOKEN_IDENT && + token->type != CSS_TOKEN_STRING)) { + *ctx = orig_ctx; + return CSS_INVALID; + } + + if (token->type == CSS_TOKEN_IDENT && + (lwc_string_caseless_isequal( + token->idata, c->strings[INHERIT], + &match) == lwc_error_ok && match)) { + flags = FLAG_INHERIT; + } else { + uint32_t list_size; + + value = voice_family_value(c, token); + + error = comma_list_length(c, vector, &temp_ctx, + token, voice_family_reserved, &list_size); + if (error != CSS_OK) { + *ctx = orig_ctx; + return error; + } + + required_size += list_size; + } + + opv = buildOPV(CSS_PROP_VOICE_FAMILY, flags, value); + + /* Allocate result */ + error = css_stylesheet_style_create(c->sheet, required_size, result); + if (error != CSS_OK) { + *ctx = orig_ctx; + return error; + } + + /* Copy OPV to bytecode */ + ptr = (*result)->bytecode; + memcpy(ptr, &opv, sizeof(opv)); + ptr += sizeof(opv); + + /* Pass 2: populate bytecode */ + token = parserutils_vector_iterate(vector, ctx); + if (token == NULL || (token->type != CSS_TOKEN_IDENT && + token->type != CSS_TOKEN_STRING)) { + css_stylesheet_style_destroy(c->sheet, *result, true); + *result = NULL; + *ctx = orig_ctx; + return CSS_INVALID; + } + + if (token->type == CSS_TOKEN_IDENT && + (lwc_string_caseless_isequal( + token->idata, c->strings[INHERIT], + &match) == lwc_error_ok && match)) { + /* Nothing to do */ + } else { + error = comma_list_to_bytecode(c, vector, ctx, token, + voice_family_reserved, voice_family_value, + &ptr); + if (error != CSS_OK) { + css_stylesheet_style_destroy(c->sheet, *result, true); + *result = NULL; + *ctx = orig_ctx; + return error; + } + + /* Write terminator */ + opv = VOICE_FAMILY_END; + memcpy(ptr, &opv, sizeof(opv)); + ptr += sizeof(opv); + } + + return CSS_OK; +} -- cgit v1.2.3