dlls/msvcp90/msvcp_main.c

   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 <stdarg.h>
  20
  21 #include "msvcp90.h"
  22
  23 #include "windef.h"
  24 #include "winbase.h"
  25 #include "wine/debug.h"
  26
  27 WINE_DEFAULT_DEBUG_CHANNEL(msvcp);
  28
  29 #ifdef __ASM_USE_THISCALL_WRAPPER
  30
  31 #define DEFINE_VTBL_WRAPPER(off)            \
  32     __ASM_GLOBAL_FUNC(vtbl_wrapper_ ## off, \
  33         "popl %eax\n\t"                     \
  34         "popl %ecx\n\t"                     \
  35         "pushl %eax\n\t"                    \
  36         "movl 0(%ecx), %eax\n\t"            \
  37         "jmp *" #off "(%eax)\n\t")
  38
  39 DEFINE_VTBL_WRAPPER(0);
  40 DEFINE_VTBL_WRAPPER(4);
  41 DEFINE_VTBL_WRAPPER(8);
  42 DEFINE_VTBL_WRAPPER(12);
  43 DEFINE_VTBL_WRAPPER(16);
  44 DEFINE_VTBL_WRAPPER(20);
  45 DEFINE_VTBL_WRAPPER(24);
  46 DEFINE_VTBL_WRAPPER(28);
  47 DEFINE_VTBL_WRAPPER(32);
  48 DEFINE_VTBL_WRAPPER(36);
  49 DEFINE_VTBL_WRAPPER(40);
  50 DEFINE_VTBL_WRAPPER(44);
  51 DEFINE_VTBL_WRAPPER(48);
  52 DEFINE_VTBL_WRAPPER(52);
  53 DEFINE_VTBL_WRAPPER(56);
  54
  55 #endif
  56
  57 void* (__cdecl *MSVCRT_operator_new)(MSVCP_size_t);
  58 void (__cdecl *MSVCRT_operator_delete)(void*);
  59 void* (__cdecl *MSVCRT_set_new_handler)(void*);
  60
  61 #if _MSVCP_VER >= 110
  62 critical_section* (__thiscall *critical_section_ctor)(critical_section*);
  63 void (__thiscall *critical_section_dtor)(critical_section*);
  64 void (__thiscall *critical_section_lock)(critical_section*);
  65 void (__thiscall *critical_section_unlock)(critical_section*);
  66 MSVCP_bool (__thiscall *critical_section_trylock)(critical_section*);
  67 #endif
  68
  69 #if _MSVCP_VER >= 100
  70 MSVCP_bool (__cdecl *Context_IsCurrentTaskCollectionCanceling)(void);
  71 #endif
  72
  73 #define VERSION_STRING(ver) #ver
  74 #if _MSVCP_VER >= 140
  75 #define MSVCRT_NAME(ver) "ucrtbase.dll"
  76 #define CONCRT_NAME(ver) "concrt" VERSION_STRING(ver) ".dll"
  77 #else
  78 #define MSVCRT_NAME(ver) "msvcr" VERSION_STRING(ver) ".dll"
  79 #endif
  80
  81 #if _MSVCP_VER >= 140
  82 static void* __cdecl operator_new(MSVCP_size_t size)
  83 {
  84     void *retval;
  85     int freed;
  86
  87     do
  88     {
  89         retval = malloc(size);
  90         if (retval)
  91         {
  92             TRACE("(%ld) returning %p\n", size, retval);
  93             return retval;
  94         }
  95         freed = _callnewh(size);
  96     } while (freed);
  97
  98     TRACE("(%ld) out of memory\n", size);
  99     throw_exception(EXCEPTION_BAD_ALLOC, "bad allocation");
 100     return NULL;
 101 }
 102
 103 static void __cdecl operator_delete(void *mem)
 104 {
 105     TRACE("(%p)\n", mem);
 106     free(mem);
 107 }
 108
 109 void __cdecl _invalid_parameter(const wchar_t *expr, const wchar_t *func, const wchar_t *file, unsigned int line, uintptr_t arg)
 110 {
 111    _invalid_parameter_noinfo();
 112 }
 113 #endif
 114
 115 static void init_cxx_funcs(void)
 116 {
 117     HMODULE hmod = GetModuleHandleA( MSVCRT_NAME(_MSVCP_VER) );
 118 #if _MSVCP_VER >= 100
 119     HMODULE hcon = hmod;
 120 #endif
 121
 122     if (!hmod) FIXME( "%s not loaded\n", MSVCRT_NAME(_MSVCP_VER) );
 123
 124 #if _MSVCP_VER >= 140
 125     MSVCRT_operator_new = operator_new;
 126     MSVCRT_operator_delete = operator_delete;
 127     MSVCRT_set_new_handler = (void*)GetProcAddress(hmod, "_set_new_handler");
 128
 129     hcon = LoadLibraryA( CONCRT_NAME(_MSVCP_VER) );
 130     if (!hcon) FIXME( "%s not loaded\n", CONCRT_NAME(_MSVCP_VER) );
 131 #else
 132     if (sizeof(void *) > sizeof(int))  /* 64-bit has different names */
 133     {
 134         MSVCRT_operator_new = (void*)GetProcAddress(hmod, "??2@YAPEAX_K@Z");
 135         MSVCRT_operator_delete = (void*)GetProcAddress(hmod, "??3@YAXPEAX@Z");
 136         MSVCRT_set_new_handler = (void*)GetProcAddress(hmod, "?_set_new_handler@@YAP6AH_K@ZP6AH0@Z@Z");
 137     }
 138     else
 139     {
 140         MSVCRT_operator_new = (void*)GetProcAddress(hmod, "??2@YAPAXI@Z");
 141         MSVCRT_operator_delete = (void*)GetProcAddress(hmod, "??3@YAXPAX@Z");
 142         MSVCRT_set_new_handler = (void*)GetProcAddress(hmod, "?_set_new_handler@@YAP6AHI@ZP6AHI@Z@Z");
 143     }
 144 #endif
 145
 146 #if _MSVCP_VER >= 110
 147     if (sizeof(void *) > sizeof(int))  /* 64-bit has different names */
 148     {
 149         critical_section_ctor = (void*)GetProcAddress(hcon, "??0critical_section@Concurrency@@QEAA@XZ");
 150         critical_section_dtor = (void*)GetProcAddress(hcon, "??1critical_section@Concurrency@@QEAA@XZ");
 151         critical_section_lock = (void*)GetProcAddress(hcon, "?lock@critical_section@Concurrency@@QEAAXXZ");
 152         critical_section_unlock = (void*)GetProcAddress(hcon, "?unlock@critical_section@Concurrency@@QEAAXXZ");
 153         critical_section_trylock = (void*)GetProcAddress(hcon, "?try_lock@critical_section@Concurrency@@QEAA_NXZ");
 154     }
 155     else
 156     {
 157 #ifdef __arm__
 158         critical_section_ctor = (void*)GetProcAddress(hcon, "??0critical_section@Concurrency@@QAA@XZ");
 159         critical_section_dtor = (void*)GetProcAddress(hcon, "??1critical_section@Concurrency@@QAA@XZ");
 160         critical_section_lock = (void*)GetProcAddress(hcon, "?lock@critical_section@Concurrency@@QAAXXZ");
 161         critical_section_unlock = (void*)GetProcAddress(hcon, "?unlock@critical_section@Concurrency@@QAAXXZ");
 162         critical_section_trylock = (void*)GetProcAddress(hcon, "?try_lock@critical_section@Concurrency@@QAA_NXZ");
 163 #else
 164         critical_section_ctor = (void*)GetProcAddress(hcon, "??0critical_section@Concurrency@@QAE@XZ");
 165         critical_section_dtor = (void*)GetProcAddress(hcon, "??1critical_section@Concurrency@@QAE@XZ");
 166         critical_section_lock = (void*)GetProcAddress(hcon, "?lock@critical_section@Concurrency@@QAEXXZ");
 167         critical_section_unlock = (void*)GetProcAddress(hcon, "?unlock@critical_section@Concurrency@@QAEXXZ");
 168         critical_section_trylock = (void*)GetProcAddress(hcon, "?try_lock@critical_section@Concurrency@@QAE_NXZ");
 169 #endif
 170     }
 171 #endif /* _MSVCP_VER >= 110 */
 172
 173 #if _MSVCP_VER >= 100
 174     Context_IsCurrentTaskCollectionCanceling = (void*)GetProcAddress(hcon, "?IsCurrentTaskCollectionCanceling@Context@Concurrency@@SA_NXZ");
 175 #endif
 176 }
 177
 178 BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved)
 179 {
 180     TRACE("(0x%p, %d, %p)\n", hinstDLL, fdwReason, lpvReserved);
 181
 182     switch (fdwReason)
 183     {
 184         case DLL_PROCESS_ATTACH:
 185             init_cxx_funcs();
 186             _Init_locks__Init_locks_ctor(NULL);
 187             init_exception(hinstDLL);
 188             init_locale(hinstDLL);
 189             init_io(hinstDLL);
 190 #if _MSVCP_VER >= 100
 191             init_misc(hinstDLL);
 192 #endif
 193             break;
 194         case DLL_PROCESS_DETACH:
 195             if (lpvReserved) break;
 196             free_io();
 197             free_locale();
 198             _Init_locks__Init_locks_dtor(NULL);
 199 #if _MSVCP_VER >= 100
 200             free_misc();
 201 #endif
 202             break;
 203     }
 204
 205     return TRUE;
 206 }
 207
 208 /* ?_BADOFF@std@@3JB -> long const std::_BADOFF */
 209 /* ?_BADOFF@std@@3_JB -> __int64 const std::_BADOFF */
 210 const streamoff std_BADOFF = -1;
 211
 212 /* ?_BADOFF_func@std@@YAABJXZ -> long const & __cdecl std::_BADOFF_func(void) */
 213 /* ?_BADOFF_func@std@@YAAEB_JXZ -> __int64 const & __ptr64 __cdecl std::_BADOFF_func(void) */
 214 const streamoff * __cdecl std_BADOFF_func(void)
 215 {
 216     return &std_BADOFF;
 217 }
 218
 219 /* ?_Fpz@std@@3_JA  __int64 std::_Fpz */
 220 __int64 std_Fpz = 0;
 221
 222 /* ?_Fpz_func@std@@YAAA_JXZ -> __int64 & __cdecl std::_Fpz_func(void) */
 223 /* ?_Fpz_func@std@@YAAEA_JXZ -> __int64 & __ptr64 __cdecl std::_Fpz_func(void) */
 224 __int64 * __cdecl std_Fpz_func(void)
 225 {
 226     return &std_Fpz;
 227 }