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 #include "sys/stat.h"
  30
  31 WINE_DEFAULT_DEBUG_CHANNEL(msvcr90);
  32
  33 typedef int (CDECL *_INITTERM_E_FN)(void);
  34
  35 /*********************************************************************
  36  *  DllMain (MSVCR90.@)
  37  */
  38 BOOL WINAPI DllMain(HINSTANCE hdll, DWORD reason, LPVOID reserved)
  39 {
  40     switch (reason)
  41     {
  42     case DLL_WINE_PREATTACH:
  43         return FALSE;  /* prefer native version */
  44
  45     case DLL_PROCESS_ATTACH:
  46         DisableThreadLibraryCalls(hdll);
  47     }
  48     return TRUE;
  49 }
  50
  51 /*********************************************************************
  52  *  _decode_pointer (MSVCR90.@)
  53  *
  54  * cdecl version of DecodePointer
  55  *
  56  */
  57 void * CDECL MSVCR90_decode_pointer(void * ptr)
  58 {
  59     return DecodePointer(ptr);
  60 }
  61
  62 /*********************************************************************
  63  *  _encode_pointer (MSVCR90.@)
  64  *
  65  * cdecl version of EncodePointer
  66  *
  67  */
  68 void * CDECL MSVCR90_encode_pointer(void * ptr)
  69 {
  70     return EncodePointer(ptr);
  71 }
  72
  73 /*********************************************************************
  74  *  _encoded_null (MSVCR90.@)
  75  */
  76 void * CDECL _encoded_null(void)
  77 {
  78     TRACE("\n");
  79
  80     return MSVCR90_encode_pointer(NULL);
  81 }
  82
  83 /*********************************************************************
  84  *  _initterm_e (MSVCR90.@)
  85  *
  86  * call an array of application initialization functions and report the return value
  87  */
  88 int CDECL _initterm_e(_INITTERM_E_FN *table, _INITTERM_E_FN *end)
  89 {
  90     int res = 0;
  91
  92     TRACE("(%p, %p)\n", table, end);
  93
  94     while (!res && table < end) {
  95         if (*table) {
  96             res = (**table)();
  97             if (res)
  98                 TRACE("function %p failed: 0x%x\n", *table, res);
  99
 100         }
 101         table++;
 102     }
 103     return res;
 104 }
 105
 106 /*********************************************************************
 107  * _invalid_parameter_noinfo (MSVCR90.@)
 108  */
 109 void CDECL _invalid_parameter_noinfo(void)
 110 {
 111     _invalid_parameter( NULL, NULL, NULL, 0, 0 );
 112 }
 113
 114 /*********************************************************************
 115  * __sys_nerr (MSVCR90.@)
 116  */
 117 int* CDECL __sys_nerr(void)
 118 {
 119         return (int*)GetProcAddress(GetModuleHandleA("msvcrt.dll"), "_sys_nerr");
 120 }
 121
 122 /*********************************************************************
 123  *  __sys_errlist (MSVCR90.@)
 124  */
 125 char** CDECL __sys_errlist(void)
 126 {
 127     return (char**)GetProcAddress(GetModuleHandleA("msvcrt.dll"), "_sys_errlist");
 128 }
 129
 130 /*********************************************************************
 131  * __clean_type_info_names_internal (MSVCR90.@)
 132  */
 133 void CDECL __clean_type_info_names_internal(void *p)
 134 {
 135     FIXME("(%p) stub\n", p);
 136 }
 137
 138 /*********************************************************************
 139  * _recalloc (MSVCR90.@)
 140  */
 141 void* CDECL _recalloc(void* mem, size_t num, size_t size)
 142 {
 143     size_t old_size;
 144     void *ret;
 145
 146     if(!mem)
 147         return calloc(num, size);
 148
 149     size = num*size;
 150     old_size = _msize(mem);
 151
 152     ret = realloc(mem, size);
 153     if(!ret) {
 154         *_errno() = ENOMEM;
 155         return NULL;
 156     }
 157
 158     if(size>old_size)
 159         memset((BYTE*)mem+old_size, 0, size-old_size);
 160     return ret;
 161 }
 162
 163 /*********************************************************************
 164  *              _fstat64i32 (MSVCRT.@)
 165  */
 166
 167 static void msvcrt_stat64_to_stat64i32(const struct _stat64 *buf64, struct _stat64i32 *buf)
 168 {
 169     buf->st_dev   = buf64->st_dev;
 170     buf->st_ino   = buf64->st_ino;
 171     buf->st_mode  = buf64->st_mode;
 172     buf->st_nlink = buf64->st_nlink;
 173     buf->st_uid   = buf64->st_uid;
 174     buf->st_gid   = buf64->st_gid;
 175     buf->st_rdev  = buf64->st_rdev;
 176     buf->st_size  = buf64->st_size;
 177     buf->st_atime = buf64->st_atime;
 178     buf->st_mtime = buf64->st_mtime;
 179     buf->st_ctime = buf64->st_ctime;
 180 }
 181
 182 int CDECL _fstat64i32(int fd, struct _stat64i32* buf)
 183 {
 184   int ret;
 185   struct _stat64 buf64;
 186
 187   ret = _fstat64(fd, &buf64);
 188   if (!ret)
 189       msvcrt_stat64_to_stat64i32(&buf64, buf);
 190   return ret;
 191 }
 192
 193 /*********************************************************************
 194  *              _stat64i32 (MSVCRT.@)
 195  */
 196 int CDECL _stat64i32(const char* path, struct _stat64i32 * buf)
 197 {
 198   int ret;
 199   struct _stat64 buf64;
 200
 201   ret = _stat64(path, &buf64);
 202   if (!ret)
 203     msvcrt_stat64_to_stat64i32(&buf64, buf);
 204   return ret;
 205 }