2 * Copyright 2008,2011 Jacek Caban for CodeWeavers
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.
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.
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
19 typedef struct _source_elements_t source_elements_t;
20 typedef struct _function_expression_t function_expression_t;
21 typedef struct _expression_t expression_t;
22 typedef struct _statement_t statement_t;
24 typedef struct _function_declaration_t {
25 function_expression_t *expr;
27 struct _function_declaration_t *next;
28 } function_declaration_t;
30 typedef struct _var_list_t {
31 const WCHAR *identifier;
33 struct _var_list_t *next;
36 typedef struct _func_stack {
37 function_declaration_t *func_head;
38 function_declaration_t *func_tail;
42 struct _func_stack *next;
51 source_elements_t *source;
59 func_stack_t *func_stack;
67 X(assign_call,1, ARG_UINT, 0) \
68 X(bool, 1, ARG_INT, 0) \
70 X(call, 1, ARG_UINT, ARG_UINT) \
71 X(call_member,1, ARG_UINT, ARG_UINT) \
72 X(carray, 1, ARG_UINT, 0) \
73 X(case, 0, ARG_ADDR, 0) \
74 X(cnd_nz, 0, ARG_ADDR, 0) \
75 X(cnd_z, 0, ARG_ADDR, 0) \
77 X(delete_ident,1,ARG_BSTR, 0) \
79 X(double, 1, ARG_DBL, 0) \
80 X(end_finally,1, 0,0) \
83 X(forin, 0, ARG_ADDR, 0) \
84 X(func, 1, ARG_FUNC, 0) \
87 X(ident, 1, ARG_BSTR, 0) \
88 X(identid, 1, ARG_BSTR, ARG_INT) \
90 X(instanceof, 1, 0,0) \
91 X(int, 1, ARG_INT, 0) \
92 X(jmp, 0, ARG_ADDR, 0) \
93 X(jmp_z, 0, ARG_ADDR, 0) \
97 X(member, 1, ARG_BSTR, 0) \
98 X(memberid, 1, ARG_UINT, 0) \
105 X(new, 1, ARG_INT, 0) \
108 X(obj_prop, 1, ARG_BSTR, 0) \
111 X(pop_except, 1, 0,0) \
112 X(pop_scope, 1, 0,0) \
113 X(postinc, 1, ARG_INT, 0) \
114 X(preinc, 1, ARG_INT, 0) \
115 X(push_except,1, ARG_ADDR, ARG_BSTR) \
116 X(push_scope, 1, 0,0) \
117 X(regexp, 1, ARG_STR, ARG_INT) \
120 X(str, 1, ARG_STR, 0) \
123 X(throw_ref, 0, ARG_UINT, 0) \
124 X(throw_type, 0, ARG_UINT, ARG_STR) \
127 X(typeofid, 1, 0,0) \
128 X(typeofident,1, 0,0) \
132 X(undefined, 1, 0,0) \
133 X(var_set, 1, ARG_BSTR, 0) \
138 #define X(x,a,b,c) OP_##x,
150 function_expression_t *func; /* FIXME */
170 typedef struct _bytecode_t {
179 unsigned bstr_pool_size;
182 parser_ctx_t *parser;
184 struct _bytecode_t *next;
187 HRESULT compile_script(script_ctx_t*,const WCHAR*,const WCHAR*,BOOL,BOOL,bytecode_t**) DECLSPEC_HIDDEN;
188 void release_bytecode(bytecode_t*) DECLSPEC_HIDDEN;
190 static inline void bytecode_addref(bytecode_t *code)
195 HRESULT script_parse(script_ctx_t*,const WCHAR*,const WCHAR*,BOOL,parser_ctx_t**) DECLSPEC_HIDDEN;
196 void parser_release(parser_ctx_t*) DECLSPEC_HIDDEN;
198 int parser_lex(void*,parser_ctx_t*) DECLSPEC_HIDDEN;
200 static inline void *parser_alloc(parser_ctx_t *ctx, DWORD size)
202 return jsheap_alloc(&ctx->heap, size);
205 static inline void *parser_alloc_tmp(parser_ctx_t *ctx, DWORD size)
207 return jsheap_alloc(&ctx->script->tmp_heap, size);
210 typedef struct _scope_chain_t {
213 struct _scope_chain_t *next;
216 HRESULT scope_push(scope_chain_t*,jsdisp_t*,scope_chain_t**) DECLSPEC_HIDDEN;
217 void scope_release(scope_chain_t*) DECLSPEC_HIDDEN;
219 static inline void scope_addref(scope_chain_t *scope)
224 typedef struct _except_frame_t except_frame_t;
229 parser_ctx_t *parser;
231 script_ctx_t *script;
232 scope_chain_t *scope_chain;
240 except_frame_t *except_frame;
246 static inline void exec_addref(exec_ctx_t *ctx)
251 void exec_release(exec_ctx_t*) DECLSPEC_HIDDEN;
252 HRESULT create_exec_ctx(script_ctx_t*,IDispatch*,jsdisp_t*,scope_chain_t*,BOOL,exec_ctx_t**) DECLSPEC_HIDDEN;
253 HRESULT exec_source(exec_ctx_t*,bytecode_t*,source_elements_t*,BOOL,jsexcept_t*,VARIANT*) DECLSPEC_HIDDEN;
255 typedef struct _parameter_t parameter_t;
257 HRESULT create_source_function(script_ctx_t*,bytecode_t*,parameter_t*,source_elements_t*,scope_chain_t*,
258 const WCHAR*,DWORD,jsdisp_t**) DECLSPEC_HIDDEN;
284 literal_t *parse_regexp(parser_ctx_t*) DECLSPEC_HIDDEN;
285 literal_t *new_boolean_literal(parser_ctx_t*,VARIANT_BOOL) DECLSPEC_HIDDEN;
287 typedef struct _variable_declaration_t {
288 const WCHAR *identifier;
291 struct _variable_declaration_t *next;
292 } variable_declaration_t;
313 struct _statement_t {
314 statement_type_t type;
320 statement_t *stat_list;
325 variable_declaration_t *variable_list;
331 } expression_statement_t;
336 statement_t *if_stat;
337 statement_t *else_stat;
344 statement_t *statement;
349 variable_declaration_t *variable_list;
350 expression_t *begin_expr;
352 expression_t *end_expr;
353 statement_t *statement;
358 variable_declaration_t *variable;
360 expression_t *in_expr;
361 statement_t *statement;
366 const WCHAR *identifier;
367 } branch_statement_t;
372 statement_t *statement;
377 const WCHAR *identifier;
378 statement_t *statement;
379 } labelled_statement_t;
381 typedef struct _case_clausule_t {
385 struct _case_clausule_t *next;
391 case_clausule_t *case_list;
392 } switch_statement_t;
395 const WCHAR *identifier;
396 statement_t *statement;
401 statement_t *try_statement;
402 catch_block_t *catch_block;
403 statement_t *finally_statement;
482 struct _expression_t {
483 expression_type_t type;
486 struct _parameter_t {
487 const WCHAR *identifier;
489 struct _parameter_t *next;
492 struct _source_elements_t {
493 statement_t *statement;
494 statement_t *statement_tail;
495 function_declaration_t *functions;
496 var_list_t *variables;
500 struct _function_expression_t {
502 const WCHAR *identifier;
503 parameter_t *parameter_list;
504 source_elements_t *source_elements;
505 const WCHAR *src_str;
511 expression_t *expression1;
512 expression_t *expression2;
513 } binary_expression_t;
517 expression_t *expression;
518 } unary_expression_t;
522 expression_t *expression;
523 expression_t *true_expression;
524 expression_t *false_expression;
525 } conditional_expression_t;
529 expression_t *expression;
530 const WCHAR *identifier;
531 } member_expression_t;
533 typedef struct _argument_t {
536 struct _argument_t *next;
541 expression_t *expression;
542 argument_t *argument_list;
547 const WCHAR *identifier;
548 } identifier_expression_t;
553 } literal_expression_t;
555 typedef struct _array_element_t {
559 struct _array_element_t *next;
564 array_element_t *element_list;
566 } array_literal_expression_t;
568 typedef struct _prop_val_t {
572 struct _prop_val_t *next;
577 prop_val_t *property_list;
578 } property_value_expression_t;