msvcp71: Share part of the implementation with msvcp90.
This commit is contained in:
parent
4c4a654552
commit
949a8afdaf
|
@ -2,6 +2,8 @@ MODULE = msvcp71.dll
|
||||||
IMPORTS = msvcrt
|
IMPORTS = msvcrt
|
||||||
MODCFLAGS = @BUILTINFLAG@
|
MODCFLAGS = @BUILTINFLAG@
|
||||||
EXTRAINCL = -I$(top_srcdir)/include/msvcrt
|
EXTRAINCL = -I$(top_srcdir)/include/msvcrt
|
||||||
|
EXTRADEFS = -D_MSVCP_VER=71
|
||||||
|
PARENTSRC = ../msvcp90
|
||||||
|
|
||||||
C_SRCS = \
|
C_SRCS = \
|
||||||
exception.c \
|
exception.c \
|
||||||
|
@ -10,7 +12,7 @@ C_SRCS = \
|
||||||
math.c \
|
math.c \
|
||||||
memory.c \
|
memory.c \
|
||||||
misc.c \
|
misc.c \
|
||||||
msvcp71.c \
|
msvcp_main.c \
|
||||||
string.c
|
string.c
|
||||||
|
|
||||||
@MAKE_DLL_RULES@
|
@MAKE_DLL_RULES@
|
||||||
|
|
|
@ -1,446 +0,0 @@
|
||||||
/*
|
|
||||||
* Copyright 2012 Piotr Caban for CodeWeavers
|
|
||||||
*
|
|
||||||
* This library is free software; you can redistribute it and/or
|
|
||||||
* modify it under the terms of the GNU Lesser General Public
|
|
||||||
* License as published by the Free Software Foundation; either
|
|
||||||
* version 2.1 of the License, or (at your option) any later version.
|
|
||||||
*
|
|
||||||
* This library is distributed in the hope that it will be useful,
|
|
||||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
||||||
* Lesser General Public License for more details.
|
|
||||||
*
|
|
||||||
* You should have received a copy of the GNU Lesser General Public
|
|
||||||
* License along with this library; if not, write to the Free Software
|
|
||||||
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
||||||
*/
|
|
||||||
|
|
||||||
/* Copied from dlls/msvcrt/cpp.c */
|
|
||||||
#ifdef __i386__ /* thiscall functions are i386-specific */
|
|
||||||
|
|
||||||
#define THISCALL(func) __thiscall_ ## func
|
|
||||||
#define THISCALL_NAME(func) __ASM_NAME("__thiscall_" #func)
|
|
||||||
#define __thiscall __stdcall
|
|
||||||
#define DEFINE_THISCALL_WRAPPER(func,args) \
|
|
||||||
extern void THISCALL(func)(void); \
|
|
||||||
__ASM_GLOBAL_FUNC(__thiscall_ ## func, \
|
|
||||||
"popl %eax\n\t" \
|
|
||||||
"pushl %ecx\n\t" \
|
|
||||||
"pushl %eax\n\t" \
|
|
||||||
"jmp " __ASM_NAME(#func) __ASM_STDCALL(args) )
|
|
||||||
#else /* __i386__ */
|
|
||||||
|
|
||||||
#define THISCALL(func) func
|
|
||||||
#define THISCALL_NAME(func) __ASM_NAME(#func)
|
|
||||||
#define __thiscall __cdecl
|
|
||||||
#define DEFINE_THISCALL_WRAPPER(func,args) /* nothing */
|
|
||||||
|
|
||||||
#endif /* __i386__ */
|
|
||||||
|
|
||||||
#ifdef _WIN64
|
|
||||||
|
|
||||||
#define VTABLE_ADD_FUNC(name) "\t.quad " THISCALL_NAME(name) "\n"
|
|
||||||
|
|
||||||
#define __ASM_VTABLE(name,funcs) \
|
|
||||||
__asm__(".data\n" \
|
|
||||||
"\t.align 8\n" \
|
|
||||||
"\t.quad " __ASM_NAME(#name "_rtti") "\n" \
|
|
||||||
"\t.globl " __ASM_NAME("MSVCP_" #name "_vtable") "\n" \
|
|
||||||
__ASM_NAME("MSVCP_" #name "_vtable") ":\n" \
|
|
||||||
funcs "\n\t.text")
|
|
||||||
|
|
||||||
#else
|
|
||||||
|
|
||||||
#define VTABLE_ADD_FUNC(name) "\t.long " THISCALL_NAME(name) "\n"
|
|
||||||
|
|
||||||
#define __ASM_VTABLE(name,funcs) \
|
|
||||||
__asm__(".data\n" \
|
|
||||||
"\t.align 4\n" \
|
|
||||||
"\t.long " __ASM_NAME(#name "_rtti") "\n" \
|
|
||||||
"\t.globl " __ASM_NAME("MSVCP_" #name "_vtable") "\n" \
|
|
||||||
__ASM_NAME("MSVCP_" #name "_vtable") ":\n" \
|
|
||||||
funcs "\n\t.text")
|
|
||||||
|
|
||||||
#endif /* _WIN64 */
|
|
||||||
|
|
||||||
#ifndef __x86_64__
|
|
||||||
|
|
||||||
#define DEFINE_RTTI_DATA(name, off, base_classes_no, cl1, cl2, cl3, cl4, cl5, cl6, cl7, cl8, cl9, mangled_name) \
|
|
||||||
static const type_info name ## _type_info = { \
|
|
||||||
&MSVCP_type_info_vtable, \
|
|
||||||
NULL, \
|
|
||||||
mangled_name \
|
|
||||||
}; \
|
|
||||||
\
|
|
||||||
static const rtti_base_descriptor name ## _rtti_base_descriptor = { \
|
|
||||||
&name ##_type_info, \
|
|
||||||
base_classes_no, \
|
|
||||||
{ 0, -1, 0}, \
|
|
||||||
64 \
|
|
||||||
}; \
|
|
||||||
\
|
|
||||||
static const rtti_base_array name ## _rtti_base_array = { \
|
|
||||||
{ \
|
|
||||||
&name ## _rtti_base_descriptor, \
|
|
||||||
cl1, \
|
|
||||||
cl2, \
|
|
||||||
cl3, \
|
|
||||||
cl4, \
|
|
||||||
cl5, \
|
|
||||||
cl6, \
|
|
||||||
cl7, \
|
|
||||||
cl8, \
|
|
||||||
cl9, \
|
|
||||||
} \
|
|
||||||
}; \
|
|
||||||
\
|
|
||||||
static const rtti_object_hierarchy name ## _hierarchy = { \
|
|
||||||
0, \
|
|
||||||
0, \
|
|
||||||
base_classes_no+1, \
|
|
||||||
&name ## _rtti_base_array \
|
|
||||||
}; \
|
|
||||||
\
|
|
||||||
const rtti_object_locator name ## _rtti = { \
|
|
||||||
0, \
|
|
||||||
off, \
|
|
||||||
0, \
|
|
||||||
&name ## _type_info, \
|
|
||||||
&name ## _hierarchy \
|
|
||||||
};
|
|
||||||
|
|
||||||
#define DEFINE_CXX_DATA(type, base_no, cl1, cl2, dtor) \
|
|
||||||
\
|
|
||||||
static const cxx_type_info type ## _cxx_type_info = { \
|
|
||||||
0, \
|
|
||||||
& type ##_type_info, \
|
|
||||||
{ 0, -1, 0 }, \
|
|
||||||
sizeof(type), \
|
|
||||||
(cxx_copy_ctor)THISCALL(MSVCP_ ## type ##_copy_ctor) \
|
|
||||||
}; \
|
|
||||||
\
|
|
||||||
static const cxx_type_info_table type ## _cxx_type_table = { \
|
|
||||||
base_no+1, \
|
|
||||||
{ \
|
|
||||||
& type ## _cxx_type_info, \
|
|
||||||
cl1, \
|
|
||||||
cl2 \
|
|
||||||
} \
|
|
||||||
}; \
|
|
||||||
\
|
|
||||||
static const cxx_exception_type type ## _cxx_type = { \
|
|
||||||
0, \
|
|
||||||
(cxx_copy_ctor)THISCALL(dtor), \
|
|
||||||
NULL, \
|
|
||||||
& type ## _cxx_type_table \
|
|
||||||
};
|
|
||||||
|
|
||||||
#else
|
|
||||||
|
|
||||||
#define DEFINE_RTTI_DATA(name, off, base_classes_no, cl1, cl2, cl3, cl4, cl5, cl6, cl7, cl8, cl9, mangled_name) \
|
|
||||||
static const type_info name ## _type_info = { \
|
|
||||||
&MSVCP_type_info_vtable, \
|
|
||||||
NULL, \
|
|
||||||
mangled_name \
|
|
||||||
}; \
|
|
||||||
\
|
|
||||||
static rtti_base_descriptor name ## _rtti_base_descriptor = { \
|
|
||||||
0xdeadbeef, \
|
|
||||||
base_classes_no, \
|
|
||||||
{ 0, -1, 0}, \
|
|
||||||
64 \
|
|
||||||
}; \
|
|
||||||
\
|
|
||||||
static rtti_base_array name ## _rtti_base_array = { \
|
|
||||||
{ \
|
|
||||||
0xdeadbeef, \
|
|
||||||
0xdeadbeef, \
|
|
||||||
0xdeadbeef, \
|
|
||||||
0xdeadbeef, \
|
|
||||||
0xdeadbeef, \
|
|
||||||
0xdeadbeef, \
|
|
||||||
0xdeadbeef, \
|
|
||||||
0xdeadbeef, \
|
|
||||||
0xdeadbeef, \
|
|
||||||
0xdeadbeef, \
|
|
||||||
} \
|
|
||||||
}; \
|
|
||||||
\
|
|
||||||
static rtti_object_hierarchy name ## _hierarchy = { \
|
|
||||||
0, \
|
|
||||||
0, \
|
|
||||||
base_classes_no+1, \
|
|
||||||
0xdeadbeef \
|
|
||||||
}; \
|
|
||||||
\
|
|
||||||
rtti_object_locator name ## _rtti = { \
|
|
||||||
1, \
|
|
||||||
off, \
|
|
||||||
0, \
|
|
||||||
0xdeadbeef, \
|
|
||||||
0xdeadbeef, \
|
|
||||||
0xdeadbeef \
|
|
||||||
};\
|
|
||||||
\
|
|
||||||
static void init_ ## name ## _rtti(char *base) \
|
|
||||||
{ \
|
|
||||||
name ## _rtti_base_descriptor.type_descriptor = (char*)&name ## _type_info - base; \
|
|
||||||
name ## _rtti_base_array.bases[0] = (char*)&name ## _rtti_base_descriptor - base; \
|
|
||||||
name ## _rtti_base_array.bases[1] = (char*)cl1 - base; \
|
|
||||||
name ## _rtti_base_array.bases[2] = (char*)cl2 - base; \
|
|
||||||
name ## _rtti_base_array.bases[3] = (char*)cl3 - base; \
|
|
||||||
name ## _rtti_base_array.bases[4] = (char*)cl4 - base; \
|
|
||||||
name ## _rtti_base_array.bases[5] = (char*)cl5 - base; \
|
|
||||||
name ## _rtti_base_array.bases[6] = (char*)cl6 - base; \
|
|
||||||
name ## _rtti_base_array.bases[7] = (char*)cl7 - base; \
|
|
||||||
name ## _rtti_base_array.bases[8] = (char*)cl8 - base; \
|
|
||||||
name ## _rtti_base_array.bases[9] = (char*)cl9 - base; \
|
|
||||||
name ## _hierarchy.base_classes = (char*)&name ## _rtti_base_array - base; \
|
|
||||||
name ## _rtti.type_descriptor = (char*)&name ## _type_info - base; \
|
|
||||||
name ## _rtti.type_hierarchy = (char*)&name ## _hierarchy - base; \
|
|
||||||
name ## _rtti.object_locator = (char*)&name ## _rtti - base; \
|
|
||||||
}
|
|
||||||
|
|
||||||
#define DEFINE_CXX_DATA(type, base_no, cl1, cl2, dtor) \
|
|
||||||
\
|
|
||||||
static cxx_type_info type ## _cxx_type_info = { \
|
|
||||||
0, \
|
|
||||||
0xdeadbeef, \
|
|
||||||
{ 0, -1, 0 }, \
|
|
||||||
sizeof(type), \
|
|
||||||
0xdeadbeef \
|
|
||||||
}; \
|
|
||||||
\
|
|
||||||
static cxx_type_info_table type ## _cxx_type_table = { \
|
|
||||||
base_no+1, \
|
|
||||||
{ \
|
|
||||||
0xdeadbeef, \
|
|
||||||
0xdeadbeef, \
|
|
||||||
0xdeadbeef \
|
|
||||||
} \
|
|
||||||
}; \
|
|
||||||
\
|
|
||||||
static cxx_exception_type type ##_cxx_type = { \
|
|
||||||
0, \
|
|
||||||
0xdeadbeef, \
|
|
||||||
0, \
|
|
||||||
0xdeadbeef \
|
|
||||||
}; \
|
|
||||||
\
|
|
||||||
static void init_ ## type ## _cxx(char *base) \
|
|
||||||
{ \
|
|
||||||
type ## _cxx_type_info.type_info = (char *)&type ## _type_info - base; \
|
|
||||||
type ## _cxx_type_info.copy_ctor = (char *)MSVCP_ ## type ## _copy_ctor - base; \
|
|
||||||
type ## _cxx_type_table.info[0] = (char *)&type ## _cxx_type_info - base; \
|
|
||||||
type ## _cxx_type_table.info[1] = (char *)cl1 - base; \
|
|
||||||
type ## _cxx_type_table.info[2] = (char *)cl2 - base; \
|
|
||||||
type ## _cxx_type.destructor = (char *)dtor - base; \
|
|
||||||
type ## _cxx_type.type_info_table = (char *)&type ## _cxx_type_table - base; \
|
|
||||||
}
|
|
||||||
|
|
||||||
#endif
|
|
||||||
|
|
||||||
#define DEFINE_RTTI_DATA0(name, off, mangled_name) \
|
|
||||||
DEFINE_RTTI_DATA(name, off, 0, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, mangled_name)
|
|
||||||
#define DEFINE_RTTI_DATA1(name, off, cl1, mangled_name) \
|
|
||||||
DEFINE_RTTI_DATA(name, off, 1, cl1, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, mangled_name)
|
|
||||||
#define DEFINE_RTTI_DATA2(name, off, cl1, cl2, mangled_name) \
|
|
||||||
DEFINE_RTTI_DATA(name, off, 2, cl1, cl2, NULL, NULL, NULL, NULL, NULL, NULL, NULL, mangled_name)
|
|
||||||
#define DEFINE_RTTI_DATA3(name, off, cl1, cl2, cl3, mangled_name) \
|
|
||||||
DEFINE_RTTI_DATA(name, off, 3, cl1, cl2, cl3, NULL, NULL, NULL, NULL, NULL, NULL, mangled_name)
|
|
||||||
#define DEFINE_RTTI_DATA4(name, off, cl1, cl2, cl3, cl4, mangled_name) \
|
|
||||||
DEFINE_RTTI_DATA(name, off, 4, cl1, cl2, cl3, cl4, NULL, NULL, NULL, NULL, NULL, mangled_name)
|
|
||||||
#define DEFINE_RTTI_DATA8(name, off, cl1, cl2, cl3, cl4, cl5, cl6, cl7, cl8, mangled_name) \
|
|
||||||
DEFINE_RTTI_DATA(name, off, 8, cl1, cl2, cl3, cl4, cl5, cl6, cl7, cl8, NULL, mangled_name)
|
|
||||||
#define DEFINE_RTTI_DATA9(name, off, cl1, cl2, cl3, cl4, cl5, cl6, cl7, cl8, cl9, mangled_name) \
|
|
||||||
DEFINE_RTTI_DATA(name, off, 9, cl1, cl2, cl3, cl4, cl5, cl6, cl7, cl8, cl9, mangled_name)
|
|
||||||
|
|
||||||
#define DEFINE_CXX_DATA0(name, dtor) \
|
|
||||||
DEFINE_CXX_DATA(name, 0, NULL, NULL, dtor)
|
|
||||||
#define DEFINE_CXX_DATA1(name, cl1, dtor) \
|
|
||||||
DEFINE_CXX_DATA(name, 1, cl1, NULL, dtor)
|
|
||||||
#define DEFINE_CXX_DATA2(name, cl1, cl2, dtor) \
|
|
||||||
DEFINE_CXX_DATA(name, 2, cl1, cl2, dtor)
|
|
||||||
|
|
||||||
#ifdef __i386__
|
|
||||||
|
|
||||||
#define CALL_VTBL_FUNC(this, off, ret, type, args) ((ret (WINAPI*)type)&vtbl_wrapper_##off)args
|
|
||||||
|
|
||||||
extern void *vtbl_wrapper_0;
|
|
||||||
extern void *vtbl_wrapper_4;
|
|
||||||
extern void *vtbl_wrapper_8;
|
|
||||||
extern void *vtbl_wrapper_12;
|
|
||||||
extern void *vtbl_wrapper_16;
|
|
||||||
extern void *vtbl_wrapper_20;
|
|
||||||
extern void *vtbl_wrapper_24;
|
|
||||||
extern void *vtbl_wrapper_28;
|
|
||||||
extern void *vtbl_wrapper_32;
|
|
||||||
extern void *vtbl_wrapper_36;
|
|
||||||
extern void *vtbl_wrapper_40;
|
|
||||||
extern void *vtbl_wrapper_44;
|
|
||||||
extern void *vtbl_wrapper_48;
|
|
||||||
extern void *vtbl_wrapper_52;
|
|
||||||
|
|
||||||
#else
|
|
||||||
|
|
||||||
#define CALL_VTBL_FUNC(this, off, ret, type, args) ((ret (__cdecl***)type)this)[0][off/4]args
|
|
||||||
|
|
||||||
#endif
|
|
||||||
|
|
||||||
/* exception object */
|
|
||||||
typedef void (*vtable_ptr)(void);
|
|
||||||
typedef struct __exception
|
|
||||||
{
|
|
||||||
const vtable_ptr *vtable;
|
|
||||||
char *name; /* Name of this exception, always a new copy for each object */
|
|
||||||
int do_free; /* Whether to free 'name' in our dtor */
|
|
||||||
} exception;
|
|
||||||
|
|
||||||
/* Internal: throws selected exception */
|
|
||||||
typedef enum __exception_type {
|
|
||||||
EXCEPTION_RERAISE,
|
|
||||||
EXCEPTION,
|
|
||||||
EXCEPTION_BAD_ALLOC,
|
|
||||||
EXCEPTION_LOGIC_ERROR,
|
|
||||||
EXCEPTION_LENGTH_ERROR,
|
|
||||||
EXCEPTION_OUT_OF_RANGE,
|
|
||||||
EXCEPTION_INVALID_ARGUMENT,
|
|
||||||
EXCEPTION_RUNTIME_ERROR,
|
|
||||||
EXCEPTION_FAILURE,
|
|
||||||
} exception_type;
|
|
||||||
void throw_exception(exception_type, const char *);
|
|
||||||
|
|
||||||
/* rtti */
|
|
||||||
typedef struct __type_info
|
|
||||||
{
|
|
||||||
const vtable_ptr *vtable;
|
|
||||||
char *name; /* Unmangled name, allocated lazily */
|
|
||||||
char mangled[128]; /* Variable length, but we declare it large enough for static RTTI */
|
|
||||||
} type_info;
|
|
||||||
|
|
||||||
extern const vtable_ptr MSVCP_type_info_vtable;
|
|
||||||
|
|
||||||
/* offsets for computing the this pointer */
|
|
||||||
typedef struct
|
|
||||||
{
|
|
||||||
int this_offset; /* offset of base class this pointer from start of object */
|
|
||||||
int vbase_descr; /* offset of virtual base class descriptor */
|
|
||||||
int vbase_offset; /* offset of this pointer offset in virtual base class descriptor */
|
|
||||||
} this_ptr_offsets;
|
|
||||||
|
|
||||||
/* dlls/msvcrt/cppexcept.h */
|
|
||||||
typedef void (*cxx_copy_ctor)(void);
|
|
||||||
|
|
||||||
#ifndef __x86_64__
|
|
||||||
|
|
||||||
typedef struct _rtti_base_descriptor
|
|
||||||
{
|
|
||||||
const type_info *type_descriptor;
|
|
||||||
int num_base_classes;
|
|
||||||
this_ptr_offsets offsets; /* offsets for computing the this pointer */
|
|
||||||
unsigned int attributes;
|
|
||||||
} rtti_base_descriptor;
|
|
||||||
|
|
||||||
typedef struct _rtti_base_array
|
|
||||||
{
|
|
||||||
const rtti_base_descriptor *bases[10]; /* First element is the class itself */
|
|
||||||
} rtti_base_array;
|
|
||||||
|
|
||||||
typedef struct _rtti_object_hierarchy
|
|
||||||
{
|
|
||||||
unsigned int signature;
|
|
||||||
unsigned int attributes;
|
|
||||||
int array_len; /* Size of the array pointed to by 'base_classes' */
|
|
||||||
const rtti_base_array *base_classes;
|
|
||||||
} rtti_object_hierarchy;
|
|
||||||
|
|
||||||
typedef struct _rtti_object_locator
|
|
||||||
{
|
|
||||||
unsigned int signature;
|
|
||||||
int base_class_offset;
|
|
||||||
unsigned int flags;
|
|
||||||
const type_info *type_descriptor;
|
|
||||||
const rtti_object_hierarchy *type_hierarchy;
|
|
||||||
} rtti_object_locator;
|
|
||||||
|
|
||||||
typedef struct
|
|
||||||
{
|
|
||||||
UINT flags;
|
|
||||||
const type_info *type_info;
|
|
||||||
this_ptr_offsets offsets;
|
|
||||||
unsigned int size;
|
|
||||||
cxx_copy_ctor copy_ctor;
|
|
||||||
} cxx_type_info;
|
|
||||||
|
|
||||||
typedef struct
|
|
||||||
{
|
|
||||||
UINT count;
|
|
||||||
const cxx_type_info *info[3];
|
|
||||||
} cxx_type_info_table;
|
|
||||||
|
|
||||||
typedef struct
|
|
||||||
{
|
|
||||||
UINT flags;
|
|
||||||
void (*destructor)(void);
|
|
||||||
void* /*cxx_exc_custom_handler*/ custom_handler;
|
|
||||||
const cxx_type_info_table *type_info_table;
|
|
||||||
} cxx_exception_type;
|
|
||||||
|
|
||||||
#else
|
|
||||||
|
|
||||||
typedef struct
|
|
||||||
{
|
|
||||||
unsigned int type_descriptor;
|
|
||||||
int num_base_classes;
|
|
||||||
this_ptr_offsets offsets; /* offsets for computing the this pointer */
|
|
||||||
unsigned int attributes;
|
|
||||||
} rtti_base_descriptor;
|
|
||||||
|
|
||||||
typedef struct
|
|
||||||
{
|
|
||||||
unsigned int bases[10]; /* First element is the class itself */
|
|
||||||
} rtti_base_array;
|
|
||||||
|
|
||||||
typedef struct
|
|
||||||
{
|
|
||||||
unsigned int signature;
|
|
||||||
unsigned int attributes;
|
|
||||||
int array_len; /* Size of the array pointed to by 'base_classes' */
|
|
||||||
unsigned int base_classes;
|
|
||||||
} rtti_object_hierarchy;
|
|
||||||
|
|
||||||
typedef struct
|
|
||||||
{
|
|
||||||
unsigned int signature;
|
|
||||||
int base_class_offset;
|
|
||||||
unsigned int flags;
|
|
||||||
unsigned int type_descriptor;
|
|
||||||
unsigned int type_hierarchy;
|
|
||||||
unsigned int object_locator;
|
|
||||||
} rtti_object_locator;
|
|
||||||
|
|
||||||
typedef struct
|
|
||||||
{
|
|
||||||
UINT flags;
|
|
||||||
unsigned int type_info;
|
|
||||||
this_ptr_offsets offsets;
|
|
||||||
unsigned int size;
|
|
||||||
unsigned int copy_ctor;
|
|
||||||
} cxx_type_info;
|
|
||||||
|
|
||||||
typedef struct
|
|
||||||
{
|
|
||||||
UINT count;
|
|
||||||
unsigned int info[3];
|
|
||||||
} cxx_type_info_table;
|
|
||||||
|
|
||||||
typedef struct
|
|
||||||
{
|
|
||||||
UINT flags;
|
|
||||||
unsigned int destructor;
|
|
||||||
unsigned int custom_handler;
|
|
||||||
unsigned int type_info_table;
|
|
||||||
} cxx_exception_type;
|
|
||||||
|
|
||||||
#endif
|
|
|
@ -1,563 +0,0 @@
|
||||||
/*
|
|
||||||
* Copyright 2010 Piotr Caban for CodeWeavers
|
|
||||||
*
|
|
||||||
* This library is free software; you can redistribute it and/or
|
|
||||||
* modify it under the terms of the GNU Lesser General Public
|
|
||||||
* License as published by the Free Software Foundation; either
|
|
||||||
* version 2.1 of the License, or (at your option) any later version.
|
|
||||||
*
|
|
||||||
* This library is distributed in the hope that it will be useful,
|
|
||||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
||||||
* Lesser General Public License for more details.
|
|
||||||
*
|
|
||||||
* You should have received a copy of the GNU Lesser General Public
|
|
||||||
* License along with this library; if not, write to the Free Software
|
|
||||||
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "config.h"
|
|
||||||
|
|
||||||
#include <stdarg.h>
|
|
||||||
|
|
||||||
#include "msvcp.h"
|
|
||||||
|
|
||||||
#include "windef.h"
|
|
||||||
#include "winbase.h"
|
|
||||||
#include "wine/debug.h"
|
|
||||||
WINE_DEFAULT_DEBUG_CHANNEL(msvcp);
|
|
||||||
|
|
||||||
#define CLASS_IS_SIMPLE_TYPE 1
|
|
||||||
#define CLASS_HAS_VIRTUAL_BASE_CLASS 4
|
|
||||||
|
|
||||||
void WINAPI _CxxThrowException(exception*,const cxx_exception_type*);
|
|
||||||
|
|
||||||
/* vtables */
|
|
||||||
extern const vtable_ptr MSVCP_exception_vtable;
|
|
||||||
extern const vtable_ptr MSVCP_bad_alloc_vtable;
|
|
||||||
extern const vtable_ptr MSVCP_logic_error_vtable;
|
|
||||||
extern const vtable_ptr MSVCP_length_error_vtable;
|
|
||||||
extern const vtable_ptr MSVCP_out_of_range_vtable;
|
|
||||||
extern const vtable_ptr MSVCP_invalid_argument_vtable;
|
|
||||||
extern const vtable_ptr MSVCP_runtime_error_vtable;
|
|
||||||
extern const vtable_ptr MSVCP_failure_vtable;
|
|
||||||
|
|
||||||
static void MSVCP_type_info_dtor(type_info * _this)
|
|
||||||
{
|
|
||||||
free(_this->name);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Unexported */
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_type_info_vector_dtor,8)
|
|
||||||
void * __thiscall MSVCP_type_info_vector_dtor(type_info * _this, unsigned int flags)
|
|
||||||
{
|
|
||||||
TRACE("(%p %x)\n", _this, flags);
|
|
||||||
if (flags & 2)
|
|
||||||
{
|
|
||||||
/* we have an array, with the number of elements stored before the first object */
|
|
||||||
INT_PTR i, *ptr = (INT_PTR *)_this - 1;
|
|
||||||
|
|
||||||
for (i = *ptr - 1; i >= 0; i--) MSVCP_type_info_dtor(_this + i);
|
|
||||||
MSVCRT_operator_delete(ptr);
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
MSVCP_type_info_dtor(_this);
|
|
||||||
if (flags & 1) MSVCRT_operator_delete(_this);
|
|
||||||
}
|
|
||||||
return _this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_RTTI_DATA0( type_info, 0, ".?AVtype_info@@" )
|
|
||||||
|
|
||||||
static exception* MSVCP_exception_ctor(exception *this, const char **name)
|
|
||||||
{
|
|
||||||
TRACE("(%p %s)\n", this, *name);
|
|
||||||
|
|
||||||
this->vtable = &MSVCP_exception_vtable;
|
|
||||||
if(*name) {
|
|
||||||
unsigned int name_len = strlen(*name) + 1;
|
|
||||||
this->name = malloc(name_len);
|
|
||||||
memcpy(this->name, *name, name_len);
|
|
||||||
this->do_free = TRUE;
|
|
||||||
} else {
|
|
||||||
this->name = NULL;
|
|
||||||
this->do_free = FALSE;
|
|
||||||
}
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_exception_copy_ctor,8)
|
|
||||||
exception* __thiscall MSVCP_exception_copy_ctor(exception *this, const exception *rhs)
|
|
||||||
{
|
|
||||||
TRACE("(%p,%p)\n", this, rhs);
|
|
||||||
|
|
||||||
if(!rhs->do_free) {
|
|
||||||
this->vtable = &MSVCP_exception_vtable;
|
|
||||||
this->name = rhs->name;
|
|
||||||
this->do_free = FALSE;
|
|
||||||
} else
|
|
||||||
MSVCP_exception_ctor(this, (const char**)&rhs->name);
|
|
||||||
TRACE("name = %s\n", this->name);
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_exception_dtor,4)
|
|
||||||
void __thiscall MSVCP_exception_dtor(exception *this)
|
|
||||||
{
|
|
||||||
TRACE("(%p)\n", this);
|
|
||||||
this->vtable = &MSVCP_exception_vtable;
|
|
||||||
if(this->do_free)
|
|
||||||
free(this->name);
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_exception_vector_dtor, 8)
|
|
||||||
void * __thiscall MSVCP_exception_vector_dtor(exception *this, unsigned int flags)
|
|
||||||
{
|
|
||||||
TRACE("%p %x\n", this, flags);
|
|
||||||
if(flags & 2) {
|
|
||||||
/* we have an array, with the number of elements stored before the first object */
|
|
||||||
INT_PTR i, *ptr = (INT_PTR *)this-1;
|
|
||||||
|
|
||||||
for(i=*ptr-1; i>=0; i--)
|
|
||||||
MSVCP_exception_dtor(this+i);
|
|
||||||
MSVCRT_operator_delete(ptr);
|
|
||||||
} else {
|
|
||||||
MSVCP_exception_dtor(this);
|
|
||||||
if(flags & 1)
|
|
||||||
MSVCRT_operator_delete(this);
|
|
||||||
}
|
|
||||||
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_RTTI_DATA0(exception, 0, ".?AVexception@std@@")
|
|
||||||
DEFINE_CXX_DATA0(exception, MSVCP_exception_dtor)
|
|
||||||
|
|
||||||
/* bad_alloc class data */
|
|
||||||
typedef exception bad_alloc;
|
|
||||||
|
|
||||||
static bad_alloc* MSVCP_bad_alloc_ctor(bad_alloc *this, const char **name)
|
|
||||||
{
|
|
||||||
TRACE("%p %s\n", this, *name);
|
|
||||||
MSVCP_exception_ctor(this, name);
|
|
||||||
this->vtable = &MSVCP_bad_alloc_vtable;
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_bad_alloc_copy_ctor, 8)
|
|
||||||
bad_alloc* __thiscall MSVCP_bad_alloc_copy_ctor(bad_alloc *this, const bad_alloc *rhs)
|
|
||||||
{
|
|
||||||
TRACE("%p %p\n", this, rhs);
|
|
||||||
MSVCP_exception_copy_ctor(this, rhs);
|
|
||||||
this->vtable = &MSVCP_bad_alloc_vtable;
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_bad_alloc_dtor, 4)
|
|
||||||
void __thiscall MSVCP_bad_alloc_dtor(bad_alloc *this)
|
|
||||||
{
|
|
||||||
TRACE("%p\n", this);
|
|
||||||
MSVCP_exception_dtor(this);
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_bad_alloc_vector_dtor, 8)
|
|
||||||
void * __thiscall MSVCP_bad_alloc_vector_dtor(bad_alloc *this, unsigned int flags)
|
|
||||||
{
|
|
||||||
TRACE("%p %x\n", this, flags);
|
|
||||||
if(flags & 2) {
|
|
||||||
/* we have an array, with the number of elements stored before the first object */
|
|
||||||
INT_PTR i, *ptr = (INT_PTR *)this-1;
|
|
||||||
|
|
||||||
for(i=*ptr-1; i>=0; i--)
|
|
||||||
MSVCP_bad_alloc_dtor(this+i);
|
|
||||||
MSVCRT_operator_delete(ptr);
|
|
||||||
} else {
|
|
||||||
MSVCP_bad_alloc_dtor(this);
|
|
||||||
if(flags & 1)
|
|
||||||
MSVCRT_operator_delete(this);
|
|
||||||
}
|
|
||||||
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_what_exception,4)
|
|
||||||
const char* __thiscall MSVCP_what_exception(exception * this)
|
|
||||||
{
|
|
||||||
TRACE("(%p) returning %s\n", this, this->name);
|
|
||||||
return this->name ? this->name : "Unknown exception";
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_RTTI_DATA1(bad_alloc, 0, &exception_rtti_base_descriptor, ".?AVbad_alloc@std@@")
|
|
||||||
DEFINE_CXX_DATA1(bad_alloc, &exception_cxx_type_info, MSVCP_bad_alloc_dtor)
|
|
||||||
|
|
||||||
/* logic_error class data */
|
|
||||||
typedef struct _logic_error {
|
|
||||||
exception e;
|
|
||||||
basic_string_char str;
|
|
||||||
} logic_error;
|
|
||||||
|
|
||||||
static logic_error* MSVCP_logic_error_ctor(
|
|
||||||
logic_error *this, const char **name)
|
|
||||||
{
|
|
||||||
TRACE("%p %s\n", this, *name);
|
|
||||||
this->e.vtable = &MSVCP_logic_error_vtable;
|
|
||||||
this->e.name = NULL;
|
|
||||||
this->e.do_free = FALSE;
|
|
||||||
MSVCP_basic_string_char_ctor_cstr(&this->str, *name);
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_logic_error_copy_ctor, 8)
|
|
||||||
logic_error* __thiscall MSVCP_logic_error_copy_ctor(
|
|
||||||
logic_error *this, logic_error *rhs)
|
|
||||||
{
|
|
||||||
TRACE("%p %p\n", this, rhs);
|
|
||||||
MSVCP_exception_copy_ctor(&this->e, &rhs->e);
|
|
||||||
MSVCP_basic_string_char_copy_ctor(&this->str, &rhs->str);
|
|
||||||
this->e.vtable = &MSVCP_logic_error_vtable;
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_logic_error_dtor, 4)
|
|
||||||
void __thiscall MSVCP_logic_error_dtor(logic_error *this)
|
|
||||||
{
|
|
||||||
TRACE("%p\n", this);
|
|
||||||
MSVCP_exception_dtor(&this->e);
|
|
||||||
MSVCP_basic_string_char_dtor(&this->str);
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_logic_error_vector_dtor, 8)
|
|
||||||
void* __thiscall MSVCP_logic_error_vector_dtor(
|
|
||||||
logic_error *this, unsigned int flags)
|
|
||||||
{
|
|
||||||
TRACE("%p %x\n", this, flags);
|
|
||||||
if(flags & 2) {
|
|
||||||
/* we have an array, with the number of elements stored before the first object */
|
|
||||||
INT_PTR i, *ptr = (INT_PTR *)this-1;
|
|
||||||
|
|
||||||
for(i=*ptr-1; i>=0; i--)
|
|
||||||
MSVCP_logic_error_dtor(this+i);
|
|
||||||
MSVCRT_operator_delete(ptr);
|
|
||||||
} else {
|
|
||||||
MSVCP_logic_error_dtor(this);
|
|
||||||
if(flags & 1)
|
|
||||||
MSVCRT_operator_delete(this);
|
|
||||||
}
|
|
||||||
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_logic_error_what, 4)
|
|
||||||
const char* __thiscall MSVCP_logic_error_what(logic_error *this)
|
|
||||||
{
|
|
||||||
TRACE("%p\n", this);
|
|
||||||
return MSVCP_basic_string_char_c_str(&this->str);
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_RTTI_DATA1(logic_error, 0, &exception_rtti_base_descriptor, ".?AVlogic_error@std@@")
|
|
||||||
DEFINE_CXX_DATA1(logic_error, &exception_cxx_type_info, MSVCP_logic_error_dtor)
|
|
||||||
|
|
||||||
/* length_error class data */
|
|
||||||
typedef logic_error length_error;
|
|
||||||
|
|
||||||
static length_error* MSVCP_length_error_ctor(
|
|
||||||
length_error *this, const char **name)
|
|
||||||
{
|
|
||||||
TRACE("%p %s\n", this, *name);
|
|
||||||
MSVCP_logic_error_ctor(this, name);
|
|
||||||
this->e.vtable = &MSVCP_length_error_vtable;
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_length_error_copy_ctor, 8)
|
|
||||||
length_error* __thiscall MSVCP_length_error_copy_ctor(
|
|
||||||
length_error *this, length_error *rhs)
|
|
||||||
{
|
|
||||||
TRACE("%p %p\n", this, rhs);
|
|
||||||
MSVCP_logic_error_copy_ctor(this, rhs);
|
|
||||||
this->e.vtable = &MSVCP_length_error_vtable;
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_RTTI_DATA2(length_error, 0, &logic_error_rtti_base_descriptor, &exception_rtti_base_descriptor, ".?AVlength_error@std@@")
|
|
||||||
DEFINE_CXX_DATA2(length_error, &logic_error_cxx_type_info, &exception_cxx_type_info, MSVCP_logic_error_dtor)
|
|
||||||
|
|
||||||
/* out_of_range class data */
|
|
||||||
typedef logic_error out_of_range;
|
|
||||||
|
|
||||||
static out_of_range* MSVCP_out_of_range_ctor(
|
|
||||||
out_of_range *this, const char **name)
|
|
||||||
{
|
|
||||||
TRACE("%p %s\n", this, *name);
|
|
||||||
MSVCP_logic_error_ctor(this, name);
|
|
||||||
this->e.vtable = &MSVCP_out_of_range_vtable;
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_out_of_range_copy_ctor, 8)
|
|
||||||
out_of_range* __thiscall MSVCP_out_of_range_copy_ctor(
|
|
||||||
out_of_range *this, out_of_range *rhs)
|
|
||||||
{
|
|
||||||
TRACE("%p %p\n", this, rhs);
|
|
||||||
MSVCP_logic_error_copy_ctor(this, rhs);
|
|
||||||
this->e.vtable = &MSVCP_out_of_range_vtable;
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_RTTI_DATA2(out_of_range, 0, &logic_error_rtti_base_descriptor, &exception_rtti_base_descriptor, ".?AVout_of_range@std@@")
|
|
||||||
DEFINE_CXX_DATA2(out_of_range, &logic_error_cxx_type_info, &exception_cxx_type_info, MSVCP_logic_error_dtor)
|
|
||||||
|
|
||||||
/* invalid_argument class data */
|
|
||||||
typedef logic_error invalid_argument;
|
|
||||||
|
|
||||||
static invalid_argument* MSVCP_invalid_argument_ctor(
|
|
||||||
invalid_argument *this, const char **name)
|
|
||||||
{
|
|
||||||
TRACE("%p %s\n", this, *name);
|
|
||||||
MSVCP_logic_error_ctor(this, name);
|
|
||||||
this->e.vtable = &MSVCP_invalid_argument_vtable;
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_invalid_argument_copy_ctor, 8)
|
|
||||||
invalid_argument* __thiscall MSVCP_invalid_argument_copy_ctor(
|
|
||||||
invalid_argument *this, invalid_argument *rhs)
|
|
||||||
{
|
|
||||||
TRACE("%p %p\n", this, rhs);
|
|
||||||
MSVCP_logic_error_copy_ctor(this, rhs);
|
|
||||||
this->e.vtable = &MSVCP_invalid_argument_vtable;
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_RTTI_DATA2(invalid_argument, 0, &logic_error_rtti_base_descriptor, &exception_rtti_base_descriptor, ".?AVinvalid_argument@std@@")
|
|
||||||
DEFINE_CXX_DATA2(invalid_argument, &logic_error_cxx_type_info, &exception_cxx_type_info, MSVCP_logic_error_dtor)
|
|
||||||
|
|
||||||
/* runtime_error class data */
|
|
||||||
typedef struct {
|
|
||||||
exception e;
|
|
||||||
basic_string_char str;
|
|
||||||
} runtime_error;
|
|
||||||
|
|
||||||
static runtime_error* MSVCP_runtime_error_ctor(
|
|
||||||
runtime_error *this, const char **name)
|
|
||||||
{
|
|
||||||
TRACE("%p %s\n", this, *name);
|
|
||||||
this->e.vtable = &MSVCP_runtime_error_vtable;
|
|
||||||
this->e.name = NULL;
|
|
||||||
this->e.do_free = FALSE;
|
|
||||||
MSVCP_basic_string_char_ctor_cstr(&this->str, *name);
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_runtime_error_copy_ctor, 8)
|
|
||||||
runtime_error* __thiscall MSVCP_runtime_error_copy_ctor(
|
|
||||||
runtime_error *this, runtime_error *rhs)
|
|
||||||
{
|
|
||||||
TRACE("%p %p\n", this, rhs);
|
|
||||||
MSVCP_exception_copy_ctor(&this->e, &rhs->e);
|
|
||||||
MSVCP_basic_string_char_copy_ctor(&this->str, &rhs->str);
|
|
||||||
this->e.vtable = &MSVCP_runtime_error_vtable;
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_runtime_error_dtor, 4)
|
|
||||||
void __thiscall MSVCP_runtime_error_dtor(runtime_error *this)
|
|
||||||
{
|
|
||||||
TRACE("%p\n", this);
|
|
||||||
MSVCP_exception_dtor(&this->e);
|
|
||||||
MSVCP_basic_string_char_dtor(&this->str);
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_runtime_error_vector_dtor, 8)
|
|
||||||
void* __thiscall MSVCP_runtime_error_vector_dtor(
|
|
||||||
runtime_error *this, unsigned int flags)
|
|
||||||
{
|
|
||||||
TRACE("%p %x\n", this, flags);
|
|
||||||
if(flags & 2) {
|
|
||||||
/* we have an array, with the number of elements stored before the first object */
|
|
||||||
INT_PTR i, *ptr = (INT_PTR *)this-1;
|
|
||||||
|
|
||||||
for(i=*ptr-1; i>=0; i--)
|
|
||||||
MSVCP_runtime_error_dtor(this+i);
|
|
||||||
MSVCRT_operator_delete(ptr);
|
|
||||||
} else {
|
|
||||||
MSVCP_runtime_error_dtor(this);
|
|
||||||
if(flags & 1)
|
|
||||||
MSVCRT_operator_delete(this);
|
|
||||||
}
|
|
||||||
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_runtime_error_what, 4)
|
|
||||||
const char* __thiscall MSVCP_runtime_error_what(runtime_error *this)
|
|
||||||
{
|
|
||||||
TRACE("%p\n", this);
|
|
||||||
return MSVCP_basic_string_char_c_str(&this->str);
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_RTTI_DATA1(runtime_error, 0, &exception_rtti_base_descriptor, ".?AVruntime_error@std@@")
|
|
||||||
DEFINE_CXX_DATA1(runtime_error, &exception_cxx_type_info, MSVCP_runtime_error_dtor)
|
|
||||||
|
|
||||||
/* failure class data */
|
|
||||||
typedef runtime_error failure;
|
|
||||||
|
|
||||||
static failure* MSVCP_failure_ctor(
|
|
||||||
failure *this, const char **name)
|
|
||||||
{
|
|
||||||
TRACE("%p %s\n", this, *name);
|
|
||||||
MSVCP_runtime_error_ctor(this, name);
|
|
||||||
this->e.vtable = &MSVCP_failure_vtable;
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_failure_copy_ctor, 8)
|
|
||||||
failure* __thiscall MSVCP_failure_copy_ctor(
|
|
||||||
failure *this, failure *rhs)
|
|
||||||
{
|
|
||||||
TRACE("%p %p\n", this, rhs);
|
|
||||||
MSVCP_runtime_error_copy_ctor(this, rhs);
|
|
||||||
this->e.vtable = &MSVCP_failure_vtable;
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_failure_dtor, 4)
|
|
||||||
void __thiscall MSVCP_failure_dtor(failure *this)
|
|
||||||
{
|
|
||||||
TRACE("%p\n", this);
|
|
||||||
MSVCP_runtime_error_dtor(this);
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_failure_vector_dtor, 8)
|
|
||||||
void* __thiscall MSVCP_failure_vector_dtor(
|
|
||||||
failure *this, unsigned int flags)
|
|
||||||
{
|
|
||||||
TRACE("%p %x\n", this, flags);
|
|
||||||
return MSVCP_runtime_error_vector_dtor(this, flags);
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_failure_what, 4)
|
|
||||||
const char* __thiscall MSVCP_failure_what(failure *this)
|
|
||||||
{
|
|
||||||
TRACE("%p\n", this);
|
|
||||||
return MSVCP_runtime_error_what(this);
|
|
||||||
}
|
|
||||||
|
|
||||||
DEFINE_RTTI_DATA2(failure, 0, &runtime_error_rtti_base_descriptor, &exception_rtti_base_descriptor, ".?AVfailure@std@@")
|
|
||||||
DEFINE_CXX_DATA2(failure, &runtime_error_cxx_type_info, &exception_cxx_type_info, MSVCP_runtime_error_dtor)
|
|
||||||
|
|
||||||
/* ?_Nomemory@std@@YAXXZ */
|
|
||||||
void __cdecl _Nomemory(void)
|
|
||||||
{
|
|
||||||
TRACE("()\n");
|
|
||||||
throw_exception(EXCEPTION_BAD_ALLOC, NULL);
|
|
||||||
}
|
|
||||||
|
|
||||||
#ifndef __GNUC__
|
|
||||||
void __asm_dummy_vtables(void) {
|
|
||||||
#endif
|
|
||||||
__ASM_VTABLE(type_info,
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_type_info_vector_dtor));
|
|
||||||
__ASM_VTABLE(exception,
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_exception_vector_dtor)
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_what_exception));
|
|
||||||
__ASM_VTABLE(bad_alloc,
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_bad_alloc_vector_dtor)
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_what_exception));
|
|
||||||
__ASM_VTABLE(logic_error,
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_logic_error_vector_dtor)
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_logic_error_what));
|
|
||||||
__ASM_VTABLE(length_error,
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_logic_error_vector_dtor)
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_logic_error_what));
|
|
||||||
__ASM_VTABLE(out_of_range,
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_logic_error_vector_dtor)
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_logic_error_what));
|
|
||||||
__ASM_VTABLE(invalid_argument,
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_logic_error_vector_dtor)
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_logic_error_what));
|
|
||||||
__ASM_VTABLE(runtime_error,
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_runtime_error_vector_dtor)
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_runtime_error_what));
|
|
||||||
__ASM_VTABLE(failure,
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_failure_vector_dtor)
|
|
||||||
VTABLE_ADD_FUNC(MSVCP_failure_what));
|
|
||||||
#ifndef __GNUC__
|
|
||||||
}
|
|
||||||
#endif
|
|
||||||
|
|
||||||
/* Internal: throws selected exception */
|
|
||||||
void throw_exception(exception_type et, const char *str)
|
|
||||||
{
|
|
||||||
const char *addr = str;
|
|
||||||
|
|
||||||
switch(et) {
|
|
||||||
case EXCEPTION_RERAISE:
|
|
||||||
_CxxThrowException(NULL, NULL);
|
|
||||||
case EXCEPTION: {
|
|
||||||
exception e;
|
|
||||||
MSVCP_exception_ctor(&e, &addr);
|
|
||||||
_CxxThrowException(&e, &exception_cxx_type);
|
|
||||||
}
|
|
||||||
case EXCEPTION_BAD_ALLOC: {
|
|
||||||
bad_alloc e;
|
|
||||||
MSVCP_bad_alloc_ctor(&e, &addr);
|
|
||||||
_CxxThrowException(&e, &bad_alloc_cxx_type);
|
|
||||||
}
|
|
||||||
case EXCEPTION_LOGIC_ERROR: {
|
|
||||||
logic_error e;
|
|
||||||
MSVCP_logic_error_ctor(&e, &addr);
|
|
||||||
_CxxThrowException((exception*)&e, &logic_error_cxx_type);
|
|
||||||
}
|
|
||||||
case EXCEPTION_LENGTH_ERROR: {
|
|
||||||
length_error e;
|
|
||||||
MSVCP_length_error_ctor(&e, &addr);
|
|
||||||
_CxxThrowException((exception*)&e, &length_error_cxx_type);
|
|
||||||
}
|
|
||||||
case EXCEPTION_OUT_OF_RANGE: {
|
|
||||||
out_of_range e;
|
|
||||||
MSVCP_out_of_range_ctor(&e, &addr);
|
|
||||||
_CxxThrowException((exception*)&e, &out_of_range_cxx_type);
|
|
||||||
}
|
|
||||||
case EXCEPTION_INVALID_ARGUMENT: {
|
|
||||||
invalid_argument e;
|
|
||||||
MSVCP_invalid_argument_ctor(&e, &addr);
|
|
||||||
_CxxThrowException((exception*)&e, &invalid_argument_cxx_type);
|
|
||||||
}
|
|
||||||
case EXCEPTION_RUNTIME_ERROR: {
|
|
||||||
runtime_error e;
|
|
||||||
MSVCP_runtime_error_ctor(&e, &addr);
|
|
||||||
_CxxThrowException((exception*)&e, &runtime_error_cxx_type);
|
|
||||||
}
|
|
||||||
case EXCEPTION_FAILURE: {
|
|
||||||
failure e;
|
|
||||||
MSVCP_failure_ctor(&e, &addr);
|
|
||||||
_CxxThrowException((exception*)&e, &failure_cxx_type);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
void init_exception(void *base)
|
|
||||||
{
|
|
||||||
#ifdef __x86_64__
|
|
||||||
init_type_info_rtti(base);
|
|
||||||
init_exception_rtti(base);
|
|
||||||
init_bad_alloc_rtti(base);
|
|
||||||
init_logic_error_rtti(base);
|
|
||||||
init_length_error_rtti(base);
|
|
||||||
init_out_of_range_rtti(base);
|
|
||||||
init_invalid_argument_rtti(base);
|
|
||||||
init_runtime_error_rtti(base);
|
|
||||||
init_failure_rtti(base);
|
|
||||||
|
|
||||||
init_exception_cxx(base);
|
|
||||||
init_bad_alloc_cxx(base);
|
|
||||||
init_logic_error_cxx(base);
|
|
||||||
init_length_error_cxx(base);
|
|
||||||
init_out_of_range_cxx(base);
|
|
||||||
init_invalid_argument_cxx(base);
|
|
||||||
init_runtime_error_cxx(base);
|
|
||||||
init_failure_cxx(base);
|
|
||||||
#endif
|
|
||||||
}
|
|
2169
dlls/msvcp71/math.c
2169
dlls/msvcp71/math.c
File diff suppressed because it is too large
Load Diff
|
@ -1,102 +0,0 @@
|
||||||
/*
|
|
||||||
* Copyright 2010 Piotr Caban for CodeWeavers
|
|
||||||
*
|
|
||||||
* This library is free software; you can redistribute it and/or
|
|
||||||
* modify it under the terms of the GNU Lesser General Public
|
|
||||||
* License as published by the Free Software Foundation; either
|
|
||||||
* version 2.1 of the License, or (at your option) any later version.
|
|
||||||
*
|
|
||||||
* This library is distributed in the hope that it will be useful,
|
|
||||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
||||||
* Lesser General Public License for more details.
|
|
||||||
*
|
|
||||||
* You should have received a copy of the GNU Lesser General Public
|
|
||||||
* License along with this library; if not, write to the Free Software
|
|
||||||
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "config.h"
|
|
||||||
|
|
||||||
#include <stdarg.h>
|
|
||||||
#include <limits.h>
|
|
||||||
|
|
||||||
#include "msvcp.h"
|
|
||||||
|
|
||||||
#include "windef.h"
|
|
||||||
#include "winbase.h"
|
|
||||||
|
|
||||||
/* ?deallocate@?$allocator@D@std@@QAEXPADI@Z */
|
|
||||||
/* ?deallocate@?$allocator@D@std@@QEAAXPEAD_K@Z */
|
|
||||||
void MSVCP_allocator_char_deallocate(void *this, char *ptr, MSVCP_size_t size)
|
|
||||||
{
|
|
||||||
MSVCRT_operator_delete(ptr);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ?allocate@?$allocator@D@std@@QAEPADI@Z */
|
|
||||||
/* ?allocate@?$allocator@D@std@@QEAAPEAD_K@Z */
|
|
||||||
char* MSVCP_allocator_char_allocate(void *this, MSVCP_size_t count)
|
|
||||||
{
|
|
||||||
return MSVCRT_operator_new(count);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ?max_size@?$allocator@D@std@@QBEIXZ */
|
|
||||||
/* ?max_size@?$allocator@D@std@@QEBA_KXZ */
|
|
||||||
MSVCP_size_t MSVCP_allocator_char_max_size(void *this)
|
|
||||||
{
|
|
||||||
return UINT_MAX/sizeof(char);
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
/* allocator<wchar_t> */
|
|
||||||
/* ?deallocate@?$allocator@_W@std@@QAEXPA_WI@Z */
|
|
||||||
/* ?deallocate@?$allocator@_W@std@@QEAAXPEA_W_K@Z */
|
|
||||||
void MSVCP_allocator_wchar_deallocate(void *this,
|
|
||||||
wchar_t *ptr, MSVCP_size_t size)
|
|
||||||
{
|
|
||||||
MSVCRT_operator_delete(ptr);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ?allocate@?$allocator@_W@std@@QAEPA_WI@Z */
|
|
||||||
/* ?allocate@?$allocator@_W@std@@QEAAPEA_W_K@Z */
|
|
||||||
wchar_t* MSVCP_allocator_wchar_allocate(void *this, MSVCP_size_t count)
|
|
||||||
{
|
|
||||||
if(UINT_MAX/count < sizeof(wchar_t)) {
|
|
||||||
throw_exception(EXCEPTION_BAD_ALLOC, NULL);
|
|
||||||
return NULL;
|
|
||||||
}
|
|
||||||
|
|
||||||
return MSVCRT_operator_new(count * sizeof(wchar_t));
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ?max_size@?$allocator@_W@std@@QBEIXZ */
|
|
||||||
/* ?max_size@?$allocator@_W@std@@QEBA_KXZ */
|
|
||||||
MSVCP_size_t MSVCP_allocator_wchar_max_size(void *this)
|
|
||||||
{
|
|
||||||
return UINT_MAX/sizeof(wchar_t);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* allocator<void> */
|
|
||||||
/* ??0?$allocator@X@std@@QAE@XZ */
|
|
||||||
/* ??0?$allocator@X@std@@QEAA@XZ */
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_allocator_void_ctor, 4)
|
|
||||||
void* __thiscall MSVCP_allocator_void_ctor(void *this)
|
|
||||||
{
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ??0?$allocator@X@std@@QAE@ABV01@@Z */
|
|
||||||
/* ??0?$allocator@X@std@@QEAA@AEBV01@@Z */
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_allocator_void_copy_ctor, 8)
|
|
||||||
void* __thiscall MSVCP_allocator_void_copy_ctor(void *this, void *copy)
|
|
||||||
{
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ??4?$allocator@X@std@@QAEAAV01@ABV01@@Z */
|
|
||||||
/* ??4?$allocator@X@std@@QEAAAEAV01@AEBV01@@Z */
|
|
||||||
DEFINE_THISCALL_WRAPPER(MSVCP_allocator_void_assign, 8)
|
|
||||||
void* __thiscall MSVCP_allocator_void_assign(void *this, void *assign)
|
|
||||||
{
|
|
||||||
return this;
|
|
||||||
}
|
|
|
@ -1,190 +0,0 @@
|
||||||
/*
|
|
||||||
* Copyright 2010 Piotr Caban for CodeWeavers
|
|
||||||
*
|
|
||||||
* This library is free software; you can redistribute it and/or
|
|
||||||
* modify it under the terms of the GNU Lesser General Public
|
|
||||||
* License as published by the Free Software Foundation; either
|
|
||||||
* version 2.1 of the License, or (at your option) any later version.
|
|
||||||
*
|
|
||||||
* This library is distributed in the hope that it will be useful,
|
|
||||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
||||||
* Lesser General Public License for more details.
|
|
||||||
*
|
|
||||||
* You should have received a copy of the GNU Lesser General Public
|
|
||||||
* License along with this library; if not, write to the Free Software
|
|
||||||
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "config.h"
|
|
||||||
|
|
||||||
#include <stdarg.h>
|
|
||||||
#include <limits.h>
|
|
||||||
|
|
||||||
#include "msvcp.h"
|
|
||||||
|
|
||||||
#include "windef.h"
|
|
||||||
#include "winbase.h"
|
|
||||||
#include "wine/debug.h"
|
|
||||||
WINE_DEFAULT_DEBUG_CHANNEL(msvcp);
|
|
||||||
|
|
||||||
/* ??0_Mutex@std@@QAE@XZ */
|
|
||||||
/* ??0_Mutex@std@@QEAA@XZ */
|
|
||||||
DEFINE_THISCALL_WRAPPER(mutex_ctor, 4)
|
|
||||||
mutex* __thiscall mutex_ctor(mutex *this)
|
|
||||||
{
|
|
||||||
CRITICAL_SECTION *cs = MSVCRT_operator_new(sizeof(*cs));
|
|
||||||
if(!cs) {
|
|
||||||
ERR("Out of memory\n");
|
|
||||||
throw_exception(EXCEPTION_BAD_ALLOC, NULL);
|
|
||||||
}
|
|
||||||
|
|
||||||
InitializeCriticalSection(cs);
|
|
||||||
cs->DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": _Mutex critical section");
|
|
||||||
this->mutex = cs;
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ??1_Mutex@std@@QAE@XZ */
|
|
||||||
/* ??1_Mutex@std@@QEAA@XZ */
|
|
||||||
DEFINE_THISCALL_WRAPPER(mutex_dtor, 4)
|
|
||||||
void __thiscall mutex_dtor(mutex *this)
|
|
||||||
{
|
|
||||||
((CRITICAL_SECTION*)this->mutex)->DebugInfo->Spare[0] = 0;
|
|
||||||
DeleteCriticalSection(this->mutex);
|
|
||||||
MSVCRT_operator_delete(this->mutex);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ?_Lock@_Mutex@std@@QAEXXZ */
|
|
||||||
/* ?_Lock@_Mutex@std@@QEAAXXZ */
|
|
||||||
DEFINE_THISCALL_WRAPPER(mutex_lock, 4)
|
|
||||||
void __thiscall mutex_lock(mutex *this)
|
|
||||||
{
|
|
||||||
EnterCriticalSection(this->mutex);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ?_Unlock@_Mutex@std@@QAEXXZ */
|
|
||||||
/* ?_Unlock@_Mutex@std@@QEAAXXZ */
|
|
||||||
DEFINE_THISCALL_WRAPPER(mutex_unlock, 4)
|
|
||||||
void __thiscall mutex_unlock(mutex *this)
|
|
||||||
{
|
|
||||||
LeaveCriticalSection(this->mutex);
|
|
||||||
}
|
|
||||||
|
|
||||||
static CRITICAL_SECTION lockit_cs[_MAX_LOCK];
|
|
||||||
|
|
||||||
/* ?_Lockit_ctor@_Lockit@std@@SAXH@Z */
|
|
||||||
static void _Lockit_init(int locktype) {
|
|
||||||
InitializeCriticalSection(&lockit_cs[locktype]);
|
|
||||||
lockit_cs[locktype].DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": _Lockit critical section");
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ?_Lockit_dtor@_Lockit@std@@SAXH@Z */
|
|
||||||
static void _Lockit_free(int locktype)
|
|
||||||
{
|
|
||||||
lockit_cs[locktype].DebugInfo->Spare[0] = 0;
|
|
||||||
DeleteCriticalSection(&lockit_cs[locktype]);
|
|
||||||
}
|
|
||||||
|
|
||||||
void init_lockit(void) {
|
|
||||||
int i;
|
|
||||||
|
|
||||||
for(i=0; i<_MAX_LOCK; i++)
|
|
||||||
_Lockit_init(i);
|
|
||||||
}
|
|
||||||
|
|
||||||
void free_lockit(void) {
|
|
||||||
int i;
|
|
||||||
|
|
||||||
for(i=0; i<_MAX_LOCK; i++)
|
|
||||||
_Lockit_free(i);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ?_Lockit_ctor@_Lockit@std@@CAXPAV12@H@Z */
|
|
||||||
/* ?_Lockit_ctor@_Lockit@std@@CAXPEAV12@H@Z */
|
|
||||||
static void _Lockit__Lockit_ctor_locktype(_Lockit *lockit, int locktype)
|
|
||||||
{
|
|
||||||
lockit->locktype = locktype;
|
|
||||||
EnterCriticalSection(&lockit_cs[locktype]);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ??0_Lockit@std@@QAE@H@Z */
|
|
||||||
/* ??0_Lockit@std@@QEAA@H@Z */
|
|
||||||
DEFINE_THISCALL_WRAPPER(_Lockit_ctor_locktype, 8)
|
|
||||||
_Lockit* __thiscall _Lockit_ctor_locktype(_Lockit *this, int locktype)
|
|
||||||
{
|
|
||||||
_Lockit__Lockit_ctor_locktype(this, locktype);
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ??0_Lockit@std@@QAE@XZ */
|
|
||||||
/* ??0_Lockit@std@@QEAA@XZ */
|
|
||||||
DEFINE_THISCALL_WRAPPER(_Lockit_ctor, 4)
|
|
||||||
_Lockit* __thiscall _Lockit_ctor(_Lockit *this)
|
|
||||||
{
|
|
||||||
_Lockit__Lockit_ctor_locktype(this, 0);
|
|
||||||
return this;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ?_Lockit_dtor@_Lockit@std@@CAXPAV12@@Z */
|
|
||||||
/* ?_Lockit_dtor@_Lockit@std@@CAXPEAV12@@Z */
|
|
||||||
static void _Lockit__Lockit_dtor(_Lockit *lockit)
|
|
||||||
{
|
|
||||||
LeaveCriticalSection(&lockit_cs[lockit->locktype]);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ??1_Lockit@std@@QAE@XZ */
|
|
||||||
/* ??1_Lockit@std@@QEAA@XZ */
|
|
||||||
DEFINE_THISCALL_WRAPPER(_Lockit_dtor, 4)
|
|
||||||
void __thiscall _Lockit_dtor(_Lockit *this)
|
|
||||||
{
|
|
||||||
_Lockit__Lockit_dtor(this);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* wctype */
|
|
||||||
unsigned short __cdecl wctype(const char *property)
|
|
||||||
{
|
|
||||||
static const struct {
|
|
||||||
const char *name;
|
|
||||||
unsigned short mask;
|
|
||||||
} properties[] = {
|
|
||||||
{ "alnum", _DIGIT|_ALPHA },
|
|
||||||
{ "alpha", _ALPHA },
|
|
||||||
{ "cntrl", _CONTROL },
|
|
||||||
{ "digit", _DIGIT },
|
|
||||||
{ "graph", _DIGIT|_PUNCT|_ALPHA },
|
|
||||||
{ "lower", _LOWER },
|
|
||||||
{ "print", _DIGIT|_PUNCT|_BLANK|_ALPHA },
|
|
||||||
{ "punct", _PUNCT },
|
|
||||||
{ "space", _SPACE },
|
|
||||||
{ "upper", _UPPER },
|
|
||||||
{ "xdigit", _HEX }
|
|
||||||
};
|
|
||||||
unsigned int i;
|
|
||||||
|
|
||||||
for(i=0; i<sizeof(properties)/sizeof(properties[0]); i++)
|
|
||||||
if(!strcmp(property, properties[i].name))
|
|
||||||
return properties[i].mask;
|
|
||||||
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
typedef void (__cdecl *MSVCP_new_handler_func)(void);
|
|
||||||
static MSVCP_new_handler_func MSVCP_new_handler;
|
|
||||||
static int __cdecl new_handler_wrapper(MSVCP_size_t unused)
|
|
||||||
{
|
|
||||||
MSVCP_new_handler();
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ?set_new_handler@std@@YAP6AXXZP6AXXZ@Z */
|
|
||||||
MSVCP_new_handler_func __cdecl set_new_handler(MSVCP_new_handler_func new_handler)
|
|
||||||
{
|
|
||||||
MSVCP_new_handler_func old_handler = MSVCP_new_handler;
|
|
||||||
|
|
||||||
TRACE("%p\n", new_handler);
|
|
||||||
|
|
||||||
MSVCP_new_handler = new_handler;
|
|
||||||
MSVCRT_set_new_handler(new_handler ? new_handler_wrapper : NULL);
|
|
||||||
return old_handler;
|
|
||||||
}
|
|
|
@ -1,105 +0,0 @@
|
||||||
/*
|
|
||||||
* Copyright 2010 Piotr Caban for CodeWeavers
|
|
||||||
*
|
|
||||||
* This library is free software; you can redistribute it and/or
|
|
||||||
* modify it under the terms of the GNU Lesser General Public
|
|
||||||
* License as published by the Free Software Foundation; either
|
|
||||||
* version 2.1 of the License, or (at your option) any later version.
|
|
||||||
*
|
|
||||||
* This library is distributed in the hope that it will be useful,
|
|
||||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
||||||
* Lesser General Public License for more details.
|
|
||||||
*
|
|
||||||
* You should have received a copy of the GNU Lesser General Public
|
|
||||||
* License along with this library; if not, write to the Free Software
|
|
||||||
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "config.h"
|
|
||||||
|
|
||||||
#include <stdarg.h>
|
|
||||||
|
|
||||||
#include "msvcp.h"
|
|
||||||
|
|
||||||
#include "windef.h"
|
|
||||||
#include "winbase.h"
|
|
||||||
#include "wine/debug.h"
|
|
||||||
|
|
||||||
#ifdef __i386__
|
|
||||||
|
|
||||||
#define DEFINE_VTBL_WRAPPER(off) \
|
|
||||||
__ASM_GLOBAL_FUNC(vtbl_wrapper_ ## off, \
|
|
||||||
"popl %eax\n\t" \
|
|
||||||
"popl %ecx\n\t" \
|
|
||||||
"pushl %eax\n\t" \
|
|
||||||
"movl 0(%ecx), %eax\n\t" \
|
|
||||||
"jmp *" #off "(%eax)\n\t")
|
|
||||||
|
|
||||||
DEFINE_VTBL_WRAPPER(0);
|
|
||||||
DEFINE_VTBL_WRAPPER(4);
|
|
||||||
DEFINE_VTBL_WRAPPER(8);
|
|
||||||
DEFINE_VTBL_WRAPPER(12);
|
|
||||||
DEFINE_VTBL_WRAPPER(16);
|
|
||||||
DEFINE_VTBL_WRAPPER(20);
|
|
||||||
DEFINE_VTBL_WRAPPER(24);
|
|
||||||
DEFINE_VTBL_WRAPPER(28);
|
|
||||||
DEFINE_VTBL_WRAPPER(32);
|
|
||||||
DEFINE_VTBL_WRAPPER(36);
|
|
||||||
DEFINE_VTBL_WRAPPER(40);
|
|
||||||
DEFINE_VTBL_WRAPPER(44);
|
|
||||||
DEFINE_VTBL_WRAPPER(48);
|
|
||||||
|
|
||||||
#endif
|
|
||||||
|
|
||||||
void* (__cdecl *MSVCRT_operator_new)(MSVCP_size_t);
|
|
||||||
void (__cdecl *MSVCRT_operator_delete)(void*);
|
|
||||||
void* (__cdecl *MSVCRT_set_new_handler)(void*);
|
|
||||||
|
|
||||||
static void init_cxx_funcs(void)
|
|
||||||
{
|
|
||||||
HMODULE hmod = GetModuleHandleA("msvcrt.dll");
|
|
||||||
|
|
||||||
if (sizeof(void *) > sizeof(int)) /* 64-bit has different names */
|
|
||||||
{
|
|
||||||
MSVCRT_operator_new = (void*)GetProcAddress(hmod, "??2@YAPEAX_K@Z");
|
|
||||||
MSVCRT_operator_delete = (void*)GetProcAddress(hmod, "??3@YAXPEAX@Z");
|
|
||||||
MSVCRT_set_new_handler = (void*)GetProcAddress(hmod, "?_set_new_handler@@YAP6AH_K@ZP6AH0@Z@Z");
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
MSVCRT_operator_new = (void*)GetProcAddress(hmod, "??2@YAPAXI@Z");
|
|
||||||
MSVCRT_operator_delete = (void*)GetProcAddress(hmod, "??3@YAXPAX@Z");
|
|
||||||
MSVCRT_set_new_handler = (void*)GetProcAddress(hmod, "?_set_new_handler@@YAP6AHI@ZP6AHI@Z@Z");
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
BOOL WINAPI DllMain(HINSTANCE hdll, DWORD reason, LPVOID reserved)
|
|
||||||
{
|
|
||||||
switch (reason)
|
|
||||||
{
|
|
||||||
case DLL_WINE_PREATTACH:
|
|
||||||
return FALSE; /* prefer native version */
|
|
||||||
case DLL_PROCESS_ATTACH:
|
|
||||||
init_cxx_funcs();
|
|
||||||
init_lockit();
|
|
||||||
init_exception(hdll);
|
|
||||||
init_locale(hdll);
|
|
||||||
init_io(hdll);
|
|
||||||
break;
|
|
||||||
case DLL_PROCESS_DETACH:
|
|
||||||
if (reserved) break;
|
|
||||||
free_io();
|
|
||||||
free_locale();
|
|
||||||
free_lockit();
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
return TRUE;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ?_BADOFF@std@@3JB -> long const std::_BADOFF */
|
|
||||||
/* ?_BADOFF@std@@3_JB -> __int64 const std::_BADOFF */
|
|
||||||
const streamoff std_BADOFF = -1;
|
|
||||||
|
|
||||||
/* ?_Fpz@std@@3_JA __int64 std::_Fpz */
|
|
||||||
__int64 std_Fpz = 0;
|
|
Loading…
Reference in New Issue