git.oblomov.eu Git - wine/blob - dlls/msvcr90/msvcr90.c

   1 /*
   2  * msvcr90 specific functions
   3  *
   4  * Copyright 2010 Detlef Riekenberg
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include <stdarg.h>
  22
  23 #include "stdlib.h"
  24 #include "errno.h"
  25 #include "malloc.h"
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "wine/debug.h"
  29
  30 WINE_DEFAULT_DEBUG_CHANNEL(msvcr90);
  31
  32 typedef int (CDECL *_INITTERM_E_FN)(void);
  33
  34 /*********************************************************************
  35  *  DllMain (MSVCR90.@)
  36  */
  37 BOOL WINAPI DllMain(HINSTANCE hdll, DWORD reason, LPVOID reserved)
  38 {
  39     switch (reason)
  40     {
  41     case DLL_WINE_PREATTACH:
  42         return FALSE;  /* prefer native version */
  43
  44     case DLL_PROCESS_ATTACH:
  45         DisableThreadLibraryCalls(hdll);
  46     }
  47     return TRUE;
  48 }
  49
  50 /*********************************************************************
  51  *  _decode_pointer (MSVCR90.@)
  52  *
  53  * cdecl version of DecodePointer
  54  *
  55  */
  56 void * CDECL MSVCR90_decode_pointer(void * ptr)
  57 {
  58     return DecodePointer(ptr);
  59 }
  60
  61 /*********************************************************************
  62  *  _encode_pointer (MSVCR90.@)
  63  *
  64  * cdecl version of EncodePointer
  65  *
  66  */
  67 void * CDECL MSVCR90_encode_pointer(void * ptr)
  68 {
  69     return EncodePointer(ptr);
  70 }
  71
  72 /*********************************************************************
  73  *  _encoded_null (MSVCR90.@)
  74  */
  75 void * CDECL _encoded_null(void)
  76 {
  77     TRACE("\n");
  78
  79     return MSVCR90_encode_pointer(NULL);
  80 }
  81
  82 /*********************************************************************
  83  *  _initterm_e (MSVCR90.@)
  84  *
  85  * call an array of application initialization functions and report the return value
  86  */
  87 int CDECL _initterm_e(_INITTERM_E_FN *table, _INITTERM_E_FN *end)
  88 {
  89     int res = 0;
  90
  91     TRACE("(%p, %p)\n", table, end);
  92
  93     while (!res && table < end) {
  94         if (*table) {
  95             res = (**table)();
  96             if (res)
  97                 TRACE("function %p failed: 0x%x\n", *table, res);
  98
  99         }
 100         table++;
 101     }
 102     return res;
 103 }
 104
 105 /*********************************************************************
 106  * _invalid_parameter_noinfo (MSVCR90.@)
 107  */
 108 void CDECL _invalid_parameter_noinfo(void)
 109 {
 110     _invalid_parameter( NULL, NULL, NULL, 0, 0 );
 111 }
 112
 113 /*********************************************************************
 114  * __sys_nerr (MSVCR90.@)
 115  */
 116 int* CDECL __sys_nerr(void)
 117 {
 118         return (int*)GetProcAddress(GetModuleHandleA("msvcrt.dll"), "_sys_nerr");
 119 }
 120
 121 /*********************************************************************
 122  *  __sys_errlist (MSVCR90.@)
 123  */
 124 char** CDECL __sys_errlist(void)
 125 {
 126     return (char**)GetProcAddress(GetModuleHandleA("msvcrt.dll"), "_sys_errlist");
 127 }
 128
 129 /*********************************************************************
 130  * __clean_type_info_names_internal (MSVCR90.@)
 131  */
 132 void CDECL __clean_type_info_names_internal(void *p)
 133 {
 134     FIXME("(%p) stub\n", p);
 135 }
 136
 137 /*********************************************************************
 138  * _recalloc (MSVCR90.@)
 139  */
 140 void* CDECL _recalloc(void* mem, size_t num, size_t size)
 141 {
 142     size_t old_size;
 143     void *ret;
 144
 145     if(!mem)
 146         return calloc(num, size);
 147
 148     size = num*size;
 149     old_size = _msize(mem);
 150
 151     ret = realloc(mem, size);
 152     if(!ret) {
 153         *_errno() = ENOMEM;
 154         return NULL;
 155     }
 156
 157     if(size>old_size)
 158         memset((BYTE*)mem+old_size, 0, size-old_size);
 159     return ret;
 160 }