dlls/msvcirt/msvcirt.c

   1 /*
   2  * Copyright (C) 2007 Alexandre Julliard
   3  * Copyright (C) 2015 Iván Matellanes
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  18  */
  19
  20 #include "config.h"
  21
  22 #include <fcntl.h>
  23 #include <io.h>
  24 #include <share.h>
  25 #include <stdarg.h>
  26 #include <stdio.h>
  27 #include <sys/stat.h>
  28
  29 #include "msvcirt.h"
  30 #include "windef.h"
  31 #include "winbase.h"
  32 #include "wine/debug.h"
  33
  34 WINE_DEFAULT_DEBUG_CHANNEL(msvcirt);
  35
  36 #define RESERVE_SIZE 512
  37 #define STATEBUF_SIZE 8
  38
  39 /* ?sh_none@filebuf@@2HB */
  40 const int filebuf_sh_none = 0x800;
  41 /* ?sh_read@filebuf@@2HB */
  42 const int filebuf_sh_read = 0xa00;
  43 /* ?sh_write@filebuf@@2HB */
  44 const int filebuf_sh_write = 0xc00;
  45 /* ?openprot@filebuf@@2HB */
  46 const int filebuf_openprot = 420;
  47 /* ?binary@filebuf@@2HB */
  48 const int filebuf_binary = _O_BINARY;
  49 /* ?text@filebuf@@2HB */
  50 const int filebuf_text = _O_TEXT;
  51
  52 /* ?adjustfield@ios@@2JB */
  53 const LONG ios_adjustfield = FLAGS_left | FLAGS_right | FLAGS_internal;
  54 /* ?basefield@ios@@2JB */
  55 const LONG ios_basefield = FLAGS_dec | FLAGS_oct | FLAGS_hex;
  56 /* ?floatfield@ios@@2JB */
  57 const LONG ios_floatfield = FLAGS_scientific | FLAGS_fixed;
  58 /* ?fLockcInit@ios@@0HA */
  59 /* FIXME: should be initialized to 0 and increased on construction of cin, cout, cerr and clog */
  60 int ios_fLockcInit = 4;
  61 /* ?x_lockc@ios@@0U_CRT_CRITICAL_SECTION@@A */
  62 extern CRITICAL_SECTION ios_static_lock;
  63 CRITICAL_SECTION_DEBUG ios_static_lock_debug =
  64 {
  65     0, 0, &ios_static_lock,
  66     { &ios_static_lock_debug.ProcessLocksList, &ios_static_lock_debug.ProcessLocksList },
  67       0, 0, { (DWORD_PTR)(__FILE__ ": ios_static_lock") }
  68 };
  69 CRITICAL_SECTION ios_static_lock = { &ios_static_lock_debug, -1, 0, 0, 0, 0 };
  70 /* ?x_maxbit@ios@@0JA */
  71 LONG ios_maxbit = 0x8000;
  72 /* ?x_curindex@ios@@0HA */
  73 int ios_curindex = -1;
  74 /* ?x_statebuf@ios@@0PAJA */
  75 LONG ios_statebuf[STATEBUF_SIZE] = {0};
  76
  77 /* class streambuf */
  78 typedef struct {
  79     const vtable_ptr *vtable;
  80     int allocated;
  81     int unbuffered;
  82     int stored_char;
  83     char *base;
  84     char *ebuf;
  85     char *pbase;
  86     char *pptr;
  87     char *epptr;
  88     char *eback;
  89     char *gptr;
  90     char *egptr;
  91     int do_lock;
  92     CRITICAL_SECTION lock;
  93 } streambuf;
  94
  95 void __thiscall streambuf_setb(streambuf*, char*, char*, int);
  96 streambuf* __thiscall streambuf_setbuf(streambuf*, char*, int);
  97 void __thiscall streambuf_setg(streambuf*, char*, char*, char*);
  98 void __thiscall streambuf_setp(streambuf*, char*, char*);
  99
 100 /* class filebuf */
 101 typedef struct {
 102     streambuf base;
 103     filedesc fd;
 104     int close;
 105 } filebuf;
 106
 107 filebuf* __thiscall filebuf_close(filebuf*);
 108
 109 /* class strstreambuf */
 110 typedef struct {
 111     streambuf base;
 112     int dynamic;
 113     int increase;
 114     int unknown;
 115     int constant;
 116     allocFunction f_alloc;
 117     freeFunction f_free;
 118 } strstreambuf;
 119
 120 /* class ios */
 121 struct _ostream;
 122 typedef struct {
 123     const vtable_ptr *vtable;
 124     streambuf *sb;
 125     ios_io_state state;
 126     int special[4];
 127     int delbuf;
 128     struct _ostream *tie;
 129     ios_flags flags;
 130     int precision;
 131     char fill;
 132     int width;
 133     int do_lock;
 134     CRITICAL_SECTION lock;
 135 } ios;
 136
 137 ios* __thiscall ios_assign(ios*, const ios*);
 138 int __thiscall ios_fail(const ios*);
 139 void __cdecl ios_lock(ios*);
 140 void __cdecl ios_lockc(void);
 141 LONG __thiscall ios_setf_mask(ios*, LONG, LONG);
 142 void __cdecl ios_unlock(ios*);
 143 void __cdecl ios_unlockc(void);
 144
 145 /* class ostream */
 146 typedef struct _ostream {
 147     const vtable_ptr *vtable;
 148 } ostream;
 149
 150 /* ??_7streambuf@@6B@ */
 151 extern const vtable_ptr MSVCP_streambuf_vtable;
 152 /* ??_7filebuf@@6B@ */
 153 extern const vtable_ptr MSVCP_filebuf_vtable;
 154 /* ??_7strstreambuf@@6B@ */
 155 extern const vtable_ptr MSVCP_strstreambuf_vtable;
 156 /* ??_7ios@@6B@ */
 157 extern const vtable_ptr MSVCP_ios_vtable;
 158
 159 #ifndef __GNUC__
 160 void __asm_dummy_vtables(void) {
 161 #endif
 162     __ASM_VTABLE(streambuf,
 163             VTABLE_ADD_FUNC(streambuf_vector_dtor)
 164             VTABLE_ADD_FUNC(streambuf_sync)
 165             VTABLE_ADD_FUNC(streambuf_setbuf)
 166             VTABLE_ADD_FUNC(streambuf_seekoff)
 167             VTABLE_ADD_FUNC(streambuf_seekpos)
 168             VTABLE_ADD_FUNC(streambuf_xsputn)
 169             VTABLE_ADD_FUNC(streambuf_xsgetn)
 170             VTABLE_ADD_FUNC(streambuf_overflow)
 171             VTABLE_ADD_FUNC(streambuf_underflow)
 172             VTABLE_ADD_FUNC(streambuf_pbackfail)
 173             VTABLE_ADD_FUNC(streambuf_doallocate));
 174     __ASM_VTABLE(filebuf,
 175             VTABLE_ADD_FUNC(filebuf_vector_dtor)
 176             VTABLE_ADD_FUNC(filebuf_sync)
 177             VTABLE_ADD_FUNC(filebuf_setbuf)
 178             VTABLE_ADD_FUNC(filebuf_seekoff)
 179             VTABLE_ADD_FUNC(streambuf_seekpos)
 180             VTABLE_ADD_FUNC(streambuf_xsputn)
 181             VTABLE_ADD_FUNC(streambuf_xsgetn)
 182             VTABLE_ADD_FUNC(filebuf_overflow)
 183             VTABLE_ADD_FUNC(filebuf_underflow)
 184             VTABLE_ADD_FUNC(streambuf_pbackfail)
 185             VTABLE_ADD_FUNC(streambuf_doallocate));
 186     __ASM_VTABLE(strstreambuf,
 187             VTABLE_ADD_FUNC(strstreambuf_vector_dtor)
 188             VTABLE_ADD_FUNC(strstreambuf_sync)
 189             VTABLE_ADD_FUNC(strstreambuf_setbuf)
 190             VTABLE_ADD_FUNC(strstreambuf_seekoff)
 191             VTABLE_ADD_FUNC(streambuf_seekpos)
 192             VTABLE_ADD_FUNC(streambuf_xsputn)
 193             VTABLE_ADD_FUNC(streambuf_xsgetn)
 194             VTABLE_ADD_FUNC(strstreambuf_overflow)
 195             VTABLE_ADD_FUNC(strstreambuf_underflow)
 196             VTABLE_ADD_FUNC(streambuf_pbackfail)
 197             VTABLE_ADD_FUNC(strstreambuf_doallocate));
 198     __ASM_VTABLE(ios,
 199             VTABLE_ADD_FUNC(ios_vector_dtor));
 200 #ifndef __GNUC__
 201 }
 202 #endif
 203
 204 DEFINE_RTTI_DATA0(streambuf, 0, ".?AVstreambuf@@")
 205 DEFINE_RTTI_DATA1(filebuf, 0, &streambuf_rtti_base_descriptor, ".?AVfilebuf@@")
 206 DEFINE_RTTI_DATA1(strstreambuf, 0, &streambuf_rtti_base_descriptor, ".?AVstrstreambuf@@")
 207 DEFINE_RTTI_DATA0(ios, 0, ".?AVios@@")
 208
 209 /* ??0streambuf@@IAE@PADH@Z */
 210 /* ??0streambuf@@IEAA@PEADH@Z */
 211 DEFINE_THISCALL_WRAPPER(streambuf_reserve_ctor, 12)
 212 streambuf* __thiscall streambuf_reserve_ctor(streambuf *this, char *buffer, int length)
 213 {
 214     TRACE("(%p %p %d)\n", this, buffer, length);
 215     this->vtable = &MSVCP_streambuf_vtable;
 216     this->allocated = 0;
 217     this->stored_char = EOF;
 218     this->do_lock = -1;
 219     this->base = NULL;
 220     streambuf_setbuf(this, buffer, length);
 221     streambuf_setg(this, NULL, NULL, NULL);
 222     streambuf_setp(this, NULL, NULL);
 223     InitializeCriticalSection(&this->lock);
 224     return this;
 225 }
 226
 227 /* ??0streambuf@@IAE@XZ */
 228 /* ??0streambuf@@IEAA@XZ */
 229 DEFINE_THISCALL_WRAPPER(streambuf_ctor, 4)
 230 streambuf* __thiscall streambuf_ctor(streambuf *this)
 231 {
 232     streambuf_reserve_ctor(this, NULL, 0);
 233     this->unbuffered = 0;
 234     return this;
 235 }
 236
 237 /* ??0streambuf@@QAE@ABV0@@Z */
 238 /* ??0streambuf@@QEAA@AEBV0@@Z */
 239 DEFINE_THISCALL_WRAPPER(streambuf_copy_ctor, 8)
 240 streambuf* __thiscall streambuf_copy_ctor(streambuf *this, const streambuf *copy)
 241 {
 242     TRACE("(%p %p)\n", this, copy);
 243     *this = *copy;
 244     this->vtable = &MSVCP_streambuf_vtable;
 245     return this;
 246 }
 247
 248 /* ??1streambuf@@UAE@XZ */
 249 /* ??1streambuf@@UEAA@XZ */
 250 DEFINE_THISCALL_WRAPPER(streambuf_dtor, 4)
 251 void __thiscall streambuf_dtor(streambuf *this)
 252 {
 253     TRACE("(%p)\n", this);
 254     if (this->allocated)
 255         MSVCRT_operator_delete(this->base);
 256     DeleteCriticalSection(&this->lock);
 257 }
 258
 259 /* ??4streambuf@@QAEAAV0@ABV0@@Z */
 260 /* ??4streambuf@@QEAAAEAV0@AEBV0@@Z */
 261 DEFINE_THISCALL_WRAPPER(streambuf_assign, 8)
 262 streambuf* __thiscall streambuf_assign(streambuf *this, const streambuf *rhs)
 263 {
 264     streambuf_dtor(this);
 265     return streambuf_copy_ctor(this, rhs);
 266 }
 267
 268 /* ??_Estreambuf@@UAEPAXI@Z */
 269 DEFINE_THISCALL_WRAPPER(streambuf_vector_dtor, 8)
 270 #define call_streambuf_vector_dtor(this, flags) CALL_VTBL_FUNC(this, 0,\
 271         streambuf*, (streambuf*, unsigned int), (this, flags))
 272 streambuf* __thiscall streambuf_vector_dtor(streambuf *this, unsigned int flags)
 273 {
 274     TRACE("(%p %x)\n", this, flags);
 275     if (flags & 2) {
 276         /* we have an array, with the number of elements stored before the first object */
 277         INT_PTR i, *ptr = (INT_PTR *)this-1;
 278
 279         for (i = *ptr-1; i >= 0; i--)
 280             streambuf_dtor(this+i);
 281         MSVCRT_operator_delete(ptr);
 282     } else {
 283         streambuf_dtor(this);
 284         if (flags & 1)
 285             MSVCRT_operator_delete(this);
 286     }
 287     return this;
 288 }
 289
 290 /* ??_Gstreambuf@@UAEPAXI@Z */
 291 DEFINE_THISCALL_WRAPPER(streambuf_scalar_dtor, 8)
 292 streambuf* __thiscall streambuf_scalar_dtor(streambuf *this, unsigned int flags)
 293 {
 294     TRACE("(%p %x)\n", this, flags);
 295     streambuf_dtor(this);
 296     if (flags & 1) MSVCRT_operator_delete(this);
 297     return this;
 298 }
 299
 300 /* ?doallocate@streambuf@@MAEHXZ */
 301 /* ?doallocate@streambuf@@MEAAHXZ */
 302 DEFINE_THISCALL_WRAPPER(streambuf_doallocate, 4)
 303 #define call_streambuf_doallocate(this) CALL_VTBL_FUNC(this, 40, int, (streambuf*), (this))
 304 int __thiscall streambuf_doallocate(streambuf *this)
 305 {
 306     char *reserve;
 307
 308     TRACE("(%p)\n", this);
 309     reserve = MSVCRT_operator_new(RESERVE_SIZE);
 310     if (!reserve)
 311         return EOF;
 312
 313     streambuf_setb(this, reserve, reserve + RESERVE_SIZE, 1);
 314     return 1;
 315 }
 316
 317 /* ?allocate@streambuf@@IAEHXZ */
 318 /* ?allocate@streambuf@@IEAAHXZ */
 319 DEFINE_THISCALL_WRAPPER(streambuf_allocate, 4)
 320 int __thiscall streambuf_allocate(streambuf *this)
 321 {
 322     TRACE("(%p)\n", this);
 323     if (this->base != NULL || this->unbuffered)
 324         return 0;
 325     return call_streambuf_doallocate(this);
 326 }
 327
 328 /* ?base@streambuf@@IBEPADXZ */
 329 /* ?base@streambuf@@IEBAPEADXZ */
 330 DEFINE_THISCALL_WRAPPER(streambuf_base, 4)
 331 char* __thiscall streambuf_base(const streambuf *this)
 332 {
 333     TRACE("(%p)\n", this);
 334     return this->base;
 335 }
 336
 337 /* ?blen@streambuf@@IBEHXZ */
 338 /* ?blen@streambuf@@IEBAHXZ */
 339 DEFINE_THISCALL_WRAPPER(streambuf_blen, 4)
 340 int __thiscall streambuf_blen(const streambuf *this)
 341 {
 342     TRACE("(%p)\n", this);
 343     return this->ebuf - this->base;
 344 }
 345
 346 /* ?eback@streambuf@@IBEPADXZ */
 347 /* ?eback@streambuf@@IEBAPEADXZ */
 348 DEFINE_THISCALL_WRAPPER(streambuf_eback, 4)
 349 char* __thiscall streambuf_eback(const streambuf *this)
 350 {
 351     TRACE("(%p)\n", this);
 352     return this->eback;
 353 }
 354
 355 /* ?ebuf@streambuf@@IBEPADXZ */
 356 /* ?ebuf@streambuf@@IEBAPEADXZ */
 357 DEFINE_THISCALL_WRAPPER(streambuf_ebuf, 4)
 358 char* __thiscall streambuf_ebuf(const streambuf *this)
 359 {
 360     TRACE("(%p)\n", this);
 361     return this->ebuf;
 362 }
 363
 364 /* ?egptr@streambuf@@IBEPADXZ */
 365 /* ?egptr@streambuf@@IEBAPEADXZ */
 366 DEFINE_THISCALL_WRAPPER(streambuf_egptr, 4)
 367 char* __thiscall streambuf_egptr(const streambuf *this)
 368 {
 369     TRACE("(%p)\n", this);
 370     return this->egptr;
 371 }
 372
 373 /* ?epptr@streambuf@@IBEPADXZ */
 374 /* ?epptr@streambuf@@IEBAPEADXZ */
 375 DEFINE_THISCALL_WRAPPER(streambuf_epptr, 4)
 376 char* __thiscall streambuf_epptr(const streambuf *this)
 377 {
 378     TRACE("(%p)\n", this);
 379     return this->epptr;
 380 }
 381
 382 /* ?gptr@streambuf@@IBEPADXZ */
 383 /* ?gptr@streambuf@@IEBAPEADXZ */
 384 DEFINE_THISCALL_WRAPPER(streambuf_gptr, 4)
 385 char* __thiscall streambuf_gptr(const streambuf *this)
 386 {
 387     TRACE("(%p)\n", this);
 388     return this->gptr;
 389 }
 390
 391 /* ?pbase@streambuf@@IBEPADXZ */
 392 /* ?pbase@streambuf@@IEBAPEADXZ */
 393 DEFINE_THISCALL_WRAPPER(streambuf_pbase, 4)
 394 char* __thiscall streambuf_pbase(const streambuf *this)
 395 {
 396     TRACE("(%p)\n", this);
 397     return this->pbase;
 398 }
 399
 400 /* ?pptr@streambuf@@IBEPADXZ */
 401 /* ?pptr@streambuf@@IEBAPEADXZ */
 402 DEFINE_THISCALL_WRAPPER(streambuf_pptr, 4)
 403 char* __thiscall streambuf_pptr(const streambuf *this)
 404 {
 405     TRACE("(%p)\n", this);
 406     return this->pptr;
 407 }
 408
 409 /* ?clrlock@streambuf@@QAEXXZ */
 410 /* ?clrlock@streambuf@@QEAAXXZ */
 411 DEFINE_THISCALL_WRAPPER(streambuf_clrlock, 4)
 412 void __thiscall streambuf_clrlock(streambuf *this)
 413 {
 414     TRACE("(%p)\n", this);
 415     if (this->do_lock <= 0)
 416         this->do_lock++;
 417 }
 418
 419 /* ?lock@streambuf@@QAEXXZ */
 420 /* ?lock@streambuf@@QEAAXXZ */
 421 DEFINE_THISCALL_WRAPPER(streambuf_lock, 4)
 422 void __thiscall streambuf_lock(streambuf *this)
 423 {
 424     TRACE("(%p)\n", this);
 425     if (this->do_lock < 0)
 426         EnterCriticalSection(&this->lock);
 427 }
 428
 429 /* ?lockptr@streambuf@@IAEPAU_CRT_CRITICAL_SECTION@@XZ */
 430 /* ?lockptr@streambuf@@IEAAPEAU_CRT_CRITICAL_SECTION@@XZ */
 431 DEFINE_THISCALL_WRAPPER(streambuf_lockptr, 4)
 432 CRITICAL_SECTION* __thiscall streambuf_lockptr(streambuf *this)
 433 {
 434     TRACE("(%p)\n", this);
 435     return &this->lock;
 436 }
 437
 438 /* ?gbump@streambuf@@IAEXH@Z */
 439 /* ?gbump@streambuf@@IEAAXH@Z */
 440 DEFINE_THISCALL_WRAPPER(streambuf_gbump, 8)
 441 void __thiscall streambuf_gbump(streambuf *this, int count)
 442 {
 443     TRACE("(%p %d)\n", this, count);
 444     this->gptr += count;
 445 }
 446
 447 /* ?pbump@streambuf@@IAEXH@Z */
 448 /* ?pbump@streambuf@@IEAAXH@Z */
 449 DEFINE_THISCALL_WRAPPER(streambuf_pbump, 8)
 450 void __thiscall streambuf_pbump(streambuf *this, int count)
 451 {
 452     TRACE("(%p %d)\n", this, count);
 453     this->pptr += count;
 454 }
 455
 456 /* ?in_avail@streambuf@@QBEHXZ */
 457 /* ?in_avail@streambuf@@QEBAHXZ */
 458 DEFINE_THISCALL_WRAPPER(streambuf_in_avail, 4)
 459 int __thiscall streambuf_in_avail(const streambuf *this)
 460 {
 461     TRACE("(%p)\n", this);
 462     return this->egptr - this->gptr;
 463 }
 464
 465 /* ?out_waiting@streambuf@@QBEHXZ */
 466 /* ?out_waiting@streambuf@@QEBAHXZ */
 467 DEFINE_THISCALL_WRAPPER(streambuf_out_waiting, 4)
 468 int __thiscall streambuf_out_waiting(const streambuf *this)
 469 {
 470     TRACE("(%p)\n", this);
 471     return this->pptr - this->pbase;
 472 }
 473
 474 /* Unexported */
 475 DEFINE_THISCALL_WRAPPER(streambuf_overflow, 8)
 476 #define call_streambuf_overflow(this, c) CALL_VTBL_FUNC(this, 28, int, (streambuf*, int), (this, c))
 477 int __thiscall streambuf_overflow(streambuf *this, int c)
 478 {
 479     ERR("overflow is not implemented in streambuf\n");
 480     return EOF;
 481 }
 482
 483 /* ?pbackfail@streambuf@@UAEHH@Z */
 484 /* ?pbackfail@streambuf@@UEAAHH@Z */
 485 DEFINE_THISCALL_WRAPPER(streambuf_pbackfail, 8)
 486 #define call_streambuf_pbackfail(this, c) CALL_VTBL_FUNC(this, 36, int, (streambuf*, int), (this, c))
 487 int __thiscall streambuf_pbackfail(streambuf *this, int c)
 488 {
 489     TRACE("(%p %d)\n", this, c);
 490     if (this->gptr <= this->eback)
 491         return EOF;
 492     return *--this->gptr = c;
 493 }
 494
 495 /* ?seekoff@streambuf@@UAEJJW4seek_dir@ios@@H@Z */
 496 /* ?seekoff@streambuf@@UEAAJJW4seek_dir@ios@@H@Z */
 497 DEFINE_THISCALL_WRAPPER(streambuf_seekoff, 16)
 498 #define call_streambuf_seekoff(this, off, dir, mode) CALL_VTBL_FUNC(this, 12, streampos, (streambuf*, streamoff, ios_seek_dir, int), (this, off, dir, mode))
 499 streampos __thiscall streambuf_seekoff(streambuf *this, streamoff offset, ios_seek_dir dir, int mode)
 500 {
 501     TRACE("(%p %d %d %d)\n", this, offset, dir, mode);
 502     return EOF;
 503 }
 504
 505 /* ?seekpos@streambuf@@UAEJJH@Z */
 506 /* ?seekpos@streambuf@@UEAAJJH@Z */
 507 DEFINE_THISCALL_WRAPPER(streambuf_seekpos, 12)
 508 streampos __thiscall streambuf_seekpos(streambuf *this, streampos pos, int mode)
 509 {
 510     TRACE("(%p %d %d)\n", this, pos, mode);
 511     return call_streambuf_seekoff(this, pos, SEEKDIR_beg, mode);
 512 }
 513
 514 /* ?setb@streambuf@@IAEXPAD0H@Z */
 515 /* ?setb@streambuf@@IEAAXPEAD0H@Z */
 516 DEFINE_THISCALL_WRAPPER(streambuf_setb, 16)
 517 void __thiscall streambuf_setb(streambuf *this, char *ba, char *eb, int delete)
 518 {
 519     TRACE("(%p %p %p %d)\n", this, ba, eb, delete);
 520     if (this->allocated)
 521         MSVCRT_operator_delete(this->base);
 522     this->allocated = delete;
 523     this->base = ba;
 524     this->ebuf = eb;
 525 }
 526
 527 /* ?setbuf@streambuf@@UAEPAV1@PADH@Z */
 528 /* ?setbuf@streambuf@@UEAAPEAV1@PEADH@Z */
 529 DEFINE_THISCALL_WRAPPER(streambuf_setbuf, 12)
 530 streambuf* __thiscall streambuf_setbuf(streambuf *this, char *buffer, int length)
 531 {
 532     TRACE("(%p %p %d)\n", this, buffer, length);
 533     if (this->base != NULL)
 534         return NULL;
 535
 536     if (buffer == NULL || !length) {
 537         this->unbuffered = 1;
 538         this->base = this->ebuf = NULL;
 539     } else {
 540         this->unbuffered = 0;
 541         this->base = buffer;
 542         this->ebuf = buffer + length;
 543     }
 544     return this;
 545 }
 546
 547 /* ?setg@streambuf@@IAEXPAD00@Z */
 548 /* ?setg@streambuf@@IEAAXPEAD00@Z */
 549 DEFINE_THISCALL_WRAPPER(streambuf_setg, 16)
 550 void __thiscall streambuf_setg(streambuf *this, char *ek, char *gp, char *eg)
 551 {
 552     TRACE("(%p %p %p %p)\n", this, ek, gp, eg);
 553     this->eback = ek;
 554     this->gptr = gp;
 555     this->egptr = eg;
 556 }
 557
 558 /* ?setlock@streambuf@@QAEXXZ */
 559 /* ?setlock@streambuf@@QEAAXXZ */
 560 DEFINE_THISCALL_WRAPPER(streambuf_setlock, 4)
 561 void __thiscall streambuf_setlock(streambuf *this)
 562 {
 563     TRACE("(%p)\n", this);
 564     this->do_lock--;
 565 }
 566
 567 /* ?setp@streambuf@@IAEXPAD0@Z */
 568 /* ?setp@streambuf@@IEAAXPEAD0@Z */
 569 DEFINE_THISCALL_WRAPPER(streambuf_setp, 12)
 570 void __thiscall streambuf_setp(streambuf *this, char *pb, char *ep)
 571 {
 572     TRACE("(%p %p %p)\n", this, pb, ep);
 573     this->pbase = this->pptr = pb;
 574     this->epptr = ep;
 575 }
 576
 577 /* ?sync@streambuf@@UAEHXZ */
 578 /* ?sync@streambuf@@UEAAHXZ */
 579 DEFINE_THISCALL_WRAPPER(streambuf_sync, 4)
 580 #define call_streambuf_sync(this) CALL_VTBL_FUNC(this, 4, int, (streambuf*), (this))
 581 int __thiscall streambuf_sync(streambuf *this)
 582 {
 583     TRACE("(%p)\n", this);
 584     return (this->gptr >= this->egptr && this->pbase >= this->pptr) ? 0 : EOF;
 585 }
 586
 587 /* ?unbuffered@streambuf@@IAEXH@Z */
 588 /* ?unbuffered@streambuf@@IEAAXH@Z */
 589 DEFINE_THISCALL_WRAPPER(streambuf_unbuffered_set, 8)
 590 void __thiscall streambuf_unbuffered_set(streambuf *this, int buf)
 591 {
 592     TRACE("(%p %d)\n", this, buf);
 593     this->unbuffered = buf;
 594 }
 595
 596 /* ?unbuffered@streambuf@@IBEHXZ */
 597 /* ?unbuffered@streambuf@@IEBAHXZ */
 598 DEFINE_THISCALL_WRAPPER(streambuf_unbuffered_get, 4)
 599 int __thiscall streambuf_unbuffered_get(const streambuf *this)
 600 {
 601     TRACE("(%p)\n", this);
 602     return this->unbuffered;
 603 }
 604
 605 /* Unexported */
 606 DEFINE_THISCALL_WRAPPER(streambuf_underflow, 4)
 607 #define call_streambuf_underflow(this) CALL_VTBL_FUNC(this, 32, int, (streambuf*), (this))
 608 int __thiscall streambuf_underflow(streambuf *this)
 609 {
 610     ERR("underflow is not implemented in streambuf\n");
 611     return EOF;
 612 }
 613
 614 /* ?unlock@streambuf@@QAEXXZ */
 615 /* ?unlock@streambuf@@QEAAXXZ */
 616 DEFINE_THISCALL_WRAPPER(streambuf_unlock, 4)
 617 void __thiscall streambuf_unlock(streambuf *this)
 618 {
 619     TRACE("(%p)\n", this);
 620     if (this->do_lock < 0)
 621         LeaveCriticalSection(&this->lock);
 622 }
 623
 624 /* ?xsgetn@streambuf@@UAEHPADH@Z */
 625 /* ?xsgetn@streambuf@@UEAAHPEADH@Z */
 626 DEFINE_THISCALL_WRAPPER(streambuf_xsgetn, 12)
 627 #define call_streambuf_xsgetn(this, buffer, count) CALL_VTBL_FUNC(this, 24, int, (streambuf*, char*, int), (this, buffer, count))
 628 int __thiscall streambuf_xsgetn(streambuf *this, char *buffer, int count)
 629 {
 630     int copied = 0, chunk;
 631
 632     TRACE("(%p %p %d)\n", this, buffer, count);
 633
 634     if (this->unbuffered) {
 635         if (this->stored_char == EOF)
 636             this->stored_char = call_streambuf_underflow(this);
 637         while (copied < count && this->stored_char != EOF) {
 638             buffer[copied++] = this->stored_char;
 639             this->stored_char = call_streambuf_underflow(this);
 640         }
 641     } else {
 642         while (copied < count) {
 643             if (call_streambuf_underflow(this) == EOF)
 644                 break;
 645             chunk = this->egptr - this->gptr;
 646             if (chunk > count - copied)
 647                 chunk = count - copied;
 648             memcpy(buffer+copied, this->gptr, chunk);
 649             this->gptr += chunk;
 650             copied += chunk;
 651         }
 652     }
 653     return copied;
 654 }
 655
 656 /* ?xsputn@streambuf@@UAEHPBDH@Z */
 657 /* ?xsputn@streambuf@@UEAAHPEBDH@Z */
 658 DEFINE_THISCALL_WRAPPER(streambuf_xsputn, 12)
 659 #define call_streambuf_xsputn(this, data, length) CALL_VTBL_FUNC(this, 20, int, (streambuf*, const char*, int), (this, data, length))
 660 int __thiscall streambuf_xsputn(streambuf *this, const char *data, int length)
 661 {
 662     int copied = 0, chunk;
 663
 664     TRACE("(%p %p %d)\n", this, data, length);
 665
 666     while (copied < length) {
 667         if (this->unbuffered || this->pptr == this->epptr) {
 668             if (call_streambuf_overflow(this, data[copied]) == EOF)
 669                 break;
 670             copied++;
 671         } else {
 672             chunk = this->epptr - this->pptr;
 673             if (chunk > length - copied)
 674                 chunk = length - copied;
 675             memcpy(this->pptr, data+copied, chunk);
 676             this->pptr += chunk;
 677             copied += chunk;
 678         }
 679     }
 680     return copied;
 681 }
 682
 683 /* ?sgetc@streambuf@@QAEHXZ */
 684 /* ?sgetc@streambuf@@QEAAHXZ */
 685 DEFINE_THISCALL_WRAPPER(streambuf_sgetc, 4)
 686 int __thiscall streambuf_sgetc(streambuf *this)
 687 {
 688     TRACE("(%p)\n", this);
 689     if (this->unbuffered) {
 690         if (this->stored_char == EOF)
 691             this->stored_char = call_streambuf_underflow(this);
 692         return this->stored_char;
 693     } else
 694         return call_streambuf_underflow(this);
 695 }
 696
 697 /* ?sputc@streambuf@@QAEHH@Z */
 698 /* ?sputc@streambuf@@QEAAHH@Z */
 699 DEFINE_THISCALL_WRAPPER(streambuf_sputc, 8)
 700 int __thiscall streambuf_sputc(streambuf *this, int ch)
 701 {
 702     TRACE("(%p %d)\n", this, ch);
 703     return (this->pptr < this->epptr) ? *this->pptr++ = ch : call_streambuf_overflow(this, ch);
 704 }
 705
 706 /* ?sgetn@streambuf@@QAEHPADH@Z */
 707 /* ?sgetn@streambuf@@QEAAHPEADH@Z */
 708 DEFINE_THISCALL_WRAPPER(streambuf_sgetn, 12)
 709 int __thiscall streambuf_sgetn(streambuf *this, char *buffer, int count)
 710 {
 711     return call_streambuf_xsgetn(this, buffer, count);
 712 }
 713
 714 /* ?sputn@streambuf@@QAEHPBDH@Z */
 715 /* ?sputn@streambuf@@QEAAHPEBDH@Z */
 716 DEFINE_THISCALL_WRAPPER(streambuf_sputn, 12)
 717 int __thiscall streambuf_sputn(streambuf *this, const char *data, int length)
 718 {
 719     return call_streambuf_xsputn(this, data, length);
 720 }
 721
 722 /* ?snextc@streambuf@@QAEHXZ */
 723 /* ?snextc@streambuf@@QEAAHXZ */
 724 DEFINE_THISCALL_WRAPPER(streambuf_snextc, 4)
 725 int __thiscall streambuf_snextc(streambuf *this)
 726 {
 727     TRACE("(%p)\n", this);
 728     if (this->unbuffered) {
 729         if (this->stored_char == EOF)
 730             call_streambuf_underflow(this);
 731         return this->stored_char = call_streambuf_underflow(this);
 732     } else {
 733         if (this->gptr >= this->egptr)
 734             call_streambuf_underflow(this);
 735         this->gptr++;
 736         return (this->gptr < this->egptr) ? *this->gptr : call_streambuf_underflow(this);
 737     }
 738 }
 739
 740 /* ?sbumpc@streambuf@@QAEHXZ */
 741 /* ?sbumpc@streambuf@@QEAAHXZ */
 742 DEFINE_THISCALL_WRAPPER(streambuf_sbumpc, 4)
 743 int __thiscall streambuf_sbumpc(streambuf *this)
 744 {
 745     int ret;
 746
 747     TRACE("(%p)\n", this);
 748
 749     if (this->unbuffered) {
 750         ret = this->stored_char;
 751         this->stored_char = EOF;
 752         if (ret == EOF)
 753             ret = call_streambuf_underflow(this);
 754     } else {
 755         ret = (this->gptr < this->egptr) ? *this->gptr : call_streambuf_underflow(this);
 756         this->gptr++;
 757     }
 758     return ret;
 759 }
 760
 761 /* ?stossc@streambuf@@QAEXXZ */
 762 /* ?stossc@streambuf@@QEAAXXZ */
 763 DEFINE_THISCALL_WRAPPER(streambuf_stossc, 4)
 764 void __thiscall streambuf_stossc(streambuf *this)
 765 {
 766     TRACE("(%p)\n", this);
 767     if (this->unbuffered) {
 768         if (this->stored_char == EOF)
 769             call_streambuf_underflow(this);
 770         else
 771             this->stored_char = EOF;
 772     } else {
 773         if (this->gptr >= this->egptr)
 774             call_streambuf_underflow(this);
 775         if (this->gptr < this->egptr)
 776             this->gptr++;
 777     }
 778 }
 779
 780 /* ?sputbackc@streambuf@@QAEHD@Z */
 781 /* ?sputbackc@streambuf@@QEAAHD@Z */
 782 DEFINE_THISCALL_WRAPPER(streambuf_sputbackc, 8)
 783 int __thiscall streambuf_sputbackc(streambuf *this, char ch)
 784 {
 785     TRACE("(%p %d)\n", this, ch);
 786     return call_streambuf_pbackfail(this, ch);
 787 }
 788
 789 /* ?dbp@streambuf@@QAEXXZ */
 790 /* ?dbp@streambuf@@QEAAXXZ */
 791 DEFINE_THISCALL_WRAPPER(streambuf_dbp, 4)
 792 void __thiscall streambuf_dbp(streambuf *this)
 793 {
 794     printf("\nSTREAMBUF DEBUG INFO: this=%p, ", this);
 795     if (this->unbuffered) {
 796         printf("unbuffered\n");
 797     } else {
 798         printf("_fAlloc=%d\n", this->allocated);
 799         printf(" base()=%p, ebuf()=%p,  blen()=%d\n", this->base, this->ebuf, streambuf_blen(this));
 800         printf("pbase()=%p, pptr()=%p, epptr()=%d\n", this->pbase, this->pptr, this->epptr);
 801         printf("eback()=%p, gptr()=%p, egptr()=%d\n", this->eback, this->gptr, this->egptr);
 802     }
 803 }
 804
 805 /* ??0filebuf@@QAE@ABV0@@Z */
 806 /* ??0filebuf@@QEAA@AEBV0@@Z */
 807 DEFINE_THISCALL_WRAPPER(filebuf_copy_ctor, 8)
 808 filebuf* __thiscall filebuf_copy_ctor(filebuf* this, const filebuf *copy)
 809 {
 810     TRACE("(%p %p)\n", this, copy);
 811     *this = *copy;
 812     this->base.vtable = &MSVCP_filebuf_vtable;
 813     return this;
 814 }
 815
 816 /* ??0filebuf@@QAE@HPADH@Z */
 817 /* ??0filebuf@@QEAA@HPEADH@Z */
 818 DEFINE_THISCALL_WRAPPER(filebuf_fd_reserve_ctor, 16)
 819 filebuf* __thiscall filebuf_fd_reserve_ctor(filebuf* this, filedesc fd, char *buffer, int length)
 820 {
 821     TRACE("(%p %d %p %d)\n", this, fd, buffer, length);
 822     streambuf_reserve_ctor(&this->base, buffer, length);
 823     this->base.vtable = &MSVCP_filebuf_vtable;
 824     this->fd = fd;
 825     this->close = 0;
 826     return this;
 827 }
 828
 829 /* ??0filebuf@@QAE@H@Z */
 830 /* ??0filebuf@@QEAA@H@Z */
 831 DEFINE_THISCALL_WRAPPER(filebuf_fd_ctor, 8)
 832 filebuf* __thiscall filebuf_fd_ctor(filebuf* this, filedesc fd)
 833 {
 834     filebuf_fd_reserve_ctor(this, fd, NULL, 0);
 835     this->base.unbuffered = 0;
 836     return this;
 837 }
 838
 839 /* ??0filebuf@@QAE@XZ */
 840 /* ??0filebuf@@QEAA@XZ */
 841 DEFINE_THISCALL_WRAPPER(filebuf_ctor, 4)
 842 filebuf* __thiscall filebuf_ctor(filebuf* this)
 843 {
 844     return filebuf_fd_ctor(this, -1);
 845 }
 846
 847 /* ??1filebuf@@UAE@XZ */
 848 /* ??1filebuf@@UEAA@XZ */
 849 DEFINE_THISCALL_WRAPPER(filebuf_dtor, 4)
 850 void __thiscall filebuf_dtor(filebuf* this)
 851 {
 852     TRACE("(%p)\n", this);
 853     if (this->close)
 854         filebuf_close(this);
 855     streambuf_dtor(&this->base);
 856 }
 857
 858 /* ??4filebuf@@QAEAAV0@ABV0@@Z */
 859 /* ??4filebuf@@QEAAAEAV0@AEBV0@@Z */
 860 DEFINE_THISCALL_WRAPPER(filebuf_assign, 8)
 861 filebuf* __thiscall filebuf_assign(filebuf* this, const filebuf *rhs)
 862 {
 863     filebuf_dtor(this);
 864     return filebuf_copy_ctor(this, rhs);
 865 }
 866
 867 /* ??_Efilebuf@@UAEPAXI@Z */
 868 DEFINE_THISCALL_WRAPPER(filebuf_vector_dtor, 8)
 869 filebuf* __thiscall filebuf_vector_dtor(filebuf *this, unsigned int flags)
 870 {
 871     TRACE("(%p %x)\n", this, flags);
 872     if (flags & 2) {
 873         /* we have an array, with the number of elements stored before the first object */
 874         INT_PTR i, *ptr = (INT_PTR *)this-1;
 875
 876         for (i = *ptr-1; i >= 0; i--)
 877             filebuf_dtor(this+i);
 878         MSVCRT_operator_delete(ptr);
 879     } else {
 880         filebuf_dtor(this);
 881         if (flags & 1)
 882             MSVCRT_operator_delete(this);
 883     }
 884     return this;
 885 }
 886
 887 /* ??_Gfilebuf@@UAEPAXI@Z */
 888 DEFINE_THISCALL_WRAPPER(filebuf_scalar_dtor, 8)
 889 filebuf* __thiscall filebuf_scalar_dtor(filebuf *this, unsigned int flags)
 890 {
 891     TRACE("(%p %x)\n", this, flags);
 892     filebuf_dtor(this);
 893     if (flags & 1) MSVCRT_operator_delete(this);
 894     return this;
 895 }
 896
 897 /* ?attach@filebuf@@QAEPAV1@H@Z */
 898 /* ?attach@filebuf@@QEAAPEAV1@H@Z */
 899 DEFINE_THISCALL_WRAPPER(filebuf_attach, 8)
 900 filebuf* __thiscall filebuf_attach(filebuf *this, filedesc fd)
 901 {
 902     TRACE("(%p %d)\n", this, fd);
 903     if (this->fd != -1)
 904         return NULL;
 905
 906     streambuf_lock(&this->base);
 907     this->fd = fd;
 908     streambuf_allocate(&this->base);
 909     streambuf_unlock(&this->base);
 910     return this;
 911 }
 912
 913 /* ?close@filebuf@@QAEPAV1@XZ */
 914 /* ?close@filebuf@@QEAAPEAV1@XZ */
 915 DEFINE_THISCALL_WRAPPER(filebuf_close, 4)
 916 filebuf* __thiscall filebuf_close(filebuf *this)
 917 {
 918     filebuf *ret;
 919
 920     TRACE("(%p)\n", this);
 921     if (this->fd == -1)
 922         return NULL;
 923
 924     streambuf_lock(&this->base);
 925     if (call_streambuf_sync(&this->base) == EOF || _close(this->fd) < 0) {
 926         ret = NULL;
 927     } else {
 928         this->fd = -1;
 929         ret = this;
 930     }
 931     streambuf_unlock(&this->base);
 932     return ret;
 933 }
 934
 935 /* ?fd@filebuf@@QBEHXZ */
 936 /* ?fd@filebuf@@QEBAHXZ */
 937 DEFINE_THISCALL_WRAPPER(filebuf_fd, 4)
 938 filedesc __thiscall filebuf_fd(const filebuf *this)
 939 {
 940     TRACE("(%p)\n", this);
 941     return this->fd;
 942 }
 943
 944 /* ?is_open@filebuf@@QBEHXZ */
 945 /* ?is_open@filebuf@@QEBAHXZ */
 946 DEFINE_THISCALL_WRAPPER(filebuf_is_open, 4)
 947 int __thiscall filebuf_is_open(const filebuf *this)
 948 {
 949     TRACE("(%p)\n", this);
 950     return this->fd != -1;
 951 }
 952
 953 /* ?open@filebuf@@QAEPAV1@PBDHH@Z */
 954 /* ?open@filebuf@@QEAAPEAV1@PEBDHH@Z */
 955 DEFINE_THISCALL_WRAPPER(filebuf_open, 16)
 956 filebuf* __thiscall filebuf_open(filebuf *this, const char *name, ios_open_mode mode, int protection)
 957 {
 958     const int inout_mode[4] = {-1, _O_RDONLY, _O_WRONLY, _O_RDWR};
 959     const int share_mode[4] = {_SH_DENYRW, _SH_DENYWR, _SH_DENYRD, _SH_DENYNO};
 960     int op_flags, sh_flags, fd;
 961
 962     TRACE("(%p %s %x %x)\n", this, name, mode, protection);
 963     if (this->fd != -1)
 964         return NULL;
 965
 966     /* mode */
 967     if (mode & (OPENMODE_app|OPENMODE_trunc))
 968         mode |= OPENMODE_out;
 969     op_flags = inout_mode[mode & (OPENMODE_in|OPENMODE_out)];
 970     if (op_flags < 0)
 971         return NULL;
 972     if (mode & OPENMODE_app)
 973         op_flags |= _O_APPEND;
 974     if ((mode & OPENMODE_trunc) ||
 975             ((mode & OPENMODE_out) && !(mode & (OPENMODE_in|OPENMODE_app|OPENMODE_ate))))
 976         op_flags |= _O_TRUNC;
 977     if (!(mode & OPENMODE_nocreate))
 978         op_flags |= _O_CREAT;
 979     if (mode & OPENMODE_noreplace)
 980         op_flags |= _O_EXCL;
 981     op_flags |= (mode & OPENMODE_binary) ? _O_BINARY : _O_TEXT;
 982
 983     /* share protection */
 984     sh_flags = (protection & filebuf_sh_none) ? share_mode[(protection >> 9) & 3] : _SH_DENYNO;
 985
 986     TRACE("op_flags %x, sh_flags %x\n", op_flags, sh_flags);
 987     fd = _sopen(name, op_flags, sh_flags, _S_IREAD|_S_IWRITE);
 988     if (fd < 0)
 989         return NULL;
 990
 991     streambuf_lock(&this->base);
 992     this->close = 1;
 993     this->fd = fd;
 994     if ((mode & OPENMODE_ate) &&
 995             call_streambuf_seekoff(&this->base, 0, SEEKDIR_end, mode & (OPENMODE_in|OPENMODE_out)) == EOF) {
 996         _close(fd);
 997         this->fd = -1;
 998     }
 999     streambuf_allocate(&this->base);
1000     streambuf_unlock(&this->base);
1001     return (this->fd == -1) ? NULL : this;
1002 }
1003
1004 /* ?overflow@filebuf@@UAEHH@Z */
1005 /* ?overflow@filebuf@@UEAAHH@Z */
1006 DEFINE_THISCALL_WRAPPER(filebuf_overflow, 8)
1007 int __thiscall filebuf_overflow(filebuf *this, int c)
1008 {
1009     TRACE("(%p %d)\n", this, c);
1010     if (call_streambuf_sync(&this->base) == EOF)
1011         return EOF;
1012     if (this->base.unbuffered)
1013         return (c == EOF) ? 1 : _write(this->fd, &c, 1);
1014     if (streambuf_allocate(&this->base) == EOF)
1015         return EOF;
1016
1017     this->base.pbase = this->base.pptr = this->base.base;
1018     this->base.epptr = this->base.ebuf;
1019     if (c != EOF)
1020         *this->base.pptr++ = c;
1021     return 1;
1022 }
1023
1024 /* ?seekoff@filebuf@@UAEJJW4seek_dir@ios@@H@Z */
1025 /* ?seekoff@filebuf@@UEAAJJW4seek_dir@ios@@H@Z */
1026 DEFINE_THISCALL_WRAPPER(filebuf_seekoff, 16)
1027 streampos __thiscall filebuf_seekoff(filebuf *this, streamoff offset, ios_seek_dir dir, int mode)
1028 {
1029     TRACE("(%p %d %d %d)\n", this, offset, dir, mode);
1030     if (call_streambuf_sync(&this->base) == EOF)
1031         return EOF;
1032     return _lseek(this->fd, offset, dir);
1033 }
1034
1035 /* ?setbuf@filebuf@@UAEPAVstreambuf@@PADH@Z */
1036 /* ?setbuf@filebuf@@UEAAPEAVstreambuf@@PEADH@Z */
1037 DEFINE_THISCALL_WRAPPER(filebuf_setbuf, 12)
1038 streambuf* __thiscall filebuf_setbuf(filebuf *this, char *buffer, int length)
1039 {
1040     streambuf *ret;
1041
1042     TRACE("(%p %p %d)\n", this, buffer, length);
1043     if (this->base.base != NULL)
1044         return NULL;
1045
1046     streambuf_lock(&this->base);
1047     ret = streambuf_setbuf(&this->base, buffer, length);
1048     streambuf_unlock(&this->base);
1049     return ret;
1050 }
1051
1052 /* ?setmode@filebuf@@QAEHH@Z */
1053 /* ?setmode@filebuf@@QEAAHH@Z */
1054 DEFINE_THISCALL_WRAPPER(filebuf_setmode, 8)
1055 int __thiscall filebuf_setmode(filebuf *this, int mode)
1056 {
1057     int ret;
1058
1059     TRACE("(%p %d)\n", this, mode);
1060     if (mode != filebuf_text && mode != filebuf_binary)
1061         return -1;
1062
1063     streambuf_lock(&this->base);
1064     ret = (call_streambuf_sync(&this->base) == EOF) ? -1 : _setmode(this->fd, mode);
1065     streambuf_unlock(&this->base);
1066     return ret;
1067 }
1068
1069 /* ?sync@filebuf@@UAEHXZ */
1070 /* ?sync@filebuf@@UEAAHXZ */
1071 DEFINE_THISCALL_WRAPPER(filebuf_sync, 4)
1072 int __thiscall filebuf_sync(filebuf *this)
1073 {
1074     int count, mode;
1075     char *ptr;
1076     LONG offset;
1077
1078     TRACE("(%p)\n", this);
1079     if (this->fd == -1)
1080         return EOF;
1081     if (this->base.unbuffered)
1082         return 0;
1083
1084     /* flush output buffer */
1085     if (this->base.pptr != NULL) {
1086         count = this->base.pptr - this->base.pbase;
1087         if (count > 0 && _write(this->fd, this->base.pbase, count) != count)
1088             return EOF;
1089         this->base.pbase = this->base.pptr = this->base.epptr = NULL;
1090     }
1091     /* flush input buffer */
1092     if (this->base.egptr != NULL) {
1093         offset = this->base.egptr - this->base.gptr;
1094         if (offset > 0) {
1095             mode = _setmode(this->fd, _O_TEXT);
1096             _setmode(this->fd, mode);
1097             if (mode & _O_TEXT) {
1098                 /* in text mode, '\n' in the buffer means '\r\n' in the file */
1099                 for (ptr = this->base.gptr; ptr < this->base.egptr; ptr++)
1100                     if (*ptr == '\n')
1101                         offset++;
1102             }
1103             if (_lseek(this->fd, -offset, SEEK_CUR) < 0)
1104                 return EOF;
1105         }
1106         this->base.eback = this->base.gptr = this->base.egptr = NULL;
1107     }
1108     return 0;
1109 }
1110
1111 /* ?underflow@filebuf@@UAEHXZ */
1112 /* ?underflow@filebuf@@UEAAHXZ */
1113 DEFINE_THISCALL_WRAPPER(filebuf_underflow, 4)
1114 int __thiscall filebuf_underflow(filebuf *this)
1115 {
1116     int buffer_size, read_bytes;
1117     char c;
1118
1119     TRACE("(%p)\n", this);
1120
1121     if (this->base.unbuffered)
1122         return (_read(this->fd, &c, 1) < 1) ? EOF : c;
1123
1124     if (this->base.gptr >= this->base.egptr) {
1125         if (call_streambuf_sync(&this->base) == EOF)
1126             return EOF;
1127         buffer_size = this->base.ebuf - this->base.base;
1128         read_bytes = _read(this->fd, this->base.base, buffer_size);
1129         if (read_bytes <= 0)
1130             return EOF;
1131         this->base.eback = this->base.gptr = this->base.base;
1132         this->base.egptr = this->base.base + read_bytes;
1133     }
1134     return *this->base.gptr;
1135 }
1136
1137 /* ??0strstreambuf@@QAE@ABV0@@Z */
1138 /* ??0strstreambuf@@QEAA@AEBV0@@Z */
1139 DEFINE_THISCALL_WRAPPER(strstreambuf_copy_ctor, 8)
1140 strstreambuf* __thiscall strstreambuf_copy_ctor(strstreambuf *this, const strstreambuf *copy)
1141 {
1142     TRACE("(%p %p)\n", this, copy);
1143     *this = *copy;
1144     this->base.vtable = &MSVCP_strstreambuf_vtable;
1145     return this;
1146 }
1147
1148 /* ??0strstreambuf@@QAE@H@Z */
1149 /* ??0strstreambuf@@QEAA@H@Z */
1150 DEFINE_THISCALL_WRAPPER(strstreambuf_dynamic_ctor, 8)
1151 strstreambuf* __thiscall strstreambuf_dynamic_ctor(strstreambuf* this, int length)
1152 {
1153     TRACE("(%p %d)\n", this, length);
1154     streambuf_ctor(&this->base);
1155     this->base.vtable = &MSVCP_strstreambuf_vtable;
1156     this->dynamic = 1;
1157     this->increase = length;
1158     this->constant = 0;
1159     this->f_alloc = NULL;
1160     this->f_free = NULL;
1161     return this;
1162 }
1163
1164 /* ??0strstreambuf@@QAE@P6APAXJ@ZP6AXPAX@Z@Z */
1165 /* ??0strstreambuf@@QEAA@P6APEAXJ@ZP6AXPEAX@Z@Z */
1166 DEFINE_THISCALL_WRAPPER(strstreambuf_funcs_ctor, 12)
1167 strstreambuf* __thiscall strstreambuf_funcs_ctor(strstreambuf* this, allocFunction falloc, freeFunction ffree)
1168 {
1169     TRACE("(%p %p %p)\n", this, falloc, ffree);
1170     strstreambuf_dynamic_ctor(this, 1);
1171     this->f_alloc = falloc;
1172     this->f_free = ffree;
1173     return this;
1174 }
1175
1176 /* ??0strstreambuf@@QAE@PADH0@Z */
1177 /* ??0strstreambuf@@QEAA@PEADH0@Z */
1178 DEFINE_THISCALL_WRAPPER(strstreambuf_buffer_ctor, 16)
1179 strstreambuf* __thiscall strstreambuf_buffer_ctor(strstreambuf *this, char *buffer, int length, char *put)
1180 {
1181     char *end_buffer;
1182
1183     TRACE("(%p %p %d %p)\n", this, buffer, length, put);
1184
1185     if (length > 0)
1186         end_buffer = buffer + length;
1187     else if (length == 0)
1188         end_buffer = buffer + strlen(buffer);
1189     else
1190         end_buffer = (char*) -1;
1191
1192     streambuf_ctor(&this->base);
1193     streambuf_setb(&this->base, buffer, end_buffer, 0);
1194     if (put == NULL) {
1195         streambuf_setg(&this->base, buffer, buffer, end_buffer);
1196     } else {
1197         streambuf_setg(&this->base, buffer, buffer, put);
1198         streambuf_setp(&this->base, put, end_buffer);
1199     }
1200     this->base.vtable = &MSVCP_strstreambuf_vtable;
1201     this->dynamic = 0;
1202     this->constant = 1;
1203     return this;
1204 }
1205
1206 /* ??0strstreambuf@@QAE@PAEH0@Z */
1207 /* ??0strstreambuf@@QEAA@PEAEH0@Z */
1208 DEFINE_THISCALL_WRAPPER(strstreambuf_ubuffer_ctor, 16)
1209 strstreambuf* __thiscall strstreambuf_ubuffer_ctor(strstreambuf *this, unsigned char *buffer, int length, unsigned char *put)
1210 {
1211     TRACE("(%p %p %d %p)\n", this, buffer, length, put);
1212     return strstreambuf_buffer_ctor(this, (char*)buffer, length, (char*)put);
1213 }
1214
1215 /* ??0strstreambuf@@QAE@XZ */
1216 /* ??0strstreambuf@@QEAA@XZ */
1217 DEFINE_THISCALL_WRAPPER(strstreambuf_ctor, 4)
1218 strstreambuf* __thiscall strstreambuf_ctor(strstreambuf *this)
1219 {
1220     TRACE("(%p)\n", this);
1221     return strstreambuf_dynamic_ctor(this, 1);
1222 }
1223
1224 /* ??1strstreambuf@@UAE@XZ */
1225 /* ??1strstreambuf@@UEAA@XZ */
1226 DEFINE_THISCALL_WRAPPER(strstreambuf_dtor, 4)
1227 void __thiscall strstreambuf_dtor(strstreambuf *this)
1228 {
1229     TRACE("(%p)\n", this);
1230     if (this->dynamic && this->base.base) {
1231         if (this->f_free)
1232             this->f_free(this->base.base);
1233         else
1234             MSVCRT_operator_delete(this->base.base);
1235     }
1236     streambuf_dtor(&this->base);
1237 }
1238
1239 /* ??4strstreambuf@@QAEAAV0@ABV0@@Z */
1240 /* ??4strstreambuf@@QEAAAEAV0@AEBV0@@Z */
1241 DEFINE_THISCALL_WRAPPER(strstreambuf_assign, 8)
1242 strstreambuf* __thiscall strstreambuf_assign(strstreambuf *this, const strstreambuf *rhs)
1243 {
1244     strstreambuf_dtor(this);
1245     return strstreambuf_copy_ctor(this, rhs);
1246 }
1247
1248 /* ??_Estrstreambuf@@UAEPAXI@Z */
1249 DEFINE_THISCALL_WRAPPER(strstreambuf_vector_dtor, 8)
1250 strstreambuf* __thiscall strstreambuf_vector_dtor(strstreambuf *this, unsigned int flags)
1251 {
1252     TRACE("(%p %x)\n", this, flags);
1253     if (flags & 2) {
1254         /* we have an array, with the number of elements stored before the first object */
1255         INT_PTR i, *ptr = (INT_PTR *)this-1;
1256
1257         for (i = *ptr-1; i >= 0; i--)
1258             strstreambuf_dtor(this+i);
1259         MSVCRT_operator_delete(ptr);
1260     } else {
1261         strstreambuf_dtor(this);
1262         if (flags & 1)
1263             MSVCRT_operator_delete(this);
1264     }
1265     return this;
1266 }
1267
1268 /* ??_Gstrstreambuf@@UAEPAXI@Z */
1269 DEFINE_THISCALL_WRAPPER(strstreambuf_scalar_dtor, 8)
1270 strstreambuf* __thiscall strstreambuf_scalar_dtor(strstreambuf *this, unsigned int flags)
1271 {
1272     TRACE("(%p %x)\n", this, flags);
1273     strstreambuf_dtor(this);
1274     if (flags & 1) MSVCRT_operator_delete(this);
1275     return this;
1276 }
1277
1278 /* ?doallocate@strstreambuf@@MAEHXZ */
1279 /* ?doallocate@strstreambuf@@MEAAHXZ */
1280 DEFINE_THISCALL_WRAPPER(strstreambuf_doallocate, 4)
1281 int __thiscall strstreambuf_doallocate(strstreambuf *this)
1282 {
1283     FIXME("(%p) stub\n", this);
1284     return EOF;
1285 }
1286
1287 /* ?freeze@strstreambuf@@QAEXH@Z */
1288 /* ?freeze@strstreambuf@@QEAAXH@Z */
1289 DEFINE_THISCALL_WRAPPER(strstreambuf_freeze, 8)
1290 void __thiscall strstreambuf_freeze(strstreambuf *this, int frozen)
1291 {
1292     TRACE("(%p %d)\n", this, frozen);
1293     if (!this->constant)
1294         this->dynamic = !frozen;
1295 }
1296
1297 /* ?overflow@strstreambuf@@UAEHH@Z */
1298 /* ?overflow@strstreambuf@@UEAAHH@Z */
1299 DEFINE_THISCALL_WRAPPER(strstreambuf_overflow, 8)
1300 int __thiscall strstreambuf_overflow(strstreambuf *this, int c)
1301 {
1302     FIXME("(%p %d) stub\n", this, c);
1303     return EOF;
1304 }
1305
1306 /* ?seekoff@strstreambuf@@UAEJJW4seek_dir@ios@@H@Z */
1307 /* ?seekoff@strstreambuf@@UEAAJJW4seek_dir@ios@@H@Z */
1308 DEFINE_THISCALL_WRAPPER(strstreambuf_seekoff, 16)
1309 streampos __thiscall strstreambuf_seekoff(strstreambuf *this, streamoff offset, ios_seek_dir dir, int mode)
1310 {
1311     FIXME("(%p %d %d %d) stub\n", this, offset, dir, mode);
1312     return EOF;
1313 }
1314
1315 /* ?setbuf@strstreambuf@@UAEPAVstreambuf@@PADH@Z */
1316 /* ?setbuf@strstreambuf@@UEAAPEAVstreambuf@@PEADH@Z */
1317 DEFINE_THISCALL_WRAPPER(strstreambuf_setbuf, 12)
1318 streambuf* __thiscall strstreambuf_setbuf(strstreambuf *this, char *buffer, int length)
1319 {
1320     FIXME("(%p %p %d) stub\n", this, buffer, length);
1321     return NULL;
1322 }
1323
1324 /* ?str@strstreambuf@@QAEPADXZ */
1325 /* ?str@strstreambuf@@QEAAPEADXZ */
1326 DEFINE_THISCALL_WRAPPER(strstreambuf_str, 4)
1327 char* __thiscall strstreambuf_str(strstreambuf *this)
1328 {
1329     TRACE("(%p)\n", this);
1330     strstreambuf_freeze(this, 1);
1331     return this->base.base;
1332 }
1333
1334 /* ?sync@strstreambuf@@UAEHXZ */
1335 /* ?sync@strstreambuf@@UEAAHXZ */
1336 DEFINE_THISCALL_WRAPPER(strstreambuf_sync, 4)
1337 int __thiscall strstreambuf_sync(strstreambuf *this)
1338 {
1339     FIXME("(%p) stub\n", this);
1340     return EOF;
1341 }
1342
1343 /* ?underflow@strstreambuf@@UAEHXZ */
1344 /* ?underflow@strstreambuf@@UEAAHXZ */
1345 DEFINE_THISCALL_WRAPPER(strstreambuf_underflow, 4)
1346 int __thiscall strstreambuf_underflow(strstreambuf *this)
1347 {
1348     FIXME("(%p) stub\n", this);
1349     return EOF;
1350 }
1351
1352 /* ??0ios@@IAE@ABV0@@Z */
1353 /* ??0ios@@IEAA@AEBV0@@Z */
1354 DEFINE_THISCALL_WRAPPER(ios_copy_ctor, 8)
1355 ios* __thiscall ios_copy_ctor(ios *this, const ios *copy)
1356 {
1357     TRACE("(%p %p)\n", this, copy);
1358     ios_fLockcInit++;
1359     this->vtable = &MSVCP_ios_vtable;
1360     this->sb = NULL;
1361     this->delbuf = 0;
1362     InitializeCriticalSection(&this->lock);
1363     return ios_assign(this, copy);
1364 }
1365
1366 /* ??0ios@@QAE@PAVstreambuf@@@Z */
1367 /* ??0ios@@QEAA@PEAVstreambuf@@@Z */
1368 DEFINE_THISCALL_WRAPPER(ios_sb_ctor, 8)
1369 ios* __thiscall ios_sb_ctor(ios *this, streambuf *sb)
1370 {
1371     TRACE("(%p %p)\n", this, sb);
1372     ios_fLockcInit++;
1373     this->vtable = &MSVCP_ios_vtable;
1374     this->sb = sb;
1375     this->state = sb ? IOSTATE_goodbit : IOSTATE_badbit;
1376     this->special[0] = this->special[1] = 0;
1377     this->delbuf = 0;
1378     this->tie = NULL;
1379     this->flags = 0;
1380     this->precision = 6;
1381     this->fill = ' ';
1382     this->width = 0;
1383     this->do_lock = -1;
1384     InitializeCriticalSection(&this->lock);
1385     return this;
1386 }
1387
1388 /* ??0ios@@IAE@XZ */
1389 /* ??0ios@@IEAA@XZ */
1390 DEFINE_THISCALL_WRAPPER(ios_ctor, 4)
1391 ios* __thiscall ios_ctor(ios *this)
1392 {
1393     return ios_sb_ctor(this, NULL);
1394 }
1395
1396 /* ??1ios@@UAE@XZ */
1397 /* ??1ios@@UEAA@XZ */
1398 DEFINE_THISCALL_WRAPPER(ios_dtor, 4)
1399 void __thiscall ios_dtor(ios *this)
1400 {
1401     TRACE("(%p)\n", this);
1402     ios_fLockcInit--;
1403     if (this->delbuf && this->sb)
1404         call_streambuf_vector_dtor(this->sb, 1);
1405     this->sb = NULL;
1406     this->state = IOSTATE_badbit;
1407     DeleteCriticalSection(&this->lock);
1408 }
1409
1410 /* ??4ios@@IAEAAV0@ABV0@@Z */
1411 /* ??4ios@@IEAAAEAV0@AEBV0@@Z */
1412 DEFINE_THISCALL_WRAPPER(ios_assign, 8)
1413 ios* __thiscall ios_assign(ios *this, const ios *rhs)
1414 {
1415     TRACE("(%p %p)\n", this, rhs);
1416     this->state = rhs->state;
1417     if (!this->sb)
1418         this->state |= IOSTATE_badbit;
1419     this->tie = rhs->tie;
1420     this->flags = rhs->flags;
1421     this->precision = (char) rhs->precision;
1422     this->fill = rhs->fill;
1423     this->width = (char) rhs->width;
1424     return this;
1425 }
1426
1427 /* ??7ios@@QBEHXZ */
1428 /* ??7ios@@QEBAHXZ */
1429 DEFINE_THISCALL_WRAPPER(ios_op_not, 4)
1430 int __thiscall ios_op_not(const ios *this)
1431 {
1432     TRACE("(%p)\n", this);
1433     return ios_fail(this);
1434 }
1435
1436 /* ??Bios@@QBEPAXXZ */
1437 /* ??Bios@@QEBAPEAXXZ */
1438 DEFINE_THISCALL_WRAPPER(ios_op_void, 4)
1439 void* __thiscall ios_op_void(const ios *this)
1440 {
1441     TRACE("(%p)\n", this);
1442     return ios_fail(this) ? NULL : (void*)this;
1443 }
1444
1445 /* ??_Eios@@UAEPAXI@Z */
1446 DEFINE_THISCALL_WRAPPER(ios_vector_dtor, 8)
1447 ios* __thiscall ios_vector_dtor(ios *this, unsigned int flags)
1448 {
1449     TRACE("(%p %x)\n", this, flags);
1450     if (flags & 2) {
1451         /* we have an array, with the number of elements stored before the first object */
1452         INT_PTR i, *ptr = (INT_PTR *)this-1;
1453
1454         for (i = *ptr-1; i >= 0; i--)
1455             ios_dtor(this+i);
1456         MSVCRT_operator_delete(ptr);
1457     } else {
1458         ios_dtor(this);
1459         if (flags & 1)
1460             MSVCRT_operator_delete(this);
1461     }
1462     return this;
1463 }
1464
1465 /* ??_Gios@@UAEPAXI@Z */
1466 DEFINE_THISCALL_WRAPPER(ios_scalar_dtor, 8)
1467 ios* __thiscall ios_scalar_dtor(ios *this, unsigned int flags)
1468 {
1469     TRACE("(%p %x)\n", this, flags);
1470     ios_dtor(this);
1471     if (flags & 1) MSVCRT_operator_delete(this);
1472     return this;
1473 }
1474
1475 /* ?bad@ios@@QBEHXZ */
1476 /* ?bad@ios@@QEBAHXZ */
1477 DEFINE_THISCALL_WRAPPER(ios_bad, 4)
1478 int __thiscall ios_bad(const ios *this)
1479 {
1480     TRACE("(%p)\n", this);
1481     return (this->state & IOSTATE_badbit);
1482 }
1483
1484 /* ?bitalloc@ios@@SAJXZ */
1485 LONG __cdecl ios_bitalloc(void)
1486 {
1487     TRACE("()\n");
1488     ios_lockc();
1489     ios_maxbit <<= 1;
1490     ios_unlockc();
1491     return ios_maxbit;
1492 }
1493
1494 /* ?clear@ios@@QAEXH@Z */
1495 /* ?clear@ios@@QEAAXH@Z */
1496 DEFINE_THISCALL_WRAPPER(ios_clear, 8)
1497 void __thiscall ios_clear(ios *this, int state)
1498 {
1499     TRACE("(%p %d)\n", this, state);
1500     ios_lock(this);
1501     this->state = state;
1502     ios_unlock(this);
1503 }
1504
1505 /* ?clrlock@ios@@QAAXXZ */
1506 /* ?clrlock@ios@@QEAAXXZ */
1507 void __cdecl ios_clrlock(ios *this)
1508 {
1509     TRACE("(%p)\n", this);
1510     if (this->do_lock <= 0)
1511         this->do_lock++;
1512     if (this->sb)
1513         streambuf_clrlock(this->sb);
1514 }
1515
1516 /* ?delbuf@ios@@QAEXH@Z */
1517 /* ?delbuf@ios@@QEAAXH@Z */
1518 DEFINE_THISCALL_WRAPPER(ios_delbuf_set, 8)
1519 void __thiscall ios_delbuf_set(ios *this, int delete)
1520 {
1521     TRACE("(%p %d)\n", this, delete);
1522     this->delbuf = delete;
1523 }
1524
1525 /* ?delbuf@ios@@QBEHXZ */
1526 /* ?delbuf@ios@@QEBAHXZ */
1527 DEFINE_THISCALL_WRAPPER(ios_delbuf_get, 4)
1528 int __thiscall ios_delbuf_get(const ios *this)
1529 {
1530     TRACE("(%p)\n", this);
1531     return this->delbuf;
1532 }
1533
1534 /* ?dec@@YAAAVios@@AAV1@@Z */
1535 /* ?dec@@YAAEAVios@@AEAV1@@Z */
1536 ios* __cdecl ios_dec(ios *this)
1537 {
1538     TRACE("(%p)\n", this);
1539     ios_setf_mask(this, FLAGS_dec, ios_basefield);
1540     return this;
1541 }
1542
1543 /* ?eof@ios@@QBEHXZ */
1544 /* ?eof@ios@@QEBAHXZ */
1545 DEFINE_THISCALL_WRAPPER(ios_eof, 4)
1546 int __thiscall ios_eof(const ios *this)
1547 {
1548     TRACE("(%p)\n", this);
1549     return (this->state & IOSTATE_eofbit);
1550 }
1551
1552 /* ?fail@ios@@QBEHXZ */
1553 /* ?fail@ios@@QEBAHXZ */
1554 DEFINE_THISCALL_WRAPPER(ios_fail, 4)
1555 int __thiscall ios_fail(const ios *this)
1556 {
1557     TRACE("(%p)\n", this);
1558     return (this->state & (IOSTATE_failbit|IOSTATE_badbit));
1559 }
1560
1561 /* ?fill@ios@@QAEDD@Z */
1562 /* ?fill@ios@@QEAADD@Z */
1563 DEFINE_THISCALL_WRAPPER(ios_fill_set, 8)
1564 char __thiscall ios_fill_set(ios *this, char fill)
1565 {
1566     char prev = this->fill;
1567
1568     TRACE("(%p %d)\n", this, fill);
1569
1570     this->fill = fill;
1571     return prev;
1572 }
1573
1574 /* ?fill@ios@@QBEDXZ */
1575 /* ?fill@ios@@QEBADXZ */
1576 DEFINE_THISCALL_WRAPPER(ios_fill_get, 4)
1577 char __thiscall ios_fill_get(const ios *this)
1578 {
1579     TRACE("(%p)\n", this);
1580     return this->fill;
1581 }
1582
1583 /* ?flags@ios@@QAEJJ@Z */
1584 /* ?flags@ios@@QEAAJJ@Z */
1585 DEFINE_THISCALL_WRAPPER(ios_flags_set, 8)
1586 LONG __thiscall ios_flags_set(ios *this, LONG flags)
1587 {
1588     LONG prev = this->flags;
1589
1590     TRACE("(%p %x)\n", this, flags);
1591
1592     this->flags = flags;
1593     return prev;
1594 }
1595
1596 /* ?flags@ios@@QBEJXZ */
1597 /* ?flags@ios@@QEBAJXZ */
1598 DEFINE_THISCALL_WRAPPER(ios_flags_get, 4)
1599 LONG __thiscall ios_flags_get(const ios *this)
1600 {
1601     TRACE("(%p)\n", this);
1602     return this->flags;
1603 }
1604
1605 /* ?good@ios@@QBEHXZ */
1606 /* ?good@ios@@QEBAHXZ */
1607 DEFINE_THISCALL_WRAPPER(ios_good, 4)
1608 int __thiscall ios_good(const ios *this)
1609 {
1610     TRACE("(%p)\n", this);
1611     return this->state == IOSTATE_goodbit;
1612 }
1613
1614 /* ?hex@@YAAAVios@@AAV1@@Z */
1615 /* ?hex@@YAAEAVios@@AEAV1@@Z */
1616 ios* __cdecl ios_hex(ios *this)
1617 {
1618     TRACE("(%p)\n", this);
1619     ios_setf_mask(this, FLAGS_hex, ios_basefield);
1620     return this;
1621 }
1622
1623 /* ?init@ios@@IAEXPAVstreambuf@@@Z */
1624 /* ?init@ios@@IEAAXPEAVstreambuf@@@Z */
1625 DEFINE_THISCALL_WRAPPER(ios_init, 8)
1626 void __thiscall ios_init(ios *this, streambuf *sb)
1627 {
1628     TRACE("(%p %p)\n", this, sb);
1629     if (this->delbuf && this->sb)
1630         call_streambuf_vector_dtor(this->sb, 1);
1631     this->sb = sb;
1632     if (sb == NULL)
1633         this->state |= IOSTATE_badbit;
1634     else
1635         this->state &= ~IOSTATE_badbit;
1636 }
1637
1638 /* ?iword@ios@@QBEAAJH@Z */
1639 /* ?iword@ios@@QEBAAEAJH@Z */
1640 DEFINE_THISCALL_WRAPPER(ios_iword, 8)
1641 LONG* __thiscall ios_iword(const ios *this, int index)
1642 {
1643     TRACE("(%p %d)\n", this, index);
1644     return &ios_statebuf[index];
1645 }
1646
1647 /* ?lock@ios@@QAAXXZ */
1648 /* ?lock@ios@@QEAAXXZ */
1649 void __cdecl ios_lock(ios *this)
1650 {
1651     TRACE("(%p)\n", this);
1652     if (this->do_lock < 0)
1653         EnterCriticalSection(&this->lock);
1654 }
1655
1656 /* ?lockbuf@ios@@QAAXXZ */
1657 /* ?lockbuf@ios@@QEAAXXZ */
1658 void __cdecl ios_lockbuf(ios *this)
1659 {
1660     TRACE("(%p)\n", this);
1661     streambuf_lock(this->sb);
1662 }
1663
1664 /* ?lockc@ios@@KAXXZ */
1665 void __cdecl ios_lockc(void)
1666 {
1667     TRACE("()\n");
1668     EnterCriticalSection(&ios_static_lock);
1669 }
1670
1671 /* ?lockptr@ios@@IAEPAU_CRT_CRITICAL_SECTION@@XZ */
1672 /* ?lockptr@ios@@IEAAPEAU_CRT_CRITICAL_SECTION@@XZ */
1673 DEFINE_THISCALL_WRAPPER(ios_lockptr, 4)
1674 CRITICAL_SECTION* __thiscall ios_lockptr(ios *this)
1675 {
1676     TRACE("(%p)\n", this);
1677     return &this->lock;
1678 }
1679
1680 /* ?oct@@YAAAVios@@AAV1@@Z */
1681 /* ?oct@@YAAEAVios@@AEAV1@@Z */
1682 ios* __cdecl ios_oct(ios *this)
1683 {
1684     TRACE("(%p)\n", this);
1685     ios_setf_mask(this, FLAGS_oct, ios_basefield);
1686     return this;
1687 }
1688
1689 /* ?precision@ios@@QAEHH@Z */
1690 /* ?precision@ios@@QEAAHH@Z */
1691 DEFINE_THISCALL_WRAPPER(ios_precision_set, 8)
1692 int __thiscall ios_precision_set(ios *this, int prec)
1693 {
1694     int prev = this->precision;
1695
1696     TRACE("(%p %d)\n", this, prec);
1697
1698     this->precision = prec;
1699     return prev;
1700 }
1701
1702 /* ?precision@ios@@QBEHXZ */
1703 /* ?precision@ios@@QEBAHXZ */
1704 DEFINE_THISCALL_WRAPPER(ios_precision_get, 4)
1705 int __thiscall ios_precision_get(const ios *this)
1706 {
1707     TRACE("(%p)\n", this);
1708     return this->precision;
1709 }
1710
1711 /* ?pword@ios@@QBEAAPAXH@Z */
1712 /* ?pword@ios@@QEBAAEAPEAXH@Z */
1713 DEFINE_THISCALL_WRAPPER(ios_pword, 8)
1714 void** __thiscall ios_pword(const ios *this, int index)
1715 {
1716     TRACE("(%p %d)\n", this, index);
1717     return (void**)&ios_statebuf[index];
1718 }
1719
1720 /* ?rdbuf@ios@@QBEPAVstreambuf@@XZ */
1721 /* ?rdbuf@ios@@QEBAPEAVstreambuf@@XZ */
1722 DEFINE_THISCALL_WRAPPER(ios_rdbuf, 4)
1723 streambuf* __thiscall ios_rdbuf(const ios *this)
1724 {
1725     TRACE("(%p)\n", this);
1726     return this->sb;
1727 }
1728
1729 /* ?rdstate@ios@@QBEHXZ */
1730 /* ?rdstate@ios@@QEBAHXZ */
1731 DEFINE_THISCALL_WRAPPER(ios_rdstate, 4)
1732 int __thiscall ios_rdstate(const ios *this)
1733 {
1734     TRACE("(%p)\n", this);
1735     return this->state;
1736 }
1737
1738 /* ?setf@ios@@QAEJJ@Z */
1739 /* ?setf@ios@@QEAAJJ@Z */
1740 DEFINE_THISCALL_WRAPPER(ios_setf, 8)
1741 LONG __thiscall ios_setf(ios *this, LONG flags)
1742 {
1743     LONG prev = this->flags;
1744
1745     TRACE("(%p %x)\n", this, flags);
1746
1747     ios_lock(this);
1748     this->flags |= flags;
1749     ios_unlock(this);
1750     return prev;
1751 }
1752
1753 /* ?setf@ios@@QAEJJJ@Z */
1754 /* ?setf@ios@@QEAAJJJ@Z */
1755 DEFINE_THISCALL_WRAPPER(ios_setf_mask, 12)
1756 LONG __thiscall ios_setf_mask(ios *this, LONG flags, LONG mask)
1757 {
1758     LONG prev = this->flags;
1759
1760     TRACE("(%p %x %x)\n", this, flags, mask);
1761
1762     ios_lock(this);
1763     this->flags = (this->flags & (~mask)) | (flags & mask);
1764     ios_unlock(this);
1765     return prev;
1766 }
1767
1768 /* ?setlock@ios@@QAAXXZ */
1769 /* ?setlock@ios@@QEAAXXZ */
1770 void __cdecl ios_setlock(ios *this)
1771 {
1772     TRACE("(%p)\n", this);
1773     this->do_lock--;
1774     if (this->sb)
1775         streambuf_setlock(this->sb);
1776 }
1777
1778 /* ?sync_with_stdio@ios@@SAXXZ */
1779 void __cdecl ios_sync_with_stdio(void)
1780 {
1781     FIXME("() stub\n");
1782 }
1783
1784 /* ?tie@ios@@QAEPAVostream@@PAV2@@Z */
1785 /* ?tie@ios@@QEAAPEAVostream@@PEAV2@@Z */
1786 DEFINE_THISCALL_WRAPPER(ios_tie_set, 8)
1787 ostream* __thiscall ios_tie_set(ios *this, ostream *ostr)
1788 {
1789     ostream *prev = this->tie;
1790
1791     TRACE("(%p %p)\n", this, ostr);
1792
1793     this->tie = ostr;
1794     return prev;
1795 }
1796
1797 /* ?tie@ios@@QBEPAVostream@@XZ */
1798 /* ?tie@ios@@QEBAPEAVostream@@XZ */
1799 DEFINE_THISCALL_WRAPPER(ios_tie_get, 4)
1800 ostream* __thiscall ios_tie_get(const ios *this)
1801 {
1802     TRACE("(%p)\n", this);
1803     return this->tie;
1804 }
1805
1806 /* ?unlock@ios@@QAAXXZ */
1807 /* ?unlock@ios@@QEAAXXZ */
1808 void __cdecl ios_unlock(ios *this)
1809 {
1810     TRACE("(%p)\n", this);
1811     if (this->do_lock < 0)
1812         LeaveCriticalSection(&this->lock);
1813 }
1814
1815 /* ?unlockbuf@ios@@QAAXXZ */
1816 /* ?unlockbuf@ios@@QEAAXXZ */
1817 void __cdecl ios_unlockbuf(ios *this)
1818 {
1819     TRACE("(%p)\n", this);
1820     streambuf_unlock(this->sb);
1821 }
1822
1823 /* ?unlockc@ios@@KAXXZ */
1824 void __cdecl ios_unlockc(void)
1825 {
1826     TRACE("()\n");
1827     LeaveCriticalSection(&ios_static_lock);
1828 }
1829
1830 /* ?unsetf@ios@@QAEJJ@Z */
1831 /* ?unsetf@ios@@QEAAJJ@Z */
1832 DEFINE_THISCALL_WRAPPER(ios_unsetf, 8)
1833 LONG __thiscall ios_unsetf(ios *this, LONG flags)
1834 {
1835     LONG prev = this->flags;
1836
1837     TRACE("(%p %x)\n", this, flags);
1838
1839     ios_lock(this);
1840     this->flags &= ~flags;
1841     ios_unlock(this);
1842     return prev;
1843 }
1844
1845 /* ?width@ios@@QAEHH@Z */
1846 /* ?width@ios@@QEAAHH@Z */
1847 DEFINE_THISCALL_WRAPPER(ios_width_set, 8)
1848 int __thiscall ios_width_set(ios *this, int width)
1849 {
1850     int prev = this->width;
1851
1852     TRACE("(%p %d)\n", this, width);
1853
1854     this->width = width;
1855     return prev;
1856 }
1857
1858 /* ?width@ios@@QBEHXZ */
1859 /* ?width@ios@@QEBAHXZ */
1860 DEFINE_THISCALL_WRAPPER(ios_width_get, 4)
1861 int __thiscall ios_width_get(const ios *this)
1862 {
1863     TRACE("(%p)\n", this);
1864     return this->width;
1865 }
1866
1867 /* ?xalloc@ios@@SAHXZ */
1868 int __cdecl ios_xalloc(void)
1869 {
1870     int ret;
1871
1872     TRACE("()\n");
1873
1874     ios_lockc();
1875     ret = (ios_curindex < STATEBUF_SIZE-1) ? ++ios_curindex : -1;
1876     ios_unlockc();
1877     return ret;
1878 }
1879
1880 /******************************************************************
1881  *               ??0ostrstream@@QAE@XZ (MSVCRTI.@)
1882  */
1883 DEFINE_THISCALL_WRAPPER(MSVCIRT_ostrstream_ctor,8)
1884 void * __thiscall MSVCIRT_ostrstream_ctor(ostream *this, BOOL virt_init)
1885 {
1886    FIXME("(%p %x) stub\n", this, virt_init);
1887    return this;
1888 }
1889
1890 /******************************************************************
1891  *               ??1ostrstream@@UAE@XZ (MSVCRTI.@)
1892  */
1893 DEFINE_THISCALL_WRAPPER(MSVCIRT_ostrstream_dtor,4)
1894 void __thiscall MSVCIRT_ostrstream_dtor(ios *base)
1895 {
1896     FIXME("(%p) stub\n", base);
1897 }
1898
1899 /******************************************************************
1900  *              ??6ostream@@QAEAAV0@E@Z (MSVCRTI.@)
1901  *    class ostream & __thiscall ostream::operator<<(unsigned char)
1902  */
1903 DEFINE_THISCALL_WRAPPER(MSVCIRT_operator_sl_uchar,8)
1904 void * __thiscall MSVCIRT_operator_sl_uchar(ostream * _this, unsigned char ch)
1905 {
1906    FIXME("(%p)->(%c) stub\n", _this, ch);
1907    return _this;
1908 }
1909
1910 /******************************************************************
1911  *               ??6ostream@@QAEAAV0@H@Z (MSVCRTI.@)
1912  *        class ostream & __thiscall ostream::operator<<(int)
1913  */
1914 DEFINE_THISCALL_WRAPPER(MSVCIRT_operator_sl_int,8)
1915 void * __thiscall MSVCIRT_operator_sl_int(ostream * _this, int integer)
1916 {
1917    FIXME("(%p)->(%d) stub\n", _this, integer);
1918    return _this;
1919 }
1920
1921 /******************************************************************
1922  *              ??6ostream@@QAEAAV0@PBD@Z (MSVCRTI.@)
1923  *    class ostream & __thiscall ostream::operator<<(char const *)
1924  */
1925 DEFINE_THISCALL_WRAPPER(MSVCIRT_operator_sl_pchar,8)
1926 void * __thiscall MSVCIRT_operator_sl_pchar(ostream * _this, const char * string)
1927 {
1928    FIXME("(%p)->(%s) stub\n", _this, debugstr_a(string));
1929    return _this;
1930 }
1931
1932 /******************************************************************
1933  *              ??6ostream@@QAEAAV0@P6AAAV0@AAV0@@Z@Z (MSVCRTI.@)
1934  *    class ostream & __thiscall ostream::operator<<(class ostream & (__cdecl*)(class ostream &))
1935  */
1936 DEFINE_THISCALL_WRAPPER(MSVCIRT_operator_sl_callback,8)
1937 void * __thiscall MSVCIRT_operator_sl_callback(ostream * _this, ostream * (__cdecl*func)(ostream*))
1938 {
1939    TRACE("%p, %p\n", _this, func);
1940    return func(_this);
1941 }
1942
1943 /******************************************************************
1944  *              ?endl@@YAAAVostream@@AAV1@@Z (MSVCRTI.@)
1945  *           class ostream & __cdecl endl(class ostream &)
1946  */
1947 void * CDECL MSVCIRT_endl(ostream * _this)
1948 {
1949    FIXME("(%p)->() stub\n", _this);
1950    return _this;
1951 }
1952
1953 /******************************************************************
1954  *              ?ends@@YAAAVostream@@AAV1@@Z (MSVCRTI.@)
1955  *           class ostream & __cdecl ends(class ostream &)
1956  */
1957 void * CDECL MSVCIRT_ends(ostream * _this)
1958 {
1959    FIXME("(%p)->() stub\n", _this);
1960    return _this;
1961 }
1962
1963 #ifdef __i386__
1964
1965 #define DEFINE_VTBL_WRAPPER(off)            \
1966     __ASM_GLOBAL_FUNC(vtbl_wrapper_ ## off, \
1967         "popl %eax\n\t"                     \
1968         "popl %ecx\n\t"                     \
1969         "pushl %eax\n\t"                    \
1970         "movl 0(%ecx), %eax\n\t"            \
1971         "jmp *" #off "(%eax)\n\t")
1972
1973 DEFINE_VTBL_WRAPPER(0);
1974 DEFINE_VTBL_WRAPPER(4);
1975 DEFINE_VTBL_WRAPPER(8);
1976 DEFINE_VTBL_WRAPPER(12);
1977 DEFINE_VTBL_WRAPPER(16);
1978 DEFINE_VTBL_WRAPPER(20);
1979 DEFINE_VTBL_WRAPPER(24);
1980 DEFINE_VTBL_WRAPPER(28);
1981 DEFINE_VTBL_WRAPPER(32);
1982 DEFINE_VTBL_WRAPPER(36);
1983 DEFINE_VTBL_WRAPPER(40);
1984 DEFINE_VTBL_WRAPPER(44);
1985 DEFINE_VTBL_WRAPPER(48);
1986 DEFINE_VTBL_WRAPPER(52);
1987 DEFINE_VTBL_WRAPPER(56);
1988
1989 #endif
1990
1991 void* (__cdecl *MSVCRT_operator_new)(SIZE_T);
1992 void (__cdecl *MSVCRT_operator_delete)(void*);
1993
1994 static void init_cxx_funcs(void)
1995 {
1996     HMODULE hmod = GetModuleHandleA("msvcrt.dll");
1997
1998     if (sizeof(void *) > sizeof(int))  /* 64-bit has different names */
1999     {
2000         MSVCRT_operator_new = (void*)GetProcAddress(hmod, "??2@YAPEAX_K@Z");
2001         MSVCRT_operator_delete = (void*)GetProcAddress(hmod, "??3@YAXPEAX@Z");
2002     }
2003     else
2004     {
2005         MSVCRT_operator_new = (void*)GetProcAddress(hmod, "??2@YAPAXI@Z");
2006         MSVCRT_operator_delete = (void*)GetProcAddress(hmod, "??3@YAXPAX@Z");
2007     }
2008 }
2009
2010 static void init_io(void *base)
2011 {
2012 #ifdef __x86_64__
2013     init_streambuf_rtti(base);
2014     init_filebuf_rtti(base);
2015     init_strstreambuf_rtti(base);
2016     init_ios_rtti(base);
2017 #endif
2018 }
2019
2020 BOOL WINAPI DllMain( HINSTANCE inst, DWORD reason, LPVOID reserved )
2021 {
2022    switch (reason)
2023    {
2024    case DLL_WINE_PREATTACH:
2025        return FALSE;  /* prefer native version */
2026    case DLL_PROCESS_ATTACH:
2027        init_cxx_funcs();
2028        init_exception(inst);
2029        init_io(inst);
2030        DisableThreadLibraryCalls( inst );
2031        break;
2032    }
2033    return TRUE;
2034 }