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_UINT, 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,
169 typedef struct _function_code_t
{
173 function_expression_t
*expr
; /* FIXME */
179 struct _function_code_t
*funcs
;
185 typedef struct _bytecode_t
{
191 function_code_t global_code
;
196 unsigned bstr_pool_size
;
199 parser_ctx_t
*parser
;
201 struct _bytecode_t
*next
;
204 HRESULT
compile_script(script_ctx_t
*,const WCHAR
*,const WCHAR
*,BOOL
,BOOL
,bytecode_t
**) DECLSPEC_HIDDEN
;
205 void release_bytecode(bytecode_t
*) DECLSPEC_HIDDEN
;
207 static inline void bytecode_addref(bytecode_t
*code
)
212 HRESULT
script_parse(script_ctx_t
*,const WCHAR
*,const WCHAR
*,BOOL
,parser_ctx_t
**) DECLSPEC_HIDDEN
;
213 void parser_release(parser_ctx_t
*) DECLSPEC_HIDDEN
;
215 int parser_lex(void*,parser_ctx_t
*) DECLSPEC_HIDDEN
;
217 static inline void *parser_alloc(parser_ctx_t
*ctx
, DWORD size
)
219 return jsheap_alloc(&ctx
->heap
, size
);
222 static inline void *parser_alloc_tmp(parser_ctx_t
*ctx
, DWORD size
)
224 return jsheap_alloc(&ctx
->script
->tmp_heap
, size
);
227 typedef struct _scope_chain_t
{
230 struct _scope_chain_t
*next
;
233 HRESULT
scope_push(scope_chain_t
*,jsdisp_t
*,scope_chain_t
**) DECLSPEC_HIDDEN
;
234 void scope_release(scope_chain_t
*) DECLSPEC_HIDDEN
;
236 static inline void scope_addref(scope_chain_t
*scope
)
241 typedef struct _except_frame_t except_frame_t
;
246 parser_ctx_t
*parser
;
248 script_ctx_t
*script
;
249 scope_chain_t
*scope_chain
;
252 function_code_t
*func_code
;
258 except_frame_t
*except_frame
;
264 static inline void exec_addref(exec_ctx_t
*ctx
)
269 void exec_release(exec_ctx_t
*) DECLSPEC_HIDDEN
;
270 HRESULT
create_exec_ctx(script_ctx_t
*,IDispatch
*,jsdisp_t
*,scope_chain_t
*,BOOL
,exec_ctx_t
**) DECLSPEC_HIDDEN
;
271 HRESULT
exec_source(exec_ctx_t
*,bytecode_t
*,function_code_t
*,BOOL
,jsexcept_t
*,VARIANT
*) DECLSPEC_HIDDEN
;
273 typedef struct _parameter_t parameter_t
;
275 HRESULT
create_source_function(script_ctx_t
*,bytecode_t
*,parameter_t
*,function_code_t
*,scope_chain_t
*,
276 jsdisp_t
**) DECLSPEC_HIDDEN
;
302 literal_t
*parse_regexp(parser_ctx_t
*) DECLSPEC_HIDDEN
;
303 literal_t
*new_boolean_literal(parser_ctx_t
*,VARIANT_BOOL
) DECLSPEC_HIDDEN
;
305 typedef struct _variable_declaration_t
{
306 const WCHAR
*identifier
;
309 struct _variable_declaration_t
*next
;
310 } variable_declaration_t
;
331 struct _statement_t
{
332 statement_type_t type
;
338 statement_t
*stat_list
;
343 variable_declaration_t
*variable_list
;
349 } expression_statement_t
;
354 statement_t
*if_stat
;
355 statement_t
*else_stat
;
362 statement_t
*statement
;
367 variable_declaration_t
*variable_list
;
368 expression_t
*begin_expr
;
370 expression_t
*end_expr
;
371 statement_t
*statement
;
376 variable_declaration_t
*variable
;
378 expression_t
*in_expr
;
379 statement_t
*statement
;
384 const WCHAR
*identifier
;
385 } branch_statement_t
;
390 statement_t
*statement
;
395 const WCHAR
*identifier
;
396 statement_t
*statement
;
397 } labelled_statement_t
;
399 typedef struct _case_clausule_t
{
403 struct _case_clausule_t
*next
;
409 case_clausule_t
*case_list
;
410 } switch_statement_t
;
413 const WCHAR
*identifier
;
414 statement_t
*statement
;
419 statement_t
*try_statement
;
420 catch_block_t
*catch_block
;
421 statement_t
*finally_statement
;
500 struct _expression_t
{
501 expression_type_t type
;
504 struct _parameter_t
{
505 const WCHAR
*identifier
;
507 struct _parameter_t
*next
;
510 struct _source_elements_t
{
511 statement_t
*statement
;
512 statement_t
*statement_tail
;
513 function_declaration_t
*functions
;
514 var_list_t
*variables
;
517 struct _function_expression_t
{
519 const WCHAR
*identifier
;
520 parameter_t
*parameter_list
;
521 source_elements_t
*source_elements
;
522 const WCHAR
*src_str
;
528 expression_t
*expression1
;
529 expression_t
*expression2
;
530 } binary_expression_t
;
534 expression_t
*expression
;
535 } unary_expression_t
;
539 expression_t
*expression
;
540 expression_t
*true_expression
;
541 expression_t
*false_expression
;
542 } conditional_expression_t
;
546 expression_t
*expression
;
547 const WCHAR
*identifier
;
548 } member_expression_t
;
550 typedef struct _argument_t
{
553 struct _argument_t
*next
;
558 expression_t
*expression
;
559 argument_t
*argument_list
;
564 const WCHAR
*identifier
;
565 } identifier_expression_t
;
570 } literal_expression_t
;
572 typedef struct _array_element_t
{
576 struct _array_element_t
*next
;
581 array_element_t
*element_list
;
583 } array_literal_expression_t
;
585 typedef struct _prop_val_t
{
589 struct _prop_val_t
*next
;
594 prop_val_t
*property_list
;
595 } property_value_expression_t
;