2 * Copyright 2008-2009 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
34 #include "wine/list.h"
35 #include "wine/rbtree.h"
38 * This is Wine jscript extension for ES5 compatible mode. Native IE9+ implements
39 * a separated JavaScript enging in side MSHTML. We implement its features here
40 * and enable it when HTML flag is specified in SCRIPTPROP_INVOKEVERSIONING property.
42 #define SCRIPTLANGUAGEVERSION_HTML 0x400
45 * This is Wine jscript extension for ES5 and ES6 compatible mode. Allowed only in HTML mode.
47 #define SCRIPTLANGUAGEVERSION_ES5 0x102
48 #define SCRIPTLANGUAGEVERSION_ES6 0x103
50 typedef struct _jsval_t jsval_t
;
51 typedef struct _jsstr_t jsstr_t
;
52 typedef struct _jsexcept_t jsexcept_t
;
53 typedef struct _script_ctx_t script_ctx_t
;
54 typedef struct _dispex_prop_t dispex_prop_t
;
55 typedef struct _property_desc_t property_desc_t
;
63 struct list custom_blocks
;
66 void heap_pool_init(heap_pool_t
*);
67 void *heap_pool_alloc(heap_pool_t
*,DWORD
) __WINE_ALLOC_SIZE(2);
68 void *heap_pool_grow(heap_pool_t
*,void*,DWORD
,DWORD
);
69 void heap_pool_clear(heap_pool_t
*);
70 void heap_pool_free(heap_pool_t
*);
71 heap_pool_t
*heap_pool_mark(heap_pool_t
*);
73 typedef struct jsdisp_t jsdisp_t
;
75 extern HINSTANCE jscript_hinstance
;
76 HRESULT
get_dispatch_typeinfo(ITypeInfo
**);
78 #define PROPF_ARGMASK 0x00ff
79 #define PROPF_METHOD 0x0100
80 #define PROPF_CONSTR 0x0200
82 #define PROPF_ENUMERABLE 0x0400
83 #define PROPF_WRITABLE 0x0800
84 #define PROPF_CONFIGURABLE 0x1000
85 #define PROPF_ALL (PROPF_ENUMERABLE | PROPF_WRITABLE | PROPF_CONFIGURABLE)
87 #define PROPF_VERSION_MASK 0x01ff0000
88 #define PROPF_VERSION_SHIFT 16
89 #define PROPF_HTML (SCRIPTLANGUAGEVERSION_HTML << PROPF_VERSION_SHIFT)
90 #define PROPF_ES5 ((SCRIPTLANGUAGEVERSION_HTML|SCRIPTLANGUAGEVERSION_ES5) << PROPF_VERSION_SHIFT)
91 #define PROPF_ES6 ((SCRIPTLANGUAGEVERSION_HTML|SCRIPTLANGUAGEVERSION_ES6) << PROPF_VERSION_SHIFT)
94 * This is our internal dispatch flag informing calee that it's called directly from interpreter.
95 * If calee is executed as interpreted function, we may let already running interpreter to take
98 #define DISPATCH_JSCRIPT_CALLEREXECSSOURCE 0x8000
99 #define DISPATCH_JSCRIPT_INTERNAL_MASK DISPATCH_JSCRIPT_CALLEREXECSSOURCE
101 /* NOTE: Keep in sync with names in Object.toString implementation */
126 jsdisp_t
*iface_to_jsdisp(IDispatch
*);
128 typedef HRESULT (*builtin_invoke_t
)(script_ctx_t
*,jsval_t
,WORD
,unsigned,jsval_t
*,jsval_t
*);
129 typedef HRESULT (*builtin_getter_t
)(script_ctx_t
*,jsdisp_t
*,jsval_t
*);
130 typedef HRESULT (*builtin_setter_t
)(script_ctx_t
*,jsdisp_t
*,jsval_t
);
132 HRESULT
builtin_set_const(script_ctx_t
*,jsdisp_t
*,jsval_t
);
138 BOOL gc_is_unlinking
;
142 struct rb_tree weak_refs
;
145 struct thread_data
*get_thread_data(void);
146 void release_thread_data(struct thread_data
*);
148 typedef struct named_item_t
{
149 jsdisp_t
*script_obj
;
160 enum gc_traverse_op
{
162 GC_TRAVERSE_SPECULATIVELY
,
166 HRESULT
create_named_item_script_obj(script_ctx_t
*,named_item_t
*);
167 named_item_t
*lookup_named_item(script_ctx_t
*,const WCHAR
*,unsigned);
168 void release_named_item(named_item_t
*);
169 HRESULT
gc_run(script_ctx_t
*);
170 HRESULT
gc_process_linked_obj(struct gc_ctx
*,enum gc_traverse_op
,jsdisp_t
*,jsdisp_t
*,void**);
171 HRESULT
gc_process_linked_val(struct gc_ctx
*,enum gc_traverse_op
,jsdisp_t
*,jsval_t
*);
175 builtin_invoke_t invoke
;
177 builtin_getter_t getter
;
178 builtin_setter_t setter
;
183 builtin_invoke_t call
;
185 const builtin_prop_t
*props
;
186 void (*destructor
)(jsdisp_t
*);
187 void (*on_put
)(jsdisp_t
*,const WCHAR
*);
188 unsigned (*idx_length
)(jsdisp_t
*);
189 HRESULT (*idx_get
)(jsdisp_t
*,unsigned,jsval_t
*);
190 HRESULT (*idx_put
)(jsdisp_t
*,unsigned,jsval_t
);
191 HRESULT (*gc_traverse
)(struct gc_ctx
*,enum gc_traverse_op
,jsdisp_t
*);
195 IDispatchEx IDispatchEx_iface
;
199 BOOLEAN has_weak_refs
;
205 dispex_prop_t
*props
;
210 const builtin_info_t
*builtin_info
;
214 static inline IDispatch
*to_disp(jsdisp_t
*jsdisp
)
216 return (IDispatch
*)&jsdisp
->IDispatchEx_iface
;
219 static inline IDispatchEx
*to_dispex(jsdisp_t
*jsdisp
)
221 return &jsdisp
->IDispatchEx_iface
;
224 jsdisp_t
*as_jsdisp(IDispatch
*);
225 jsdisp_t
*to_jsdisp(IDispatch
*);
226 void jsdisp_free(jsdisp_t
*);
231 * We do a lot of refcount calls during script execution, so having an inline
232 * version is a nice perf win. Define TRACE_REFCNT macro when debugging
233 * refcount bugs to have traces. Also, since jsdisp_t is not thread safe anyways,
234 * there is no point in using atomic operations.
236 static inline jsdisp_t
*jsdisp_addref(jsdisp_t
*jsdisp
)
242 static inline void jsdisp_release(jsdisp_t
*jsdisp
)
250 jsdisp_t
*jsdisp_addref(jsdisp_t
*);
251 void jsdisp_release(jsdisp_t
*);
255 enum jsdisp_enum_type
{
258 JSDISP_ENUM_OWN_ENUMERABLE
261 HRESULT
create_dispex(script_ctx_t
*,const builtin_info_t
*,jsdisp_t
*,jsdisp_t
**);
262 HRESULT
init_dispex(jsdisp_t
*,script_ctx_t
*,const builtin_info_t
*,jsdisp_t
*);
263 HRESULT
init_dispex_from_constr(jsdisp_t
*,script_ctx_t
*,const builtin_info_t
*,jsdisp_t
*);
265 HRESULT
disp_call(script_ctx_t
*,IDispatch
*,DISPID
,WORD
,unsigned,jsval_t
*,jsval_t
*);
266 HRESULT
disp_call_name(script_ctx_t
*,IDispatch
*,const WCHAR
*,WORD
,unsigned,jsval_t
*,jsval_t
*);
267 HRESULT
disp_call_value_with_caller(script_ctx_t
*,IDispatch
*,jsval_t
,WORD
,unsigned,jsval_t
*,jsval_t
*,IServiceProvider
*);
268 HRESULT
jsdisp_call_value(jsdisp_t
*,jsval_t
,WORD
,unsigned,jsval_t
*,jsval_t
*);
269 HRESULT
jsdisp_call(jsdisp_t
*,DISPID
,WORD
,unsigned,jsval_t
*,jsval_t
*);
270 HRESULT
jsdisp_call_name(jsdisp_t
*,const WCHAR
*,WORD
,unsigned,jsval_t
*,jsval_t
*);
271 HRESULT
disp_propget(script_ctx_t
*,IDispatch
*,DISPID
,jsval_t
*);
272 HRESULT
disp_propput(script_ctx_t
*,IDispatch
*,DISPID
,jsval_t
);
273 HRESULT
disp_propput_name(script_ctx_t
*,IDispatch
*,const WCHAR
*,jsval_t
);
274 HRESULT
jsdisp_propget(jsdisp_t
*,DISPID
,jsval_t
*);
275 HRESULT
jsdisp_propput(jsdisp_t
*,const WCHAR
*,DWORD
,BOOL
,jsval_t
);
276 HRESULT
jsdisp_propput_name(jsdisp_t
*,const WCHAR
*,jsval_t
);
277 HRESULT
jsdisp_propput_idx(jsdisp_t
*,DWORD
,jsval_t
);
278 HRESULT
jsdisp_propget_name(jsdisp_t
*,LPCWSTR
,jsval_t
*);
279 HRESULT
jsdisp_get_idx(jsdisp_t
*,DWORD
,jsval_t
*);
280 HRESULT
jsdisp_get_id(jsdisp_t
*,const WCHAR
*,DWORD
,DISPID
*);
281 HRESULT
jsdisp_get_idx_id(jsdisp_t
*,DWORD
,DISPID
*);
282 HRESULT
disp_delete(IDispatch
*,DISPID
,BOOL
*);
283 HRESULT
disp_delete_name(script_ctx_t
*,IDispatch
*,jsstr_t
*,BOOL
*);
284 HRESULT
jsdisp_delete_idx(jsdisp_t
*,DWORD
);
285 HRESULT
jsdisp_get_own_property(jsdisp_t
*,const WCHAR
*,BOOL
,property_desc_t
*);
286 HRESULT
jsdisp_define_property(jsdisp_t
*,const WCHAR
*,property_desc_t
*);
287 HRESULT
jsdisp_define_data_property(jsdisp_t
*,const WCHAR
*,unsigned,jsval_t
);
288 HRESULT
jsdisp_next_prop(jsdisp_t
*,DISPID
,enum jsdisp_enum_type
,DISPID
*);
289 HRESULT
jsdisp_get_prop_name(jsdisp_t
*,DISPID
,jsstr_t
**);
290 HRESULT
jsdisp_change_prototype(jsdisp_t
*,jsdisp_t
*);
291 void jsdisp_freeze(jsdisp_t
*,BOOL
);
292 BOOL
jsdisp_is_frozen(jsdisp_t
*,BOOL
);
294 HRESULT
create_builtin_function(script_ctx_t
*,builtin_invoke_t
,const WCHAR
*,const builtin_info_t
*,DWORD
,
295 jsdisp_t
*,jsdisp_t
**);
296 HRESULT
create_builtin_constructor(script_ctx_t
*,builtin_invoke_t
,const WCHAR
*,const builtin_info_t
*,DWORD
,
297 jsdisp_t
*,jsdisp_t
**);
298 HRESULT
Function_invoke(jsdisp_t
*,jsval_t
,WORD
,unsigned,jsval_t
*,jsval_t
*);
300 HRESULT
Function_value(script_ctx_t
*,jsval_t
,WORD
,unsigned,jsval_t
*,jsval_t
*);
301 HRESULT
Function_get_value(script_ctx_t
*,jsdisp_t
*,jsval_t
*);
302 struct _function_code_t
*Function_get_code(jsdisp_t
*);
304 HRESULT
throw_error(script_ctx_t
*,HRESULT
,const WCHAR
*);
305 jsdisp_t
*create_builtin_error(script_ctx_t
*ctx
);
307 HRESULT
create_object(script_ctx_t
*,jsdisp_t
*,jsdisp_t
**);
308 HRESULT
create_math(script_ctx_t
*,jsdisp_t
**);
309 HRESULT
create_array(script_ctx_t
*,DWORD
,jsdisp_t
**);
310 HRESULT
create_regexp(script_ctx_t
*,jsstr_t
*,DWORD
,jsdisp_t
**);
311 HRESULT
create_regexp_var(script_ctx_t
*,jsval_t
,jsval_t
*,jsdisp_t
**);
312 HRESULT
create_string(script_ctx_t
*,jsstr_t
*,jsdisp_t
**);
313 HRESULT
create_bool(script_ctx_t
*,BOOL
,jsdisp_t
**);
314 HRESULT
create_number(script_ctx_t
*,double,jsdisp_t
**);
315 HRESULT
create_vbarray(script_ctx_t
*,SAFEARRAY
*,jsdisp_t
**);
316 HRESULT
create_json(script_ctx_t
*,jsdisp_t
**);
324 HRESULT
to_primitive(script_ctx_t
*,jsval_t
,jsval_t
*, hint_t
);
325 HRESULT
to_boolean(jsval_t
,BOOL
*);
326 HRESULT
to_number(script_ctx_t
*,jsval_t
,double*);
327 HRESULT
to_integer(script_ctx_t
*,jsval_t
,double*);
328 HRESULT
to_int32(script_ctx_t
*,jsval_t
,INT
*);
329 HRESULT
to_long(script_ctx_t
*,jsval_t
,LONG
*);
330 HRESULT
to_uint32(script_ctx_t
*,jsval_t
,UINT32
*);
331 HRESULT
to_string(script_ctx_t
*,jsval_t
,jsstr_t
**);
332 HRESULT
to_flat_string(script_ctx_t
*,jsval_t
,jsstr_t
**,const WCHAR
**);
333 HRESULT
to_object(script_ctx_t
*,jsval_t
,IDispatch
**);
335 HRESULT
jsval_strict_equal(jsval_t
,jsval_t
,BOOL
*);
337 HRESULT
variant_change_type(script_ctx_t
*,VARIANT
*,VARIANT
*,VARTYPE
);
338 HRESULT
variant_date_to_number(double,double*);
339 HRESULT
variant_date_to_string(script_ctx_t
*,double,jsstr_t
**);
341 HRESULT
decode_source(WCHAR
*);
343 HRESULT
double_to_string(double,jsstr_t
**);
344 WCHAR
*idx_to_str(DWORD
,WCHAR
*);
346 static inline BOOL
is_digit(WCHAR c
)
348 return '0' <= c
&& c
<= '9';
351 typedef struct _cc_var_t cc_var_t
;
357 void release_cc(cc_ctx_t
*);
359 #define SP_CALLER_UNINITIALIZED ((IServiceProvider*)IntToPtr(-1))
362 IServiceProvider IServiceProvider_iface
;
367 IServiceProvider
*caller
;
372 struct _property_desc_t
{
377 BOOL explicit_getter
;
379 BOOL explicit_setter
;
388 struct weak_refs_entry
{
389 struct rb_entry entry
;
393 struct _script_ctx_t
{
397 IActiveScript
*active_script
;
399 struct thread_data
*thread_data
;
400 struct _call_frame_t
*call_ctx
;
401 struct list named_items
;
402 IActiveScriptSite
*site
;
403 IInternetHostSecurityManager
*secmgr
;
412 heap_pool_t tmp_heap
;
419 match_result_t match_parens
[9];
420 DWORD last_match_index
;
421 DWORD last_match_length
;
426 jsdisp_t
*function_constr
;
427 jsdisp_t
*array_constr
;
428 jsdisp_t
*bool_constr
;
429 jsdisp_t
*date_constr
;
430 jsdisp_t
*enumerator_constr
;
431 jsdisp_t
*error_constr
;
432 jsdisp_t
*eval_error_constr
;
433 jsdisp_t
*range_error_constr
;
434 jsdisp_t
*reference_error_constr
;
435 jsdisp_t
*regexp_error_constr
;
436 jsdisp_t
*syntax_error_constr
;
437 jsdisp_t
*type_error_constr
;
438 jsdisp_t
*uri_error_constr
;
439 jsdisp_t
*number_constr
;
440 jsdisp_t
*object_constr
;
441 jsdisp_t
*object_prototype
;
442 jsdisp_t
*regexp_constr
;
443 jsdisp_t
*string_constr
;
444 jsdisp_t
*vbarray_constr
;
445 jsdisp_t
*arraybuf_constr
;
446 jsdisp_t
*dataview_constr
;
447 jsdisp_t
*map_prototype
;
448 jsdisp_t
*set_prototype
;
449 jsdisp_t
*weakmap_prototype
;
451 jsdisp_t
*global_objects
[25];
454 C_ASSERT(RTL_SIZEOF_THROUGH_FIELD(script_ctx_t
, weakmap_prototype
) == RTL_SIZEOF_THROUGH_FIELD(script_ctx_t
, global_objects
));
456 struct weakmap_entry
{
457 struct rb_entry entry
;
461 struct list weak_refs_entry
;
463 void remove_weakmap_entry(struct weakmap_entry
*);
465 void script_release(script_ctx_t
*);
467 static inline void script_addref(script_ctx_t
*ctx
)
472 HRESULT
init_global(script_ctx_t
*);
473 HRESULT
init_function_constr(script_ctx_t
*,jsdisp_t
*);
474 HRESULT
create_object_prototype(script_ctx_t
*,jsdisp_t
**);
475 HRESULT
init_set_constructor(script_ctx_t
*);
476 HRESULT
init_arraybuf_constructors(script_ctx_t
*);
478 HRESULT
create_activex_constr(script_ctx_t
*,jsdisp_t
**);
479 HRESULT
create_array_constr(script_ctx_t
*,jsdisp_t
*,jsdisp_t
**);
480 HRESULT
create_bool_constr(script_ctx_t
*,jsdisp_t
*,jsdisp_t
**);
481 HRESULT
create_date_constr(script_ctx_t
*,jsdisp_t
*,jsdisp_t
**);
482 HRESULT
init_error_constr(script_ctx_t
*,jsdisp_t
*);
483 HRESULT
create_enumerator_constr(script_ctx_t
*,jsdisp_t
*,jsdisp_t
**);
484 HRESULT
create_number_constr(script_ctx_t
*,jsdisp_t
*,jsdisp_t
**);
485 HRESULT
create_object_constr(script_ctx_t
*,jsdisp_t
*,jsdisp_t
**);
486 HRESULT
create_regexp_constr(script_ctx_t
*,jsdisp_t
*,jsdisp_t
**);
487 HRESULT
create_string_constr(script_ctx_t
*,jsdisp_t
*,jsdisp_t
**);
488 HRESULT
create_vbarray_constr(script_ctx_t
*,jsdisp_t
*,jsdisp_t
**);
490 IUnknown
*create_ax_site(script_ctx_t
*);
491 HRESULT
create_jscaller(script_ctx_t
*);
493 #define REM_CHECK_GLOBAL 0x0001
494 #define REM_RESET_INDEX 0x0002
495 #define REM_NO_CTX_UPDATE 0x0004
496 #define REM_ALLOC_RESULT 0x0008
497 #define REM_NO_PARENS 0x0010
498 struct match_state_t
;
499 HRESULT
regexp_match_next(script_ctx_t
*,jsdisp_t
*,DWORD
,jsstr_t
*,struct match_state_t
**);
500 HRESULT
parse_regexp_flags(const WCHAR
*,DWORD
,DWORD
*);
501 HRESULT
regexp_string_match(script_ctx_t
*,jsdisp_t
*,jsstr_t
*,jsval_t
*);
503 BOOL
bool_obj_value(jsdisp_t
*);
504 unsigned array_get_length(jsdisp_t
*);
505 HRESULT
localize_number(script_ctx_t
*,DOUBLE
,BOOL
,jsstr_t
**);
507 BOOL
is_builtin_eval_func(jsdisp_t
*);
508 HRESULT
builtin_eval(script_ctx_t
*,struct _call_frame_t
*,WORD
,unsigned,jsval_t
*,jsval_t
*);
509 HRESULT
JSGlobal_eval(script_ctx_t
*,jsval_t
,WORD
,unsigned,jsval_t
*,jsval_t
*);
510 HRESULT
Object_get_proto_(script_ctx_t
*,jsval_t
,WORD
,unsigned,jsval_t
*,jsval_t
*);
511 HRESULT
Object_set_proto_(script_ctx_t
*,jsval_t
,WORD
,unsigned,jsval_t
*,jsval_t
*);
513 static inline BOOL
is_class(jsdisp_t
*jsdisp
, jsclass_t
class)
515 return jsdisp
->builtin_info
->class == class;
518 static inline BOOL
is_int32(double d
)
520 return INT32_MIN
<= d
&& d
<= INT32_MAX
&& (double)(int)d
== d
;
523 static inline DWORD
make_grfdex(script_ctx_t
*ctx
, DWORD flags
)
525 return ((ctx
->version
& 0xff) << 28) | flags
;
528 static inline HRESULT
disp_call_value(script_ctx_t
*ctx
, IDispatch
*disp
, jsval_t vthis
, WORD flags
, unsigned argc
,
529 jsval_t
*argv
, jsval_t
*r
)
531 return disp_call_value_with_caller(ctx
, disp
, vthis
, flags
, argc
, argv
, r
, &ctx
->jscaller
->IServiceProvider_iface
);
534 #define MAKE_JSERROR(code) MAKE_HRESULT(SEVERITY_ERROR, FACILITY_CONTROL, code)
536 #define JS_E_TO_PRIMITIVE MAKE_JSERROR(IDS_TO_PRIMITIVE)
537 #define JS_E_INVALIDARG MAKE_JSERROR(IDS_INVALID_CALL_ARG)
538 #define JS_E_SUBSCRIPT_OUT_OF_RANGE MAKE_JSERROR(IDS_SUBSCRIPT_OUT_OF_RANGE)
539 #define JS_E_STACK_OVERFLOW MAKE_JSERROR(IDS_STACK_OVERFLOW)
540 #define JS_E_OBJECT_REQUIRED MAKE_JSERROR(IDS_OBJECT_REQUIRED)
541 #define JS_E_CANNOT_CREATE_OBJ MAKE_JSERROR(IDS_CREATE_OBJ_ERROR)
542 #define JS_E_INVALID_PROPERTY MAKE_JSERROR(IDS_NO_PROPERTY)
543 #define JS_E_INVALID_ACTION MAKE_JSERROR(IDS_UNSUPPORTED_ACTION)
544 #define JS_E_MISSING_ARG MAKE_JSERROR(IDS_ARG_NOT_OPT)
545 #define JS_E_SYNTAX MAKE_JSERROR(IDS_SYNTAX_ERROR)
546 #define JS_E_MISSING_SEMICOLON MAKE_JSERROR(IDS_SEMICOLON)
547 #define JS_E_MISSING_LBRACKET MAKE_JSERROR(IDS_LBRACKET)
548 #define JS_E_MISSING_RBRACKET MAKE_JSERROR(IDS_RBRACKET)
549 #define JS_E_EXPECTED_IDENTIFIER MAKE_JSERROR(IDS_EXPECTED_IDENTIFIER)
550 #define JS_E_EXPECTED_ASSIGN MAKE_JSERROR(IDS_EXPECTED_ASSIGN)
551 #define JS_E_INVALID_CHAR MAKE_JSERROR(IDS_INVALID_CHAR)
552 #define JS_E_UNTERMINATED_STRING MAKE_JSERROR(IDS_UNTERMINATED_STR)
553 #define JS_E_MISPLACED_RETURN MAKE_JSERROR(IDS_MISPLACED_RETURN)
554 #define JS_E_INVALID_BREAK MAKE_JSERROR(IDS_INVALID_BREAK)
555 #define JS_E_INVALID_CONTINUE MAKE_JSERROR(IDS_INVALID_CONTINUE)
556 #define JS_E_LABEL_REDEFINED MAKE_JSERROR(IDS_LABEL_REDEFINED)
557 #define JS_E_LABEL_NOT_FOUND MAKE_JSERROR(IDS_LABEL_NOT_FOUND)
558 #define JS_E_EXPECTED_CCEND MAKE_JSERROR(IDS_EXPECTED_CCEND)
559 #define JS_E_DISABLED_CC MAKE_JSERROR(IDS_DISABLED_CC)
560 #define JS_E_EXPECTED_AT MAKE_JSERROR(IDS_EXPECTED_AT)
561 #define JS_E_FUNCTION_EXPECTED MAKE_JSERROR(IDS_NOT_FUNC)
562 #define JS_E_DATE_EXPECTED MAKE_JSERROR(IDS_NOT_DATE)
563 #define JS_E_NUMBER_EXPECTED MAKE_JSERROR(IDS_NOT_NUM)
564 #define JS_E_OBJECT_EXPECTED MAKE_JSERROR(IDS_OBJECT_EXPECTED)
565 #define JS_E_ILLEGAL_ASSIGN MAKE_JSERROR(IDS_ILLEGAL_ASSIGN)
566 #define JS_E_UNDEFINED_VARIABLE MAKE_JSERROR(IDS_UNDEFINED)
567 #define JS_E_BOOLEAN_EXPECTED MAKE_JSERROR(IDS_NOT_BOOL)
568 #define JS_E_VBARRAY_EXPECTED MAKE_JSERROR(IDS_NOT_VBARRAY)
569 #define JS_E_INVALID_DELETE MAKE_JSERROR(IDS_INVALID_DELETE)
570 #define JS_E_JSCRIPT_EXPECTED MAKE_JSERROR(IDS_JSCRIPT_EXPECTED)
571 #define JS_E_ENUMERATOR_EXPECTED MAKE_JSERROR(IDS_ENUMERATOR_EXPECTED)
572 #define JS_E_REGEXP_EXPECTED MAKE_JSERROR(IDS_REGEXP_EXPECTED)
573 #define JS_E_REGEXP_SYNTAX MAKE_JSERROR(IDS_REGEXP_SYNTAX_ERROR)
574 #define JS_E_UNEXPECTED_QUANTIFIER MAKE_JSERROR(IDS_UNEXPECTED_QUANTIFIER)
575 #define JS_E_EXCEPTION_THROWN MAKE_JSERROR(IDS_EXCEPTION_THROWN)
576 #define JS_E_INVALID_URI_CODING MAKE_JSERROR(IDS_URI_INVALID_CODING)
577 #define JS_E_INVALID_URI_CHAR MAKE_JSERROR(IDS_URI_INVALID_CHAR)
578 #define JS_E_FRACTION_DIGITS_OUT_OF_RANGE MAKE_JSERROR(IDS_FRACTION_DIGITS_OUT_OF_RANGE)
579 #define JS_E_PRECISION_OUT_OF_RANGE MAKE_JSERROR(IDS_PRECISION_OUT_OF_RANGE)
580 #define JS_E_INVALID_LENGTH MAKE_JSERROR(IDS_INVALID_LENGTH)
581 #define JS_E_ARRAY_EXPECTED MAKE_JSERROR(IDS_ARRAY_EXPECTED)
582 #define JS_E_CYCLIC_PROTO_VALUE MAKE_JSERROR(IDS_CYCLIC_PROTO_VALUE)
583 #define JS_E_CANNOT_CREATE_FOR_NONEXTENSIBLE MAKE_JSERROR(IDS_CREATE_FOR_NONEXTENSIBLE)
584 #define JS_E_OBJECT_NONEXTENSIBLE MAKE_JSERROR(IDS_OBJECT_NONEXTENSIBLE)
585 #define JS_E_NONCONFIGURABLE_REDEFINED MAKE_JSERROR(IDS_NONCONFIGURABLE_REDEFINED)
586 #define JS_E_NONWRITABLE_MODIFIED MAKE_JSERROR(IDS_NONWRITABLE_MODIFIED)
587 #define JS_E_NOT_DATAVIEW MAKE_JSERROR(IDS_NOT_DATAVIEW)
588 #define JS_E_DATAVIEW_NO_ARGUMENT MAKE_JSERROR(IDS_DATAVIEW_NO_ARGUMENT)
589 #define JS_E_DATAVIEW_INVALID_ACCESS MAKE_JSERROR(IDS_DATAVIEW_INVALID_ACCESS)
590 #define JS_E_DATAVIEW_INVALID_OFFSET MAKE_JSERROR(IDS_DATAVIEW_INVALID_OFFSET)
591 #define JS_E_WRONG_THIS MAKE_JSERROR(IDS_WRONG_THIS)
592 #define JS_E_KEY_NOT_OBJECT MAKE_JSERROR(IDS_KEY_NOT_OBJECT)
593 #define JS_E_ARRAYBUFFER_EXPECTED MAKE_JSERROR(IDS_ARRAYBUFFER_EXPECTED)
594 #define JS_E_PROP_DESC_MISMATCH MAKE_JSERROR(IDS_PROP_DESC_MISMATCH)
595 #define JS_E_INVALID_WRITABLE_PROP_DESC MAKE_JSERROR(IDS_INVALID_WRITABLE_PROP_DESC)
597 static inline BOOL
is_jscript_error(HRESULT hres
)
599 return HRESULT_FACILITY(hres
) == FACILITY_CONTROL
;
602 const char *debugstr_jsval(const jsval_t
);
604 HRESULT
create_jscript_object(BOOL
,REFIID
,void**);
606 extern LONG module_ref
;
608 static inline void lock_module(void)
610 InterlockedIncrement(&module_ref
);
613 static inline void unlock_module(void)
615 InterlockedDecrement(&module_ref
);