1 /*
2 * Copyright 2008 Jacek Caban for CodeWeavers
3 *
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
8 *
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
13 *
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17 */
18
19 typedef struct _source_elements_t source_elements_t;
20
21 typedef struct _parser_ctx_t {
22 LONG ref;
23
24 const WCHAR *ptr;
25 const WCHAR *begin;
26 const WCHAR *end;
27
28 script_ctx_t *script;
29 source_elements_t *source;
30 BOOL nl;
31 HRESULT hres;
32
33 jsheap_t tmp_heap;
34 jsheap_t heap;
35
36 struct _parser_ctx_t *next;
37 } parser_ctx_t;
38
39 HRESULT script_parse(script_ctx_t*,const WCHAR*,parser_ctx_t**);
40 void parser_release(parser_ctx_t*);
41
42 int parser_lex(void*,parser_ctx_t*);
43
44 static inline void parser_addref(parser_ctx_t *ctx)
45 {
46 ctx->ref++;
47 }
48
49 static inline void *parser_alloc(parser_ctx_t *ctx, DWORD size)
50 {
51 return jsheap_alloc(&ctx->heap, size);
52 }
53
54 static inline void *parser_alloc_tmp(parser_ctx_t *ctx, DWORD size)
55 {
56 return jsheap_alloc(&ctx->tmp_heap, size);
57 }
58
59 struct _exec_ctx_t {
60 LONG ref;
61
62 parser_ctx_t *parser;
63 };
64
65 static inline void exec_addref(exec_ctx_t *ctx)
66 {
67 ctx->ref++;
68 }
69
70 void exec_release(exec_ctx_t*);
71 HRESULT create_exec_ctx(exec_ctx_t**);
72 HRESULT exec_source(exec_ctx_t*,parser_ctx_t*,source_elements_t*,jsexcept_t*,VARIANT*);
73
74 typedef struct _statement_t statement_t;
75 typedef struct _expression_t expression_t;
76 typedef struct _parameter_t parameter_t;
77
78 typedef struct {
79 VARTYPE vt;
80 union {
81 LONG lval;
82 double dval;
83 const WCHAR *wstr;
84 VARIANT_BOOL bval;
85 IDispatch *disp;
86 } u;
87 } literal_t;
88
89 typedef struct _variable_declaration_t {
90 const WCHAR *identifier;
91 expression_t *expr;
92
93 struct _variable_declaration_t *next;
94 } variable_declaration_t;
95
96 typedef struct {
97 enum{
98 RT_NORMAL,
99 RT_RETURN,
100 RT_BREAK,
101 RT_CONTINUE
102 } type;
103 jsexcept_t ei;
104 } return_type_t;
105
106 typedef HRESULT (*statement_eval_t)(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
107
108 struct _statement_t {
109 statement_eval_t eval;
110 statement_t *next;
111 };
112
113 typedef struct {
114 statement_t stat;
115 statement_t *stat_list;
116 } block_statement_t;
117
118 typedef struct {
119 statement_t stat;
120 variable_declaration_t *variable_list;
121 } var_statement_t;
122
123 typedef struct {
124 statement_t stat;
125 expression_t *expr;
126 } expression_statement_t;
127
128 typedef struct {
129 statement_t stat;
130 expression_t *expr;
131 statement_t *if_stat;
132 statement_t *else_stat;
133 } if_statement_t;
134
135 typedef struct {
136 statement_t stat;
137 expression_t *expr;
138 statement_t *statement;
139 } while_statement_t;
140
141 typedef struct {
142 statement_t stat;
143 variable_declaration_t *variable_list;
144 expression_t *begin_expr;
145 expression_t *expr;
146 expression_t *end_expr;
147 statement_t *statement;
148 } for_statement_t;
149
150 typedef struct {
151 statement_t stat;
152 variable_declaration_t *variable;
153 expression_t *expr;
154 expression_t *in_expr;
155 statement_t *statement;
156 } forin_statement_t;
157
158 typedef struct {
159 statement_t stat;
160 const WCHAR *identifier;
161 } branch_statement_t;
162
163 typedef struct {
164 statement_t stat;
165 expression_t *expr;
166 statement_t *statement;
167 } with_statement_t;
168
169 typedef struct {
170 statement_t stat;
171 const WCHAR *identifier;
172 statement_t *statement;
173 } labelled_statement_t;
174
175 typedef struct _case_clausule_t {
176 expression_t *expr;
177 statement_t *stat;
178
179 struct _case_clausule_t *next;
180 } case_clausule_t;
181
182 typedef struct {
183 statement_t stat;
184 expression_t *expr;
185 case_clausule_t *case_list;
186 } switch_statement_t;
187
188 typedef struct {
189 const WCHAR *identifier;
190 statement_t *statement;
191 } catch_block_t;
192
193 typedef struct {
194 statement_t stat;
195 statement_t *try_statement;
196 catch_block_t *catch_block;
197 statement_t *finally_statement;
198 } try_statement_t;
199
200 HRESULT block_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
201 HRESULT var_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
202 HRESULT empty_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
203 HRESULT expression_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
204 HRESULT if_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
205 HRESULT dowhile_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
206 HRESULT while_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
207 HRESULT for_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
208 HRESULT forin_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
209 HRESULT continue_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
210 HRESULT break_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
211 HRESULT return_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
212 HRESULT with_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
213 HRESULT labelled_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
214 HRESULT switch_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
215 HRESULT throw_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
216 HRESULT try_statement_eval(exec_ctx_t*,statement_t*,return_type_t*,VARIANT*);
217
218 typedef struct exprval_t exprval_t;
219
220 typedef HRESULT (*expression_eval_t)(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
221
222 struct _expression_t {
223 expression_eval_t eval;
224 };
225
226 struct _parameter_t {
227 const WCHAR *identifier;
228
229 struct _parameter_t *next;
230 };
231
232 typedef struct _function_declaration_t {
233 const WCHAR *identifier;
234 parameter_t *parameter_list;
235 source_elements_t *source_elements;
236
237 struct _function_declaration_t *next;
238 } function_declaration_t;
239
240 struct _source_elements_t {
241 statement_t *statement;
242 statement_t *statement_tail;
243 function_declaration_t *functions;
244 function_declaration_t *functions_tail;
245 };
246
247 typedef struct {
248 expression_t expr;
249 const WCHAR *identifier;
250 parameter_t *parameter_list;
251 source_elements_t *source_elements;
252 } function_expression_t;
253
254 typedef struct {
255 expression_t expr;
256 expression_t *expression1;
257 expression_t *expression2;
258 } binary_expression_t;
259
260 typedef struct {
261 expression_t expr;
262 expression_t *expression;
263 } unary_expression_t;
264
265 typedef struct {
266 expression_t expr;
267 expression_t *expression;
268 expression_t *true_expression;
269 expression_t *false_expression;
270 } conditional_expression_t;
271
272 typedef struct {
273 expression_t expr;
274 expression_t *member_expr;
275 expression_t *expression;
276 } array_expression_t;
277
278 typedef struct {
279 expression_t expr;
280 expression_t *expression;
281 const WCHAR *identifier;
282 } member_expression_t;
283
284 typedef struct _argument_t {
285 expression_t *expr;
286
287 struct _argument_t *next;
288 } argument_t;
289
290 typedef struct {
291 expression_t expr;
292 expression_t *expression;
293 argument_t *argument_list;
294 } call_expression_t;
295
296 typedef struct {
297 expression_t expr;
298 const WCHAR *identifier;
299 } identifier_expression_t;
300
301 typedef struct {
302 expression_t expr;
303 literal_t *literal;
304 } literal_expression_t;
305
306 typedef struct _array_element_t {
307 int elision;
308 expression_t *expr;
309
310 struct _array_element_t *next;
311 } array_element_t;
312
313 typedef struct {
314 expression_t expr;
315 array_element_t *element_list;
316 int length;
317 } array_literal_expression_t;
318
319 typedef struct _prop_val_t {
320 literal_t *name;
321 expression_t *value;
322
323 struct _prop_val_t *next;
324 } prop_val_t;
325
326 typedef struct {
327 expression_t expr;
328 prop_val_t *property_list;
329 } property_value_expression_t;
330
331 typedef enum {
332 EXPR_COMMA,
333 EXPR_OR,
334 EXPR_AND,
335 EXPR_BOR,
336 EXPR_BXOR,
337 EXPR_BAND,
338 EXPR_INSTANCEOF,
339 EXPR_IN,
340 EXPR_ADD,
341 EXPR_SUB,
342 EXPR_MUL,
343 EXPR_DIV,
344 EXPR_MOD,
345 EXPR_DELETE,
346 EXPR_VOID,
347 EXPR_TYPEOF,
348 EXPR_MINUS,
349 EXPR_PLUS,
350 EXPR_POSTINC,
351 EXPR_POSTDEC,
352 EXPR_PREINC,
353 EXPR_PREDEC,
354 EXPR_NEW,
355 EXPR_EQ,
356 EXPR_EQEQ,
357 EXPR_NOTEQ,
358 EXPR_NOTEQEQ,
359 EXPR_LESS,
360 EXPR_LESSEQ,
361 EXPR_GREATER,
362 EXPR_GREATEREQ,
363 EXPR_BITNEG,
364 EXPR_LOGNEG,
365 EXPR_LSHIFT,
366 EXPR_RSHIFT,
367 EXPR_RRSHIFT,
368 EXPR_ASSIGN,
369 EXPR_ASSIGNLSHIFT,
370 EXPR_ASSIGNRSHIFT,
371 EXPR_ASSIGNRRSHIFT,
372 EXPR_ASSIGNADD,
373 EXPR_ASSIGNSUB,
374 EXPR_ASSIGNMUL,
375 EXPR_ASSIGNDIV,
376 EXPR_ASSIGNMOD,
377 EXPR_ASSIGNAND,
378 EXPR_ASSIGNOR,
379 EXPR_ASSIGNXOR
380 } expression_type_t;
381
382 HRESULT function_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
383 HRESULT conditional_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
384 HRESULT array_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
385 HRESULT member_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
386 HRESULT member_new_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
387 HRESULT call_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
388 HRESULT this_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
389 HRESULT identifier_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
390 HRESULT literal_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
391 HRESULT array_literal_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
392 HRESULT property_value_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
393
394 HRESULT comma_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
395 HRESULT logical_or_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
396 HRESULT logical_and_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
397 HRESULT binary_or_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
398 HRESULT binary_xor_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
399 HRESULT binary_and_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
400 HRESULT instanceof_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
401 HRESULT in_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
402 HRESULT add_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
403 HRESULT sub_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
404 HRESULT mul_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
405 HRESULT div_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
406 HRESULT mod_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
407 HRESULT delete_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
408 HRESULT void_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
409 HRESULT typeof_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
410 HRESULT minus_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
411 HRESULT plus_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
412 HRESULT post_increment_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
413 HRESULT post_decrement_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
414 HRESULT pre_increment_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
415 HRESULT pre_decrement_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
416 HRESULT new_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
417 HRESULT equal_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
418 HRESULT equal2_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
419 HRESULT not_equal_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
420 HRESULT not_equal2_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
421 HRESULT less_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
422 HRESULT lesseq_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
423 HRESULT greater_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
424 HRESULT greatereq_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
425 HRESULT binary_negation_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
426 HRESULT logical_negation_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
427 HRESULT left_shift_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
428 HRESULT right_shift_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
429 HRESULT right2_shift_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
430 HRESULT assign_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
431 HRESULT assign_lshift_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
432 HRESULT assign_rshift_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
433 HRESULT assign_rrshift_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
434 HRESULT assign_add_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
435 HRESULT assign_sub_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
436 HRESULT assign_mul_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
437 HRESULT assign_div_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
438 HRESULT assign_mod_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
439 HRESULT assign_and_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
440 HRESULT assign_or_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
441 HRESULT assign_xor_expression_eval(exec_ctx_t*,expression_t*,DWORD,jsexcept_t*,exprval_t*);
442
This page was automatically generated by the
LXR engine.
Visit the LXR main site for more
information.