dlls/msvcp60/msvcp.h

   1 /*
   2  * Copyright 2010 Piotr Caban for CodeWeavers
   3  *
   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.
   8  *
   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.
  13  *
  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
  17  */
  18
  19 #include "stdlib.h"
  20 #include "windef.h"
  21
  22 typedef unsigned char MSVCP_bool;
  23 typedef SIZE_T MSVCP_size_t;
  24 typedef SIZE_T streamoff;
  25 typedef SIZE_T streamsize;
  26
  27 void __cdecl _invalid_parameter(const wchar_t*, const wchar_t*,
  28         const wchar_t*, unsigned int, uintptr_t);
  29
  30 extern void* (__cdecl *MSVCRT_operator_new)(MSVCP_size_t);
  31 extern void (__cdecl *MSVCRT_operator_delete)(void*);
  32 extern void* (__cdecl *MSVCRT_set_new_handler)(void*);
  33
  34 /* Copied from dlls/msvcrt/cpp.c */
  35 #ifdef __i386__  /* thiscall functions are i386-specific */
  36
  37 #define THISCALL(func) __thiscall_ ## func
  38 #define THISCALL_NAME(func) __ASM_NAME("__thiscall_" #func)
  39 #define __thiscall __stdcall
  40 #define DEFINE_THISCALL_WRAPPER(func,args) \
  41     extern void THISCALL(func)(void); \
  42     __ASM_GLOBAL_FUNC(__thiscall_ ## func, \
  43                       "popl %eax\n\t" \
  44                       "pushl %ecx\n\t" \
  45                       "pushl %eax\n\t" \
  46                       "jmp " __ASM_NAME(#func) __ASM_STDCALL(args) )
  47 #else /* __i386__ */
  48
  49 #define THISCALL(func) func
  50 #define THISCALL_NAME(func) __ASM_NAME(#func)
  51 #define __thiscall __cdecl
  52 #define DEFINE_THISCALL_WRAPPER(func,args) /* nothing */
  53
  54 #endif /* __i386__ */
  55
  56 #ifdef _WIN64
  57
  58 #define VTABLE_ADD_FUNC(name) "\t.quad " THISCALL_NAME(name) "\n"
  59
  60 #define __ASM_VTABLE(name,funcs) \
  61     __asm__(".data\n" \
  62             "\t.align 8\n" \
  63             "\t.quad " __ASM_NAME(#name "_rtti") "\n" \
  64             "\t.globl " __ASM_NAME("MSVCP_" #name "_vtable") "\n" \
  65             __ASM_NAME("MSVCP_" #name "_vtable") ":\n" \
  66             "\t.quad " THISCALL_NAME(MSVCP_ ## name ## _vector_dtor) "\n" \
  67             funcs "\n\t.text")
  68
  69 #else
  70
  71 #define VTABLE_ADD_FUNC(name) "\t.long " THISCALL_NAME(name) "\n"
  72
  73 #define __ASM_VTABLE(name,funcs) \
  74     __asm__(".data\n" \
  75             "\t.align 4\n" \
  76             "\t.long " __ASM_NAME(#name "_rtti") "\n" \
  77             "\t.globl " __ASM_NAME("MSVCP_" #name "_vtable") "\n" \
  78             __ASM_NAME("MSVCP_" #name "_vtable") ":\n" \
  79             "\t.long " THISCALL_NAME(MSVCP_ ## name ## _vector_dtor) "\n" \
  80             funcs "\n\t.text")
  81
  82 #endif /* _WIN64 */
  83
  84 #define DEFINE_RTTI_DATA(name, off, base_classes, cl1, cl2, cl3, mangled_name) \
  85 static const type_info name ## _type_info = { \
  86     &MSVCP_type_info_vtable, \
  87     NULL, \
  88     mangled_name \
  89 }; \
  90 \
  91 static const rtti_base_descriptor name ## _rtti_base_descriptor = { \
  92     &name ##_type_info, \
  93     base_classes, \
  94     { 0, -1, 0}, \
  95     64 \
  96 }; \
  97 \
  98 static const rtti_base_array name ## _rtti_base_array = { \
  99     { \
 100         &name ## _rtti_base_descriptor, \
 101         cl1, \
 102         cl2, \
 103         cl3 \
 104     } \
 105 }; \
 106 \
 107 static const rtti_object_hierarchy name ## _hierarchy = { \
 108     0, \
 109     0, \
 110     base_classes+1, \
 111     &name ## _rtti_base_array \
 112 }; \
 113 \
 114 const rtti_object_locator name ## _rtti = { \
 115     0, \
 116     off, \
 117     0, \
 118     &name ## _type_info, \
 119     &name ## _hierarchy \
 120 }
 121
 122 #ifdef __i386__
 123
 124 #define CALL_VTBL_FUNC(this, off, ret, type, args) ((ret (WINAPI*)type)&vtbl_wrapper_##off)args
 125
 126 extern void *vtbl_wrapper_0;
 127 extern void *vtbl_wrapper_4;
 128 extern void *vtbl_wrapper_8;
 129 extern void *vtbl_wrapper_12;
 130 extern void *vtbl_wrapper_16;
 131 extern void *vtbl_wrapper_20;
 132 extern void *vtbl_wrapper_24;
 133 extern void *vtbl_wrapper_28;
 134 extern void *vtbl_wrapper_32;
 135 extern void *vtbl_wrapper_36;
 136 extern void *vtbl_wrapper_40;
 137 extern void *vtbl_wrapper_44;
 138 extern void *vtbl_wrapper_48;
 139 extern void *vtbl_wrapper_52;
 140 extern void *vtbl_wrapper_56;
 141 extern void *vtbl_wrapper_60;
 142
 143 #else
 144
 145 #define CALL_VTBL_FUNC(this, off, ret, type, args) ((ret (__cdecl***)type)this)[0][off/4]args
 146
 147 #endif
 148
 149 /* exception object */
 150 typedef void (*vtable_ptr)(void);
 151 typedef struct __exception
 152 {
 153     const vtable_ptr *vtable;
 154     char             *name;    /* Name of this exception, always a new copy for each object */
 155     int               do_free; /* Whether to free 'name' in our dtor */
 156 } exception;
 157
 158 /* Internal: throws selected exception */
 159 typedef enum __exception_type {
 160     EXCEPTION,
 161     EXCEPTION_BAD_ALLOC,
 162     EXCEPTION_LOGIC_ERROR,
 163     EXCEPTION_LENGTH_ERROR,
 164     EXCEPTION_OUT_OF_RANGE,
 165     EXCEPTION_INVALID_ARGUMENT,
 166     EXCEPTION_RUNTIME_ERROR
 167 } exception_type;
 168 void throw_exception(exception_type, const char *);
 169
 170 /* rtti */
 171 typedef struct __type_info
 172 {
 173     const vtable_ptr *vtable;
 174     char              *name;        /* Unmangled name, allocated lazily */
 175     char               mangled[64]; /* Variable length, but we declare it large enough for static RTTI */
 176 } type_info;
 177
 178 /* offsets for computing the this pointer */
 179 typedef struct
 180 {
 181     int         this_offset;   /* offset of base class this pointer from start of object */
 182     int         vbase_descr;   /* offset of virtual base class descriptor */
 183     int         vbase_offset;  /* offset of this pointer offset in virtual base class descriptor */
 184 } this_ptr_offsets;
 185
 186 typedef struct _rtti_base_descriptor
 187 {
 188     const type_info *type_descriptor;
 189     int num_base_classes;
 190     this_ptr_offsets offsets;    /* offsets for computing the this pointer */
 191     unsigned int attributes;
 192 } rtti_base_descriptor;
 193
 194 typedef struct _rtti_base_array
 195 {
 196     const rtti_base_descriptor *bases[4]; /* First element is the class itself */
 197 } rtti_base_array;
 198
 199 typedef struct _rtti_object_hierarchy
 200 {
 201     unsigned int signature;
 202     unsigned int attributes;
 203     int array_len; /* Size of the array pointed to by 'base_classes' */
 204     const rtti_base_array *base_classes;
 205 } rtti_object_hierarchy;
 206
 207 typedef struct _rtti_object_locator
 208 {
 209     unsigned int signature;
 210     int base_class_offset;
 211     unsigned int flags;
 212     const type_info *type_descriptor;
 213     const rtti_object_hierarchy *type_hierarchy;
 214 } rtti_object_locator;
 215
 216 /* basic_string<char, char_traits<char>, allocator<char>> */
 217 #define BUF_SIZE_CHAR 16
 218 typedef struct _basic_string_char
 219 {
 220     void *allocator;
 221     char *ptr;
 222     MSVCP_size_t size;
 223     MSVCP_size_t res;
 224 } basic_string_char;
 225
 226 basic_string_char* __stdcall MSVCP_basic_string_char_ctor_cstr(basic_string_char*, const char*);
 227 basic_string_char* __stdcall MSVCP_basic_string_char_copy_ctor(basic_string_char*, const basic_string_char*);
 228 void __stdcall MSVCP_basic_string_char_dtor(basic_string_char*);
 229 const char* __stdcall MSVCP_basic_string_char_c_str(const basic_string_char*);
 230
 231 #define BUF_SIZE_WCHAR 8
 232 typedef struct _basic_string_wchar
 233 {
 234     void *allocator;
 235     wchar_t *ptr;
 236     MSVCP_size_t size;
 237     MSVCP_size_t res;
 238 } basic_string_wchar;
 239
 240 char* __stdcall MSVCP_allocator_char_allocate(void*, MSVCP_size_t);
 241 void __stdcall MSVCP_allocator_char_deallocate(void*, char*, MSVCP_size_t);
 242 MSVCP_size_t __stdcall MSVCP_allocator_char_max_size(void*);
 243 wchar_t* __stdcall MSVCP_allocator_wchar_allocate(void*, MSVCP_size_t);
 244 void __stdcall MSVCP_allocator_wchar_deallocate(void*, wchar_t*, MSVCP_size_t);
 245 MSVCP_size_t __stdcall MSVCP_allocator_wchar_max_size(void*);
 246
 247 /* class locale */
 248 typedef struct
 249 {
 250     struct _locale__Locimp *ptr;
 251 } locale;
 252
 253 locale* __thiscall locale_ctor(locale*);
 254 void __thiscall locale_dtor(locale*);
 255
 256 /* class _Lockit */
 257 typedef struct {
 258     char empty_struct;
 259 } _Lockit;
 260
 261 #define _LOCK_LOCALE 0
 262 #define _LOCK_MALLOC 1
 263 #define _LOCK_STREAM 2
 264 #define _LOCK_DEBUG 3
 265 #define _MAX_LOCK 4
 266
 267 void init_lockit(void);
 268 void free_lockit(void);
 269 _Lockit* __thiscall _Lockit_ctor_locktype(_Lockit*, int);
 270 void __thiscall _Lockit_dtor(_Lockit*);
 271
 272 /* class mutex */
 273 typedef struct {
 274         void *mutex;
 275 } mutex;
 276
 277 mutex* __thiscall mutex_ctor(mutex*);
 278 void __thiscall mutex_dtor(mutex*);
 279 void __thiscall mutex_lock(mutex*);
 280 void __thiscall mutex_unlock(mutex*);