dlls/msvcp90/misc.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 "config.h"
  20
  21 #include <stdarg.h>
  22 #include <limits.h>
  23
  24 #include "msvcp90.h"
  25
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "wine/debug.h"
  29 WINE_DEFAULT_DEBUG_CHANNEL(msvcp);
  30
  31 #define SECSPERDAY 86400
  32 /* 1601 to 1970 is 369 years plus 89 leap days */
  33 #define SECS_1601_TO_1970 ((369 * 365 + 89) * (ULONGLONG)SECSPERDAY)
  34 #define TICKSPERSEC 10000000
  35 #define TICKS_1601_TO_1970 (SECS_1601_TO_1970 * TICKSPERSEC)
  36 #define NANOSEC_PER_MILLISEC 1000000
  37 #define MILLISEC_PER_SEC 1000
  38
  39 struct __Container_proxy;
  40
  41 typedef struct {
  42     struct __Container_proxy *proxy;
  43 } _Container_base12;
  44
  45 typedef struct __Iterator_base12 {
  46     struct __Container_proxy *proxy;
  47     struct __Iterator_base12 *next;
  48 } _Iterator_base12;
  49
  50 typedef struct __Container_proxy {
  51     const _Container_base12 *cont;
  52     _Iterator_base12 *head;
  53 } _Container_proxy;
  54
  55 /* ??0_Mutex@std@@QAE@XZ */
  56 /* ??0_Mutex@std@@QEAA@XZ */
  57 DEFINE_THISCALL_WRAPPER(mutex_ctor, 4)
  58 mutex* __thiscall mutex_ctor(mutex *this)
  59 {
  60     CRITICAL_SECTION *cs = MSVCRT_operator_new(sizeof(*cs));
  61     if(!cs) {
  62         ERR("Out of memory\n");
  63         throw_exception(EXCEPTION_BAD_ALLOC, NULL);
  64     }
  65
  66     InitializeCriticalSection(cs);
  67     cs->DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": _Mutex critical section");
  68     this->mutex = cs;
  69     return this;
  70 }
  71
  72 /* ??1_Mutex@std@@QAE@XZ */
  73 /* ??1_Mutex@std@@QEAA@XZ */
  74 DEFINE_THISCALL_WRAPPER(mutex_dtor, 4)
  75 void __thiscall mutex_dtor(mutex *this)
  76 {
  77     ((CRITICAL_SECTION*)this->mutex)->DebugInfo->Spare[0] = 0;
  78     DeleteCriticalSection(this->mutex);
  79     MSVCRT_operator_delete(this->mutex);
  80 }
  81
  82 /* ?_Lock@_Mutex@std@@QAEXXZ */
  83 /* ?_Lock@_Mutex@std@@QEAAXXZ */
  84 DEFINE_THISCALL_WRAPPER(mutex_lock, 4)
  85 void __thiscall mutex_lock(mutex *this)
  86 {
  87     EnterCriticalSection(this->mutex);
  88 }
  89
  90 /* ?_Unlock@_Mutex@std@@QAEXXZ */
  91 /* ?_Unlock@_Mutex@std@@QEAAXXZ */
  92 DEFINE_THISCALL_WRAPPER(mutex_unlock, 4)
  93 void __thiscall mutex_unlock(mutex *this)
  94 {
  95     LeaveCriticalSection(this->mutex);
  96 }
  97
  98 /* ?_Mutex_Lock@_Mutex@std@@CAXPAV12@@Z */
  99 /* ?_Mutex_Lock@_Mutex@std@@CAXPEAV12@@Z */
 100 void CDECL mutex_mutex_lock(mutex *m)
 101 {
 102     mutex_lock(m);
 103 }
 104
 105 /* ?_Mutex_Unlock@_Mutex@std@@CAXPAV12@@Z */
 106 /* ?_Mutex_Unlock@_Mutex@std@@CAXPEAV12@@Z */
 107 void CDECL mutex_mutex_unlock(mutex *m)
 108 {
 109     mutex_unlock(m);
 110 }
 111
 112 /* ?_Mutex_ctor@_Mutex@std@@CAXPAV12@@Z */
 113 /* ?_Mutex_ctor@_Mutex@std@@CAXPEAV12@@Z */
 114 void CDECL mutex_mutex_ctor(mutex *m)
 115 {
 116     mutex_ctor(m);
 117 }
 118
 119 /* ?_Mutex_dtor@_Mutex@std@@CAXPAV12@@Z */
 120 /* ?_Mutex_dtor@_Mutex@std@@CAXPEAV12@@Z */
 121 void CDECL mutex_mutex_dtor(mutex *m)
 122 {
 123     mutex_dtor(m);
 124 }
 125
 126 static CRITICAL_SECTION lockit_cs[_MAX_LOCK];
 127
 128 /* ?_Lockit_ctor@_Lockit@std@@SAXH@Z */
 129 void __cdecl _Lockit_init(int locktype) {
 130     InitializeCriticalSection(&lockit_cs[locktype]);
 131     lockit_cs[locktype].DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": _Lockit critical section");
 132 }
 133
 134 /* ?_Lockit_dtor@_Lockit@std@@SAXH@Z */
 135 void __cdecl _Lockit_free(int locktype)
 136 {
 137     lockit_cs[locktype].DebugInfo->Spare[0] = 0;
 138     DeleteCriticalSection(&lockit_cs[locktype]);
 139 }
 140
 141 void init_lockit(void) {
 142     int i;
 143
 144     for(i=0; i<_MAX_LOCK; i++)
 145         _Lockit_init(i);
 146 }
 147
 148 void free_lockit(void) {
 149     int i;
 150
 151     for(i=0; i<_MAX_LOCK; i++)
 152         _Lockit_free(i);
 153 }
 154
 155 /* ?_Lockit_ctor@_Lockit@std@@CAXPAV12@H@Z */
 156 /* ?_Lockit_ctor@_Lockit@std@@CAXPEAV12@H@Z */
 157 void __cdecl _Lockit__Lockit_ctor_locktype(_Lockit *lockit, int locktype)
 158 {
 159     lockit->locktype = locktype;
 160     EnterCriticalSection(&lockit_cs[locktype]);
 161 }
 162
 163 /* ?_Lockit_ctor@_Lockit@std@@CAXPAV12@@Z */
 164 /* ?_Lockit_ctor@_Lockit@std@@CAXPEAV12@@Z */
 165 void __cdecl _Lockit__Lockit_ctor(_Lockit *lockit)
 166 {
 167     _Lockit__Lockit_ctor_locktype(lockit, 0);
 168 }
 169
 170 /* ??0_Lockit@std@@QAE@H@Z */
 171 /* ??0_Lockit@std@@QEAA@H@Z */
 172 DEFINE_THISCALL_WRAPPER(_Lockit_ctor_locktype, 8)
 173 _Lockit* __thiscall _Lockit_ctor_locktype(_Lockit *this, int locktype)
 174 {
 175     _Lockit__Lockit_ctor_locktype(this, locktype);
 176     return this;
 177 }
 178
 179 /* ??0_Lockit@std@@QAE@XZ */
 180 /* ??0_Lockit@std@@QEAA@XZ */
 181 DEFINE_THISCALL_WRAPPER(_Lockit_ctor, 4)
 182 _Lockit* __thiscall _Lockit_ctor(_Lockit *this)
 183 {
 184     _Lockit__Lockit_ctor_locktype(this, 0);
 185     return this;
 186 }
 187
 188 /* ?_Lockit_dtor@_Lockit@std@@CAXPAV12@@Z */
 189 /* ?_Lockit_dtor@_Lockit@std@@CAXPEAV12@@Z */
 190 void __cdecl _Lockit__Lockit_dtor(_Lockit *lockit)
 191 {
 192     LeaveCriticalSection(&lockit_cs[lockit->locktype]);
 193 }
 194
 195 /* ??1_Lockit@std@@QAE@XZ */
 196 /* ??1_Lockit@std@@QEAA@XZ */
 197 DEFINE_THISCALL_WRAPPER(_Lockit_dtor, 4)
 198 void __thiscall _Lockit_dtor(_Lockit *this)
 199 {
 200     _Lockit__Lockit_dtor(this);
 201 }
 202
 203 /* wctype */
 204 unsigned short __cdecl wctype(const char *property)
 205 {
 206     static const struct {
 207         const char *name;
 208         unsigned short mask;
 209     } properties[] = {
 210         { "alnum", _DIGIT|_ALPHA },
 211         { "alpha", _ALPHA },
 212         { "cntrl", _CONTROL },
 213         { "digit", _DIGIT },
 214         { "graph", _DIGIT|_PUNCT|_ALPHA },
 215         { "lower", _LOWER },
 216         { "print", _DIGIT|_PUNCT|_BLANK|_ALPHA },
 217         { "punct", _PUNCT },
 218         { "space", _SPACE },
 219         { "upper", _UPPER },
 220         { "xdigit", _HEX }
 221     };
 222     unsigned int i;
 223
 224     for(i=0; i<sizeof(properties)/sizeof(properties[0]); i++)
 225         if(!strcmp(property, properties[i].name))
 226             return properties[i].mask;
 227
 228     return 0;
 229 }
 230
 231 typedef void (__cdecl *MSVCP_new_handler_func)(void);
 232 static MSVCP_new_handler_func MSVCP_new_handler;
 233 static int __cdecl new_handler_wrapper(MSVCP_size_t unused)
 234 {
 235     MSVCP_new_handler();
 236     return 1;
 237 }
 238
 239 /* ?set_new_handler@std@@YAP6AXXZP6AXXZ@Z */
 240 MSVCP_new_handler_func __cdecl set_new_handler(MSVCP_new_handler_func new_handler)
 241 {
 242     MSVCP_new_handler_func old_handler = MSVCP_new_handler;
 243
 244     TRACE("%p\n", new_handler);
 245
 246     MSVCP_new_handler = new_handler;
 247     MSVCRT_set_new_handler(new_handler ? new_handler_wrapper : NULL);
 248     return old_handler;
 249 }
 250
 251 /* ?set_new_handler@std@@YAP6AXXZH@Z */
 252 MSVCP_new_handler_func __cdecl set_new_handler_reset(int unused)
 253 {
 254     return set_new_handler(NULL);
 255 }
 256
 257 /* _Container_base0 is used by apps compiled without iterator checking
 258  * (i.e. with _ITERATOR_DEBUG_LEVEL=0 ).
 259  * It provides empty versions of methods used by visual c++'s stl's
 260  * iterator checking.
 261  * msvcr100 has to provide them in case apps are compiled with /Od
 262  * or the optimizer fails to inline those (empty) calls.
 263  */
 264
 265 /* ?_Orphan_all@_Container_base0@std@@QAEXXZ */
 266 /* ?_Orphan_all@_Container_base0@std@@QEAAXXZ */
 267 DEFINE_THISCALL_WRAPPER(Container_base0_Orphan_all, 4)
 268 void __thiscall Container_base0_Orphan_all(void *this)
 269 {
 270 }
 271
 272 /* ?_Swap_all@_Container_base0@std@@QAEXAAU12@@Z */
 273 /* ?_Swap_all@_Container_base0@std@@QEAAXAEAU12@@Z */
 274 DEFINE_THISCALL_WRAPPER(Container_base0_Swap_all, 8)
 275 void __thiscall Container_base0_Swap_all(void *this, void *that)
 276 {
 277 }
 278
 279 /* ??4_Container_base0@std@@QAEAAU01@ABU01@@Z */
 280 /* ??4_Container_base0@std@@QEAAAEAU01@AEBU01@@Z */
 281 DEFINE_THISCALL_WRAPPER(Container_base0_op_assign, 8)
 282 void* __thiscall Container_base0_op_assign(void *this, const void *that)
 283 {
 284     return this;
 285 }
 286
 287 /* ??0_Container_base12@std@@QAE@ABU01@@Z */
 288 /* ??0_Container_base12@std@@QEAA@AEBU01@@Z */
 289 DEFINE_THISCALL_WRAPPER(_Container_base12_copy_ctor, 8)
 290 _Container_base12* __thiscall _Container_base12_copy_ctor(
 291         _Container_base12 *this, _Container_base12 *that)
 292 {
 293     this->proxy = NULL;
 294     return this;
 295 }
 296
 297 /* ??0_Container_base12@std@@QAE@XZ */
 298 /* ??0_Container_base12@std@@QEAA@XZ */
 299 DEFINE_THISCALL_WRAPPER(_Container_base12_ctor, 4)
 300 _Container_base12* __thiscall _Container_base12_ctor(_Container_base12 *this)
 301 {
 302     this->proxy = NULL;
 303     return this;
 304 }
 305
 306 /* ??1_Container_base12@std@@QAE@XZ */
 307 /* ??1_Container_base12@std@@QEAA@XZ */
 308 DEFINE_THISCALL_WRAPPER(_Container_base12_dtor, 4)
 309 void __thiscall _Container_base12_dtor(_Container_base12 *this)
 310 {
 311 }
 312
 313 /* ??4_Container_base12@std@@QAEAAU01@ABU01@@Z */
 314 /* ??4_Container_base12@std@@QEAAAEAU01@AEBU01@@ */
 315 DEFINE_THISCALL_WRAPPER(_Container_base12_op_assign, 8)
 316 _Container_base12* __thiscall _Container_base12_op_assign(
 317         _Container_base12 *this, const _Container_base12 *that)
 318 {
 319     return this;
 320 }
 321
 322 /* ?_Getpfirst@_Container_base12@std@@QBEPAPAU_Iterator_base12@2@XZ */
 323 /* ?_Getpfirst@_Container_base12@std@@QEBAPEAPEAU_Iterator_base12@2@XZ */
 324 DEFINE_THISCALL_WRAPPER(_Container_base12__Getpfirst, 4)
 325 _Iterator_base12** __thiscall _Container_base12__Getpfirst(_Container_base12 *this)
 326 {
 327     return this->proxy ? &this->proxy->head : NULL;
 328 }
 329
 330 /* ?_Orphan_all@_Container_base12@std@@QAEXXZ */
 331 /* ?_Orphan_all@_Container_base12@std@@QEAAXXZ */
 332 DEFINE_THISCALL_WRAPPER(_Container_base12__Orphan_all, 4)
 333 void __thiscall _Container_base12__Orphan_all(_Container_base12 *this)
 334 {
 335 }
 336
 337 /* ?_Swap_all@_Container_base12@std@@QAEXAAU12@@Z */
 338 /* ?_Swap_all@_Container_base12@std@@QEAAXAEAU12@@Z */
 339 DEFINE_THISCALL_WRAPPER(_Container_base12__Swap_all, 8)
 340 void __thiscall _Container_base12__Swap_all(
 341         _Container_base12 *this, _Container_base12 *that)
 342 {
 343     _Container_proxy *tmp;
 344
 345     tmp = this->proxy;
 346     this->proxy = that->proxy;
 347     that->proxy = tmp;
 348
 349     if(this->proxy)
 350         this->proxy->cont = this;
 351     if(that->proxy)
 352         that->proxy->cont = that;
 353 }
 354
 355 #if _MSVCP_VER >= 110
 356 typedef int MSVCRT_long;
 357
 358 /* xtime */
 359 typedef struct {
 360     __time64_t sec;
 361     MSVCRT_long nsec;
 362 } xtime;
 363
 364 /* _Xtime_get_ticks */
 365 LONGLONG __cdecl _Xtime_get_ticks(void)
 366 {
 367     FILETIME ft;
 368
 369     TRACE("\n");
 370
 371     GetSystemTimeAsFileTime(&ft);
 372     return ((LONGLONG)ft.dwHighDateTime<<32) + ft.dwLowDateTime - TICKS_1601_TO_1970;
 373 }
 374
 375 /* _xtime_get */
 376 int __cdecl xtime_get(xtime* t, int unknown)
 377 {
 378     LONGLONG ticks;
 379
 380     TRACE("(%p)\n", t);
 381
 382     if(unknown != 1)
 383         return 0;
 384
 385     ticks = _Xtime_get_ticks();
 386     t->sec = ticks / TICKSPERSEC;
 387     t->nsec = ticks % TICKSPERSEC * 100;
 388     return 1;
 389 }
 390
 391 /* _Xtime_diff_to_millis2 */
 392 MSVCRT_long __cdecl _Xtime_diff_to_millis2(xtime *t1, xtime *t2)
 393 {
 394     __time64_t diff_sec;
 395     MSVCRT_long diff_nsec, ret;
 396
 397     TRACE("(%p, %p)\n", t1, t2);
 398
 399     diff_sec = t1->sec - t2->sec;
 400     diff_nsec = t1->nsec - t2->nsec;
 401     ret = diff_sec * MILLISEC_PER_SEC +
 402             (diff_nsec + NANOSEC_PER_MILLISEC - 1) / NANOSEC_PER_MILLISEC;
 403     return ret > 0 ? ret : 0;
 404 }
 405
 406 /* _Xtime_diff_to_millis */
 407 MSVCRT_long __cdecl _Xtime_diff_to_millis(xtime *t)
 408 {
 409     xtime now;
 410
 411     TRACE("%p\n", t);
 412
 413     xtime_get(&now, 1);
 414     return _Xtime_diff_to_millis2(t, &now);
 415 }
 416 #endif
 417
 418 #if _MSVCP_VER >= 90
 419 unsigned int __cdecl _Random_device(void)
 420 {
 421     unsigned int ret;
 422
 423     TRACE("\n");
 424
 425     /* TODO: throw correct exception in case of failure */
 426     if(rand_s(&ret))
 427         throw_exception(EXCEPTION, "random number generator failed\n");
 428     return ret;
 429 }
 430 #endif
 431
 432 #if _MSVCP_VER >= 110
 433 #if defined(__i386__) && !defined(__arm__)
 434
 435 #define THISCALL(func) __thiscall_ ## func
 436 #define __thiscall __stdcall
 437 #define DEFINE_THISCALL_WRAPPER(func,args) \
 438     extern void THISCALL(func)(void); \
 439     __ASM_GLOBAL_FUNC(__thiscall_ ## func, \
 440             "popl %eax\n\t" \
 441             "pushl %ecx\n\t" \
 442             "pushl %eax\n\t" \
 443             "jmp " __ASM_NAME(#func) __ASM_STDCALL(args) )
 444
 445 extern void *call_thiscall_func;
 446 __ASM_GLOBAL_FUNC(call_thiscall_func,
 447         "popl %eax\n\t"
 448         "popl %edx\n\t"
 449         "popl %ecx\n\t"
 450         "pushl %eax\n\t"
 451         "jmp *%edx\n\t")
 452
 453 #define call_func1(func,this) ((void* (WINAPI*)(void*,void*))&call_thiscall_func)(func,this)
 454
 455 #else /* __i386__ */
 456
 457 #define __thiscall __cdecl
 458 #define DEFINE_THISCALL_WRAPPER(func,args) /* nothing */
 459
 460 #define call_func1(func,this) func(this)
 461
 462 #endif /* __i386__ */
 463
 464 #define MTX_MULTI_LOCK 0x100
 465 #define MTX_LOCKED 3
 466 typedef struct
 467 {
 468     DWORD flags;
 469     critical_section cs;
 470     DWORD thread_id;
 471     DWORD count;
 472 } *_Mtx_t;
 473
 474 int __cdecl _Mtx_init(_Mtx_t *mtx, int flags)
 475 {
 476     if(flags & ~MTX_MULTI_LOCK)
 477         FIXME("unknown flags ignorred: %x\n", flags);
 478
 479     *mtx = MSVCRT_operator_new(sizeof(**mtx));
 480     (*mtx)->flags = flags;
 481     call_func1(critical_section_ctor, &(*mtx)->cs);
 482     (*mtx)->thread_id = -1;
 483     (*mtx)->count = 0;
 484     return 0;
 485 }
 486
 487 void __cdecl _Mtx_destroy(_Mtx_t *mtx)
 488 {
 489     call_func1(critical_section_dtor, &(*mtx)->cs);
 490     MSVCRT_operator_delete(*mtx);
 491 }
 492
 493 int __cdecl _Mtx_lock(_Mtx_t *mtx)
 494 {
 495     if((*mtx)->thread_id != GetCurrentThreadId()) {
 496         call_func1(critical_section_lock, &(*mtx)->cs);
 497         (*mtx)->thread_id = GetCurrentThreadId();
 498     }else if(!((*mtx)->flags & MTX_MULTI_LOCK)) {
 499         return MTX_LOCKED;
 500     }
 501
 502     (*mtx)->count++;
 503     return 0;
 504 }
 505
 506 int __cdecl _Mtx_unlock(_Mtx_t *mtx)
 507 {
 508     if(--(*mtx)->count)
 509         return 0;
 510
 511     (*mtx)->thread_id = -1;
 512     call_func1(critical_section_unlock, &(*mtx)->cs);
 513     return 0;
 514 }
 515
 516 int __cdecl _Mtx_trylock(_Mtx_t *mtx)
 517 {
 518     if((*mtx)->thread_id != GetCurrentThreadId()) {
 519         if(!call_func1(critical_section_trylock, &(*mtx)->cs))
 520             return MTX_LOCKED;
 521         (*mtx)->thread_id = GetCurrentThreadId();
 522     }else if(!((*mtx)->flags & MTX_MULTI_LOCK)) {
 523         return MTX_LOCKED;
 524     }
 525
 526     (*mtx)->count++;
 527     return 0;
 528 }
 529
 530 critical_section* __cdecl _Mtx_getconcrtcs(_Mtx_t *mtx)
 531 {
 532     return &(*mtx)->cs;
 533 }
 534 #endif
 535
 536 #if _MSVCP_VER == 100
 537 typedef struct {
 538     const vtable_ptr *vtable;
 539 } error_category;
 540
 541 typedef struct {
 542     error_category base;
 543     const char *type;
 544 } custom_category;
 545 static custom_category iostream_category;
 546
 547 DEFINE_RTTI_DATA0(error_category, 0, ".?AVerror_category@std@@")
 548 DEFINE_RTTI_DATA1(iostream_category, 0, &error_category_rtti_base_descriptor, ".?AV_Iostream_error_category@std@@")
 549
 550 extern const vtable_ptr MSVCP_iostream_category_vtable;
 551
 552 static void iostream_category_ctor(custom_category *this)
 553 {
 554     this->base.vtable = &MSVCP_iostream_category_vtable;
 555     this->type = "iostream";
 556 }
 557
 558 DEFINE_THISCALL_WRAPPER(custom_category_vector_dtor, 8)
 559 custom_category* __thiscall custom_category_vector_dtor(custom_category *this, unsigned int flags)
 560 {
 561     TRACE("(%p %x)\n", this, flags);
 562     if(flags & 2) {
 563         /* we have an array, with the number of elements stored before the first object */
 564         INT_PTR i, *ptr = (INT_PTR *)this-1;
 565
 566         for(i=*ptr-1; i>=0; i--)
 567             MSVCRT_operator_delete(ptr);
 568     } else {
 569         if(flags & 1)
 570             MSVCRT_operator_delete(this);
 571     }
 572
 573     return this;
 574 }
 575
 576 DEFINE_THISCALL_WRAPPER(custom_category_name, 4)
 577 const char* __thiscall custom_category_name(const custom_category *this)
 578 {
 579     return this->type;
 580 }
 581
 582 DEFINE_THISCALL_WRAPPER(custom_category_message, 12)
 583 basic_string_char* __thiscall custom_category_message(const custom_category *this,
 584         basic_string_char *ret, int err)
 585 {
 586     if(err == 1) return MSVCP_basic_string_char_ctor_cstr(ret, "iostream error");
 587     return MSVCP_basic_string_char_ctor_cstr(ret, strerror(err));
 588 }
 589
 590 DEFINE_THISCALL_WRAPPER(custom_category_default_error_condition, 12)
 591 /*error_condition*/void* __thiscall custom_category_default_error_condition(
 592         custom_category *this, /*error_condition*/void *ret, int code)
 593 {
 594     FIXME("(%p %p %x) stub\n", this, ret, code);
 595     return NULL;
 596 }
 597
 598 DEFINE_THISCALL_WRAPPER(custom_category_equivalent, 12)
 599 MSVCP_bool __thiscall custom_category_equivalent(const custom_category *this,
 600         int code, const /*error_condition*/void *condition)
 601 {
 602     FIXME("(%p %x %p) stub\n", this, code, condition);
 603     return FALSE;
 604 }
 605
 606 DEFINE_THISCALL_WRAPPER(custom_category_equivalent_code, 12)
 607 MSVCP_bool __thiscall custom_category_equivalent_code(custom_category *this,
 608         const /*error_code*/void *code, int condition)
 609 {
 610     FIXME("(%p %p %x) stub\n", this, code, condition);
 611     return FALSE;
 612 }
 613
 614 /* ?iostream_category@std@@YAABVerror_category@1@XZ */
 615 /* ?iostream_category@std@@YAAEBVerror_category@1@XZ */
 616 const error_category* __cdecl std_iostream_category(void)
 617 {
 618     TRACE("()\n");
 619     return &iostream_category.base;
 620 }
 621
 622 #ifndef __GNUC__
 623 void __asm_dummy_vtables(void) {
 624 #endif
 625     __ASM_VTABLE(iostream_category,
 626             VTABLE_ADD_FUNC(custom_category_vector_dtor)
 627             VTABLE_ADD_FUNC(custom_category_name)
 628             VTABLE_ADD_FUNC(custom_category_message)
 629             VTABLE_ADD_FUNC(custom_category_default_error_condition)
 630             VTABLE_ADD_FUNC(custom_category_equivalent)
 631             VTABLE_ADD_FUNC(custom_category_equivalent_code));
 632 #ifndef __GNUC__
 633 }
 634 #endif
 635 #endif
 636
 637 void init_misc(void *base)
 638 {
 639 #ifdef __x86_64__
 640 #if _MSVCP_VER == 100
 641     init_error_category_rtti(base);
 642     init_iostream_category_rtti(base);
 643 #endif
 644 #endif
 645
 646 #if _MSVCP_VER == 100
 647     iostream_category_ctor(&iostream_category);
 648 #endif
 649 }