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
31 #include "wine/unicode.h"
32 #include "wine/list.h"
34 typedef struct _script_ctx_t script_ctx_t;
36 typedef struct DispatchEx {
37 const IDispatchExVtbl *lpIDispatchExVtbl;
44 #define _IDispatchEx_(x) ((IDispatchEx*) &(x)->lpIDispatchExVtbl)
46 HRESULT create_dispex(script_ctx_t*,DispatchEx**);
48 struct _script_ctx_t {
54 DispatchEx *script_disp;
57 void script_release(script_ctx_t*);
59 static void inline script_addref(script_ctx_t *ctx)
64 HRESULT WINAPI JScriptFactory_CreateInstance(IClassFactory*,IUnknown*,REFIID,void**);
71 struct list custom_blocks;
74 void jsheap_init(jsheap_t*);
75 void *jsheap_alloc(jsheap_t*,DWORD);
76 void jsheap_clear(jsheap_t*);
77 void jsheap_free(jsheap_t*);
79 extern LONG module_ref;
81 static inline void lock_module(void)
83 InterlockedIncrement(&module_ref);
86 static inline void unlock_module(void)
88 InterlockedDecrement(&module_ref);
91 static inline void *heap_alloc(size_t len)
93 return HeapAlloc(GetProcessHeap(), 0, len);
96 static inline void *heap_alloc_zero(size_t len)
98 return HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, len);
101 static inline void *heap_realloc(void *mem, size_t len)
103 return HeapReAlloc(GetProcessHeap(), 0, mem, len);
106 static inline BOOL heap_free(void *mem)
108 return HeapFree(GetProcessHeap(), 0, mem);
111 #define DEFINE_THIS(cls,ifc,iface) ((cls*)((BYTE*)(iface)-offsetof(cls,lp ## ifc ## Vtbl)))