1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
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 <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"
/**
* 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;
}
|
