2 * Copyright 2008 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
21 #include "wine/debug.h"
23 WINE_DEFAULT_DEBUG_CHANNEL(jscript
);
25 static const WCHAR toStringW
[] = {'t','o','S','t','r','i','n','g',0};
26 static const WCHAR toLocaleStringW
[] = {'t','o','L','o','c','a','l','e','S','t','r','i','n','g',0};
27 static const WCHAR valueOfW
[] = {'v','a','l','u','e','O','f',0};
28 static const WCHAR hasOwnPropertyW
[] = {'h','a','s','O','w','n','P','r','o','p','e','r','t','y',0};
29 static const WCHAR propertyIsEnumerableW
[] =
30 {'p','r','o','p','e','r','t','y','I','s','E','n','u','m','e','r','a','b','l','e',0};
31 static const WCHAR isPrototypeOfW
[] = {'i','s','P','r','o','t','o','t','y','p','e','O','f',0};
33 static HRESULT
Object_toString(DispatchEx
*dispex
, LCID lcid
, WORD flags
, DISPPARAMS
*dp
,
34 VARIANT
*retv
, jsexcept_t
*ei
, IServiceProvider
*sp
)
40 static HRESULT
Object_toLocaleString(DispatchEx
*dispex
, LCID lcid
, WORD flags
, DISPPARAMS
*dp
,
41 VARIANT
*retv
, jsexcept_t
*ei
, IServiceProvider
*sp
)
47 static HRESULT
Object_valueOf(DispatchEx
*dispex
, LCID lcid
, WORD flags
, DISPPARAMS
*dp
,
48 VARIANT
*retv
, jsexcept_t
*ei
, IServiceProvider
*sp
)
54 static HRESULT
Object_hasOwnProperty(DispatchEx
*dispex
, LCID lcid
, WORD flags
, DISPPARAMS
*dp
,
55 VARIANT
*retv
, jsexcept_t
*ei
, IServiceProvider
*sp
)
61 static HRESULT
Object_propertyIsEnumerable(DispatchEx
*dispex
, LCID lcid
, WORD flags
, DISPPARAMS
*dp
,
62 VARIANT
*retv
, jsexcept_t
*ei
, IServiceProvider
*sp
)
68 static HRESULT
Object_isPrototypeOf(DispatchEx
*dispex
, LCID lcid
, WORD flags
, DISPPARAMS
*dp
,
69 VARIANT
*retv
, jsexcept_t
*ei
, IServiceProvider
*sp
)
75 static HRESULT
Object_value(DispatchEx
*dispex
, LCID lcid
, WORD flags
, DISPPARAMS
*dp
,
76 VARIANT
*retv
, jsexcept_t
*ei
, IServiceProvider
*sp
)
82 static void Object_destructor(DispatchEx
*dispex
)
87 static const builtin_prop_t Object_props
[] = {
88 {hasOwnPropertyW
, Object_hasOwnProperty
, PROPF_METHOD
},
89 {isPrototypeOfW
, Object_isPrototypeOf
, PROPF_METHOD
},
90 {propertyIsEnumerableW
, Object_propertyIsEnumerable
, PROPF_METHOD
},
91 {toLocaleStringW
, Object_toLocaleString
, PROPF_METHOD
},
92 {toStringW
, Object_toString
, PROPF_METHOD
},
93 {valueOfW
, Object_valueOf
, PROPF_METHOD
}
96 static const builtin_info_t Object_info
= {
98 {NULL
, Object_value
, 0},
99 sizeof(Object_props
)/sizeof(*Object_props
),
105 static HRESULT
ObjectConstr_value(DispatchEx
*dispex
, LCID lcid
, WORD flags
, DISPPARAMS
*dp
,
106 VARIANT
*retv
, jsexcept_t
*ei
, IServiceProvider
*sp
)
113 case DISPATCH_CONSTRUCT
: {
116 hres
= create_object(dispex
->ctx
, NULL
, &obj
);
120 V_VT(retv
) = VT_DISPATCH
;
121 V_DISPATCH(retv
) = (IDispatch
*)_IDispatchEx_(obj
);
126 FIXME("unimplemented flags: %x\n", flags
);
133 HRESULT
create_object_constr(script_ctx_t
*ctx
, DispatchEx
**ret
)
138 hres
= create_dispex(ctx
, &Object_info
, NULL
, &object
);
142 hres
= create_builtin_function(ctx
, ObjectConstr_value
, PROPF_CONSTR
, object
, ret
);
144 jsdisp_release(object
);
148 HRESULT
create_object(script_ctx_t
*ctx
, DispatchEx
*constr
, DispatchEx
**ret
)
153 object
= heap_alloc_zero(sizeof(DispatchEx
));
155 return E_OUTOFMEMORY
;
157 hres
= init_dispex_from_constr(object
, ctx
, &Object_info
, constr
? constr
: ctx
->object_constr
);