simple properties split in parse similar to select in preparation for future generation

svn path=/trunk/libcss/; revision=11188

1 files changed, 176 insertions, 0 deletions

diff --git a/src/parse/properties/clip.c b/src/parse/properties/clip.c
new file mode 100644
index 0000000..dce2915
--- /dev/null
+++ b/src/parse/properties/clip.c
@@ -0,0 +1,176 @@
+/*
+ * This file is part of LibCSS.
+ * Licensed under the MIT License,
+ *		  http://www.opensource.org/licenses/mit-license.php
+ * Copyright 2009 John-Mark Bell <jmb@netsurf-browser.org>
+ */
+
+#include <assert.h>
+#include <string.h>
+
+#include "bytecode/bytecode.h"
+#include "bytecode/opcodes.h"
+#include "parse/properties/properties.h"
+#include "parse/properties/utils.h"
+
+/**
+ * Parse clip
+ *
+ * \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_clip(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;
+	int num_lengths = 0;
+	css_fixed length[4] = { 0 };
+	uint32_t unit[4] = { 0 };
+	uint32_t required_size;
+	bool match;
+
+	/* FUNCTION(rect) [ [ IDENT(auto) | length ] CHAR(,)? ]{3} 
+	 *                [ IDENT(auto) | length ] CHAR{)} |
+	 * IDENT(auto, inherit) */
+	token = parserutils_vector_iterate(vector, ctx);
+	if (token == 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)) {
+		flags = FLAG_INHERIT;
+	} else if (token->type == CSS_TOKEN_IDENT &&
+			(lwc_string_caseless_isequal(
+			token->idata, c->strings[AUTO],
+			&match) == lwc_error_ok && match)) {
+		value = CLIP_AUTO;
+	} else if (token->type == CSS_TOKEN_FUNCTION &&
+			(lwc_string_caseless_isequal(
+			token->idata, c->strings[RECT],
+			&match) == lwc_error_ok && match)) {
+		int i;
+		value = CLIP_SHAPE_RECT;
+
+		for (i = 0; i < 4; i++) {
+			consumeWhitespace(vector, ctx);
+
+			token = parserutils_vector_peek(vector, *ctx);
+			if (token == NULL) {
+				*ctx = orig_ctx;
+				return CSS_INVALID;
+			}
+
+			if (token->type == CSS_TOKEN_IDENT) {
+				/* Slightly magical way of generating the auto 
+				 * values. These are bits 3-6 of the value. */
+				if ((lwc_string_caseless_isequal(
+						token->idata, c->strings[AUTO],
+						&match) == lwc_error_ok && 
+						match))
+					value |= 1 << (i + 3);
+				else {
+					*ctx = orig_ctx;
+					return CSS_INVALID;
+				}
+
+				parserutils_vector_iterate(vector, ctx);
+			} else {
+				error = parse_unit_specifier(c, vector, ctx, 
+						UNIT_PX, 
+						&length[num_lengths], 
+						&unit[num_lengths]);
+				if (error != CSS_OK) {
+					*ctx = orig_ctx;
+					return error;
+				}
+
+				if (unit[num_lengths] & UNIT_ANGLE || 
+						unit[num_lengths] & UNIT_TIME ||
+						unit[num_lengths] & UNIT_FREQ ||
+						unit[num_lengths] & UNIT_PCT) {
+					*ctx = orig_ctx;
+					return CSS_INVALID;
+				}
+
+				num_lengths++;
+			}
+
+			consumeWhitespace(vector, ctx);
+
+			/* Consume optional comma after first 3 parameters */
+			if (i < 3) {
+				token = parserutils_vector_peek(vector, *ctx);
+				if (token == NULL) {
+					*ctx = orig_ctx;
+					return CSS_INVALID;
+				}
+
+				if (tokenIsChar(token, ','))
+					parserutils_vector_iterate(vector, ctx);
+			}
+		}
+
+		consumeWhitespace(vector, ctx);
+
+		/* Finally, consume closing parenthesis */
+		token = parserutils_vector_iterate(vector, ctx);
+		if (token == NULL || tokenIsChar(token, ')') == false) {
+			*ctx = orig_ctx;
+			return CSS_INVALID;
+		}
+	} else {
+		*ctx = orig_ctx;
+		return CSS_INVALID;
+	}
+
+	opv = buildOPV(CSS_PROP_CLIP, flags, value);
+
+	required_size = sizeof(opv);
+	if ((flags & FLAG_INHERIT) == false && 
+			(value & CLIP_SHAPE_MASK) == CLIP_SHAPE_RECT) {
+		required_size += 
+			num_lengths * (sizeof(length[0]) + sizeof(unit[0]));
+	}
+
+	/* Allocate result */
+	error = css_stylesheet_style_create(c->sheet, required_size, result);
+	if (error != CSS_OK) {
+		*ctx = orig_ctx;
+		return error;
+	}
+
+	/* Copy the bytecode to it */
+	memcpy((*result)->bytecode, &opv, sizeof(opv));
+	if ((flags & FLAG_INHERIT) == false && 
+			(value & CLIP_SHAPE_MASK) == CLIP_SHAPE_RECT) {
+		int i;
+		uint8_t *ptr = ((uint8_t *) (*result)->bytecode) + sizeof(opv);
+
+		for (i = 0; i < num_lengths; i++) {
+			memcpy(ptr, &length[i], sizeof(length[i]));
+			ptr += sizeof(length[i]);
+			memcpy(ptr, &unit[i], sizeof(unit[i]));
+			ptr += sizeof(unit[i]);
+		}
+	}
+
+	return CSS_OK;
+}